//        Delay 200
//        KeyUp 18, 1
//        Delay 200
//        KeyDown 18, 1
//        Delay 200
//        KeyPress 65, 1
//        Delay 200
//        KeyUp 18, 1
//        Delay 200
//    End If
//End Sub
//Sub 战斗判断()
//    IfColor Ux+636,Uy+122,"605000",0 Then
//        Goto 开始挂机
//    End If
//End Sub
//Goto 开始挂机
//
Sub 找色(a,b,色,点击x,点击y)
    色1=GetPixelColor(Ux+a,Uy+b)
    TracePrint 色1
    If 色1 = 色 Then 
        Call 点击(点击x, 点击y)
        i=i+1
    Else 
        Delay 500
    End If
End Sub
Sub 点击(cx,cy)
    MoveTo Ux + cx, Uy + cy
    Delay 200
    LeftClick 1
End Sub
Event Form1.InputBox1.Change
    帐号1=Form1.InputBox1.Text
End Event
Event Form1.InputBox2.Change
    密码1=Form1.InputBox2.Text
End Event
Event Form1.InputBox3.Change
    帐号2=Form1.InputBox3.Text
End Event
Event Form1.InputBox4.Change
    密码2=Form1.InputBox4.Text
End Event
Event Form1.InputBox5.Change
    帐号3=Form1.InputBox5.Text
End Event
Event Form1.InputBox6.Change
    密码3=Form1.InputBox6.Text
End Event
Event Form1.InputBox7.Change
    帐号4=Form1.InputBox7.Text
End Event
Event Form1.InputBox8.Change
    密码4=Form1.InputBox8.Text
End Event
Event Form1.Button1.Click
    Delay 1000
    Call 自动登陆(帐号1,密码1)
End Event
Event Form1.Button2.Click
    Delay 1000
    Call 自动登陆(帐号2,密码2)
End Event
Event Form1.Button3.Click
    Delay 1000
    Call 自动登陆(帐号3,密码3)
End Event
Event Form1.Button4.Click
    Delay 1000
    Call 自动登陆(帐号4,密码4)
End Event