//下面这句将字符串转换成数值
            x = Clng(MyArray(0)): y = Clng(MyArray(1))
            Delay 23
            If x>0 and y>0 Then
                //颜色一样
                Call Plugin.Bkgnd.LeftClick(Hwnd,511,436)
            Else
                Delay 1000
                Goto d1
                //颜色不一样
            End if
            Call 退出加血加蓝循环()
            jjn=jjn+1
            TXX=0
        End if
    End if
End Sub
Sub 宠物模块1()
    If dgjs=0 Then
        If ch=0 Then
            If ms=3 Then
                Goto 关闭宠物升级2
            Else
                Goto 关闭宠物升级
            End if
        Else
            Call Plugin.Bkgnd.LeftClick(Hwnd,500,373)
            Delay 256
            //宠物栏1
            Call Plugin.Bkgnd.LeftClick(Hwnd,367,67)
            Delay 256
            i=0
            i=ch+1
            ic=0
            While i<> 0
                //点击宠物栏
                Call Plugin.Bkgnd.LeftClick(Hwnd,chongwux(ic),chongwuy(ic))
                Delay 256
                ic=ic+1
                i=i-1
                Color = Plugin.Bkgnd.GetPixelColor(Hwnd, 836,182)
                Delay 500
                er = Plugin.Bkgnd.FindColorEx(Hwnd, 878,213,879,214,"0C4107",0,0.95)
                MyArray = Split(er, "|")
                xx = Clng(MyArray(0)): yy = Clng(MyArray(1))
                If xx<0 and yy<0 Then
                    Call Plugin.Bkgnd.LeftClick(Hwnd,912,207)
                    Delay 256
                    Call Plugin.Bkgnd.LeftClick(Hwnd,585,320)
                    Delay 256
                    Call Plugin.Bkgnd.LeftClick(Hwnd,585,320)
                    Delay 256
                    Call Plugin.Bkgnd.LeftClick(Hwnd,505,390)
                End if
                Delay 256
                If Color = "AEEAF6" Then
                    Goto nndd
                Else
                    Delay 256
                    Call Plugin.Bkgnd.LeftClick(Hwnd,911,183)
                    Delay 300
                    er = Plugin.Bkgnd.FindColorEx(Hwnd, 526,329,532,339,"FFFFFF",0,0.9)
                    Delay 300
                    MyArray = Split(er, "|")
                    xx = Clng(MyArray(0)): yy = Clng(MyArray(1))
                    If xx>0 and yy>0 Then
                        Call Plugin.Bkgnd.LeftClick(Hwnd,531,391)
                        Delay 56
                        Call Plugin.Bkgnd.LeftClick(Hwnd,531,391)
                        Delay 56
                        Goto nndd
                    End if
                    //Delay 56
                    //Plugin Bkgnd.LeftClick(Hwnd,413,282)
                    Delay 256
                    Call Plugin.Bkgnd.LeftClick(Hwnd,453,394)
                    Delay 1500
                    er = Plugin.Bkgnd.FindColorEx(Hwnd, 471,396,472,397,"010067",0,0.9)
                    Delay 300
                    MyArray = Split(er, "|")
                    xx = Clng(MyArray(0)): yy = Clng(MyArray(1))
                    If xx>0 and yy>0 Then
                        Delay 32
                        Call Plugin.Bkgnd.LeftClick(Hwnd,505,390)
                        Delay 500
                        Call Plugin.Bkgnd.LeftClick(Hwnd,533,399)
                    End if
                End if
                Rem nndd
                Delay 500
            Wend
        End if
    End if
End Sub
Sub 竞技场打断()
    Delay 50
    daduan = Plugin.Bkgnd.FindColorEx(Hwnd, 474,388,481,394,"A9C7D4", 0, 0.9)
    Delay 32
    MyArray1 = Split(daduan, "|")
    x = Clng(MyArray1(0)): y = Clng(MyArray1(1))