[传奇脚本]GOM引擎传奇古墓一条龙爬十层个人专属副本脚本

技术员

[传奇脚本]GOM引擎传奇古墓一条龙爬十层个人专属副本脚本

使用须知：爬塔功能脚本每层需放置一个NPC，添加使用此脚本的同时设置正确地图代码。

[@main]
#act
OPENMERCHANTBIGDLG 190 792 1 4 50 -80 5 460 10
#say
\ \
<       > [地图介绍]:<不灭古墓第十层/SCOLOR=70> <个人专属副本！无需担心抢怪！/SCOLOR=254>\　\

<       > [地图怪物]:<只刷材料BOSS，击PK极高几率爆出神器材料！/SCOLOR=253>\　\

<       > [刷新时间]:<每层刷新真假专属终极BOSS！20只！必爆神器材料！/SCOLOR=70>\　\

<       > [危险指数]:<★★★★★★★★★★★★★★★！/SCOLOR=249>\　\

<       > [进入条件]:   <进入方式①|消耗10点钻石进入探险/@111>        <进入方式②|254#需消耗50枚[不灭令牌]^254#可进入探险/@2>\　\

[@111]
#if
checkGamePoint < 10
CheckRangeMonCount <$USERNAME> 55 51 60 > 0
#act
MESSAGEBOX 您的钻石数量不足，或者未清理完当前地图BOSS\\我不能放你进去，请不要来捣乱！
break

#if
checkGamePoint > 9
CheckRangeMonCount <$USERNAME> 55 51 60 = 0
#act
GamePoint - 10

CLEARITEMMAP <$USERNAME> 55 51 60
ClearMapMon <$USERNAME>
DELMIRRORMAP <$USERNAME>
AddMirrorMap D717 <$USERNAME> 不灭古墓第十层 3600 smkj333 57

mapmove <$USERNAME> 25 75
Param1 <$USERNAME>
Param2 55
Param3 51
MonGen [禁咒BOSS]·真卐不灭尸王卍假 10 0
MonGen [禁咒BOSS]·真卐不灭尸王卍假1 10 0
Param1 <$USERNAME>
Param2 65
Param3 41
MonGen [屠魔]·▇天灾卍魔皇▇·[BOSS] 1 0

CreateNPC 不灭古墓守护使者 <$USERNAME> 83 25 8 古墓顶层 1

GuildNoticeMsg 249 254 玩家【{%s|252:254}】进入【{%m|253:254}】
;SENDDELAYMSG 还剩余%s回城. 3600 255 1 @启用地图回城
#ELSEACT
MESSAGEBOX 您的条件不足，我不能放你进去，请不要来捣乱！
break



[@2]
#if
not checkitem 不灭令牌 50
CheckRangeMonCount <$USERNAME> 55 51 60 > 0
#act
MESSAGEBOX 您的令牌数量不足，或者未清理完当前地图BOSS\\我不能放你进去，请不要来捣乱！
break

#if
checkitem 不灭令牌 50
CheckRangeMonCount <$USERNAME> 55 51 60 = 0
#act
take 不灭令牌 50

CLEARITEMMAP <$USERNAME> 55 51 60
ClearMapMon <$USERNAME>
DELMIRRORMAP <$USERNAME>
AddMirrorMap D717 <$USERNAME> 不灭古墓第十层 3600 smkj333 57

mapmove <$USERNAME> 25 75
Param1 <$USERNAME>
Param2 55
Param3 51
MonGen [禁咒BOSS]·真卐不灭尸王卍假 10 0
MonGen [禁咒BOSS]·真卐不灭尸王卍假1 10 0
Param1 <$USERNAME>
Param2 65
Param3 41
MonGen [屠魔]·▇天灾卍魔皇▇·[BOSS] 1 0

CreateNPC 不灭古墓守护使者 <$USERNAME> 83 25 8 古墓顶层 1

GuildNoticeMsg 249 254 玩家【{%s|252:254}】进入【{%m|253:254}】
;SENDDELAYMSG 还剩余%s回城. 3600 255 1 @启用地图回城
#ELSEACT
MESSAGEBOX 您的条件不足，我不能放你进去，请不要来捣乱！
break


[@启用地图回城]
#IF
#ACT
movr P15 108 130
movr P16 86 108
mapmove xtc <$str(p15)> <$str(p16)>
CLEARDELAYGOTO 1
BREAK