1. 注释：分辨率1680*1050，游戏窗口800*600至于左上顶角，必须为前台，鼠标不能有其他操作
2. 注释：新手一名，在通用脚本上修改来的，不完善的地方请高手帮忙修改
3. 定义变量 hong, lan, bbhong, bblan, paodong
4. 注释：声明变量
5. 用户定义变量 hong=70 "当HP＜多少％时，使用红药"
6. 用户定义变量 lan=30 "当MP＜多少％时，使用蓝药"
7. 用户定义变量 bbhong=70 "当HP＜多少％时，使用红药"
8. 用户定义变量 bblan=30 "蓝量<lan%时，召唤兽自动吃蓝。"
9. 用户定义变量 paodong=DropList{"跑动":1|"跟随":2}=0 "遇敌方式"
10. 标记 开始
11. 如果点 (751,261) 的颜色等于 "673500" 则
12.     注释：如果某处的颜色=什么，可以是战斗内和战斗外不同的颜色，x和y是坐标，color1,是颜色
13.     调用 战斗()
14.     注释：调用战斗的子程序
15. 否则
16.     注释： Call 检查验证()
17.     注释：调用检查验证的子程序
18.     延时 100 毫秒
19.     注释：延时防卡
20.     调用 检查红蓝()
21.     注释：调用检查红蓝子程序
22.     延时 100 毫秒
23.     注释：延时防卡
24.     调用 遇怪()
25.     注释：调用遇怪子程序
26. 条件结束
27. 跳转到标记 开始
28. 注释：回到开头继续循环
29. 注释：-------------------战斗子程序-----------------------
30. 子程序 战斗()
31.     如果点 (751,261) 的颜色等于 "673500" 则
32.         注释：如果某处的颜色=什么，是战斗指令框的颜色（就是点防御啊法术什么的），x和y是坐标，color2是颜色
33.         （键盘）按下 Alt 键
34.         延时 100 毫秒
35.         （键盘）按 A 键, 1次
36.         延时 100 毫秒
37.         （键盘）弹起 Alt 键
38.         延时 500 毫秒
39.         （键盘）按下 Alt 键
40.         延时 100 毫秒
41.         （键盘）按 A 键, 1次
42.         延时 100 毫秒
43.         （键盘）弹起 Alt 键
44.         注释：可以把上面这段改成自己想要的战斗命令，这里以Alt+A为例，按两次是为了把召唤兽算进
45.     否则
46.         调用 等待
47.         注释：调用等待子程序，等待战斗指令框出现
48.         延时 100 毫秒
49.         注释：延时防卡
50.     条件结束
51. 子程序结束
52. 注释：子程序完结回到调用处
53. 子程序 等待()
54.     延时 2000 毫秒
55.     注释：写上你等待的时间（单位：毫秒）
56. 子程序结束
57. 注释：子程序完结回到调用处
58. 注释：-------------------判断验证子程序-----------------------
59. 注释：Sub 检查验证
60. 注释：写上你的判断验证语句这里以找色函数为例
61. 注释： FindColor(left,right,top,bottom,color3,x,y)
62. 注释： FindColor(left,right,top,bottom,color4,x2,y2)
63. 注释： FindColor(left,right,top,bottom,color5,x3,y3)
64. 注释：多色寻找验证框
65. 注释：If x>0 and y>0
66. 注释： If x2>0 and y2>0
67. 注释： If x3>0 and y3>0
68. 注释： Delay 10
69. 注释： VBS strSoundFile = "C:\WINDOWS\Media\ringin.wav"
70. 注释： VBS Set objShell = CreateObject("Wscript.Shell")
71. 注释： VBS strCommand = "sndrec32 /play /close " & chr(34) & strSoundFile & chr(34)
72. 注释： VBS objShell.Run strCommand, 0, True
73. 注释：上面这些语句的效果就是发出丁零零一声，引用自晨风大大的脚本
74. 注释： EndIf
75. 注释： EndIf
76. 注释： EndIf
77. 注释：End Sub
78. 注释：子程序完结回到调用处
79. 注释：-------------------检查红蓝子程序-----------------------
80. 子程序 检查红蓝()
81.     令 hx1 = 111
82.     注释：hx1,血条左上角（X）坐标，自己设定。
83.     令 hx2 = 184
84.     注释：hx2,血条右上角（X）坐标，自己设定。
85.     令 hy = 61
86.     注释：hy,血条X1-X2直线上的Y坐标，自己设定(可直接取右上角Y)。
87.     令 mx1 = 111
88.     注释：mx1,蓝条左上角（X）坐标，自己设定。
89.     令 mx2 = 184
90.     注释：mx2,蓝条右上角（X）坐标，自己设定。
91.     令 my = 79
92.     注释：my,蓝条X1-X2直线上的Y坐标，自己设定(可直接取右上角Y)。
93.     令 bhx1 = 286
94.     注释：hx1,血条左上角（X）坐标，自己设定。
95.     令 bhx2 = 359
96.     注释：hx2,血条右上角（X）坐标，自己设定。
97.     令 bhy = 57
98.     注释：hy,血条X1-X2直线上的Y坐标，自己设定(可直接取右上角Y)。
99.     令 bmx1 = 286
100.     注释：mx1,蓝条左上角（X）坐标，自己设定。