(@@InPutInteger @@InPutString)
[@main] 1、<最近各大SF都有新花样，为此我们开发出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 MOV S9 goto @我想试试 messagebox 嘛哩嘛哩哄！您输入的太长，让我头痛！最多只能八个汉字！ [@InPutString2] #if CheckStringlength <$STR(S2)> < 17 #act goto @我想试试 #elseact MOV S2 goto @我想试试 messagebox 嘛哩嘛哩哄！您输入的太长，让我头痛！最多只能八个汉字！ [@我施法] #if CHECKGAMEGOLD > 99999 #act #elseact break messagebox 嘛哩嘛哩哄！我发现你没有100000个元宝给我！ #if CheckOnline <$STR(S9)> #act #elseact break messagebox 嘛哩嘛哩哄！那个人好像不在线哦！！ #if #act MOV A900 <$STR(S2)> MOV A901 <$USERNAME> GAMEGOLD – 100000 HCall <$STR(S9)> @设置名字号 break messagebox 嘛哩嘛哩哄！施法成功！元宝入口袋！拜拜！ [@清除绰号] 尊敬的<$USERNAME>，您好！ 是否被仇家给你起了个低俗、肮脏的绰号呢？那可不是我做的哦！ 我可是玛法大陆上最守法的良民，大大滴良民！我决对不会做这样 的事，只要你能给我点元宝，我可以帮你把绰号弄掉！嗯！让我想 想，应该收你多少呢？<20000/FCOLOR=250>吧！只要给我<20000/FCOLOR=250>元宝，我就帮你把 那个绰号给去掉！ <我给，请帮我去掉！/@我去掉> <返回/@MAIN> [@我去掉] #if #act SETRANKLEVELNAME %s CHANGENAMECOLOR 255 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 MOV S0 S21 MOV N0 11 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足1100个！ goto @赠送玫瑰花 [@InPutString22] #IF CHECKGAMEGOLD > 1299 #ACT MOV S0 S22 MOV N0 13 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足1300个！ goto @赠送玫瑰花 [@InPutString23] #IF CHECKGAMEGOLD > 1499 #ACT MOV S0 S23 MOV N0 15 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足1500个！ goto @赠送玫瑰花 [@InPutString24] #IF CHECKGAMEGOLD > 3799 #ACT MOV S0 S24 MOV N0 38 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足3800个！ goto @赠送玫瑰花 [@InPutString25] #IF CHECKGAMEGOLD > 5099 #ACT MOV S0 S25 MOV N0 51 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足5100个！ goto @赠送玫瑰花 [@InPutString26] #IF CHECKGAMEGOLD > 8799 #ACT MOV S0 S26 MOV N0 88 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足8800个！ goto @赠送玫瑰花 [@InPutString27] #IF CHECKGAMEGOLD > 9899 #ACT MOV S0 S27 MOV N0 99 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足9900个！ goto @赠送玫瑰花 [@InPutString28] #IF CHECKGAMEGOLD > 16799 #ACT MOV S0 S28 MOV N0 168 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足16800个！ goto @赠送玫瑰花 [@InPutString29] #IF CHECKGAMEGOLD > 99899 #ACT MOV S0 S29 MOV N0 999 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足99900个！ goto @赠送玫瑰花 [@InPutString30] #IF CHECKGAMEGOLD > 131399 #ACT MOV S0 S30 MOV N0 1314 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足131400个！ goto @赠送玫瑰花 [@InPutString31] #IF CHECKGAMEGOLD > 999899 #ACT MOV S0 S31 MOV N0 9999 MUL N1 N0 1000 goto @赠送玫瑰花 #ELSEACT MessAgeBox 提示：每朵玫瑰1000元宝，您的元宝不足999900个！ goto @赠送玫瑰花 ;================================================ [@确认送出] #IF LARGE N0 0 #ACT MUL N3 N0 1000 MOV N4 N3 DEC N4 1 #ELSEACT MessAgeBox 提示：请先选择赠送的玫瑰花数量！ break #IF CheckOnline <$STR(S0)> CHECKGAMEGOLD > <$STR(N4)> #ACT GAMEGOLD – <$STR(N3)> MOV G900 <$STR(N0)> HCall <$STR(S0)> @接收玫瑰花 SendCenterMsg 249 255 花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 1 10 1 SendCenterMsg 249 255 花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 1 10 1 SendCenterMsg 249 255 花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 1 10 1 SendCenterMsg 249 255 花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 1 10 1 SENDMSG 0 玫瑰花：花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 249 251 SENDMSG 0 玫瑰花：花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 249 251 SENDMSG 0 玫瑰花：花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 249 251 SENDMSG 0 玫瑰花：花神<$USERNAME>将<$STR(N0)>朵玫瑰花送给了<$STR(S0)>！ 249 251 break #ELSEACT MessAgeBox 提示：您要赠送玫瑰花的对象目前不在线或您的元宝不足<$STR(N3)>个！ break
