Delay 256
            Call 竞技场打断()
            //防止未点到人物或点了没反应
            Rem 未点到人物1
            ui = Plugin.Bkgnd.FindColorEx(Hwnd, 164,75,174,86,"FFFFFF", 0, 0.8)
            Delay 32
            MyArray5 = Split(ui, "|")
            x2 = Clng(MyArray5(0)): y2 = Clng(MyArray5(1))
            If x2<0 and y2<0 Then
                //重新点击人物打开人物属性
                Call Plugin.Bkgnd.LeftClick(Hwnd,581,406)
                Delay 256
                Call 竞技场打断()
                Goto 未点到人物1
            Else
                //自动整理背包
                Call Plugin.Bkgnd.LeftClick(Hwnd,646,325)
                Delay 500
                Call Plugin.Bkgnd.LeftClick(Hwnd,374,75)
                Delay 500
                Call 竞技场打断()
                Call 修理装备()
                bc = Plugin.Bkgnd.FindColorEx(Hwnd, 361,91,616,345,"652D14",0,lanxs)
                Delay 256
                MyArray = Split(bc, "|")
                xxx = Clng(MyArray(0)): yyy = Clng(MyArray(1))
                If xxx>0 and yyy>0 Then
                    //如果找到蓝瓶双击加蓝
                    Rem 第二次判断才找到药水
                    Call Plugin.Bkgnd.LeftDoubleClick(Hwnd,xxx,yyy)
                    Call Plugin.Bkgnd.LeftDoubleClick(Hwnd,xxx,yyy)
                    lpjs=lpjs+1
                    Call Plugin.WindowEx3.SendTextRgnString(tisi,"总计打怪数为："&dgjs&"喝红瓶数为："&hpjs&"喝蓝瓶数为:"&lpjs)
                    Delay lanT
                    Call 竞技场打断()
                    Call 添加物品过量1()
                    Rem 加蓝
                    //判断加蓝后是否没加满
                    XY = Plugin.Bkgnd.FindColorEx(Hwnd, ina,inb,ina+1,inb+1,inc, 0, 0.8)
                    Delay 256
                    MyArray7 = Split(XY, "|")
                    x = Clng(MyArray7(0)): y = Clng(MyArray7(1))
                    If x>0 and y>0 Then
                        //整理背包防止第一次加蓝用玩蓝瓶
                        Call Plugin.Bkgnd.LeftClick(Hwnd,646,325)
                        Delay 500
                        //如果没加满继续加蓝
                        Call Plugin.Bkgnd.LeftDoubleClick(Hwnd,xxx,yyy)
                        Call Plugin.Bkgnd.LeftDoubleClick(Hwnd,xxx,yyy)
                        lpjs=lpjs+1
                        Call Plugin.WindowEx3.SendTextRgnString(tisi,"总计打怪数为："&dgjs&"喝红瓶数为："&hpjs&"喝蓝瓶数为:"&lpjs)
                        Delay lanT
                        Call 竞技场打断()
                        Call 添加物品过量3()
                        Goto 加蓝
                    Else
                        Call 退出加血加蓝循环()
                    End if
                Else
                    //第二次判断，以免第一次没找到药水
                    Delay 1000
                    bc = Plugin.Bkgnd.FindColorEx(Hwnd, 361,91,616,345,"652D14",0,lanxs)
                    Delay 256
                    MyArray = Split(bc, "|")
                    xxx = Clng(MyArray(0)): yyy = Clng(MyArray(1))
                    If xxx>0 and yyy>0 Then
                        Goto 第二次判断才找到药水
                    Else
                        Call 无蓝报警()
                    End if
                End if
            End if
        Else
            Call 修理装备1()
        End if
    End if
End Sub
Sub 退出加血加蓝循环()
    Rem 退出循环
    Call Plugin.Bkgnd.LeftClick(Hwnd,940,45)
    Delay 256
End Sub
Sub OnScriptExit()
    MessageBox "脚本已经停止！"
End Sub
Sub 添加物品过量1()
    io = Plugin.Bkgnd.FindColorEx(Hwnd, 471,396,472,397,"010067", 0, 0.9)
    Delay 32
    MyArray5 = Split(io, "|")
    x2 = Clng(MyArray5(0)): y2 = Clng(MyArray5(1))
    If x2>0 and y2>0 Then
        Delay 256
        Call Plugin.Bkgnd.LeftClick(Hwnd,471,396)
        Delay 256
        Call Plugin.Bkgnd.LeftClick(Hwnd,471,396)
    End if
End Sub
Sub 添加物品过量2()
    io = Plugin.Bkgnd.FindColorEx(Hwnd, 471,396,472,397,"010067", 0, 0.9)
    Delay 32