1. Dim MonColor(4),i,j,k
2. // UserVar VocationVar=DropList{戰士:0|機甲師:1|魔法師:2|召喚師:3}=0 職業設定
3. VocationVar==0
4. 用户定义变量 KillModeVar=DropList{全自動打怪:0|手動滑鼠自動攻擊:1|手動滑鼠手動攻擊:2}=0 打怪模式設定
5. 用户定义变量 SkillVar=DropList{普通攻擊(左鍵):0|技能攻擊(右鍵):1|先左後右攻擊:2}=0 攻擊設定
6. 用户定义变量 LRTime=100 先左後右間隔時間(毫秒)
7. 用户定义变量 HPvar=DropList{Close:0|10%:0.1|20%:0.2|30%:0.3|40%:0.4|50%:0.5|60%:0.6|70%:0.7|80%:0.8|90%:0.9}=7 剩幾%補紅
8. 用户定义变量 HPtimeVar=DropList{Close:0|1秒:1|2秒:2|3秒:3}=1 補紅間隔時間
9. 用户定义变量 MPvar=DropList{Close:0|10%:0.1|20%:0.2|30%:0.3|40%:0.4|50%:0.5|60%:0.6|70%:0.7|80%:0.8|90%:0.9}=5 剩幾%補補藍
10. 用户定义变量 MPtimeVar=DropList{Close:0|1秒:1|2秒:2|3秒:3}=2 補藍間隔時間
11. 用户定义变量 HPvar1=DropList{Close:0|25%:0.25|50%:0.5|75%:0.75}=0 打坐補紅
12. 用户定义变量 MPvar1=DropList{Close:0|25%:0.25|50%:0.5|75%:0.75}=0 打坐補藍
13. 用户定义变量 Killvar=DropList{只打紅怪:1|粉怪以上:2|白怪以上:3|綠怪以上:4|藍怪以上:5}=4 打怪等級
14. 用户定义变量 NoKillMon=DropList{Close:0|防搶怪:1}=0 防搶怪設定
15. 用户定义变量 CanNotKillVar=DropList{Close:0|防卡牆:1}=1 防打卡牆怪物
16. 用户定义变量 CanNotKillTime=6 防卡牆時間(秒)
17. 用户定义变量 AriseVar=DropList{Close:0|重生點:1|原地:2|咒文書:3|結束遊戲程式:4}=0 復活設定
18. // 搜尋方式
19. // UserVar FineVar=DropList{集中掃描:0|全部掃描:1}=0 搜尋方式
20. 用户定义变量 FineSizeVar=DropList{大範圍:0|中範圍:1|小範圍:2}=0 搜尋範圍
21. 用户定义变量 EyesVar=DropList{手動:0|自動:1|自動拉遠:2}=2 視角調整
22. 用户定义变量 AspectVar=DropList{Close:0|15度:1|30度:2|45度:3|60度:4|75度:5}=0 自動旋轉方向
23. // UserVar SkillTime=DropList{0.3秒:3|0.5秒:5|1秒:10|1.5秒:15|2秒:20|2.5秒:25}=4 技能時間
24. 用户定义变量 AspectVar1=DropList{Close:0|15度:1|30度:2|45度:3|60度:4|75度:5}=2 無怪時旋轉方向
25. 用户定义变量 CarafeVar=DropList{Close:0|回重生點:1}=1 無補充水瓶設定
26. 用户定义变量 GetBaoVar=DropList{Close:0|全部撿:1|撿紫裝:2}=2 強制撿寶設定
27. // UserVar BallVar=10 買子彈次數
28. BallVar=1
29. // 初始值
30. // 搜尋方式
31. FineVar=0
32. // 紅怪
33. MonColor(0)="3434cd"
34. // 粉紅怪
35. MonColor(1)="5e81c9"
36. // 白怪
37. MonColor(2)="ffffff"
38. // 綠怪
39. MonColor(3)="5ec968"
40. // 藍怪
41. MonColor(4)="c97c5e"
42. // 取得補紅起始時間
43. HPtime=Now
44. // 取得補藍起始時間
45. MPtime=Now
46. // 取得怪物血條時間
47. MonRunTime=time
48. 标记 again
49. // 調整方向和角度
50. 如果表达式 (EyesVar=1 or EyesVar=2) 为真,则
51.     循环 50 遍
52.         鼠标滚轮滚动 1
53.         延时40毫秒
54.     循环结束
55.     如果表达式 (EyesVar=1) 为真,则
56.         循环 15 遍
57.             鼠标移到 500 , 500
58.             右键按下
59.             延时40毫秒
60.             鼠标相对移动 0 , -200
61.             延时40毫秒
62.             右键弹起
63.         循环结束
64.         延时1000毫秒
65.     条件结束
66. 条件结束
67. // 腳本開始
68. 标记 start
69. // 偵測紅血、藍魔
70. 调用子程序 HP
71. 调用子程序 MP
72. // 特殊職業設定
73. 调用子程序 Vocation
74. // 打怪模式
75. 如果表达式 (KillModeVar=1) 为真,则
76.     // 手動滑鼠自動攻擊
77.     调用外部VBScript子程序 Shape=GetCursorShape(0)
78.     如果表达式 (Shape=978197372) 为真,则
79.         如果表达式 (SkillVar=0) 为真,则
80.             // 普通攻擊
81.             左键单击
82.         否则如果(SkillVar=1)为真,则
83.             // 技能攻擊
84.             右键单击
85.         否则如果(SkillVar=2)为真,则
86.             // 先左後右攻擊
87.             左键单击
88.             延时LRTime毫秒
89.             右键单击
90.         条件结束
91.     条件结束
92.     按键<Space>
93.     延时40毫秒
94.     跳转到标记 start
95. 否则如果(KillModeVar=2)为真,则
96.     // 手動滑鼠手動攻擊
97.     按键<Space>
98.     延时40毫秒
99.     跳转到标记 start
100. 条件结束