1. //1红 2蓝 3攻击 456攻击技能 780辅助技能(或卷轴) 9治愈 -回城卷 =捡东西
2. dim hp,mp
3. dim n,m
4. dim XuanZhuanZhaoGuai,XueShaoXiuXi,WuGuaiXiuXi
5. dim WuHongHuiCheng,WuLanHuiCheng
6. dim Time1,Time2
7. dim a,b,i,h
8. dim jn(5)
9. dim t1,t2,t3,t4,t5,t6
10. dim l,B,Y
11. 用户定义变量 hp=35 hp<%多少时,补红
12. 用户定义变量 mp=20 mp<%多少时,补蓝
13. 用户定义变量 jn(0)=5 技能1的冷却时间(秒)
14. 用户定义变量 jn(1)=7 技能2的冷却时间(秒)
15. 用户定义变量 jn(2)=5 技能3的冷却时间(秒)
16. 用户定义变量 jn(3)=50 辅助技能(或卷轴)1的持续时间(分)
17. 用户定义变量 jn(4)=55 辅助技能(或卷轴)2的持续时间(分)
18. 用户定义变量 jn(5)=60 辅助技能(或卷轴)3的持续时间(分)
19. 用户定义变量 l=3 解咒卷轴携带数量
20. 用户定义变量 XuanZhuanZhaoGuai=1 1开启旋转找怪 0关闭旋转找怪
21. 用户定义变量 XueShaoXiuXi=0 1开启血少休息 0关闭血少休息
22. 用户定义变量 WuGuaiXiuXi=0 1开启无怪休息 0关闭无怪休息
23. 用户定义变量 WuHongHuiCheng=1 1开启无红回城 0关闭无红回城
24. 用户定义变量 WuLanHuiCheng=0 1开启无蓝回城 0关闭无蓝回城
25. n=0:m=0
26. Time1=0:Time2=0
27. a="50":b="51":i=3:h=0
28. t1=now:t2=now:t3=now:t4=now:t5=now:t6=now
29. B=0:Y=0
30. //开始
31. 标记 s
32. 按键=
33. 调用子程序 选怪
34. 调用子程序 防PK
35. 调用子程序 旋转找怪
36. 调用子程序 攻击
37. 调用子程序 辅助技能
38. 调用子程序 补红
39. 调用子程序 补蓝
40. 调用子程序 解咒
41. 调用子程序 技能补红
42. 调用子程序 血少休息
43. 调用子程序 无怪休息
44. 调用子程序 无红回城
45. 调用子程序 无蓝回城
46. 延时32毫秒
47. 跳转到标记 s
48. 脚本停止运行
49. 子程序 选怪
50.     调用外部VBScript子程序 在屏幕区域里模糊查找颜色(498,28,500,30,"fffbef",1,0.8,x,y)
51.     如果表达式 (x<0 and y<0) 为真,则
52.         按键<Tab>
53.         按键=
54.     条件结束
55. 子程序结束,回到调用处
56. 子程序 防PK
57.     调用外部VBScript子程序 在屏幕区域里模糊查找颜色(498,28,500,30,"fffbef",1,0.8,x,y)
58.     如果表达式 (x>0 and y>0) 为真,则
59.         按键<Tab>
60.     条件结束
61. 子程序结束,回到调用处
62. 子程序 旋转找怪
63.     如果表达式 (XuanZhuanZhaoGuai=1) 为真,则
64.         延时125毫秒
65.         h=h+1
66.         如果表达式 (h>=2) 为真,则
67.             鼠标移到 (a) , 125
68.             右键按下
69.             延时32毫秒
70.             a=a+i
71.             鼠标移到 (b) , 125
72.             延时32毫秒
73.             b=b+i
74.             右键弹起
75.             h=0
76.             调用子程序 初始化变量
77.             延时125毫秒
78.         条件结束
79.     条件结束
80. 子程序结束,回到调用处
81. 子程序 初始化变量
82.     如果表达式 (a>=150) 为真,则
83.         a="50"
84.     条件结束
85.     如果表达式 (b>=151) 为真,则
86.         b="51"
87.         延时32毫秒
88.     条件结束
89. 子程序结束,回到调用处
90. 子程序 攻击
91.     调用外部VBScript子程序 在屏幕区域里模糊查找颜色(498,28,500,30,"fffbef",1,0.8,x,y)
92.     如果表达式 (x>=0 and y>=0) 为真,则
93.         n=0
94.         按键<3>
95.         调用子程序 技能
96.     条件结束
97. 条件结束
98. 子程序结束,回到调用处
99. 子程序 技能
100.     如果表达式 (DateDiff("s",t1,now)>=jn(0)) 为真,则