1. 用户定义变量 hysl=1 你有多少好友
2. 用户定义变量 ydck=DropList{是:1|否:0}=0 启动后是否将窗口移出桌面
3. 用户定义变量 dlzt=DropList{网页记录了登陆状态:0|需要登陆用户:1}=0 登陆状态
4. 用户定义变量 zh=********* 帐号
5. 用户定义变量 mm=******* 密码
6. 调用插件命令 Web.Bind("wqm.exe")
7. 如果表达式 (dlzt=1) 为真,则
8.     调用插件命令 Web.Tips("打开校内网登陆界面")
9.     调用插件命令 Web.Go("http://reg.xiaonei.com/xn6206.do?ss=10112&rt=26")
10.     调用插件命令 Web.HtmlInput(zh,"id:email")
11.     调用插件命令 Web.HtmlInput(mm,"id:password")
12.     调用插件命令 Web.HtmlClick("id:login")
13. 条件结束
14. 调用插件命令 Web.Tips("等待10秒进入游戏界面")
15. 调用插件命令 Web.Go("http://apps.xiaonei.com/happyfarm?origin=103")
16. 延时10000毫秒
17. dwx=-1
18. 如果表达式 (dwx=-1) 为真,则循环执行
19.     //设置网页大小
20.     调用插件命令 Web.Tips("设置调整WQM界面大小")
21.     调用插件命令 Web.SetSize(1156,838)
22.     调用插件命令 Web.ScrollTo(0,70)
23.     延时2000毫秒
24.     调用插件命令 Web.Tips("鼠标拖动定位1查找")
25.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\定位1.bmp",0.7,dwx,dwy)
26.     如果表达式 (dwx>0 and dwy>0) 为真,则
27.         鼠标移到 dwx-75 , dwy+389
28.         左键按下
29.         延时500毫秒
30.         鼠标移到 dwx-75-43 , dwy+389-138
31.         左键弹起
32.         延时500毫秒
33.     否则
34.         调用插件命令 Web.Tips("鼠标拖动定位2查找")
35.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,1024,768,"Attachment:\定位1.bmp",0.7,dwx,dwy)
36.         如果表达式 (dwx>0 and dwy>0) 为真,则
37.             鼠标移到 dwx-116 , dwy+364
38.             左键按下
39.             延时500毫秒
40.             鼠标移到 dwx-116-43 , dwy+364-138
41.             左键弹起
42.             延时500毫秒
43.         条件结束
44.     条件结束
45. 循环结束
46. 如果表达式 (ydck=1) 为真,则
47.     //下面这句是得到当前最前面的窗口句柄
48.     调用插件命令 Hwnd = Window.Foreground()
49.     调用插件命令 Web.Tips("WQM窗体被移动到屏幕外面")
50.     //下面这句是移动窗口到(5000,5000)位置
51.     调用插件命令 Window.Move(Hwnd, 5000, 5000)
52. 条件结束
53. //设置好友菜单变量
54. 如果表达式 (true) 为真,则循环执行
55.     j=int(hysl / 10)+1
56.     l=hysl mod 10
57.     i=10:k=0
58.     循环 j 遍
59.         n=0
60.         循环 i 遍
61.             如果表达式 (k=j and i>l) 为真,则
62.                 跳转到标记 [结束]
63.             条件结束
64.             //跳过自己
65.             如果表达式 (k=0 and n=0) 为真,则
66.             否则
67.                 djwzx=798:djwzy=316+n*32:cs=1
68.                 调用子程序 [打开好友菜单]
69.                 调用子程序 [采集]
70.             条件结束
71.             n=n+1
72.         循环结束
73.         djwzx=824:djwzy=619:cs=1
74.         调用子程序 [打开好友菜单]
75.         k=k+1
76.     循环结束
77.     //测试句。需要去掉
78.     //测试句。需要去掉
79.     标记 [结束]
80.     djwzx=824:djwzy=619:cs=j
81.     调用子程序 [打开好友菜单]
82. 循环结束
83. 脚本停止运行
84. 子程序 [采集]
85.     调用插件命令 Web.Tips("开始偷好友的果实")
86.     调用插件命令 Web.LeftClick(552,622)
87.     延时1000毫秒
88.     //设置环境
89.     cdx=345:cdy=245
90.     hcz=190/2:scz=90/2:ydcs=6:wbl=0:nbl=0
91.     //进行收割农作物
92.     循环 3 遍
93.         循环 ydcs 遍
94.             调用插件命令 Web.LeftClick(cdx+hcz*(nbl-wbl),cdy+scz*(nbl+wbl))
95.             nbl=nbl+1
96.             延时1000毫秒
97.         循环结束
98.         nbl=0
99.         wbl=wbl+1
100.     循环结束