魔兽世界奥山单排新领域插件或宏
脚本如下:
[脚本]
[color = red][常规]
描述=魔兽世界战场挂机脚本V2.0
BeginHotkey=110
beginHotkeyMod=2
RunOnce=0
启用=1
[重复]
Type=1
号码=261152
[评论]
Content=[/color]
[color=red][Script]
Rem选择模式
VBS i=0
VBSCall调用PopBox("请选择是否在特定时间关闭游戏",0,"请选择一种模式",68,ms)
如果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
转到开始
EndIf
快速眼动开始
VBS时间
VBS h =小时(t)
VBS m =分钟(t)
如果ms=6
如果h=hh且m=mm
Gosub关闭游戏。
VBS lvt =时间
VBS call MessageBox(" & amp in " &;lvt & amp“是自动关闭的。* * *刷期间“&;我& amp“字段”)
EndScript
EndIf
EndIf
Rem战场脚本
Gosub进入战场。
戈苏伯离开了战场
如果jrx=-1并且lkx=-1
战场探测
EndIf
Gosub跳转
转到开始
潜艇进入战场
VBScall调用find pic (0,0,1023,767," wow pic \进入战场。bmp”,0.9,jrx,jry)。
如果jrx & gt=0且jry & gt=0
移动到jrx jry
Gosub鼠标点击
延迟1000
EndIf
返回
潜艇离开了战场
VBScall调用find pic (0,0,1023,767," wow pic \离开战场。bmp”,0.9,lkx,lky)。
如果lkx & gt=0且lky & gt=0
VBS i=i+1
移动到lkx lky
Gosub鼠标点击
延迟1000
EndIf
返回
子跳跃
延迟3000
按键32 1
延迟2000年
返回
子博弈
按键18 1
延迟1000
按键115 1
延迟500
KeyUp 115 1
延迟1000
KeyUp 18 1
延迟3000
退出游戏
子鼠标点击
移动器5 5
延迟500
左键点击1
返回
子战场探测
VBScall调用find pic (0,0,1023,767," wow pic \战地图标。bmp”,0.9,tbx,tby)。
如果tbx & gt=0且tby & gt=0
移动到tbx+5 tby+5
延迟500
左键点击1
戈苏伯离开了战场
其他
Gosub寻找npc
EndIf
返回
寻找npc的潜艇
移动到0 0
按键86 1
延迟1000
VBSCall FindPic(0,0,1023,767," wowpic\npc2.bmp ",0.8,npcx,npcy)
如果npcx & gt=0且npcy & gt=0
移动到npcx-50 npcy+1
右键单击1
延迟4000
Gosub与npc对话
EndIf
返回
Sub和npc之间的对话
VBScall Find PIC (334,129,348,141," Wow PIC \我要上战场。bmp”,0.8,dhx,dhy)。
如果dhx & gt=0且dhy & gt=0
移动到110 258
[color=blue]//上面的坐标是战歌《我要上战场》的坐标点。想上大战场只需要改这个。
[/color] LeftClick 1
延迟4000
VBScall找PIC (0,0,1023,767," WOW PIC \加入战斗。bmp”,0.7,jrzdx,jrzdy)
如果jrzdx & gt=0且jrzdy & gt=0
移动到jrzdx jrzdy
左键点击1
延迟4000
其他
移到79 285
[color=blue]//上面的坐标是盆地中“我要上战场”的坐标点。
[/color] LeftClick 1
延迟4000
EndIf
VBScall找PIC (0,0,1023,767," WOW PIC \加入战斗。bmp”,0.7,jrzdx,jrzdy)
如果jrzdx & gt=0且jrzdy & gt=0
移动到jrzdx jrzdy
左键点击1
延迟4000
EndIf
按键27 1
转到开始
其他
按键27 1
延迟1000
Gosub又搜索了一遍。
EndIf
返回
潜艇再次寻找它
移动到0 0
VBS y=npcy+9
VBSCall FindPic(0,y,1023,767," wowpic\npc2.bmp ",0.8,npcx,npcy)
如果npcx & gt=0且npcy & gt=0
移动到npcx-50 npcy+1
右键单击1
延迟4000
Gosub与npc对话
EndIf
返回[/color]