Skip to content

Y
ygopro-pre-data
Commit b95855b5 authored by mercury233's avatar mercury233
Browse files
Options

update scripts

parent 7fb4b853
Hide whitespace changes
Inline Side-by-side
Showing with 95 additions and 82 deletions
expansions/strings.conf
View file @ b95855b5
#The first line is used for comment #The first line is used for comment
!setname 0x231 斩机 !setname 0x132 斩机
!setname 0x232 王战 !setname 0x133 半龙女仆
!setname 0x233 半龙女仆 !setname 0x134 王战
!setname 0x235 @火灵天星 !setname 0x235 @火灵天星
script/c100200170.lua
View file @ b95855b5
...@@ -50,7 +50,7 @@ function c100200170.thcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -50,7 +50,7 @@ function c100200170.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c100200170.thfilter(c,ct) function c100200170.thfilter(c,ct)
if not c:IsAbleToHand() then return false end if not c:IsAbleToHand() then return false end
if ct==2 then return c:IsSetCard(0x231) if ct==2 then return c:IsSetCard(0x132)
elseif ct==3 then return c:IsType(TYPE_MONSTER) and c:IsLevel(4) elseif ct==3 then return c:IsType(TYPE_MONSTER) and c:IsLevel(4)
else return c:IsType(TYPE_SPELL+TYPE_TRAP) end else return c:IsType(TYPE_SPELL+TYPE_TRAP) end
end end
...@@ -75,7 +75,7 @@ function c100200170.spcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -75,7 +75,7 @@ function c100200170.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c100200170.spfilter(c,e,tp) function c100200170.spfilter(c,e,tp)
return c:IsSetCard(0x231) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x132) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100200170.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100200170.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
script/c100413001.lua
View file @ b95855b5
...@@ -56,5 +56,5 @@ function c100413001.splimit(e,c) ...@@ -56,5 +56,5 @@ function c100413001.splimit(e,c)
return not c:IsRace(RACE_CYBERSE) and c:IsLocation(LOCATION_EXTRA) return not c:IsRace(RACE_CYBERSE) and c:IsLocation(LOCATION_EXTRA)
end end
function c100413001.tnval(e,c) function c100413001.tnval(e,c)
return e:GetHandler():IsControler(c:GetControler()) and c:IsSetCard(0x231) return e:GetHandler():IsControler(c:GetControler()) and c:IsSetCard(0x132)
end end
script/c100413002.lua
View file @ b95855b5
...@@ -33,11 +33,11 @@ function c100413002.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -33,11 +33,11 @@ function c100413002.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c100413002.filter(c,e,tp) function c100413002.filter(c,e,tp)
return c:IsSetCard(0x231) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x132) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413002.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100413002.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413002.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingMatchingCard(c100413002.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c100413002.operation(e,tp,eg,ep,ev,re,r,rp) function c100413002.operation(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
...@@ -48,7 +48,7 @@ function c100413002.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -48,7 +48,7 @@ function c100413002.operation(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413002.dacon(e,tp,eg,ep,ev,re,r,rp) function c100413002.dacon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsAbleToEnterBP() return Duel.IsAbleToEnterBP() or (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE)
end end
function c100413002.dafilter(c) function c100413002.dafilter(c)
return c:IsFaceup() and c:IsRace(RACE_CYBERSE) and not c:IsHasEffect(EFFECT_EXTRA_ATTACK) and c:GetSequence()>=5 return c:IsFaceup() and c:IsRace(RACE_CYBERSE) and not c:IsHasEffect(EFFECT_EXTRA_ATTACK) and c:GetSequence()>=5
......
script/c100413003.lua
View file @ b95855b5
...@@ -13,7 +13,7 @@ function c100413003.initial_effect(c) ...@@ -13,7 +13,7 @@ function c100413003.initial_effect(c)
e1:SetOperation(c100413003.spop) e1:SetOperation(c100413003.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413003.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413003.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler() local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
script/c100413004.lua
View file @ b95855b5
...@@ -13,7 +13,7 @@ function c100413004.initial_effect(c) ...@@ -13,7 +13,7 @@ function c100413004.initial_effect(c)
e1:SetOperation(c100413004.spop) e1:SetOperation(c100413004.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413004.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413004.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler() local c=e:GetHandler()
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
script/c100413005.lua
View file @ b95855b5
...@@ -35,6 +35,7 @@ function c100413005.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -35,6 +35,7 @@ function c100413005.operation(e,tp,eg,ep,ev,re,r,rp)
if tc:IsFaceup() and tc:IsRelateToEffect(e) then if tc:IsFaceup() and tc:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EFFECT_CHANGE_LEVEL) e1:SetCode(EFFECT_CHANGE_LEVEL)
e1:SetValue(8) e1:SetValue(8)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
......
script/c100413006.lua
View file @ b95855b5
...@@ -54,7 +54,7 @@ function c100413006.operation(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function c100413006.operation(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413006.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413006.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
......
script/c100413007.lua
View file @ b95855b5
...@@ -44,10 +44,10 @@ function c100413007.desop(e,tp,eg,ep,ev,re,r,rp) ...@@ -44,10 +44,10 @@ function c100413007.desop(e,tp,eg,ep,ev,re,r,rp)
end end
function c100413007.thcon(e,tp,eg,ep,ev,re,r,rp) function c100413007.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return (c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp)) and c:IsPreviousLocation(LOCATION_MZONE) return c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp)
end end
function c100413007.thfilter(c) function c100413007.thfilter(c)
return c:IsSetCard(0x231) and c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP) return c:IsSetCard(0x132) and c:IsAbleToHand() and c:IsType(TYPE_SPELL+TYPE_TRAP)
end end
function c100413007.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413007.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413007.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c100413007.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
script/c100413008.lua
View file @ b95855b5
...@@ -37,7 +37,7 @@ function c100413008.imcon(e) ...@@ -37,7 +37,7 @@ function c100413008.imcon(e)
return e:GetHandler():GetSequence()>4 return e:GetHandler():GetSequence()>4
end end
function c100413008.efilter(e,te) function c100413008.efilter(e,te)
return not te:GetOwner():IsSetCard(0x231) return not te:GetOwner():IsSetCard(0x132)
end end
function c100413008.damcon(e,tp,eg,ep,ev,re,r,rp) function c100413008.damcon(e,tp,eg,ep,ev,re,r,rp)
return ep~=tp and e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():GetSequence()>4 return ep~=tp and e:GetHandler():GetBattleTarget()~=nil and e:GetHandler():GetSequence()>4
...@@ -47,10 +47,10 @@ function c100413008.damop(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,10 +47,10 @@ function c100413008.damop(e,tp,eg,ep,ev,re,r,rp)
end end
function c100413008.thcon(e,tp,eg,ep,ev,re,r,rp) function c100413008.thcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return (c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp)) and c:IsPreviousLocation(LOCATION_MZONE) return c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp)
end end
function c100413008.thfilter(c) function c100413008.thfilter(c)
return c:IsSetCard(0x231) and c:IsAbleToHand() return c:IsSetCard(0x132) and c:IsAbleToHand()
end end
function c100413008.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413008.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413008.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c100413008.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
script/c100413009.lua
View file @ b95855b5
...@@ -123,7 +123,7 @@ function c100413009.effop(e,tp,eg,ep,ev,re,r,rp) ...@@ -123,7 +123,7 @@ function c100413009.effop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413009.repfilter(c,tp) function c100413009.repfilter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE) and c:IsSetCard(0x231) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE) and c:IsSetCard(0x132)
end end
function c100413009.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413009.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413010.lua
View file @ b95855b5
...@@ -8,13 +8,13 @@ function c100413010.initial_effect(c) ...@@ -8,13 +8,13 @@ function c100413010.initial_effect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,100413010) e1:SetCountLimit(1,100413010+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c100413010.target) e1:SetTarget(c100413010.target)
e1:SetOperation(c100413010.activate) e1:SetOperation(c100413010.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413010.filter(c,e,tp) function c100413010.filter(c,e,tp)
return c:IsSetCard(0x231) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x132) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413010.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413010.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413010.filter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413010.filter(chkc,e,tp) end
......
script/c100413011.lua
View file @ b95855b5
...@@ -71,7 +71,7 @@ function c100413011.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -71,7 +71,7 @@ function c100413011.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
return true return true
end end
function c100413011.atkfilter(c) function c100413011.atkfilter(c)
return c:IsSetCard(0x231) and c:GetBaseAttack()>0 and c:IsAbleToGraveAsCost() return c:IsSetCard(0x132) and c:GetBaseAttack()>0 and c:IsAbleToGraveAsCost()
end end
function c100413011.atktg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413011.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
...@@ -102,7 +102,7 @@ function c100413011.thcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -102,7 +102,7 @@ function c100413011.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE)
end end
function c100413011.thfilter(c) function c100413011.thfilter(c)
return c:IsSetCard(0x231) and not c:IsCode(100413011) and c:IsAbleToHand() return c:IsSetCard(0x132) and not c:IsCode(100413011) and c:IsAbleToHand()
end end
function c100413011.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413011.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413011.thfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413011.thfilter(chkc) end
......
script/c100413012.lua
View file @ b95855b5
...@@ -14,19 +14,19 @@ function c100413012.initial_effect(c) ...@@ -14,19 +14,19 @@ function c100413012.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413012.spfilter1(c,e,tp) function c100413012.spfilter1(c,e,tp)
return c:IsSetCard(0x231) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCanBeEffectTarget(e) return c:IsSetCard(0x132) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCanBeEffectTarget(e)
end end
function c100413012.fselect1(g,tp) function c100413012.fselect1(g,tp)
return Duel.IsExistingMatchingCard(c100413012.synfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g) return Duel.IsExistingMatchingCard(c100413012.synfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g)
end end
function c100413012.synfilter(c,g) function c100413012.synfilter(c,g)
return c:IsSetCard(0x231) and c:IsSynchroSummonable(nil,g,g:GetCount()-1,g:GetCount()-1) return c:IsSetCard(0x132) and c:IsSynchroSummonable(nil,g,g:GetCount()-1,g:GetCount()-1)
end end
function c100413012.fselect2(g,tp) function c100413012.fselect2(g,tp)
return Duel.IsExistingMatchingCard(c100413012.xyzfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g) return Duel.IsExistingMatchingCard(c100413012.xyzfilter,tp,LOCATION_EXTRA,0,1,nil,g) and aux.dncheck(g)
end end
function c100413012.xyzfilter(c,g) function c100413012.xyzfilter(c,g)
return c:IsSetCard(0x231) and c:IsXyzSummonable(g,g:GetCount(),g:GetCount()) return c:IsSetCard(0x132) and c:IsXyzSummonable(g,g:GetCount(),g:GetCount())
end end
function c100413012.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413012.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
...@@ -65,7 +65,7 @@ function c100413012.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -65,7 +65,7 @@ function c100413012.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c100413012.spfilter2,nil,e,tp) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c100413012.spfilter2,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
Duel.SpecialSummonStep(tc,182,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
......
script/c100413013.lua
View file @ b95855b5
...@@ -40,7 +40,7 @@ function c100413013.atktg(e,c) ...@@ -40,7 +40,7 @@ function c100413013.atktg(e,c)
return c:IsRace(RACE_CYBERSE) return c:IsRace(RACE_CYBERSE)
end end
function c100413013.cfilter(c) function c100413013.cfilter(c)
return c:IsFaceup() and c:IsSetCard(0x231) and c:IsType(TYPE_MONSTER) return c:IsFaceup() and c:IsSetCard(0x132) and c:IsType(TYPE_MONSTER)
end end
function c100413013.descon(e,tp,eg,ep,ev,re,r,rp) function c100413013.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c100413013.cfilter,tp,LOCATION_MZONE,0,1,nil) and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED) return Duel.IsExistingMatchingCard(c100413013.cfilter,tp,LOCATION_MZONE,0,1,nil) and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED)
......
script/c100413014.lua
View file @ b95855b5
...@@ -29,7 +29,7 @@ function c100413014.initial_effect(c) ...@@ -29,7 +29,7 @@ function c100413014.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c100413014.spfilter1(c,e,tp) function c100413014.spfilter1(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevelBelow(4) and not c:IsCode(100413014) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevelBelow(4) and not c:IsCode(100413014) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413014.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413014.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413014.spfilter1(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413014.spfilter1(chkc,e,tp) end
...@@ -46,7 +46,7 @@ function c100413014.spop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -46,7 +46,7 @@ function c100413014.spop1(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413014.spfilter2(c,e,tp) function c100413014.spfilter2(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413014.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) function c100413014.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413015.lua
View file @ b95855b5
...@@ -41,7 +41,7 @@ function c100413015.spcost1(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -41,7 +41,7 @@ function c100413015.spcost1(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD) Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
end end
function c100413015.spfilter1(c,e,tp) function c100413015.spfilter1(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413015.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413015.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
...@@ -63,7 +63,7 @@ function c100413015.indcon(e) ...@@ -63,7 +63,7 @@ function c100413015.indcon(e)
return Duel.IsExistingMatchingCard(c100413015.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c100413015.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end end
function c100413015.spfilter2(c,e,tp) function c100413015.spfilter2(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413015.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) function c100413015.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413016.lua
View file @ b95855b5
...@@ -36,7 +36,7 @@ function c100413016.ddop(e,tp,eg,ep,ev,re,r,rp) ...@@ -36,7 +36,7 @@ function c100413016.ddop(e,tp,eg,ep,ev,re,r,rp)
Duel.DiscardDeck(tp,3,REASON_EFFECT) Duel.DiscardDeck(tp,3,REASON_EFFECT)
end end
function c100413016.spfilter(c,e,tp) function c100413016.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(7) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413016.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413016.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413017.lua
View file @ b95855b5
...@@ -62,7 +62,7 @@ function c100413017.indcon(e) ...@@ -62,7 +62,7 @@ function c100413017.indcon(e)
return Duel.IsExistingMatchingCard(c100413017.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c100413017.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end end
function c100413017.spfilter(c,e,tp) function c100413017.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413017.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413017.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413018.lua
View file @ b95855b5
...@@ -29,7 +29,7 @@ function c100413018.initial_effect(c) ...@@ -29,7 +29,7 @@ function c100413018.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c100413018.thfilter(c) function c100413018.thfilter(c)
return c:IsSetCard(0x233) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return c:IsSetCard(0x133) and c:IsType(TYPE_MONSTER) and not c:IsCode(100413018) and c:IsAbleToHand()
end end
function c100413018.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413018.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413018.filter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c100413018.filter,tp,LOCATION_DECK,0,1,nil) end
...@@ -37,7 +37,7 @@ function c100413018.thtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -37,7 +37,7 @@ function c100413018.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,1,tp,1) Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,1,tp,1)
end end
function c100413018.disfilter(c) function c100413018.disfilter(c)
return c:IsSetCard(0x233) and c:IsType(TYPE_MONSTER) return c:IsSetCard(0x133) and c:IsType(TYPE_MONSTER)
end end
function c100413018.thop(e,tp,eg,ep,ev,re,r,rp) function c100413018.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
...@@ -50,7 +50,7 @@ function c100413018.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -50,7 +50,7 @@ function c100413018.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.DiscardHand(tp,c100413018.disfilter,1,1,REASON_EFFECT) Duel.DiscardHand(tp,c100413018.disfilter,1,1,REASON_EFFECT)
end end
function c100413018.spfilter(c,e,tp) function c100413018.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413018.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413018.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413019.lua
View file @ b95855b5
...@@ -46,7 +46,7 @@ function c100413019.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -46,7 +46,7 @@ function c100413019.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD) Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
end end
function c100413019.atkfilter(c) function c100413019.atkfilter(c)
return c:IsFaceup() and c:IsSetCard(0x233) return c:IsFaceup() and c:IsSetCard(0x133)
end end
function c100413019.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413019.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413019.atkfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413019.atkfilter(chkc) end
...@@ -72,7 +72,7 @@ function c100413019.indcon(e) ...@@ -72,7 +72,7 @@ function c100413019.indcon(e)
return Duel.IsExistingMatchingCard(c100413019.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c100413019.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end end
function c100413019.spfilter(c,e,tp) function c100413019.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413019.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413019.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413020.lua
View file @ b95855b5
...@@ -29,7 +29,7 @@ function c100413020.initial_effect(c) ...@@ -29,7 +29,7 @@ function c100413020.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c100413020.tgfilter(c) function c100413020.tgfilter(c)
return c:IsSetCard(0x233) and not c:IsCode(100413020) and c:IsAbleToGrave() return c:IsSetCard(0x133) and not c:IsCode(100413020) and c:IsAbleToGrave()
end end
function c100413020.tgtg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413020.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413020.tgfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c100413020.tgfilter,tp,LOCATION_DECK,0,1,nil) end
...@@ -43,7 +43,7 @@ function c100413020.tgop(e,tp,eg,ep,ev,re,r,rp) ...@@ -43,7 +43,7 @@ function c100413020.tgop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413020.spfilter(c,e,tp) function c100413020.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(8) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413020.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413020.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413021.lua
View file @ b95855b5
...@@ -38,11 +38,14 @@ function c100413021.actcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -38,11 +38,14 @@ function c100413021.actcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsDiscardable() end if chk==0 then return e:GetHandler():IsDiscardable() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD) Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
end end
function c100413021.actfilter(c)
return c:IsFaceup() and c:IsType(TYPE_EFFECT)
end
function c100413021.acttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413021.acttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c100413021.actfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingTarget(c100413021.actfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) Duel.SelectTarget(tp,c100413021.actfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
end end
function c100413021.actop(e,tp,eg,ep,ev,re,r,rp) function c100413021.actop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
...@@ -62,7 +65,7 @@ function c100413021.indcon(e) ...@@ -62,7 +65,7 @@ function c100413021.indcon(e)
return Duel.IsExistingMatchingCard(c100413021.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) return Duel.IsExistingMatchingCard(c100413021.indfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end end
function c100413021.spfilter(c,e,tp) function c100413021.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x133) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c100413021.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413021.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413022.lua
View file @ b95855b5
...@@ -3,7 +3,7 @@ ...@@ -3,7 +3,7 @@
--Scripted by nekrozar --Scripted by nekrozar
function c100413022.initial_effect(c) function c100413022.initial_effect(c)
--fusion material --fusion material
aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x233),aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),true) aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x133),aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),true)
c:EnableReviveLimit() c:EnableReviveLimit()
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
...@@ -32,12 +32,12 @@ function c100413022.initial_effect(c) ...@@ -32,12 +32,12 @@ function c100413022.initial_effect(c)
end end
function c100413022.spfilter1(c,e,tp) function c100413022.spfilter1(c,e,tp)
local lv=c:GetLevel() local lv=c:GetLevel()
return lv>0 and c:IsFaceup() and c:IsSetCard(0x233) return lv>0 and c:IsFaceup() and c:IsSetCard(0x133)
and Duel.IsExistingMatchingCard(c100413022.spfilter2,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp,lv) and Duel.IsExistingMatchingCard(c100413022.spfilter2,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp,lv)
end end
function c100413022.spfilter2(c,e,tp,clv) function c100413022.spfilter2(c,e,tp,clv)
local lv=c:GetLevel() local lv=c:GetLevel()
return lv>0 and c:IsSetCard(0x233) and math.abs(clv-lv)==1 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return lv>0 and c:IsSetCard(0x133) and math.abs(clv-lv)==1 and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c100413022.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413022.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler() local c=e:GetHandler()
......
script/c100413023.lua
View file @ b95855b5
...@@ -13,7 +13,7 @@ function c100413023.initial_effect(c) ...@@ -13,7 +13,7 @@ function c100413023.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413023.spfilter(c,e,tp) function c100413023.spfilter(c,e,tp)
return c:IsSetCard(0x233) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return c:IsSetCard(0x133) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c100413023.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100413023.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
...@@ -22,7 +22,7 @@ function c100413023.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -22,7 +22,7 @@ function c100413023.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,tp,LOCATION_DECK)
end end
function c100413023.tgfilter(c,mc) function c100413023.tgfilter(c,mc)
return c:IsSetCard(0x233) and c:IsType(TYPE_MONSTER) and c:IsAttribute(mc:GetAttribute()) and not c:IsLevel(mc:GetLevel()) and c:IsAbleToGrave() return c:IsSetCard(0x133) and c:IsType(TYPE_MONSTER) and c:IsAttribute(mc:GetAttribute()) and not c:IsLevel(mc:GetLevel()) and c:IsAbleToGrave()
end end
function c100413023.activate(e,tp,eg,ep,ev,re,r,rp) function c100413023.activate(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
......
script/c100413024.lua
View file @ b95855b5
...@@ -21,6 +21,7 @@ function c100413024.initial_effect(c) ...@@ -21,6 +21,7 @@ function c100413024.initial_effect(c)
--to hand --to hand
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(100413024,0)) e4:SetDescription(aux.Stringid(100413024,0))
e4:SetCategory(CATEGORY_TOHAND)
e4:SetType(EFFECT_TYPE_IGNITION) e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetRange(LOCATION_SZONE) e4:SetRange(LOCATION_SZONE)
...@@ -38,7 +39,7 @@ function c100413024.initial_effect(c) ...@@ -38,7 +39,7 @@ function c100413024.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c100413024.filter(c) function c100413024.filter(c)
return c:IsFaceup() and c:IsSetCard(0x233) return c:IsFaceup() and c:IsSetCard(0x133)
end end
function c100413024.atkval(e,c) function c100413024.atkval(e,c)
return Duel.GetMatchingGroupCount(c100413024.filter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)*100 return Duel.GetMatchingGroupCount(c100413024.filter,e:GetHandlerPlayer(),LOCATION_MZONE,0,nil)*100
...@@ -47,7 +48,7 @@ function c100413024.thcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,7 +48,7 @@ function c100413024.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c100413024.filter,tp,LOCATION_MZONE,0,2,nil) return Duel.IsExistingMatchingCard(c100413024.filter,tp,LOCATION_MZONE,0,2,nil)
end end
function c100413024.thfilter(c) function c100413024.thfilter(c)
return c:IsSetCard(0x233) and not c:IsCode(100413024) and c:IsAbleToHand() return c:IsSetCard(0x133) and not c:IsCode(100413024) and c:IsAbleToHand()
end end
function c100413024.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413024.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413024.thfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c100413024.thfilter(chkc) end
...@@ -68,7 +69,7 @@ function c100413024.tgop(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,7 +69,7 @@ function c100413024.tgop(e,tp,eg,ep,ev,re,r,rp)
e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e1:SetTargetRange(LOCATION_MZONE,0) e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x233)) e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x133))
e1:SetValue(aux.tgoval) e1:SetValue(aux.tgoval)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
......
script/c100413025.lua
View file @ b95855b5
...@@ -82,7 +82,7 @@ function c100413025.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -82,7 +82,7 @@ function c100413025.activate(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413025.thfilter(c) function c100413025.thfilter(c)
return c:IsFaceup() and c:IsSetCard(0x233) and c:IsAbleToHand() return c:IsFaceup() and c:IsSetCard(0x133) and c:IsAbleToHand()
end end
function c100413025.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413025.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413025.thfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413025.thfilter(chkc) end
......
script/c100413026.lua
View file @ b95855b5
...@@ -33,10 +33,10 @@ function c100413026.initial_effect(c) ...@@ -33,10 +33,10 @@ function c100413026.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c100413026.thfilter1(c) function c100413026.thfilter1(c)
return c:IsFaceup() and c:IsSetCard(0x233) and c:IsAbleToHand() return c:IsFaceup() and c:IsSetCard(0x133) and c:IsAbleToHand()
end end
function c100413026.thfilter2(c) function c100413026.thfilter2(c)
return c:IsSetCard(0x233) and not c:IsCode(100413026) and c:IsAbleToHand() return c:IsSetCard(0x133) and not c:IsCode(100413026) and c:IsAbleToHand()
end end
function c100413026.thtg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c100413026.thtg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413026.thfilter1(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100413026.thfilter1(chkc) end
...@@ -54,6 +54,7 @@ function c100413026.thop1(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,6 +54,7 @@ function c100413026.thop1(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,c100413026.thfilter2,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c100413026.thfilter2,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end end
end end
end end
......
script/c100413027.lua
View file @ b95855b5
...@@ -19,7 +19,7 @@ function c100413027.initial_effect(c) ...@@ -19,7 +19,7 @@ function c100413027.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c100413027.thfilter(c) function c100413027.thfilter(c)
return (c:IsSetCard(0x232) or c:IsRace(RACE_PLANT)) and not c:IsCode(100413027) and c:IsAbleToHand() return (c:IsSetCard(0x134) or c:IsRace(RACE_PLANT)) and not c:IsCode(100413027) and c:IsAbleToHand()
end end
function c100413027.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413027.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413027.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c100413027.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
script/c100413028.lua
View file @ b95855b5
...@@ -18,7 +18,7 @@ function c100413028.initial_effect(c) ...@@ -18,7 +18,7 @@ function c100413028.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413028.costfilter(c,tp) function c100413028.costfilter(c,tp)
return (c:IsSetCard(0x232) or c:IsRace(RACE_WARRIOR)) return (c:IsSetCard(0x134) or c:IsRace(RACE_WARRIOR))
and Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) and Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,LOCATION_MZONE,1,c)
end end
function c100413028.fselect(g,tp) function c100413028.fselect(g,tp)
......
script/c100413029.lua
View file @ b95855b5
...@@ -17,15 +17,15 @@ function c100413029.initial_effect(c) ...@@ -17,15 +17,15 @@ function c100413029.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413029.spfilter(c,e,tp,g) function c100413029.spfilter(c,e,tp,g)
return (c:IsSetCard(0x232) or c:IsRace(RACE_MACHINE)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return (c:IsSetCard(0x134) or c:IsRace(RACE_MACHINE)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
and not g:IsExists(Card.IsCode,1,nil,c:GetCode()) and not g:IsExists(Card.IsCode,1,nil,c:GetCode())
end end
function c100413029.costfilter1(c,e,tp) function c100413029.costfilter1(c,e,tp)
return (c:IsSetCard(0x232) or c:IsRace(RACE_MACHINE)) and Duel.GetMZoneCount(tp,c)>0 return (c:IsSetCard(0x134) or c:IsRace(RACE_MACHINE)) and Duel.GetMZoneCount(tp,c)>0
and Duel.IsExistingMatchingCard(c100413029.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,Group.FromCards(c)) and Duel.IsExistingMatchingCard(c100413029.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,Group.FromCards(c))
end end
function c100413029.costfilter2(c,e,tp) function c100413029.costfilter2(c,e,tp)
return (c:IsSetCard(0x232) or c:IsRace(RACE_MACHINE)) return (c:IsSetCard(0x134) or c:IsRace(RACE_MACHINE))
and Duel.IsExistingMatchingCard(c100413029.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,Group.FromCards(c)) and Duel.IsExistingMatchingCard(c100413029.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,Group.FromCards(c))
end end
function c100413029.fselect(g,e,tp) function c100413029.fselect(g,e,tp)
......
script/c100413030.lua
View file @ b95855b5
...@@ -19,7 +19,7 @@ function c100413030.repfilter(c,tp) ...@@ -19,7 +19,7 @@ function c100413030.repfilter(c,tp)
and c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE) and c:IsReason(REASON_BATTLE+REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
end end
function c100413030.desfilter(c,e,tp) function c100413030.desfilter(c,e,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and (c:IsSetCard(0x232) or c:IsRace(RACE_BEASTWARRIOR)) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and (c:IsSetCard(0x134) or c:IsRace(RACE_BEASTWARRIOR))
and c:IsDestructable(e) and not c:IsStatus(STATUS_DESTROY_CONFIRMED+STATUS_BATTLE_DESTROYED) and c:IsDestructable(e) and not c:IsStatus(STATUS_DESTROY_CONFIRMED+STATUS_BATTLE_DESTROYED)
end end
function c100413030.desreptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413030.desreptg(e,tp,eg,ep,ev,re,r,rp,chk)
......
script/c100413031.lua
View file @ b95855b5
...@@ -21,7 +21,7 @@ function c100413031.discon(e,tp,eg,ep,ev,re,r,rp) ...@@ -21,7 +21,7 @@ function c100413031.discon(e,tp,eg,ep,ev,re,r,rp)
return tp~=ep and Duel.GetCurrentChain()==0 return tp~=ep and Duel.GetCurrentChain()==0
end end
function c100413031.costfilter(c) function c100413031.costfilter(c)
return c:IsSetCard(0x232) or c:IsRace(RACE_WYRM) return c:IsSetCard(0x134) or c:IsRace(RACE_WYRM)
end end
function c100413031.discost(e,tp,eg,ep,ev,re,r,rp,chk) function c100413031.discost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,c100413031.costfilter,1,nil) end if chk==0 then return Duel.CheckReleaseGroup(tp,c100413031.costfilter,1,nil) end
......
script/c100413032.lua
View file @ b95855b5
...@@ -18,11 +18,11 @@ function c100413032.initial_effect(c) ...@@ -18,11 +18,11 @@ function c100413032.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413032.costfilter(c,e,tp) function c100413032.costfilter(c,e,tp)
return (c:IsSetCard(0x232) or c:IsRace(RACE_ZOMBIE)) and Duel.GetMZoneCount(tp,c)>0 return (c:IsSetCard(0x134) or c:IsRace(RACE_ZOMBIE)) and Duel.GetMZoneCount(tp,c)>0
and Duel.IsExistingTarget(c100413032.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,c:GetCode()) and Duel.IsExistingTarget(c100413032.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,c:GetCode())
end end
function c100413032.spfilter(c,e,tp,code) function c100413032.spfilter(c,e,tp,code)
return (c:IsSetCard(0x232) or c:IsRace(RACE_ZOMBIE)) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return (c:IsSetCard(0x134) or c:IsRace(RACE_ZOMBIE)) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c100413032.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c100413032.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,c100413032.costfilter,1,nil,e,tp) end if chk==0 then return Duel.CheckReleaseGroup(tp,c100413032.costfilter,1,nil,e,tp) end
......
script/c100413033.lua
View file @ b95855b5
...@@ -43,7 +43,7 @@ function c100413033.drtg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -43,7 +43,7 @@ function c100413033.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,1) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,1)
end end
function c100413033.ofilter(c,tp) function c100413033.ofilter(c,tp)
return not c:IsType(TYPE_TOKEN) and (c:IsControler(tp) or c:IsAbleToChangeControler()) and not c:IsStatus(STATUS_LEAVE_CONFIRMED) return not c:IsType(TYPE_TOKEN) and (c:IsControler(tp) or c:IsAbleToChangeControler())
end end
function c100413033.drop(e,tp,eg,ep,ev,re,r,rp) function c100413033.drop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
...@@ -57,14 +57,20 @@ function c100413033.drop(e,tp,eg,ep,ev,re,r,rp) ...@@ -57,14 +57,20 @@ function c100413033.drop(e,tp,eg,ep,ev,re,r,rp)
Duel.ShuffleHand(tp) Duel.ShuffleHand(tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
local tc1=tg1:Select(tp,1,1,nil):GetFirst() local tc1=tg1:Select(tp,1,1,nil):GetFirst()
sg:AddCard(tc1) if tc1 and not tc1:IsImmuneToEffect(e) then
tc1:CancelToGrave()
sg:AddCard(tc1)
end
end end
local tg2=Duel.GetMatchingGroup(c100413033.ofilter,1-tp,LOCATION_HAND+LOCATION_ONFIELD,0,aux.ExceptThisCard(e),cp) local tg2=Duel.GetMatchingGroup(c100413033.ofilter,1-tp,LOCATION_HAND+LOCATION_ONFIELD,0,aux.ExceptThisCard(e),cp)
if ed>0 and tg2:GetCount()>0 then if ed>0 and tg2:GetCount()>0 then
Duel.ShuffleHand(1-tp) Duel.ShuffleHand(1-tp)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_XMATERIAL) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_XMATERIAL)
local tc2=tg2:Select(1-tp,1,1,nil):GetFirst() local tc2=tg2:Select(1-tp,1,1,nil):GetFirst()
sg:AddCard(tc2) if tc2 and not tc2:IsImmuneToEffect(e) then
tc2:CancelToGrave()
sg:AddCard(tc2)
end
end end
if sg:GetCount()>0 then if sg:GetCount()>0 then
Duel.BreakEffect() Duel.BreakEffect()
......
script/c100413034.lua
View file @ b95855b5
...@@ -41,7 +41,7 @@ function c100413034.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -41,7 +41,7 @@ function c100413034.spcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c100413034.cfilter1,1,nil,1-tp) return eg:IsExists(c100413034.cfilter1,1,nil,1-tp)
end end
function c100413034.spfilter(c,e,tp) function c100413034.spfilter(c,e,tp)
return c:IsSetCard(0x232) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return c:IsSetCard(0x134) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c100413034.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413034.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
...@@ -57,14 +57,14 @@ function c100413034.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -57,14 +57,14 @@ function c100413034.spop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c100413034.cfilter2(c,tp) function c100413034.cfilter2(c,tp)
return c:GetSummonPlayer()==tp and c:IsSetCard(0x232) return c:GetSummonPlayer()==tp and c:IsSetCard(0x134) and c:IsFaceup()
end end
function c100413034.tkcon(e,tp,eg,ep,ev,re,r,rp) function c100413034.tkcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp and eg:IsExists(c100413034.cfilter2,1,nil,tp) return Duel.GetTurnPlayer()~=tp and eg:IsExists(c100413034.cfilter2,1,nil,tp)
end end
function c100413034.tktg(e,tp,eg,ep,ev,re,r,rp,chk) function c100413034.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,100413134,0x232,0x4011,1500,1500,4,RACE_FAIRY,ATTRIBUTE_LIGHT) end and Duel.IsPlayerCanSpecialSummonMonster(tp,100413134,0x134,0x4011,1500,1500,4,RACE_FAIRY,ATTRIBUTE_LIGHT) end
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,ft,0,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,ft,0,0)
...@@ -72,7 +72,7 @@ function c100413034.tktg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -72,7 +72,7 @@ function c100413034.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c100413034.tkop(e,tp,eg,ep,ev,re,r,rp) function c100413034.tkop(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if ft<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,100413134,0x232,0x4011,1500,1500,4,RACE_FAIRY,ATTRIBUTE_LIGHT) then return end if ft<=0 or not Duel.IsPlayerCanSpecialSummonMonster(tp,100413134,0x134,0x4011,1500,1500,4,RACE_FAIRY,ATTRIBUTE_LIGHT) then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
local fid=e:GetHandler():GetFieldID() local fid=e:GetHandler():GetFieldID()
local g=Group.CreateGroup() local g=Group.CreateGroup()
......
script/c100413035.lua
View file @ b95855b5
...@@ -13,10 +13,10 @@ function c100413035.initial_effect(c) ...@@ -13,10 +13,10 @@ function c100413035.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413035.filter1(c) function c100413035.filter1(c)
return c:IsSetCard(0x232) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() and not c:IsPublic() return c:IsSetCard(0x134) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() and not c:IsPublic()
end end
function c100413035.filter2(c) function c100413035.filter2(c)
return c:IsSetCard(0x232) and c:IsType(TYPE_SPELL+TYPE_TRAP) and not c:IsCode(100413035) and c:IsAbleToHand() return c:IsSetCard(0x134) and c:IsType(TYPE_SPELL+TYPE_TRAP) and not c:IsCode(100413035) and c:IsAbleToHand()
end end
function c100413035.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100413035.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413035.filter1,tp,LOCATION_HAND,0,1,nil) if chk==0 then return Duel.IsExistingMatchingCard(c100413035.filter1,tp,LOCATION_HAND,0,1,nil)
...@@ -26,7 +26,7 @@ function c100413035.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -26,7 +26,7 @@ function c100413035.target(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c100413035.activate(e,tp,eg,ep,ev,re,r,rp) function c100413035.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g1=Duel.SelectMatchingCard(tp,c100413035.filter1,tp,LOCATION_HAND,0,1,1,nil,tp) local g1=Duel.SelectMatchingCard(tp,c100413035.filter1,tp,LOCATION_HAND,0,1,1,nil)
Duel.ConfirmCards(1-tp,g1) Duel.ConfirmCards(1-tp,g1)
if g1:GetCount()==0 then return end if g1:GetCount()==0 then return end
local g2=Duel.GetMatchingGroup(c100413035.filter2,tp,LOCATION_DECK,0,nil) local g2=Duel.GetMatchingGroup(c100413035.filter2,tp,LOCATION_DECK,0,nil)
...@@ -34,6 +34,7 @@ function c100413035.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -34,6 +34,7 @@ function c100413035.activate(e,tp,eg,ep,ev,re,r,rp)
local sg=g2:SelectSubGroup(tp,aux.dncheck,false,1,2) local sg=g2:SelectSubGroup(tp,aux.dncheck,false,1,2)
if sg and Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then if sg and Duel.SendtoHand(sg,nil,REASON_EFFECT)~=0 then
Duel.ConfirmCards(1-tp,sg) Duel.ConfirmCards(1-tp,sg)
Duel.ShuffleDeck(tp)
Duel.BreakEffect() Duel.BreakEffect()
Duel.SendtoDeck(g1,nil,1,REASON_EFFECT) Duel.SendtoDeck(g1,nil,1,REASON_EFFECT)
end end
......
script/c100413036.lua
View file @ b95855b5
...@@ -33,10 +33,10 @@ function c100413036.atkcon(e) ...@@ -33,10 +33,10 @@ function c100413036.atkcon(e)
return Duel.IsExistingMatchingCard(Card.IsType,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil,TYPE_TOKEN) return Duel.IsExistingMatchingCard(Card.IsType,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil,TYPE_TOKEN)
end end
function c100413036.atkval(e,c) function c100413036.atkval(e,c)
return c:IsSetCard(0x232) and c:IsType(TYPE_EFFECT) return c:IsFaceup() and c:IsSetCard(0x134) and c:IsType(TYPE_EFFECT)
end end
function c100413036.cfilter(c) function c100413036.cfilter(c)
return bit.band(c:GetPreviousTypeOnField(),TYPE_EFFECT)~=0 and c:IsPreviousSetCard(0x232) return bit.band(c:GetPreviousTypeOnField(),TYPE_EFFECT)~=0 and c:IsPreviousSetCard(0x134)
end end
function c100413036.drcon(e,tp,eg,ep,ev,re,r,rp) function c100413036.drcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c100413036.cfilter,1,nil) return eg:IsExists(c100413036.cfilter,1,nil)
......
script/c100413037.lua
View file @ b95855b5
...@@ -13,7 +13,7 @@ function c100413037.initial_effect(c) ...@@ -13,7 +13,7 @@ function c100413037.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c100413037.filter(c,tp) function c100413037.filter(c,tp)
return c:IsSetCard(0x232) and c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true) return c:IsSetCard(0x134) and c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true)
end end
function c100413037.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100413037.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c100413037.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp) if chk==0 then return Duel.IsExistingMatchingCard(c100413037.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp)
......
script/c100413038.lua
View file @ b95855b5
...@@ -28,7 +28,7 @@ function c100413038.chcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -28,7 +28,7 @@ function c100413038.chcon(e,tp,eg,ep,ev,re,r,rp)
if ct<2 then return end if ct<2 then return end
if not Duel.IsPlayerCanDraw(tp,1) or not Duel.IsPlayerCanDraw(1-tp,1) then return false end if not Duel.IsPlayerCanDraw(tp,1) or not Duel.IsPlayerCanDraw(1-tp,1) then return false end
local te,p=Duel.GetChainInfo(ct-1,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER) local te,p=Duel.GetChainInfo(ct-1,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER)
return te and te:GetHandler():IsSetCard(0x232) and p==tp and rp==1-tp return te and te:GetHandler():IsSetCard(0x134) and p==tp and rp==1-tp
end end
function c100413038.chcost(e,tp,eg,ep,ev,re,r,rp,chk) function c100413038.chcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
......
script/c100413039.lua
View file @ b95855b5
...@@ -19,7 +19,7 @@ function c100413039.cost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -19,7 +19,7 @@ function c100413039.cost(e,tp,eg,ep,ev,re,r,rp,chk)
return true return true
end end
function c100413039.costfilter(c,tp) function c100413039.costfilter(c,tp)
return c:IsSetCard(0x232) and Duel.IsExistingTarget(c100413039.matfilter1,tp,LOCATION_MZONE,0,1,c,tp,Group.FromCards(c)) return c:IsSetCard(0x134) and Duel.IsExistingTarget(c100413039.matfilter1,tp,LOCATION_MZONE,0,1,c,tp,Group.FromCards(c))
end end
function c100413039.matfilter1(c,tp,g) function c100413039.matfilter1(c,tp,g)
local sg=g:Clone() local sg=g:Clone()
...@@ -28,7 +28,7 @@ function c100413039.matfilter1(c,tp,g) ...@@ -28,7 +28,7 @@ function c100413039.matfilter1(c,tp,g)
and Duel.IsExistingMatchingCard(c100413039.matfilter2,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,g:GetCount(),sg) and Duel.IsExistingMatchingCard(c100413039.matfilter2,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,g:GetCount(),sg)
end end
function c100413039.matfilter2(c) function c100413039.matfilter2(c)
return c:IsSetCard(0x232) and c:IsType(TYPE_MONSTER) and not c:IsType(TYPE_TOKEN) and not c:IsForbidden() return c:IsSetCard(0x134) and c:IsType(TYPE_MONSTER) and not c:IsType(TYPE_TOKEN) and not c:IsForbidden()
end end
function c100413039.fselect(g,tp) function c100413039.fselect(g,tp)
if Duel.IsExistingTarget(c100413039.matfilter1,tp,LOCATION_MZONE,0,1,g,tp,g) then if Duel.IsExistingTarget(c100413039.matfilter1,tp,LOCATION_MZONE,0,1,g,tp,g) then
......
script/c101011064.lua
View file @ b95855b5
...@@ -14,11 +14,11 @@ function c101011064.initial_effect(c) ...@@ -14,11 +14,11 @@ function c101011064.initial_effect(c)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
function c101011064.filter(c,e,tp) function c101011064.filter(c,e,tp)
return c:IsFaceup() and c:IsSetCard(0x233) and c:IsAbleToHand() return c:IsFaceup() and c:IsSetCard(0x133) and c:IsAbleToHand()
and Duel.IsExistingMatchingCard(c101011064.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,c:GetCode()) and Duel.IsExistingMatchingCard(c101011064.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp,c:GetCode())
end end
function c101011064.spfilter(c,e,tp,code) function c101011064.spfilter(c,e,tp,code)
return c:IsSetCard(0x233) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return c:IsSetCard(0x133) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end end
function c101011064.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c101011064.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c101011064.filter(chkc,e,tp) end if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c101011064.filter(chkc,e,tp) end
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment