1. 令 Hwnd = Window.Find(0,"倩女幽魂Online 版本[96621] 服务器[春江花月] 角色ID[64630192]")
2. 令 sRect = Window.GetClientRect(Hwnd)
3. 定义变量 MyArray
4. 令 MyArray = Split(sRect,"|")
5. 令 Ux = CLng(MyArray(0))
6. 令 Uy = CLng(MyArray(1))
7. 注释：开始
8. 调用 Window.Active(Hwnd)
9. 延时 500 毫秒
10. 调用 Window.Move(Hwnd,0,0)
11. 延时 1000 毫秒
12. （键盘）按 "1" 键, 1次
13. 延时 300 毫秒
14. （键盘）按 "2" 键, 1次
15. 延时 500 毫秒
16. （键盘）按 "Q" 键, 1次
17. 注释：需要角色2是组队跟随状态
18. 延时 200 毫秒
19. 注释：开始循环挂机
20. 令 t = now
21. 令 t1 = now
22. 令 t2 = now
23. 循环开始
24.     注释：记录当前时间
25.     注释：======================间隔技能==================================
26.     注释：间隔200秒使用辅助技能
27.     注释：加血、加蓝===================================================================
28.     延时 100 毫秒
29.     如果点 (131 + ux,31 + uy) 的颜色不等于 "101DB" 则
30.         （键盘）按 "F3" 键, 1次
31.         延时 1000 毫秒
32.         如果点 (101 + ux,42 + uy) 的颜色不等于 "E35201" 则
33.             （键盘）按 "F4" 键, 1次
34.             延时 1000 毫秒
35.             如果 DateDiff("s",t1,now) >= 10 则
36.                 调用 召唤()
37.                 令 t1 = now
38.                 如果 DateDiff("s",t2,now) >= 30 则
39.                     调用 买火烧()
40.                     延时 300 毫秒
41.                     令 t2 = now
42.                 否则
43.                 条件结束
44.             条件结束
45.         条件结束
46.     条件结束
47.     延时 100 毫秒
48.     注释：捡物===================================================================
49.     循环 5 次
50.         从左上到右下查找图片 "Attachment:\银两.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：200 + ux 上：200 + uy 右：1100 + ux 下：700 + uy），相似度 0.9
51.         如果 intX > 0 并且 intY > 0 则
52.             延时 1000 毫秒
53.             （鼠标）移动到 (intX + 5, intY + 10)
54.             延时 800 毫秒
55.             （鼠标）左键单击, 1次
56.         否则
57.             从左上到右下查找图片 "Attachment:\银票.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：200 + ux 上：200 + uy 右：1100 + ux 下：700 + uy），相似度 0.9
58.             如果 intX > 0 并且 intY > 0 则
59.                 延时 1000 毫秒
60.                 （鼠标）移动到 (intX + 5, intY + 10)
61.                 延时 800 毫秒
62.                 （鼠标）左键单击, 1次
63.             否则
64.                 从左上到右下查找图片 "Attachment:\吴山矿石.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：10 + ux 上：10 + uy 右：1150 + ux 下：700 + uy），相似度 0.9
65.                 如果 intX > 0 并且 intY > 0 则
66.                     延时 1000 毫秒
67.                     （鼠标）移动到 (intX + 5, intY + 10)
68.                     延时 800 毫秒
69.                     （鼠标）左键单击, 1次
70.                 否则
71.                 条件结束
72.             条件结束
73.         条件结束
74.         调用 单打()
75.     循环结束
76. 循环结束
77. 延时 100 毫秒
78. 注释：当循环条件成立的时候，离开循环体
79. 子程序 辅助()
80.     延时 200 毫秒
81.     （键盘）按 "1" 键, 1次
82.     延时 800 毫秒
83.     （键盘）按 "2" 键, 1次
84.     延时 600 毫秒
85.     （键盘）按 "3" 键, 1次
86. 子程序结束
87. 注释：====召唤2木灵=========》》》》》》》》》》》
88. 子程序 召唤()
89.     延时 100 毫秒
90.     从左上到右下查找图片 "Attachment:\召唤3.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：228 + ux 上：0 + uy 右：260 + ux 下：30 + uy），相似度 0.9
91.     如果 intX > 0 并且 intY > 0 则
92.         延时 100 毫秒
93.     否则
94.         （键盘）按 "5" 键, 1次
95.         延时 7000 毫秒
96.     条件结束
97. 子程序结束
98. 注释：群攻打怪===================================================================
99. 子程序 群攻()
100.     循环 1 次