1. 用户定义变量 YS1=0 "窗口间延时/毫秒"
2. 用户定义变量 XL=DropList{"Num 1":"Num 1"|"Num 2":"Num 2"|"Num 3":"Num 3"}=1 "寻路设置键"
3. 用户定义变量 A=0 "窗口一的句柄"
4. 用户定义变量 C1=DropList{"采药":"采集"|"采纤维":"采集"|"砍树":"伐木"|"挖矿":"挖掘"|"狩猎药":"狩猎"|"狩猎皮革":"狩猎"}=1 "窗口一采集类别"
5. 用户定义变量 B1=DropList{"镰刀":"镰刀"|"斧头":"斧头"|"弓箭":"弓箭"|"矿锄":"矿锄"}=1 "窗口一的采集工具"
6. 用户定义变量 B=0 "窗口二的句柄"
7. 用户定义变量 C2=DropList{"采药":"采集"|"采纤维":"采集"|"砍树":"伐木"|"挖矿":"挖掘"|"狩猎药":"狩猎"|"狩猎皮革":"狩猎"}=1 "窗口二采集类别"
8. 用户定义变量 B2=DropList{"镰刀":"镰刀"|"斧头":"斧头"|"弓箭":"弓箭"|"矿锄":"矿锄"}=1 "窗口二的采集工具"
9. 用户定义变量 C=0 "窗口三的句柄"
10. 用户定义变量 C3=DropList{"采药":"采集"|"采纤维":"采集"|"砍树":"伐木"|"挖矿":"挖掘"|"狩猎药":"狩猎"|"狩猎皮革":"狩猎"}=1 "窗口三采集类别"
11. 用户定义变量 B3=DropList{"镰刀":"镰刀"|"斧头":"斧头"|"弓箭":"弓箭"|"矿锄":"矿锄"}=1 "窗口三的采集工具"
12. 注释：=======================================窗口一============================================
13. 标记 窗口一
14. 延时 1500 毫秒
15. 注释：查找窗口一的句柄
16. 令 HwndA = A
17. 注释：激活窗口
18. 调用 Window.Active(HwndA)
19. 延时 2000 毫秒
20. 注释：得到窗口句柄的客户区大小
21. 令 sRect = Window.GetClientRect(HwndA)
22. 定义变量 MyArrayA
23. 令 MyArrayA = Split(sRect,"|")
24. 注释：下面这句将字符串转换成数值
25. 令 Ux = Clng(MyArrayA(0))
26. 令 Uy = Clng(MyArrayA(1))
27. 调用 清除异常窗口
28. 标记 窗口一是否受伤
29. 注释：下面这句是：在窗口一的查找受伤
30. 从左上到右下查找图片 "E:\按键精灵\按键精灵8\QQ寻仙图\采集\轻伤.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：Ux 上：Uy 右：Ux + 800 下：Uy + 600），相似度 0.8
31. 注释：下面这句是：受伤了则
32. 如果 intX > 0 并且 intY > 0 则
33.     注释：在这里可以添加找到坐标后，需要做的处理。
34.     调用 换线疗伤
35. 否则
36.     跳转到标记 寻找窗口一的采集依据
37. 条件结束
38. 标记 寻找窗口一的采集依据
39. 从左上到右下查找图片 "E:\按键精灵\按键精灵8\QQ寻仙图\采集的依据.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：Ux 上：Uy + 160 右：Ux + 800 下：Uy + 600），相似度 0.7
40. 注释：在左边窗口寻找采集的依据
41. 如果 intX > 0 并且 intY > 0 则
42.     注释：说明正在采集中，跳转“选择窗口二”
43.     延时 YS1 毫秒
44.     跳转到标记 窗口二
45. 否则
46.     注释：说明采集中断，调用子程序：窗口一采集
47.     调用 窗口一采集
48. 条件结束
49. 注释：=======================================窗口二============================================
50. 标记 窗口二
51. 延时 1500 毫秒
52. 注释：查找窗口一的句柄
53. 令 HwndB = B
54. 注释：激活窗口
55. 调用 Window.Active(HwndB)
56. 延时 2000 毫秒
57. 注释：得到窗口句柄的客户区大小
58. 令 sRect = Window.GetClientRect(HwndB)
59. 定义变量 MyArrayB
60. 令 MyArrayB = Split(sRect,"|")
61. 注释：下面这句将字符串转换成数值
62. 令 Ux = Clng(MyArrayB(0))
63. 令 Uy = Clng(MyArrayB(1))
64. 调用 清除异常窗口
65. 调用 确认战斗状态
66. 调用 确认人物死亡
67. 标记 窗口二是否受伤
68. 注释：下面这句是：在窗口一的查找受伤
69. 从左上到右下查找图片 "E:\按键精灵\按键精灵8\QQ寻仙图\采集\轻伤.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：Ux 上：Uy 右：Ux + 800 下：Uy + 600），相似度 0.8
70. 注释：下面这句是：受伤了则
71. 如果 intX > 0 并且 intY > 0 则
72.     注释：在这里可以添加找到坐标后，需要做的处理。
73.     调用 换线疗伤
74. 否则
75.     跳转到标记 寻找窗口二的采集依据
76. 条件结束
77. 标记 寻找窗口二的采集依据
78. 从左上到右下查找图片 "E:\按键精灵\按键精灵8\QQ寻仙图\采集的依据.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：Ux 上：Uy + 160 右：Ux + 800 下：Uy + 600），相似度 0.7
79. 注释：在左边窗口寻找采集的依据
80. 如果 intX > 0 并且 intY > 0 则
81.     注释：说明正在采集中，跳转“选择窗口三”
82.     延时 YS1 毫秒
83.     跳转到标记 窗口三
84. 否则
85.     注释：说明采集中断，调用子程序：窗口二采集
86.     调用 窗口二采集
87. 条件结束
88. 注释：=======================================窗口三============================================
89. 标记 窗口三
90. 延时 1500 毫秒
91. 注释：查找窗口一的句柄
92. 令 HwndC = C
93. 注释：激活窗口
94. 调用 Window.Active(HwndC)
95. 延时 2000 毫秒
96. 注释：得到窗口句柄的客户区大小
97. 令 sRect = Window.GetClientRect(HwndC)
98. 定义变量 MyArrayC
99. 令 MyArrayC = Split(sRect,"|")
100. 注释：下面这句将字符串转换成数值