[@main]
是谁每天陪伴着你？是谁默默的支持着你？\
是谁为你奋不顾身？是谁对你情真意切？\
精致礼品盒/fcolor=249传递你的祝福，向兄弟、姐妹、战友、爱人\
表达你最真切感情。玛法自有真情在，\
谁能成为玛法大陆人缘最好的人呢？让我们试目以待。\ \
赠送鲜花/@鲜花\
\
\
[@鲜花]
即日起，您可以购买鲜花送给您的亲朋好友，每送出一朵\
鲜花您将获得70000内功经验/FColor=56或15万英雄经验+70000内功经验(英雄/FColor=56\
等级达到200不受限制)/FColor=56。一次性收到9999朵/FColor=56鲜花的玩家，将获得称号\
君临天下/FColor=56或倾国倾城/FColor=56，并可以在之后的7天内每天免费领取\
188/FColor=56个灵符礼包+4/FColor=56个庆典蛋糕或3/FColor=56个主宰者灵珠。\
一次性收到4888朵/FColor=56鲜花的玩家，将获得称号勇者无敌/FColor=56或国色天香/FColor=56\
，并可以在之后的7天内每天免费领取90/FColor=56个灵符礼包+2/FColor=56个庆典蛋糕。\
送鲜花得内功经验/@赠送鲜花111 送鲜花得英雄经验/@赠送鲜花222\
下一页/@鲜花1 返回/@MAIN\
[@鲜花1]
一次性收到2888朵/FColor=56鲜花的玩家，将获得称号国士无双/FColor=56或绝代/FColor=56\
佳人/FColor=56，并可以在之后的7天内每天免费领取52/FColor=56个灵符礼包+1/FColor=56个\
庆典蛋糕。\
当获得以\
上称号后的7天内可以每天额外领取20/FColor=56个灵符礼包。\
(两种称号不可同时获得)/FColor=56\ \
送鲜花得内功经验/@赠送鲜花111 送鲜花得英雄经验/@赠送鲜花222\
上一页/@鲜花 返回/@MAIN\
[@赠送鲜花222]
#IF
#ACT
MOV S11
MOV S12
MOV S13
MOV S14
MOV S15
MOV S16
break
#SAY
查询我收到的鲜花数量/@查询鲜花 免费领取称号奖励/@称号奖励\ \
\
\
使用元宝赠送1-999朵鲜花/@元宝鲜花2 \ \
鲜花数量每月清空一次/FColor=56\
返回/@MAIN\
#ELSEACT
MOV S11
MOV S12
MOV S13
MOV S14
MOV S15
MOV S16
break
#ELSESAY
查询我收到的鲜花数量/@查询鲜花 免费领取称号奖励/@称号奖励\ \ \ \ \ \ \ \
返回/@MAIN\
[@主宰鲜花2]
#IF
CHECKFENGHAO 玛法主宰者
#ACT
MOV S19
break
#SAY
主宰者免费赠送鲜花:\ \
输入对方名字/@@InPutString19\
#IF
CHECKFENGHAO 玛法主宰者
#ACT
MOV S19
break
#SAY
主宰者免费赠送鲜花:\ \
输入对方名字/@@InPutString19\
#ELSEACT
break
#ELSESAY
你没有玛法主宰者称号，无法赠送鲜花。
[@@InPutString19]
#Act
DelaYGoto 1 ~InPutString19
break
[~InPutString19]
#IF
EQUAL $STR(S19) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S19)
#ACT
#ELSEACT
MESSAGEBOX $STR(S19)没有在线!
MOV S19
BREAK
CLOSE
#IF
checknamelist ..\QuestDiary\data\玛法主宰者\每日赠送鲜花名单.txt
#ACT
BREAK
#SAY
尊敬的主宰者大人，您今天已经免费赠送过鲜花了！
#ELSEACT
addnamelist ..\QuestDiary\data\玛法主宰者\每日赠送鲜花名单.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 24
hcall $STR(S19) @在线接收鲜花
SENDMSG 0 恭喜:$USERNAME赠送了$STR(G97)朵鲜花给$STR(S19)！
GOTO @赠送英雄奖励
break
CLOSE
[@荣耀鲜花2]
#ACT
MOV S18
MOV N18 0
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
赠送玩家:______________/@@InPutString18\
赠送数量:______________/@@InPutInteger18\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutString18]
#Act
DelaYGoto 1 ~InPutString18
break
[~InPutString18]
#IF
EQUAL $STR(S18) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
MOV S18
BREAK
CLOSE
#IF
CheckOnline $STR(S18)
#ACT
#ELSEACT
MESSAGEBOX $STR(S18)没有在线!
MOV S18
BREAK
CLOSE
#IF
LARGE N18 0
#ACT
BREAK
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString18 赠送玩家:$STR(S18)\
更改信息/@@InPutInteger18 赠送数量:$STR(N18)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@荣耀鲜花22\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString18 赠送玩家:$STR(S18)\
赠送数量:______________/@@InPutInteger18\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutInteger18]
#Act
MOV N88
MUL N88 N18 100
DelaYGoto 1 ~InPutInteger18
break
[~InPutInteger18]
#IF
LARGE N18 0
SMALL N18 1000
#ACT
#ELSEACT
MESSAGEBOX 请输入1-999之间的整数！
break
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
#ELSEACT
MESSAGEBOX 对不起，你没有足够数量的荣耀点！
break
CLOSE
#IF
CheckStringlength $STR(S18) 2
#ACT
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString18 赠送玩家:$STR(S18)\
更改信息/@@InPutInteger18 赠送数量:$STR(N18)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@荣耀鲜花22\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
赠送玩家:______________/@@InPutString18\
更改信息/@@InPutInteger18 赠送数量:$STR(N18)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@荣耀鲜花22]
#IF
EQUAL $STR(S18) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S18)
#ACT
MOV N88
MUL N88 N18 100
#ELSEACT
MESSAGEBOX $STR(S18)没有在线!
MOV S18
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 N18
hcall $STR(S18) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S18)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S18
BREAK
CLOSE
[@元宝鲜花2]
#ACT
MOV S17
MOV N17 0
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
赠送玩家:______________/@@InPutString17\
赠送数量:______________/@@InPutInteger17\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutString17]
#Act
DelaYGoto 1 ~InPutString17
break
[~InPutString17]
#IF
EQUAL $STR(S17) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
MOV S17
BREAK
CLOSE
#IF
CheckOnline $STR(S17)
#ACT
#ELSEACT
MESSAGEBOX $STR(S17)没有在线!
MOV S17
BREAK
CLOSE
#IF
LARGE N17 0
#ACT
BREAK
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString17 赠送玩家:$STR(S17)\
更改信息/@@InPutInteger17 赠送数量:$STR(N17)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@元宝鲜花22\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString17 赠送玩家:$STR(S17)\
赠送数量:______________/@@InPutInteger17\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutInteger17]
#Act
DelaYGoto 1 ~InPutInteger17
break
[~InPutInteger17]
#IF
LARGE N17 0
SMALL N17 1000
#ACT
#ELSEACT
MESSAGEBOX 请输入1-999之间的整数！
break
CLOSE
#IF
CHECKGAMEGOLD $STR(N17)
#ACT
#ELSEACT
MESSAGEBOX 对不起，你没有足够数量的元宝！
break
CLOSE
#IF
CheckStringlength $STR(S17) 2
#ACT
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString17 赠送玩家:$STR(S17)\
更改信息/@@InPutInteger17 赠送数量:$STR(N17)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@元宝鲜花22\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
赠送玩家:______________/@@InPutString17\
更改信息/@@InPutInteger17 赠送数量:$STR(N17)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@元宝鲜花22]
#IF
EQUAL $STR(S17) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S17)
#ACT
#ELSEACT
MESSAGEBOX $STR(S17)没有在线!
MOV S17
BREAK
CLOSE
#IF
#ACT
MUL N71 N17 20
#IF
CHECKGAMEGOLD $STR(N71)
#ACT
CALCVAR HUMAN 挑战点 + $STR(N71)
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
CALCVAR HUMAN 日祝福点 + $STR(N71)
CALCVAR HUMAN 周祝福点 + $STR(N71)
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加$STR(N71)点。
GAMEGOLD - $STR(N71)
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 N17
hcall $STR(S17) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S17)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S17
BREAK
CLOSE
[@@InPutString16]
#Act
MOV N88
MUL N88 2888 100
DelaYGoto 1 ~InPutString16
break
[~InPutString16]
#IF
EQUAL $STR(S16) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S16)
#ACT
#ELSEACT
MESSAGEBOX $STR(S16)没有在线!
MOV S16
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 2888
hcall $STR(S16) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S16)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S6
BREAK
CLOSE
[@@InPutString15]
#Act
DelaYGoto 1 ~InPutString15
break
[~InPutString15]
#IF
EQUAL $STR(S15) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S15)
#ACT
#ELSEACT
MESSAGEBOX $STR(S15)没有在线!
MOV S15
BREAK
CLOSE
#IF
CHECKGAMEGOLD 2887
#ACT
CALCVAR HUMAN 挑战点 + 2888
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加2888点。
CALCVAR HUMAN 日祝福点 + 2888
CALCVAR HUMAN 周祝福点 + 2888
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加2888点。
GAMEGOLD - 2888
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 2888
hcall $STR(S15) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S15)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S15
BREAK
CLOSE
[@@InPutString14]
#Act
MOV N88
MUL N88 4888 100
DelaYGoto 1 ~InPutString14
break
[~InPutString14]
#IF
EQUAL $STR(S14) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S14)
#ACT
#ELSEACT
MESSAGEBOX $STR(S14)没有在线!
MOV S14
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 4888
hcall $STR(S14) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S14)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S14
BREAK
CLOSE
[@@InPutString13]
#Act
DelaYGoto 1 ~InPutString13
break
[~InPutString13]
#IF
EQUAL $STR(S13) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S13)
#ACT
#ELSEACT
MESSAGEBOX $STR(S13)没有在线!
MOV S13
BREAK
CLOSE
#IF
CHECKGAMEGOLD 4887
#ACT
CALCVAR HUMAN 挑战点 + 4888
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加48今日新开网通私服88点。
CALCVAR HUMAN 日祝福点 + 4888
CALCVAR HUMAN 周祝福点 + 4888
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加4888点。
GAMEGOLD - 4888
MOV A49
MOV A49 $USERNAME
M今日刚开传奇私服OV G97
MOV G97 4888
hcall $STR(S13) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S13)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S13
BREAK
CLOSE
[@@InPutString12]
#Act
MOV N88
MUL N88 9999 100
DelaYGoto 1 ~InPutString12
break
[~InPutString12]
#IF
EQUAL $STR(S12) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S12)
#ACT
#ELSEACT
MESSAGEBOX $STR(S12)没有在线!
MOV S12
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 9999
hcall $STR(S12) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S12)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S12
BREAK
CLOSE
[@@InPutString11]
#Act
DelaYGoto 1 ~InPutString11
break
[~InPutString11]
#IF
EQUAL $STR(S11) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S11)
#ACT
#ELSEACT
MESSAGEBOX $STR(S11)没有在线!
MOV S11
BREAK
CLOSE
#IF
CHECKGAMEGOLD 9998
#ACT
CALCVAR HUMAN 挑战点 + 9999
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加9999点。
CALCVAR HUMAN 日祝福点 + 9999
CALCVAR HUMAN 周祝福点 + 9999
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加9999点。
GAMEGOLD - 9999
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 9999
hcall $STR(S11) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S11)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送英雄奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S11
BREAK
CLOSE
[@赠送鲜花111]
#IF
#ACT
MOV S1
MOV S2
MOV S3
MOV S4
MOV S5
MOV S6
break
#SAY
查询我收到的鲜花数量/@查询鲜花 免费领取称号奖励/@称号奖励\ \
\
使用元宝赠送1-999朵鲜花/@元宝鲜花1 \ \
鲜花数量每月清空一次/FColor=56\
返回/@MAIN\
#ELSEACT
MOV S1
MOV S2
MOV S3
MOV S4
MOV S5
MOV S6
break
#ELSESAY
查询我收到的鲜花数量/@查询鲜花 免费领取称号奖励/@称号奖励\ \ \ \ \ \ \ \
返回/@MAIN\
[@主宰鲜花1]
#IF
CHECKFENGHAO 玛法主宰者
#ACT
MOV S9
break
#SAY
主宰者免费赠送鲜花:\ \
输入对方名字/@@InPutString9\
#IF
CHECKFENGHAO 玛法主宰者
#ACT
MOV S9
break
#SAY
主宰者免费赠送鲜花:\ \
输入对方名字/@@InPutString9\
#ELSEACT
break
#ELSESAY
你没有玛法主宰者称号，无法赠送鲜花。
[@@InPutString9]
#Act
DelaYGoto 1 ~InPutString9
break
[~InPutString9]
#IF
EQUAL $STR(S9) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S9)
#ACT
#ELSEACT
MESSAGEBOX $STR(S9)没有在线!
MOV S9
BREAK
CLOSE
#IF
checknamelist ..\QuestDiary\data\玛法主宰者\每日赠送鲜花名单.txt
#ACT
BREAK
#SAY
尊敬的主宰者大人，您今天已经免费赠送过鲜花了！
#ELSEACT
addnamelist ..\QuestDiary\data\玛法主宰者\每日赠送鲜花名单.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 24
hcall $STR(S3d传奇sf9) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S9)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
[@荣耀鲜花1]
#ACT
MOV S8
MOV N8 0
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花2000荣耀点/FCOLOR=250\ \
赠送玩家:______________/@@InPutString8\
赠送数量:______________/@@InPutInteger8\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutString8]
#Act
DelaYGoto 1 ~InPutString8
break
[~InPutString8]
#IF
EQUAL $STR(S8) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
MOV S8
BREAK
CLOSE
#IF
CheckOnline $STR(S8)
#ACT
#ELSEACT
MESSAGEBOX $STR(S8)没有在线!
MOV网通传奇私服 S8
BREAK
CLOSE
#IF
LARGE N8 0
#ACT
BREAK
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString8 赠送玩家:$STR(S8)\
更改信息/@@InPutInteger8 赠送数量:$STR(N8)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@荣耀鲜花11\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString8 赠传奇百区五湖四海送玩家:$STR(S8)\
赠送数量:______________/@@InPutInteger8\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutInteger8]
#Act
MOV N88
MUL N88 N8 100
DelaYGoto 1 ~InPutInteger8
break
[~InPutInteger8]
#IF
LARGE N8 0
SMALL N8 1000
#ACT
#ELSEACT
MESSAGEBOX 请输入1-999之间的整数！
break
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
#ELSEACT
MESSAGEBOX 对不起，你没有足够数量的荣耀点！
break
CLOSE
#IF
CheckStringlength $STR(S8) 2
#ACT
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
更改信息/@@InPutString8 赠送玩家:$STR(S8)\
更改信息/@@InPutInteger8 赠送数量:$STR(N8)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@荣耀鲜花11\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花100荣耀点/FCOLOR=250\ \
赠送玩家:______________/@@InPutString8\
更改信息/@@InPutInteger8 赠送数量:$STR(N8)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@荣耀鲜花11]
#IF
EQUAL $STR(S8) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S8)
#ACT
MOV N88
MUL N88 N8 100
#ELSEACT
MESSAGEBOX $STR(S8)没有在线!
MOV S8
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 N8
hcall $STR(S8) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S8)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S8
BREAK
CLOSE
[@元宝鲜花1]
#ACT
MOV S7
MOV N7 0
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
赠送玩家:______________/@@InPutString7\
赠送数量:______________/@@InPutInteger7\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutString7]
#Act
DelaYGoto 1 ~InPutString7
break
[~InPutString7]
#IF
EQUAL $STR(S7) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
MOV S7
BREAK
CLOSE
#IF
CheckOnline $STR(S7)
#ACT
#ELSEACT
MESSAGEBOX $STR(S7)没有在线!
MOV S7
BREAK
CLOSE
#IF
LARGE N7 0
#ACT
BREAK
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString7 赠送玩家:$STR(S7)\
更改信息/@@InPutInteger7 赠送数量:$STR(N7)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@元宝鲜花11\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString7 赠送玩家:$STR(S7)\
赠送数量:______________/@@InPutInteger7\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@@InPutInteger7]
#Act
DelaYGoto 1 ~InPutInteger7
break
[~InPutInteger7]
#IF
LARGE N7 0
SMALL N7 1000
#ACT
#ELSEACT
MESSAGEBOX 请输入1-999之间的整数！
break
CLOSE
#IF
CHECKGAMEGOLD $STR(N70)
#ACT
#ELSEACT
MESSAGEBOX 对不起，你没有足够数量的元宝！
break
CLOSE
#IF
CheckStringlength $STR(S7) 2
#ACT
break
#SAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
更改信息/@@InPutString7 赠送玩家:$STR(S7)\
更改信息/@@InPutInteger7 赠送数量:$STR(N7)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交/@元宝鲜花11\
#ELSEACT
break
#ELSESAY
赠送鲜花操作:/FCOLOR=56\ \
赠送数量限制:1-999/FCOLOR=56 每朵鲜花20元宝/FCOLOR=250\ \
赠送玩家:______________/@@InPutString7\
更改信息/@@InPutInteger7 赠送数量:$STR(N7)\ \
请核对以上信息，确认后点击确定赠送！\
我确定以上信息准确无误，提交
[@元宝鲜花11]
#IF
EQUAL $STR(S7) $USERNAME
#ACT
MESSAGEBOX 不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S7)
#ACT
#ELSEACT
MESSAGEBOX $STR(S7)没有在线!
MOV S7
BREAK
CLOSE
#IF
#ACT
MUL N70 N7 20
BREAK
CLOSE
#IF
CHECKGAMEGOLD $STR(N70)
#ACT
CALCVAR HUMAN 挑战点 + $STR(N70)
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加$STR(N70)点。
CALCVAR HUMAN 日祝福点 + $STR(N70)
CALCVAR HUMAN 周祝福点 + $STR(N70)
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加$STR(N70)点。
GAMEGOLD - $STR(N70)
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 N7
hcall $STR(S7) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S7)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S7
BREAK
CLOSE
[@@InPutString6]
#Act
MOV N88
MUL N88 2888 100
DelaYGoto 1 ~InPutString6
break
[~InPutString6]
#IF
EQUAL $STR(S6) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S6)
#ACT
#ELSEACT
MESSAGEBOX $STR(S6)没有在线!
MOV S6
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 2888
hcall $STR(S6) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S6)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S6
BREAK
CLOSE
[@@InPutString5]
#Act
DelaYGoto 1 ~InPutString5
break
[~InPutString5]
#IF
EQUAL $STR(S5) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S5)
#ACT
#ELSEACT
MESSAGEBOX $STR(S5)没有在线!
MOV S5
BREAK
CLOSE
#IF
CHECKGAMEGOLD 2887
#ACT
CALCVAR HUMAN 挑战点 + 2888
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加2888点。
CALCVAR HUMAN 日祝福点 + 2888
CALCVAR HUMAN 周祝福点 + 2888
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加2888点。
GAMEGOLD - 2888
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 2888
hcall $STR(S5) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S5)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S5
BREAK
CLOSE
[@@InPutString4]
#Act
MOV N88
MUL N88 4888 100
DelaYGoto 1 ~InPutString4
break
[~InPutString4]
#IF
EQUAL $STR(S4) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S4)
#ACT
#ELSEACT
MESSAGEBOX $STR(S4)没有在线!
MOV S4
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 4888
hcall $STR(S4) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S4)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S4
BREAK
CLOSE
[@@InPutString3]
#Act
DelaYGoto 1 ~InPutString3
break
[~InPutString3]
#IF
EQUAL $STR(S3) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S3)
#ACT
#ELSEACT
MESSAGEBOX $STR(S3)没有在线!
MOV S3
BREAK
CLOSE
#IF
CHECKGAMEGOLD 4887
#ACT
CALCVAR HUMAN 挑战点 + 4888
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加4888点。
CALCVAR HUMAN 日祝福点 + 4888
CALCVAR HUMAN 周祝福点 + 4888
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加4888点。
GAMEGOLD - 4888
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 4888
hcall $STR(S3) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S3)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S3
BREAK
CLOSE
[@@InPutString2]
#Act
MOV N88
MUL N88 9999 100
DelaYGoto 1 ~InPutString2
break
[~InPutString2]
#IF
EQUAL $STR(S2) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S2)
#ACT
#ELSEACT
MESSAGEBOX $STR(S2)没有在线!
MOV S1
BREAK
CLOSE
#IF
LARGE HUMAN 荣耀点 N88
#ACT
CALCVAR HUMAN 荣耀点 - $STR(N88)
SAVEVAR HUMAN 荣耀点 ..\QuestDiary\data\游戏币.txt
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 9999
hcall $STR(S2) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S2)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的荣耀点!
MOV S2
BREAK
CLOSE
[@@InPutString1]
#Act
DelaYGoto 1 ~InPutString1
break
[~InPutString1]
#IF
EQUAL $STR(S1) $USERNAME
#ACT
MESSAGEBOX 只可以赠送给其他玩家，不可以赠送给自己！
BREAK
CLOSE
#IF
CheckOnline $STR(S1)
#ACT
#ELSEACT
MESSAGEBOX $STR(S1)没有在线!
MOV S1
BREAK
CLOSE
#IF
CHECKGAMEGOLD 9998
#ACT
CALCVAR HUMAN 挑战点 + 9999
SAVEVAR HUMAN 挑战点 ..\QuestDiary\data\挑战点.txt
SENDMSG 6 挑战点数增加9999点。
CALCVAR HUMAN 日祝福点 + 9999
CALCVAR HUMAN 周祝福点 + 9999
SAVEVAR HUMAN 日祝福点 ..\QuestDiary\data\日祝福点.txt
SAVEVAR HUMAN 周祝福点 ..\QuestDiary\data\周祝福点.txt
SENDMSG 6 祝福点数增加9999点。
GAMEGOLD - 9999
MOV A49
MOV A49 $USERNAME
MOV G97
MOV G97 9999
hcall $STR(S1) @在线接收鲜花
SENDMSG 0 $USERNAME向$STR(S1)赠送了$STR(G97)朵玫瑰，祝所有玩家白色情人节快乐！
GOTO @赠送经验奖励
break
CLOSE
#ELSEACT
MESSAGEBOX 你没有足够的元宝!
MOV S1
BREAK
CLOSE
[@赠送英雄奖励]
#IF
HAVEHERO
CHECKHEROONLINE
#ACT
MOV N10
MUL N10 G97 7000
MOV N11
MUL N11 G97 7000
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
CHANGEHEROEXP + N11
SENDMSG 7 恭喜:你获得了:内功经验:$STR(N10)*10
SENDMSG 7 恭喜:你获得了:英雄经验:$STR(N11)*10
BREAK
CLOSE
#ELSEACT
MOV N10
MUL N10 G97 7000
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
SENDMSG 7 恭喜:你获得了:内功经验:$STR(N10)*10
BREAK
CLOSE
[@赠送经验奖励]
#ACT
MOV N10
MUL N10 G97 7000
MOV N11
MUL N11 G97 7000
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGENGEXP + $STR(N10)
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
CHANGEEXP + N11
SENDMSG 7 恭喜:你获得了:内功经验:$STR(N10)*10
SENDMSG 7 恭喜:你获得了:经验:$STR(N11)*10
BREAK
CLOSE
[@称号奖励]
君临天下领取奖励/@称号奖励1 倾国倾城领取奖励/@称号奖励2\ \
勇者无敌领取奖励/@称号奖励3 国色天香领取奖励/@称号奖励4\ \
国士无双领取奖励/@称号奖励5 绝代佳人领取奖励/@称号奖励6\ \ \
返回/@赠送鲜花\
[@称号奖励6]
以下两种任选奖励其一：\ \
免费领取52个灵符礼包+1个庆典蛋糕/@称号奖励41\ \
返回/@称号奖励\
[@称号奖励61]
#IF
CHECKFENGHAO 绝代佳人
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有绝代佳人的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 2
#ACT
#ELSESAY
请预留2格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 70 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\绝代佳人\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\绝代佳人\奖励领取名单.txt
GIVE 庆典蛋糕 1
GIVEKIMNEEDLE 灵符礼包 52
SENDMSG 7 恭喜:你获得了:庆典蛋糕*1
SENDMSG 7 恭喜:你获得了:灵符礼包*52
BREAK
[@称号奖励5]
以下两种任选奖励其一：\ \
免费领取52个灵符礼包+1个庆典蛋糕/@称号奖励51\ \
返回/@称号奖励\
[@称号奖励51]
#IF
CHECKFENGHAO 国士无双
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有国士无双的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 2
#ACT
#ELSESAY
请预留2格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 7 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\国士无双\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\国士无双\奖励领取名单.txt
GIVE 庆典蛋糕 1
GIVEKIMNEEDLE 灵符礼包 52
SENDMSG 7 恭喜:你获得了:庆典蛋糕*1
SENDMSG 7 恭喜:你获得了:灵符礼包*52
BREAK
[@称号奖励4]
以下两种任选奖励其一：\ \
免费领取90个灵符礼包+2个庆典蛋糕/@称号奖励41\ \
返回/@称号奖励\
[@称号奖励41]
#IF
CHECKFENGHAO 国色天香
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有国色天香的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 2
#ACT
#ELSESAY
请预留2格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 7 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\国色天香\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\国色天香\奖励领取名单.txt
GIVE 庆典蛋糕 2
GIVEKIMNEEDLE 灵符礼包 90
SENDMSG 7 恭喜:你获得了:庆典蛋糕*2
SENDMSG 7 恭喜:你获得了:灵符礼包*90
BREAK
[@称号奖励3]
以下两种任选奖励其一：\ \
免费领取90个灵符礼包+2个庆典蛋糕/@称号奖励31\ \
返回/@称号奖励\
[@称号奖励31]
#IF
CHECKFENGHAO 勇者无敌
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有勇者无敌的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 2
#ACT
#ELSESAY
请预留2格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 7 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\勇者无敌\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\勇者无敌\奖励领取名单.txt
GIVE 庆典蛋糕 2
GIVEKIMNEEDLE 灵符礼包 90
SENDMSG 7 恭喜:你获得了:庆典蛋糕*2
SENDMSG 7 恭喜:你获得了:灵符礼包*90
BREAK
[@称号奖励2]
以下两种任选奖励其一：\ \
免费领取188个灵符礼包+4个庆典蛋糕/@称号奖励21\ \
免费领取3个主宰者灵珠/@称号奖励22\ \
返回/@称号奖励\
[@称号奖励22]
#IF
CHECKFENGHAO 倾国倾城
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有倾国倾城的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 3
#ACT
#ELSESAY
请预留3格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 7 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\倾国倾城\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\倾国倾城\奖励领取名单.txt
GIVE 主宰者灵珠 1
SENDMSG 7 恭喜:你获得了:主宰者灵珠*1
BREAK
[@称号奖励21]
#IF
CHECKFENGHAO 倾国倾城
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有倾国倾城的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 5
#ACT
#ELSESAY
请预留5格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
CHECKUSERDATE ..\QuestDiary\data\称号系统\每月可领取名单.txt 7 p0 p1
#ACT
#ELSESAY
当前你无法领取该奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\倾国倾城\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\倾国倾城\奖励领取名单.txt
GIVE 庆典蛋糕 4
GIVEKIMNEEDLE 灵符礼包 188
SENDMSG 7 恭喜:你获得了:庆典蛋糕*4
SENDMSG 7 恭喜:你获得了:灵符礼包*188
BREAK
[@称号奖励1]
以下两种任选奖励其一：\ \
免费领取188个灵符礼包+4个庆典蛋糕/@称号奖励11\ \
免费领取3个主宰者灵珠/@称号奖励12\ \
返回/@称号奖励\
[@称号奖励12]
#IF
CHECKFENGHAO 君临天下
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有君临天下的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 5
#ACT
#ELSESAY
请预留5格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\君临天下\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\君临天下\奖励领取名单.txt
GIVE 主宰者灵珠 1
SENDMSG 7 恭喜:你获得了:主宰者灵珠*1
BREAK
[@称号奖励11]
#IF
CHECKFENGHAO 君临天下
#ACT
#ELSEACT
BREAK
#ELSESAY
你没有君临天下的称号，不能领取灵符礼包。
#IF
CHECKBAGSIZE 5
#ACT
#ELSESAY
请预留5格以上包裹空间后再来领取奖励！
#ELSEACT
break
#IF
checknamelist ..\QuestDiary\data\称号系统\君临天下\奖励领取名单.txt
#ACT
BREAK
#SAY
今天的奖励，你已经领取过了！
#ELSEACT
addnamelist ..\QuestDiary\data\称号系统\君临天下\奖励领取名单.txt
GIVE 庆典蛋糕 4
GIVEKIMNEEDLE 灵符礼包 188
SENDMSG 7 恭喜:你获得了:庆典蛋糕*4
SENDMSG 7 恭喜:你获得了:灵符礼包*188
BREAK
[@查询鲜花]
#ACT
MOV S1
MOV S2
MOV S2 HUMAN 鲜花数量
MOV S1
INC S1 S2
INC S1 /FColor=56
#SAY
你当前已经累积的鲜花数量为：$STR(S1)\ \
返回/@MAIN\
[@回收年货]
你要回收什么年货呢？\ \
牛/@牛 气/@气 冲/@冲 天/@天 牛气冲天大奖/@牛气冲天 压岁钱包/@压岁\ \
年年有余(一)/@nn01 年年有余(二)/@nn02 年年有余(三)/@nn03 年年有余(四)/@nn04\
年年有余(五)/@nn05 年年有余(六)/@nn06 兑换年年有余一至六张大奖/@年年有余\
\
长鞭炮(新)/@长鞭炮(新) 饺子(新)/@饺子(新) 一键回收老版饺子与鞭炮/@收老鞭炮\
返回/@main\
[@收老鞭炮]
#IF
CheckItem 饺子 1
#ACT
INC P1 1
TAKE 饺子 1
DELAYGOTO 1 @收老鞭炮1
BREAK
#IF
CheckItem 长鞭炮 1
#ACT
INC P1 1
TAKE 长鞭炮 1
DELAYGOTO 1 @收老鞭炮1
BREAK
#IF
#ACT
SendMsg 6 回收[饺子与鞭炮]完毕！！
MOV P1 0
close
[@收老鞭炮1]
#IF
#ACT
CHANGEEXP + 150000
#IF
#ACT
DELAYGOTO 1 @收老鞭炮
BREAK
[@年年有余]
新年快乐，年年有余，家家欢乐！\
现在开始，只要你一次性给我年年有余一至六，六张年画，\
我可以给你一次抽奖的机会，\
你将有机会获得海量经验，疾风，怒血，神合装备，\
以及星王，雷炎，王者等装备。\ \
回收年年有余年货/@年年有余1\
返回/@回收年货\
[@年年有余1]
#IF
random 188
checkitem 年年有余(一) 1
checkitem 年年有余(二) 1
checkitem 年年有余(三) 1
checkitem 年年有余(四) 1
checkitem 年年有余(五) 1
checkitem 年年有余(六) 1
#act
take 年年有余(一) 1
take 年年有余(二) 1
take 年年有余(三) 1
take 年年有余(四) 1
take 年年有余(五) 1
take 年年有余(六) 1
CALCVAR HUMAN 辉煌年年有余计数 + 1
SAVEVAR HUMAN 辉煌年年有余计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @年年辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\金牛奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
random 50
checkitem 年年有余(一) 1
checkitem 年年有余(二) 1
checkitem 年年有余(三) 1
checkitem 年年有余(四) 1
checkitem 年年有余(五) 1
checkitem 年年有余(六) 1
#act
take 年年有余(一) 1
take 年年有余(二) 1
take 年年有余(三) 1
take 年年有余(四) 1
take 年年有余(五) 1
take 年年有余(六) 1
CALCVAR HUMAN 辉煌年年有余计数 + 1
SAVEVAR HUMAN 辉煌年年有余计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @年年辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\王者奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
random 5
checkitem 年年有余(一) 1
checkitem 年年有余(二) 1
checkitem 年年有余(三) 1
checkitem 年年有余(四) 1
checkitem 年年有余(五) 1
checkitem 年年有余(六) 1
#act
take 年年有余(一) 1
take 年年有余(二) 1
take 年年有余(三) 1
take 年年有余(四) 1
take 年年有余(五) 1
take 年年有余(六) 1
CALCVAR HUMAN 辉煌年年有余计数 + 1
SAVEVAR HUMAN 辉煌年年有余计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @年年辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\狂雷奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
checkitem 年年有余(一) 1
checkitem 年年有余(二) 1
checkitem 年年有余(三) 1
checkitem 年年有余(四) 1
checkitem 年年有余(五) 1
checkitem 年年有余(六) 1
#act
take 年年有余(一) 1
take 年年有余(二) 1
take 年年有余(三) 1
take 年年有余(四) 1
take 年年有余(五) 1
take 年年有余(六) 1
CALCVAR HUMAN 辉煌年年有余计数 + 1
SAVEVAR HUMAN 辉煌年年有余计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @年年辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\经验奖励.txt S0
changeexp + $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了经验：$STR(S0)
BREAK
#IF
#SAY
你要兑换的年货在哪里？
[@年年辉煌]
#IF
CHECKVAR HUMAN 辉煌年年有余计数 9
#ACT
CALCVAR HUMAN 辉煌年年有余计数 - 10
SAVEVAR HUMAN 辉煌年年有余计数 ..\QuestDiary\Data\辉煌累积次数.txt
CALCVAR HUMAN 辉煌印记数量 + 1
SAVEVAR HUMAN 辉煌印记数量 ..\QuestDiary\Data\辉煌印记数量.txt
SENDMSG 6 你的辉煌印记数量+1，当前辉煌印记数量：$HUMAN(辉煌印记数量)
GOTO @MAIN
BREAK
#ELSEACT
GOTO @MAIN
SENDMSG 6 当前兑换累计次数$HUMAN(辉煌年年有余计数)，累积满10次可获得辉煌印记1个。
BREAK
[@牛气冲天]
牛年大礼，牛气冲天，势不可挡！\
现在开始，只要你一次性给我牛、气、冲、天四张年画，\
我可以给你一次抽奖的机会，\
你将有机会获得海量经验，疾风，怒血，神合装备，\
以及星王，雷炎，王者，金牛等装备。\ \
回收牛气冲天年货/@牛气冲天1\
返回/@回收年货\
[@牛气冲天1]
#IF
random 300
checkitem 牛 1
checkitem 气 1
checkitem 冲 1
checkitem 天 1
#act
take 牛 1
take 气 1
take 冲 1
take 天 1
CALCVAR HUMAN 辉煌牛气冲天计数 + 1
SAVEVAR HUMAN 辉煌牛气冲天计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @牛气辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\金牛奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
random 100
checkitem 牛 1
checkitem 气 1
checkitem 冲 1
checkitem 天 1
#act
take 牛 1
take 气 1
take 冲 1
take 天 1
CALCVAR HUMAN 辉煌牛气冲天计数 + 1
SAVEVAR HUMAN 辉煌牛气冲天计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @牛气辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\王者奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
random 30
checkitem 牛 1
checkitem 气 1
checkitem 冲 1
checkitem 天 1
#act
take 牛 1
take 气 1
take 冲 1
take 天 1
CALCVAR HUMAN 辉煌牛气冲天计数 + 1
SAVEVAR HUMAN 辉煌牛气冲天计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @牛气辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\狂雷奖励.txt S0
give $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了：$STR(S0)
BREAK
#IF
checkitem 牛 1
checkitem 气 1
checkitem 冲 1
checkitem 天 1
#act
take 牛 1
take 气 1
take 冲 1
take 天 1
CALCVAR HUMAN 辉煌牛气冲天计数 + 1
SAVEVAR HUMAN 辉煌牛气冲天计数 ..\QuestDiary\Data\辉煌累积次数.txt
GOTO @牛气辉煌
GetRandomName ..\QuestDiary\抽取变量\年货奖励\经验奖励.txt S0
changeexp + $STR(S0) 1
SENDMSG 0 恭喜：%s在回收年货牛气冲天获得了经验：$STR(S0)
BREAK
#IF
#SAY
你要兑换的年货在哪里？
[@牛气辉煌]
#IF
CHECKVAR HUMAN 辉煌印记牛气冲天计数 24
#ACT
CALCVAR HUMAN 辉煌牛气冲天计数 - 25
SAVEVAR HUMAN 辉煌牛气冲天计数 ..\QuestDiary\Data\辉煌累积次数.txt
CALCVAR HUMAN 辉煌印记数量 + 1
SAVEVAR HUMAN 辉煌印记数量 ..\QuestDiary\Data\辉煌印记数量.txt
SENDMSG 6 你的辉煌印记数量+1，当前辉煌印记数量：$HUMAN(辉煌印记数量)
GOTO @MAIN
BREAK
#ELSEACT
GOTO @MAIN
SENDMSG 6 当前兑换累计次数$HUMAN(辉煌牛气冲天计数)，累积满25次可获得辉煌印记1个。
BREAK
[@牛]
#if
checkitem 牛 1
#act
take 牛 1
changeexp + 5000000
SENDMSG 0 恭喜:[%s],成功兑换了一个牛字！得到大量经验大礼，在此祝愿他牛年发财！
#elsesay
如果你带来了，就快点交给我吧\
[@气]
#if
checkitem 气 1
#act
take 气 1
changeexp + 3000000
SENDMSG 0 恭喜:[%s],成功兑换了一个气字！得到大量经验大礼，在此祝愿他牛年发财！
#elsesay
如果你带来了，就快点交给我吧\
[@冲]
#if
checkitem 冲 1
#act
take 冲 1
changeexp + 1500000
SENDMSG 0 恭喜:[%s],成功兑换了一个冲字！得到大量经验大礼，在此祝愿他牛年发财！
#elsesay
如果你带来了，就快点交给我吧\
[@天]
#if
checkitem 天 1
#act
take 天 1
changeexp + 1300000
SENDMSG 0 恭喜:[%s],成功兑换了一个天字！得到大量经验大礼，在此祝愿他牛年发财！
#elsesay
如果你带来了，就快点交给我吧\
[@压岁]
#if
checkitem 压岁钱包 1
#act
take 压岁钱包 1
changeexp + 1600000
SENDMSG 0 恭喜:[%s],成功兑换了一个压岁钱包！得到大量经验大礼，在此祝愿他牛年发财！
#elsesay
如果你带来了，就快点交给我吧\
[@nn01]
#if
checkitem 年年有余(一) 1
#act
take 年年有余(一) 1
changeexp + 1000000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(一)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
[@nn02]
#if
checkitem 年年有余(二) 1
#act
take 年年有余(二) 1
changeexp + 1200000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(二)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
[@nn03]
#if
checkitem 年年有余(三) 1
#act
take 年年有余(三) 1
changeexp + 1300000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(三)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
[@nn04]
#if
checkitem 年年有余(四) 1
#act
take 年年有余(四) 1
changeexp + 1400000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(四)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
[@nn05]
#if
checkitem 年年有余(五) 1
#act
take 年年有余(五) 1
changeexp + 1500000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(五)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
[@nn06]
#if
checkitem 年年有余(六) 1
#act
take 年年有余(六) 1
changeexp + 1600000
SENDMSG 0 恭喜:[%s],成功兑换了年年有余(六)！得到大量经验大礼，在此祝他在新的一年里年年有余，岁岁平安，一年更比一年牛！
#elsesay
如果你带来了，就快点交给我吧\
;--------------------------------
[@长鞭炮(新)]
#if
checkitem 长鞭炮(新) 1
#act
take 长鞭炮(新) 1
changeexp + 1500000
SENDMSG 0 恭喜:[%s],成功兑换了一个长鞭炮(新)！得到大量经验大礼，在此祝愿他牛年发财！红红火火过牛年
#elsesay
如果你带来了，就快点交给我吧\
[@饺子(新)]
#if
checkitem 饺子(新) 1
#act
take 饺子(新) 1
changeexp + 1400000
SENDMSG 0 恭喜:[%s],成功兑换了一个饺子(新)！得到大量经验大礼，在此祝愿他牛年发财！红红火火过牛年
#elsesay
如果你带来了，就快点交给我吧\
[@礼品盒]
制作精致礼品盒/fcolor=249需要两个长鞭炮(新)/fcolor=249、两个饺子(新)/fcolor=249\
另外我需要一个精致包装纸/fcolor=249将礼品盒装起来，包装纸商城可以买到\
现在你带来了我所需要的材料了吗？\
\ \
是的，请现在就制作吧/@rmwt01\
\ \
这个，我还得去收集一下/@exit\
[@rmwt01]
#if
checkitem 长鞭炮(新) 2
checkitem 饺子(新) 2
checkitem 精致包装纸 1
#act
take 长鞭炮(新) 2
take 饺子(新) 2
take 精致包装纸 1
give 精致礼品盒 1
SENDMSG 0 恭喜:[%s],成功制作了一个精致礼品盒！了解详情请点击[%d]!
#elsesay
你的长鞭炮(新)呢？就赶快交给我吧！\
