Delay ys
Call Plugin.Bkgnd.LeftClick(ha,x,y)
    hf = Plugin.Window.Find(0, "信息提示")
    Delay ys
    Call Plugin.Bkgnd.KeyPress(hf, 27)
    Delay 50
        Ge = Plugin.Bkgnd.GetPixelColor(ha, 722,135)
    If Ge = "22B56B" Then
            MessageBox "已挤进你所需的房间！！"
        Call liaoa()
        Else
        End If
    Goto wua
End Sub
Sub liaoa()
MessageBox "继续挤房间,请在等待要挤房间的时间内,点击下你要挤的房间，否则请按结束键停止运行!!!"
    Delay shi
            hd = Plugin.Window.Find(0, "QQ游戏")
zc = Plugin.Bkgnd.FindColor(Hd, 0, 50, 1024, 768, "E7A441")
gf = Split(zc, "|")
z = Clng(gf(0)):c = Clng(gf(1))
    Rem meia
                hz = Plugin.Window.Find(0, "QQ游戏")
    Delay ys

Call Plugin.Bkgnd.LeftClick(hz, z,c)
hy = Plugin.Window.Find(0, "信息提示")
    Delay ys
    Call Plugin.Bkgnd.KeyPress(hy, 27)
    Delay 50
    jy = Plugin.Bkgnd.GetPixelColor(hz, 722,135)
    If jy = "22B56B" Then
            MessageBox "已挤进你所需的房间！！"
        Call jxs()
        Else
        End If
    Goto meia
End Sub