多地图循环挂机脚本（多地图挂机视频教学）
多地图循环挂机脚本（多地图挂机视频教学）
VBS Dim Xin(100),Yin(100),I,MM,P
//如果记录坐标大于100，拿你就只有自己修改
VBS Dim Memx,Memy
VBS Xin,Yin,BB,Bang
VBS ScreenX,ScreenY
//声明变量
VBS Memx=横坐标内存地址:MemY=纵坐标内存地址
VBSCall Call GetScreenResolution(ScreenX,ScreenY)
VBS set Obj = createobject("WScript.Shell")
//*****--------记录坐标---------*****
VBS I=1
While I0
VBSCall Obj.Popup("请按F5记录第"I"个挂机点，记录完老后按F6。",3,"3秒后窗口自动关闭",0)
//Rem 记录窗口句柄
WaitKey MM
If MM=116
VBSCall ReadMemory( Memx,1,Xin(I))
VBSCall ReadMemory( Memy,1,Yin(I))
//读当前的坐标，你也可以用子程序，也可用验证码方式识别坐标子程序
EndIf
If MM=117
VBSCall Obj.Popup("您一共记录"I"个挂机点",3,"3秒后窗口自动关闭",0)
Goto 主程序开始
//这里跳出循环
EndIf
VBS I=I+1
EndWhile
Rem 主程序开始
Gosub 边跑边打
Goto 主程序开始
Sub 读取坐标内存地址
VBSCall ReadMemory( Memx,1,Xin)
//读取游戏坐标内存地址中的横坐标的值保存到Xin
VBSCall ReadMemory( Memy,1,Yin)
//读取游戏坐标内存地址中的纵坐标的值保存到Yin
Return 读取坐标内存地址
Sub 边跑边打
VBS P=I:I=1
While IP+1
Rem 开始范围移动
Gosub 读取坐标内存地址
VBS BB=((Xin(I)-Xin)^2+(Yin(I)-Yin)^2)^0.5
///用勾股定理计算和目标位置有多远,BB为和目标位置的直线差.
If BB6
///如果和目标位置差距是大于6
VBS Bang=200/BB
///把你的鼠标移动范围限制在半径200的圆以内
/////这里这步很重要,不然你点到的始终是屏幕的最边缘.
VBS XX=(Xin(I)-Xin)*Bang:YY=(Yin(I)-Yin)*Bang
/////利用相似三角形算出鼠标点击的位置
MoveTo ScreenX/2+XX ScreenY/2+YY
LeftClick 1
Delay 400
Gosub 打怪
Goto 开始范围移动
EndIf
VBS I=I+1
EndWhile
Return 边跑边打
Sub 打怪
//打怪内容你自己写老蛮，我只提供下思路
Return 打怪
简单挂录制进多个地图的方法：1、在脚本开头，通过设置对应的地图编号给每个地图；2、通过自己控制$地图选择这个变量，来选择要进入的地图；3、出发之前调用这个变量，以确认需要进入的地图。
简单挂录制进多个地图，方便后期的修改以及维护。
简单挂独特之处在于,挂机脚本不需要繁琐的手动去写代码,只需要把进地图的过程录制下来,便可以实现全自动的循环挂机。
经常我们在游戏中能遇到这样的情况，就是点击一个进入地图的NPC后，对话框中有很多选项，我们可以选择不止1个以上的地图，但是这些地图有个共同点。1、基本都是处于同一个阶段的地图；2、地图的地图编号一样。于是，我们在编写天骥脱机脚本的时候，难免会遇到这样的问题，通常我们说的一个脚本一个地图，那么如果都是差不多的地图，还要准备好几个脚本，是不是显得有些不方便呢？今天在这里，天骥官网就给大家带来一种独特的脚本模式，一个脚本进入多个地图。
符合制作这类脚本的地图需具备的一个重要前提是，我们对这个地图的需求，即捡的东西，回收的东西，必须一致。这样我们可以把多个地图整合，方便后期的修改以及维护。下面我们来说说一个脚本多个地图的方法：
1、在脚本开头，通过设置对应的地图编号给每个地图；
2、通过自己控制 $地图选择 这个变量，来选择要进入的地图；
3、出发之前调用这个变量，以确认需要进入的地图。
下面我们就迫不及待来看看吧！！！
★欢迎使用饿狼独家多地图判断功能★
$地图1=古老埃及 $地图2=玫瑰庄园 $地图3=王者天下 $地图4=天上人间
$地图5=勋章之地 $地图6=四个包厢 $地图7=散人天堂 $地图8=天下神殿
$地图9=蛮荒之地 $地图10=降龙禁地 $地图11=毁灭狂暴城
============================================================
★请根据以上需要，选择要挂机的地图，填写对应编号★
$挂机地图=6
系统显示[ ╭══════════════════╮]
系统显示[ ║┠精┨ ┠品┨ ┠脚┨ ┠本┨ ║]
系统显示[ ║ ¤╭⌒╮╭⌒╮练级打装备 ║]
系统显示[ ║ ╱◥██◣ ╭⌒╮挂机打元宝 ║]
系统显示[ ║︱田︱田田| ╰ ¤ 游戏伴侣 ║]
系统显示[ ║各种外挂，QQ:9857223 ║]
系统显示[ ║╬╬╬╬╬╬╬╬╬╬╬╬╬╬ ║]
系统显示[ ╰══════════════════╯]
系统显示[┏┯┓┏┯┓┏┯┓┏┯┓┏┯┯┯┯┯┯┯┯┯┯┯┓]
系统显示[┠游┨┠戏┨┠愉┨┠快┨┠唯一售后QQ：9857223 ┨]
系统显示[┗┷┛┗┷┛┗┷┛┗┷┛┗┷┷┷┷┷┷┷┷┷┷┷┛]
系统显示[╔┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╗]
系统显示[┆专业解决各种传奇私服挂机问题，脚本、策略、插件┆]
系统显示[╚┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄┄╝]
系统显示[┏┄┄┄┄┄┄┄┄┄┓┏┄┄┄┄┄┄┄┄┄┄┄┄┓]
系统显示[┠ 2年品质，信誉第一┨┠作者【饿狼】 QQ:9857223 ┨]
系统显示[┗┄┄┄┄┄┄┄┄┄┛┗┄┄┄┄┄┄┄┄┄┄┄┄┛]
触发器:卡位了,开启智能调整功能
跳转到飞随机
触发器结束
触发器:NPC[*]找不到
小退[5]
触发器结束
触发器:在坐标[*]不存在NPC
跳转到NPC出现
触发器结束
触发器:指定的地图不可到达
跳转到回城
触发器结束
触发器:你的宝宝被*杀害了
使用技能[召唤神兽]
触发器结束
触发器:你被*杀害了
小退[2]
触发器结束
触发器:数十年一度，出现在海底遗迹深处冥府的王者，冥海龙女出现在
跳转到战斗
触发器结束
触发器:*←全服召唤系统
跳转到战斗
触发器结束
$职业=[自己][职业]
$等级=[自己][等级]
$性别=[自己][性别]
$防御=[自己][防御]
$魔御=[自己][魔御]
$攻击=[自己][攻击]
$魔法=[自己][魔法]
$道术=[自己][道术]
$血量=[自己][血量]
$魔力=[自己][魔力]
$经验=[自己][经验]
$背包=[自己][背包]
$负重=[自己][负重]
$腕力=[自己][腕力]
$命中=[自己][命中]
$躲避=[自己][躲避]
$武器=[自己][武器][名称]
$衣服=[自己][衣服][名称]
$头盔=[自己][头盔][名称]
$项链=[自己][项链][名称]
$马牌=[自己][马牌][名称]
$左手镯=[自己][左手镯][名称]
$右手镯=[自己][右手镯][名称]
$左戒指=[自己][左戒指][名称]
$右戒指=[自己][右戒指][名称]
$毒符=[自己][毒符][名称]
$腰带=[自己][腰带][名称]
$靴子=[自己][靴子][名称]
$宝石=[自己][宝石][名称]
-------------------------自定义区开始----------------------
$v="QQ9857223(饿狼)"
$药品名称="疗伤药"
$药品名称包="疗伤药包"
$红毒名称="黄色药粉(大量)"
$绿毒名称="灰色药粉(大量)"
$符名称="护身符(大)"
$符名称包="打捆护身符"
$个=个
*************************************************
*请根据地图情况设置自动更换的装备*QQ9857223*饿狼*
*************************************************
$自动装备=1
$挂机武器=""
$挂机衣服男=""
$挂机衣服女=""
$挂机头盔=""
$挂机项链=""
$挂机勋章=""
$挂机手镯=""
$挂机戒指=""
$挂机腰带=""
$挂机靴子=""
$挂机宝石=""
*****************************************
$新手武器="银蛇"
$新手衣服男="灵魂战衣(男)"
$新手衣服女="灵魂战衣(女)"
$新手头盔="道士头盔"
$新手项链="竹笛"
$新手勋章=""
$新手手镯="道士手镯"
$新手戒指="降妖除魔戒指"
$新手腰带=""
$新手靴子=""
$新手宝石=""
*****************************************
*请根据需要设置下面的参数*QQ9857223*饿狼*
*****************************************
$自动找怪=1
-------------------------自定义区结束----------------------
全局脚本开始
IF [当前地图名]=3 || [当前地图名]=0159
跳转到回城
ENDIF
IF [1元宝][数量]0
使用[1元宝]
ENDIF
IF [2元宝][数量]0
使用[2元宝]
ENDIF
IF [5元宝][数量]0
使用[5元宝]
ENDIF
IF [10元宝][数量]0
使用[10元宝]
ENDIF
IF [50元宝][数量]0
使用[50元宝]
ENDIF
IF [100元宝][数量]0
使用[100元宝]
ENDIF
如果[回城卷][数量]0
那么丢弃[回城卷]
如果[随机传送石][数量]1
那么丢弃[随机传送石]
如果[盟重传送石][数量]1
那么丢弃[盟重传送石]
如果[金创药(小量)][数量]0
那么使用[金创药(小量)]
如果[魔法药(小量)][数量]0
那么使用[魔法药(小量)]
如果[金创药(中量)][数量]0
那么使用[金创药(中量)]
如果[魔法药(中量)][数量]0
那么使用[魔法药(中量)]
如果[强效金创药][数量]0
那么使用[强效金创药]
如果[强效魔法药][数量]0
那么使用[强效魔法药]
如果[强效太阳水][数量]0
那么使用[强效太阳水]
如果[金砖][数量]0
那么使用[金砖]
如果[金条][数量]0
那么使用[金条]
如果[木剑][数量]0
那么丢弃[木剑]
如果[布衣(男)][数量]0
那么丢弃[布衣(男)]
如果[布衣(女)][数量]0
那么丢弃[布衣(女)]
如果[$新手武器][数量]0
那么丢弃[$新手武器]
如果[$新手衣服男][数量]0
那么丢弃[$新手衣服男]
如果[$新手衣服女][数量]0
那么丢弃[$新手衣服女]
如果[$新手头盔][数量]0
那么丢弃[$新手头盔]
如果[$新手项链][数量]0
那么丢弃[$新手项链]
如果[$新手勋章][数量]0
那么丢弃[$新手勋章]
如果[$新手手镯][数量]0
那么丢弃[$新手手镯]
如果[$新手戒指][数量]0
那么丢弃[$新手戒指]
如果[$新手腰带][数量]0
那么丢弃[$新手腰带]
如果[$新手靴子][数量]0
那么丢弃[$新手靴子]
如果[$新手宝石][数量]0
那么丢弃[$新手宝石]
IF [自己][包裹空位]6
系统显示[★★★★★准备在线回收物品★★★★★]
跳转到在线售物
ENDIF
IF [自己][所有方向][怪物数量][13格]0 [当前地图名]3 $自动找怪=1
$上次看到=[当前时间]
ENDIF
IF[当前时间]-$上次看到=18000 [当前地图名]=$挂机地图 $自动找怪=1
$上次看到=[当前时间]
系统显示[*****怎么都没怪，飞去找找*****]
跳转到飞随机
ENDIF
IF [自己][被PK]=1
系统显示[**********妈的有人P我，我闪**********]
ENDIF
IF [自己][HP][自己][MAXHP]*20/100
系统显示[**********生命值严重不足，回城逃命**********]
跳转到回城
ENDIF
IF [自己][HP][自己][MAXHP]*40/100
系统显示[**********没血了，先飞个随机**********]
跳转到飞随机
ENDIF
IF [自己][状态][开盾]=0 [自己][职业]=法师
系统显示[**********终极防御：四级魔法盾**********]
使用技能[四级魔法盾]
ENDIF
IF [$药品名称包][数量]0 [$药品名称][数量]1 [背包空位]5
使用[$药品名称包]
ENDIF
IF [$药品名称包][数量]1 [$药品名称][数量]1
跳转到买药
ENDIF
IF [$符名称包][数量]0 [$符名称][数量]1 [背包空位]5
使用[$符名称包]
ENDIF
IF [自己][职业]=道士 [$符名称包][数量]1 [$符名称][数量]1 [护身符][数量]1
跳转到买符
ENDIF
IF [自己][职业]=道士 [$红毒名称][数量]1 [黄色药粉(少量)][数量]1
跳转到买黄毒
ENDIF
IF [自己][职业]=道士 [$绿毒名称][数量]1 [灰色药粉(少量)][数量]1
跳转到买灰毒
ENDIF
IF {[自己][武器][持久]=[自己][武器][最大持久]*50/100 [自己][武器][名称]""}||{[自己][衣服][持久]=[自己][衣服][最大持久]*50/100 [自己][衣服][名称]""}||{[自己][头盔][持久]=[自己][头盔][最大持久]*40/100 [自己][头盔][名称]""}||{[自己][项链][持久]=[自己][项链][最大持久]*40/100 [自己][项链][名称]""}||{[自己][马牌][持久]=[自己][马牌][最大持久]*40/100 [自己][马牌][名称]""}||{[自己][左手镯][持久]=[自己][左手镯][最大持久]*40/100 [自己][左手镯][名称]""}||{[自己][右手镯][持久]=[自己][右手镯][最大持久]*40/100 [自己][右手镯][名称]""}||{[自己][左戒指][持久]=[自己][左戒指][最大持久]*40/100 [自己][左戒指][名称]""}||{[自己][右戒指][持久]=[自己][右戒指][最大持久]*40/100 [自己][右戒指][名称]""}||{[自己][腰带][持久]=[自己][腰带][最大持久]*40/100 [自己][腰带][名称]""}||{[自己][靴子][持久]=[自己][靴子][最大持久]*40/100 [自己][靴子][名称]""} || {[自己][宝石][持久]=[自己][宝石][最大持久]*40/100 [自己][宝石][名称]""}
系统显示[**********有装备持久不足修一下**********]
等待[300]毫秒
跳转到修装备
ENDIF
IF [自己][武器][名称]$挂机武器 [$挂机武器][数量]0 $自动装备=1
装备[$挂机武器]到[武器]
ENDIF
IF [自己][衣服][名称]$挂机衣服男 [$挂机衣服男][数量]0 [自己][性别]=男 $自动装备=1
装备[$挂机衣服男]到[衣服]
ENDIF
IF [自己][衣服][名称]$挂机衣服女 [$挂机衣服女][数量]0 [自己][性别]=女 $自动装备=1
装备[$挂机衣服女]到[衣服]
ENDIF
IF [自己][头盔][名称]$挂机头盔 [$挂机头盔][数量]0 $自动装备=1
装备[$挂机头盔]到[头盔]
ENDIF
IF [自己][项链][名称]$挂机项链 [$挂机项链][数量]0 $自动装备=1
装备[$挂机项链]到[项链]
ENDIF
IF [自己][马牌][名称]$挂机勋章 [$挂机勋章][数量]0 $自动装备=1
装备[$挂机勋章]到[马牌]
ENDIF
IF [自己][左手镯][名称]$挂机手镯 [$挂机手镯][数量]0 $自动装备=1
装备[$挂机手镯]到[左手镯]
ENDIF
IF [自己][右手镯][名称]$挂机手镯 [$挂机手镯][数量]0 $自动装备=1
装备[$挂机手镯]到[右手镯]
ENDIF
IF [自己][左戒指][名称]$挂机戒指 [$挂机戒指][数量]0 $自动装备=1
装备[$挂机戒指]到[左戒指]
ENDIF
IF [自己][右戒指][名称]$挂机戒指 [$挂机戒指][数量]0 $自动装备=1
装备[$挂机戒指]到[右戒指]
ENDIF
IF [自己][腰带][名称]$挂机腰带 [$挂机腰带][数量]0 $自动装备=1
装备[$挂机腰带]到[腰带]
ENDIF
IF [自己][靴子][名称]$挂机靴子 [$挂机靴子][数量]0 $自动装备=1
装备[$挂机靴子]到[靴子]
ENDIF
IF [自己][宝石][名称]$挂机宝石 [$挂机宝石][数量]0 $自动装备=1
装备[$挂机宝石]到[宝石]
ENDIF
如果[自己][所有方向][怪物数量][3格]8
那么拣物开启
否则拣物关闭
全局脚本结束
挂机脚本开始
IF [当前地图名]3
跳转到战斗
ELSE
跳转到回城
ENDIF
回城
IF [盟重传送石][数量]1
说话[@商铺购买 盟重传送石]
等待[1000]毫秒
ENDIF
使用[盟重传送石]
等待[2000]毫秒
关闭全局脚本
躲避PKER关闭
停止战斗
穿怪开启
穿人开启
停止挖矿
$买药=0
$买随机=0
IF [3,330,330][距离]100
走到附近[3,330,330]
ENDIF
总控
系统显示[$v ----------开始处理土城事项----------$v ]
IF [待存物品][数量]0
调用自动存物
ENDIF
IF [待售物品][数量]0
调用自动售物
ENDIF
IF [盟重传送石][数量]1
说话[@商铺购买 盟重传送石]
ENDIF
IF [随机传送石][数量]1
说话[@商铺购买 随机传送石]
ENDIF
IF [自己][HP][自己][MAXHP]*80/100
系统显示[$v ----------还很虚弱,休息一会再去----------$v ]
调用回血回蓝
ENDIF
出发
系统显示[$v ----------接到主人命令前往挂机地图----------$v ]
调用地图选择
等待[100]毫秒
系统显示[$v ----------启奏皇上,我到挂机地图了----------$v ]
使用[随机传送石]
战斗
开启全局脚本
躲避PKER开启
穿人关闭
穿怪关闭
跳转到$_当前地图
k001
系统显示[→→→→→正在古老埃及战斗中←←←←←←]
开始战斗
跳转到战斗
GA0
系统显示[→→→→→正在玫瑰庄园战斗中←←←←←←]
开始战斗
跳转到战斗
F011
系统显示[→→→→→正在王者天下战斗中←←←←←←]
开始战斗
跳转到战斗
N114
系统显示[→→→→→正在天上人间战斗中←←←←←←]
开始战斗
跳转到战斗
G011
系统显示[→→→→→正在勋章之地战斗中←←←←←←]
开始战斗
跳转到战斗
H204
系统显示[→→→→→正在四格 $fj 号房间战斗中←←←←←←]
开始战斗
跳转到战斗
63
系统显示[→→→→→正在散人天堂战斗中←←←←←←]
开始战斗
跳转到战斗
L001
系统显示[→→→→→正在天下神殿战斗中←←←←←←]
开始战斗
跳转到战斗
65
系统显示[→→→→→正在蛮荒之地战斗中←←←←←←]
开始战斗
跳转到战斗
R001
系统显示[→→→→→正在降龙禁地战斗中←←←←←←]
开始战斗
跳转到战斗
M100
系统显示[→→→→→正在毁灭狂暴城战斗中←←←←←←]
开始战斗
跳转到战斗
0159
跳转到回城
3
跳转到回城
0
跳转到回城
在线存物
自动存物
在线售物
刷新包裹
系统显示[$v ----------包裹中有装备可以回收(在线)----------$v ]
说话[@服务]
等待[500]毫秒
后门命令[@在线回收]
IF [待售祖玛][数量]0
系统显示[**********祖玛回收**********]
后门命令[@祖玛回收]
刷新包裹
ENDIF
IF [待售赤月][数量]0
系统显示[**********赤月回收**********]
后门命令[@赤月回收]
刷新包裹
ENDIF
IF [待售精品][数量]0
系统显示[**********精品回收**********]
后门命令[@精品回收]
刷新包裹
ENDIF
IF [待售天下][数量]0
系统显示[**********天下回收**********]
后门命令[@天下回收]
刷新包裹
ENDIF
IF [待售毁灭][数量]0
系统显示[**********毁灭回收**********]
后门命令[@毁灭回收]
刷新包裹
ENDIF
等待[1000]毫秒
系统显示[$v ----------(在线)回收完毕！----------$v ]
刷新包裹
刷新包裹
跳转到战斗
挂王
开始巡逻[]
设定巡逻地图["武陵西境"]
开始巡逻[2,0]
换线[]
设定巡逻地图["会稽西境"]
开始巡逻[3,0]
等待毫秒[8000]
重新开始
脚本结束
我自己也才玩，正乱设置看看呢
