Delay 1000
        LeftClick 1
        Delay 2000
        Call 判断是否见到角色二()
        MoveTo 956, 737
        Delay 2000
        Call shubiao()
        Call 列出怪物挂机()
    Else 
        Delay 2000
        Call 切换二()
        Delay 2000
    end if
End Sub
sub 切换三() 
    MoveTo 949, 218 //线路
    Delay 2000
    LeftClick 1
    Delay 2000
    MoveTo 635, 557 //切换角色按钮
    Delay 2000
    shape=GetCursorShape(0) 
    If shape = shape2 Then 
        Delay 1000
        LeftClick 1
        Delay 2000
        Call 判断是否见到角色三()
        MoveTo 956, 737
        Delay 2000
        Call shubiao()
        Call 列出怪物挂机()
    Else 
        Delay 2000
        Call 切换三()
        Delay 2000
    end if
End Sub
sub 切换四() 
    MoveTo 949, 218 //线路
    Delay 2000
    LeftClick 1
    Delay 2000
    MoveTo 635, 557 //切换角色按钮
    Delay 2000
    shape=GetCursorShape(0) 
    If shape = shape2 Then 
        Delay 1000
        LeftClick 1
        Delay 2000
        Call 判断是否见到角色四()
        MoveTo 956, 737
        Delay 2000
        Call shubiao()
        Call 列出怪物挂机()
    Else 
        Delay 2000
        Call 切换四()
        Delay 2000
    end if
End Sub
Sub y840808()
    MoveTo 20, 131
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl8()
    MoveTo 20, 155
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl7()
    MoveTo 20, 179
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl6()
    MoveTo 20, 203
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl5()
    MoveTo 20, 227
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl4()
    MoveTo 20, 251
    Delay 2000
    LeftClick 1
    Delay 2000
End Sub
Sub yigirl3()
    MoveTo 20, 275
    Delay 2000
    LeftClick 1