1. //3.2版本
2. //作者：gosoyoung
3. //QQ:18093219
4. （VBScript语句） dim hong,lan,g1,g2,g3,sj,lo,ci
5. （VBScript语句） dim t1,t2,t3,q,e,r,kk
6. t1=now:t2=now:t3=now
7. //==================设置==================
8. 用户定义变量 hong=60 按%血量吃红
9. 用户定义变量 lan=50 按%MP量吃蓝（0表示不使用自动加蓝功能）
10. 用户定义变量 g1=1 是否攻击黄怪（是=1，否=0）
11. 用户定义变量 g2=1 是否攻击浅红怪（是=1，否=0）
12. 用户定义变量 g3=1 是否攻击浅黄怪（是=1，否=0）
13. 用户定义变量 r=100 第8键辅助技能的间隔时间(秒)，写0表示不使用
14. 用户定义变量 e=100 第9键辅助技能的间隔时间(秒)，写0表示不使用
15. 用户定义变量 q=90 第0键辅助技能(的间隔时间(秒)，写0表示不使用
16. 用户定义变量 ci=100 循环次内没击倒怪就放弃，随即跑动，重新找怪
17. sj=0
18. ax=hong*1.8+64
19. mx=lan*1.8+61
20. //=====================================================
21. //=====================================================
22. 延时500毫秒
23. //==================开始==================
24. 标记 开始
25. //检查下是否有对话框存在
26. 如果 (418,697) 的颜色等于 #d4d6d6 则
27.     硬件模拟按键<Enter>
28. 否则
29. 条件结束
30. //----------------------------------------
31. //检查下是否要加辅助技能
32. 如果表达式 (r>0) 为真,则
33.     如果表达式 (datediff("s",t1,now)>=r) 为真,则
34.         延时100毫秒
35.         硬件模拟按键<8>
36.         t1=now
37.         跳转到标记 寻怪
38.     条件结束
39. 条件结束
40. 如果表达式 (e>0) 为真,则
41.     如果表达式 (datediff("s",t2,now)>=e) 为真,则
42.         延时100毫秒
43.         硬件模拟按键<9>
44.         t2=now
45.         跳转到标记 寻怪
46.     条件结束
47. 条件结束
48. 如果表达式 (q>0) 为真,则
49.     如果表达式 (datediff("s",t3,now)>=q) 为真,则
50.         延时100毫秒
51.         硬件模拟按键<0>
52.         t3=now
53.         跳转到标记 寻怪
54.     条件结束
55. 条件结束
56. //----------------------------------------
57. //开始寻找怪物
58. 标记 寻怪
59. 如果表达式 (sj=>1) 为真,则
60.     调用子程序 随机移动
61. 条件结束
62. //搜索黄怪
63. 如果表达式 (g1=>1) 为真,则
64.     调用子程序 找怪1
65. 条件结束
66. //搜索浅红怪
67. 如果表达式 (g2=>1) 为真,则
68.     调用子程序 找怪2
69. 条件结束
70. //搜索浅黄怪
71. 如果表达式 (g3=>1) 为真,则
72.     调用子程序 找怪3
73. 条件结束
74. 调用子程序 补血
75. sj=1
76. 跳转到标记 开始
77. //----------------------------------------
78. //=================确认怪=================
79. 标记 自动打怪
80. //点到怪就用物理攻击
81. dx=x
82. dy=y+30
83. 鼠标移到 dx+Int((80*Rnd)-40) , dy+Int((30*Rnd)-15)
84. 右键单击
85. 鼠标移到 dx+Int((80*Rnd)-40) , dy+Int((30*Rnd)-15)
86. 右键单击
87. 鼠标移到 dx+Int((80*Rnd)-40) , dy+Int((30*Rnd)-15)
88. 右键单击
89. 鼠标移到 dx+Int((80*Rnd)-40) , dy+Int((30*Rnd)-15)
90. 右键单击
91. 标记 技能
92. 调用子程序 对话消除
93. 延时100毫秒
94. 调用子程序 补血蓝
95. 如果 (374,20) 的颜色大约等于 #a95f8 则
96.     lo=lo+1
97.     如果表达式 (lo=>ci) 为真,则
98.         延时100毫秒
99.         硬件模拟按键<Esc>
100.         延时200毫秒