GOM引擎传奇版本中屠魔副本脚本开启“屠魔宝箱”的钥匙命令
[@main]
#IF
checkitem屠魔令牌1
#ACT
take屠魔令牌1
SET[801]0
SET[802]0
SET[803]0
SET[804]0
SET[805]0
movS$金卡图ID-1
movS$木卡图ID-1
movS$水卡图ID-1
movS$火卡图ID-1
movS$土卡图ID-1
CALCVARHUMAN抽取次数+0
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@下一张金卡
#elseact
MessageBox\ \〖操作提示〗：你的包裹里没有开启“屠魔宝箱”的钥匙\ \无法打开此界面.
;================================================================================================================================================================================
;================================================================================================================================================================================
;================================================================================================================================================================================
[@下一张金卡]
#IF
Check[801]0
#ACT
movN$金卡图号2
movS$金卡图钮@抽金得物品
#IF
Check[801]1
#ACT
movN$金卡图号8
movS$金卡图钮@抽金获得物品
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张/@下一张土卡><Img:4:91:98:-140|253# 屠魔卡牌-土卡><Img:0:91:-2:-140|249# 屠魔卡牌-火卡><Img:1:91:-102:-140|254# 屠魔卡牌-水卡><Img:3:91:-202:-140|250# 屠魔卡牌-木卡><Img:<$STR(N$金卡图号)>:91:-302:-140|70# 屠魔卡牌-金卡/<$STR(S$金卡图钮)>><Img:6:91:-212:-105|250# 下一张/@下一张木卡>\
<ItemShow:<$STR(S$金卡图ID)>:1:61:-138>
[@抽金得物品]
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张><Img:4:91:98:-140|253# 屠魔卡牌-土卡><Img:0:91:-2:-140|249# 屠魔卡牌-火卡><Img:1:91:-102:-140|254# 屠魔卡牌-水卡><Img:3:91:-202:-140|250# 屠魔卡牌-木卡><PlayImg:91:11:3:500:-302:-140:0:1|70# 屠魔卡牌-金卡><Img:6:91:-212:-105|250# 下一张>\
#IF
#ACT
goto@屠魔卡牌抽得物品金
DELAYGOTO1500@下一张金卡
[@屠魔卡牌抽得物品金]
#IF
CHECKVARHUMAN抽取次数=0
#ACT
goto@免费玩家抽取0游戏币金
break
#IF
CHECKVARHUMAN抽取次数>0
#ACT
goto@付费玩家抽取游戏币金
break
[@免费玩家抽取0游戏币金]
#IF
#ACT
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取金
[@付费玩家抽取游戏币金]
#ACT
movN$付费抽取游戏币0
movN$付费抽取总次1
incN$付费抽取总次<$HUMAN(抽取次数)>
MULN$付费抽取游戏币100<$STR(N$付费抽取总次)>
#IF
CHECKGAMEDIAMOND><$STR(N$付费抽取游戏币)>
#ACT
GAMEDIAMOND-<$STR(N$付费抽取游戏币)>
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取金
#elseact
MessageBox\ \你没有足够的游戏币无法继续抽取卡牌\ \你的游戏币必须大于<$STR(N$付费抽取游戏币)>游戏币
[@玩家抽取金]
#ACT
movN00
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$金卡物品)>
GetStringPos..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$金卡物品)>
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品ID.txt<$STR(S$金卡图ID)><$STR(N0)>
#IF
CompareText<$STR(S$木卡图ID)><$STR(S$金卡图ID)>
#ACT
goto@玩家抽取金
break
#IF
CompareText<$STR(S$水卡图ID)><$STR(S$金卡图ID)>
#ACT
goto@玩家抽取金
break
#IF
CompareText<$STR(S$火卡图ID)><$STR(S$金卡图ID)>
#ACT
goto@玩家抽取金
break
#IF
CompareText<$STR(S$土卡图ID)><$STR(S$金卡图ID)>
#ACT
goto@玩家抽取金
break
#elseact
#IF
#ACT
set[801]1
give<$STR(S$金卡物品)>1
SendMsg7玩家：[<$USERNAME>]打开【屠魔宝箱】获得[<$STR(S$金卡物品)>]x1
#IF
Check[801]1
Check[802]1
Check[803]1
Check[804]1
Check[805]1
#ACT
DELAYGOTO2500@屠魔宝箱关闭
[@屠魔宝箱关闭]
#ACT
close
SendMsg5你已经成功抽取了【屠魔宝箱】的五张卡牌【屠魔宝箱】关闭.
[@抽金获得物品]
#ACT
MessageBox\ \你已经在【屠魔宝箱】抽取了[金卡牌]中的物品\ \得到[<$STR(S$金卡物品)>]x1\ \请转换其它的卡牌。
;================================================================================================================================================================================
;================================================================================================================================================================================
;================================================================================================================================================================================
[@下一张木卡]
#IF
Check[802]0
#ACT
movN$木卡图号3
movS$木卡图钮@抽木得物品
#IF
Check[802]1
#ACT
movN$木卡图号8
movS$木卡图钮@抽木获得物品
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张/@下一张金卡><Img:2:91:98:-140|70# 屠魔卡牌-金卡><Img:4:91:-2:-140|253# 屠魔卡牌-土卡><Img:0:91:-102:-140|249# 屠魔卡牌-火卡><Img:1:91:-202:-140|254# 屠魔卡牌-水卡><Img:<$STR(N$木卡图号)>:91:-302:-140|250# 屠魔卡牌-木卡/<$STR(S$木卡图钮)>><Img:6:91:-212:-105|250# 下一张/@下一张水卡>\
<ItemShow:<$STR(S$木卡图ID)>:1:61:-138>
[@抽木得物品]
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张><Img:2:91:98:-140|70# 屠魔卡牌-金卡><Img:4:91:-2:-140|253# 屠魔卡牌-土卡><Img:0:91:-102:-140|249# 屠魔卡牌-火卡><Img:1:91:-202:-140|254# 屠魔卡牌-水卡><PlayImg:91:11:3:500:-302:-140:0:1|250# 屠魔卡牌-木卡><Img:6:91:-212:-105|250# 下一张>\
#IF
#ACT
goto@屠魔卡牌抽得物品木
DELAYGOTO1500@下一张木卡
[@屠魔卡牌抽得物品木]
#IF
CHECKVARHUMAN抽取次数=0
#ACT
goto@免费玩家抽取0游戏币木
break
#IF
CHECKVARHUMAN抽取次数>0
#ACT
goto@付费玩家抽取游戏币木
break
[@免费玩家抽取0游戏币木]
#IF
#ACT
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取木
[@付费玩家抽取游戏币木]
#ACT
movN$付费抽取游戏币0
movN$付费抽取总次1
incN$付费抽取总次<$HUMAN(抽取次数)>
MULN$付费抽取游戏币100<$STR(N$付费抽取总次)>
#IF
CHECKGAMEDIAMOND><$STR(N$付费抽取游戏币)>
#ACT
GAMEDIAMOND-<$STR(N$付费抽取游戏币)>
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取木
#elseact
MessageBox\ \你没有足够的游戏币无法继续抽取卡牌\ \你的游戏币必须大于<$STR(N$付费抽取游戏币)>游戏币
[@玩家抽取木]
#ACT
movN00
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$木卡物品)>
GetStringPos..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$木卡物品)>
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品ID.txt<$STR(S$木卡图ID)><$STR(N0)>
#IF
CompareText<$STR(S$金卡图ID)><$STR(S$木卡图ID)>
#ACT
goto@玩家抽取木
break
#IF
CompareText<$STR(S$水卡图ID)><$STR(S$木卡图ID)>
#ACT
goto@玩家抽取木
break
#IF
CompareText<$STR(S$火卡图ID)><$STR(S$木卡图ID)>
#ACT
goto@玩家抽取木
break
#IF
CompareText<$STR(S$土卡图ID)><$STR(S$木卡图ID)>
#ACT
goto@玩家抽取木
break
#elseact
#IF
#ACT
set[802]1
give<$STR(S$木卡物品)>1
SendMsg7玩家：[<$USERNAME>]打开【屠魔宝箱】获得[<$STR(S$木卡物品)>]x1
#IF
Check[801]1
Check[802]1
Check[803]1
Check[804]1
Check[805]1
#ACT
DELAYGOTO2500@屠魔宝箱关闭
[@屠魔宝箱关闭]
#ACT
close
SendMsg5你已经成功抽取了【屠魔宝箱】的五张卡牌【屠魔宝箱】关闭.
[@抽木获得物品]
#ACT
MessageBox\ \你已经在【屠魔宝箱】抽取了[木卡牌]中的物品\ \得到[<$STR(S$木卡物品)>]x1\ \请转换其它的卡牌。
;================================================================================================================================================================================
;================================================================================================================================================================================
;================================================================================================================================================================================
[@下一张水卡]
#IF
Check[803]0
#ACT
movN$水卡图号1
movS$水卡图钮@抽水得物品
#IF
Check[803]1
#ACT
movN$水卡图号8
movS$水卡图钮@抽水获得物品
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张/@下一张木卡><Img:3:91:98:-140|250# 屠魔卡牌-木卡><Img:2:91:-2:-140|70# 屠魔卡牌-金卡><Img:4:91:-102:-140|253# 屠魔卡牌-土卡><Img:0:91:-202:-140|249# 屠魔卡牌-火卡><Img:<$STR(N$水卡图号)>:91:-302:-140|254# 屠魔卡牌-水卡/<$STR(S$水卡图钮)>><Img:6:91:-212:-105|250# 下一张/@下一张火卡>\
<ItemShow:<$STR(S$水卡图ID)>:1:61:-138>
[@抽水得物品]
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张><Img:3:91:98:-140|250# 屠魔卡牌-木卡><Img:2:91:-2:-140|70# 屠魔卡牌-金卡><Img:4:91:-102:-140|253# 屠魔卡牌-土卡><Img:0:91:-202:-140|249# 屠魔卡牌-火卡><PlayImg:91:11:3:500:-302:-140:0:1|254# 屠魔卡牌-水卡><Img:6:91:-212:-105|250# 下一张>
#IF
#ACT
goto@屠魔卡牌抽得物品水
DELAYGOTO1500@下一张水卡
[@屠魔卡牌抽得物品水]
#IF
CHECKVARHUMAN抽取次数=0
#ACT
goto@免费玩家抽取0游戏币水
break
#IF
CHECKVARHUMAN抽取次数>0
#ACT
goto@付费玩家抽取游戏币水
break
[@免费玩家抽取0游戏币水]
#IF
#ACT
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取水
[@付费玩家抽取游戏币水]
#ACT
movN$付费抽取游戏币0
movN$付费抽取总次1
incN$付费抽取总次<$HUMAN(抽取次数)>
MULN$付费抽取游戏币100<$STR(N$付费抽取总次)>
#IF
CHECKGAMEDIAMOND><$STR(N$付费抽取游戏币)>
#ACT
GAMEDIAMOND-<$STR(N$付费抽取游戏币)>
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取水
#elseact
MessageBox\ \你没有足够的游戏币无法继续抽取卡牌\ \你的游戏币必须大于<$STR(N$付费抽取游戏币)>游戏币
[@玩家抽取水]
#ACT
movN00
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$水卡物品)>
GetStringPos..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$水卡物品)>
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品ID.txt<$STR(S$水卡图ID)><$STR(N0)>
#IF
CompareText<$STR(S$金卡图ID)><$STR(S$水卡图ID)>
#ACT
goto@玩家抽取水
break
#IF
CompareText<$STR(S$木卡图ID)><$STR(S$水卡图ID)>
#ACT
goto@玩家抽取水
break
#IF
CompareText<$STR(S$火卡图ID)><$STR(S$水卡图ID)>
#ACT
goto@玩家抽取水
break
#IF
CompareText<$STR(S$土卡图ID)><$STR(S$水卡图ID)>
#ACT
goto@玩家抽取水
break
#elseact
#IF
#ACT
set[803]1
give<$STR(S$水卡物品)>1
SendMsg7玩家：[<$USERNAME>]打开【屠魔宝箱】获得[<$STR(S$水卡物品)>]x1
#IF
Check[801]1
Check[802]1
Check[803]1
Check[804]1
Check[805]1
#ACT
DELAYGOTO2500@屠魔宝箱关闭
[@屠魔宝箱关闭]
#ACT
close
SendMsg5你已经成功抽取了【屠魔宝箱】的五张卡牌【屠魔宝箱】关闭.
[@抽水获得物品]
#ACT
MessageBox\ \你已经在【屠魔宝箱】抽取了[水卡牌]中的物品\ \得到[<$STR(S$水卡物品)>]x1\ \请转换其它的卡牌。
;================================================================================================================================================================================
;================================================================================================================================================================================
;================================================================================================================================================================================
[@下一张火卡]
#IF
Check[804]0
#ACT
movN$火卡图号0
movS$火卡图钮@抽火得物品
#IF
Check[804]1
#ACT
movN$火卡图号8
movS$火卡图钮@抽火获得物品
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张/@下一张水卡><Img:1:91:98:-140|254# 屠魔卡牌-水卡><Img:3:91:-2:-140|250# 屠魔卡牌-木卡><Img:2:91:-102:-140|70# 屠魔卡牌-金卡><Img:4:91:-202:-140|253# 屠魔卡牌-土卡><Img:<$STR(N$火卡图号)>:91:-302:-140|249# 屠魔卡牌-火卡/<$STR(S$火卡图钮)>><Img:6:91:-212:-105|250# 下一张/@下一张土卡>\
<ItemShow:<$STR(S$火卡图ID)>:1:61:-138>
[@抽火得物品]
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张><Img:1:91:98:-140|254# 屠魔卡牌-水卡><Img:3:91:-2:-140|250# 屠魔卡牌-木卡><Img:2:91:-102:-140|70# 屠魔卡牌-金卡><Img:4:91:-202:-140|253# 屠魔卡牌-土卡><PlayImg:91:11:3:500:-302:-140:0:1|249# 屠魔卡牌-火卡><Img:6:91:-212:-105|250# 下一张>\
#IF
#ACT
goto@屠魔卡牌抽得物品火
DELAYGOTO1500@下一张火卡
[@屠魔卡牌抽得物品火]
#IF
CHECKVARHUMAN抽取次数=0
#ACT
goto@免费玩家抽取0游戏币火
break
#IF
CHECKVARHUMAN抽取次数>0
#ACT
goto@付费玩家抽取游戏币火
break
[@免费玩家抽取0游戏币火]
#IF
#ACT
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取火
[@付费玩家抽取游戏币火]
#ACT
movN$付费抽取游戏币0
movN$付费抽取总次1
incN$付费抽取总次<$HUMAN(抽取次数)>
MULN$付费抽取游戏币100<$STR(N$付费抽取总次)>
#IF
CHECKGAMEDIAMOND><$STR(N$付费抽取游戏币)>
#ACT
GAMEDIAMOND-<$STR(N$付费抽取游戏币)>
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取火
#elseact
MessageBox\ \你没有足够的游戏币无法继续抽取卡牌\ \你的游戏币必须大于<$STR(N$付费抽取游戏币)>游戏币
[@玩家抽取火]
#ACT
movN00
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$火卡物品)>
GetStringPos..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$火卡物品)>
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品ID.txt<$STR(S$火卡图ID)><$STR(N0)>
#IF
CompareText<$STR(S$金卡图ID)><$STR(S$火卡图ID)>
#ACT
goto@玩家抽取火
break
#IF
CompareText<$STR(S$木卡图ID)><$STR(S$火卡图ID)>
#ACT
goto@玩家抽取火
break
#IF
CompareText<$STR(S$水卡图ID)><$STR(S$火卡图ID)>
#ACT
goto@玩家抽取火
break
#IF
CompareText<$STR(S$土卡图ID)><$STR(S$火卡图ID)>
#ACT
goto@玩家抽取火
break
#elseact
#IF
#ACT
set[804]1
give<$STR(S$火卡物品)>1
SendMsg7玩家：[<$USERNAME>]打开【屠魔宝箱】获得[<$STR(S$火卡物品)>]x1
#IF
Check[801]1
Check[802]1
Check[803]1
Check[804]1
Check[805]1
#ACT
DELAYGOTO2500@屠魔宝箱关闭
[@屠魔宝箱关闭]
#ACT
close
SendMsg5你已经成功抽取了【屠魔宝箱】的五张卡牌【屠魔宝箱】关闭.
[@抽火获得物品]
#ACT
MessageBox\ \你已经在【屠魔宝箱】抽取了[火卡牌]中的物品\ \得到[<$STR(S$火卡物品)>]x1\ \请转换其它的卡牌。
;================================================================================================================================================================================
;================================================================================================================================================================================
;================================================================================================================================================================================
[@下一张土卡]
#IF
Check[805]0
#ACT
movN$土卡图号4
movS$土卡图钮@抽土得物品
#IF
Check[805]1
#ACT
movN$土卡图号8
movS$土卡图钮@抽土获得物品
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张/@下一张火卡><Img:0:91:98:-140|249# 屠魔卡牌-火卡><Img:1:91:-2:-140|254# 屠魔卡牌-水卡><Img:3:91:-102:-140|250# 屠魔卡牌-木卡><Img:2:91:-202:-140|70# 屠魔卡牌-金卡><Img:<$STR(N$土卡图号)>:91:-302:-140|253# 屠魔卡牌-土卡/<$STR(S$土卡图钮)>><Img:6:91:-212:-105|250# 下一张/@下一张金卡>\
<ItemShow:<$STR(S$土卡图ID)>:1:61:-138>
[@抽土得物品]
#IF
#ACT
OPENMERCHANTBIGDLG3639014-30-100148832
#SAY
\ \ \ \ \ \ \ \ \
<屠魔卡牌分为:五张.也就是说/AUTOCOLOR=92>\
<一个宝箱只能抽取五次卡牌./AUTOCOLOR=92>\
<第一次抽取卡牌物品是免费的./AUTOCOLOR=254>\
<第二次100游戏币.第三次200游戏币./AUTOCOLOR=254>\
<第四次400游戏币./AUTOCOLOR=254><无限次以此类推./AUTOCOLOR=251>\
{今天抽取次数：<$HUMAN(抽取次数)>次/AUTOCOLOR=25170249254250}\
<提示：抽取次数每隔一天清零/AUTOCOLOR=253>\ \
<先点击左右箭头选择不同的卡牌/AUTOCOLOR=70><提示：打开宝箱请尽快抽取./AUTOCOLOR=249>\
<再点击卡牌抽取卡牌中的物品/AUTOCOLOR=251><如果宝箱界面关闭后果自负!/AUTOCOLOR=249>\
<Img:5:91:8:-105|250# 上一张><Img:0:91:98:-140|249# 屠魔卡牌-火卡><Img:1:91:-2:-140|254# 屠魔卡牌-水卡><Img:3:91:-102:-140|250# 屠魔卡牌-木卡><Img:2:91:-202:-140|70# 屠魔卡牌-金卡><PlayImg:91:11:3:500:-302:-140:0:1|253# 屠魔卡牌-土卡><Img:6:91:-212:-105|250# 下一张>\
#IF
#ACT
goto@屠魔卡牌抽得物品土
DELAYGOTO1500@下一张土卡
[@屠魔卡牌抽得物品土]
#IF
CHECKVARHUMAN抽取次数=0
#ACT
goto@免费玩家抽取0游戏币土
break
#IF
CHECKVARHUMAN抽取次数>0
#ACT
goto@付费玩家抽取游戏币土
break
[@免费玩家抽取0游戏币土]
#IF
#ACT
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取土
[@付费玩家抽取游戏币土]
#ACT
movN$付费抽取游戏币0
movN$付费抽取总次1
incN$付费抽取总次<$HUMAN(抽取次数)>
MULN$付费抽取游戏币100<$STR(N$付费抽取总次)>
#IF
CHECKGAMEDIAMOND><$STR(N$付费抽取游戏币)>
#ACT
GAMEDIAMOND-<$STR(N$付费抽取游戏币)>
CALCVARHUMAN抽取次数+1
SAVEVARHUMAN抽取次数..\QuestDiary\屠魔副本\抽取次数.txt
goto@玩家抽取土
#elseact
MessageBox\ \你没有足够的游戏币无法继续抽取卡牌\ \你的游戏币必须大于<$STR(N$付费抽取游戏币)>游戏币
[@玩家抽取土]
#ACT
movN00
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$土卡物品)>
GetStringPos..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品.txt<$STR(S$土卡物品)>
GetRandomText..\QuestDiary\屠魔副本\屠魔宝箱\屠魔宝箱物品ID.txt<$STR(S$土卡图ID)><$STR(N0)>
#IF
CompareText<$STR(S$金卡图ID)><$STR(S$土卡图ID)>
#ACT
goto@玩家抽取土
break
#IF
CompareText<$STR(S$木卡图ID)><$STR(S$土卡图ID)>
#ACT
goto@玩家抽取土
break
#IF
CompareText<$STR(S$水卡图ID)><$STR(S$土卡图ID)>
#ACT
goto@玩家抽取土
break
#IF
CompareText<$STR(S$火卡图ID)><$STR(S$土卡图ID)>
#ACT
goto@玩家抽取土
break
#elseact
#IF
#ACT
set[805]1
give<$STR(S$土卡物品)>1
SendMsg7玩家：[<$USERNAME>]打开【屠魔宝箱】获得[<$STR(S$土卡物品)>]x1
#IF
Check[801]1
Check[802]1
Check[803]1
Check[804]1
Check[805]1
#ACT
DELAYGOTO2500@屠魔宝箱关闭
[@屠魔宝箱关闭]
#ACT
close
SendMsg5你已经成功抽取了【屠魔宝箱】的五张卡牌【屠魔宝箱】关闭.
[@抽土获得物品]
#ACT
MessageBox\ \你已经在【屠魔宝箱】抽取了[土卡牌]中的物品\ \得到[<$STR(S$土卡物品)>]x1\ \请转换其它的卡牌。