欢迎访问 热血传奇_热血传奇官网_热血传奇下载_传奇手游网站

网通轻变传奇 传奇2017找漏洞 热血传奇苹果脚本 美味可口jjj 热血传奇倚天剑
您现在的位置: > 1.76传奇

最新官方传奇国外私服年货活动脚本传奇合击私服雄霸传奇明文分享

日期:2020-12-2 13:09:16 作者:


热血传奇ui[@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 挑战点数增加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(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(S9) @在线接收鲜花
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
b传奇私服新开reak
#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 辉煌年年有余计数 ..\Qu梁山传奇论坛estDiary\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
CAL圣天传奇CVAR 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 饺子(新195刺影传奇) 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
你的长鞭炮(新)呢?就赶快交给我吧!\

本文标签:圣王传奇新服找传奇来了客服电话秒提现传奇私服网站新开网魔兽热血传奇地图找传奇网站刚开一秒传奇新服新区传奇双挂调法传奇变态新开网站热血传奇qq礼包找传奇合击sf

以上就是《最新官方传奇国外私服年货活动脚本传奇合击私服雄霸传奇明文分享》内容,大家还想知道更多传奇私服内容,多多关注http://www.45j.net/gnjt1/55219.html