If GetColor = "00FFFF"
//胜利
Goto 选择技能结束
EndIf
i=i+1
EndFor
Rem 选择技能结束
time_A=time_A+i
If time_A < 200
txt=time_A:filename="..\7time_B.txt"
Gosub CX.写入文件
EndIf
Rem 741.选择技能结束
Return CX.选择技能
Sub CX.选择技能二
K=0
Plugin GetColor = Bkgnd.GetPixelColor(Hwnd, X, Y)
//txt_record ="选择技能二STAR" & GetColor & "|" & X & "|" & Y
//Gosub CX.日志.记录
COL01 = "FFD384"
If GetColor = COL01
//=============================零技能判断======================================
X01 = X + 66: Y01 = Y + 22 : COL01 = "5A3421" : COL02 = "634131" : COL03 = "634931"
For 5
Plugin GetColor = Bkgnd.GetPixelColor(Hwnd, X01, Y01)
If Left (GetColor , 2 ) <> "6B"
txt_record = "零技能判断" & var01(i) & ":" & GetColor & "|" & X01 & "|” ※ Y01
Gosub CX.日志.记录
Goto 选择技能二
EndIf
Y01 = Y01 + 1
EndFor
var1 = relace (var1,var01(i), "")
//=============================零技能判断======================================
Goto 选择技能二END
Rem 选择技能二
//下面这句用于向后台窗口句柄(变量:Hwnd)的客户区域(坐标:X01, Y01)处发送一个鼠标左键单击
//X01= X+ 10 : Y01 = Y
Plugin Bkgnd.LeftClick(Hwnd, X01, Y01)
Plugin Bkgnd.LeftClick(Hwnd, X01, Y01)
//下面这句取窗口句柄(变量:Hwnd)窗口的客户区(坐标:Y, X)处的颜色
Delay 300
For 5
Plugin GetColor = Bkgnd.GetPixelColor(Hwnd, X, Y)
If GetColor <> COL01
K=1
Goto 选择技能二END
EndIf
Delay time101
EndFor
EndIf
Delay time101
Rem 选择技能二END
txt_record ="选择技能二END"
//txt_record ="选择技能二END" & GetColor & "|" & X "|" & Y
Gosub CX.日志.记录
Return CX.选择技能二
Sub CX.选中精灵然后缩小
time01 = timer - Startime
If time01 > var9 or time01 < 0
//关机计算机(关机)
Plugin Sys.ExitOS(1)
Goto END
EndIf
txt_record ="CX.选中精灵然后缩小"
Gosub CX.日志.记录
Plugin Bkgnd.LeftClick(Hwnd, X00, Y00)
Y00 = Y00 + 10
Gosub CX.点击判断
//下面这句是最小化窗口
Var1114_temp = Var1114
Plugin Window.Min(Hwnd)
filename="..\7time_B.txt"
Gosub CX.读文件
time_A=cint(txt)
Delay time101+time_A * 45
//下面这句是还原窗口
Plugin Window.Restore(Hwnd)
Delay 100
For 10
Delay 200
//下面这句按从左到右,从上到下的顺序查找窗口句柄(变量:Hwnd)窗口的指定矩形区域内指定颜色
Plugin XY = Bkgnd.FindColor(Hwnd, 877, 508, 577, 493, "FFF7AD")
MyArray = Split(XY, "|")
X = CInt(MyArray(0)): Y = CInt(MyArray(1))
If X > 0 and Y >0
time_A=time_A-1
Goto 窗口还原一
Else
time_A=time_A+1
EndIf
EndFor
Rem 窗口还原一
txt=time_A : filename="..\7time_A.txt"
txt_record ="CX.选中精灵然后缩小END"
Gosub CX.写入文件
Gosub CX.日志.记录
Return CX.选中精灵然后缩小
Sub CX.精灵恢复
//点击精灵