ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
If X>0 and Y>0 then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)

Else 
Goto gh4
End If
Delay 800
ca = Plugin.Bkgnd.GetPixelColor(Hwnd, 577,547)
If ca="7E4011"then
Call Plugin.Bkgnd.LeftClick(Hwnd, 578, 401)

Else
Goto NOOK2
End If
l=l+1
lo=l
    Rem 蓝达到要求2
 
End Sub
Sub 关闭战斗显示1
Rem ga1
Delay 2000
XY = Plugin.Bkgnd.FindColor(Hwnd, 974, 34, 987, 49, "6A7CDB")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
If X>0 and Y>0 then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Delay 200
Goto ga1
End If
Return


Sub 模式1
Rem 继续
For guxiu
XY = Plugin.Bkgnd.FindColor(Hwnd, 357, 305, 427, 326, "A9C7D4")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
If X>0 and Y>0 then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
End If
Delay 500
Rem ga
XY = Plugin.Bkgnd.FindColor(Hwnd, 421, 382, 493, 405, "A9C7D4")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
If X>0 and Y>0 then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else 
Goto ga
End If
Delay 500
If 关闭战斗显示 = 0
Gosub 关闭战斗显示1
ElseIf 不关闭战斗显示 =1
End If
Delay 200
Rem guanbi
Delay 300
XY = Plugin.Bkgnd.FindColor(Hwnd, 505, 431, 578, 454, "A9C7D4")
ZB = InStr(XY, "|")
X = Clng(Left(XY, ZB - 1)): Y = Clng(Right(XY, Len(XY) - ZB))
If X>0 and Y>0 then
Call Plugin.Bkgnd.LeftClick(Hwnd, X, Y)
Else
Delay 2000
Goto guanbi
End If
Delay 500
Plugin.SR.SetMode 1,Hwnd
x1=268:y1=68:x2=425:y2=98
colordsc="BEA67A-000000":similar=0.95
STR=Plugin.SR.ShapeRec(x1,y1,x2,y2,colordsc,similar)
Call Plugin.Msg.ShowScrTXT(0, 0, 500, 500, STR , "29AA41")
Delay 500
Plugin.SR.SetMode 1,Hwnd
x1=270:y1=91:x2=427:y2=121
colordsc="BEA67A-000000":similar=0.95
STT=Plugin.SR.ShapeRec(x1,y1,x2,y2,colordsc,similar)
Call Plugin.Msg.ShowScrTXT(0, 0, 500, 500, STT , "29AA41")
Delay 300
x1=277:y1=121:x2=456:y2=145
colordsc="S[30-50]":similar=0.95
STA=Plugin.SR.ShapeRec(x1,y1,x2,y2,colordsc,similar)
If STA = 您本次探险还有0次复活机会 then
goto 哈哈
Else
End If
If xuelan  = 1 then
If 吃红=1
Gosub 红90
ElseIf 吃红=2
    Gosub 红80  
        ElseIf 吃红=3 then
       Gosub 红70
         ElseIf 吃红 = 4 then