- 调用插件命令 hwnd=Window.Foreground()
- 导入程序文件 window.dll
- 开始VBScript块
- win=Window.Foreground()
- client=Window.GetClientRect(win)
- s=split(client,"|")
- dx=s(0)
- dy=s(1)
- zx=s(2)
- zy=s(3)
- 结束VBScript块
- Dim red,blue,bbred,redwait,bluewait,monwait,fqg,jb,a,b,c,k,q,s1,s2,s3,s4,s5,s6,s7,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10
- t1=now:t2=now:t3=now:t4=now:t5=now:t6=now:t7=now:a=0:b=0:c=0:q=0
- 用户定义变量 fqg=DropList{防抢怪:0|不防抢怪:1}=0 防抢怪设置
- 用户定义变量 jb=DropList{不捡包:0|自动捡包:1}=0 是否捡物
- 用户定义变量 s1=2 门派普攻F1间隔(秒)
- 用户定义变量 s2=20 单体攻击F2间隔(秒)
- 用户定义变量 s3=20 单体攻击F3间隔(秒)
- 用户定义变量 s4=25 怒气攻击F4间隔(秒)
- 用户定义变量 s5=80 自定技能F5间隔(秒)
- 用户定义变量 s6=60 BB技能F6间隔(秒)
- 用户定义变量 s7=10 状态技能F7间隔(分)
- 用户定义变量 red=DropList{30%:30|50%:50|70%:70}=1 血少于%加血F8
- 用户定义变量 blue=DropList{30%:30|50%:50|70%:70}=0 蓝少于%加蓝F9
- 用户定义变量 bbred=DropList{没有出战:0|20%:20|30%:30|50%:50}=2 宠少于%加血F10
- 用户定义变量 redwait=1 红药冷却时间(秒)
- 用户定义变量 bluewait=1 蓝药冷却时间(秒)
- 用户定义变量 monwait=100 寻怪延时(毫秒)
- 展开附件 .\plugin *.dll
- 标记 开始
- 延时monwait毫秒
- 调用子程序 验证码
- 调用子程序 找怪
- 如果表达式 (fqg=0) 为真,则
- 如果 (dx+369,dy+31) 的颜色大约等于 #1E252A 则
- 跳转到标记 开始
- 条件结束
- 条件结束
- 标记 继续杀怪
- 调用子程序 判断血蓝状态
- 调用子程序 BB血状态
- 调用子程序 杀怪
- 标记 End
- 脚本停止运行
- 子程序 验证码
- 标记 再次报警
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,50,600,550,"Attachment:\yz1.bmp",0.9,x,y)
- 如果表达式 (x>0 and y>0) 为真,则
- 调用插件命令 SimPlayer.ring(19)
- //使用了声音插件,需要自己去官网下载
- 延时2000毫秒
- 条件结束
- 如果表达式 (x>0) 为真,则循环执行
- 调用外部VBScript子程序 在屏幕区域里查找图形(0,50,600,550,"Attachment:\yz1.bmp",0.9,x,y)
- 如果表达式 (x>=0 and y>=0) 为真,则
- 如果 (x+17,y+9-k) 的颜色等于 #FFFFFF 则
- 按键<Esc>
- 延时1000毫秒
- 鼠标移到 dx+446 , dy+315
- 延时1000毫秒
- 左键单击
- 跳转到标记 End
- 条件结束
- 否则
- 跳转到标记 再次报警
- 条件结束
- 循环结束
- 子程序结束,回到调用处
- 子程序 判断血蓝状态
- 如果 (red/100*120+66+dx,dy+31) 的颜色大约等于 #222222 则
- a=a+1
- 否则
- 条件结束
- 如果 (blue/100*120+66+dx,dy+37) 的颜色大约等于 #222222 则
- b=b+1
- 否则
- 条件结束
- 子程序结束,回到调用处
- 子程序 BB血状态
- 如果表达式 (bbred>0) 为真,则
- 如果 (bbred+91+dx,dy+69) 的颜色大约等于 #111111 则
- c=c+1
- 条件结束
- 条件结束
- 子程序结束,回到调用处
- 子程序 找怪
- 按住
- 延时10毫秒
- 按键<Tab>
- 延时10毫秒
- 弹起
- 延时10毫秒
- 子程序结束,回到调用处
- 子程序 杀怪
- 如果 (dx+247,dy+31) 的颜色大约等于 #0019FF 则
- 如果 (dx+261,dy+31) 的颜色大约等于 #0011ff 则
- 调用子程序 技能
- 否则
- 按键
- 延时1000毫秒