1. // 復活設定
  2. 调用子程序 Arise
  3. // 拒絕組隊
  4. 调用子程序 Reject
  5. // 關閉聊天視窗
  6. 调用子程序 CloseTalkWin
  7. // 防卡牆
  8. 调用子程序 CanNotKill
  9. // 強制撿寶
  10. 调用子程序 GetBaoWu
  11. // 打坐補血、補魔
  12. 调用子程序 HPme
  13. 调用子程序 MPme
  14. // 調整方向
  15. 调用子程序 Aspect
  16. // 找怪
  17. // 小範圍
  18. 循环 2 遍
  19.     调用子程序 FindMonS
  20. 循环结束
  21. // 中範圍
  22. 如果表达式 (FineSizeVar<2) 为真,则
  23.     调用子程序 FindMonM
  24.     // 大範圍
  25.     如果表达式 (FineSizeVar<1) 为真,则
  26.         调用子程序 FindMonL
  27.     条件结束
  28. 条件结束
  29. 调用子程序 GetBaoWu
  30. 延时500毫秒
  31. 如果表达式 (AspectVar1>0) 为真,则
  32.     // 轉方向
  33.     循环 AspectVar1 遍
  34.         鼠标移到 500 , 500
  35.         右键按下
  36.         延时40毫秒
  37.         鼠标相对移动 200 , 0
  38.         延时40毫秒
  39.         右键弹起
  40.     循环结束
  41. 条件结束
  42. 延时40毫秒
  43. 跳转到标记 start
  44. // 檢查HP------------------------------------------------------------
  45. 子程序 HP
  46.     如果表达式 (HPvar>0) 为真,则
  47.         HP_X=4+int(165*HPvar)
  48.         如果 (HP_X,30) 的颜色大约等于 #000000 则
  49.             如果表达式 (DateDiff("s",HPtime,Now)>=HPtimeVar) 为真,则
  50.                 延时50毫秒
  51.                 如果 (HP_X,30) 的颜色大约等于 #000000 则
  52.                     按键<1>
  53.                     HPtime=Now
  54.                 条件结束
  55.             否则
  56.                 // 20%以下加5瓶補血
  57.                 如果 (37,30) 的颜色大约等于 #000000 则
  58.                     循环 5 遍
  59.                         按键<1>
  60.                         延时50毫秒
  61.                     循环结束
  62.                 条件结束
  63.             条件结束
  64.         条件结束
  65.     条件结束
  66. 子程序结束,回到调用处
  67. //
  68. 子程序 HPme
  69.     如果表达式 (HPvar1>0) 为真,则
  70.         调用子程序 FindMonHM
  71.         HP_X=4+int(165*HPvar1)
  72.         如果 (HP_X,30) 的颜色大约等于 #000000 则
  73.             延时50毫秒
  74.             如果 (HP_X,30) 的颜色大约等于 #000000 则
  75.                 按键<Y>
  76.                 标记 addHP
  77.                 如果 (169,33) 的颜色不等于 #4e4ee1 则
  78.                     延时1000毫秒
  79.                     调用子程序 HP
  80.                     调用子程序 MP
  81.                     调用子程序 FindMonHM
  82.                     调用子程序 Reject
  83.                     跳转到标记 addHP
  84.                 条件结束
  85.                 按键<Y>
  86.                 延时2000毫秒
  87.             条件结束
  88.         条件结束
  89.     条件结束
  90. 子程序结束,回到调用处
  91. // 檢查MP
  92. 子程序 MP
  93.     如果表达式 (MPvar>0) 为真,则
  94.         MP_X=4+int(165*MPvar)
  95.         如果 (MP_X,56) 的颜色大约等于 #000000 则
  96.             如果表达式 (DateDiff("s",MPtime,Now)>=MPtimeVar) 为真,则
  97.                 延时50毫秒
  98.                 如果 (MP_X,56) 的颜色大约等于 #000000 则
  99.                     按键<2>
  100.                     MPtime=Now