1. 令 Hwnd = Window.Find(0,"魔兽世界")
2. 令 sRect = Window.GetClientRect(Hwnd)
3. 定义变量 MyArray
4. 令 MyArray = Split(Rect,"|")
5. 令 Ux = clng(MyArray(0))
6. 令 Uy = clng(MyArray(1))
7. （键盘）按 "Home" 键, 15次
8. 标记 diaoyu1
9. 循环 20 次
10.     调用 diaoyu()
11. 循环结束
12. 子程序 diaoyu()
13.     （键盘）按 "1" 键, 1次
14.     循环当 i = 0 时
15.         从左上到右下查找图片 "Attachment:\yupiao3.bmp"，把找到的坐标保存到 (yupiaoX, yupiaoY)，指定区域（左：Ux + 128 上：Uy + 160 右：Ux + 625 下：Uy + 384），相似度 0.7
16.         如果 yupiaoX > 0 并且 yupiaoY > 0 则
17.             令 i = 1
18.             （鼠标）移动到 (yupiaoX, yupiaoY)
19.             保存鼠标位置
20.         条件结束
21.     循环结束
22.     延时 100 毫秒
23.     循环当 i = 0 时
24.         （鼠标）移动到 (Ux + 126, Uy + 158)
25.         延时 100 毫秒
26.         恢复鼠标位置
27.         如果 not shape = 返回当前鼠标的形状特征（1053591638） 则
28.             令 i = 1
29.             （鼠标）右键单击, 20次
30.         条件结束
31.     循环结束
32. 子程序结束
33. （键盘）按 "Enter" 键, 1次
34. （键盘）按 "/" 键, 1次
35. （键盘）按 "T" 键, 1次
36. （键盘）按 "A" 键, 1次
37. （键盘）按 "R" 键, 1次
38. （键盘）按 "Space" 键, 1次
39. Event(Form1.Loadover)
40. (语句无法识别，可能有错误): End Event
41. （键盘）按 "Enter" 键, 1次
42. （键盘）按 "=" 键, 1次
43. 从左上到右下查找图片 "Attachment:\钓鱼技能.bmp"，把找到的坐标保存到 (jinengX, jinengY)，指定区域（左：Ux 上：Uy 右：Ux + 350 下：Uy + 384），相似度 1
44. 如果 jinengX > 0 并且 jinengY > 0 则
45.     （鼠标）移动到 (jinengX + 5, jinengY + 3)
46.     （鼠标）左键单击, 1次
47.     从左上到右下查找图片 "Attachment:\训练.bmp"，把找到的坐标保存到 (xunlianX, xunlianY)，指定区域（左：Ux 上：Uy 右：Ux + 600 下：Uy + 550），相似度 1
48.     如果 xunlianX > 0 并且 xunlianY > 0 则
49.         （鼠标）移动到 (xunlianX + 5, xunlianY + 3)
50.         （鼠标）左键单击, 1次
51.     条件结束
52. 否则
53.     （键盘）按 "1" 键, 1次
54. 条件结束
55. 跳转到标记 diaoyu1