全新创意阴阳宝箱传奇私服脚本

全新创意阴阳宝箱传奇私服脚本[@main]
　　　　 <☆☆☆欢迎光临☆高几率☆宝箱中心☆☆☆/SCOLOR=242>
　　　　每开启一次宝箱都将获得<随机百万以上经验/SCOLOR=253>
　 　 <【本站承诺终极套装可以抽奖获得，几率适中】/SCOLOR=250>
　   ☆☆☆玩家注意:<游戏只是娱乐，请勿沉迷！/SCOLOR=249>☆☆☆
有别于所有其他的宝箱的功能，可以<随意调换即将抽取的所有物品/SCOLOR=250>
　　　　 　　　【<打开宝箱/@打开宝箱>】<需要元宝5000/SCOLOR=249>
 
　　　　　　　　　　　　　　 
[@打开宝箱]
#IF
CHECKGAMEGOLD > 4999
#ACT
GAMEGOLD - 5000
GetRandomText .QuestDiary数据文件物品列表.txt S1
GetRandomText .QuestDiary数据文件物品列表.txt S2
GetRandomText .QuestDiary数据文件物品列表.txt S3
GetRandomText .QuestDiary数据文件物品列表.txt S4
GetRandomText .QuestDiary数据文件物品列表.txt S5
GetRandomText .QuestDiary数据文件物品列表.txt S6
GOTO @开始高级宝箱
#ELSEACT
MESSAGEBOX 打开普通宝箱需要5000元宝,你的元宝数量不足..
[@开始高级宝箱]
您的宝箱可获得物品的列表如下： <免费/SCOLOR=253>『<更新物品列表/@更新物品列表>』一次机会
①：(<$STR(S1)>)
②：(<$STR(S2)>)
③：(<$STR(S3)>)
④：(<$STR(S4)>)
⑤：(<$STR(S5)>)
⑥：(<$STR(S6)>)
<摇到几点就可以获得几号装备。/SCOLOR=250> 【<开始摇骰子/@开始摇骰子高级>】
[@更新物品列表]
#IF
#ACT
GetRandomText .QuestDiary数据文件物品列表.txt S1
GetRandomText .QuestDiary数据文件物品列表.txt S2
GetRandomText .QuestDiary数据文件物品列表.txt S3
GetRandomText .QuestDiary数据文件物品列表.txt S4
GetRandomText .QuestDiary数据文件物品列表.txt S5
GetRandomText .QuestDiary数据文件物品列表.txt S6
GOTO @开始高级宝箱A
#ELSEACT
MESSAGEBOX 更换宝箱物品需要5000元宝,你的元宝数量不足..
[@开始高级宝箱A]
您<更换过后/SCOLOR=253>的宝箱可获得物品的列表如下：
①：(<$STR(S1)>)
②：(<$STR(S2)>)
③：(<$STR(S3)>)
④：(<$STR(S4)>)
⑤：(<$STR(S5)>)
⑥：(<$STR(S6)>)
<摇到几点就可以获得几号装备。/SCOLOR=250> 【<开始摇骰子/@开始摇骰子高级>】
[@开始摇骰子高级]
#ACT
movr N58 1 7
MOV d0 <$STR(N58)>
playdice 1 @高级运气
#say
　
【<正在考验您的运气.../SCOLOR=254>】
[@高级运气]
#IF
CHECKGAMEGOLD > 4999
equal d0 1
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S1)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S1)>)以及(<$STR(N48)>)点经验
goto @main
BREAK
#IF
CHECKGAMEGOLD > 4999
equal d0 2
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S2)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S2)>)以及(<$STR(N48)>)点经验
goto @main
BREAK
#IF
CHECKGAMEGOLD > 4999
equal d0 3
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S3)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S3)>)以及(<$STR(N48)>)点经验
goto @main
BREAK
#IF
CHECKGAMEGOLD > 4999
equal d0 4
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S4)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S4)>)以及(<$STR(N48)>)点经验
goto @main
BREAK
#IF
CHECKGAMEGOLD > 4999
equal d0 5
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S5)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S5)>)以及（<$STR(N48)>）点经验
goto @main
BREAK
#IF
CHECKGAMEGOLD > 4999
equal d0 6
#ACT
GAMEGOLD - 5000
movr N48 10000 5000000
CHANGEEXP + <$STR(N48)>
give <$STR(S6)> 1
GuildNoticeMsg 251 241 宝箱：(%s)开启富贵宝箱-获得了：(<$STR(S6)>)以及(<$STR(N48)>)点经验
goto @main
BREAK
#ELSEACT
MESSAGEBOX 摇动宝箱需要收取5000元宝，打开宝箱只需要5000元宝，价格很合理！