GOM引擎比武擂台脚本，传奇一条龙开区时添加擂台比武功能说明
(@@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 0254 玩家【<$STR(A40)>】使用【<$STR(G41)>】人民币点成功摆擂！勇士们速度前往挑战擂台！
GuildNoticeMsg 0254 玩家【<$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 0254 玩家【<$STR(A41)>】成功接受打擂...成王败寇，大家都去围观吧...
GuildNoticeMsg 0254 玩家【<$STR(A41)>】成功接受打擂...成王败寇，大家都去围观吧...
Break
[@观看打擂]
#IF
EQUAL G40 0
#ACT
MESSAGEBOX ぐ目前还没有玩家摆设擂台,无法进入观战！
Break
#ELSEACT
ChangeModeEx 9 65535
MAPmove leitai 13 17
Break
页:
[1]