1. dim hong,hong1,hong2,lan
2. dim FH,Z,zu,n,a,f
3. dim color(3),sj(5)
4. dim t1,t2,t3,t4,t5,t6
5. a=0:f=0
6. t1=now:t2=now:t3=now:t4=now:t5=now
7. color(0)="00B00C":color(1)="D9B600":color(2)="1929B7"
8. //color(0):人物血颜色,color(1):为蓝颜色,color(2):怪血颜色
9. 用户定义变量 hong=70 血量<hong%时，自动吃红
10. 用户定义变量 hong1=50 血量<hong1%时,自动吃大红
11. 用户定义变量 hong2=20 血量<hong2%时,自动逃跑
12. 用户定义变量 lan=30 蓝量<lan%时，自动吃蓝
13. 用户定义变量 sj(0)=1 技能2间隔时间(秒)
14. 用户定义变量 sj(1)=2 技能3间隔时间(秒)
15. 用户定义变量 sj(2)=3 技能4间隔时间(秒)
16. 用户定义变量 sj(3)=4 技能5间隔时间(秒)
17. 用户定义变量 sj(4)=60 状态技能-间隔时间(秒)
18. 用户定义变量 n=5 复活n次后,脚本停止执行
19. 用户定义变量 Z=1 Z=1时自动走动,Z=0时不走动
20. 用户定义变量 FH=0 FH=0副本复活,FH=1野外复活
21. 用户定义变量 zu=0 zu=1同意组队,zu=0拒绝组队
22. //*******************************************
23. // 主程序
24. //*******************************************
25. 调用外部VBScript子程序 在屏幕区域里查找图形(798,0,1023,200,"Attachment:\奇迹定位点.bmp",0.6,x,y)
26. //定位,找到x,y坐标
27. 如果表达式 (1) 为真,则循环执行
28.     标记 开始
29.     延时32毫秒
30.     调用子程序 红蓝检测
31.     延时10毫秒
32.     调用子程序 怪检测
33.     延时10毫秒
34. 循环结束
35. //***************************************
36. 标记 结束脚本
37. 脚本停止运行
38. //****************************************
39. // 怪检测
40. //****************************************
41. 子程序 怪检测
42.     延时10毫秒
43.     调用外部VBScript子程序 在屏幕区域里查找图形(798,0,1023,200,"Attachment:\奇迹定位点.bmp",0.6,x,y)
44.     如果表达式 (x1>0 and y1>0) 为真,则
45.         //找到怪,攻击
46.         a=0
47.         //再初始化
48.         调用子程序 打怪
49.     否则
50.         a=a+1
51.         硬件模拟按键<Tab>
52.         延时10毫秒
53.         //-------------------
54.         调用子程序 捡起东西
55.         //------------------
56.         如果表达式 (a>=5) 为真,则
57.             a=0
58.             //再初始化
59.             调用子程序 移动和找怪
60.         条件结束
61.     条件结束
62. 子程序结束,回到调用处
63. //****************************************
64. // 红蓝检测
65. //****************************************
66. 子程序 红蓝检测
67.     如果 (hong/100*((x-676)-(x-885))+(x-885),y+11) 的颜色大约等于 #color(0) 则
68.         //x2=血条在屏幕最右端坐标，x1=血条在屏幕最左端坐标，
69.         //y=x1,x2在血条中的同一纵坐标，color=血条的颜色值。
70.         延时10毫秒
71.     否则
72.         调用子程序 补红
73.     条件结束
74.     //--------------------------------------
75.     如果 (lan/100*((x-676)-(x-885))+(x-885),y+23) 的颜色大约等于 #color(1) 则
76.         //x2=蓝条在屏幕最右端坐标，x1=蓝条在屏幕最左端坐标，
77.         //y=x1,x2在蓝条中的同一纵坐标，color=蓝条的颜色值。
78.         延时10毫秒
79.     否则
80.         调用子程序 补蓝
81.     条件结束
82.     延时32毫秒
83. 子程序结束,回到调用处
84. //****************************************
85. // 组队+复活+交易检测
86. //****************************************
87. 子程序 复活检测
88.     如果 (10/100*((x-676)-(x-885))+(x-885),y+11) 的颜色大约等于 #color(0) 则
89.         //x2=血条在屏幕最右端坐标，x1=血条在屏幕最左端坐标，
90.         //y=x1,x2在血条中的同一纵坐标，color=血条的颜色值。
91.         延时10毫秒
92.     否则
93.         调用子程序 复活
94.     条件结束
95. 子程序结束,回到调用处
96. //----------------------------------------
97. 子程序 组队交易检测
98.     如果 (x-400,y+294) 的颜色等于 #110F10 则
99.         调用子程序 组队交易
100.     条件结束