MoveTo 579, 123
        Delay YanShi
        LeftClick 1
        Delay YanShi
    Else
        Goto b7
    End If
    Delay YanShi
    Rem b8
    IfColor 52,47,"394129",0 Then
        RightClick 1
        Delay YanShi
    Else
        Goto b8
    End If
    Delay YanShi
    Rem b9
    IfColor 36,45,"314129",0 Then
        Delay YanShi
        SayString a10
        Delay YanShi
    Else
        Goto b9
    End If
    Delay YanShi
    IfColor 384,390,"31CBFF",0 Then
        Delay YanShi
        MoveTo 414, 374
        Delay YanShi
        LeftClick 1
        Delay YanShi
        Call 创建3()
    Else
    End If
    Delay 500
    Call 关闭()
    Delay YanShi
    Goto 开始3
    End Sub
    Sub 运行4()
    Rem 开始4
    Delay 5000
    Delay YanShi
    MoveTo 40, 17
    Delay YanShi
     LeftClick 1
    Delay 50
    KeyPress "Enter", 1
    Delay 100
    Delay YanShi
    MoveTo 600, 300
    SaveMousePos
    i=0
    While i=0
        Delay YanShi
                FindColor 0,0,1024,768,"5ac3ef",intX,intY
        If intx>0 and inty>0
            Delay YanShi
            i=1
        EndIf 
    EndWhile 
    w1 = Plugin.Window.Find(0, "大话西游 II ($Revision: 214866 $)")
    Delay 50
    Call Plugin.Window.Active(w1)
    Delay 50
    Call Plugin.Window.Move(w1, 1, 1)
    Delay YanShi
    Rem b10
    IfColor 8,34,"2961A5",0 Then
        Delay YanShi
        MoveTo 579, 123
        Delay YanShi
        LeftClick 1
        Delay YanShi
    Else
        Goto b10
    End If
    Delay YanShi
    Rem b11
    IfColor 52,47,"394129",0 Then
        RightClick 1
        Delay YanShi
    Else
        Goto b11
    End If
    Delay YanShi
    Rem b12
    IfColor 36,45,"314129",0 Then
        Delay YanShi
        SayString a10
        Delay YanShi
    Else
        Goto b12
    End If
    Delay YanShi
    IfColor 384,390,"31CBFF",0 Then
        Delay YanShi
        MoveTo 414, 374
        Delay YanShi
        LeftClick 1