1. // 元灵化身828.12
2. //1024*768/32色（全屏窗口皆可，建议全屏）
3. dim a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s
4. dim aa,bb
5. dim T1,T2,T3
6. dim gj1,gj2,gj3,weichongwu1,weichongwu2,gongji,gongjiKG,wcc
7. 用户定义变量 gongji=droplist{数字键1:49|数字键2:50|数字键3:51|数字键4:52|数字键5:53|数字键6:54|数字键7:55}=0 攻击/组合技能键
8. 用户定义变量 chihong=droplist{数字键1:49|数字键2:50|数字键3:51|数字键4:52|数字键5:53|数字键6:54|数字键7:55}=2 吃红键
9. 用户定义变量 chilan=droplist{数字键1:49|数字键2:50|数字键3:51|数字键4:52|数字键5:53|数字键6:54|数字键7:55}=3 吃蓝键
10. 用户定义变量 weichongwu2=droplist{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|数字键1:49|数字键2:50|数字键3:51|数字键4:52|数字键5:53|数字键6:54|数字键7:55}=6 喂宠物键
11. 用户定义变量 gongjiyanshi=droplist{0.5秒:500|1.0秒:1000|2.0秒:2000|3.0秒:3000|4.0秒:4000|5.0秒:5000|6.0秒:6000|7.0秒:7000|8.0秒:8000|9.0秒:9000|10秒:10000|11秒:11000|12秒:12000|13秒:13000|14秒:14000|15秒:15000|20秒:20000|25秒:25000}=4 攻击延时[秒*2]
12. 用户定义变量 hongT=256 吃红延时[毫秒]
13. 用户定义变量 lanT=256 吃蓝延时[毫秒]
14. 用户定义变量 hong=70 红低于%多少自动吃红
15. 用户定义变量 lan=30 蓝低于%多少自动吃蓝
16. 用户定义变量 T3=droplist{低于设置饱食度就吃:0|20秒[20秒]:10000|40秒[40秒]:20000|60秒[1分钟]:30000}=1 喂宠延时
17. 用户定义变量 baoshi=95 宠饱食度低于%多少自动喂食
18. 用户定义变量 wcc=droplist{1个/次:1|2个/次:2|3个/次:3|4个/次:4|5个/次:5}=0 喂食数量
19. 用户定义变量 gongjiKG=droplist{自动打怪:0|仅补蓝红:1}=0 打怪选择
20. 用户定义变量 dingdianKG=droplist{是:0|否:1}=1 是否定点打怪
21. 用户定义变量 DDKG=droplist{经常:5|偶尔:20|很少:30}=0 回定点频率
22. 用户定义变量 gj1=droplist{全部:0|人形系:1|妖兽系:2|幽冥系:3|鳞皇系:4|天空系:5|金属系:6|五毒系:7|元素系:8|木魔系:9}=0 第一优先攻击
23. 用户定义变量 gj2=droplist{全部:0|人形系:1|妖兽系:2|幽冥系:3|鳞皇系:4|天空系:5|金属系:6|五毒系:7|元素系:8|木魔系:9}=0 第二优先攻击
24. 用户定义变量 shiquKG=droplist{是:0|否:1}=0 是否自动拾取
25. 用户定义变量 shiqu=droplist{数字键1:49|数字键2:50|数字键3:51|数字键4:52|数字键5:53|数字键6:54|数字键7:55}=1 拾取键
26. 用户定义变量 o=droplist{打怪优先:1|适中:2|拾取优先:3}=1 打怪拾取优先选择
27. //***************************************
28. //****************人物血条抓取***********
29. //***************************************
30. 延时1000毫秒
31. 调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
32. //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
33. 如果表达式 (x>=0 and y>=0) 为真,则
34.     a=x+243
35.     d=x+224
36.     b=y-32
37.     c=a-117
38.     f=d-105
39.     e=y-16
40. 条件结束
41. 延时100毫秒
42. 如果表达式 (a>0) 为真,则
43.     延时100毫秒
44. 否则
45.     弹出窗口 "出错了！抓取人物血量时出错，请检查游戏分辨率是否为1024*768/32色！（窗口化/全屏皆可！）"
46. 条件结束
47. //***************************************
48. 标记 stat1
49. 如果表达式 (gongjiKG=1) 为真,则
50.     调用子程序 人物补血补蓝
51.     调用子程序 喂宠
52.     跳转到标记 stat1
53. 条件结束
54. //**************设置挂机点***************
55. //***************************************
56. 如果表达式 (gongjiKG=0) 为真,则
57.     延时100毫秒
58.     如果表达式 (dingdianKG=0) 为真,则
59.         延时100毫秒
60.         调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
61.         //区域找图 0,0,1024,768为区域范围 "神盾.bmp"为图片名（路径） 0.9为找图的相似度 x,y为找到图片后的坐标变量
62.         如果表达式 (x>=0 and y>=0) 为真,则
63.             鼠标移到 x , y
64.             延时1000毫秒
65.             左键单击
66.             延时100毫秒
67.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
68.             如果表达式 (x>=0 and y>=0) 为真,则
69.                 鼠标移到 x+3 , y+3
70.                 延时1000毫秒
71.                 左键单击
72.                 延时1000毫秒
73.                 按键<Enter>
74.             条件结束
75.             延时100毫秒
76.             调用外部VBScript子程序 在屏幕区域里查找图形(0,0,60,150,"Attachment:\人物1024.bmp",0.8,x,y)
77.             如果表达式 (x>=0 and y>=0) 为真,则
78.                 鼠标移到 x+3 , y+3
79.                 延时1000毫秒
80.                 左键单击
81.                 延时1000毫秒
82.                 按键<1>
83.                 延时1000毫秒
84.                 按键<Enter>
85.                 延时1000毫秒
86.                 按键<Esc>
87.                 延时1000毫秒
88.             条件结束
89.         条件结束
90.     条件结束
91. 条件结束
92. //**********************************
93. //***********主程序*****************
94. //**********************************
95. 延时100毫秒
96. 调用插件命令 T1=Sys.GetTime()
97. 延时10毫秒
98. bb=1
99. 延时10毫秒
100. 标记 stat