1.                     调用 File.WriteFileEx("C:\Log.txt","脚步重新启动--时间:" & NOW)
  2.                 否则
  3.                     延时 500 毫秒
  4.                     跳转到标记 等待5(子程序 师门任务)
  5.                 条件结束
  6.             条件结束
  7.             脚本停止运行
  8.         条件结束
  9.         令 i = i + 1
  10.         跳转到标记 等待1(子程序 师门任务)
  11.     条件结束
  12.     令 UX = CInt(MyArray(0)) - 4
  13.     令 UY = CInt(MyArray(1)) - 30
  14.     调用 左键单击()
  15. 子程序结束
  16. 子程序 接受()
  17.     定义变量 i
  18.     标记 等待2(子程序 接受)
  19.     延时 1000 毫秒
  20.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"82D0F9","-6|0|000000,-3|0|000000,-3|3|82D0F9,-4|3|000000,5|6|82D0F9,6|6|000000,23|5|82D0F9,25|6|82D0F9,26|6|000000,27|6|82D0F9,30|8|000000,29|8|82D0F9",1)//完成
  21.     令 MyArray = Split(XY,"|")
  22.     如果 CInt(MyArray(0)) > 0 并且 CInt(MyArray(1)) > 0 则
  23.         令 UX = CInt(MyArray(0)) - 4 + 20
  24.         令 UY = CInt(MyArray(1)) - 30 + 7
  25.         调用 左键单击()
  26.         调用 搜索()
  27.         跳转到标记 接任务(子程序 接受)
  28.         跳转到标记 等待4(子程序 接受)
  29.     条件结束
  30.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"82D0F9","3|-3|000000,7|1|000000,10|8|82D0F9,24|8|82D0F9,34|7|000000,33|-2|82D0F9,34|-2|000000,32|0|82D0F9",1)//接受
  31.     令 MyArray = Split(XY,"|")
  32.     如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  33.         延时 1000 毫秒
  34.         如果 i >= 3 则
  35.             调用 搜索()
  36.             调用 师门任务()
  37.             调用 接受()
  38.         条件结束
  39.         令 i = i + 1
  40.         跳转到标记 等待2(子程序 接受)
  41.     条件结束
  42.     令 UX = CInt(MyArray(0)) - 4 + 30
  43.     令 UY = CInt(MyArray(1)) - 30 + 5
  44.     调用 左键单击()
  45.     (语句无法识别,可能有错误): UX=CInt(MyArray(0))-4+17+30:UY=CInt(MyArray(1))-30-410+5:Call 左键单击()//清窗口
  46.     标记 等待4(子程序 接受)
  47. 子程序结束
  48. 子程序 搜索()
  49.     标记 等待3(子程序 搜索)
  50.     令 UX = 936
  51.     令 UY = 172
  52.     调用 左键单击()
  53.     延时 1500 毫秒
  54.     (语句无法识别,可能有错误): XY=Plugin.Color.FindMutiColor(0,0,1440,900,"000000","25|5|00A12A,25|10|00A12A,26|10|000000,24|10|000000,26|4|000000,24|6|000000,19|6|000000,14|6|00A12A,13|2|00A12A,16|1|00A12A,17|1|000000,3|3|00A12A,4|3|000000,1|3|00A12A,2|4|000000,-2|6|000000",1) //搜索
  55.     定义变量 MyArray
  56.     令 MyArray = Split(XY,"|")
  57.     如果 CInt(MyArray(0)) < 0 并且 CInt(MyArray(1)) < 0 则
  58.         延时 1000 毫秒
  59.         跳转到标记 等待3(子程序 搜索)
  60.     条件结束
  61.     令 UX = CInt(MyArray(0)) - 4 + 50
  62.     令 UY = CInt(MyArray(1)) - 30 + 8
  63.     调用 左键单击()
  64.     (语句无法识别,可能有错误): Call Plugin.Bkgnd.KeyPress(Hwnd, 84)//按“T”键一次
  65.     延时 600 毫秒
  66.     令 UX = CInt(MyArray(0)) - 4 - 248
  67.     令 UY = CInt(MyArray(1)) - 30 + 55
  68.     调用 左键单击()
  69.     延时 100 毫秒
  70.     令 UX = UX + 328
  71.     令 UY = UY - 84
  72.     调用 左键单击()
  73.     延时 100 毫秒
  74.     调用 人物是否正在移动()
  75. 子程序结束
  76. 子程序 左键单击()
  77.     延时 50 毫秒
  78.     调用 bgkms3_02.MoveTo(KMData,UX,UY)
  79.     注释: MoveTo UX+x,UY+y
  80.     延时 50 毫秒
  81.     调用 bgkms3_02.LeftClick(KMData)
  82.     延时 50 毫秒
  83. 子程序结束
  84. 子程序 右键单击()
  85.     延时 50 毫秒
  86.     调用 bgkms3_02.MoveTo(KMData,UX,UY)
  87.     注释: MoveTo UX+x,UY+y
  88.     延时 50 毫秒
  89.     调用 bgkms3_02.RightClick(KMData)
  90.     延时 50 毫秒
  91. 子程序结束
  92. 子程序 人物是否正在移动()
  93.     延时 1000 毫秒
  94.     定义变量 GetColor(5)
  95.     定义变量 i
  96.     令 ui = 0
  97.     标记 判断1(子程序 人物是否正在移动)
  98.     令 i = 0
  99.     令 GetColor(0) = 得到指定点 (x + 926, y + 116) 的颜色
  100.     令 GetColor(1) = 得到指定点 (x + 927, y + 119) 的颜色