1.         如果表达式 (GetColor = "00FFFF") 为真,则
  2.             //胜利
  3.             跳转到标记 选择技能结束
  4.         条件结束
  5.         i=i+1
  6.     循环结束
  7.     标记 选择技能结束
  8.     time_A=time_A+i
  9.     如果表达式 (time_A < 200) 为真,则
  10.         txt=time_A:filename="..\7time_B.txt"
  11.         调用子程序 CX.写入文件
  12.     条件结束
  13.     标记 741.选择技能结束
  14. 子程序结束,回到调用处
  15. 子程序 CX.选择技能二
  16.     K=0
  17.     调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, X, Y)
  18.     //txt_record ="选择技能二STAR" & GetColor & "|" & X & "|" & Y
  19.     //Gosub CX.日志.记录
  20.     COL01 = "FFD384"
  21.     如果表达式 (GetColor = COL01) 为真,则
  22.         //=============================零技能判断======================================
  23.         X01 = X + 66: Y01 = Y + 22 : COL01 = "5A3421" : COL02 = "634131" : COL03 = "634931"
  24.         循环 5 遍
  25.             调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, X01, Y01)
  26.             如果表达式 (Left (GetColor , 2 ) <> "6B") 为真,则
  27.                 txt_record = "零技能判断" & var01(i) & ":" & GetColor & "|" & X01 & "|” ※ Y01
  28.                 调用子程序 CX.日志.记录
  29.                 跳转到标记 选择技能二
  30.             条件结束
  31.             Y01 = Y01 + 1
  32.         循环结束
  33.         var1 = relace (var1,var01(i), "")
  34.         //=============================零技能判断======================================
  35.         跳转到标记 选择技能二END
  36.         标记 选择技能二
  37.         //下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:X01, Y01)处发送一个鼠标左键单击
  38.         //X01= X+ 10 : Y01 = Y
  39.         调用插件命令 Bkgnd.LeftClick(Hwnd, X01, Y01)
  40.         调用插件命令 Bkgnd.LeftClick(Hwnd, X01, Y01)
  41.         //下面这句取窗口句柄(变量:Hwnd)窗口的客户区(坐标:Y, X)处的颜色
  42.         延时300毫秒
  43.         循环 5 遍
  44.             调用插件命令 GetColor = Bkgnd.GetPixelColor(Hwnd, X, Y)
  45.             如果表达式 (GetColor <> COL01) 为真,则
  46.                 K=1
  47.                 跳转到标记 选择技能二END
  48.             条件结束
  49.             延时time101毫秒
  50.         循环结束
  51.     条件结束
  52.     延时time101毫秒
  53.     标记 选择技能二END
  54.     txt_record ="选择技能二END"
  55.     //txt_record ="选择技能二END" & GetColor & "|" & X "|" & Y
  56.     调用子程序 CX.日志.记录
  57. 子程序结束,回到调用处
  58. 子程序 CX.选中精灵然后缩小
  59.     time01 = timer - Startime
  60.     如果表达式 (time01 > var9 or time01 < 0) 为真,则
  61.         //关机计算机(关机)
  62.         调用插件命令 Sys.ExitOS(1)
  63.         跳转到标记 END
  64.     条件结束
  65.     txt_record ="CX.选中精灵然后缩小"
  66.     调用子程序 CX.日志.记录
  67.     调用插件命令 Bkgnd.LeftClick(Hwnd, X00, Y00)
  68.     Y00 = Y00 + 10
  69.     调用子程序 CX.点击判断
  70.     //下面这句是最小化窗口
  71.     Var1114_temp = Var1114
  72.     调用插件命令 Window.Min(Hwnd)
  73.     filename="..\7time_B.txt"
  74.     调用子程序 CX.读文件
  75.     time_A=cint(txt)
  76.     延时time101+time_A * 45毫秒
  77.     //下面这句是还原窗口
  78.     调用插件命令 Window.Restore(Hwnd)
  79.     延时100毫秒
  80.     循环 10 遍
  81.         延时200毫秒
  82.         //下面这句按从左到右,从上到下的顺序查找窗口句柄(变量:Hwnd)窗口的指定矩形区域内指定颜色
  83.         调用插件命令 XY = Bkgnd.FindColor(Hwnd, 877, 508, 577, 493, "FFF7AD")
  84.         MyArray = Split(XY, "|")
  85.         X = CInt(MyArray(0)): Y = CInt(MyArray(1))
  86.         如果表达式 (X > 0 and Y >0) 为真,则
  87.             time_A=time_A-1
  88.             跳转到标记 窗口还原一
  89.         否则
  90.             time_A=time_A+1
  91.         条件结束
  92.     循环结束
  93.     标记 窗口还原一
  94.     txt=time_A : filename="..\7time_A.txt"
  95.     txt_record ="CX.选中精灵然后缩小END"
  96.     调用子程序 CX.写入文件
  97.     调用子程序 CX.日志.记录
  98. 子程序结束,回到调用处
  99. 子程序 CX.精灵恢复
  100.     //点击精灵