1.     (语句无法识别,可能有错误): MoveTo 50, 50 '【网络坐标】请自行修改
  2. 情况 1:
  3.     (语句无法识别,可能有错误): MoveTo 50, 100 '【网络坐标】请自行修改
  4. 情况 2:
  5.     (语句无法识别,可能有错误): MoveTo 50, 150 '【网络坐标】请自行修改
  6. 选择结束
  7. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  8. (语句无法识别,可能有错误): LeftClick 1 '鼠标左键点击一次
  9. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  10. 注释:选择服务器
  11. 根据 Form1.服务器.ListIndex 选择
  12. 情况 0:
  13.     (语句无法识别,可能有错误): MoveTo 100, 50 '【服务器坐标】请自行修改
  14. 情况 1:
  15.     (语句无法识别,可能有错误): MoveTo 100, 100 '【服务器坐标】请自行修改
  16. 选择结束
  17. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  18. (语句无法识别,可能有错误): LeftClick 1 '鼠标左键点击一次
  19. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  20. 注释:选择角色
  21. 根据 Form1.角色.ListIndex 选择
  22. 情况 0:
  23.     (语句无法识别,可能有错误): MoveTo 100, 100 '【角色坐标】请自行修改
  24. 情况 1:
  25.     (语句无法识别,可能有错误): MoveTo 200, 100 '【角色坐标】请自行修改
  26. 情况 2:
  27.     (语句无法识别,可能有错误): MoveTo 300, 100 '【角色坐标】请自行修改
  28. 选择结束
  29. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  30. (语句无法识别,可能有错误): LeftClick 1 '鼠标左键点击一次
  31. (语句无法识别,可能有错误): Delay 1000 '等待1秒
  32. 注释:循环等待游戏登录到场景中
  33. 循环开始
  34.     (语句无法识别,可能有错误): Delay 1000 '等待1秒
  35.     (语句无法识别,可能有错误): IfColor 50,5,"0000FF",0 Then '【坐标与颜色】需要自行修改。判断游戏已经进入场景了
  36.     (语句无法识别,可能有错误): Exit Do '离开循环等待
  37. 条件结束
  38. 循环结束
  39. 注释:初始防卡时间设置
  40. 定义变量 t1
  41. 令 t1 = now
  42. 注释:<>--------------------------------------------------开始执行挂机脚本--------------------------<>
  43. 标记 开始
  44. 调用 人物状态保护
  45. 标记 找怪
  46. (语句无法识别,可能有错误): KeyPress "Tab",1 '找怪热键
  47. 延时 500 毫秒
  48. 注释:在这里2个延时中间可以加入【捡物】处理
  49. 延时 500 毫秒
  50. 注释:判断是否找到怪物
  51. (语句无法识别,可能有错误): IfColor 50,5,"0000FF",0 Then '【坐标与颜色】需要自行修改
  52. 注释:开始打怪
  53. 循环开始
  54.     (语句无法识别,可能有错误): KeyPress "A", 1 '打怪攻击热键
  55.     延时 200 毫秒
  56.     调用 人物状态保护
  57.     注释:<>------------------------------------------防卡设置--------------------------<>
  58.     如果 DateDiff("s",t1,now) >= Form1.等待.Text 则
  59.         令 t1 = now
  60.         跳出循环
  61.     条件结束
  62.     延时 200 毫秒
  63. 循环结束
  64. 条件结束
  65. 注释:<>--------------------------------------------------复活方式设置--------------------------<>
  66. 如果 Form1.复活方式.ListIndex > 0 则
  67.     (语句无法识别,可能有错误): IfColor 0,0,"0",0 Then '【坐标与颜色】需要自行修改
  68.     注释:执行复活方式
  69.     如果 Form1.复活方式.ListIndex = 1 则
  70.     否则如果 Form1.复活方式.ListIndex = 2 则
  71.     否则如果 Form1.复活方式.ListIndex = 3 则
  72.     条件结束
  73. 条件结束
  74. 条件结束
  75. 注释:<>--------------------------------------------------死亡处理设置--------------------------<>
  76. 如果 Form1.死亡处理.ListIndex > 0 则
  77.     (语句无法识别,可能有错误): IfColor 0,0,"0",0 Then '【坐标与颜色】需要自行修改
  78.     注释:执行报警
  79.     如果 Form1.死亡处理.ListIndex = 1 则
  80.         调用 Media.Play(Form1.路径.Text)
  81.         延时 5000 毫秒
  82.         (语句无法识别,可能有错误): Goto 结束 '脚本停止
  83.     否则如果 Form1.死亡处理.ListIndex = 2 则
  84.     否则如果 Form1.死亡处理.ListIndex = 3 则
  85.     条件结束
  86. 条件结束
  87. 条件结束
  88. 延时 200 毫秒
  89. 跳转到标记 开始
  90. 标记 结束
  91. 注释:<>------------------------------ 脚本子程序内容 --------------------------<>
  92. 脚本停止运行
  93. (语句无法识别,可能有错误): Sub OnScriptExit() '脚本停止事件
  94. 调用 Media.Stop()
  95. 弹出窗口 "测试结束,脚本停止!"
  96. 子程序结束
  97. 子程序 人物状态保护()
  98.     注释:<>--------------------------人物补血设置
  99.     如果 血键 > 0 则
  100.         (语句无法识别,可能有错误): IfColor 5+(10-5)*补血,5,"0000FF",0 Then '【坐标与颜色】需要自行修改