Skip to content

Y
ygopro-222DIY-cards
Commit 231a75bd authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

fix dragonlady

parent e5c6d1e9
Expand all Hide whitespace changes
Inline Side-by-side
Showing with 716 additions and 724 deletions
expansions/script/c47500000.lua
View file @ 231a75bd
--姬塔 --姬塔
local m=47500000
local cm=_G["c"..m]
function c47500000.initial_effect(c) function c47500000.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--splimit --splimit
...@@ -24,7 +23,6 @@ function c47500000.initial_effect(c) ...@@ -24,7 +23,6 @@ function c47500000.initial_effect(c)
e2:SetOperation(c47500000.penop) e2:SetOperation(c47500000.penop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c47500000.card_code_list={47500000}
function c47500000.pefilter(c) function c47500000.pefilter(c)
return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) or c:IsSetCard(0x5d0) return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) or c:IsSetCard(0x5d0)
end end
......
expansions/script/c47500001.lua
View file @ 231a75bd
--炼金术师 姬塔 --炼金术师 姬塔
local m=47500001
local cm=_G["c"..m]
function c47500001.initial_effect(c) function c47500001.initial_effect(c)
--pendulum summon aux.AddCodeList(c,47500000)
aux.EnablePendulumAttribute(c) --pendulum summon
--pendulum set aux.EnablePendulumAttribute(c)
local e1=Effect.CreateEffect(c) --pendulum set
e1:SetDescription(aux.Stringid(47500001,0)) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_RECOVER+CATEGORY_TOHAND) e1:SetDescription(aux.Stringid(47500001,0))
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetCategory(CATEGORY_RECOVER+CATEGORY_TOHAND)
e1:SetRange(LOCATION_PZONE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCountLimit(1,47521001) e1:SetRange(LOCATION_PZONE)
e1:SetTarget(c47500001.thtg) e1:SetCountLimit(1,47521001)
e1:SetOperation(c47500001.thop) e1:SetTarget(c47500001.thtg)
c:RegisterEffect(e1) e1:SetOperation(c47500001.thop)
--destroy and spsummon c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) --destroy and spsummon
e2:SetDescription(aux.Stringid(47500001,1)) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON) e2:SetDescription(aux.Stringid(47500001,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCountLimit(1,47500001) e2:SetRange(LOCATION_PZONE)
e2:SetTarget(c47500001.sptg) e2:SetCountLimit(1,47500001)
e2:SetOperation(c47500001.spop) e2:SetTarget(c47500001.sptg)
c:RegisterEffect(e2) e2:SetOperation(c47500001.spop)
--search c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) --search
e3:SetDescription(aux.Stringid(47500001,2)) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetDescription(aux.Stringid(47500001,2))
e3:SetType(EFFECT_TYPE_IGNITION) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetRange(LOCATION_MZONE) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetCountLimit(1,47521101) e3:SetRange(LOCATION_MZONE)
e3:SetCost(c47500001.thcost) e3:SetCountLimit(1,47521101)
e3:SetTarget(c47500001.thtg2) e3:SetCost(c47500001.thcost)
e3:SetOperation(c47500001.thop2) e3:SetTarget(c47500001.thtg2)
c:RegisterEffect(e3) e3:SetOperation(c47500001.thop2)
--code c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) --code
e4:SetType(EFFECT_TYPE_SINGLE) local e4=Effect.CreateEffect(c)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_CHANGE_CODE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE+LOCATION_PZONE+LOCATION_GRAVE+LOCATION_EXTRA) e4:SetCode(EFFECT_CHANGE_CODE)
e4:SetValue(47500000) e4:SetRange(LOCATION_MZONE+LOCATION_PZONE+LOCATION_GRAVE+LOCATION_EXTRA)
c:RegisterEffect(e4) e4:SetValue(47500000)
c:RegisterEffect(e4)
end end
c47500001.card_code_list={47500000}
function c47500001.thfilter(c) function c47500001.thfilter(c)
return c:IsAbleToHand() return c:IsAbleToHand()
end end
function c47500001.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47500001.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47500001.thfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47500001.thfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_MZONE) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_MZONE)
end end
function c47500001.thop(e,tp,eg,ep,ev,re,r,rp) function c47500001.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c47500001.thfilter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500001.thfilter,tp,LOCATION_MZONE,0,1,1,nil)
if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT) then if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT) then
Duel.Recover(tp,1000,REASON_EFFECT) Duel.Recover(tp,1000,REASON_EFFECT)
end end
end end
function c47500001.spfilter(c,e,tp) function c47500001.spfilter(c,e,tp)
return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and not c:IsCode(47500001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and not c:IsCode(47500001) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47500001.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47500001.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(e:GetLabel()) and chkc:IsControler(tp) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(e:GetLabel()) and chkc:IsControler(tp) and chkc:IsFaceup() end
if chk==0 then if chk==0 then
local ft=Duel.GetMZoneCount(tp) local ft=Duel.GetMZoneCount(tp)
if ft<-1 then return false end if ft<-1 then return false end
local loc=LOCATION_ONFIELD local loc=LOCATION_ONFIELD
if ft==0 then loc=LOCATION_MZONE end if ft==0 then loc=LOCATION_MZONE end
e:SetLabel(loc) e:SetLabel(loc)
return Duel.IsExistingTarget(Card.IsFaceup,tp,loc,0,1,e:GetHandler()) return Duel.IsExistingTarget(Card.IsFaceup,tp,loc,0,1,e:GetHandler())
and Duel.IsExistingMatchingCard(c47500001.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) and Duel.IsExistingMatchingCard(c47500001.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp)
end end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c47500001.spop(e,tp,eg,ep,ev,re,r,rp) function c47500001.spop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,e:GetLabel(),0,1,1,nil) local g=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,e:GetLabel(),0,1,1,nil)
local tc=g:GetFirst() local tc=g:GetFirst()
if tc and Duel.Destroy(tc,REASON_EFFECT)~=0 then if tc and Duel.Destroy(tc,REASON_EFFECT)~=0 then
if Duel.GetMZoneCount(tp)<=0 then return end if Duel.GetMZoneCount(tp)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47500001.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47500001.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
end end
function c47500001.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c47500001.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD) Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
end end
function c47500001.thfilter1(c) function c47500001.thfilter1(c)
return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsType(TYPE_SPELL) return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsType(TYPE_SPELL)
end end
function c47500001.thtg2(e,tp,eg,ep,ev,re,r,rp,chk) function c47500001.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47500001.thfilter1,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47500001.thfilter1,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end end
function c47500001.thop2(e,tp,eg,ep,ev,re,r,rp) function c47500001.thop2(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c47500001.thfilter1,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500001.thfilter1,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) Duel.ConfirmCards(1-tp,g)
end end
end end
\ No newline at end of file
expansions/script/c47500003.lua
View file @ 231a75bd
--枪神 姬塔 --枪神 姬塔
local m=47500003
local c47500003=_G["c"..m]
function c47500003.initial_effect(c) function c47500003.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--effect gian --effect gian
...@@ -49,7 +48,6 @@ function c47500003.initial_effect(c) ...@@ -49,7 +48,6 @@ function c47500003.initial_effect(c)
e5:SetValue(47500000) e5:SetValue(47500000)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47500003.card_code_list={47500000}
function c47500003.atkval(e,c) function c47500003.atkval(e,c)
return c:GetEquipCount()-1 return c:GetEquipCount()-1
end end
......
expansions/script/c47500005.lua
View file @ 231a75bd
--武士 姬塔 --武士 姬塔
function c47500005.initial_effect(c) function c47500005.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--Double Attack --Double Attack
...@@ -58,7 +59,6 @@ function c47500005.initial_effect(c) ...@@ -58,7 +59,6 @@ function c47500005.initial_effect(c)
e6:SetOperation(c47500005.spop) e6:SetOperation(c47500005.spop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47500005.card_code_list={47500000}
function c47500005.cfilter(c) function c47500005.cfilter(c)
return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsAbleToGraveAsCost() return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsAbleToGraveAsCost()
end end
......
expansions/script/c47500007.lua
View file @ 231a75bd
--暗杀者 姬塔 --暗杀者 姬塔
function c47500007.initial_effect(c) function c47500007.initial_effect(c)
--pendulum summon aux.AddCodeList(c,47500000)
aux.EnablePendulumAttribute(c) --pendulum summon
--destroy and spsummon aux.EnablePendulumAttribute(c)
local e1=Effect.CreateEffect(c) --destroy and spsummon
e1:SetDescription(aux.Stringid(47500007,1)) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON) e1:SetDescription(aux.Stringid(47500007,1))
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
e1:SetRange(LOCATION_PZONE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,47500006) e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetTarget(c47500007.sptg) e1:SetCountLimit(1,47500006)
e1:SetOperation(c47500007.spop) e1:SetTarget(c47500007.sptg)
c:RegisterEffect(e1) e1:SetOperation(c47500007.spop)
--xyzrank8 c:RegisterEffect(e1)
local e3=Effect.CreateEffect(c) --xyzrank8
e3:SetType(EFFECT_TYPE_FIELD) local e3=Effect.CreateEffect(c)
e3:SetCode(EFFECT_XYZ_LEVEL) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetValue(8) e3:SetCode(EFFECT_XYZ_LEVEL)
e3:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA) e3:SetValue(8)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetRange(LOCATION_ONFIELD+LOCATION_EXTRA)
e3:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_PENDULUM)) e3:SetTargetRange(LOCATION_MZONE,0)
c:RegisterEffect(e3) e3:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_PENDULUM))
--copy c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) --copy
e4:SetDescription(aux.Stringid(47500007,2)) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_QUICK_O) e4:SetDescription(aux.Stringid(47500007,2))
e4:SetCountLimit(1,47500008) e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN) e4:SetCountLimit(1,47500008)
e4:SetRange(LOCATION_MZONE) e4:SetCode(EVENT_FREE_CHAIN)
e4:SetTarget(c47500007.cytg) e4:SetRange(LOCATION_MZONE)
e4:SetOperation(c47500007.cyop) e4:SetTarget(c47500007.cytg)
c:RegisterEffect(e4) e4:SetOperation(c47500007.cyop)
--code c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c) --code
e5:SetType(EFFECT_TYPE_SINGLE) local e5=Effect.CreateEffect(c)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_CHANGE_CODE) e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_EXTRA) e5:SetCode(EFFECT_CHANGE_CODE)
e5:SetValue(47500000) e5:SetRange(LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_EXTRA)
c:RegisterEffect(e5) e5:SetValue(47500000)
c:RegisterEffect(e5)
end end
c47500007.card_code_list={47500000}
function c47500007.efffilter(c,e,tp,eg,ep,ev,re,r,rp) function c47500007.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
local m=_G["c"..c:GetCode()] local m=_G["c"..c:GetCode()]
local te=m.act_effect local te=m.act_effect
if not te then return false end if not te then return false end
local tg=te:GetTarget() local tg=te:GetTarget()
return aux.IsCodeListed(c,47500000) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) and (not tg or tg and tg(e,tp,eg,ep,ev,re,r,rp,0)) return aux.IsCodeListed(c,47500000) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) and (not tg or tg and tg(e,tp,eg,ep,ev,re,r,rp,0))
end end
function c47500007.cytg(e,tp,eg,ep,ev,re,r,rp,chk) function c47500007.cytg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingTarget(c47500007.efffilter,tp,LOCATION_DECK,0,1,nil,e,tp,eg,ep,ev,re,r,rp) end if chk==0 then return Duel.IsExistingTarget(c47500007.efffilter,tp,LOCATION_DECK,0,1,nil,e,tp,eg,ep,ev,re,r,rp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
local g=Duel.SelectTarget(tp,c47500007.efffilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp) local g=Duel.SelectTarget(tp,c47500007.efffilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT) Duel.SendtoGrave(g,REASON_EFFECT)
end end
local m=_G["c"..g:GetFirst():GetCode()] local m=_G["c"..g:GetFirst():GetCode()]
local te=m.act_effect local te=m.act_effect
local tg=te:GetTarget() local tg=te:GetTarget()
if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end
end end
function c47500007.cyop(e,tp,eg,ep,ev,re,r,rp,chk) function c47500007.cyop(e,tp,eg,ep,ev,re,r,rp,chk)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
local m=_G["c"..tc:GetCode()] local m=_G["c"..tc:GetCode()]
local te=m.act_effect local te=m.act_effect
if not te then return end if not te then return end
local op=te:GetOperation() local op=te:GetOperation()
if op then op(e,tp,eg,ep,ev,re,r,rp) end if op then op(e,tp,eg,ep,ev,re,r,rp) end
end end
function c47500007.spfilter(c,e,tp) function c47500007.spfilter(c,e,tp)
return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return (aux.IsCodeListed(c,47500000) or c:IsCode(47500000)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47500007.tgfilter(c) function c47500007.tgfilter(c)
return c:GetSequence()<5 return c:GetSequence()<5
end end
function c47500007.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47500007.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler()) local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,e:GetHandler())
elseif Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then elseif Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,c47500007.tgfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler()) local g=Duel.SelectTarget(tp,c47500007.tgfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler())
end end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end end
function c47500007.setfilter(c) function c47500007.setfilter(c)
return aux.IsCodeListed(c,47500000) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable() return aux.IsCodeListed(c,47500000) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
end end
function c47500007.spop(e,tp,eg,ep,ev,re,r,rp) function c47500007.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and c:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then if tc:IsRelateToEffect(e) and c:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end end
end end
function c47500007.tefilter(c) function c47500007.tefilter(c)
return c:IsType(TYPE_PENDULUM) and c:IsCode(47500000) and not c:IsForbidden() return c:IsType(TYPE_PENDULUM) and c:IsCode(47500000) and not c:IsForbidden()
end end
function c47500007.hspcon(e,c) function c47500007.hspcon(e,c)
if c==nil then return true end if c==nil then return true end
local tp=c:GetControler() local tp=c:GetControler()
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
return ft>-1 and Duel.IsExistingMatchingCard(c47500007.tefilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) return ft>-1 and Duel.IsExistingMatchingCard(c47500007.tefilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil)
end end
function c47500007.hspop(e,tp,eg,ep,ev,re,r,rp) function c47500007.hspop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(47500007,0)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(47500007,0))
local g=Duel.SelectMatchingCard(tp,c47500007.tefilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500007.tefilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoExtraP(g,tp,REASON_COST) Duel.SendtoExtraP(g,tp,REASON_COST)
end end
end end
\ No newline at end of file
expansions/script/c47500009.lua
View file @ 231a75bd
--舞者 姬塔 --舞者 姬塔
function c47500009.initial_effect(c) function c47500009.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--twin act --twin act
...@@ -35,7 +36,6 @@ function c47500009.initial_effect(c) ...@@ -35,7 +36,6 @@ function c47500009.initial_effect(c)
e5:SetValue(47500000) e5:SetValue(47500000)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47500009.card_code_list={47500000}
function c47500009.dbfilter(c) function c47500009.dbfilter(c)
return c:IsFaceup() and c:IsCode(47500000) return c:IsFaceup() and c:IsCode(47500000)
end end
......
expansions/script/c47500011.lua
View file @ 231a75bd
--机械师 姬塔 --机械师 姬塔
function c47500011.initial_effect(c) function c47500011.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--pendulum produce --pendulum produce
...@@ -49,7 +50,6 @@ function c47500011.initial_effect(c) ...@@ -49,7 +50,6 @@ function c47500011.initial_effect(c)
e5:SetTarget(c47500011.splimit) e5:SetTarget(c47500011.splimit)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47500011.card_code_list={47500000}
function c47500011.splimit(e,c,tp,sumtp,sumpos) function c47500011.splimit(e,c,tp,sumtp,sumpos)
return not c:IsType(TYPE_PENDULUM) return not c:IsType(TYPE_PENDULUM)
end end
......
expansions/script/c47500013.lua
View file @ 231a75bd
This diff is collapsed.
expansions/script/c47500015.lua
View file @ 231a75bd
--黑猫道士 姬塔 --黑猫道士 姬塔
function c47500015.initial_effect(c) function c47500015.initial_effect(c)
aux.AddCodeList(c,47500000)
c:EnableCounterPermit(0x1) c:EnableCounterPermit(0x1)
c:EnableReviveLimit() c:EnableReviveLimit()
--pendulum summon --pendulum summon
...@@ -60,7 +61,6 @@ function c47500015.initial_effect(c) ...@@ -60,7 +61,6 @@ function c47500015.initial_effect(c)
e6:SetOperation(c47500015.spop) e6:SetOperation(c47500015.spop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47500015.card_code_list={47500000}
function c47500015.mfilter(c) function c47500015.mfilter(c)
return c:IsCode(47500000) and c:IsFaceup() return c:IsCode(47500000) and c:IsFaceup()
end end
......
expansions/script/c47500017.lua
View file @ 231a75bd
--一般店员 姬塔 --一般店员 姬塔
function c47500017.initial_effect(c) function c47500017.initial_effect(c)
aux.AddCodeList(c,47500000)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),2,2) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),2,2)
...@@ -29,7 +30,6 @@ function c47500017.initial_effect(c) ...@@ -29,7 +30,6 @@ function c47500017.initial_effect(c)
e2:SetOperation(c47500017.drop) e2:SetOperation(c47500017.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c47500017.card_code_list={47500000}
function c47500017.drcfilter(c,tp) function c47500017.drcfilter(c,tp)
return c:IsPreviousLocation(LOCATION_PZONE) and c:GetPreviousControler()==tp return c:IsPreviousLocation(LOCATION_PZONE) and c:GetPreviousControler()==tp
end end
......
expansions/script/c47500019.lua
View file @ 231a75bd
--姬塔 Re:Link --姬塔 Re:Link
function c47500019.initial_effect(c) function c47500019.initial_effect(c)
aux.AddCodeList(c,47500000)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,c47500019.lfilter,2,2) aux.AddLinkProcedure(c,c47500019.lfilter,2,2)
...@@ -47,7 +48,6 @@ function c47500019.initial_effect(c) ...@@ -47,7 +48,6 @@ function c47500019.initial_effect(c)
e5:SetValue(47500000) e5:SetValue(47500000)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47500019.card_code_list={47500000}
function c47500019.lfilter(c) function c47500019.lfilter(c)
return c:GetOriginalCode()==47500000 return c:GetOriginalCode()==47500000
end end
......
expansions/script/c47500021.lua
View file @ 231a75bd
--调查兵团 姬塔 --调查兵团 姬塔
function c47500021.initial_effect(c) function c47500021.initial_effect(c)
aux.AddCodeList(c,47500000)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_MONSTER),2,3,c47500021.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_MONSTER),2,3,c47500021.lcheck)
...@@ -29,7 +30,6 @@ function c47500021.initial_effect(c) ...@@ -29,7 +30,6 @@ function c47500021.initial_effect(c)
e2:SetOperation(c47500021.thop) e2:SetOperation(c47500021.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c47500021.card_code_list={47500000}
function c47500021.lfilter(c) function c47500021.lfilter(c)
return c:IsCode(47500000) return c:IsCode(47500000)
end end
......
expansions/script/c47500023.lua
View file @ 231a75bd
--红莲之王 姬塔 --红莲之王 姬塔
function c47500023.initial_effect(c) function c47500023.initial_effect(c)
aux.AddCodeList(c,47500000)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_EFFECT),3,4,c47500023.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_EFFECT),3,4,c47500023.lcheck)
...@@ -36,7 +37,6 @@ function c47500023.initial_effect(c) ...@@ -36,7 +37,6 @@ function c47500023.initial_effect(c)
e4:SetCode(EVENT_BE_BATTLE_TARGET) e4:SetCode(EVENT_BE_BATTLE_TARGET)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c47500023.card_code_list={47500000}
function c47500023.lfilter(c) function c47500023.lfilter(c)
return c:IsAttribute(ATTRIBUTE_DARK) and c:IsCode(47500000) return c:IsAttribute(ATTRIBUTE_DARK) and c:IsCode(47500000)
end end
......
expansions/script/c47500025.lua
View file @ 231a75bd
--苍之命运 --苍之命运
function c47500025.initial_effect(c) function c47500025.initial_effect(c)
--Activate aux.AddCodeList(c,47500000)
local e1=Effect.CreateEffect(c) --Activate
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCountLimit(1,47500025+EFFECT_COUNT_CODE_OATH) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c47500025.condition) e1:SetCountLimit(1,47500025+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c47500025.target) e1:SetCondition(c47500025.condition)
e1:SetOperation(c47500025.activate) e1:SetTarget(c47500025.target)
c:RegisterEffect(e1) e1:SetOperation(c47500025.activate)
c47500025.act_effect=e1 c:RegisterEffect(e1)
c47500025.act_effect=e1
end end
c47500025.card_code_list={47500000}
function c47500025.condition(e,tp,eg,ep,ev,re,r,rp) function c47500025.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==1 return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==1
end end
function c47500025.filter(c,e,tp) function c47500025.filter(c,e,tp)
return c:IsCode(47500000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_PENDULUM) return c:IsCode(47500000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_PENDULUM)
end end
function c47500025.target(e,tp,eg,ep,ev,re,r,rp,chk) function c47500025.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
and Duel.IsExistingMatchingCard(c47500025.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47500025.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
end end
function c47500025.activate(e,tp,eg,ep,ev,re,r,rp) function c47500025.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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47500025.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47500025.filter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
\ No newline at end of file
expansions/script/c47500028.lua
View file @ 231a75bd
--晓之空 --晓之空
function c47500028.initial_effect(c) function c47500028.initial_effect(c)
aux.AddCodeList(c,47500000)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
...@@ -10,7 +11,6 @@ function c47500028.initial_effect(c) ...@@ -10,7 +11,6 @@ function c47500028.initial_effect(c)
e1:SetOperation(c47500028.activate) e1:SetOperation(c47500028.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
c47500028.card_code_list={47500000}
function c47500028.filter1(c,e,tp) function c47500028.filter1(c,e,tp)
local rk=c:GetRank() local rk=c:GetRank()
return rk>1 and c:IsFaceup() and c:IsType(TYPE_PENDULUM) and (aux.IsCodeListed(c,47500000) or c:IsSetCard(0x5d0)) and Duel.IsExistingMatchingCard(c47500028.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk,c:GetRace()) and Duel.GetLocationCountFromEx(tp,tp,c)>0 and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) return rk>1 and c:IsFaceup() and c:IsType(TYPE_PENDULUM) and (aux.IsCodeListed(c,47500000) or c:IsSetCard(0x5d0)) and Duel.IsExistingMatchingCard(c47500028.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,rk,c:GetRace()) and Duel.GetLocationCountFromEx(tp,tp,c)>0 and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
......
expansions/script/c47500030.lua
View file @ 231a75bd
--空域图 --空域图
function c47500030.initial_effect(c) function c47500030.initial_effect(c)
aux.AddCodeList(c,47500000)
--Activate --Activate
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE) e0:SetType(EFFECT_TYPE_ACTIVATE)
...@@ -30,7 +31,6 @@ function c47500030.initial_effect(c) ...@@ -30,7 +31,6 @@ function c47500030.initial_effect(c)
e5:SetValue(c47500030.effectfilter) e5:SetValue(c47500030.effectfilter)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47500030.card_code_list={47500000}
function c47500030.costfilter(c) function c47500030.costfilter(c)
return aux.IsCodeListed(c,47500000) and c:IsReleasable() and c:IsType(TYPE_PENDULUM) return aux.IsCodeListed(c,47500000) and c:IsReleasable() and c:IsType(TYPE_PENDULUM)
end end
......
expansions/script/c47500031.lua
View file @ 231a75bd
--机炎复苏 --机炎复苏
function c47500031.initial_effect(c) function c47500031.initial_effect(c)
--act in hand aux.AddCodeList(c,47500000)
local e0=Effect.CreateEffect(c) --act in hand
e0:SetType(EFFECT_TYPE_SINGLE) local e0=Effect.CreateEffect(c)
e0:SetCode(EFFECT_TRAP_ACT_IN_HAND) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCondition(c47500031.handcon) e0:SetCode(EFFECT_TRAP_ACT_IN_HAND)
c:RegisterEffect(e0) e0:SetCondition(c47500031.handcon)
--pendulum effect c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c) --pendulum effect
e1:SetDescription(aux.Stringid(47500031,0)) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(47500031,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCountLimit(1,47500031) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c47500031.cost) e1:SetCountLimit(1,47500031)
e1:SetOperation(c47500031.activate) e1:SetCost(c47500031.cost)
c:RegisterEffect(e1) e1:SetOperation(c47500031.activate)
c47500031.act_effect=e1 c:RegisterEffect(e1)
--reborn c47500031.act_effect=e1
local e2=Effect.CreateEffect(c) --reborn
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetCode(EVENT_FREE_CHAIN) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_GRAVE) e2:SetCode(EVENT_FREE_CHAIN)
e2:SetCountLimit(1,47500031) e2:SetRange(LOCATION_GRAVE)
e2:SetCost(aux.bfgcost) e2:SetCountLimit(1,47500031)
e2:SetTarget(c47500031.sptg) e2:SetCost(aux.bfgcost)
e2:SetOperation(c47500031.spop) e2:SetTarget(c47500031.sptg)
c:RegisterEffect(e2) e2:SetOperation(c47500031.spop)
c:RegisterEffect(e2)
end end
c47500031.card_code_list={47500000}
function c47500031.handcon(e,tp,eg,ep,ev,re,r,rp) function c47500031.handcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
end end
function c47500031.costfilter(c) function c47500031.costfilter(c)
return c:IsSetCard(0x5d0) and c:IsAbleToExtraAsCost() return c:IsSetCard(0x5d0) and c:IsAbleToExtraAsCost()
end end
function c47500031.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c47500031.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47500031.costfilter,tp,LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47500031.costfilter,tp,LOCATION_HAND,0,1,nil) end
local g=Duel.SelectMatchingCard(tp,c47500031.costfilter,tp,LOCATION_HAND,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47500031.costfilter,tp,LOCATION_HAND,0,1,1,nil)
Duel.SendtoExtraP(g,nil,0,REASON_COST) Duel.SendtoExtraP(g,nil,0,REASON_COST)
end end
function c47500031.filter(c) function c47500031.filter(c)
return c:IsType(TYPE_PENDULUM) and aux.IsCodeListed(c,47500000) and not c:IsForbidden() and c:IsSummonableCard() return c:IsType(TYPE_PENDULUM) and aux.IsCodeListed(c,47500000) and not c:IsForbidden() and c:IsSummonableCard()
end end
function c47500031.activate(e,tp,eg,ep,ev,re,r,rp) function c47500031.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end if not c:IsRelateToEffect(e) then return end
local g=Duel.GetMatchingGroup(c47500031.filter,tp,LOCATION_HAND+LOCATION_EXTRA,0,nil) local g=Duel.GetMatchingGroup(c47500031.filter,tp,LOCATION_HAND+LOCATION_EXTRA,0,nil)
local ct=0 local ct=0
if Duel.CheckLocation(tp,LOCATION_PZONE,0) then ct=ct+1 end if Duel.CheckLocation(tp,LOCATION_PZONE,0) then ct=ct+1 end
if Duel.CheckLocation(tp,LOCATION_PZONE,1) then ct=ct+1 end if Duel.CheckLocation(tp,LOCATION_PZONE,1) then ct=ct+1 end
if ct>0 and g:GetCount()>0 then if ct>0 and g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local sg=g:Select(tp,1,ct,nil) local sg=g:Select(tp,1,ct,nil)
local sc=sg:GetFirst() local sc=sg:GetFirst()
while sc do while sc do
Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(sc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
sc=sg:GetNext() sc=sg:GetNext()
end end
end end
end end
function c47500031.spfilter(c,e,tp) function c47500031.spfilter(c,e,tp)
return c:IsAttribute(ATTRIBUTE_FIRE) and not c:IsSummonableCard() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsAttribute(ATTRIBUTE_FIRE) and not c:IsSummonableCard() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47500031.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47500031.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
and Duel.IsExistingMatchingCard(c47500031.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47500031.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
end end
function c47500031.spop(e,tp,eg,ep,ev,re,r,rp) function c47500031.spop(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
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47500031.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47500031.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end end
end end
\ No newline at end of file
expansions/script/c47500101.lua
View file @ 231a75bd
--拳皇 姬塔 --拳皇 姬塔
function c47500101.initial_effect(c) function c47500101.initial_effect(c)
aux.AddCodeList(c,47500000)
--synchro summon --synchro summon
aux.AddSynchroMixProcedure(c,aux.Tuner(nil),aux.Tuner(nil),nil,aux.FilterBoolFunction(Card.IsCode,47500000),1,1) aux.AddSynchroMixProcedure(c,aux.Tuner(nil),aux.Tuner(nil),nil,aux.FilterBoolFunction(Card.IsCode,47500000),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -61,7 +62,6 @@ function c47500101.initial_effect(c) ...@@ -61,7 +62,6 @@ function c47500101.initial_effect(c)
e8:SetOperation(c47500101.fop2) e8:SetOperation(c47500101.fop2)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
c47500101.card_code_list={47500000}
function c47500101.pefilter(c) function c47500101.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8)
end end
......
expansions/script/c47500103.lua
View file @ 231a75bd
--斯巴达 姬塔 --斯巴达 姬塔
function c47500103.initial_effect(c) function c47500103.initial_effect(c)
aux.AddCodeList(c,47500000)
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--fusion material --fusion material
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -56,7 +57,6 @@ function c47500103.initial_effect(c) ...@@ -56,7 +57,6 @@ function c47500103.initial_effect(c)
e8:SetOperation(c47500103.disop2) e8:SetOperation(c47500103.disop2)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
c47500103.card_code_list={47500000}
function c47500103.pefilter(c) function c47500103.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47500104.lua
View file @ 231a75bd
--大魔导师 姬塔 --大魔导师 姬塔
function c47500104.initial_effect(c) function c47500104.initial_effect(c)
aux.AddCodeList(c,47500000)
--material --material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_PENDULUM),8,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsType,TYPE_PENDULUM),8,2)
...@@ -53,7 +54,6 @@ function c47500104.initial_effect(c) ...@@ -53,7 +54,6 @@ function c47500104.initial_effect(c)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47500104.pendulum_level=8 c47500104.pendulum_level=8
c47500104.card_code_list={47500000}
function c47500104.mfilter(c,xyzc) function c47500104.mfilter(c,xyzc)
return c:IsLevel(8) and c:IsRace(RACE_SPELLCASTER) return c:IsLevel(8) and c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47501002.lua
View file @ 231a75bd
--狂战士 姬塔 --狂战士 姬塔
function c47501002.initial_effect(c) function c47501002.initial_effect(c)
aux.AddCodeList(c,47500000)
--material --material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),8,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),8,2)
...@@ -64,7 +65,6 @@ function c47501002.initial_effect(c) ...@@ -64,7 +65,6 @@ function c47501002.initial_effect(c)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47501002.pendulum_level=8 c47501002.pendulum_level=8
c47501002.card_code_list={47500000}
function c47501002.mfilter(c,xyzc) function c47501002.mfilter(c,xyzc)
return c:IsLevel(8) and c:IsRace(RACE_WARRIOR) return c:IsLevel(8) and c:IsRace(RACE_WARRIOR)
end end
......
expansions/script/c47501005.lua
View file @ 231a75bd
--混沌领主 姬塔 --混沌领主 姬塔
function c47501005.initial_effect(c) function c47501005.initial_effect(c)
aux.AddCodeList(c,47500000)
--material --material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),8,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),8,2)
...@@ -62,7 +63,6 @@ function c47501005.initial_effect(c) ...@@ -62,7 +63,6 @@ function c47501005.initial_effect(c)
c:RegisterEffect(e7) c:RegisterEffect(e7)
end end
c47501005.pendulum_level=8 c47501005.pendulum_level=8
c47501005.card_code_list={47500000}
function c47501005.mfilter(c) function c47501005.mfilter(c)
return c:IsLevel(8) return c:IsLevel(8)
end end
......
expansions/script/c47501006.lua
View file @ 231a75bd
--圣者 姬塔 --圣者 姬塔
function c47501006.initial_effect(c) function c47501006.initial_effect(c)
aux.AddCodeList(c,47500000)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.FilterBoolFunction(Card.IsCode,47500000),1,1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.FilterBoolFunction(Card.IsCode,47500000),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -42,7 +43,6 @@ function c47501006.initial_effect(c) ...@@ -42,7 +43,6 @@ function c47501006.initial_effect(c)
e5:SetOperation(c47501006.spop) e5:SetOperation(c47501006.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47501006.card_code_list={47500000}
function c47501006.pefilter(c) function c47501006.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47501007.lua
View file @ 231a75bd
--猎犬 姬塔 --猎犬 姬塔
function c47501007.initial_effect(c) function c47501007.initial_effect(c)
aux.AddCodeList(c,47500000)
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--fusion material --fusion material
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -65,7 +66,6 @@ function c47501007.initial_effect(c) ...@@ -65,7 +66,6 @@ function c47501007.initial_effect(c)
e6:SetOperation(c47501007.sop) e6:SetOperation(c47501007.sop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47501007.card_code_list={47500000}
function c47501007.pefilter(c) function c47501007.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47501008.lua
View file @ 231a75bd
--极乐净土 姬塔 --极乐净土 姬塔
function c47501008.initial_effect(c) function c47501008.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--fusion material --fusion material
......
expansions/script/c47501009.lua
View file @ 231a75bd
--义贼 姬塔 --义贼 姬塔
function c47501009.initial_effect(c) function c47501009.initial_effect(c)
aux.AddCodeList(c,47500000)
--material --material
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddXyzProcedureLevelFree(c,c47501009.mfilter,c47501009.xyzcheck,2,2) aux.AddXyzProcedureLevelFree(c,c47501009.mfilter,c47501009.xyzcheck,2,2)
...@@ -53,7 +54,6 @@ function c47501009.initial_effect(c) ...@@ -53,7 +54,6 @@ function c47501009.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c47501009.pendulum_level=8 c47501009.pendulum_level=8
c47501009.card_code_list={47500000}
function c47501009.mfilter(c) function c47501009.mfilter(c)
return c:IsLevel(8) return c:IsLevel(8)
end end
......
expansions/script/c47501010.lua
View file @ 231a75bd
--天女 姬塔 --天女 姬塔
function c47501010.initial_effect(c) function c47501010.initial_effect(c)
aux.AddCodeList(c,47500000)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),aux.FilterBoolFunction(Card.IsType,TYPE_SYNCHRO),1,1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),aux.FilterBoolFunction(Card.IsType,TYPE_SYNCHRO),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -72,7 +73,6 @@ function c47501010.initial_effect(c) ...@@ -72,7 +73,6 @@ function c47501010.initial_effect(c)
e8:SetTargetRange(LOCATION_MZONE,0) e8:SetTargetRange(LOCATION_MZONE,0)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
c47501010.card_code_list={47500000}
function c47501010.pefilter(c) function c47501010.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47501011.lua
View file @ 231a75bd
--剑豪 姬塔 --剑豪 姬塔
function c47501011.initial_effect(c) function c47501011.initial_effect(c)
aux.AddCodeList(c,47500000)
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--fusion material --fusion material
c:EnableReviveLimit() c:EnableReviveLimit()
...@@ -49,7 +50,6 @@ function c47501011.initial_effect(c) ...@@ -49,7 +50,6 @@ function c47501011.initial_effect(c)
e4:SetValue(2) e4:SetValue(2)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c47501011.card_code_list={47500000}
function c47501011.pefilter(c) function c47501011.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47510007.lua
View file @ 231a75bd
...@@ -55,11 +55,10 @@ function c47510007.psplimit(e,c,tp,sumtp,sumpos) ...@@ -55,11 +55,10 @@ function c47510007.psplimit(e,c,tp,sumtp,sumpos)
return not c47510007.pefilter(c) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c47510007.pefilter(c) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end end
function c47510007.spfilter(c,e,tp) function c47510007.spfilter(c,e,tp)
return (c:IsSetCard(0x5da) or c:IsSetCard(0x5de)) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) return (c:IsSetCard(0x5da) or c:IsSetCard(0x5de)) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end end
function c47510007.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47510007.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,e:GetHandler())>0 if chk==0 then return Duel.IsExistingMatchingCard(c47510007.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c47510007.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47510007.spop(e,tp,eg,ep,ev,re,r,rp) function c47510007.spop(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c47510245.lua
View file @ 231a75bd
...@@ -118,7 +118,7 @@ end ...@@ -118,7 +118,7 @@ end
function c47510245.filter2(c,e,tp,mc,rk,rc,code) function c47510245.filter2(c,e,tp,mc,rk,rc,code)
if c:GetOriginalCode()==6165656 and code~=48995978 then return false end if c:GetOriginalCode()==6165656 and code~=48995978 then return false end
return c:IsRank(rk) and c:IsRace(rc) and mc:IsCanBeXyzMaterial(c) return c:IsRank(rk) and c:IsRace(rc) and mc:IsCanBeXyzMaterial(c)
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end end
function c47510245.xtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c47510245.xtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c47510245.filter1(chkc,e,tp) end if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c47510245.filter1(chkc,e,tp) end
...@@ -130,7 +130,7 @@ end ...@@ -130,7 +130,7 @@ end
function c47510245.xop(e,tp,eg,ep,ev,re,r,rp) function c47510245.xop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if Duel.GetLocationCountFromEx(tp,tp,tc)<=0 or not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47510245.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank()+1,tc:GetRace(),tc:GetCode()) local g=Duel.SelectMatchingCard(tp,c47510245.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc,tc:GetRank()+1,tc:GetRace(),tc:GetCode())
......
expansions/script/c47520013.lua
View file @ 231a75bd
...@@ -153,13 +153,13 @@ function c47520013.filter(c,e,tp) ...@@ -153,13 +153,13 @@ function c47520013.filter(c,e,tp)
return c:IsCode(47520015) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) return c:IsCode(47520015) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
end end
function c47520013.awtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47520013.awtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)>0
and aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) and aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
and Duel.IsExistingMatchingCard(c47520013.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47520013.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47520013.awop(e,tp,eg,ep,ev,re,r,rp) function c47520013.awop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCountFromEx(tp)<=0 or not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_SYNCHRO)<1 or not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47520013.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47520013.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
......
expansions/script/c47530004.lua
View file @ 231a75bd
...@@ -68,7 +68,7 @@ function c47530004.sptg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -68,7 +68,7 @@ function c47530004.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
function c47530004.spop(e,tp,eg,ep,ev,re,r,rp) function c47530004.spop(e,tp,eg,ep,ev,re,r,rp)
local zone=aux.GetMultiLinkedZone(tp) local zone=aux.GetMultiLinkedZone(tp)
if Duel.GetLocationCountFromEx(tp)<=0 or zone==0 then return end if zone==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47530004.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,zone) local g=Duel.SelectMatchingCard(tp,c47530004.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,zone)
if g:GetCount()>0 then if g:GetCount()>0 then
......
expansions/script/c47530015.lua
View file @ 231a75bd
...@@ -59,11 +59,10 @@ function c47530015.spcon(e,tp,eg,ep,ev,re,r,rp) ...@@ -59,11 +59,10 @@ function c47530015.spcon(e,tp,eg,ep,ev,re,r,rp)
return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_XYZ) return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_XYZ)
end end
function c47530015.spfilter2(c,e,tp) function c47530015.spfilter2(c,e,tp)
return c:IsSetCard(0x5d5) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x5d5) and not c:IsType(TYPE_LINK) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
end end
function c47530015.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47530015.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 if chk==0 then return Duel.IsExistingMatchingCard(c47530015.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c47530015.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47530015.spop(e,tp,eg,ep,ev,re,r,rp) function c47530015.spop(e,tp,eg,ep,ev,re,r,rp)
......
expansions/script/c47530100.lua
View file @ 231a75bd
...@@ -97,12 +97,12 @@ function c47530100.spfilter(c,e,tp) ...@@ -97,12 +97,12 @@ function c47530100.spfilter(c,e,tp)
return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsLink(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsLink(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47530100.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47530100.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)>0
and Duel.IsExistingMatchingCard(c47530100.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47530100.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47530100.spop(e,tp,eg,ep,ev,re,r,rp) function c47530100.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCountFromEx(tp)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47530100.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47530100.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
......
expansions/script/c47550008.lua
View file @ 231a75bd
--苍空剑士 丽莎 --苍空剑士 丽莎
function c47550008.initial_effect(c) function c47550008.initial_effect(c)
aux.AddCodeList(c,47500000)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
--splimit --splimit
...@@ -43,7 +44,6 @@ function c47550008.initial_effect(c) ...@@ -43,7 +44,6 @@ function c47550008.initial_effect(c)
e4:SetOperation(c47550008.pspop) e4:SetOperation(c47550008.pspop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c47550008.card_code_list={47500000}
function c47550008.pefilter(c) function c47550008.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsSetCard(0x5da) or c:IsAttribute(ATTRIBUTE_WIND) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsSetCard(0x5da) or c:IsAttribute(ATTRIBUTE_WIND) or c:IsRace(RACE_SPELLCASTER)
end end
......
expansions/script/c47551124.lua
View file @ 231a75bd
--蝴蝶幻刃 --蝴蝶幻刃
function c47551124.initial_effect(c) function c47551124.initial_effect(c)
aux.AddCodeList(c,47500000)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DISABLE+CATEGORY_DAMAGE) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DISABLE+CATEGORY_DAMAGE)
...@@ -27,7 +28,6 @@ function c47551124.initial_effect(c) ...@@ -27,7 +28,6 @@ function c47551124.initial_effect(c)
e3:SetCondition(c47551124.handcon) e3:SetCondition(c47551124.handcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c47551124.card_code_list={47500000}
function c47551124.filter(c) function c47551124.filter(c)
return c:IsType(TYPE_XYZ) and c:IsSetCard(0x5d0) return c:IsType(TYPE_XYZ) and c:IsSetCard(0x5d0)
end end
......
expansions/script/c47570400.lua
View file @ 231a75bd
...@@ -211,12 +211,11 @@ function c47570400.spcost(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -211,12 +211,11 @@ function c47570400.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.Release(e:GetHandler(),REASON_COST) Duel.Release(e:GetHandler(),REASON_COST)
end end
function c47570400.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47570400.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47570400.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end if chk==0 then return Duel.IsExistingMatchingCard(c47570400.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_FUSION)>0 end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47570400.spop(e,tp,eg,ep,ev,re,r,rp) function c47570400.spop(e,tp,eg,ep,ev,re,r,rp)
local ft=Duel.GetLocationCountFromEx(tp) if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_FUSION)<=0 or not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
if ft<=0 or not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47570400.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47570400.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
......
expansions/script/c47579908.lua
View file @ 231a75bd
--天司长 圣德芬 --天司长 圣德芬
function c47579908.initial_effect(c) function c47579908.initial_effect(c)
c:SetSPSummonOnce(47579908) c:SetSPSummonOnce(47579908)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47579908.synfilter),aux.NonTuner(c47579908.synfilter2),2) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47579908.synfilter),aux.NonTuner(c47579908.synfilter2),2)
c:EnableReviveLimit() c:EnableReviveLimit()
--cannot special summon --cannot special summon
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(aux.synlimit) e0:SetValue(aux.synlimit)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--indes --indes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCondition(c47579908.inmcon) e1:SetCondition(c47579908.inmcon)
e1:SetValue(c47579908.efilter) e1:SetValue(c47579908.efilter)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Ain Soph Aur --Ain Soph Aur
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47579908,0)) e2:SetDescription(aux.Stringid(47579908,0))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,47579908+EFFECT_COUNT_CODE_OATH) e2:SetCountLimit(1,47579908+EFFECT_COUNT_CODE_OATH)
e2:SetCondition(c47579908.batcon) e2:SetCondition(c47579908.batcon)
e2:SetOperation(c47579908.batop) e2:SetOperation(c47579908.batop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--pendulum --pendulum
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_LEAVE_FIELD) e3:SetCode(EVENT_LEAVE_FIELD)
e3:SetProperty(EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCondition(c47579908.pencon) e3:SetCondition(c47579908.pencon)
e3:SetTarget(c47579908.pentg) e3:SetTarget(c47579908.pentg)
e3:SetOperation(c47579908.penop) e3:SetOperation(c47579908.penop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--immune --immune
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_IMMUNE_EFFECT) e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetRange(LOCATION_PZONE) e4:SetRange(LOCATION_PZONE)
e4:SetTargetRange(LOCATION_MZONE,0) e4:SetTargetRange(LOCATION_MZONE,0)
e4:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY)) e4:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY))
e4:SetValue(c47579908.efilter) e4:SetValue(c47579908.efilter)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm --spsummon bgm
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_SPSUMMON_SUCCESS) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetOperation(c47579908.spsuc) e5:SetOperation(c47579908.spsuc)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--pierce --pierce
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_PIERCE) e6:SetCode(EFFECT_PIERCE)
e6:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
function c47579908.synfilter(c) function c47579908.synfilter(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
function c47579908.synfilter2(c) function c47579908.synfilter2(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION)
end end
function c47579908.inmcon(e,tp,eg,ep,ev,re,r,rp) function c47579908.inmcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47579908.efilter(e,te) function c47579908.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetOwner()~=e:GetOwner()
end end
function c47579908.batcon(e,tp,eg,ep,ev,re,r,rp) function c47579908.batcon(e,tp,eg,ep,ev,re,r,rp)
return (e:GetHandler()==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil) or e:GetHandler()==Duel.GetAttackTarget() return (e:GetHandler()==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil) or e:GetHandler()==Duel.GetAttackTarget()
end end
function c47579908.atkfilter(c) function c47579908.atkfilter(c)
return c:IsFaceup() and c:IsRace(RACE_FAIRY) and not c:IsCode(47579908) return c:IsFaceup() and c:IsRace(RACE_FAIRY) and not c:IsCode(47579908)
end end
function c47579908.batop(e,tp,eg,ep,ev,re,r,rp) function c47579908.batop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c47579908.atkfilter,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(c47579908.atkfilter,tp,LOCATION_MZONE,0,nil)
local atk=g:GetSum(Card.GetAttack) local atk=g:GetSum(Card.GetAttack)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
e1:SetValue(atk) e1:SetValue(atk)
c:RegisterEffect(e1) c:RegisterEffect(e1)
Duel.Hint(HINT_SOUND,0,aux.Stringid(47579908,2)) Duel.Hint(HINT_SOUND,0,aux.Stringid(47579908,2))
end end
function c47579908.indestg(e,c) function c47579908.indestg(e,c)
return c==e:GetHandler():GetBattleTarget() return c==e:GetHandler():GetBattleTarget()
end end
function c47579908.pencon(e,tp,eg,ep,ev,re,r,rp) function c47579908.pencon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO) return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47579908.filter(c,e,tp) function c47579908.filter(c,e,tp)
return c:IsCode(47551000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCode(47551000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47579908.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47579908.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)>0
and Duel.IsExistingMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end and Duel.IsExistingMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47579908.penop(e,tp,eg,ep,ev,re,r,rp) function c47579908.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then
if Duel.GetLocationCountFromEx(tp)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end
local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp) local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp)
if tg then if tg then
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
end end
end end
end end
function c47579908.efilter(e,te) function c47579908.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER) return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
end end
function c47579908.spsuc(e,tp,eg,ep,ev,re,r,rp) function c47579908.spsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(47579908,2)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(47579908,2))
end end
\ No newline at end of file
expansions/script/c47590008.lua
View file @ 231a75bd
This diff is collapsed.
expansions/script/c47591392.lua
View file @ 231a75bd
...@@ -14,7 +14,7 @@ function c47591392.filter(c,e,tp) ...@@ -14,7 +14,7 @@ function c47591392.filter(c,e,tp)
return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR) and c:IsLevel(5)) or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_PSYCHO) and c:IsLevel(3)) or (c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_SPELLCASTER) and c:IsLevel(4))) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR) and c:IsLevel(5)) or (c:IsAttribute(ATTRIBUTE_WATER) and c:IsRace(RACE_PSYCHO) and c:IsLevel(3)) or (c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_SPELLCASTER) and c:IsLevel(4))) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47591392.target(e,tp,eg,ep,ev,re,r,rp,chk) function c47591392.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCountFromEx(tp)>0 and Duel.IsExistingMatchingCard(c47591392.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_XYZ)>0 and Duel.IsExistingMatchingCard(c47591392.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA)
end end
function c47591392.spfilter2(c,e,tp,mc) function c47591392.spfilter2(c,e,tp,mc)
...@@ -22,7 +22,7 @@ function c47591392.spfilter2(c,e,tp,mc) ...@@ -22,7 +22,7 @@ function c47591392.spfilter2(c,e,tp,mc)
end end
function c47591392.activate(e,tp,eg,ep,ev,re,r,rp) function c47591392.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetLocationCountFromEx(tp)<1 then return end if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 or Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_XYZ)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47591392.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47591392.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
local tc=g:GetFirst() local tc=g:GetFirst()
......
expansions/script/c47598773.lua
View file @ 231a75bd
...@@ -125,13 +125,13 @@ function c47598773.spfilter(c,e,tp) ...@@ -125,13 +125,13 @@ function c47598773.spfilter(c,e,tp)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47598773.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function c47598773.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_XYZ)>0
and Duel.IsExistingMatchingCard(c47598773.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end and Duel.IsExistingMatchingCard(c47598773.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47598773.spop(e,tp,eg,ep,ev,re,r,rp) function c47598773.spop(e,tp,eg,ep,ev,re,r,rp)
if not e:GetHandler():IsRelateToEffect(e) then return end if not e:GetHandler():IsRelateToEffect(e) then return end
if Duel.GetLocationCountFromEx(tp)<1 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_XYZ)<1 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c47598773.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c47598773.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
if g:GetCount()>0 then if g:GetCount()>0 then
......
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