1.             调用 返回
  2.             令 w = 1
  3.         条件结束
  4.     条件结束
  5.     循环当 w = 0 之前
  6.         如果 var1 = 0 则
  7.             调用 Msg.ShowScrTXT(RX + 5,LY + 80,RX + 250,LY + 110,"狮","ff00ff")
  8.             调用 人物
  9.             调用 狮
  10.             调用 选择
  11.             延时 800 毫秒
  12.             (鼠标)移动到 (LX, LY)
  13.             从左上到右下查找图片 "Attachment:\战斗.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.8
  14.             如果 intX > 0 并且 intY > 0 则
  15.                 调用 战斗
  16.                 调用 战斗中
  17.             否则
  18.                 调用 返回
  19.             条件结束
  20.         条件结束
  21.         如果 var2 = 0 则
  22.             调用 Msg.ShowScrTXT(RX + 5,LY + 80,RX + 250,LY + 110,"狼","ff00ff")
  23.             调用 人物
  24.             调用 狼
  25.             调用 选择
  26.             延时 800 毫秒
  27.             (鼠标)移动到 (LX, LY)
  28.             从左上到右下查找图片 "Attachment:\战斗.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.8
  29.             如果 intX > 0 并且 intY > 0 则
  30.                 调用 战斗
  31.                 调用 战斗中
  32.             否则
  33.                 调用 返回
  34.             条件结束
  35.         条件结束
  36.         如果 var3 = 0 则
  37.             调用 Msg.ShowScrTXT(RX + 5,LY + 80,RX + 250,LY + 110,"猴","ff00ff")
  38.             调用 人物
  39.             调用 猴
  40.             调用 选择
  41.             延时 800 毫秒
  42.             (鼠标)移动到 (LX, LY)
  43.             从左上到右下查找图片 "Attachment:\战斗.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.8
  44.             如果 intX > 0 并且 intY > 0 则
  45.                 调用 战斗
  46.                 调用 战斗中
  47.             否则
  48.                 调用 返回
  49.             条件结束
  50.         条件结束
  51.         如果 var4 = 0 则
  52.             调用 Msg.ShowScrTXT(RX + 5,LY + 80,RX + 250,LY + 110,"蛇","ff00ff")
  53.             调用 人物
  54.             调用 下一页
  55.             调用 蛇
  56.             调用 选择
  57.             延时 800 毫秒
  58.             (鼠标)移动到 (LX, LY)
  59.             从左上到右下查找图片 "Attachment:\战斗.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.8
  60.             如果 intX > 0 并且 intY > 0 则
  61.                 调用 战斗
  62.                 调用 战斗中
  63.             否则
  64.                 调用 返回
  65.             条件结束
  66.         条件结束
  67.         如果 var1 = 1 并且 var2 = 1 并且 var3 = 1 并且 var4 = 1 则
  68.             令 w = 0
  69.         条件结束
  70.     循环结束
  71.     延时 600 毫秒
  72.     从左上到右下查找图片 "Attachment:\完成2.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.9
  73.     如果 intX > 0 并且 intY > 0 则
  74.         调用 人物
  75.         调用 闻太师
  76.         令 iy = 0
  77.         循环当 iy = 0 时
  78.             (键盘)按 "Up" 键, 1次
  79.             延时 500 毫秒
  80.             从左上到右下查找图片 "Attachment:\封妖任务.bmp",把找到的坐标保存到 (intX, intY),指定区域(左:LX 上:LY 右:RX 下:RY),相似度 0.9
  81.             如果 intX > 0 并且 intY > 0 则
  82.                 (鼠标)移动到 (intX, intY)
  83.                 (鼠标)左键单击, 1次
  84.                 令 iy = 1
  85.             条件结束
  86.         循环结束
  87.         调用 完成
  88.         令 var1 = 0
  89.         令 var2 = 0
  90.         令 var3 = 0
  91.         令 var4 = 0
  92.         令 w = 0
  93.         令 cishu = cishu - 1
  94.         令 i = i + 1
  95.         如果 ti > 50000 则
  96.             令 ti = 3000
  97.         条件结束
  98.         延时 ti 毫秒
  99.     条件结束
  100.     调用 Msg.ShowScrTXT(RX + 5,LY,RX + 250,LY + 20,"已经完成" & i & " 次","0000FF")