1.                 延时128毫秒
  2.                 //按TAB选怪
  3.                 按住<Tab>
  4.                 延时256毫秒
  5.                 弹起<Tab>
  6.                 延时1024毫秒
  7.                 鼠标移到 62 , 384
  8.                 延时128毫秒
  9.                 调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
  10.             条件结束
  11.             如果表达式 (xx<=0) 为真,则
  12.                 鼠标移到 50 , 384
  13.                 延时128毫秒
  14.                 //按TAB选怪
  15.                 按住<Tab>
  16.                 延时256毫秒
  17.                 弹起<Tab>
  18.                 延时1024毫秒
  19.                 鼠标移到 62 , 384
  20.                 延时128毫秒
  21.                 调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
  22.             条件结束
  23.             如果表达式 (xx<=0) 为真,则
  24.                 鼠标移到 74 , 384
  25.                 延时128毫秒
  26.                 //按TAB选怪
  27.                 按住<Tab>
  28.                 延时256毫秒
  29.                 弹起<Tab>
  30.                 延时1024毫秒
  31.                 鼠标移到 62 , 384
  32.                 延时128毫秒
  33.                 调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
  34.             条件结束
  35.             如果表达式 (xx>0) 为真,则
  36.                 调用子程序 杀怪
  37.             条件结束
  38.             如果表达式 (HOME=36) 为真,则
  39.                 硬件模拟按住<Home>
  40.                 延时256毫秒
  41.                 硬件模拟弹起<Home>
  42.                 延时256毫秒
  43.             否则
  44.                 按住#HOME
  45.                 延时256毫秒
  46.                 弹起#HOME
  47.                 延时256毫秒
  48.             条件结束
  49.         条件结束
  50.         跳转到标记 继续休息
  51.     否则
  52.         如果表达式 (HOME=36) 为真,则
  53.             硬件模拟按住<Home>
  54.             延时512毫秒
  55.             硬件模拟弹起<Home>
  56.             延时512毫秒
  57.         否则
  58.             按住#HOME
  59.             延时512毫秒
  60.             弹起#HOME
  61.             延时512毫秒
  62.         条件结束
  63.     条件结束
  64.     标记 结束休息
  65. 子程序结束,回到调用处
  66. //********************************************
  67. 子程序 挖矿
  68.     如果表达式 (i>6) 为真,则
  69.         按住<D>
  70.         延时int(512*rnd)毫秒
  71.         弹起<D>
  72.         按住<A>
  73.         延时int(512*rnd)毫秒
  74.         弹起<A>
  75.         按住<S>
  76.         延时int(512*rnd)毫秒
  77.         弹起<S>
  78.         按住<W>
  79.         延时int(512*rnd)毫秒
  80.         弹起<W>
  81.     条件结束
  82.     i=i+1
  83.     调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
  84.     如果表达式 (xx<=0) 为真,则
  85.         调用外部VBScript子程序 在屏幕区域里查找颜色(daditx,dadity,daditx+539,dadity+542,coor,cox,coy)
  86.     条件结束
  87.     如果表达式 (xx>0) 为真,则
  88.         鼠标移到 xx , yy
  89.         延时32毫秒
  90.         循环 2 遍
  91.             左键按下
  92.             延时64毫秒
  93.             左键弹起
  94.             延时8毫秒
  95.         循环结束
  96.         鼠标移到 650 , 384
  97.         循环 2 遍
  98.             按住#pick
  99.             延时64毫秒
  100.             弹起#pick