1. dim hong,lan,bbhong,bblan,paodong
2. //声明变量
3. 用户定义变量 hong=70 血量<hong%时，自动吃红。
4. 用户定义变量 lan=30 蓝量<lan%时，自动吃蓝
5. 用户定义变量 Rz=DropList{攻击:65|防御:68|法术:81}=0 人物动作
6. 用户定义变量 bbhong=70 血量<hong%时，召唤兽自动吃红。
7. 用户定义变量 bblan=30 蓝量<lan%时，召唤兽自动吃蓝。
8. 用户定义变量 Bz=DropList{攻击:65|防御:68|法术:81}=0 召唤兽动作
9. 用户定义变量 paodong=DropList{跑动:1|跟随:2}=0 遇敌方式
10. 用户定义变量 Zd=DropList{接受:1|拒绝:2}=0 组队邀请的处理方法
11. //-------------[调用插件]
12. 展开附件 .\plugin *.dll
13. 展开附件 . *.bmp
14. 调用插件命令 mh=Window.Foreground()
15. 调用插件命令 Window.Move(mh,0,0)
16. //-------------[主程序]
17. 标记 开始挂机
18. 如果 (365,490) 的颜色大约等于 #9cc0 则
19.     调用子程序 检查组队邀请
20.     延时100毫秒
21.     调用子程序 检查红蓝
22.     延时100毫秒
23.     调用子程序 走路
24. 否则
25.     调用子程序 战斗
26.     延时100毫秒
27. 条件结束
28. 跳转到标记 开始挂机
29. //------------[子程序]
30. 子程序 查找宝宝
31.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝宝.bmp",0.5,bx,by)
32.     如果表达式 (bx>0 and by>0) 为真,则
33.         鼠标移到 bx , by
34.         循环 10 遍
35.             响一声
36.             延时10毫秒
37.         循环结束
38.     条件结束
39. 子程序结束,回到调用处
40. //----------------------[战斗]
41. 子程序 战斗
42.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝宝.bmp",0.5,bx,by)
43.     如果表达式 (x>0 and y>0) 为真,则
44.         按住<Alt>
45.         延时100毫秒
46.         按键#Rz
47.         延时100毫秒
48.         弹起<Alt>
49.         延时500毫秒
50.         按住<Alt>
51.         延时100毫秒
52.         按键#Bz
53.         延时100毫秒
54.         弹起<Alt>
55.         //可以把上面这段改成自己想要的战斗命令，这里以Alt+A为例，按两次是为了把召唤兽算进
56.     否则
57.         调用子程序 等待
58.         //调用等待子程序，等待战斗指令框出现
59.         延时100毫秒
60.         //延时防卡
61.     条件结束
62. 子程序结束,回到调用处
63. //子程序完结回到调用处
64. 子程序 等待
65.     延时500毫秒
66.     //写上你等待的时间（单位：毫秒）
67. 子程序结束,回到调用处
68. //子程序完结回到调用处
69. //--------------------[检查验证]
70. 子程序 检查验证
71.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝宝.bmp",0.5,bx,by)
72.     如果表达式 (yx>0 and yy>0) 为真,则
73.         循环 10 遍
74.             响一声
75.         循环结束
76.     条件结束
77. 子程序结束,回到调用处
78. //--------------------[检查组队邀请]
79. 子程序 检查组队邀请
80.     调用外部VBScript子程序 在屏幕区域里查找图形(0,0,650,502,"Attachment:\宝宝.bmp",0.5,bx,by)
81.     如果表达式 (x10>0 and y10>0 and Zd=1) 为真,则
82.         调用插件命令 vhr_xyq.mMoveTo(x10,y10+3,"shu.bmp",0.9)
83.         延时100毫秒
84.         左键单击
85.     否则如果(x10>0 and y10>0 and Zd=2)为真,则
86.         x=x10:y=y10+15
87.         调用插件命令 vhr_xyq.mMoveTo(x10,y10+15,"shu.bmp",0.9)
88.         延时100毫秒
89.         左键单击
90.     条件结束
91. 子程序结束,回到调用处
92. //--------------------[检查红蓝]
93. 子程序 检查红蓝
94.     标记 补红
95.     保存鼠标位置
96.     如果 (hong/100*(635-591)+591,37) 的颜色大约等于 #4034e8 则
97.     否则
98.         //x2=血条在屏幕最右端坐标，x1=血条在屏幕最左端坐标，
99.         //y=x1,x2在血条中的同一纵坐标，color=血条的空血颜色值。
100.         调用插件命令 vhr_xyq.mMoveTo(592,40,"shu.bmp",0.9)