If x>0 and y>0 Then
        Delay 56
        Call Plugin.Bkgnd.LeftClick(Hwnd,537,401)
        Delay 56
        Call Plugin.Bkgnd.LeftClick(Hwnd,537,401)
    End if
End Sub
Sub 关闭打怪界面()
    //判断关闭按钮（就是那个红X）是否显示出来
    Rem 判断关闭按钮
    Delay 256
    ddjj = Plugin.Bkgnd.FindColorEx(Hwnd, 475,37,488,44,"D9F9FF",0,0.9)
    Delay 56
    MyArraygb = Split(ddjj, "|")
    xxxs = Clng(MyArraygb(0)): yyxs = Clng(MyArraygb(1))
    If xxxs>0 and yyxs>0 Then
        Call Plugin.Bkgnd.LeftClick(Hwnd,978,42)
        Delay 256
    Else
        Goto 判断关闭按钮
        Delay 1000
    End if
End Sub
Sub 修理装备1()
    If n>=no Then
        Call Plugin.Bkgnd.LeftClick(Hwnd,581,406)
        Delay 256
        Call 竞技场打断()
        //防止未点到人物或点了没反应
        Rem 未点到人物2
        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 未点到人物2
        Else
            Call 修理装备()
            Call 退出加血加蓝循环()
        End if
    End if
End Sub
//时间停顿判断 如果 用于在打怪刚开始的确认窗口停顿时间为70秒就重新点击开始脚本
Sub 时间判断()
    If ms=1 Then
        If DateDiff("s",timedg,now)>=timedaguai Then
            Goto 打怪开始
        End if
    End if
End Sub
Sub 副本打怪()
    Delay 300
    op = Plugin.Bkgnd.FindColorEx(Hwnd, 691,235,692,236,"0F1315", 0, 0.88)
    Delay 32
    //判断是否在副本内
    MyArray1 = Split(op, "|")
    x2 = Clng(MyArray1(0)): y2 = Clng(MyArray1(1))
    If x2>0 and y2>0 Then
        //如果是就点击打怪
        Call Plugin.Bkgnd.LeftClick(Hwnd,623,239)
        Delay 56
        Call Plugin.Bkgnd.LeftClick(Hwnd,623,239)
        Delay 300
        fbtime=now
        Call Plugin.Window.SendKeyPress(Hwnd,32)
        Delay 56
        Call Plugin.Window.SendKeyPress(Hwnd,32)
        Rem fbd
        //下面这句按(从左到右从上到下的顺序找色)模糊查找窗口句柄(变量：Hwnd)窗口的指定矩形区域内指定颜色
        Call 复活()
        Delay 256
        XY = Plugin.Bkgnd.FindColorEx(Hwnd, 509,436, 512,438, "020149", 0, 0.96)
        //下面这句用于分割字符串0
        Delay 32
        MyArray = Split(XY, "|")
        //下面这句将字符串转换成数值
        x = Clng(MyArray(0)): y = Clng(MyArray(1))
        Delay 23
        If x>0 and y>0 Then
            //颜色一样
            Delay fbgk
            Call Plugin.Bkgnd.LeftClick(Hwnd,541,437)
            Delay 256
            Call Plugin.Bkgnd.LeftClick(Hwnd,541,437)
            Delay 256
        Else
            Delay 500
            Call Plugin.Bkgnd.LeftClick(Hwnd,497,385)
            Delay 56
            Call Plugin.Bkgnd.LeftClick(Hwnd,497,385)
            Delay 56
            //Gosub 时间判断
            Goto fbd
            //颜色不一样
        End if
    Else