Gosub 红60
          ElseIf 吃红=5 then
          Gosub 红50
          ElseIf 吃红=6 then
          Gosub 红40
          ElseIf 吃红=7 then
          Gosub 红30
          ElseIf 吃红=8 then
          Gosub 红20
          ElseIf 吃红=9 then
          Gosub 红10
          ElseIf 吃红=10 then
          End If
          If shifouhanhua = 1 then
gosub 喊话
ElseIf shifouhanhua= 2 then
End if
 If 吃蓝=1
        Gosub 蓝90
        ElseIf 吃蓝=2 then
         Gosub 蓝80
         ElseIf 吃蓝=3 then
          Gosub 蓝70
          ElseIf 吃蓝=4 then
          Gosub 蓝60
           ElseIf 吃蓝=5 then
           Gosub 蓝50
            ElseIf 吃蓝=6 then
            Gosub 蓝40
             ElseIf 吃蓝=7 then
             Gosub 蓝30
              ElseIf 吃蓝=8 then
              Gosub 蓝20
               ElseIf 吃蓝=9 then
               Gosub 蓝10
                ElseIf 吃蓝=10 then
                If shifouhanhua = 1 then
gosub 喊话
ElseIf shifouhanhua= 2 then
End if
                ElseIf xuelan  = 2 then
Gosub 内存血
If shifouhanhua = 1 then
gosub 喊话
ElseIf shifouhanhua= 2 then
End if
gosub 内存蓝
If shifouhanhua = 1 then
gosub 喊话
ElseIf shifouhanhua= 2 then
End if
End If
         End If   
      
 If chongwushengji = 1 then
gosub 宠物升级
ElseIf chongwushengji = 2 then
End If
If gujjc  = 0 then
ElseIf gujjc = 1 then
If X2<=time Then
gosub 竞技场加怪
X1 = time
X2=DateAdd("n",daguaijingji,X1)
End If
End if
 Next 
 Delay 300
 GOsub 修理装备
goto 继续
Rem 哈哈

Rem shibai
Delay 300
XY = Plugin.Bkgnd.FindColor(Hwnd, 462,381, 537,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 shibai
End If

Rem shibaijiesu
Delay 300
XY = Plugin.Bkgnd.FindColor(Hwnd, 458,305, 530,323, "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 shibaijiesu
End If

Rem shibaiding
Delay 300
XY = Plugin.Bkgnd.FindColor(Hwnd, 424,384, 490,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