(@@InPutInteger@@InPutString)
[@MAIN]
#IF
CHECKLEVELEX>0
#ACT
MOVS0<
MOVS1/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
DelaYGoto1~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
DelaYGoto1~InPutInteger2
BREAK
[~InPutInteger2]
#IF
LARGEN20
SMALLN22001
#ACT
MOVD2N2
MULD2<$STR(D2)>100000
MOVRD03000
INCD03000
MULD9<$STR(N2)><$STR(D0)>
DelaYGoto1@金币计算
#ELSEACT
CLOSE
MESSAGEBOX请输入1-2000之间的整数！
BREAK
[@InPutInteger3]
#IF
CHECKLEVELEX>0
#ACT
DelaYGoto1~InPutInteger3
BREAK
[~InPutInteger3]
#IF
LARGEN30
SMALLN310000
#ACT
MOVD2N3
MOVRD012000
INCD010000
MULD9<$STR(N3)><$STR(D0)>
DelaYGoto1@元宝计算
#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
MOVI39<$STR(N2)>
MOVA32<$USERNAME>
HCALL<$STR(S2)>@在线接收鲜花
SENDMSG0<$USERNAME>向<$STR(S2)>赠送了<$STR(N2)>朵鲜花，并祝愿他身体健康，天天快乐！
DelaYGoto1@礼袋检测
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
MOVI39<$STR(N3)>
MOVA32<$USERNAME>
HCALL<$STR(S2)>@在线接收鲜花
SENDMSG0<$USERNAME>向<$STR(S2)>赠送了<$STR(N3)>朵鲜花，并祝愿他身体健康，天天快乐！
DelaYGoto1@礼袋检测
CLOSE
BREAK
#ELSEACT
CLOSE
MESSAGEBOX你的元宝不足，请充值后再来！\<$STR(N3)>朵鲜花需要<$STR(D2)>元宝！
BREAK
[@礼袋检测]
#IF
LARGEN23
#ACT
MOVM2<$STR(N2)>
DIVM2<$STR(M2)>4
GIVEKIMNEEDLE幸运礼袋<$STR(M2)>
SENDMSG0<$USERNAME>买鲜花、送祝福，额外获得<$STR(M2)>个幸运礼袋！！！
BREAK
#IF
LARGEN33
#ACT
MOVM2<$STR(N3)>
DIVM2<$STR(M2)>4
GIVEKIMNEEDLE幸运礼袋<$STR(M2)>
SENDMSG0<$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
OPENDRAGONBOX5
SENDMSG0%s在盟重人缘大使处使用“幸运礼袋”开启幸运大礼。
CLOSE
BREAK
#ELSESAY
如果你带来了幸运礼袋，赶快交给我吧！
[@MAIN]
#IF
CHECKLEVELEX>0
#ACT
MOVS0<
MOVS1/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
DelaYGoto1~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
DelaYGoto1~InPutInteger2
BREAK
[~InPutInteger2]
#IF
LARGEN20
SMALLN22001
#ACT
MOVD2N2
MULD2<$STR(D2)>100000
MOVRD03000
INCD03000
MULD9<$STR(N2)><$STR(D0)>
DelaYGoto1@金币计算
#ELSEACT
CLOSE
MESSAGEBOX请输入1-2000之间的整数！
BREAK
[@InPutInteger3]
#IF
CHECKLEVELEX>0
#ACT
DelaYGoto1~InPutInteger3
BREAK
[~InPutInteger3]
#IF
LARGEN30
SMALLN310000
#ACT
MOVD2N3
MOVRD012000
INCD010000
MULD9<$STR(N3)><$STR(D0)>
DelaYGoto1@元宝计算
#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
MOVI39<$STR(N2)>
MOVA32<$USERNAME>
HCALL<$STR(S2)>@在线接收鲜花
SENDMSG0<$USERNAME>向<$STR(S2)>赠送了<$STR(N2)>朵鲜花，并祝愿他身体健康，天天快乐！
DelaYGoto1@礼袋检测
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
MOVI39<$STR(N3)>
MOVA32<$USERNAME>
HCALL<$STR(S2)>@在线接收鲜花
SENDMSG0<$USERNAME>向<$STR(S2)>赠送了<$STR(N3)>朵鲜花，并祝愿他身体健康，天天快乐！
DelaYGoto1@礼袋检测
CLOSE
BREAK
#ELSEACT
CLOSE
MESSAGEBOX你的元宝不足，请充值后再来！\<$STR(N3)>朵鲜花需要<$STR(D2)>元宝！
BREAK
[@礼袋检测]
#IF
LARGEN23
#ACT
MOVM2<$STR(N2)>
DIVM2<$STR(M2)>4
GIVEKIMNEEDLE幸运礼袋<$STR(M2)>
SENDMSG0<$USERNAME>买鲜花、送祝福，额外获得<$STR(M2)>个幸运礼袋！！！
BREAK
#IF
LARGEN33
#ACT
MOVM2<$STR(N3)>
DIVM2<$STR(M2)>4
GIVEKIMNEEDLE幸运礼袋<$STR(M2)>
SENDMSG0<$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
OPENDRAGONBOX5
SENDMSG0%s在盟重人缘大使处使用“幸运礼袋”开启幸运大礼。
CLOSE
BREAK
#ELSESAY
如果你带来了幸运礼袋，赶快交给我吧！