(@@InPutInteger @@InPutString)
[@MAIN] #IF CHECKLEVELEX > 0 #ACT MOV S0 < MOV S1 /FCOLOR=58> #SAY 是谁每天陪伴着你?是谁默默的支持着你? 是谁为你奋不顾身?是谁对你情真意切? 在这里传递你的祝福,向兄弟、姐妹、战友、爱人表达你最真切感情。 玛珐自有真情在,谁能成为玛珐大陆人缘最好的人呢?让我们拭目以待。 <赠送鲜花/@赠送鲜花> 我收到的鲜花数量为∶<$STR(S0)><$HUMAN(鲜花)>朵<$STR(S1)> <领取免费称号奖励/@称号奖励> <开启幸运礼袋/@开启幸运礼袋> [@赠送鲜花] 即日起,您可以购买鲜花送给您的亲朋好友, 每送出一朵鲜花您都将获得<$STR(S0)>海量经验<$STR(S1)>。每累积赠送4朵鲜花您还能 获赠<$STR(S0)>幸运礼袋<$STR(S1)>一个!开启礼袋将有机会拿到各种好礼。 累计收到<$STR(S0)>9999朵<$STR(S1)>鲜花的玩家,将获得称号“<君临天下/@称号说明>”或“<倾国倾城/@称号说明>”。 累计收到<$STR(S0)>4888朵<$STR(S1)>鲜花的玩家,将获得称号“<勇者无敌/@称号说明>”或“<国色天香/@称号说明>”。 累计收到<$STR(S0)>2888朵<$STR(S1)>鲜花的玩家,将获得称号“<国士无双/@称号说明>”或“<绝代佳人/@称号说明>”。 <$STR(S0)>根据角色的性别区分称号(三种称号不可同时获得)<$STR(S1)> <送鲜花得经验/@@InPutString2|Title=请输入在线玩家的名字>传递你的祝福 <返回/@MAIN> [@InPutString2] #IF CHECKLEVELEX > 0 #ACT DelaYGoto 1 ~InPutString2 BREAK [~InPutString2] #IF EQUAL <$STR(S2)> <$USERNAME> #SAY 不能赠送给自己,请重新输入。 <返回/@赠送鲜花> #ACT BREAK #IF CheckOnline <$STR(S2)> #SAY “<$STR(S2)>”当前在线 每朵鲜花<$STR(S0)>1元宝<$STR(S1)>、童叟无欺 使用<$STR(S0)>元宝<$STR(S1)>赠送 <____/@@InPutInteger3|Title=请输入1-9999之间的整数>朵 鲜花 <返回/@赠送鲜花> #ELSEACT MESSAGEBOX <$STR(S2)>不在线或名字错误 CLOSE BREAK [@InPutInteger2] #IF CHECKLEVELEX > 0 #ACT DelaYGoto 1 ~InPutInteger2 BREAK [~InPutInteger2] #IF LARGE N2 0 SMALL N2 2001 #ACT MOV D2 N2 MUL D2 <$STR(D2)> 100000 MOVR D0 3000 INC D0 3000 MUL D9 <$STR(N2)> <$STR(D0)> DelaYGoto 1 @金币计算 #ELSEACT CLOSE MESSAGEBOX 请输入1-2000之间的整数! BREAK [@InPutInteger3] #IF CHECKLEVELEX > 0 #ACT DelaYGoto 1 ~InPutInteger3 BREAK [~InPutInteger3] #IF LARGE N3 0 SMALL N3 10000 #ACT MOV D2 N3 MOVR D0 12000 INC D0 10000 MUL D9 <$STR(N3)> <$STR(D0)> DelaYGoto 1 @元宝计算 #ELSEACT CLOSE MESSAGEBOX 请输入1-9999之间的整数! BREAK [@金币计算] 你打算将<$STR(N2)>朵鲜花赠送给“<$STR(S2)>”, 需要花费你<$STR(D2)>金币,同时你还可以获得海量经验。 <$STR(S0)>请核对以上信息,确认后点击确定赠送!<$STR(S1)> <我确定以上信息准确无误,提交/@金币鲜花提交> [@元宝计算] 你打算将<$STR(N3)>朵鲜花赠送给“<$STR(S2)>”, 需要花费你<$STR(D2)>元宝,同时你还可以获得海量经验。 <$STR(S0)>请核对以上信息,确认后点击确定赠送!<$STR(S1)> <我确定以上信息准确无误,提交/@元宝鲜花提交> [@金币鲜花提交] #IF EQUAL <$STR(S2)> <$USERNAME> #SAY 不能赠送给自己,请重新输入。 <返回/@赠送鲜花> #ACT BREAK #IF CheckOnline <$STR(S2)> #ACT GOTO @金币鲜花提交_1 #ELSEACT MESSAGEBOX <$STR(S2)>不在线或名字错误 CLOSE BREAK [@金币鲜花提交_1] #IF CHECKGOLD <$STR(D2)> #ACT TAKE 金币 <$STR(D2)> CHANGEEXP + <$STR(D9)> 2 MOV I39 <$STR(N2)> MOV A32 <$USERNAME> HCALL <$STR(S2)> @在线接收鲜花 SENDMSG 0 <$USERNAME>向<$STR(S2)>赠送了<$STR(N2)>朵鲜花,并祝愿他身体健康,天天快乐! DelaYGoto 1 @礼袋检测 CLOSE BREAK #ELSEACT MESSAGEBOX 你的金币不足,请充值后再来!<$STR(N2)>朵鲜花需要<$STR(D2)>金币! CLOSE BREAK [@元宝鲜花提交] #IF EQUAL <$STR(S2)> <$USERNAME> #SAY 不能赠送给自己,请重新输入。 <返回/@赠送鲜花> #ACT BREAK #IF CheckOnline <$STR(S2)> #ACT GOTO @元宝鲜花提交_1 #ELSEACT MESSAGEBOX <$STR(S2)>不在线或名字错误 CLOSE BREAK [@元宝鲜花提交_1] #IF CHECKGAMEGOLD ? <$STR(D2)> #ACT GAMEGOLD – <$STR(D2)> CHANGEEXP + <$STR(D9)> 2 MOV I39 <$STR(N3)> MOV A32 <$USERNAME> HCALL <$STR(S2)> @在线接收鲜花 SENDMSG 0 <$USERNAME>向<$STR(S2)>赠送了<$STR(N3)>朵鲜花,并祝愿他身体健康,天天快乐! DelaYGoto 1 @礼袋检测 CLOSE BREAK #ELSEACT CLOSE MESSAGEBOX 你的元宝不足,请充值后再来!<$STR(N3)>朵鲜花需要<$STR(D2)>元宝! BREAK [@礼袋检测] #IF LARGE N2 3 #ACT MOV M2 <$STR(N2)> DIV M2 <$STR(M2)> 4 GIVEKIMNEEDLE 幸运礼袋 <$STR(M2)> SENDMSG 0 <$USERNAME>买鲜花、送祝福,额外获得<$STR(M2)>个幸运礼袋!!! BREAK #IF LARGE N3 3 #ACT MOV M2 <$STR(N3)> DIV M2 <$STR(M2)> 4 GIVEKIMNEEDLE 幸运礼袋 <$STR(M2)> SENDMSG 0 <$USERNAME>买鲜花、送祝福,额外获得<$STR(M2)>个幸运礼袋!!! BREAK [@称号说明] 获得<$STR(S0)>“君临天下”<$STR(S1)>或<$STR(S0)>“倾国倾城”<$STR(S1)>称号的玩家, 并在领取称号后的七天内每天免费领取<$STR(S0)>45个极品烟花<$STR(S1)>。 获得<$STR(S0)>“勇者无敌”<$STR(S1)>或<$STR(S0)>“国色天香”<$STR(S1)>称号的玩家, 并在领取称号后的七天内每天免费领取<$STR(S0)>20个极品烟花<$STR(S1)>。 获得<$STR(S0)>“国士无双”<$STR(S1)>或<$STR(S0)>“绝代佳人”<$STR(S1)>称号的玩家, 并在领取称号后的七天内每天免费领取<$STR(S0)>10个极品烟花<$STR(S1)>。 <返回/@赠送鲜花> [@称号奖励] 获得特殊称号的玩家每天都可以在我这里领取<$STR(S0)>极品烟花<$STR(S1)>。 点燃<$STR(S0)>极品烟花<$STR(S1)>可以获得<$STR(S0)>最高20万经验<$STR(S1)>的奖励。 <领取每日称号奖励/@每日称号奖励> <返回/@MAIN> [@每日称号奖励] #IF CHECKNAMELIST ..QuestDiary数据文件每日称号奖励.txt #SAY 每人每天只能领取一次称号奖励 #ACT BREAK #IF CHECKFENGHAO 君临天下 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励.txt GIVEKIMNEEDLE 极品烟花 45 CLOSE BREAK #IF CHECKFENGHAO 倾国倾城 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励.txt GIVEKIMNEEDLE 极品烟花 45 CLOSE BREAK #IF CHECKFENGHAO 勇者无敌 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励.txt GIVEKIMNEEDLE 极品烟花 20 CLOSE BREAK #IF CHECKFENGHAO 国色天香 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励.txt GIVEKIMNEEDLE 极品烟花 20 CLOSE BREAK #IF CHECKFENGHAO 国士无双 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励.txt GIVEKIMNEEDLE 极品烟花 10 CLOSE BREAK #IF CHECKFENGHAO 绝代佳人 #ACT ADDNAMELIST ..QuestDiary数据文件每日称号奖励名单.txt GIVEKIMNEEDLE 极品烟花 10 CLOSE BREAK #ELSESAY 你并没有获得称号奖励领取资格! [@开启幸运礼袋] 每累积赠送4朵鲜花您还能获赠<$STR(S0)>幸运礼袋<$STR(S1)>一个! 开启礼袋将有机会拿到装备、技能等各种好礼。 <开启幸运礼袋/@开启幸运礼袋_1> <返回/@MAIN> [@开启幸运礼袋_1] #IF ISOPENBOX #SAY 你当前正在有礼袋开启中,不能再次开启多个礼袋! #ACT BREAK #IF CHECKKIMNEEDLE 幸运礼袋 1 #ACT TAKEKIMNEEDLE 幸运礼袋 1 OPENDRAGONBOX 5 SENDMSG 0 %s在盟重人缘大使处使用“幸运礼袋”开启幸运大礼。 CLOSE BREAK #ELSESAY 如果你带来了幸运礼袋,赶快交给我吧!