您当前的位置:首页 > 传奇技术

GOM引擎比武擂台脚本,传奇一条龙开区时添加擂台比武功能说明

本文出处:网游动力作者:本站发布时间:2019-08-21阅读次数:
(@@InPutString @@InPutInteger )
[@main]

#IF
EQUAL A40
#ACT
MOV S$擂主 无人
#ELSEACT
MOV S$擂主 <$STR(A40)>

#IF
#ACT
OPENMERCHANTBIGDLG 113 27 1 4 -30 -100 1 435 20
#SAY
\ \ \ \ \ \ \ \ \ \ \

<>                    <单人露天比武擂台激情刺激你可以邀请你要想比武的玩家/SCOLOR=251>\
<>                        <上台与你比武,谁赢了谁就获得所押人民币点/SCOLOR=251>\
<>                <比武中不允许使用药品以及任何作弊行为,比武时间:/SCOLOR=251><不死不休/SCOLOR=249> \
<>             <擂台上无法使用回城,随即,死亡之眼,冰霜群雨.观战席无法攻击,释放魔法/SCOLOR=251>\
<>                          <提示:小退,大退,掉线将直接判定输方/SCOLOR=253>  \ \ \

<>                       <开设擂台/@开设擂台>      <我要打擂/@挑战擂主>     <进入观战/@观看打擂>    \ \ \ \ \
<>                         <擂主名字:/SCOLOR=116><$STR(S$擂主)>        <摆擂人民币:/SCOLOR=116><$STR(G41)>\ \
<>                         \ \ \
[@开设擂台]
#IF
EQUAL G40 0
#ACT
OPENMERCHANTBIGDLG 113 27 1 4 -30 -100 1 435 20
#SAY
\ \ \ \ \ \ \ \ \ \ \

<>                    <单人露天比武擂台激情刺激你可以邀请你要想比武的玩家/SCOLOR=251>\
<>                        <上台与你比武,谁赢了谁就获得所押人民币点/SCOLOR=251>\
<>                <比武中不允许使用药品以及任何作弊行为,比武时间:/SCOLOR=251><不死不休/SCOLOR=249> \
<>             <擂台上无法使用回城,随即,死亡之眼,冰霜群雨.观战席无法攻击,释放魔法/SCOLOR=251>\
<>                          <提示:小退,大退,掉线将直接判定输方/SCOLOR=253>  \ \ \

<>                                 <请输入打擂的人民币点数量{FCOLOR=223}/@@InPutInteger11>    \ \
<>                              <擂台押金需要在1-100人民币点之间/SCOLOR=146>    \ \
#ACT
#ELSESAY
\ \ \ \ \

<>                  <已经有人提出了打擂申请,或者有人正在打擂/SCOLOR=251>\




[@InPutInteger11]
#IF
LARGE N11 100
#ACT
MESSAGEBOX 错误:\输入的人民币点大于100,不能摆擂。\
BREAK

#IF
SMALL N11 1
#ACT
MESSAGEBOX 错误:\输入的人民币点小于1,不能摆擂。\
BREAK


#IF
CHECKGAMEPOINT < <$STR(N11)>
#ACT
MESSAGEBOX 错误:\你身上的人民币点不足<$STR(N11)>点,不能摆擂。\
BREAK


#IF
LARGE G40 0
#ACT
MESSAGEBOX 错误:\现在正在有人提交打擂申请,请稍候再提交!\
BREAK

#ELSEACT
GAMEPOINT - <$STR(N11)>
;挑战与应战人数
MOV G40 1
;挑战元宝数
MOV G41 <$STR(N11)>
;擂主名字
MOV A40 <$USERNAME>
MAPmove leitai 17 17
GuildNoticeMsg 0  254 玩家【<$STR(A40)>】使用【<$STR(G41)>】人民币点成功摆擂!勇士们速度前往挑战擂台!
GuildNoticeMsg 0  254 玩家【<$STR(A40)>】使用【<$STR(G41)>】人民币点成功摆擂!勇士们速度前往挑战擂台!
SENDMOVEMSG 0 254 0 200 2 玩家【<$STR(A40)>】使用【<$STR(G41)>】人民币点成功摆擂!勇士们速度前往挑战擂台!
BREAK


[@IsInFilterList]
#ACT
MESSAGEBOX 输入数据中包含了非法字符,请重新编辑!

[@挑战擂主]
#IF
EQUAL A40 <$USERNAME>
#ACT
MESSAGEBOX 你是擂主,不能挑战自己!
Break

#IF
EQUAL G40 0
#ACT
MESSAGEBOX ぐ目前还没有玩家摆设擂台,无法进入观战!
Break

#IF
LARGE G40 1
#ACT
MESSAGEBOX ぐ目前已有人应战,无法应战!
Break

#IF
EQUAL G40 1
#ACT
GOTO @确定挑战




[@确定挑战]
#IF
CHECKGAMEPOINT < <$STR(G41)>
#ACT
MESSAGEBOX 擂台摆擂人民币<$STR(G41)>,你的人民币不够,无法应战!
Break

#IF
LARGE G432 0
#ACT
MESSAGEBOX 擂主处于胜利休息时间,休息时间剩余<$STR(G432)>秒!
Break

#IF
LARGE G40 1
#ACT
MESSAGEBOX 你动作太慢了\ぐ目前已有人应战,无法应战!
Break

#ELSEACT
GAMEpoint - <$STR(G41)>
MAPmove leitai 22 17
MOV G40 2
;挑战元宝数+应战
INC G41 <$STR(G41)>
;擂主名字
MOV A41 <$USERNAME>
GuildNoticeMsg 0  254 玩家【<$STR(A41)>】成功接受打擂...成王败寇,大家都去围观吧...
GuildNoticeMsg 0  254 玩家【<$STR(A41)>】成功接受打擂...成王败寇,大家都去围观吧...  
Break



[@观看打擂]
#IF
EQUAL G40 0
#ACT
MESSAGEBOX ぐ目前还没有玩家摆设擂台,无法进入观战!
Break
#ELSEACT
ChangeModeEx 9 65535
MAPmove leitai 13 17
Break