[@天财宝库]
{
#IF
#ACT
;初始化变量
;设定是否开启全服公告1开启0普通提示
MOV N$TcbkMSGType 1
;初始化其他变量数据
MOV N$TcbkType 0
MOV N$TcbkSLC 0
MOV N$ITEMSHOWIDA -1
MOV N$ITEMSHOWNUMA 0
MOV N$ITEMSHOWIDB -1
MOV N$ITEMSHOWNUMB 0
MOV N$ITEMSHOWIDC -1
MOV N$ITEMSHOWNUMC 0
MOV N$ITEMSHOWIDD -1
MOV N$ITEMSHOWNUMD 0
MOV N$ITEMSHOWIDE -1
MOV N$ITEMSHOWNUME 0
MOV N$ITEMSHOWIDF -1
MOV N$ITEMSHOWNUMF 0
MOV N$ITEMSHOWIDG -1
MOV N$ITEMSHOWNUMG 0
MOV N$ITEMSHOWIDH -1
MOV N$ITEMSHOWNUMH 0
MOV N$ITEMSHOWIDI -1
MOV N$ITEMSHOWNUMI 0
MOV N$ITEMSHOWIDJ -1
MOV N$ITEMSHOWNUMJ 0
;打开指定对话框背景
OpenBigDialogBox 4 665 1 285 39
#SAY
;最大长度为21个中文,12行
\ \ \
<天材地宝,天财宝库。欲窥探其中奥秘!/AUTOCOLOR=243,251,243,186> [<关闭/@关闭>]\
<需带来开启宝库大门的钥匙!稀世珍宝尽在此!/AUTOCOLOR=243,251,243,186>\ \
<请选择欲购买钥匙的币种:/FCOLOR=250> <(开启限制[30]级)/FCOLOR=249>\ \
『<60 万金币/@金币一次>』x1把 『<100 元宝/@元宝一次>』x1把\ \
『<550万金币/@金币十次>』x10把 『<880 元宝/@元宝十次>』x10把\ \
<注意:十连抽更划算,且必出一件稀有物品!/FCOLOR=254>\ \
[@关闭]
#IF
#ACT
CloseBigDialogBox
Close
;==================== 开始分类 赋值宝箱类型N$TCBKTYPE(用于付款时检测)
[@金币一次]
#IF
CheckGold 600000
CHECKLEVELEX > 29
#ACT
MOV N$TcbkType 1
GOTO @开始抽
#ELSEACT
GOTO @钱不够
[@金币十次]
#IF
CheckGold 5500000
CHECKLEVELEX > 29
#ACT
MOV N$TcbkType 2
GOTO @开始抽
#ELSEACT
GOTO @钱不够
[@元宝一次]
#IF
CHECKGAMEGOLD > 99
CHECKLEVELEX > 29
#ACT
MOV N$TcbkType 3
GOTO @开始抽
#ELSEACT
GOTO @钱不够
[@元宝十次]
#IF
CHECKGAMEGOLD > 879
CHECKLEVELEX > 29
#ACT
MOV N$TcbkType 4
GOTO @开始抽
#ELSEACT
GOTO @钱不够
[@钱不够]
#IF
#ACT
OpenBigDialogBox 4 665 1 285 39
#SAY
\ \ \ \
<非常抱歉,您看起来不像有钱人啊?您背包里/FCOLOR=250>\
<的钱根本不够买这些钥匙!要知道我们宝库的/FCOLOR=250>\
<钥匙是可遇不可求的喔,你再积攒点钱再来吧!/FCOLOR=250>\ \
<或者您的等级还不足以驾驭这个宝库,再练练!/FCOLOR=249>\
<再来吧!/FCOLOR=249>\
\ \
[<返回/@天财宝库>] [<关闭/@关闭>]
;======================= 分类显示
[@开始抽]
#IF
#ACT
OpenBigDialogBox 4 665 1 285 39
#SAY
;==================================================↓这里的 Img:1358 自行修改为您自己的图片,否则可能什么都看不到
\ \ \
<┏~※~━━天━财━∧━宝━库━━~※~┓/AUTOCOLOR=243,251,243,186>\
<┃ ┃/AUTOCOLOR=243,251,243,186>\
<┃钱/AUTOCOLOR=243,251,243,186> <Img:1358:0:0:0|250#点击打开宝库,获取无尽稀世珍品!/@打开宝库> <千┃/AUTOCOLOR=243,251,243,186>\
<┃财 金┃/AUTOCOLOR=243,251,243,186>\
<┃皆 散┃/AUTOCOLOR=243,251,243,186>\
<┃是 尽┃/AUTOCOLOR=243,251,243,186>\
<┃身 还┃/AUTOCOLOR=243,251,243,186>\
<┃外/AUTOCOLOR=243,251,243,186> <▲注意清理背包▲/FCOLOR=251> <复┃/AUTOCOLOR=243,251,243,186>\
<┃物 来┃/AUTOCOLOR=243,251,243,186>\
<┃/AUTOCOLOR=243,251,243,186> <≮抽取宝物后才会扣除您的钥匙费用≯/FCOLOR=253> <┃/AUTOCOLOR=243,251,243,186>\
<┃ ┃/AUTOCOLOR=243,251,243,186>\
<┗~※~━━稀━世━∧━奇━珍━━~※~┛/AUTOCOLOR=243,251,243,186>\
[<返回/@天财宝库>]\
;======================= 开始抽奖
[@打开宝库]
#IF
#ACT
OpenBigDialogBox 4 665 1 285 39
;延迟跳转显示 开启中...
MOV N$TcbkSLC 0
DELAYGOTO 2000 @开启执行
#SAY
\ \ \
<┏~※~━━天━财━∧━宝━库━━~※~┓/AUTOCOLOR=243,251,243,186>\
<┃ ┃/AUTOCOLOR=243,251,243,186>\
<┃钱 千┃/AUTOCOLOR=243,251,243,186>\
<┃财/AUTOCOLOR=243,251,243,186> <宝库之神为您开启中/FCOLOR=250> <金┃/AUTOCOLOR=243,251,243,186>\
<┃皆/AUTOCOLOR=243,251,243,186> <请稍候/FCOLOR=250> <散┃/AUTOCOLOR=243,251,243,186>\
<┃是 尽┃/AUTOCOLOR=243,251,243,186>\
<┃身 还┃/AUTOCOLOR=243,251,243,186>\
<┃外/AUTOCOLOR=243,251,243,186> <▲点击开启宝库▲/FCOLOR=251> <复┃/AUTOCOLOR=243,251,243,186>\
<┃物 来┃/AUTOCOLOR=243,251,243,186>\
<┃/AUTOCOLOR=243,251,243,186> <≮抽取宝物后才会扣除您的钥匙费用≯/FCOLOR=253> <┃/AUTOCOLOR=243,251,243,186>\
<┃ ┃/AUTOCOLOR=243,251,243,186>\
<┗~※~━━稀━世━∧━奇━珍━━~※~┛/AUTOCOLOR=243,251,243,186>\
[@开启执行]
;由于本命令可被十连抽循环执行,故每次收费无论单抽,十抽都是 单次付费,但价格略有区别
;单抽
#IF
EQUAL N$TcbkType 1
CheckGold 600000
#ACT
take 金币 600000
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 0
GOTO @发放奖励
BREAK
#IF
EQUAL N$TcbkType 3
CHECKGAMEGOLD > 99
#ACT
GAMEGOLD - 100
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 0
GOTO @发放奖励
BREAK
;十抽
#IF
EQUAL N$TcbkType 2
CheckGold 550000
#ACT
take 金币 550000
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 0
GOTO @发放奖励
BREAK
#IF
EQUAL N$TcbkType 4
CHECKGAMEGOLD > 87
#ACT
GAMEGOLD - 88
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 0
GOTO @发放奖励
#ELSEACT
GOTO @钱不够
[@第十抽]
;第十抽,必出极品的相关执行
#IF
EQUAL N$TcbkType 2
CheckGold 550000
#ACT
take 金币 550000
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 1
GOTO @发放奖励
BREAK
#IF
EQUAL N$TcbkType 4
CHECKGAMEGOLD > 87
#ACT
GAMEGOLD - 88
SE*GetRandomItemName S$SEItemName N$SEItemNum N$SEItemType 1
GOTO @发放奖励
#ELSEACT
GOTO @钱不够
[@发放奖励]
;发放自定义类型奖励
#IF
;下面判断 在插件里设定的 名字,这个很随意,如果不属于 我们判断的特殊名字,一律认为是物品发放
CompareText <$STR(S$SEItemName)> 五雷轰3级
;下面是检测是否公告,不公告,就只发单人消息 1发 0不发
EQUAL N$TcbkMSGType 1
;下面检测 抽取的物品组类型高概率1中概率2低概率3,用于发送全服公告,这里检测 是否大于1高概率组 就发公告
LARGE N$SEItemType 1
#ACT
;下面要赋值一个物品ID 用于显示发放的奖励样子,比如这个是添加技能,我就在数据库新增一个物品做成书的样子,没有其他属性就OK了
MOV N$SEItemID 730
;下面进行奖励发放 N$SEItemNum 就是数量 或者 技能等级 等 随意设定他的用途
ADDSKILL 五雷轰 N$SEItemNum
SENDMSG 1 恭喜玩家[%s]在天财宝库中获得[技能<$STR(N$SEItemNum)>3级]
GOTO @执行结果
BREAK
#IF
CompareText <$STR(S$SEItemName)> 五雷轰3级
;下面是检测是否公告
EQUAL N$TcbkMSGType 1
;下面检测是否等于1高概率组 只发单体消息
EQUAL N$SEItemType 1
#ACT
;下面要赋值一个物品ID
MOV N$SEItemID 730
;下面进行奖励发放
ADDSKILL 五雷轰 N$SEItemNum
SENDMSG 1 恭喜玩家[%s]在天财宝库中获得[技能<$STR(N$SEItemNum)>3级]
GOTO @执行结果
BREAK
#IF
CompareText <$STR(S$SEItemName)> 五雷轰3级
;下面是检测是否公告
EQUAL N$TcbkMSGType 0
;下面检测 返回抽取组类型是否大于0的同时不发送公告
LARGE N$SEItemType 0
#ACT
;下面要赋值一个物品ID
MOV N$SEItemID 730
;下面进行奖励发放
ADDSKILL 五雷轰 N$SEItemNum
SENDMSG 1 恭喜玩家[%s]在天财宝库中获得[技能<$STR(N$SEItemNum)>3级]
GOTO @执行结果
BREAK
;-----------------------上面是讲解,下面同理
;----------------------------------------金币发放
#IF
CompareText <$STR(S$SEItemName)> 金币
EQUAL N$TcbkMSGType 1
LARGE N$SEItemType 1
#ACT
MOV N$SEItemID 730
give 金币 N$SEItemNum
SENDMSG 1 恭喜玩家[%s]在天财宝库中获得[金币<$STR(N$SEItemNum)>]
GOTO @执行结果
BREAK
#IF
CompareText <$STR(S$SEItemName)> 金币
EQUAL N$TcbkMSGType 1
EQUAL N$SEItemType 1
#ACT
MOV N$SEItemID 730
give 金币 N$SEItemNum
SENDMSG 5 恭喜您在天财宝库中获得[金币<$STR(N$SEItemNum)>]
GOTO @执行结果
BREAK
#IF
CompareText <$STR(S$SEItemName)> 金币
EQUAL N$TcbkMSGType 0
LARGE N$SEItemType 0
#ACT
MOV N$SEItemID 730
give 金币 N$SEItemNum
SENDMSG 5 恭喜您在天财宝库中获得[金币<$STR(N$SEItemNum)>]
GOTO