//下面这句按(从左到右从上到下的顺序找色)模糊查找窗口句柄(变量：Hwnd)窗口的指定矩形区域内指定颜色
        Delay 256
        XY = Plugin.Bkgnd.FindColorEx(Hwnd, 509,436, 512,438, "020149", 0, 0.9)
        //下面这句用于分割字符串0
        Delay 32
        MyArray = Split(XY, "|")
        //下面这句将字符串转换成数值
        x = Clng(MyArray(0)): y = Clng(MyArray(1))
        Delay 23
        If x>0 and y>0 Then
            //颜色一样
            Call Plugin.Bkgnd.LeftClick(Hwnd,512,436)
            Delay 256
            Call Plugin.Bkgnd.LeftClick(Hwnd,512,436)
            Delay 256
            XY = Plugin.Bkgnd.FindColorEx(Hwnd, 471,394, 472,395, "00015C", 0, 0.9)
            Delay 32
            MyArray = Split(XY, "|")
            //下面这句将字符串转换成数值
            x = Clng(MyArray(0)): y = Clng(MyArray(1))
            Delay 23
            If x>0 and y>0 Then
                Call 报警1()
            End if
        Else
            Delay 1000
            Goto d2
            //颜色不一样
        End if
    End if
End Sub
Sub 竞技场()
    If jjn=0 Then
        If gj=1 Then
            Call Plugin.Bkgnd.LeftClick(Hwnd,293,210)
            Delay 1500
        ElseIf gj=2 Then
            Call Plugin.Bkgnd.LeftClick(Hwnd,110,119)
            Delay 1500
        End if
        If gj=3 Then
            Call Plugin.Bkgnd.LeftClick(Hwnd,663,376)
            Delay 1500
        End if
        Call Plugin.Bkgnd.LeftClick(Hwnd,898,332)
        Delay 1000
        Call Plugin.Bkgnd.LeftClick(Hwnd,453,394)
        Delay 23
        Call Plugin.Bkgnd.LeftClick(Hwnd,453,394)
        Rem a1
        Delay 500
        XY = Plugin.Bkgnd.FindColorEx(Hwnd, 511,436, 513,437, "000062", 0, 0.9)
        //下面这句用于分割字符串0
        Delay 32
        MyArray = Split(XY, "|")
        //下面这句将字符串转换成数值
        x = Clng(MyArray(0)): y = Clng(MyArray(1))
        Delay 23
        If x>0 and y>0 Then
            //颜色一样
            Call Plugin.Bkgnd.LeftClick(Hwnd,511,436)
            Delay 256
            Call Plugin.Bkgnd.LeftClick(Hwnd,511,436)
            Delay 256
        Else
            Delay 1000
            Goto a1
            //颜色不一样
        End if
        Call 退出加血加蓝循环()
        jjn=jjn+1
    ElseIf jjn=jjccs Then
        MessageBox "已经打到您设置的竞技场次数！～"
        EndScript
    End if
    If jjn<jjccs Then
        If DateDiff("n",TXX,now)>=TN Then
            If gj=1 Then
                Call Plugin.Bkgnd.LeftClick(Hwnd,293,210)
                Delay 1500
            ElseIf gj=2 Then
                Call Plugin.Bkgnd.LeftClick(Hwnd,110,119)
                Delay 1500
            End if
            If gj=3 Then
                Call Plugin.Bkgnd.LeftClick(Hwnd,663,376)
                Delay 1500
            End if
            Delay 500
            Call Plugin.Bkgnd.LeftClick(Hwnd,898,332)
            Delay 500
            Call Plugin.Bkgnd.LeftClick(Hwnd,453,394)
            Delay 23
            Call Plugin.Bkgnd.LeftClick(Hwnd,453,394)
            Rem d1
            Delay 500
            XY = Plugin.Bkgnd.FindColorEx(Hwnd, 511,436, 513,437, "000062", 0, 0.9)
            //下面这句用于分割字符串0
            Delay 32
            MyArray = Split(XY, "|")