魔兽世界挂机脚本

关于魔兽世界的挂机软件已经找不到比较好用的了，今天数码资源小编就为大家准备一份魔兽世界战场挂机脚本最新版，希望能帮助广大WOW玩家。

【魔兽世界挂机脚本明细】：
以下为脚本：
[General]
Description=魔兽世界战场挂机脚本V2.0
BeginHotkey=110
beginHotkeyMod=2
RunOnce=0
Enable=1
[Repeat]
Type=1
Number=261152
[Comment]
Content=
[Script]
Rem 选择模式
VBS i=0
VBSCall Call PopBox("请选择是否需要到特定时间关闭游戏",0,"请选择模式",68,ms)
If ms=6
    VBSCall hh=InputBox("请输入关闭游戏小时（0-23）必须输入否则请停止脚本")
    hh=int(hh)
    VBSCall mm=InputBox("请输入关闭游戏分钟（0-59）必须输入否则请停止脚本")
    mm=int(mm)
ElseIf ms=7
    VBS hh=25
    VBS mm=61
    Goto 开始
EndIf
Rem 开始
VBS t=time
VBS h=Hour(t)
VBS m=Minute(t)
If ms=6
    If h=hh and m=mm
        Gosub 关游戏
        VBS lvt=time
        VBSCall MessageBox("游戏于" & lvt & "被自动关闭。期间共刷了" & i & "场")
    EndScript
EndIf
EndIf
Rem 战场脚本
Gosub 进入战场
Gosub 离开战场
If jrx=-1 and lkx=-1
    Gosub 战场检测
EndIf
Gosub 跳
Goto 开始
Sub 进入战场
    VBSCall Call FindPic(0,0,1023,767,"wowpic\进入战场.bmp",0.9,jrx,jry)
    If jrx>=0 and jry>=0
        MoveTo jrx jry
        Gosub 鼠标单击
        Delay 1000
    EndIf
Return
Sub 离开战场
    VBSCall Call FindPic(0,0,1023,767,"wowpic\离开战场.bmp",0.9,lkx,lky)
    If lkx>=0 and lky>=0
        VBS i=i+1
        MoveTo lkx lky
        Gosub 鼠标单击
        Delay 1000
    EndIf
Return
Sub 跳
    Delay 3000
    KeyPress 32 1
    Delay 2000
Return
Sub 关游戏
    KeyDown 18 1
    Delay 1000
    KeyDown 115 1
    Delay 500
    KeyUp 115 1
    Delay 1000
    KeyUp 18 1
    Delay 3000
Return 关游戏
Sub 鼠标单击
    MoveR 5 5
    Delay 500
    LeftClick 1
Return
Sub 战场检测
    VBSCall Call FindPic(0,0,1023,767,"wowpic\战场图标.bmp",0.9,tbx,tby)
    If tbx>=0 and tby>=0
        MoveTo tbx+5 tby+5
        Delay 500
        LeftClick 1
        Gosub 离开战场
    Else
        Gosub 寻找npc
    EndIf
Return
Sub 寻找npc
    MoveTo 0 0
    KeyPressH 86 1
    Delay 1000
    VBSCall FindPic(0,0,1023,767,"wowpic\npc2.bmp",0.8,npcx,npcy)
    If npcx>=0 and npcy>=0
        MoveTo npcx-50 npcy+1
        RightClick 1
        Delay 4000
        Gosub 与npc对话
    EndIf
Return
Sub 与npc对话
    VBSCall FindPic(334,129,348,141,"wowpic\我想去战场.bmp",0.8,dhx,dhy)
    If dhx>=0 and dhy>=0
        MoveTo 110 258
        //上面这个坐标就是战歌“我想去战场”的坐标点，想去大战场只需要更改这个就可以了
        LeftClick 1
        Delay 4000
        VBSCall FindPic(0,0,1023,767,"wowpic\加入战斗.bmp",0.7,jrzdx,jrzdy)
        If jrzdx>=0 and jrzdy>=0
            MoveTo jrzdx jrzdy
            LeftClick 1
            Delay 4000
        Else
            MoveTo 79 285
            //上面这个坐标就是盆地“我想去战场”的坐标点
            LeftClick 1
            Delay 4000
        EndIf
        VBSCall FindPic(0,0,1023,767,"wowpic\加入战斗.bmp",0.7,jrzdx,jrzdy)
        If jrzdx>=0 and jrzdy>=0
            MoveTo jrzdx jrzdy
            LeftClick 1
            Delay 4000
        EndIf
        KeyPressH 27 1
        Goto 开始
    Else
        KeyPressH 27 1
        Delay 1000
        Gosub 再次寻找
    EndIf
Return
Sub 再次寻找
    MoveTo 0 0
    VBS y=npcy+9
    VBSCall FindPic(0,y,1023,767,"wowpic\npc2.bmp",0.8,npcx,npcy)
    If npcx>=0 and npcy>=0
        MoveTo npcx-50 npcy+1
        RightClick 1
        Delay 4000
        Gosub 与npc对话
    EndIf
Return