1. 注释：获得鼠标指定的窗口句柄
2. 令 Hwnd = Window.MousePoint()
3. 注释：得到窗口客户区域大小
4. 令 sRect = Window.GetClientRect(Hwnd)
5. 令 MyArray = Split(sRect,"|")
6. 令 L = Clng(MyArray(0))
7. 令 T = Clng(MyArray(1))
8. 令 R = Clng(MyArray(2))
9. 令 B = Clng(MyArray(3))
10. 标记 walk
11. 注释：通过右上角色块获取非战斗状态信息
12. 令 GetColor = Bkgnd.GetPixelColor(Hwnd,970,74)
13. 如果 GetColor = "02409E" 则
14.     延时 100 毫秒
15.     调用 Bkgnd.KeyDown(Hwnd,65)
16.     延时 2000 毫秒
17.     调用 Bkgnd.KeyUp(Hwnd,65)
18.     延时 500 毫秒
19. 否则
20.     延时 1000 毫秒
21.     跳转到标记 walk
22. 条件结束
23. 令 GetColor = Bkgnd.GetPixelColor(Hwnd,970,74)
24. 如果 GetColor = "02409E" 则
25.     延时 100 毫秒
26.     调用 Bkgnd.KeyDown(Hwnd,68)
27.     延时 2000 毫秒
28.     调用 Bkgnd.KeyUp(Hwnd,68)
29.     延时 500 毫秒
30. 否则
31.     延时 1000 毫秒
32.     跳转到标记 walk
33. 条件结束
34. 跳转到标记 walk