- 令 A = Window.Foreground()
- 令 sRect = Window.GetClientRect(A)
- 令 MyArray = Split(Rect,"|")
- 令 Ux = CLng(MyArray(0))
- 令 Uy = CLng(MyArray(1))
- 标记 B
- 调用 Bkgnd.KeyDown(A,37)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyUp(A,37)
- 延时 50 毫秒
- 调用 Bkgnd.KeyDown(A,39)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyUp(A,39)
- 延时 50 毫秒
- 如果点 (246 + Ux,102 + Uy) 的颜色等于 "030334" 则
- 调用 Bkgnd.KeyPress(A,98)
- 条件结束
- 如果点 (99 + Ux,106 + Uy) 的颜色等于 "0" 则
- 调用 Bkgnd.KeyPress(A,103)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyPress(A,13)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyPress(A,13)
- 延时 1000 毫秒
- 调用 Bkgnd.LeftClick(A,259 + Ux,496 + Uy)
- 延时 500 毫秒
- 条件结束
- 如果点 (99 + UX,102 + Uy) 的颜色等于 "0" 则
- 调用 Bkgnd.KeyPress(A,103)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyPress(A,39)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyPress(A,13)
- 延时 1000 毫秒
- 调用 Bkgnd.KeyPress(A,13)
- 延时 1000 毫秒
- 调用 Bkgnd.LeftClick(A,259 + Ux,496 + Uy)
- 延时 500 毫秒
- 条件结束
- 如果点 (256 + Ux,261 + Uy) 的颜色等于 "24DAFF" 则
- 调用 Bkgnd.LeftClick(A,256 + Ux,261 + Uy)
- 条件结束
- 跳转到标记 B