1. 用户定义变量 Cs2=DropList{"地1":"0"|"地2":"1"|"地3":"2"|"地":"3"}=0 "去第几个"
  2. 用户定义变量 xuanguai=DropList{"不":"0"|"选":"1"}=1 "选怪吗"
  3. 用户定义变量 Fh1=5 "第一地返回数"
  4. 用户定义变量 Fh2=5 "第二地返回数"
  5. 用户定义变量 Fh3=5 "第三地返回数"
  6. 用户定义变量 Fh4=5 "第四地返回数"
  7. 用户定义变量 Renwu=DropList{"刷怪":"0"|"捉妖":"1"|"采集":"2"}=0 "任务"
  8. 用户定义变量 hong=40 "加血"
  9. 定义变量 a(3), b(3), k, h
  10. 令 Hwnd = Window.MousePoint()
  11. 令 sRect = Window.GetClientRect(Hwnd)
  12. 定义变量 Myarray
  13. 令 Myarray = Split(sRect,"|")
  14. 令 Ux = CLng(Myarray(0))
  15. 令 Uy = CLng(Myarray(1))
  16. 如果 Renwu = 0 则
  17.     跳转到标记 刷怪
  18. 否则如果 Renwu = 1 则
  19. 否则如果 Renwu = 2 则
  20. 条件结束
  21. 延时 200 毫秒
  22. 标记 刷怪
  23. 令 h = 0
  24. 如果 Cs2 = 0 则
  25.     令 k = 0
  26. 否则如果 Cs2 = 1 则
  27.     令 k = Fh1
  28. 否则如果 Cs2 = 2 则
  29.     令 k = Fh1 + Fh2
  30. 否则如果 Cs2 = 3 则
  31.     令 k = Fh1 + Fh2 + Fh3
  32. 条件结束
  33. 把当前鼠标所在的位置保存到 (a(0), b(0))
  34. (键盘)等待按任意键
  35. 把当前鼠标所在的位置保存到 (a(1), b(1))
  36. (键盘)等待按任意键
  37. 把当前鼠标所在的位置保存到 (a(2), b(2))
  38. (键盘)等待按任意键
  39. 把当前鼠标所在的位置保存到 (a(3), b(3))
  40. (键盘)等待按任意键
  41. 延时 500 毫秒
  42. (键盘)按 "M" 键, 1次
  43. 延时 200 毫秒
  44. 标记 使用地图
  45. (键盘)按 "M" 键, 1次
  46. 延时 200 毫秒
  47. 如果 k < Fh1 则
  48.     令 h = 0
  49. 否则如果 k >= Fh1 并且 k < Fh1 + Fh2 则
  50.     令 h = 1
  51. 否则如果 k >= Fh1 + Fh2 并且 k < Fh1 + Fh2 + Fh3 则
  52.     令 h = 2
  53. 否则如果 k >= Fh1 + Fh2 + Fh3 并且 k < Fh1 + Fh2 + Fh3 + Fh4 则
  54.     令 h = 3
  55. 否则
  56.     令 k = 0
  57. 条件结束
  58. 延时 200 毫秒
  59. (鼠标)移动到 (a(h), b(h))
  60. 延时 1000 毫秒
  61. (鼠标)左键单击, 1次
  62. 延时 200 毫秒
  63. (键盘)按 "O" 键, 1次
  64. 延时 200 毫秒
  65. (键盘)按 "M" 键, 1次
  66. 标记 到目的地
  67. 从左上到右下查找图片 "Attachment:\了.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:Ux + 457 上:Uy + 138 右:Ux + 481 下:Uy + 159),相似度 0.9
  68. 如果 intX > 0 并且 intY > 0 则
  69.     跳转到标记 选怪
  70. 否则
  71.     从左上到右下查找图片 "Attachment:\战斗状态.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:Ux 上:Uy + 53 右:Ux + 26 下:Uy + 79),相似度 0.9
  72.     如果 intX > 0 并且 intY > 0 则
  73.         (鼠标)移动到 (411 + Ux, 358 + Uy)
  74.         延时 200 毫秒
  75.         (鼠标)左键单击, 1次
  76.         延时 200 毫秒
  77.         调用 战斗中打我的()
  78.     否则
  79.         延时 3000 毫秒
  80.         (键盘)按 "O" 键, 1次
  81.     条件结束
  82. 条件结束
  83. 延时 15 毫秒
  84. 跳转到标记 到目的地
  85. 标记 选怪
  86. 如果 datediff("s",thistime3,now) > 300 则
  87.     (键盘)按 "'" 键, 1次
  88.     延时 200 毫秒
  89.     令 thistime3 = now
  90.     如果 datediff("s",thistime2,now) > 240 则
  91.         (键盘)按 "8" 键, 1次
  92.         延时 200 毫秒
  93.         (键盘)按 "9" 键, 1次
  94.         延时 200 毫秒
  95.         令 thistime2 = now
  96.     条件结束
  97. 条件结束
  98. (键盘)按 "Tab" 键, 1次
  99. 延时 200 毫秒
  100. 从左上到右下查找图片 "Attachment:\战斗状态.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:Ux 上:Uy + 53 右:Ux + 26 下:Uy + 79),相似度 0.9