1.                 条件结束
  2.             条件结束
  3.         条件结束
  4.     条件结束
  5. 子程序结束,回到调用处
  6. 子程序 MPme
  7.     如果表达式 (MPvar1>0) 为真,则
  8.         调用子程序 FindMonHM
  9.         MP_X=4+int(165*MPvar1)
  10.         如果 (MP_X,56) 的颜色大约等于 #000000 则
  11.             延时50毫秒
  12.             如果 (MP_X,56) 的颜色大约等于 #000000 则
  13.                 延时2000毫秒
  14.                 按键<Y>
  15.                 标记 addMP
  16.                 如果 (169,59) 的颜色不等于 #e14e50 则
  17.                     延时1000毫秒
  18.                     调用子程序 HP
  19.                     调用子程序 MP
  20.                     调用子程序 FindMonHM
  21.                     调用子程序 Reject
  22.                     跳转到标记 addMP
  23.                 条件结束
  24.                 按键<Y>
  25.                 延时2000毫秒
  26.             条件结束
  27.         条件结束
  28.     条件结束
  29. 子程序结束,回到调用处
  30. // -------------------------------------------------------------------------------------------
  31. // 拒絕
  32. 子程序 Reject
  33.     如果 (563,419) 的颜色等于 #cecece 则
  34.         如果 (563,438) 的颜色等于 #848484 则
  35.             如果 (609,428) 的颜色等于 #fefefe 则
  36.                 鼠标移到 609 , 428.
  37.                 延时100毫秒
  38.                 左键单击
  39.                 延时100毫秒
  40.             条件结束
  41.         条件结束
  42.     条件结束
  43. 子程序结束,回到调用处
  44. // 調整方向
  45. 子程序 Aspect
  46.     如果表达式 (EyesVar=1) 为真,则
  47.         // 轉方向
  48.         循环 5 遍
  49.             鼠标移到 500 , 500
  50.             右键按下
  51.             延时40毫秒
  52.             鼠标相对移动 0 , -10
  53.             延时40毫秒
  54.             右键弹起
  55.             延时500毫秒
  56.         循环结束
  57.     条件结束
  58.     如果表达式 (AspectVar>0) 为真,则
  59.         // 轉方向
  60.         循环 AspectVar 遍
  61.             鼠标移到 500 , 500
  62.             右键按下
  63.             延时40毫秒
  64.             鼠标相对移动 200 , 0
  65.             延时40毫秒
  66.             右键弹起
  67.         循环结束
  68.         延时500毫秒
  69.     条件结束
  70. 子程序结束,回到调用处
  71. // 判斷是否為怪物----------------打怪----------------------------------------------
  72. 子程序 CheckMon
  73.     // Delay 10
  74.     调用子程序 Arise
  75.     调用外部VBScript子程序 Shape=GetCursorShape(0)
  76.     如果表达式 (Shape=978197372) 为真,则
  77.         如果表达式 (SkillVar=0) 为真,则
  78.             // 普通攻擊 (滑鼠左鍵)
  79.             左键单击
  80.             延时40毫秒
  81.             左键单击
  82.             延时40毫秒
  83.         否则如果(SkillVar>=1)为真,则
  84.             如果表达式 (ColorVar="c97c5e") 为真,则
  85.                 // 藍怪使用普通攻擊 (滑鼠左鍵)
  86.                 左键单击
  87.                 延时40毫秒
  88.                 左键单击
  89.                 延时40毫秒
  90.             否则如果(SkillVar=1)为真,则
  91.                 // 技能攻擊 (滑鼠右鍵)
  92.                 右键单击
  93.                 延时40毫秒
  94.                 右键单击
  95.                 延时40毫秒
  96.             否则如果(SkillVar=2)为真,则
  97.                 // 先左後右攻擊
  98.                 左键单击
  99.                 延时LRTime毫秒
  100.                 右键单击