[Gm版本库]传奇全服挑战系列脚本

[复制链接]
查看3341 | 回复0 | 2012-5-26 00:38:26 | 显示全部楼层 |阅读模式
(@@InPutString @@InPutInteger )

[@main]
<你是找人来激情;还是寻求帮助呢?找我你就找对人了/SCOLOR=250>\  \
<给我20000元宝我就能为你在全服叫阵一次!/SCOLOR=253> \  \
<给我20000元宝我就可以为你放出行会支援令!/SCOLOR=250>        <返回盟重/@盟重>\ \
<给我20000元宝我就可以为你放出全服激情令!/SCOLOR=254>        <关    闭/@EXIT> \  \
<发布个人叫阵/@叫阵>    <发布行会支援令/@行会>     <发布全服激情令/@全服>\ \  


[@叫阵]
#IF
checkgamegold > 19999
#SAY
<请你输入被挑战人的名字,然后输入一段挑战内容/SCOLOR=250>\
<如果被挑战人在线,他(她)就会收到您的挑战信息/SCOLOR=253>\
<如果对方不在线,您的挑战自动取消!/SCOLOR=250>\ \
<请输入被挑战人的名字/@@InPutString52>\ \
#ACT
BREAK
#ELSEACT
MESSAGEBOX 你有足够的元宝吗?
BREAK

[@CallInPutString52]
#IF
CheckOnline <$STR(S52)>
#SAY
您输入的名字为[{<$STR(S52)>/SCOLOR=254}]:<对方此时正在线/SCOLOR=253>\
您现在发布挑战申请,对方会及时的收到您的信息!\
核对内容无误后请\ \
<输入个人挑战内容/@@InPutString53>
#ELSESAY
您输入的名字为[{<$STR(S52)>/SCOLOR=254}]:<对方此时已离线/SCOLOR=252>\ \ \
<确定/@EXIT>

[@CallInPutString53]
<您输入的挑战申请内容为:/SCOLOR=250>\ \
{<$STR(S53)>/SCOLOR=250}\ \
<核对内容无误后请点击/SCOLOR=253>\ \
<确定发布/@确定发布4>   挑战申请 \



[@确定发布4]
#IF
#ACT
gamegold - 20000
MOV A102 <$STR(S53)>
MOV A103 <$USERNAME>
HCall <$STR(S52)> @发布个人叫阵
BREAK
#ELSEACT
MESSAGEBOX 你有足够的元宝吗
close
BREAK

[@叫阵1]
#IF
checkgamegold > 4999
#ACT
gamegold - 5000
SENDMSG 0 【<$USERNAME>】说:不要迷恋哥,哥只是个传说!哥在激情殿堂!江湖都有哥的传说!哥杀的不是人!是畜生!世上本没有哥,死在哥刀下的人多了,就开始出现了哥!!
SENDMSG 0 【<$USERNAME>】说:不要迷恋哥,哥只是个传说!哥在激情殿堂!江湖都有哥的传说!哥杀的不是人!是畜生!世上本没有哥,死在哥刀下的人多了,就开始出现了哥!!
goto @main
BREAK
#ELSEACT
MESSAGEBOX 你有足够的元宝吗?还是您没有加入任何行会?
BREAK
                          


[@行会]
#IF
HaveGuild
checkgamegold > 19999
#ACT
gamegold - 20000
MOV A99 <$GUILDNAME>
MOV A98 <$USERNAME>
Gmexecute 开始提问 @行会支援令
SENDMSG 7 行会支援令已放出,请等待你的援军!
SENDMSG 7 行会支援令已放出,请等待你的援军!
SENDMSG 7 行会支援令已放出,请等待你的援军!
BREAK
#ELSEACT
MESSAGEBOX 你有足够的元宝吗?还是您没有加入任何行会?
BREAK


[@全服]
#IF
checkgamegold > 19999
#ACT
gamegold - 20000
MOV A93 <$USERNAME>
Gmexecute 开始提问 @全服激情令
SENDMSG 7 全服激情令已放出,请等待激情的降临!
SENDMSG 7 全服激情令已放出,请等待激情的降临!
SENDMSG 7 全服激情令已放出,请等待激情的降临!
BREAK
#ELSEACT
MESSAGEBOX 你有足够的元宝吗?
BREAK


[@盟重]
#IF
#ACT
mapmove 3 330 330
BREAK


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则