非常有趣的传奇绰号脚本添加完整流程
(@@InPutInteger@@InPutString)
[@main]
1、<最近各大都有新花样,为此我们开发出IS送花和改章功能/fcolor=250>\
2、<绰号时间为30分钟自动消失!玫瑰花一朵为1000元宝!/fcolor=254>\
<---注意:此为独家开发新脚本、为各玩家自愿消费为主!---/fcolor=249>\
[<进入IS盖章商店/@绰号>][<进入IS送花商店/@送花>]
[@绰号]
您是否对某人非常憎恨呢?你是否对某人暗许芳心呢?\
本服推出特别功能,可以送给你憎恨的人,可以送给你心爱的人一\
个独特的名字,设置后对方将显示出你设置的名字。效果保持半小\
时,是否想试试呢?不过这个可以对别人造成人身攻击,搞不好我\
小命都不保,所以收取一点安家费是理所当然的!\
<为了防止有人恶意毁谤本游戏名声!绰号价格稍微调整为一次100000元宝/FCOLOR=249>\\
<我想试试/@我想试试>\
<花重金清除绰号/@清除绰号>\
<算了,我只是路过的!/@exit>
[@我想试试]
对于你的仇人或是情人我都会要收取一点安家费,或许某日你的仇\
人找上门我可是小命不保啊!所以您只要给我<100000元宝/FCOLOR=250>我连小命\
都可以交给你!老人家说得好,有钱能使磨推鬼。只要你有钱,磨\
推鬼并不是不可能!\
<为了防止有人恶意毁谤本游戏名声!绰号价格稍微调整为一次100000元宝/FCOLOR=249>\\
<要给于名字的人:/FCOLOR=249><[/FCOLOR=250><$STR(S9)><]/FCOLOR=250><点击输入/@@InPutString9>\
<要给于他的称号:/FCOLOR=249><[/FCOLOR=250><$STR(S2)><]/FCOLOR=250><点击输入/@@InPutString2>\\
<设置好了,请您现在为我施法吧!/@我施法><返回/@MAIN>\
[@InPutString9]
#if
CheckStringlength<$STR(S9)><17
#act
goto@我想试试
#elseact
MOVS9
goto@我想试试
messagebox嘛哩嘛哩哄!您输入的太长,让我头痛!最多只能八个汉字!
[@InPutString2]
#if
CheckStringlength<$STR(S2)><17
#act
goto@我想试试
#elseact
MOVS2
goto@我想试试
messagebox嘛哩嘛哩哄!您输入的太长,让我头痛!最多只能八个汉字!
[@我施法]
#if
CHECKGAMEGOLD>99999
#act
#elseact
break
messagebox嘛哩嘛哩哄!我发现你没有100000个元宝给我!
#if
CheckOnline<$STR(S9)>
#act
#elseact
break
messagebox嘛哩嘛哩哄!那个人好像不在线哦!!
#if
#act
MOVA900<$STR(S2)>
MOVA901<$USERNAME>
GAMEGOLD-100000
HCall<$STR(S9)>@设置名字号
break
messagebox嘛哩嘛哩哄!施法成功!元宝入口袋!拜拜!
[@清除绰号]
尊敬的<$USERNAME>,您好!\
是否被仇家给你起了个低俗、肮脏的绰号呢?那可不是我做的哦!\
我可是玛法大陆上最守法的良民,大大滴良民!我决对不会做这样\
的事,只要你能给我点元宝,我可以帮你把绰号弄掉!嗯!让我想\
想,应该收你多少呢?<20000/FCOLOR=250>吧!只要给我<20000/FCOLOR=250>元宝,我就帮你把\
那个绰号给去掉!\\\
<我给,请帮我去掉!/@我去掉><返回/@MAIN>
[@我去掉]
#if
#act
SETRANKLEVELNAME%s
CHANGENAMECOLOR255
DELNAMELIST..\QuestDiary\登陆设置\被设置人物.txt
messagebox嘛哩嘛哩哄!完成!元宝又入口袋!
[@送花]
传奇里的女人们,或<可爱/fcolor=249>,或<妩媚/fcolor=249>,或<淑女/fcolor=249>。他们一个个美丽的倩\
影给玛法大陆带来了一道靓丽的风景线。她们默默地支持着在外打\
拼的男人们,或者勇敢的站在男人的身边和他一起面对战斗,她们\
的一举一动,一颦一笑深深地印刻在我们心底某个柔软的角落,不\
经意总会想起,会心一笑。你身边否就有这样的<红颜知己/fcolor=249>和<红粉佳/fcolor=249>\
<人/fcolor=249>呢?那么,在这请抓住机会对她们表达吧!\\
<赠送玫瑰花/@赠送玫瑰花>\
<没有心爱的人,可怜可怜!/@MAIN>
[@赠送玫瑰花]
帮您赠送出一朵玫瑰我将收取您<1000元宝/fcolor=249>!划算吧!\
成功送出后将全服提示,让您面子大增。。\
<送花使用方法:点击以下要送出的数量并输入玩家名字即为您送出/fcolor=249>\
<赠送11朵/@@InPutString21>(<一心一意/fcolor=249>)<赠送13朵/@@InPutString22>(<十三点/fcolor=249>)<赠送15朵/@@InPutString23>(<要我/fcolor=249>)\
<赠送38朵/@@InPutString24>(<三八/fcolor=249>)<赠送51朵/@@InPutString25>(<我要/fcolor=249>)<赠送88朵/@@InPutString26>(<双发/fcolor=249>)\
<赠送99朵/@@InPutString27>(<长久/fcolor=249>)<赠送168朵/@@InPutString28>(<一路发/fcolor=249>)<赠送999朵/@@InPutString29>(<我爱你/fcolor=249>)\
<赠送1314朵/@@InPutString30>(<一生一世/fcolor=249>)<赠送9999朵/@@InPutString31>(<天长地久/fcolor=249>)\
<您将赠送/fcolor=253><$STR(N0)><朵玫瑰给[/fcolor=253><$STR(S0)><]/fcolor=253><需要/fcolor=253><$STR(N1)><元宝/fcolor=253><确认送出/@确认送出>\
<我还没有找到心爱的人!以后再送/@MAIN>
[@InPutString21]
#IF
CHECKGAMEGOLD>1099
#ACT
MOVS0S21
MOVN011
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足1100个!
goto@赠送玫瑰花
[@InPutString22]
#IF
CHECKGAMEGOLD>1299
#ACT
MOVS0S22
MOVN013
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足1300个!
goto@赠送玫瑰花
[@InPutString23]
#IF
CHECKGAMEGOLD>1499
#ACT
MOVS0S23
MOVN015
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足1500个!
goto@赠送玫瑰花
[@InPutString24]
#IF
CHECKGAMEGOLD>3799
#ACT
MOVS0S24
MOVN038
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足3800个!
goto@赠送玫瑰花
[@InPutString25]
#IF
CHECKGAMEGOLD>5099
#ACT
MOVS0S25
MOVN051
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足5100个!
goto@赠送玫瑰花
[@InPutString26]
#IF
CHECKGAMEGOLD>8799
#ACT
MOVS0S26
MOVN088
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足8800个!
goto@赠送玫瑰花
[@InPutString27]
#IF
CHECKGAMEGOLD>9899
#ACT
MOVS0S27
MOVN099
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足9900个!
goto@赠送玫瑰花
[@InPutString28]
#IF
CHECKGAMEGOLD>16799
#ACT
MOVS0S28
MOVN0168
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足16800个!
goto@赠送玫瑰花
[@InPutString29]
#IF
CHECKGAMEGOLD>99899
#ACT
MOVS0S29
MOVN0999
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足99900个!
goto@赠送玫瑰花
[@InPutString30]
#IF
CHECKGAMEGOLD>131399
#ACT
MOVS0S30
MOVN01314
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足131400个!
goto@赠送玫瑰花
[@InPutString31]
#IF
CHECKGAMEGOLD>999899
#ACT
MOVS0S31
MOVN09999
MULN1N01000
goto@赠送玫瑰花
#ELSEACT
MessAgeBox提示:每朵玫瑰1000元宝,您的元宝不足999900个!
goto@赠送玫瑰花
;================================================
[@确认送出]
#IF
LARGEN00
#ACT
MULN3N01000
MOVN4N3
DECN41
#ELSEACT
MessAgeBox提示:请先选择赠送的玫瑰花数量!
break
#IF
CheckOnline<$STR(S0)>
CHECKGAMEGOLD><$STR(N4)>
#ACT
GAMEGOLD-<$STR(N3)>
MOVG900<$STR(N0)>
HCall<$STR(S0)>@接收玫瑰花
SendCenterMsg249255花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!1101
SendCenterMsg249255花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!1101
SendCenterMsg249255花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!1101
SendCenterMsg249255花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!1101
SENDMSG0玫瑰花:花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!249251
SENDMSG0玫瑰花:花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!249251
SENDMSG0玫瑰花:花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!249251
SENDMSG0玫瑰花:花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>!249251
break
#ELSEACT
MessAgeBox提示:您要赠送玫瑰花的对象目前不在线或您的元宝不足<$STR(N3)>个!
break

