Goto 开始
//====================================================================子程序
Sub 游戏中()
    //检测背景
    IfColor 1+Ux, 765+Uy, "0", 0 Then
    Else 
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
        Delay 200
        KeyPress "-", 2
    End If
    //多开2
    If duokai > 1 Then 
        Call Plugin.Window.Active(Jubing2)
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
    End If
    //多开3
    If duokai > 2 Then 
        Call Plugin.Window.Active(Jubing3)
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
    End If
    //多开4
    If duokai > 3 Then 
        Call Plugin.Window.Active(Jubing4)
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
    End If
    //多开5
    If duokai > 4 Then 
        Call Plugin.Window.Active(Jubing5)
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
    End If
    //多开6
    If duokai > 5 Then 
        Call Plugin.Window.Active(Jubing6)
        Delay 200
        KeyPress "F12", 1
        KeyPress "F2", 1
    End If
    //返回大号
    Call Plugin.Window.Active(Jubing)
    Delay 500
    //模式=============================================模式太鼓

    If moshitaigu = 1 Then 
        //房主动作
        If djy = 1 Then 
            //开局后房主蹦15秒
            Dim t1
            t1 = time
            Rem 房主按键
            KeyPress "J", 1
            KeyPress "J", 1
            t1_2 = time
            mytime_diff = DateDiff("s",t1,t1_2)
            If mytime_diff > 15 Then 
                Goto 对局按键结束
            Else 
                Goto 房主按键
            End If
        End If
        //房员动作
        If djy = 2 Then 
            //开局后房员蹦8秒
            Dim t2
            t2 = time
            Rem 房员按键
            KeyPress "J", 1
            KeyPress "J", 1
            t2_2 = time
            mytime_diff = DateDiff("s",t2,t2_2)
            If mytime_diff > 8 Then 
                Goto 对局按键结束
            Else 
                Goto 房员按键
            End If
        End If
        //==========================================模式太鼓结束
    End If
    Rem 对局按键结束
    Delay 130000
    Call Plugin.Window.Active(Jubing)
    //检测返回(太鼓）
    Rem fh
    IfColor 268+Ux, 207+Uy, "90FF", 0 Then
        Call 返回()
    Else 
    Delay 1000
        IfColor 332+Ux, 178+Uy, "F7FF", 0 Then
            Call 返回浪漫()
        Else 
            Delay 2000