1.     令 GetColor(2) = 得到指定点 (x + 930, y + 119) 的颜色
  2.     令 GetColor(3) = 得到指定点 (x + 951, y + 119) 的颜色
  3.     令 GetColor(4) = 得到指定点 (x + 955, y + 116) 的颜色
  4.     令 GetColor(5) = 得到指定点 (x + 951, y + 108) 的颜色
  5.     延时 200 毫秒
  6.     如果点 (x + 926,y + 116) 的颜色等于 GetColor(0) 则
  7.         延时 200 毫秒
  8.         如果点 (x + 927,y + 119) 的颜色等于 GetColor(1) 则
  9.             延时 200 毫秒
  10.             如果点 (x + 930,y + 119) 的颜色等于 GetColor(2) 则
  11.                 延时 200 毫秒
  12.                 如果点 (x + 951,y + 119) 的颜色等于 GetColor(3) 则
  13.                     延时 300 毫秒
  14.                     如果点 (x + 955,y + 116) 的颜色等于 GetColor(4) 则
  15.                         延时 400 毫秒
  16.                         如果点 (x + 951,y + 108) 的颜色等于 GetColor(5) 则
  17.                             (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"A8EDD4","-1|0|A8EDD4,-1|-2|A8EDD4,0|-2|A8EDD4,0|-5|A8EDD4,1|-5|A8EDD4,1|-6|A8EDD4,2|-6|A8EDD4,2|-4|091E0A,2|-5|091E0A,-1|-5|091E0A,-1|-4|091E0A,-4|-6|A8EDD4,-3|-6|A8EDD4,-1|-8|A8EDD4,-1|-7|091E0A",1)//过地图
  18.                             令 MyArray = Split(XY,"|")
  19.                             如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  20.                                 调用 Msg.ShowScrTXT(0,0,1024,768,"过地图","0000FF")
  21.                                 延时 4000 毫秒
  22.                                 跳转到标记 判断1(子程序 人物是否正在移动)
  23.                             条件结束
  24.                             调用 Msg.Tips("到达目标... ")
  25.                             跳转到标记 到达目标(子程序 人物是否正在移动)
  26.                         条件结束
  27.                     条件结束
  28.                 条件结束
  29.             条件结束
  30.         条件结束
  31.     条件结束
  32.     延时 200 毫秒
  33.     如果 ui = 1 则
  34.         调用 Msg.Tips("正在移动... ")
  35.         令 ui = 0
  36.     否则
  37.         调用 Msg.Tips("正在移动......")
  38.         令 ui = 1
  39.     条件结束
  40.     跳转到标记 判断1(子程序 人物是否正在移动)
  41.     标记 到达目标(子程序 人物是否正在移动)
  42. 子程序结束
  43. 子程序 清窗()
  44.     定义变量 i
  45.     令 i = 0
  46.     标记 清窗(子程序 清窗)
  47.     (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"51C9F6","1|1|4CC0EE,2|2|45B4E2,5|2|45B4E2,7|0|4BBBE8,6|1|4CC0EE,0|8|145E8C,7|8|145E8C",1)//清窗
  48.     令 MyArray = Split(XY,"|")
  49.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  50.         令 UX = CInt(MyArray(0)) + 1
  51.         令 UY = CInt(MyArray(1)) - 25
  52.         调用 右键单击()
  53.     否则
  54.         如果 i <= 2 则
  55.             延时 200 毫秒
  56.             令 I = I + 1
  57.             跳转到标记 清窗(子程序 清窗)
  58.         条件结束
  59.     条件结束
  60. 子程序结束
  61. 子程序 扫地()
  62.     标记 等待4(子程序 扫地)
  63.     (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"00FF00","1|-1|00FF00,3|-2|00FF00,6|-2|00FF00,5|7|00FF00,5|6|414431,9|6|00FF00,12|5|414431,14|4|414431,14|2|00FF00,20|5|414431,21|5|00FF00,22|0|00FF00,39|7|00FF00,38|9|00FF00",1)//扫地坐标
  64.     令 MyArray = Split(XY,"|")
  65.     如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  66.         延时 1000 毫秒
  67.         跳转到标记 等待4(子程序 扫地)
  68.     条件结束
  69.     令 UX = CInt(MyArray(0)) - 4 + 30
  70.     令 UY = CInt(MyArray(1)) - 30 + 5
  71.     调用 左键单击()
  72.     延时 1000 毫秒
  73.     调用 清窗()
  74.     调用 人物是否正在移动()
  75.     标记 按键(子程序 扫地)
  76.     (语句无法识别，可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 88)//按键“X”
  77.     延时 1000 毫秒
  78.     (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"51C9F6","1|1|4CC0EE,2|2|45B4E2,5|2|45B4E2,7|0|4BBBE8,6|1|4CC0EE,0|8|145E8C,7|8|145E8C",1)//窗口关闭按钮
  79.     令 MyArray = Split(XY,"|")
  80.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  81.         令 UX = CInt(MyArray(0)) - 4 - 76
  82.         令 UY = CInt(MyArray(1)) - 30 + 39
  83.         调用 左键单击()
  84.         标记 判断2(子程序 扫地)
  85.         (语句无法识别，可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"31A2D6","3|-2|42BAEF,7|-3|2C6A97,4|4|102C52,0|-2|42BAEF,1|-3|42BAEF,5|-3|2C6A97,13|-13|316184,-6|3|163C5D",1)//扫把
  86.         令 MyArray = Split(XY,"|")
  87.         如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  88.             令 UX = CInt(MyArray(0)) - 4
  89.             令 UY = CInt(MyArray(1)) - 30
  90.             调用 右键单击()
  91.             延时 10000 毫秒
  92.             调用 清窗()
  93.             令 任务 = "种子"
  94.             调用 收尾(任务)
  95.         否则
  96.             延时 500 毫秒
  97.             跳转到标记 判断2(子程序 扫地)
  98.         条件结束
  99.     否则
  100.         延时 1000 毫秒