1. 调用插件命令 hwnd=Window.Foreground()
  2. 导入程序文件 window.dll
  3. 开始VBScript块
  4.     win=Window.Foreground()
  5.     client=Window.GetClientRect(win)
  6.     s=split(client,"|")
  7.     dx=s(0)
  8.     dy=s(1)
  9.     zx=s(2)
  10.     zy=s(3)
  11. 结束VBScript块
  12. 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
  13. t1=now:t2=now:t3=now:t4=now:t5=now:t6=now:t7=now:a=0:b=0:c=0:q=0
  14. 用户定义变量 fqg=DropList{防抢怪:0|不防抢怪:1}=0 防抢怪设置
  15. 用户定义变量 jb=DropList{不捡包:0|自动捡包:1}=0 是否捡物
  16. 用户定义变量 s1=2 门派普攻F1间隔(秒)
  17. 用户定义变量 s2=20 单体攻击F2间隔(秒)
  18. 用户定义变量 s3=20 单体攻击F3间隔(秒)
  19. 用户定义变量 s4=25 怒气攻击F4间隔(秒)
  20. 用户定义变量 s5=80 自定技能F5间隔(秒)
  21. 用户定义变量 s6=60 BB技能F6间隔(秒)
  22. 用户定义变量 s7=10 状态技能F7间隔(分)
  23. 用户定义变量 red=DropList{30%:30|50%:50|70%:70}=1 血少于%加血F8
  24. 用户定义变量 blue=DropList{30%:30|50%:50|70%:70}=0 蓝少于%加蓝F9
  25. 用户定义变量 bbred=DropList{没有出战:0|20%:20|30%:30|50%:50}=2 宠少于%加血F10
  26. 用户定义变量 redwait=1 红药冷却时间(秒)
  27. 用户定义变量 bluewait=1 蓝药冷却时间(秒)
  28. 用户定义变量 monwait=100 寻怪延时(毫秒)
  29. 展开附件 .\plugin *.dll
  30. 标记 开始
  31. 延时monwait毫秒
  32. 调用子程序 验证码
  33. 调用子程序 找怪
  34. 如果表达式 (fqg=0) 为真,则
  35.     如果 (dx+369,dy+31) 的颜色大约等于 #1E252A 则
  36.         跳转到标记 开始
  37.     条件结束
  38. 条件结束
  39. 标记 继续杀怪
  40. 调用子程序 判断血蓝状态
  41. 调用子程序 BB血状态
  42. 调用子程序 杀怪
  43. 标记 End
  44. 脚本停止运行
  45. 子程序 验证码
  46.     标记 再次报警
  47.     调用外部VBScript子程序 在屏幕区域里查找图形(0,50,600,550,"Attachment:\yz1.bmp",0.9,x,y)
  48.     如果表达式 (x>0 and y>0) 为真,则
  49.         调用插件命令 SimPlayer.ring(19)
  50.         //使用了声音插件,需要自己去官网下载
  51.         延时2000毫秒
  52.     条件结束
  53.     如果表达式 (x>0) 为真,则循环执行
  54.         调用外部VBScript子程序 在屏幕区域里查找图形(0,50,600,550,"Attachment:\yz1.bmp",0.9,x,y)
  55.         如果表达式 (x>=0 and y>=0) 为真,则
  56.             如果 (x+17,y+9-k) 的颜色等于 #FFFFFF 则
  57.                 按键<Esc>
  58.                 延时1000毫秒
  59.                 鼠标移到 dx+446 , dy+315
  60.                 延时1000毫秒
  61.                 左键单击
  62.                 跳转到标记 End
  63.             条件结束
  64.         否则
  65.             跳转到标记 再次报警
  66.         条件结束
  67.     循环结束
  68. 子程序结束,回到调用处
  69. 子程序 判断血蓝状态
  70.     如果 (red/100*120+66+dx,dy+31) 的颜色大约等于 #222222 则
  71.         a=a+1
  72.     否则
  73.     条件结束
  74.     如果 (blue/100*120+66+dx,dy+37) 的颜色大约等于 #222222 则
  75.         b=b+1
  76.     否则
  77.     条件结束
  78. 子程序结束,回到调用处
  79. 子程序 BB血状态
  80.     如果表达式 (bbred>0) 为真,则
  81.         如果 (bbred+91+dx,dy+69) 的颜色大约等于 #111111 则
  82.             c=c+1
  83.         条件结束
  84.     条件结束
  85. 子程序结束,回到调用处
  86. 子程序 找怪
  87.     按住
  88.     延时10毫秒
  89.     按键<Tab>
  90.     延时10毫秒
  91.     弹起
  92.     延时10毫秒
  93. 子程序结束,回到调用处
  94. 子程序 杀怪
  95.     如果 (dx+247,dy+31) 的颜色大约等于 #0019FF 则
  96.         如果 (dx+261,dy+31) 的颜色大约等于 #0011ff 则
  97.             调用子程序 技能
  98.         否则
  99.             按键
  100.             延时1000毫秒