1. 展开附件 .\plugin *.dll
  2. 导入程序文件 window.dll
  3. 导入程序文件 Chen8.dll
  4. 用户定义变量 F1=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121|F11:122|F12:123}=0 自动技能
  5. 用户定义变量 F8=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121|F11:122|F12:123}=7 自动拣东西按键
  6. 用户定义变量 MONSTERA="0E28FF" 怪物血条颜色(务必确定)
  7. 用户定义变量 dierxue=DropList{使用:1|停用:0}=0 是否使用怪物血条颜色判断二
  8. 用户定义变量 MONSTERAE="05006E" 怪物血条颜色判断二(空血时)
  9. 用户定义变量 YINGUAI=DropList{启动:1|停止:0}=1 **是否引怪(前提:能定位)
  10. 用户定义变量 PICK=128 拣东西延时(毫秒)
  11. 用户定义变量 encur=DropList{启动:1|停止:0}=0 是否启动定位
  12. 用户定义变量 linow=60 定位时间间隔(秒S)
  13. 用户定义变量 limits=10 锁定范围(如果不正常则调大)
  14. 用户定义变量 goo=100 自动行走距离
  15. 用户定义变量 godelay=128 移动延时过小可影响定位
  16. 用户定义变量 luanjuli=100 随机乱点距离MAX
  17. 用户定义变量 luandelay=64 乱点延时(与随机乱点有关)
  18. 用户定义变量 fangka=25 杀死一个怪的时间(秒)(防卡)
  19. 用户定义变量 F3=DropList{F1:112|F2:113|F3:114|F4:115|F5:116|F6:117|F7:118|F8:119|F9:120|F10:121|F11:122|F12:123}=2 单攻技能(防卡)
  20. 用户定义变量 nx=868 坐标符号"["左上角点X
  21. 用户定义变量 ny=52 坐标符号"["左上角点Y
  22. 用户定义变量 coor="0002BB" 坐标颜色
  23. 用户定义变量 rdev=50 红色偏差(填十进制)
  24. 用户定义变量 gdev=36 绿色偏差(填十进制)
  25. 用户定义变量 bdev=24 蓝色偏差(填十进制)
  26. 用户定义变量 outnumber=DropList{是:1|否:0}=1 每次读完坐标是否输出
  27. win=Window.Foreground()
  28. 调用外部VBScript子程序 得到鼠标当前位置(mx,my)
  29. 延时32毫秒
  30. cur=0
  31. 如果表达式 (encur=0) 为真,则
  32.     跳转到标记 寻怪
  33. 条件结束
  34. 调用子程序 读出坐标
  35. 如果表达式 (cur=0) 为真,则
  36.     encur=0
  37.     输入文本 "无法定位"
  38. 否则
  39.     userx=curx:usery=cury
  40.     myway="锁定坐标"&cstr(userx)&"."&cstr(usery)&",请确定人物方向与地图人物箭头方向一致"
  41.     输入文本 myway
  42.     strnow=now
  43. 条件结束
  44. 标记 寻怪
  45. wins=Window.Foreground()
  46. 如果表达式 (wins=win) 为真,则
  47.     如果表达式 (encur=1) 为真,则
  48.         调用子程序 乱点引怪
  49.         调用外部VBScript子程序 得到鼠标当前位置(mx,my)
  50.         如果表达式 (x1>0) 为真,则
  51.             调用子程序 有怪
  52.         条件结束
  53.         如果表达式 (datediff("s",strnow,now)>linow) 为真,则
  54.             调用子程序 定位
  55.         条件结束
  56.         跳转到标记 寻怪
  57.     条件结束
  58.     调用外部VBScript子程序 得到鼠标当前位置(mx,my)
  59.     如果表达式 (x1>0) 为真,则
  60.         调用子程序 有怪
  61.     条件结束
  62.     鼠标移到 -1 , 384
  63.     延时64毫秒
  64.     鼠标移到 mx , my
  65.     左键单击
  66. 条件结束
  67. 延时32毫秒
  68. 跳转到标记 寻怪
  69. 子程序 定位
  70.     如果表达式 (encur=1) 为真,则
  71.         //捡东西
  72.         按键#F8
  73.         //捡东西
  74.         延时PICK毫秒
  75.     条件结束
  76.     调用子程序 读出坐标
  77.     如果表达式 (cur=0) 为真,则
  78.         strnow=now
  79.         跳转到标记 定位结束
  80.     条件结束
  81.     h=curx-userx:v=cury-usery:r=sqr(h^2+v^2):tmpr=r
  82.     如果表达式 (r<limits) 为真,则
  83.         strnow=now
  84.         跳转到标记 定位结束
  85.     条件结束
  86.     cosa=h/r:sina=v/r
  87.     标记 移动
  88.     gox=goo*cosa:goy=goo*sina
  89.     延时8毫秒
  90.     鼠标移到 mx-gox , my+goy
  91.     左键单击
  92.     延时godelay毫秒
  93.     调用子程序 读出坐标
  94.     h=curx-userx:v=cury-usery:r=sqr(h^2+v^2)
  95.     如果表达式 (r<limits) 为真,则
  96.         strnow=now
  97.         跳转到标记 定位结束
  98.     条件结束
  99.     如果表达式 (r<tmpr) 为真,则
  100.         tmpr=r:cosa=h/r:sina=v/r