1.     令 MyArray = Split(XY,"|")
  2.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  3.         调用 File.WriteFileEx("C:\Log.txt","扫地任务-开始时间:" & NOW)
  4.         调用 扫地()
  5.     条件结束
  6.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"414431","0|2|FFFFFF,2|0|FFFFFF,3|2|FFFFFF,3|3|414431,3|4|FFFFFF,3|5|414431,3|9|FFFFFF,2|10|FFFFFF,3|10|414431,6|7|414431,6|5|FFFFFF,22|2|FFFFFF,22|3|414431,18|3|FFFFFF,19|3|414431",1)//探访
  7.     令 MyArray = Split(XY,"|")
  8.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  9.         调用 File.WriteFileEx("C:\Log.txt","探访任务-开始时间:" & NOW)
  10.         调用 探访()
  11.     条件结束
  12.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","1|8|414431,2|8|FFFFFF,5|7|FFFFFF,5|6|414431,5|6|414431,5|4|414431,6|4|FFFFFF,7|4|414431,11|7|FFFFFF,10|7|414431,14|7|414431,15|6|FFFFFF,17|2|414431,17|1|FFFFFF,17|3|FFFFFF,28|1|00FF00,27|9|00FF00,24|8|414431,22|12|00FF00",1)//种子
  13.     令 MyArray = Split(XY,"|")
  14.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  15.         调用 File.WriteFileEx("C:\Log.txt","种树任务-开始时间:" & NOW)
  16.         调用 种子()
  17.     条件结束
  18.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFC64C","-1|4|414431,-2|4|FFC64C,0|3|FFC64C,6|2|414431,5|3|FFC64C,13|0|414431,12|0|FFC64C,22|10|FFC64C,23|10|414431,34|0|FFC64C,39|1|414431,40|1|FFC64C,51|1|414431,51|0|FFC64C",1)//师门巡逻令
  19.     令 MyArray = Split(XY,"|")
  20.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  21.         调用 File.WriteFileEx("C:\Log.txt","师门巡逻令任务-开始时间:" & NOW)
  22.         调用 师门巡逻令()
  23.     条件结束
  24.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","1|0|414431,1|7|414431,2|7|FFFFFF,0|7|FFFFFF,1|9|414431,0|9|FFFFFF,2|9|FFFFFF,13|10|FFFFFF,12|10|414431,12|9|FFFFFF,13|9|414431,15|2|FFFFFF,-6|2|FFFFFF",1)//放河灯
  25.     令 MyArray = Split(XY,"|")
  26.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  27.         调用 File.WriteFileEx("C:\Log.txt","放河灯任务-开始时间:" & NOW)
  28.         调用 放河灯()
  29.     条件结束
  30.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"00FF00","3|9|00FF00,2|10|414431,12|9|00FF00,34|9|00FF00,35|9|414431,66|10|00FF00,65|10|414431",1)//三十到六十武器
  31.     令 MyArray = Split(XY,"|")
  32.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  33.         令 任务 = "武器"
  34.         调用 File.WriteFileEx("C:\Log.txt","武器任务-开始时间:" & NOW)
  35.         调用 器衣饰(任务)
  36.     条件结束
  37.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"00FF00","9|10|00FF00,5|10|00FF00,2|8|414431,3|8|00FF00,1|8|00FF00,12|6|414431,13|7|414431,12|7|00FF00,13|6|00FF00,22|5|414431,22|6|00FF00,17|4|00FF00,27|2|414431,28|2|00FF00,29|7|00FF00,32|8|00FF00,33|10|00FF00",1)//慕小寰三十到六十戒指
  38.     令 MyArray = Split(XY,"|")
  39.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  40.         令 任务 = "戒指"
  41.         调用 File.WriteFileEx("C:\Log.txt","戒指任务-开始时间:" & NOW)
  42.         调用 器衣饰(任务)
  43.     条件结束
  44.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"00FF00","-4|2|00FF00,4|2|414431,5|2|00FF00,4|11|414431,-1|4|414431,2|4|414431,12|0|00FF00,12|1|414431,12|2|00FF00,12|3|414431,16|3|00FF00,19|2|00FF00,26|4|414431,27|4|00FF00,29|5|00FF00",1)//宫绿娥
  45.     令 MyArray = Split(XY,"|")
  46.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  47.         令 任务 = "衣服"
  48.         调用 File.WriteFileEx("C:\Log.txt","衣服任务-开始时间:" & NOW)
  49.         调用 器衣饰(任务)
  50.     条件结束
  51. 子程序结束
  52. 子程序 万流归宗()
  53.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(x+892, y+1,x+986, y+25,"82D0F9","3|4|82D0F9,-1|4|82D0F9,8|3|82D0F9,12|4|82D0F9,12|6|82D0F9,15|10|82D0F9,18|8|82D0F9,19|4|82D0F9,29|8|82D0F9,33|9|82D0F9,18|3|82D0F9,12|6|82D0F9,19|6|82D0F9",1)//逍遥观
  54.     令 MyArray = Split(XY,"|")
  55.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  56.         调用 搜索()
  57.     否则
  58.         标记 等待(子程序 万流归宗)
  59.         (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 27) //按“ESC”键一次
  60.         延时 1000 毫秒
  61.         (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, Asc(WLGZ)) //按“万流归宗”键一次
  62.         (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"00FF00","-1|-2|00FF00,8|-3|00FF00,9|2|00FF00,10|2|000000,17|-1|00FF00,21|4|00FF00,27|4|00FF00,23|-1|00FF00,27|2|758F85,32|-2|00FF00,29|0|00FF00",1)//万流归宗,坐标(84,226)判断是否回城
  63.         令 MyArray = Split(XY,"|")
  64.         如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  65.             延时 1000 毫秒
  66.             跳转到标记 等待(子程序 万流归宗)
  67.         条件结束
  68.     条件结束
  69. 子程序结束
  70. 子程序 目标太虚道长()
  71.     调用 搜索()
  72. 子程序结束
  73. 子程序 师门任务()
  74.     标记 等待1(子程序 师门任务)
  75.     定义变量 i, 余数
  76.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"FFFFFF","3|0|414431,4|-2|FFFFFF,14|-2|FFFFFF,15|-2|414431,22|8|FFFFFF,27|8|414431,28|8|FFFFFF,26|8|FFFFFF,46|4|FFFFFF,41|8|FFFFFF,39|8|414431,40|8|414431,38|8|FFFFFF",1)//师门任务
  77.     令 MyArray = Split(XY,"|")
  78.     如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  79.         延时 1000 毫秒
  80.         如果 i >= 3 则
  81.             如果 任务完成 = "报警" 则
  82.                 调用 Media.Play(音乐路径)
  83.                 延时 30000 毫秒
  84.                 脚本停止运行
  85.             条件结束
  86.             如果 任务完成 = "短信提示" 则
  87.                 令 提示 = " 提示:脚本已经停止运行!"
  88.                 调用 邮件短信(提示)
  89.             条件结束
  90.             如果 任务完成 = "关机" 则
  91.                 令 t1 = now
  92.                 令 提示 = " 提示:脚本已经暂停运行,3分钟内按""Home""建重新启动脚本,否则,脚本将关闭电脑!"
  93.                 调用 邮件短信(提示)
  94.                 标记 等待5(子程序 师门任务)
  95.                 令 按键码 = (键盘)检测上次按键
  96.                 如果 DateDiff("s",t1,now) >= 180 则
  97.                     调用 Sys.ExitOS(1)
  98.                     调用 File.WriteFileEx("C:\Log.txt","关机时间:" & NOW)
  99.                 否则如果 按键码 = 36 则
  100.                     RestartScript()