End If
        Wend
    Case 3
        While true
            FindPic 0,0,2000,2000,"Attachment:\zz.bmp",1,intX,intY
            If intX > 0 And intY > 0 Then
                MoveTo intX,intY
                Delay 200
                RightClick 1
            End If
            FindPic 0,0,2000,2000,"Attachment:\zz9.bmp",0.9,ssX,ssY
            If ssX > 0 And ssY > 0 Then
                MoveTo ssX,ssY
                Delay 200
                RightClick 1
            End If
            FindPic 0,0,2000,2000,"Attachment:\zz1.bmp",1,aaX,aaY
            If aaX > 0 And aaY > 0 Then
                IfColor aaX+89,aaY-109,"0",0 Then
                    MoveTo aaX+13, aaY+5
                    Delay 200
                    LeftClick 1
                Else
                    IfColor aaX+89,aaY-77,"0",0 Then
                        MoveTo aaX+53, aaY+4
                        Delay 200
                        LeftClick 1
                    Else
                        IfColor aaX+47,aaY-45,"FFA5",1 Then
                            MoveTo aaX+98, aaY+6
                            Delay 200
                            LeftClick 1
                        Else
                            MoveTo 350, 168
                            Delay 300
                        End If
                    End If
                End If
            End If
            FindPic 0,0,2000,2000,"Attachment:\zz0.bmp",1,eeX,eeY
            If eeX > 0 And eeY > 0 Then
                MoveTo eeX,eeY
                Delay 200
                RightClick 1
            End If
            FindPic 0,0,2000,2000,"Attachment:\zz3.bmp",0.9,wwX,wwY
            If wwX > 0 And wwY > 0 Then
                MoveTo wwX+16,wwY+5
                Delay 200
                LeftClick 1
                Delay 200
                FindPic 0,0,2000,2000,"Attachment:\aa.bmp",0.9,ggX,ggY
                If ggX > 0 And ggY > 0 Then
                    MoveTo ggX-374, ggY+294
                    Delay 200
                    LeftClick 1
                    Delay 2000
                    KeyPress "1", 1
                    Delay 200
                    MoveTo ggX-19, ggY+290
                    Delay 200
                    LeftClick 1
                    Delay 2000
                End If
            End If
        Wend
    Case Else
    End Select
Else
End If
//======================================================================欢迎使用独处软件
Event Form1.InputBox6.Change
    If Form1.InputBox6.Text>=0 Then
    Else
        Form1.InputBox6.Text="10"
        MessageBox "请输入数字"
    End If
End Event
//======================================================================欢迎使用独处软件
Event Form1.后台喊话.Click
    If Form1.后台喊话.Visible
        Form1.InputBox1.Visible = True
        Form1.InputBox2.Visible = True
        Form1.InputBox3.Visible = True
        Form1.InputBox4.Visible = True
        Form1.InputBox5.Visible = True
        Form1.InputBox6.Visible = True
        Form1.Label2.Visible = True
        Form1.Label3.Visible = True
        Form1.Label4.Visible = True
        Form1.Label5.Visible = True
        Form1.Label6.Visible = True
        Form1.Label7.Visible = True
        Form1.Label8.Visible = True
    End If
End Event
//======================================================================欢迎使用独处软件
Event Form1.HP＜多少用回城.Click
    If Form1.HP＜多少用回城.Visible
        Form1.InputBox1.Visible = False