1. 子程序结束,回到调用处
  2. 子程序 攻击
  3.     调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  4.     如果表达式 (x>=0 and y>=0) 为真,则
  5.         鼠标移到 x+n , y+m
  6.         右键单击
  7.         调用子程序 技能1
  8.         调用子程序 技能2
  9.     否则
  10.         调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  11.         如果表达式 (x>=0 and y>=0) 为真,则
  12.             鼠标移到 x+n , y+m-n
  13.             右键单击
  14.         条件结束
  15.     条件结束
  16. 子程序结束,回到调用处
  17. 子程序 快速找怪
  18.     调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  19.     如果表达式 (x<0 and y<0) 为真,则
  20.         按住<Ctrl>
  21.         左键单击
  22.         弹起<Ctrl>
  23.     条件结束
  24. 子程序结束,回到调用处
  25. 子程序 技能1
  26.     如果 (139,45) 的颜色大约等于 #ae21 则
  27.         延时32毫秒
  28.         jn1=jn1+1
  29.         如果表达式 (jn1>=4) 为真,则
  30.             按键<F2>
  31.             jn1=0
  32.         条件结束
  33.     条件结束
  34. 子程序结束,回到调用处
  35. 子程序 技能2
  36.     如果 (139,45) 的颜色大约等于 #ae21 则
  37.         延时32毫秒
  38.         jn2=jn2+1
  39.         如果表达式 (jn2>=8) 为真,则
  40.             按键<F3>
  41.             jn2=0
  42.         条件结束
  43.     条件结束
  44. 子程序结束,回到调用处
  45. 子程序 补红
  46.     如果 (hp*1.13+121,31) 的颜色大约等于 #313033 则
  47.         按键<F1>
  48.     条件结束
  49. 子程序结束,回到调用处
  50. 子程序 捡钱
  51.     如果表达式 (zidongjianwu=1) 为真,则
  52.         调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  53.         如果表达式 (x1>=0 and y1>=0) 为真,则
  54.             a=x1:b=y1
  55.             调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  56.             如果表达式 (x2>=0 and y2>=0) 为真,则
  57.                 鼠标移到 a , b
  58.                 延时32毫秒
  59.                 左键单击
  60.                 a="":b=""
  61.             条件结束
  62.         条件结束
  63.     条件结束
  64. 子程序结束,回到调用处
  65. 子程序 捡熟练度
  66.     如果表达式 (zidongjianwu=1) 为真,则
  67.         调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  68.         如果表达式 (x1>=0 and y1>=0) 为真,则
  69.             e=x1:f=y1
  70.             调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  71.             如果表达式 (x2>=0 and y2>=0) 为真,则
  72.                 鼠标移到 e , f
  73.                 延时32毫秒
  74.                 左键单击
  75.                 e="":f=""
  76.             条件结束
  77.         条件结束
  78.     条件结束
  79. 子程序结束,回到调用处
  80. 子程序 捡流星
  81.     如果表达式 (zidongjianwu=1) 为真,则
  82.         调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  83.         如果表达式 (x1>=0 and y1>=0) 为真,则
  84.             g=x1:h=y1
  85.             调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  86.             如果表达式 (x2>=0 and y2>=0) 为真,则
  87.                 鼠标移到 g , h
  88.                 延时32毫秒
  89.                 左键单击
  90.                 g="":h=""
  91.             条件结束
  92.         条件结束
  93.     条件结束
  94. 子程序结束,回到调用处
  95. 子程序 捡粉红水晶
  96.     如果表达式 (zidongjianwu=1) 为真,则
  97.         调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)
  98.         如果表达式 (x1>=0 and y1>=0) 为真,则
  99.             i=x1:j=y1
  100.             调用外部VBScript子程序 在屏幕区域里模糊查找颜色(85,140,855,480,"303b8",1,0.8,x,y)