1. 标记 ******************配置文件读取*****************
  2. 用户定义变量 var1=8 加血下限
  3. 用户定义变量 var2=5 加蓝下限
  4. 用户定义变量 var3=250 辅助魔法1时间
  5. 用户定义变量 var4=0 辅助魔法2时间
  6. 用户定义变量 var5=5 侦测灵敏度
  7. 用户定义变量 var6=0 自动捡取开关
  8. 用户定义变量 var7=0 HP瓶耗完报警
  9. 用户定义变量 var8=0 MP瓶耗完报警
  10. 如果表达式 (var1="加血下限" or var1<6 or var1>9) 为真,则
  11.     var1=8
  12. 条件结束
  13. 如果表达式 (var2="加蓝下限" or var2<1 or var2>9) 为真,则
  14.     var2=5
  15. 条件结束
  16. 如果表达式 (var5="侦测灵敏度" or var5<1 or var5>10) 为真,则
  17.     var5=5
  18. 条件结束
  19. 如果表达式 (var3="辅助魔法1时间" or var3<0) 为真,则
  20.     var3=250
  21. 条件结束
  22. 如果表达式 (var4="辅助魔法2时间" or var4<0) 为真,则
  23.     var4=0
  24. 条件结束
  25. 如果表达式 (var6="自动捡取开关" or var6<>1) 为真,则
  26.     var6=0
  27. 条件结束
  28. 如果表达式 (var7="HP瓶耗完报警") 为真,则
  29.     var7=0
  30. 条件结束
  31. 如果表达式 (var8="MP瓶耗完报警") 为真,则
  32.     var8=0
  33. 条件结束
  34. var1=9
  35. var2=9
  36. hpx=int(var1)*10+222
  37. mpx=int(var2)*10+330
  38. time1=timer
  39. time3=timer
  40. 标记 **************辅助子程序*****************
  41. 标记 主程序
  42. 调用子程序 HP
  43. 如果表达式 (var7=1) 为真,则
  44.     调用子程序 HP数量检测
  45. 条件结束
  46. 调用子程序 MP
  47. 如果表达式 (var8=1) 为真,则
  48.     调用子程序 MP数量检测
  49. 条件结束
  50. 调用子程序 辅助魔法
  51. 如果表达式 (var6<>1) 为真,则
  52.     延时200*var5毫秒
  53. 否则
  54.     i=var5
  55.     如果表达式 (i>0) 为真,则循环执行
  56.         按键<Space>
  57.         延时150毫秒
  58.         i=i-1
  59.     循环结束
  60.     延时300毫秒
  61. 条件结束
  62. 跳转到标记 主程序
  63. 标记 **************血蓝侦测子程序**************
  64. 子程序 MP
  65.     调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  66.     如果表达式 (mx>0) 为真,则
  67.         按键<End>
  68.     条件结束
  69. 子程序结束,回到调用处
  70. 子程序 HP
  71.     调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  72.     如果表达式 (hx>0) 为真,则
  73.         按键<Delete>
  74.     条件结束
  75. 子程序结束,回到调用处
  76. 子程序 HP数量检测
  77.     调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  78.     如果表达式 (x1<1 or y1<1) 为真,则
  79.         调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  80.         如果表达式 (x1<1 or y1<1) 为真,则
  81.             调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  82.             如果表达式 (x1<1 or y1<1) 为真,则
  83.                 循环 6 遍
  84.                     响一声
  85.                     延时300毫秒
  86.                 循环结束
  87.             条件结束
  88.         条件结束
  89.     条件结束
  90. 子程序结束,回到调用处
  91. 子程序 MP数量检测
  92.     调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  93.     如果表达式 (x2<1 or y2<1) 为真,则
  94.         调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  95.         如果表达式 (x2<1 or y2<1) 为真,则
  96.             调用外部VBScript子程序 在屏幕区域里查找颜色(mpx-2,588,mpx+2,594,"525152",mx,my)
  97.             如果表达式 (x2<1 or y2<1) 为真,则
  98.                 循环 6 遍
  99.                     响一声
  100.                     延时300毫秒