传奇翻牌活动脚本

[@main]
#IF
#ACT
OpenBigDialogBox
#SAY
<《本活动一天3次》：/SCOLOR=250>每天<10:30,14点,19点>举行！\
活动开始后,只要你参与就能获得<“幸运骰子”/SCOLOR=242>\
获得这些骰子就可以来找我<翻牌/SCOLOR=58>，我记得不是\
很清楚了，曾经有人在我这里翻过<终极装备/SCOLOR=253>！\
使用的骰子<越多/SCOLOR=250>，可以翻的牌就越多，得到\
奖励的<机会/SCOLOR=250>也就越多！\ \
<﹡/SCOLOR=58><使用一颗骰子翻牌/@使用一颗骰子翻牌>\
<﹡/SCOLOR=58><使用二颗骰子翻牌/@使用二颗骰子翻牌>\
<﹡/SCOLOR=58><使用三颗骰子翻牌/@使用三颗骰子翻牌>\
　\
<﹡/SCOLOR=250><我要用灵玉换取幸运骰子[url=]/@1q2e>\[/url]
;——————————————————————————————————
[@1q2e]
你有灵玉吗?每个<灵玉>可以换取3个幸运骰子哦。\
可以点击下面换取：\
　\
<【我确定用灵玉换取3个骰子】[url=]/@1q2e3q>\[/url]
　\
<【关闭】[url=]/@exit>\[/url]
[@1q2e3q]
#IF
checkitem 灵玉 1
#ACT
take 灵玉 1
give 幸运骰子 3
SENDMSG 6 恭喜您换得3颗幸运骰子!
#elseact
MESSAGEBOX 你没有灵玉,耍我玩呢?
[@使用一颗骰子翻牌]
#ACT
MESSAGEBOX 你有可能获得：1000-3000W的经验\　　　　　　　50-200元宝\　　　　　　　中等装备\　　　　　　　勋章材料\　　　　　　　转生材料
#SAY
　 <Img:7:0:-2:-20/@Exit>\ \
　<Img:36:0:-3:0/@翻牌1> <Img:36:0:-2:0/@翻牌1> <Img:36:0:-2:0/@翻牌1> <Img:36:0:-2:0/@翻牌1>\ \ \ \ \ \
[@翻牌1]
#IF
CheckItem 幸运骰子 1
#ACT
MOvR N89 1 8
GOTO @骰子判断1
Break
#ELSEACT
GuildNoticeMsg 58 255 【翻牌失败，我需要1颗幸运骰子】 SELF
Break
[@骰子判断1]
#IF
EQUAL N89 1
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
GetRandomText .\QuestDiary\数据\翻牌文件\骰子1颗.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 2
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
GetRandomText .\QuestDiary\数据\翻牌文件\骰子1颗宝珠.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 3
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
MOvR N88 10000000 30000000
CHANGEEXP + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]点经验】
MessAgeBox 【获得[<$STR(N88)>]点经验】
Break
Close
#IF
EQUAL N89 4
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
GIVE 1000万经验卷 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[1000万经验卷]】
MessAgeBox 【获得[1000万经验卷]】
Break
Close
#IF
RANDOM 3
EQUAL N89 5
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
GIVE 超级神水包 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[超级神水包]】
MessAgeBox 【获得[超级神水包]】
Break
Close
#IF
EQUAL N89 5
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
MOvR N88 10000000 50000000
CHANGEEXP + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]点经验】
MessAgeBox 【获得[<$STR(N88)>]点经验】
Break
Close
#IF
EQUAL N89 6
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
MOvR N88 50 200
GAMEGOLD + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]个元宝】
MessAgeBox 【获得[<$STR(N88)>]个元宝】
Break
Close
#IF
EQUAL N89 7
CheckItem 幸运骰子 1
#Act
Take 幸运骰子 1
MessAgeBox 【狠对不起，什么都没有获得】
Break
Close
;——————————————————————————————————
[@使用二颗骰子翻牌]
#ACT
MESSAGEBOX 你有可能获得：2000-8000万的经验\　　　　　　　100-400元宝\　　　　　　　高级装备\　　　　　　　高级勋章材料\　　　　　　　高级转生材料
#SAY
　 <Img:7:0:-2:-20/@Exit>\ \
　<Img:36:0:-3:0/@翻牌2> <Img:36:0:-2:0/@翻牌2> <Img:36:0:-2:0/@翻牌2> <Img:36:0:-2:0/@翻牌2>\ \ \ \ \ \
　<Img:36:0:-2:0/@翻牌2> <Img:36:0:-2:0/@翻牌2> <Img:36:0:-2:0/@翻牌2> <Img:36:0:-2:0/@翻牌2>\ \ \ \ \ \
[@翻牌2]
#IF
CheckItem 幸运骰子 2
#ACT
MOvR N89 1 8
GOTO @骰子判断2
Break
#ELSEACT
GuildNoticeMsg 58 255 【翻牌失败，我需要2颗幸运骰子】 SELF
Break
[@骰子判断2]
#IF
EQUAL N89 1
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
GetRandomText .\QuestDiary\数据\翻牌文件\骰子2颗.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 2
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
GetRandomText .\QuestDiary\数据\翻牌文件\骰子2颗宝珠.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 3
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
MOvR N88 20000000 80000000
CHANGEEXP + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]点经验】
MessAgeBox 【获得[<$STR(N88)>]点经验】
Break
Close
#IF
EQUAL N89 4
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
GIVE 超级神水包 3
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[超级神水3包]】
MessAgeBox 【获得[超级神水3包]】
Break
Close
#IF
EQUAL N89 5
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
GIVE 5000万经验卷 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[5000万经验卷]】
MessAgeBox 【获得[5000万经验卷]】
Break
Close
#IF
EQUAL N89 6
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
MOvR N88 100 400
GAMEGOLD + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]个元宝】
MessAgeBox 【获得[<$STR(N88)>]个元宝】
Break
Close
#IF
EQUAL N89 7
CheckItem 幸运骰子 2
#Act
Take 幸运骰子 2
MessAgeBox 【狠对不起，什么都没有获得】
Break
Close
;——————————————————————————————————
[@使用三颗骰子翻牌]
#ACT
MESSAGEBOX 你有可能获得：5000-1亿的经验　8%几率获得1亿-2亿经验\　　　　　　　200-800元宝　10%几率获得500-1000元宝\　　　　　　　终极装备\　　　　　　　终极勋章材料\　　　　　　　终极转生材料\　　　　　　　终极斗笠材料
#SAY
　 <Img:7:0:-2:-20/@Exit>\ \
　<Img:36:0:-3:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3>\ \ \ \ \ \
　<Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3>\ \ \ \ \ \
　<Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3> <Img:36:0:-2:0/@翻牌3>

[@翻牌3]
#IF
CheckGameGold > 499
CheckItem 幸运骰子 3
#ACT
MOvR N89 1 8
GOTO @骰子判断3
Break
#ELSEACT
GuildNoticeMsg 58 255 【翻牌失败，我需要3颗幸运骰子还有500元宝操作费用】 SELF
Break
[@骰子判断3]
#IF
RANDOM 60
EQUAL N89 4
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
MOvR N88 100000000 200000000
CHANGEEXP + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]点经验】
MessAgeBox 【获得[<$STR(N88)>]点经验】
Break
Close
#IF
RANDOM 80
EQUAL N89 4
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
MOvR N88 500 1000
GAMEGOLD + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]个元宝】
MessAgeBox 【获得[<$STR(N88)>]个元宝】
Break
Close

#IF
RANDOM 100
EQUAL N89 4
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
GetRandomText .\QuestDiary\数据\翻牌文件\七剑装备.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close

#IF
EQUAL N89 1
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
GetRandomText .\QuestDiary\数据\翻牌文件\骰子3颗.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 2
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
GetRandomText .\QuestDiary\数据\翻牌文件\骰子3颗宝珠.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 3
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
MOvR N88 50000000 100000000
CHANGEEXP + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]点经验】
MessAgeBox 【获得[<$STR(N88)>]点经验】
Break
Close
#IF
EQUAL N89 4
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GIVE 超级神水盒 1
GameGold - 500
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[超级神水盒]】
MessAgeBox 【获得[超级神水盒]】
Break
Close
#IF
EQUAL N89 5
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GIVE 5000万经验卷 1
GameGold - 500
GetRandomText .\QuestDiary\数据\翻牌文件\进贡物品.txt S0
GIVE <$STR(S0)> 1
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(S0)>]+5000万经验卷】
MessAgeBox 【获得[<$STR(S0)>]】
Break
Close
#IF
EQUAL N89 6
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
MOvR N88 200 800
GAMEGOLD + <$STR(N88)>
GuildNoticeMsg 241 255 【玩家(%s)翻开扑克牌，意外的获得了[<$STR(N88)>]个元宝】
MessAgeBox 【获得[<$STR(N88)>]个元宝】
Break
Close
#IF
EQUAL N89 7
CheckGameGold > 499
CheckItem 幸运骰子 3
#Act
Take 幸运骰子 3
GameGold - 500
MessAgeBox 【狠对不起，什么都没有获得】
Break
Close