征途战士挂机包满自动回城脚本

//##############   征途武士挂机说明   ##############

//模式:全屏 1024*768 32位 刷新频率最好调成快 屏幕 1024*768

//本脚本实现了包满自动回程,和不拣取他人物品的功能.

//进入游戏跑到挂机位置以后要先按一下打怪的默认技能

//F1放红药,F2放蓝药,F3放回城,F4辅助技能,F5辅助技能

//我自己的号还不到30没有别的技能,有需要的自己加一下吧

VBS dim jia,jian,hui,a,fuzhu
UserVar jia=1 1是%30加红加蓝，2是%50加红加蓝
UserVar jian=1 是否捡物，1捡，2不捡
UserVar hui=1 满包是否回城，1回城，2不回城
UserVar fuzhu=1 是否使用辅助技能，1使用，2不使用
Delay 500
KeyDown 17 1
KeyPress 90 1
KeyUp 17 1
Delay 500
a=1
While a=1
    If jia=1
        Gosub %30加红加蓝
    Else
        Gosub %50加红加蓝
    EndIf
    If jian=1
        Delay 200
        KeyPress 192 1
        Gosub 别人东西不拣
    EndIf
    If fuzhu=1
        IfColor 97 40 dc2cb8 1
            KeyDown 115 1
            Delay 2000
            KeyUp 115 1
            Delay 100
            KeyDown 116 1
            Delay 500
            KeyUp 116 1
        EndIf
    EndIf
    If hui=1
        Gosub 回城
    EndIf
EndWhile
Rem 挂机结束
KeyPress 114 1
Delay 1500
KeyDown 17 1
KeyPress 90 1
KeyUp 17 1
Delay 500
EndScript
Sub %30加红加蓝
    IfColor 9 58 14bc 1
        KeyPress 112 1
    EndIf
    IfColor 71 60 bc0600 1
        KeyPress 113 1
    EndIf
Return %30加红加蓝
Sub %50加红加蓝
    IfColor 5 40 14bc 1
        KeyPress 112 1
    EndIf
    IfColor 75 41 6e0904 1
        KeyPress 113 1
    EndIf
Return %50加红加蓝
Sub 回城
    IfColor 830 608 0d00f5 0
        IfColor 900 607 0d00f5 1
            IfColor 837 607 0d00f5 0
                IfColor 834 614 0d00f5 0
                    IfColor 851 608 0d00f5 0
                        Goto 挂机结束
                    EndIf
                EndIf
            EndIf
        EndIf
    EndIf
Return 回城
Sub 别人东西不拣
    IfColor 828 604 0000ff 0
        IfColor 917 618 0000ff 1
            IfColor 832 612 0000ff 0
                IfColor 835 612 0000ff 0
                    Delay 3000
                EndIf
            EndIf
        EndIf
    EndIf
Return 别人东西不拣