传奇贝利系统脚本

[@MAIN]
<◆◆◆◆◆/SCOLOR=241>   <您当前累计贝利数目：/SCOLOR=254><$HUMAN(贝利系统)>个   <◆◆◆◆◆/SCOLOR=241>\
★<[贝利系统介绍]>：<贝利是海贼王里面的通用货币！很多厉害的大海贼都是用贝利评价实力高低！/SCOLOR=253>\
★<[千万注意注意]>：<不同区千万不要使用相同名字！否则合区后贝利消失后果自负！强烈推荐合区时导出贝利/SCOLOR=250>>\
★<[贝利获得①号]>：<杀死BOSS获取/SCOLOR=6><(获得多少取决于BOSS厉害程度)/SCOLOR=5>\
★<[贝利获得②号]>：<每充值1000元宝能获得10贝利/SCOLOR=20>\
<───☆→─────────────────────←☆───/SCOLOR=3>\
●●●　　<[悬赏重地]/@悬赏重地>　　<[赏金重地]/@赏金重地>　　<[政府重地]/@政府重地>　　●●●\
●●●　　　　<[购买物品]/@购买>　　　<[导出贝利]/@导出>　　　　　　●●●\
<───☆→─────────────────────←☆───/SCOLOR=3>\

[@导出]
<───☆→─────────────────────←☆───/SCOLOR=3>\
★<[导出10贝利]/@10贝利>：<换成一张10贝利面币，为了防止合区重名丢失贝利/SCOLOR=250>\
★<[导出100贝利]/@100贝利>：<换成一张100贝利面币，为了防止合区重名丢失贝利/SCOLOR=250>\
★<[导出1000贝利]/@1000贝利>：<换成一张1000贝利面币，为了防止合区重名丢失贝利/SCOLOR=250>\
<───☆→─────────────────────←☆───/SCOLOR=3>\

[@10贝利]
#IF
CHECKVAR HUMAN 贝利系统 > 9
#ACT
CALCVAR HUMAN 贝利系统 - 10
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 10贝利 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]成功导出[10贝利]防止合区重名丢失贝利！
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@100贝利]
#IF
CHECKVAR HUMAN 贝利系统 > 99
#ACT
CALCVAR HUMAN 贝利系统 - 100
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 100贝利 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]成功导出[100贝利]防止合区重名丢失贝利！
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@1000贝利]
#IF
CHECKVAR HUMAN 贝利系统 > 999
#ACT
CALCVAR HUMAN 贝利系统 - 1000
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 1000贝利 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]成功导出[1000贝利]防止合区重名丢失贝利！
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@购买]
<───☆→─────────────────────←☆───/SCOLOR=3>\
★<[购买超级寻宝卷]/@超级寻宝>：<传送到6个打宝地图/SCOLOR=250><(需30贝利)>\
★<[购买２倍经验卷]/@2倍经验>：<快速冲级必备物品/SCOLOR=250><(需20贝利)>\
<───☆→─────────────────────←☆───/SCOLOR=3>\
★<[购买海楼石]/@海楼石>：<终极合成必备材料打BOSS也可爆/SCOLOR=253><(需300贝利)>\
★<[购买蓝波球]/@蓝波球>：<终极合成必备材料打BOSS也可爆/SCOLOR=253><(需300贝利)>\
<───☆→─────────────────────←☆───/SCOLOR=3>\

[@海楼石]
#IF
CHECKVAR HUMAN 贝利系统 > 299
#ACT
CALCVAR HUMAN 贝利系统 - 300
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 海楼石 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]使用贝利购买[海楼石]
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@蓝波球]
#IF
CHECKVAR HUMAN 贝利系统 > 299
#ACT
CALCVAR HUMAN 贝利系统 - 300
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 蓝波球 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]使用贝利购买[蓝波球]
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@2倍经验]
#IF
CHECKVAR HUMAN 贝利系统 > 19
#ACT
CALCVAR HUMAN 贝利系统 - 20
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 2倍经验卷 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]使用贝利购买[2倍经验卷]
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@超级寻宝]
#IF
CHECKVAR HUMAN 贝利系统 > 29
#ACT
CALCVAR HUMAN 贝利系统 - 30
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
GIVE 超级寻宝卷 1
GuildNoticeMsg 4 255 ‖贝利系统‖：恭喜玩家[%s]使用贝利购买[超级寻宝卷]
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能购买                 <返    回/@MAIN>\

[@悬赏重地]
<1>：进入本地图需要50贝利\
<2>：本地图30分钟后自动返回\
<3>：本地图BOSS爆率非常好但杀死BOSS没有贝利\
<4>：实力不够请不要进去送死(推荐战士、道士)\ \
<进入悬赏重地/@悬赏重地1>\


[@悬赏重地1]
#IF
CHECKVAR HUMAN 贝利系统 > 49
#ACT
CALCVAR HUMAN 贝利系统 - 50
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
TimeRecall 30
mapmove xs
GuildNoticeMsg 4 255 ‖贝利系统‖：玩家[%s]偷偷摸摸地进入了[悬赏重地]···
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能进入                 <返    回/@MAIN>\


[@赏金重地]
<1>：进入本地图需要50贝利\
<2>：本地图30分钟后自动返回\
<3>：本地图BOSS爆率非常好但杀死BOSS没有贝利\
<4>：实力不够请不要进去送死(推荐战士、道士)\ \
<进入赏金重地/@赏金重地1>\

[@赏金重地1]
#IF
CHECKVAR HUMAN 贝利系统 > 49
#ACT
CALCVAR HUMAN 贝利系统 - 50
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
TimeRecall 30
mapmove sj
GuildNoticeMsg 4 255 ‖贝利系统‖：玩家[%s]偷偷摸摸地进入了[赏金重地]···
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能进入                 <返    回/@MAIN>\

[@政府重地]
<1>：进入本地图需要50贝利\
<2>：本地图30分钟后自动返回\
<3>：本地图10分钟刷1次\
<4>：实力不够请不要进去送死(推荐法师)\ \
<进入政府重地/@政府重地1>\


[@政府重地1]
#IF
CHECKVAR HUMAN 贝利系统 > 49
#ACT
CALCVAR HUMAN 贝利系统 - 50
SAVEVAR HUMAN 贝利系统 ..\QuestDiary\富豪榜单\贝利系统Save.txt
TimeRecall 30
mapmove zf
GuildNoticeMsg 4 255 ‖贝利系统‖：玩家[%s]偷偷摸摸地进入了[政府重地]···
SENDMSG 5 谢谢支持→您现在的贝利数目：<$HUMAN(贝利系统)>
BREAK
#ELSESAY
首先感谢大家对我们的赞助，有你们的支持，我们才会更加完美。\ \
您现在的贝利数目：<$HUMAN(贝利系统)>\ \
暂时还不能进入                 <返    回/@MAIN>\