Else
                    MoveTo 449,386
                    Delay 500
                    LeftClickH 1
                    Delay 500
                End if
                MoveTo 450,418
                Delay 500
                LeftClickH 1
                Delay 500
                MoveTo 825,233
                Delay 500
            End if
        End if
    Next
    Call 上线报警()
    Rem 已进入游戏02
    KeyPressH 27,1
    Delay 1000
    Call FindColorEx(324,747,370,759,"000000",1,0.8,x9,y9)
    If x9>0 and y9>0 Then
    Else
        MoveTo 73,752
        Delay 1000
        LeftClickH 1
        Delay 2000
    End if
    Goto 登陆start
End Sub
Sub 持续报警()
    Rem 持续报警01
    Beep beep
    For 1
        Delay 1000
    Next
    Goto 持续报警01
End Sub
Sub 自动答题()
    Dim St_x,St_y
    //头文字坐标
    St_x=410:St_y=250
    //读取题库信息，取得题目数量
    VBSBegin
        Dim Gx,Yz
        set fso=createobject("scripting.filesystemobject")
        set file=fso.opentextfile("d:\题库.txt")
        Gx=file.readall
        Yz=file.line
        file.close
    VBSEnd
    i=Yz-1
    //创建题库数组，供识别用
    Redim Dct(i)
    //讲题库内容写入数组，供识别用
    t=0
    For i
        Li=Li&""
        R1=Plugin.File.ReadFileEx("d:\题库.txt")
        R2=Plugin.File.ReadFileEx("d:\题库.txt")
        Dct(t) = R1 & R2
        t=t+1
    Next
    //开始识别
    Zf=Plugin.Maple.EamChar(Dct,1,30,St_x,St_y,143,11,1,&H312507,&H281414)
    //识别完成，得出相应值，鼠标点击（坐标自己改）
    If Zf="a" Then
        MoveTo 414,350
        Delay 200
        LeftClick 1
        Delay 1000
        MoveTo 807,227
        Call 答题结果()
    ElseIf Zf="b" Then
        MoveTo 413,379
        Delay 200
        LeftClick 1
        Delay 1000
        MoveTo 807,227
        Call 答题结果()
    ElseIf Zf="c" Then
        MoveTo 414,408
        Delay 200
        LeftClick 1
        Delay 1000
        MoveTo 807,227
        Call 答题结果()
    ElseIf Zf="d" Then
        MoveTo 414,438
        Delay 200
        LeftClick 1
        Delay 1000
        MoveTo 807,227
        Call 答题结果()
    End if
End Sub
Sub 题库收集()
    Dim St_x,St_y
    Dim Input
    //=========================================================
    //设置识别题目的初始坐标。具体看说明