传奇论坛论(2012/8/10)坛一条龙发布烟花仙子脚本

[@main]
#IF
equal G100 0
#ACT
#SAY
所有玩家都可以在我这里参加限时超额大礼活动，\
换取超值奖励，赢取海量经验及内功经验！\
只要消灭了殿堂里的怪物就可以领取奖励。\
不过每人每天不同档次的奖励均只能换取一次！\  \
<10个烟花(任务)兑换1个烟花/@烟花兑换EEG>\
<烟花（蛋糕）活动/@烟花蛋糕活动>\  \
<返回盟重/@回盟重>\
[@烟花蛋糕活动]
<烟花换取超额大礼/@超额大礼>                     <烟花超值内功大礼/@超值内功>\  \
<返回/@main>\
#ELSESAY
庆典殿堂活动还没到，详情请关注官方网站公布活动时间。\
[@烟花兑换EEG]
<10个烟花(任务)兑换1个烟花/@叠加烟花兑换烟花>\  \
<返回/@main>
[@叠加烟花兑换烟花]
#IF
CHECKKIMNEEDLE 烟花(任务) 10
#ACT
TAKEKIMNEEDLE 烟花(任务) 10
give 烟花 1
sendmsg 7 恭喜：你获得了：烟花
#SAY
烟花兑换成功！\  \
<10个烟花(任务)兑换1个烟花/@叠加烟花兑换烟花>\  \
<返回/@main>
#ELSESAY
你没有足够10个烟花(任务)，不能兑换。\  \
[@回盟重]
#IF
#ACT
MAPMOVE 3 333 333
[@超值内功]
用3个礼包和特惠礼包可以兑换<45万内功经验/FCOLOR=58>\
用8个礼包和特惠礼包可以兑换<120万内功经验/FCOLOR=58>\
用8个礼包、5个一心一意和特惠礼包可以兑换<270万内功经验/FCOLOR=58>\
用8个礼包、5个一心一意包、1个个性发型和特惠礼包\
可以兑换<720万内功经验/FCOLOR=58>\
用8个礼包、5个一心一意包、1个个性发型、1个烟花和特惠礼包\
可以兑换<1470万内功经验/FCOLOR=58>\  \
<兑换超值内功大礼/@兑换超值内礼>            <返回/@main>\
[@兑换超值内礼]
在兑换超值内功大礼前，请在包裹中预留10个以上的包裹空位，\
不然可能会造成收不到礼物哦！\  \
<用3个礼包和特惠礼包/@用特惠礼包03>     <用8个礼包和特惠礼包/@用特惠礼包08>\
<用8个礼包、5个一心一意包和特惠礼包/@用惠礼包001>\
<用8个礼包、5个一心一意包、1个个性发型和特惠礼包/@用特惠礼包002>\
<用8个礼包、5个一心一意包、1个个性发型、1个烟花和特惠礼包/@用特惠礼包003>\  \
<返回/@超值内功>\

[@用特惠礼包003]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\\庆典仙子内功名单\八特五心一性烟名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用8个礼包、5个一心一意、1个个性发型、\
1个烟花和特惠礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换八特五心一性烟奖励>\  \
<返回/@兑换超值内礼>\
[@换八特五心一性烟奖励]
#IF
checkitem 礼包 8
checkitem 一心一意包 5
checkitem 个性发型 1
checkitem 烟花 1
checkitem 特惠礼包 1
#act
DELAYGOTO 1 @给八特五心一性烟
#ELSESAY
如果你带来了足够的物品，就交给我吧！
[@给八特五心一性烟]
#IF
#act
take 礼包 8
take 一心一意包 5
take 个性发型 1
take 烟花 1
take 特惠礼包 1
CHANGENGEXP + 14700000
addnamelist ..\QuestDiary\\庆典仙子内功名单\八特五心一性烟名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家牛年大吉！
#SAY
你已成功兑换1470万内功经验奖励。\
[@用特惠礼包002]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\\庆典仙子内功名单\八特五心一性名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用8个礼包、5个一心一意、1个个性发型\
和特惠礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换八特五心一性奖励>\  \
<返回/@兑换超值内礼>\
[@换八特五心一性奖励]
#IF
checkitem 礼包 8
checkitem 一心一意包 5
checkitem 个性发型 1
checkitem 特惠礼包 1
#act
DELAYGOTO 1 @给八特五心一性
#ELSESAY
如果你带来了足够的物品，就交给我吧！
[@给八特五心一性]
#IF
#act
take 礼包 8
take 一心一意包 5
take 个性发型 1
take 特惠礼包 1
CHANGENGEXP + 7200000
addnamelist ..\QuestDiary\\庆典仙子内功名单\八特五心一性名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家牛年大吉！
#SAY
你已成功兑换720万内功经验奖励。\
[@用惠礼包001]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\\庆典仙子内功名单\八个特五个心名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用8个礼包、5个一心一意包和特惠礼包\
进行换取奖励是吗？\ \
<是的，进行换取奖励/@换八个特惠5个一心奖励>\  \
<返回/@兑换超值内礼>\
[@换八个特惠5个一心奖励]
#IF
checkitem 礼包 8
checkitem 一心一意包 5
checkitem 特惠礼包 1
#act
DELAYGOTO 1 @给八个特惠5个一心
#ELSESAY
如果你带来了足够的物品，就交给我吧！
[@给八个特惠5个一心]
#IF
#act
take 礼包 8
take 一心一意包 5
take 特惠礼包 1
CHANGENGEXP + 2700000
addnamelist ..\QuestDiary\\庆典仙子内功名单\八个特五个心名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家牛年大吉！
#SAY
你已成功兑换270万内功经验奖励。\
[@用特惠礼包08]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\\庆典仙子内功名单\八个特惠礼包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用8个礼包和特惠礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换八个特惠礼包奖励>\  \
<返回/@兑换超值内礼>\
[@换八个特惠礼包奖励]
#IF
checkitem 礼包 8
checkitem 特惠礼包 1
#act
DELAYGOTO 1 @给八个特惠礼包
#ELSESAY
如果你带来了足够的物品，就交给我吧！
[@给八个特惠礼包]
#IF
#act
take 礼包 8
take 特惠礼包 1
CHANGENGEXP + 1200000
addnamelist ..\QuestDiary\\庆典仙子内功名单\八个特惠礼包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家牛年大吉！
#SAY
你已成功兑换120万内功经验奖励。\
[@用特惠礼包03]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\\庆典仙子内功名单\三个特惠礼包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用3个礼包和特惠礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换三个特惠礼包奖励>\  \
<返回/@兑换超值内礼>\
[@换三个特惠礼包奖励]
#IF
checkitem 礼包 3
checkitem 特惠礼包 1
#act
DELAYGOTO 1 @给三个特惠礼包
#ELSESAY
如果你带来了足够的物品，就交给我吧！
[@给三个特惠礼包]
#IF
#act
take 礼包 3
take 特惠礼包 1
CHANGENGEXP + 450000
addnamelist ..\QuestDiary\\庆典仙子内功名单\三个特惠礼包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家牛年大吉！
#SAY
你已成功兑换45万内功经验奖励。\
[@超额大礼]
你可以换取以下四个档次的限额大礼，\
换取各种大礼需要提供的物品都不同，\
具体可点击各大礼选项查看。\
四种大礼每个角色每天都只领取一次，\
活动时间有限，请大家不要错过机会！\  \
<换取礼包大礼/@礼包大礼>           <换取一心一意大礼/@一意大礼>\
<换取个性发型大礼/@发型大礼>       <换取蛋糕烟花大礼/@蛋糕大礼>\
[@蛋糕大礼]
要获得烟花大礼需要给我<烟花>1个与\
<金创药(小量)>2个即可领取：4700万经验和168万内功经验\
如果这两样物品你都带来了那就交给我吧。\  \
<领取烟花大礼/@领取烟花礼>              <返回/@超额大礼>\
[@领取烟花礼]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\蛋糕烟花名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用庆典蛋糕和1个和2个金创药(小量)进行\
换取奖励是吗？\ \
<是的，进行换取奖励/@换蛋糕奖励>\  \
<返回/@礼包大礼>\
[@换蛋糕奖励]
#IF
checkitem 烟花 1
checkitem 金创药(小量) 2
#act
DELAYGOTO 1 @给蛋糕包
#ELSESAY
只要你有1个烟花和2个金创药(小量)就可以换取奖励，\
你带来庆典蛋糕和金创药(小量)了吗？\  \
<返回/@超额大礼>\
[@给蛋糕包]
#IF
#act
take 烟花 1
take 金创药(小量) 2
DELAYGOTO 1 @给个典蛋糕
[@给个典蛋糕]
#IF
#ACT
CHANGEEXP + 47000000
CHANGENGEXP + 1680000
GIVE 特惠礼包 1
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\蛋糕烟花名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取47000000经验和168万内功经验奖励。\
[@发型大礼]
要获得个性发型大礼需要给我<个性发型>1个与\
<金创药(中量)>2个即可领取：2700万经验和100万内功经验\
如果这两样物品你都带来了那就交给我吧。\  \
<领取个性发型大礼/@领取个性礼>              <返回/@超额大礼>\
[@领取个性礼]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\个性发型名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用个性发型1个和2个金创药(中量)进行\
换取奖励是吗？\ \
<是的，进行换取奖励/@换发型奖励>\  \
<返回/@礼包大礼>\
[@换发型奖励]
#IF
checkitem 个性发型 1
checkitem 金创药(中量) 2
#act
DELAYGOTO 1 @给个性包
#ELSESAY
只要你有1个个性发型和2个金创药(中量)就可以换取奖励，\
你带来个性发型和金创药(中量)了吗？\  \
<返回/@超额大礼>\
[@给个性包]
#IF
#act
take 个性发型 1
take 金创药(中量) 2
DELAYGOTO 1 @给个性金创
[@给个性金创]
#IF
#ACT
CHANGEEXP + 27000000
CHANGENGEXP + 1000000
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\个性发型名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取27000000经验和100万内功经验奖励。\
[@一意大礼]
要获得一心一意包大礼需要给我<一心一意包>5个与\
<强效金创药>2个即可领取：900万经验与32万内功经验\
如果这两样物品你都带来了那就交给我吧。\  \
<领取一心一意包大礼/@领取一意礼>              <返回/@超额大礼>\
[@领取一意礼]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\一心一意包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用5个一心一意包和2个强效金创药进行\
换取奖励是吗？\ \
<是的，进行换取奖励/@换五心奖励>\  \
<返回/@礼包大礼>\
[@换五心奖励]
#IF
checkitem 一心一意包 5
checkitem 强效金创药 2
#act
DELAYGOTO 1 @给五心包
#ELSESAY
只要你有5个一心一意包和2个强效金创药就可以换取奖励，\
你带来一心一意包和强效金创药了吗？\  \
<返回/@超额大礼>\
[@给五心包]
#IF
#act
take 一心一意包 5
take 强效金创药 2
DELAYGOTO 1 @给五包心意
[@给五包心意]
#IF
#ACT
CHANGEEXP + 9000000
CHANGENGEXP + 320000
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\一心一意包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取9000000经验和32万内功经验奖励。\
[@礼包大礼]
礼包大礼共分三个档次，需要提供的礼包数量都不同，\
给予的奖励也不相同。\
三种档次的礼包大礼每个角色每天都可以领取一次。\
使用1个礼包可以换取：90万经验和3万内功经验\
使用3个礼包可以换取：270万经验和10万内功经验\
使用5个礼包可以换取：450万经验和16万内功经验\
<使用1个礼包换取礼包大礼/@一礼换取>        <使用3个礼包换取礼包大礼/@三礼换取>\ \
<使用5个礼包换取礼包大礼/@五礼换取>\
[@五礼换取]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\五个礼包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用5个礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换五礼奖励>\  \
<返回/@礼包大礼>\
[@换五礼奖励]
#IF
checkitem 礼包 5
#act
DELAYGOTO 1 @给五礼包
#ELSESAY
只要你有5个礼包就可以换取奖励，你带来礼包了吗？\  \
<返回/@超额大礼>\
[@给五礼包]
#IF
#act
take 礼包 5
DELAYGOTO 1 @给五个礼包
[@给五个礼包]
#IF
#ACT
CHANGEEXP + 4500000
CHANGENGEXP + 160000
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\五个礼包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取4500000经验和16万内功经验奖励。\
[@三礼换取]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\三个礼包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用3个礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换三礼奖励>\  \
<返回/@礼包大礼>\
[@换三礼奖励]
#IF
checkitem 礼包 3
#act
DELAYGOTO 1 @给三礼包
#ELSESAY
只要你有3个礼包就可以换取奖励，你带来礼包了吗？\  \
<返回/@超额大礼>\
[@给三礼包]
#IF
#act
take 礼包 3
DELAYGOTO 1 @给三个礼包
[@给三个礼包]
#IF
#ACT
CHANGEEXP + 2700000
CHANGENGEXP + 100000
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\三个礼包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取2700000经验和10万内功经验奖励。\
[@一礼换取]
#IF
CheckRangeMonCount <$MAP> 21 26 10 > 0
#SAY
目前还没有消灭所有怪物，不能领取奖励！
#ACT
BREAK
#IF
checknamelist ..\QuestDiary\数据文件\庆典仙子名单\一个礼包名单.txt
#say
此项档次你已经兑换过了，或者你明天再来继续兑换吧。\
#ELSESAY
你选择了使用1个礼包进行换取奖励是吗？\ \
<是的，进行换取奖励/@换一礼奖励>\  \
<返回/@礼包大礼>\
[@换一礼奖励]
#IF
checkitem 礼包 1
#act
DELAYGOTO 1 @给一礼包
#ELSESAY
只要你有1个礼包就可以换取奖励，你带来礼包了吗？\  \
<返回/@超额大礼>\
[@给一礼包]
#IF
#act
take 礼包 1
DELAYGOTO 1 @给一个礼包
[@给一个礼包]
#IF
#ACT
CHANGEEXP + 900000
CHANGENGEXP + 30000
addnamelist ..\QuestDiary\数据文件\庆典仙子名单\一个礼包名单.txt
SENDMSG 0 恭喜：<$USERNAME>在庆典仙子处获得超额大礼，祝所有玩家游戏愉快。
goto @main
#SAY
你已成功换取900000经验和3万内功经验奖励。\


论坛一条龙

突然觉得楼主说的很有道理，赞一个！

楼主的帖子越来越有深度了！

好好学习楼主的帖子！

管它三七二十一！

世界末日我都挺过去了，看到楼主我才知道为什么上帝留我到现在！