[求助] QQ自由幻想按键精灵药师挂机代码谁能帮忙改下

arvane

VBS dim t1
VBS dim t2
VBS t1=now
VBS t2=now
//---------------------------------------------　[脚本主程序]
Rem ST
Delay 356
IfColor 90,29,b0e4f8,0
    Gosub 加血
EndIf
Gosub 状态
IfColor 820,685,f8,0
    Gosub 侦查
EndIf
Goto ST
//---------------------------------------------　[加状态程序]
Sub 状态
    Delay 10
    If DateDiff("s",t1,now)>=120
        Delay 200
        KeyPress 113,1
        Delay 700
        KeyPress 114,1
        Delay 3000
        KeyPress 112,1
        Delay 500
        KeyPress 115,1
        VBS t1=now
    EndIf
Return 状态
//---------------------------------------------　[加血盾程序]
Sub 加血
    IfColor 113,111,58a8d8,2
        Delay 256
        KeyPress 112,1
        Delay 1500
        KeyPress 113,1
    Else
        MoveTo 55,33
        Delay 256
        RightClick 1
        Delay 256
        KeyPress 112,1
        Delay 1500
        KeyPress 113,1
    EndIf
Return sub 加血
//---------------------------------------------　[侦查程序]
Sub 侦查
    MoveTo 929,623
    LeftClick 1
    Delay 2000
Return 防查

F1 加血 F2加盾 F3加攻击 F4加防御

ranterwu

好東西大家一起分享，真好~~