1. 注释:===============================
  2. 注释:使用说明:(适用分辩率:1024 x 768 32位色)
  3. 注释:技能设在F5里.
  4. 注释:排列:123弓技能4防或箭,5狼血6治愈7红8蓝.
  5. 注释:自动接受组队,自动吃红蓝.
  6. 注释:自动开近身箱子.
  7. 注释:自动修理武器。
  8. 注释:使用使用图案识别加狼血时,要将图标移到聊天窗口上方
  9. 注释:.
  10. 注释:作者信息:
  11. 注释:作者: 逍遥导师 QQ:9838898
  12. 注释:===============================
  13. 标记 主程序开始
  14. 令 k = 0
  15. 令 z = 0
  16. 标记 【开始】
  17. (键盘)按 F5 键, 1次
  18. 调用 狼血()
  19. 调用 自动接受组队()
  20. 调用 修理()
  21. 调用 防()
  22. 调用 攻击()
  23. 跳转到标记 【开始】
  24. 脚本停止运行
  25. 标记 主程序结束
  26. 注释:===============================
  27. 标记 子程序部分
  28. 注释:===============================
  29. 子程序 自动接受组队()
  30.     如果点 (405,307) 的颜色约等于 "9cdff7" 则
  31.         如果点 (349,443) 的颜色约等于 "6bcff7" 则
  32.             如果点 (375,459) 的颜色约等于 "9cdfef" 则
  33.                 如果点 (389,436) 的颜色约等于 "b5ebf7" 则
  34.                     (鼠标)移动到 (389, 436)
  35.                     延时 350 毫秒
  36.                     (鼠标)左键按下
  37.                     延时 500 毫秒
  38.                     (鼠标)左键弹起
  39.                     延时 350 毫秒
  40.                 条件结束
  41.             条件结束
  42.         条件结束
  43.     条件结束
  44.     如果点 (626,143) 的颜色约等于 "c6cfe7" 则
  45.         如果点 (375,525) 的颜色约等于 "bdcfe7" 则
  46.             如果点 (681,548) 的颜色约等于 "bdcfe7" 则
  47.                 如果点 (663,156) 的颜色约等于 "21344a" 则
  48.                     (鼠标)移动到 (663, 156)
  49.                     延时 350 毫秒
  50.                     (鼠标)左键按下
  51.                     延时 500 毫秒
  52.                     (鼠标)左键弹起
  53.                     延时 350 毫秒
  54.                 条件结束
  55.             条件结束
  56.         条件结束
  57.     条件结束
  58. 子程序结束
  59. 注释:===============================
  60. 子程序 狼血()
  61.     令 btlx = time
  62.     令 ctlx = DateDiff("s",atlx,btlx)
  63.     令 ctlx = Abs(ctlx)
  64.     如果 ctlx > 125 则
  65.         令 atlx = time
  66.         延时 350 毫秒
  67.         (键盘)按下 5 键
  68.         延时 350 毫秒
  69.         (键盘)弹起 5 键
  70.         延时 1000 毫秒
  71.     条件结束
  72. 子程序结束
  73. 注释:===============================
  74. 子程序 防()
  75.     令 btF = time
  76.     令 ctF = DateDiff("s",atF,btF)
  77.     令 ctF = Abs(ctF)
  78.     如果 ctF > 20 则
  79.         令 atF = time
  80.         延时 350 毫秒
  81.         (键盘)按下 4 键
  82.         延时 350 毫秒
  83.         (键盘)弹起 4 键
  84.         延时 1000 毫秒
  85.     条件结束
  86. 子程序结束
  87. 注释:===============================
  88. 子程序 ZG()
  89.     (键盘)按下 Z 键
  90.     调用 自动吃红蓝()
  91.     调用 自动接受组队()
  92.     延时 200 毫秒
  93.     调用 狼血()
  94.     调用 防()
  95.     注释: Gosub 全捡
  96.     (键盘)弹起 Z 键
  97. 子程序结束
  98. 注释:===============================
  99. 子程序 Kill00()
  100.     调用 ZG()