1.     //去点出征的地方
  2.     延时5*chbtime毫秒
  3.     鼠标移到 890 , 560
  4.     延时200毫秒
  5.     左键单击
  6.     //去点不装备的按钮
  7.     //不带宝
  8.     x=-2
  9.     如果表达式 (x< 00) 为真,则循环执行
  10.         调用外部VBScript子程序 Call 在屏幕区域里查找图形(10,10,900,700,"bmp\npc4.bmp",0.9,x,y)
  11.         如果表达式 (x>=0 and y>=0) 为真,则
  12.             鼠标移到 x+10 , y+10
  13.             延时500毫秒
  14.             左键单击
  15.         否则
  16.             延时dltime毫秒
  17.             左键单击
  18.             延时dltime毫秒
  19.             调用外部VBScript子程序 Call 在屏幕区域里查找图形(10,10,900,700,"bmp\npc4.bmp",0.9,x,y)
  20.         条件结束
  21.         调用子程序 重新进入
  22.     循环结束
  23.     //等开局对话
  24. 子程序结束,回到调用处
  25. //出兵模块，要先定义 hang 并赋值
  26. 子程序 出兵模块
  27.     x=-2
  28.     如果表达式 (x<0) 为真,则循环执行
  29.         调用外部VBScript子程序 Call 在屏幕区域里查找图形(10,10,900,700,"bmp\npc4.bmp",0.9,x,y)
  30.         如果表达式 (x>=0 and y>=0) 为真,则
  31.             鼠标移到 x+10 , y+10
  32.         否则
  33.             左键单击
  34.             延时500毫秒
  35.         条件结束
  36.         如果 (917,697) 的颜色等于 #94ebff 则
  37.             保存鼠标位置
  38.             鼠标移到 920 , 700
  39.             延时chbtime毫秒
  40.             左键单击
  41.             恢复鼠标位置
  42.         条件结束
  43.         //点黄巾开始
  44.         如果 (913,690) 的颜色等于 #94ebff 则
  45.             保存鼠标位置
  46.             鼠标移到 920 , 700
  47.             延时chbtime毫秒
  48.             左键单击
  49.             恢复鼠标位置
  50.         条件结束
  51.         调用子程序 重新进入
  52.     循环结束
  53.     //出兵模块了
  54.     str="[等出兵框]！！"
  55.     调用子程序 记运行日志5
  56.     //等出兵框
  57.     xx=2
  58.     如果表达式 (xx>0) 为真,则循环执行
  59.         如果 (370,214) 的颜色等于 #deebef 则
  60.             xx=-2
  61.         否则
  62.             左键单击
  63.             延时dltime毫秒
  64.         条件结束
  65.         如果 (370,214) 的颜色等于 #ced3d6 则
  66.             xx=-2
  67.         条件结束
  68.         调用子程序 重新进入
  69.     循环结束
  70.     //m 农夫继续一
  71.     //------
  72.     flag=1
  73.     如果表达式 (jiangshu > 0) 为真,则循环执行
  74.         hang=hangzhu(jiangshu) - 1
  75.         jy=jiangy + hang*hangju1
  76.         延时chbtime毫秒
  77.         鼠标移到 jiangx , jy
  78.         延时chbtime毫秒
  79.         左键单击
  80.         延时chbtime毫秒
  81.         flag=1
  82.         如果表达式 (flag > 0) 为真,则循环执行
  83.             如果 (jiangx,jy) 的颜色大约等于 #73c7e7 则
  84.                 flag=0
  85.             否则
  86.                 鼠标移到 jiangx , jy
  87.                 延时chbtime毫秒
  88.                 左键单击
  89.                 延时chbtime毫秒
  90.             条件结束
  91.             调用子程序 重新进入
  92.         循环结束
  93.         jiangshu=jiangshu-1
  94.     循环结束
  95.     //点兵种 刀MoveTo 370,400，弓MoveTo 629,405， 抢 MoveTo 370,450，骑MoveTo 620,450
  96.     如果表达式 (bingz=1) 为真,则
  97.         鼠标移到 370 , 400
  98.     否则如果(bingz=2)为真,则
  99.         鼠标移到 629 , 405
  100.     否则如果(bingz=3)为真,则