在土城添加一个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
OPENMERCHANTBIGDLG 4 384 0 0 0 0
GetRandomText ..\QuestDiary\数据文件\鲜花排行.txt S$累s1 0
GetRandomText ..\QuestDiary\数据文件\鲜花排行.txt S$累s2 1
GetRandomText ..\QuestDiary\数据文件\鲜花排行.txt S$累s3 2
GetRandomText ..\QuestDiary\数据文件\鲜花排行.txt S$累s4 3
GetRandomText ..\QuestDiary\数据文件\鲜花排行.txt S$累s5 4
#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
EQUAL S13
#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 @InPutStr经典传奇私服ing13

[@InPutString13]
#IF
CHECKTEXTLIST ..\QuestDiary\数据文件\玩家名字.txt $STR(S新开英雄合击13)
#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.CHECKVAR HUMAN 天红玫瑰 = 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.CALCVAR HUMAN 天红玫瑰 - 1
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 30
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)1支红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到一支红玫瑰，获得魅力30朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天红玫瑰 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.CALCVAR HUMAN 天红玫瑰 - 5
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 150
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)5支红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五支红玫瑰，获得魅力150朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天红玫瑰 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.CALCVAR HUMAN 天红玫瑰 - 10
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 300
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)10支红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五支红玫瑰，获得魅力300朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天红玫瑰 = 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.CALCVAR HUMAN 天红玫瑰 - 1
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 100
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)1束红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到一束红玫瑰，获得魅力100朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天红玫瑰 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.CALCVAR HUMAN 天红玫瑰 - 5
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 500
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)5束红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五束红玫瑰，获得魅力500朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天红玫瑰 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.CALCVAR HUMAN 天红玫瑰 - 10
S13.SAVEVAR HUMAN 天红玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 1000
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)10束红玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五束红玫瑰，获得魅力1000朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天蓝玫瑰 = 0
#SAY
花仙子：/FCOLOR=150\
　　$STR(S13)今日收到蓝玫瑰次数已满10次，不能再赠送了！\ \
○/FCOLOR=103返回/@MAIN
#ACT
break
#IF
S13.checkonline
#ELSESAY
花仙子：/FCOLOR=150\
　　该玩家不在线，没办法将鲜花送过去\ \
○/FCOLOR=103返回/@MAIN
#ELSEACT
break
#IF
CH最新网通私服ECKITEM 一束蓝玫瑰 1
#ACT
TAKE 一束蓝玫瑰 1
S13.CALCVAR HUMAN 天蓝玫瑰 - 1
S13.SAVEVAR HUMAN 天蓝玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 999
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)1束蓝玫瑰。
S13.SENDMSG 7 [花仙子]：您收到一束蓝玫瑰，获得魅力999朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天蓝玫瑰 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.CALCVAR HUMAN 天蓝玫瑰 - 5
S13.SAVEVAR HUMAN 天蓝玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 4995
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)5束蓝玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五束蓝玫瑰，获得魅力500朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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.CHECKVAR HUMAN 天蓝玫瑰 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.CALCVAR HUMAN 天蓝玫瑰 - 10
S13.SAVEVAR HUMAN 天蓝玫瑰 ..\QuestDiary\数据文件\鲜花.txt
S13.CALCVAR HUMAN 鲜花 + 9999
S13.SAVEVAR HUMAN 鲜花 ..\QuestDiary\数据文件\鲜花数量.txt
SENDMSG 7 [花仙子]：您赠送给$STR(S13)10束蓝玫瑰。
S13.SENDMSG 7 [花仙子]：您收到五束蓝玫瑰，获得魅力9999朵，总计魅力$HUMAN(鲜花)朵。
S13.SENDMSG 0 {┌─────────────────|7:0:0}{游戏快讯|151:0:0}{──────────────────|7:0:0}
S13.SENDMSG 0 {└|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

TAGS：贪玩传奇世界