GOM引擎比武擂台带观战脚本「完整版」

(@@InPutString @@InPutInteger )

[@main]
#IF
#act
OPENMERCHANTBIGDLG 9 202 1 4 65 1 1 397 12
#say
\ \ \
\ \                      <★★★绝仙门—长久激情★★★/AUTOCOLOR=250,251,168,191,254,70,249,253>\
\  <----------------------------------------------------------------/FCOLOR=14>\
<>          <T><【当前擂主】:/SCOLOR=254><$GLOBAL(摆擂玩家)>             <K><【当前擂台奖金】:/SCOLOR=250><$GLOBAL(摆擂奖金)>天神币\  
\  <----------------------------------------------------------------/FCOLOR=14>\
<>       <E><【开设擂台√】/@@InPutInteger2(请输入本次擂台奖金：)>       <F><【挑战擂主√】/@打擂>       <G><【进入观战√】/@进入观战>\
\  <----------------------------------------------------------------/FCOLOR=14>\
<>                            <＄><【取消摆擂√】/@取消摆擂>\
\  <----------------------------------------------------------------/FCOLOR=14>\
<>       <※><重要提示：无人接擂时请点击【取消摆擂】取回擂台奖金！！！/SCOLOR=249>\
<>       <※><重要提示：无人接擂时请点击【取消摆擂】取回擂台奖金！！！/SCOLOR=249>\
<>       <※><重要提示：无人接擂时请点击【取消摆擂】取回擂台奖金！！！/SCOLOR=249>\



[@取消摆擂]
#IF
CHECKVAR GLOBAL 是否打擂 = 1
#ACT
MESSAGEBOX \　\打雷期间无法取回擂台赌金！
BREAK

#IF
CHECKVAR GLOBAL 摆擂玩家 = <$USERNAME>
#ACT
CALCVAR GLOBAL 摆擂玩家 =
GAMEGLORY + <$GLOBAL(摆擂奖金)>
CALCVAR GLOBAL 摆擂奖金 = 0
MoveMapPlay 独家擂台2 3 308 308
MESSAGEBOX \　\摆擂取消！您赎回了擂台赌金！
#ELSEACT
MESSAGEBOX \　\您不是擂主，无法取回！
BREAK

[@进入观战]
#IF
RANDOM 4
#ACT
KILLSLAVE
MAPMOVE 独家擂台2 42 30
break

#IF
RANDOM 3
#ACT
KILLSLAVE
MAPMOVE 独家擂台2 33 40
break

#IF
RANDOM 2
#ACT
KILLSLAVE
MAPMOVE 独家擂台2 43 40
break

#IF
RANDOM 1
#ACT
KILLSLAVE
MAPMOVE 独家擂台2 33 30
break


[@打擂]
#IF
CHECKVAR GLOBAL 摆擂玩家 = <$USERNAME>
#ACT
MESSAGEBOX  \　\不能挑战自己！
BREAK


#IF
CHECKVAR GLOBAL 是否打擂 = 1
#ACT
MESSAGEBOX  \　\提示:已经有人打擂了...
BREAK


#IF
CHECKVAR GLOBAL 摆擂玩家 =
#ACT
MESSAGEBOX \　\提示:目前没有擂主，请先开设擂台！
BREAK

#if
large G270 0
#act
messagebox \　\【提示】:\　\擂台刚刚结束！擂主需要休息10秒缓冲技能！请<$str(G270)>秒后进入！
break

#IF
CHECKVAR GLOBAL 摆擂奖金 > 0
CHECKGAMEGLORY > <$GLOBAL(摆擂奖金)>
#ACT
CALCVAR GLOBAL 是否打擂 = 1
CALCVAR GLOBAL 打擂玩家 = <$USERNAME>
MapMove 独家擂台2 38 33
MOV S3 <$GLOBAL(摆擂玩家)>
MOV N29 180
SENDDELAYMSG 擂台比赛倒计时%s 180 254 1 @擂台结束
<$GLOBAL(摆擂玩家)>.SENDDELAYMSG 擂台比赛倒计时%s 180 254 1 @擂台结束
SetHumAttackMode 0 9999
ChangeModeEx 1 1
SetOnTimer 26 1
GAMEGLORY - <$GLOBAL(摆擂奖金)>
CALCVAR GLOBAL 摆擂奖金 + <$GLOBAL(摆擂奖金)>
KILLSLAVE
GuildNoticeMsg 0  146  玩家【%s】接受打擂...成王败寇，拭目以待...
GuildNoticeMsg 0  146  玩家【%s】接受打擂...成王败寇，拭目以待...
GuildNoticeMsg 0  146  玩家【%s】接受打擂...成王败寇，拭目以待...
SetHumAttackMode 0 5
#elseact
MESSAGEBOX  \　\提示:你的天神币不足<$GLOBAL(摆擂奖金)>个，无法挑战擂主！
BREAK

[@InPutInteger2]
#IF
CHECKVAR GLOBAL 摆擂玩家 =
#ACT
#ELSEACT
MESSAGEBOX  \　\提示:现在已经有人在摆擂了...您可以直接进去挑战他！
BREAK

#IF
SMALL N2 1
#ACT
MESSAGEBOX  \　\提示:最少需要1天神币！
BREAK

#IF
LARGE N2 10000000
#ACT
MESSAGEBOX  \　\提示:最高只能1千万天神币！
BREAK

#IF
CHECKGAMEGLORY > <$STR(N2)>
#ACT
KILLSLAVE
GAMEGLORY - <$STR(N2)>
MapMove 独家擂台2 38 33
SetHumAttackMode 0 9999
ChangeModeEx 1 1
SetOnTimer 25 1
CALCVAR GLOBAL 摆擂玩家 = <$USERNAME>
CALCVAR GLOBAL 摆擂奖金 = <$STR(N2)>
SetHumAttackMode 0 5
GuildNoticeMsg 0  146  玩家【%s】使用【<$GLOBAL(摆擂奖金)>】天神币摆设擂台！等你来战！
GuildNoticeMsg 0  146  玩家【%s】使用【<$GLOBAL(摆擂奖金)>】天神币摆设擂台！等你来战！
GuildNoticeMsg 0  146  玩家【%s】使用【<$GLOBAL(摆擂奖金)>】天神币摆设擂台！等你来战！
#elseact
MESSAGEBOX  \　\提示:你的人民币不足<$STR(N2)>天神币，无法开设擂台！
BREAK

游客，如果您要查看本帖隐藏内容请回复

: GOM引擎比武擂台带观战脚本「完整版」 [修改]

支持支持支持

支持支持支持
看起来很棒

RE: GOM引擎比武擂台带观战脚

精美比武擂台地图素材

111111111111111111111111111

看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看看

参与/回复主题关闭
RE: GOM引擎比武擂台带观战脚本「完整

阿斯达撒大声地