1. 用户定义变量 hy="5" "好友页数"
2. 用户定义变量 sj="1" "刷新时间(分)"
3. 用户定义变量 af=DropList{"是":"1"|"否":"2"}=1 "安抚好友"
4. 用户定义变量 zf=DropList{"是":"1"|"否":"2"}=1 "祝福好友"
5. 用户定义变量 xl=DropList{"是":"1"|"否":"2"}=1 "窃取修炼"
6. 用户定义变量 zh=DropList{"是":"1"|"否":"2"}=1 "召回好友"
7. 用户定义变量 sk=DropList{"是":"1"|"否":"2"}=1 "时空震荡"
8. 调用 Web.Bind("WQM.exe")
9. 延时 200 毫秒
10. （键盘）按下 "Alt" 键
11. 延时 200 毫秒
12. （键盘）按 "Space" 键, 1次
13. 延时 200 毫秒
14. （键盘）弹起 "Alt" 键
15. 延时 200 毫秒
16. （键盘）按 "X" 键, 1次
17. 延时 200 毫秒
18. 调用 Web.Go("http://res.xb.qq.com/home.html")
19. 延时 3000 毫秒
20. 弹出窗口 "请手动登陆游戏" & vbCrlf & vbCrlf & "登陆成功后再点确定"
21. 延时 500 毫秒
22. 调用 Web.ScrollTo(0,0)
23. 延时 500 毫秒
24. 弹出窗口 "请勿改动游戏窗口的大小和位置" & vbCrlf & vbCrlf & "否则系统无法正常运行"
25. 延时 500 毫秒
26. （鼠标）移动到 (810, 300)
27. 延时 500 毫秒
28. （鼠标）左键单击, 1次
29. 延时 500 毫秒
30. （鼠标）移动到 (1060, 480)
31. 延时 500 毫秒
32. （鼠标）左键单击, 1次
33. 延时 1000 毫秒
34. 循环当 sj > 0 时
35.     从左上到右下查找图片 "Attachment:\shuaxin.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
36.     如果 intX > 860 并且 intY > 260 则
37.         （鼠标）移动到 (intX + 10, intY + 10)
38.         延时 200 毫秒
39.         （鼠标）左键单击, 1次
40.         延时 3000 毫秒
41.     否则
42.     条件结束
43.     循环 (hy) 次
44.         循环 5 次
45.             从左上到右下查找图片 "Attachment:\anfu.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
46.             如果 af = 1 并且 intX > 860 并且 intY > 260 则
47.                 （鼠标）移动到 (intX + 10, intY + 10)
48.                 延时 200 毫秒
49.                 （鼠标）左键单击, 1次
50.                 延时 200 毫秒
51.             否则
52.                 （鼠标）移动到 (1025, 680)
53.             条件结束
54.             从左上到右下查找图片 "Attachment:\baoxiang.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
55.             如果 zf = 1 并且 intX > 860 并且 intY > 260 则
56.                 （鼠标）移动到 (intX + 10, intY + 10)
57.                 延时 200 毫秒
58.                 （鼠标）左键单击, 1次
59.                 延时 200 毫秒
60.             否则
61.                 （鼠标）移动到 (1025, 680)
62.             条件结束
63.             从左上到右下查找图片 "Attachment:\xiulian.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
64.             如果 xl = 1 并且 intX > 860 并且 intY > 260 则
65.                 （鼠标）移动到 (intX + 10, intY + 10)
66.                 延时 200 毫秒
67.                 （鼠标）左键单击, 1次
68.                 延时 200 毫秒
69.             否则
70.                 （鼠标）移动到 (1025, 680)
71.             条件结束
72.             从左上到右下查找图片 "Attachment:\gouyin.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
73.             如果 zh = 1 并且 intX > 860 并且 intY > 260 则
74.                 （鼠标）移动到 (intX + 10, intY + 10)
75.                 延时 200 毫秒
76.                 （鼠标）左键单击, 1次
77.                 延时 200 毫秒
78.             否则
79.                 （鼠标）移动到 (1025, 680)
80.             条件结束
81.             从左上到右下查找图片 "Attachment:\shandian.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
82.             如果 sk = 1 并且 intX > 860 并且 intY > 260 则
83.                 （鼠标）移动到 (intX + 10, intY + 10)
84.                 延时 200 毫秒
85.                 （鼠标）左键单击, 1次
86.                 延时 200 毫秒
87.             否则
88.                 （鼠标）移动到 (1025, 680)
89.             条件结束
90.         循环结束
91.         （鼠标）移动到 (1025, 680)
92.         延时 200 毫秒
93.         （鼠标）左键单击, 1次
94.         延时 200 毫秒
95.     循环结束
96.     从左上到右下查找图片 "Attachment:\shouye.bmp"，把找到的坐标保存到 (intX, intY)，指定区域（左：860 上：260 右：1079 下：799），相似度 0.8
97.     如果 intX > 860 并且 intY > 260 则
98.         （鼠标）移动到 (intX + 10, intY + 10)
99.         延时 200 毫秒
100.         （鼠标）左键单击, 1次