七夕情人节传奇活动送花功能添加方法
在土城添加一个NPC脚本内容如下
[@MAIN]
<花仙子:/FCOLOR=150>\
鲜花赠佳人,美人爱鲜花。公子若有意中人,不妨在此赠送她一束\
鲜花表明心迹。\
<--------------------------------------------------------------/FCOLOR=230>\
<您的魅力值:/FCOLOR=250>[<$HUMAN(鲜花)>]<朵/FCOLOR=250>\
<可收红玫瑰:/FCOLOR=250>[<$HUMAN(天红玫瑰)>]<次/FCOLOR=250>\
<可收蓝玫瑰:/FCOLOR=250>[<$HUMAN(天蓝玫瑰)>]<次/FCOLOR=250>\
<[每日只能赠送一定次数的玫瑰,请珍惜机会]/FCOLOR=230>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/@送玫瑰><○/FCOLOR=103><魅力排行榜/@排行><○/FCOLOR=103><离开/@EXIT>
[@排行]
#ACT
OPENMERCHANTBIGDLG43840000
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s10
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s21
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s32
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s43
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s54
#SAY
<花仙子:/FCOLOR=150>\
下面是鲜花美丽排行榜,排行榜每30分钟刷新一次!\
<排位 角色名称 魅力点/FCOLOR=254>\
1<$sTR(S$累s1)>\
2<$sTR(S$累s2)>\
3<$sTR(S$累s3)>\
4<$sTR(S$累s4)>\
5<$sTR(S$累s5)>\\
<○/FCOLOR=103><返回/@MAIN>
[@送玫瑰]
#IF
EQUALS13
#SAY
<花仙子:/FCOLOR=150>\
请先输入赠予人名单然后再选择赠送的种类和数量。每日只能送出\
10朵鲜花,每次送出对方都会获得经验和魅力点!\
<--------------------------------------------------------------/FCOLOR=230>\
<赠予人名:/FCOLOR=254><点击输入人名/@@InPutString13(请输入对方的角色名:)>\
<赠送鲜花:/FCOLOR=254><一支红玫瑰/FCOLOR=230><五支红玫瑰/FCOLOR=230><十支红玫瑰/FCOLOR=230>\
<一束红玫瑰/FCOLOR=230><五束红玫瑰/FCOLOR=230><十束红玫瑰/FCOLOR=230>\
<一束蓝玫瑰/FCOLOR=230><五束蓝玫瑰/FCOLOR=230><十束蓝玫瑰/FCOLOR=230>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/FCOLOR=230><○/FCOLOR=103><返回/@MAIN>
#ELSEACT
GOTO@InPutString13
[@InPutString13]
#IF
CHECKTEXTLIST..\QuestDiary\数据文件\玩家名字.txt<$STR(S13)>
#ELSEACT
MESSAGEBOX错误提示:\ \玩家名字错误,游戏内没有该玩家!请重新输入!
break
#IF
S13.checkonline
#SAY
<花仙子:/FCOLOR=150>\
请先输入赠予人名单然后再选择赠送的种类和数量。每日只能送出\
10朵鲜花,每次送出都会获得经验!\
<--------------------------------------------------------------/FCOLOR=230>\
<赠予人名:/FCOLOR=254>[{<$STR(S13)>/FCOLOR=251}]<重新输入/@@InPutString13(请输入对方的角色名:)>\
<赠送鲜花:/FCOLOR=254><一支红玫瑰{FCOLOR=250}/@1支红><五支红玫瑰{FCOLOR=250}/@5支红><十支红玫瑰{FCOLOR=250}/@10支红>\
<一束红玫瑰{FCOLOR=250}/@1束红><五束红玫瑰{FCOLOR=250}/@5束红><十束红玫瑰{FCOLOR=250}/@10束红>\
<一束蓝玫瑰{FCOLOR=250}/@1束蓝><五束蓝玫瑰{FCOLOR=250}/@5束蓝><十束蓝玫瑰{FCOLOR=250}/@10束蓝>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/FCOLOR=230><○/FCOLOR=103><返回/@MAIN>
#ELSEACT
MESSAGEBOX错误提示:\ \该玩家不在线!你送给谁呢?
break
[@1支红]
#IF
S13.CHECKVARHUMAN天红玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰1
#ACT
TAKE一支红玫瑰1
S13.CALCVARHUMAN天红玫瑰-1
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+30
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1支红玫瑰。
S13.SENDMSG7[花仙子]:您收到一支红玫瑰,获得魅力30朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1支红玫瑰,获得了30朵魅力,100W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
[@5支红]
#IF
S13.CHECKVARHUMAN天红玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足5次,不能一次赠送他5支玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰5
#ACT
TAKE一支红玫瑰5
S13.CALCVARHUMAN天红玫瑰-5
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+150
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5支红玫瑰。
S13.SENDMSG7[花仙子]:您收到五支红玫瑰,获得魅力150朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5支红玫瑰,获得了150朵魅力,500w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
break
[@10支红]
#IF
S13.CHECKVARHUMAN天红玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足10次,不能一次赠送10支玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰10
#ACT
TAKE一支红玫瑰10
S13.CALCVARHUMAN天红玫瑰-10
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+300
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10支红玫瑰。
S13.SENDMSG7[花仙子]:您收到五支红玫瑰,获得魅力300朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10支红玫瑰,获得了300朵魅力,1000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
break
[@1束红]
#IF
S13.CHECKVARHUMAN天红玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰1
#ACT
TAKE一束红玫瑰1
S13.CALCVARHUMAN天红玫瑰-1
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+100
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1束红玫瑰。
S13.SENDMSG7[花仙子]:您收到一束红玫瑰,获得魅力100朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1束红玫瑰,获得了100朵魅力,500W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
[@5束红]
#IF
S13.CHECKVARHUMAN天红玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足5次,不能一次赠送他5束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰5
#ACT
TAKE一束红玫瑰5
S13.CALCVARHUMAN天红玫瑰-5
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+500
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5束红玫瑰。
S13.SENDMSG7[花仙子]:您收到五束红玫瑰,获得魅力500朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5束红玫瑰,获得了500朵魅力,2500w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
break
[@10束红]
#IF
S13.CHECKVARHUMAN天红玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足10次,不能一次赠送10束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰10
#ACT
TAKE一束红玫瑰10
S13.CALCVARHUMAN天红玫瑰-10
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+1000
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10束红玫瑰。
S13.SENDMSG7[花仙子]:您收到五束红玫瑰,获得魅力1000朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10束红玫瑰,获得了1000朵魅力,5000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
break
[@1束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰1
#ACT
TAKE一束蓝玫瑰1
S13.CALCVARHUMAN天蓝玫瑰-1
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+999
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到一束蓝玫瑰,获得魅力999朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1束蓝玫瑰,获得了999朵魅力,1000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
[@5束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰的次数不足5次,不能一次赠送他5束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰5
#ACT
TAKE一束蓝玫瑰5
S13.CALCVARHUMAN天蓝玫瑰-5
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+4995
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到五束蓝玫瑰,获得魅力500朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5束蓝玫瑰,获得了4995朵魅力,5000w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
break
[@10束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰的次数不足10次,不能一次赠送10束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰10
#ACT
TAKE一束蓝玫瑰10
S13.CALCVARHUMAN天蓝玫瑰-10
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+9999
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到五束蓝玫瑰,获得魅力9999朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10束蓝玫瑰,获得了9999朵魅力,1亿经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
break
在土城添加一个NPC脚本内容如下
[@MAIN]
<花仙子:/FCOLOR=150>\
鲜花赠佳人,美人爱鲜花。公子若有意中人,不妨在此赠送她一束\
鲜花表明心迹。\
<--------------------------------------------------------------/FCOLOR=230>\
<您的魅力值:/FCOLOR=250>[<$HUMAN(鲜花)>]<朵/FCOLOR=250>\
<可收红玫瑰:/FCOLOR=250>[<$HUMAN(天红玫瑰)>]<次/FCOLOR=250>\
<可收蓝玫瑰:/FCOLOR=250>[<$HUMAN(天蓝玫瑰)>]<次/FCOLOR=250>\
<[每日只能赠送一定次数的玫瑰,请珍惜机会]/FCOLOR=230>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/@送玫瑰><○/FCOLOR=103><魅力排行榜/@排行><○/FCOLOR=103><离开/@EXIT>
[@排行]
#ACT
OPENMERCHANTBIGDLG43840000
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s10
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s21
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s32
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s43
GetRandomText..\QuestDiary\数据文件\鲜花排行.txtS$累s54
#SAY
<花仙子:/FCOLOR=150>\
下面是鲜花美丽排行榜,排行榜每30分钟刷新一次!\
<排位 角色名称 魅力点/FCOLOR=254>\
1<$sTR(S$累s1)>\
2<$sTR(S$累s2)>\
3<$sTR(S$累s3)>\
4<$sTR(S$累s4)>\
5<$sTR(S$累s5)>\\
<○/FCOLOR=103><返回/@MAIN>
[@送玫瑰]
#IF
EQUALS13
#SAY
<花仙子:/FCOLOR=150>\
请先输入赠予人名单然后再选择赠送的种类和数量。每日只能送出\
10朵鲜花,每次送出对方都会获得经验和魅力点!\
<--------------------------------------------------------------/FCOLOR=230>\
<赠予人名:/FCOLOR=254><点击输入人名/@@InPutString13(请输入对方的角色名:)>\
<赠送鲜花:/FCOLOR=254><一支红玫瑰/FCOLOR=230><五支红玫瑰/FCOLOR=230><十支红玫瑰/FCOLOR=230>\
<一束红玫瑰/FCOLOR=230><五束红玫瑰/FCOLOR=230><十束红玫瑰/FCOLOR=230>\
<一束蓝玫瑰/FCOLOR=230><五束蓝玫瑰/FCOLOR=230><十束蓝玫瑰/FCOLOR=230>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/FCOLOR=230><○/FCOLOR=103><返回/@MAIN>
#ELSEACT
GOTO@InPutString13
[@InPutString13]
#IF
CHECKTEXTLIST..\QuestDiary\数据文件\玩家名字.txt<$STR(S13)>
#ELSEACT
MESSAGEBOX错误提示:\ \玩家名字错误,游戏内没有该玩家!请重新输入!
break
#IF
S13.checkonline
#SAY
<花仙子:/FCOLOR=150>\
请先输入赠予人名单然后再选择赠送的种类和数量。每日只能送出\
10朵鲜花,每次送出都会获得经验!\
<--------------------------------------------------------------/FCOLOR=230>\
<赠予人名:/FCOLOR=254>[{<$STR(S13)>/FCOLOR=251}]<重新输入/@@InPutString13(请输入对方的角色名:)>\
<赠送鲜花:/FCOLOR=254><一支红玫瑰{FCOLOR=250}/@1支红><五支红玫瑰{FCOLOR=250}/@5支红><十支红玫瑰{FCOLOR=250}/@10支红>\
<一束红玫瑰{FCOLOR=250}/@1束红><五束红玫瑰{FCOLOR=250}/@5束红><十束红玫瑰{FCOLOR=250}/@10束红>\
<一束蓝玫瑰{FCOLOR=250}/@1束蓝><五束蓝玫瑰{FCOLOR=250}/@5束蓝><十束蓝玫瑰{FCOLOR=250}/@10束蓝>\
<--------------------------------------------------------------/FCOLOR=230>\
<○/FCOLOR=103><赠送玫瑰/FCOLOR=230><○/FCOLOR=103><返回/@MAIN>
#ELSEACT
MESSAGEBOX错误提示:\ \该玩家不在线!你送给谁呢?
break
[@1支红]
#IF
S13.CHECKVARHUMAN天红玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰1
#ACT
TAKE一支红玫瑰1
S13.CALCVARHUMAN天红玫瑰-1
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+30
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1支红玫瑰。
S13.SENDMSG7[花仙子]:您收到一支红玫瑰,获得魅力30朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1支红玫瑰,获得了30朵魅力,100W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
[@5支红]
#IF
S13.CHECKVARHUMAN天红玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足5次,不能一次赠送他5支玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰5
#ACT
TAKE一支红玫瑰5
S13.CALCVARHUMAN天红玫瑰-5
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+150
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5支红玫瑰。
S13.SENDMSG7[花仙子]:您收到五支红玫瑰,获得魅力150朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5支红玫瑰,获得了150朵魅力,500w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
break
[@10支红]
#IF
S13.CHECKVARHUMAN天红玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足10次,不能一次赠送10支玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一支红玫瑰10
#ACT
TAKE一支红玫瑰10
S13.CALCVARHUMAN天红玫瑰-10
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+300
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10支红玫瑰。
S13.SENDMSG7[花仙子]:您收到五支红玫瑰,获得魅力300朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10支红玫瑰,获得了300朵魅力,1000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10支红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
S13.CHANGEEXP+1000000
break
[@1束红]
#IF
S13.CHECKVARHUMAN天红玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰1
#ACT
TAKE一束红玫瑰1
S13.CALCVARHUMAN天红玫瑰-1
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+100
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1束红玫瑰。
S13.SENDMSG7[花仙子]:您收到一束红玫瑰,获得魅力100朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1束红玫瑰,获得了100朵魅力,500W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
[@5束红]
#IF
S13.CHECKVARHUMAN天红玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足5次,不能一次赠送他5束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰5
#ACT
TAKE一束红玫瑰5
S13.CALCVARHUMAN天红玫瑰-5
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+500
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5束红玫瑰。
S13.SENDMSG7[花仙子]:您收到五束红玫瑰,获得魅力500朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5束红玫瑰,获得了500朵魅力,2500w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
break
[@10束红]
#IF
S13.CHECKVARHUMAN天红玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到红玫瑰的次数不足10次,不能一次赠送10束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束红玫瑰10
#ACT
TAKE一束红玫瑰10
S13.CALCVARHUMAN天红玫瑰-10
S13.SAVEVARHUMAN天红玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+1000
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10束红玫瑰。
S13.SENDMSG7[花仙子]:您收到五束红玫瑰,获得魅力1000朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10束红玫瑰,获得了1000朵魅力,5000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10束红玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
S13.CHANGEEXP+5000000
break
[@1束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰=0
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰次数已满10次,不能再赠送了!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰1
#ACT
TAKE一束蓝玫瑰1
S13.CALCVARHUMAN天蓝玫瑰-1
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+999
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>1束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到一束蓝玫瑰,获得魅力999朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了1束蓝玫瑰,获得了999朵魅力,1000W经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有1束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
[@5束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰<5
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰的次数不足5次,不能一次赠送他5束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰5
#ACT
TAKE一束蓝玫瑰5
S13.CALCVARHUMAN天蓝玫瑰-5
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+4995
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>5束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到五束蓝玫瑰,获得魅力500朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了5束蓝玫瑰,获得了4995朵魅力,5000w经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有5束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
break
[@10束蓝]
#IF
S13.CHECKVARHUMAN天蓝玫瑰<10
#SAY
<花仙子:/FCOLOR=150>\
<$STR(S13)>今日收到蓝玫瑰的次数不足10次,不能一次赠送10束玫瑰!\\
<○/FCOLOR=103><返回/@MAIN>
#ACT
break
#IF
S13.checkonline
#ELSESAY
<花仙子:/FCOLOR=150>\
该玩家不在线,没办法将鲜花送过去\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
CHECKITEM一束蓝玫瑰10
#ACT
TAKE一束蓝玫瑰10
S13.CALCVARHUMAN天蓝玫瑰-10
S13.SAVEVARHUMAN天蓝玫瑰..\QuestDiary\数据文件\鲜花.txt
S13.CALCVARHUMAN鲜花+9999
S13.SAVEVARHUMAN鲜花..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG7[花仙子]:您赠送给<$STR(S13)>10束蓝玫瑰。
S13.SENDMSG7[花仙子]:您收到五束蓝玫瑰,获得魅力9999朵,总计魅力<$HUMAN(鲜花)>朵。
S13.SENDMSG0{┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────→|7:0:0}
S13.SENDMSG0{└|7:0:0}{[花仙子]|251:0:0}{:[|103:0:1}{%s|251:0:1}{]收到了10束蓝玫瑰,获得了9999朵魅力,1亿经验|103:0:1}
#ELSESAY
<花仙子:/FCOLOR=150>\
您背包内没有10束蓝玫瑰\\
<○/FCOLOR=103><返回/@MAIN>
#ELSEACT
break
#IF
S13.SMALL<$LEVEL>99
#ACT
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
S13.CHANGEEXP+10000000
break

