- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 File.WriteFileEx("C:\Log.txt","扫地任务-开始时间:" & NOW)
- 调用 扫地()
- 条件结束
- (语句无法识别,可能有错误): 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)//探访
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 File.WriteFileEx("C:\Log.txt","探访任务-开始时间:" & NOW)
- 调用 探访()
- 条件结束
- (语句无法识别,可能有错误): 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)//种子
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 File.WriteFileEx("C:\Log.txt","种树任务-开始时间:" & NOW)
- 调用 种子()
- 条件结束
- (语句无法识别,可能有错误): 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)//师门巡逻令
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 File.WriteFileEx("C:\Log.txt","师门巡逻令任务-开始时间:" & NOW)
- 调用 师门巡逻令()
- 条件结束
- (语句无法识别,可能有错误): 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)//放河灯
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 File.WriteFileEx("C:\Log.txt","放河灯任务-开始时间:" & NOW)
- 调用 放河灯()
- 条件结束
- (语句无法识别,可能有错误): 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)//三十到六十武器
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 令 任务 = "武器"
- 调用 File.WriteFileEx("C:\Log.txt","武器任务-开始时间:" & NOW)
- 调用 器衣饰(任务)
- 条件结束
- (语句无法识别,可能有错误): 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)//慕小寰三十到六十戒指
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 令 任务 = "戒指"
- 调用 File.WriteFileEx("C:\Log.txt","戒指任务-开始时间:" & NOW)
- 调用 器衣饰(任务)
- 条件结束
- (语句无法识别,可能有错误): 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)//宫绿娥
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 令 任务 = "衣服"
- 调用 File.WriteFileEx("C:\Log.txt","衣服任务-开始时间:" & NOW)
- 调用 器衣饰(任务)
- 条件结束
- 子程序结束
- 子程序 万流归宗()
- (语句无法识别,可能有错误): 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)//逍遥观
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
- 调用 搜索()
- 否则
- 标记 等待(子程序 万流归宗)
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 27) //按“ESC”键一次
- 延时 1000 毫秒
- (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, Asc(WLGZ)) //按“万流归宗”键一次
- (语句无法识别,可能有错误): 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)判断是否回城
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
- 延时 1000 毫秒
- 跳转到标记 等待(子程序 万流归宗)
- 条件结束
- 条件结束
- 子程序结束
- 子程序 目标太虚道长()
- 调用 搜索()
- 子程序结束
- 子程序 师门任务()
- 标记 等待1(子程序 师门任务)
- 定义变量 i, 余数
- (语句无法识别,可能有错误): 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)//师门任务
- 令 MyArray = Split(XY,"|")
- 如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
- 延时 1000 毫秒
- 如果 i >= 3 则
- 如果 任务完成 = "报警" 则
- 调用 Media.Play(音乐路径)
- 延时 30000 毫秒
- 脚本停止运行
- 条件结束
- 如果 任务完成 = "短信提示" 则
- 令 提示 = " 提示:脚本已经停止运行!"
- 调用 邮件短信(提示)
- 条件结束
- 如果 任务完成 = "关机" 则
- 令 t1 = now
- 令 提示 = " 提示:脚本已经暂停运行,3分钟内按""Home""建重新启动脚本,否则,脚本将关闭电脑!"
- 调用 邮件短信(提示)
- 标记 等待5(子程序 师门任务)
- 令 按键码 = (键盘)检测上次按键
- 如果 DateDiff("s",t1,now) >= 180 则
- 调用 Sys.ExitOS(1)
- 调用 File.WriteFileEx("C:\Log.txt","关机时间:" & NOW)
- 否则如果 按键码 = 36 则
- RestartScript()