1. 用户定义变量 ys=100 延时（毫秒）
2. 用户定义变量 cs=12 次数（一般为12
3. 如果表达式 (ys<80) 为真,则
4.     弹出窗口 "延时设置太小，请调大一些"
5. 脚本停止运行
6. 条件结束
7. 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,50,1023,767,"Attachment:\postcard.bmp",0.9,X,Y)
8. 如果表达式 (X=-1 and Y=-1) 为真,则
9.     弹出窗口 寻找失败，请确定打开了摩尔庄园！
10. 脚本停止运行
11. 条件结束
12. 调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, " ", "0000FF")
13. 调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "开始加入游戏…", "0000FF")
14. 鼠标移到 125+x , 265+y
15. 左键单击
16. 延时100毫秒
17. 标记 FindStart
18. 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,50,1023,767,"Attachment:\postcard.bmp",0.9,X,Y)
19. 如果表达式 (X2=-1 and Y2=-1) 为真,则
20.     鼠标移到 125+x , 265+y
21.     左键单击
22.     延时100毫秒
23.     跳转到标记 FindStart
24. 条件结束
25. 鼠标移到 350+x , 319+y
26. 左键单击
27. 延时100毫秒
28. 调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "等待系统加载…", "0000FF")
29. 标记 FindStart2
30. 调用外部VBScript子程序 Call 在屏幕区域里查找图形(0,50,1023,767,"Attachment:\postcard.bmp",0.9,X,Y)
31. 如果表达式 (X2=-1 and Y2=-1) 为真,则
32.     跳转到标记 FindStart2
33. 条件结束
34. 鼠标移到 467+x , 440+y
35. 左键单击
36. 延时100毫秒
37. 循环 cs 遍
38.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, " ", "0000FF")
39.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "正在播种子", "0000FF")
40.     鼠标移到 456+x , 475+y
41.     左键单击
42.     延时ys毫秒
43.     调用子程序 d
44.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, " ", "0000FF")
45.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "正在浇水", "0000FF")
46.     鼠标移到 519+x , 484+y
47.     左键单击
48.     延时ys毫秒
49.     调用子程序 d
50.     调用子程序 d
51.     调用子程序 d
52.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, " ", "0000FF")
53.     调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "正在收获", "0000FF")
54.     鼠标移到 808+x , 480+y
55.     左键单击
56.     延时ys毫秒
57.     调用子程序 d2
58. 循环结束
59. 调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, " ", "0000FF")
60. 调用插件命令 Msg.ShowScrTXT(0, 0, 300, 50, "正在提交分数", "0000FF")
61. 鼠标移到 859+x , y-8
62. 左键单击
63. 延时2000毫秒
64. 鼠标移到 325+x , 382+y
65. 左键单击
66. 延时1000毫秒
67. 脚本停止运行
68. 子程序 d
69.     鼠标移到 344+x , 184+y
70.     左键单击
71.     延时ys毫秒
72.     鼠标移到 460+x , 182+y
73.     左键单击
74.     延时ys毫秒
75.     鼠标移到 324+x , 246+y
76.     左键单击
77.     延时ys毫秒
78.     鼠标移到 441+x , 244+y
79.     左键单击
80.     延时ys毫秒
81.     鼠标移到 291+x , 318+y
82.     左键单击
83.     延时ys毫秒
84.     鼠标移到 432+x , 313+y
85.     左键单击
86.     延时ys毫秒
87.     鼠标移到 283+x , 397+y
88.     左键单击
89.     延时ys毫秒
90.     鼠标移到 421+x , 394+y
91.     左键单击
92.     延时ys毫秒
93. 子程序结束,回到调用处
94. 子程序 d2
95.     鼠标移到 344+x , 184+y
96.     左键单击
97.     延时ys毫秒
98.     鼠标移到 460+x , 182+y
99.     左键单击
100.     延时ys毫秒