1.                 左键单击
  2.             条件结束
  3.         条件结束
  4.     子程序结束,回到调用处
  5. 子程序结束,回到调用处
  6. //处理惊喜
  7. //处理惊喜
  8. 子程序 Jingxi
  9.     子程序 Jingxi
  10.         dim intX,intY
  11.         dim intX,intY
  12.         调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  13.         调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  14.         如果表达式 (intX>=0 and intY>=0) 为真,则
  15.             如果表达式 (intX>=0 and intY>=0) 为真,则
  16.                 保存鼠标位置
  17.                 保存鼠标位置
  18.                 鼠标移到 intX+38 , intY+11
  19.                 鼠标移到 intX+38 , intY+11
  20.                 延时500毫秒
  21.                 延时500毫秒
  22.                 左键单击
  23.                 左键单击
  24.                 延时500毫秒
  25.                 延时500毫秒
  26.                 恢复鼠标位置
  27.                 恢复鼠标位置
  28.             条件结束
  29.         条件结束
  30.     子程序结束,回到调用处
  31. 子程序结束,回到调用处
  32. //自动吃药
  33. //自动吃药
  34. 子程序 EatFood
  35.     子程序 EatFood
  36.         dim intX,intY
  37.         dim intX,intY
  38.         调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  39.         调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  40.         如果表达式 (intX>=0 and intY>=0) 为真,则
  41.             如果表达式 (intX>=0 and intY>=0) 为真,则
  42.                 //按F1
  43.                 //按F1
  44.                 保存鼠标位置
  45.                 保存鼠标位置
  46.                 按键<F1>
  47.                 按键<F1>
  48.                 延时500毫秒
  49.                 延时500毫秒
  50.                 调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  51.                 调用外部VBScript子程序 得到鼠标当前位置(x0,y0)
  52.                 如果表达式 (intX>=0 and intY>=0) 为真,则
  53.                     如果表达式 (intX>=0 and intY>=0) 为真,则
  54.                         //点吃药
  55.                         //点吃药
  56.                         鼠标移到 intX+3 , intY+3
  57.                         鼠标移到 intX+3 , intY+3
  58.                         延时500毫秒
  59.                         延时500毫秒
  60.                         左键单击
  61.                         左键单击
  62.                         延时3000毫秒
  63.                         延时3000毫秒
  64.                     条件结束
  65.                 条件结束
  66.                 //按F2
  67.                 //按F2
  68.                 恢复鼠标位置
  69.                 恢复鼠标位置
  70.                 按键<F2>
  71.                 按键<F2>
  72.                 延时500毫秒
  73.                 延时500毫秒
  74.                 左键单击
  75.                 左键单击
  76.             条件结束
  77.         条件结束
  78.     子程序结束,回到调用处
  79. 子程序结束,回到调用处