If chongwuse = "9CAEB9"   then
Call Plugin.Bkgnd.LeftClick(Hwnd, 499,382)
If chongwu = 1 then
gosub chongwu1hao
End If 
If chongwu1 = 1 then
gosub chongwu2hao
End If 
If chongwu2 = 1 then
gosub chongwu3hao
End If 
If chongwu3 =1  then
gosub chongwu4hao
End If 
If chongwu4 =1 then
gosub chongwu5hao
End If 
If chongwu5= 1 then
gosub chongwu6hao
End If 
If chongwu6 =1 then
gosub chongwu7hao
End If 
If chongwu7=1 then
gosub chongwu8hao
End If 
Delay 1000
ElseIf chongwuse = "6CD5EA"
Call Plugin.Bkgnd.LeftClick(Hwnd, 499,382)
If chongwu = 1 then
gosub chongwu1hao
End If 
If chongwu1 = 1 then
gosub chongwu2hao
End If 
If chongwu2 = 1 then
gosub chongwu3hao
End If 
If chongwu3 =1  then
gosub chongwu4hao
End If 
If chongwu4 =1 then
gosub chongwu5hao
End If 
If chongwu5= 1 then
gosub chongwu6hao
End If 
If chongwu6 =1 then
gosub chongwu7hao
End If 
If chongwu7=1 then
gosub chongwu8hao
End If 
Else 
Goto chongwuse
End If
End Sub
sub 竞技场加怪
zhuren = Plugin.Bkgnd.GetPixelColor(Hwnd, 438,482)
Delay 500
daichong = Plugin.Bkgnd.GetPixelColor(Hwnd, 441,489)
Rem zhuren
Delay 500
If zhuren = "FFDCA2" then
Call Plugin.Bkgnd.LeftClick(Hwnd, 438,482)
ElseIf daichong ="DEE8F2" then
Call Plugin.Bkgnd.LeftClick(Hwnd, 438,482)
Else
Goto zhuren
End If
Delay 500
Rem jingji
Delay 500
jingji = Plugin.Bkgnd.GetPixelColor(Hwnd, 103,46)
If jingji = "B8EBF5" then
Call Plugin.Bkgnd.LeftClick(Hwnd, 103,46)
Else
Goto jingji
End If

Delay 500
Plugin.SR.SetMode 1 ,Hwnd 
x1=871:y1=326:x2=931:y2=340
colordsc="990101-000000":similar=0.95
STR=Plugin.SR.ShapeRec(x1,y1,x2,y2,colordsc,similar)
If STR = "发起挑战" then
Call Plugin.Bkgnd.LeftClick(Hwnd, 898,334) 
End If
Rem guding
Delay 500
XY = Plugin.Bkgnd.FindColor(Hwnd, 422,380, 495,404 , "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 guding
End If
Rem ga1
Delay 500