//
    Rem zhanghaokuang
    FindPic 0,0,3000,2000,"Attachment:\网页注册账号框.bmp",0.9,intXwyzczhk,intYwyzczhk
    If intXwyzczhk > 0 And intYwyzczhk > 0 Then 
        Delay 100
        MoveTo intXwyzczhk + 200 ,intYwyzczhk + 10
        Delay 100
        LeftClick 1
        Delay 100
    Else 
        Delay 1000
        Goto zhanghaokuang
    End If
    //
    SayString zhanghaoqian
    Delay 100
    //
End Sub 
//
Sub 自动()
    KeyPress "Tab", 1
    Delay 100
    SayString mima
    Delay 100

    KeyPress "Tab", 1
    Delay 100
    SayString mima
    Delay 100

    KeyPress "Tab", 1
    Delay 100
    SayString xingming
    Delay 100

    KeyPress "Tab", 1
    Delay 100
    SayString shenfenzheng
    Delay 100

    KeyPress "Tab", 1
    Delay 100
    SayString shouji
    Delay 100

    KeyPress "Tab", 1
    Delay 100

End Sub
//