Commit 393a599d authored by TanakaKotoha's avatar TanakaKotoha

dededededededededededede

parent 22abfc00
......@@ -4,9 +4,9 @@ function c47510028.initial_effect(c)
aux.EnablePendulumAttribute(c)
--damage
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_START)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,47510028)
e2:SetCondition(c47510028.pcon)
......@@ -57,11 +57,10 @@ function c47510028.initial_effect(c)
c:RegisterEffect(e8)
end
function c47510028.pcon(e,tp,eg,ep,ev,re,r,rp)
local at=Duel.GetAttacker()
local a=Duel.GetAttacker()
local d=a:GetBattleTarget()
if a:IsControler(1-tp) then a,d=d,a end
return a and a:IsFaceup() and a:IsRelateToBattle() and d and d:IsFaceup() and d:IsRelateToBattle() and a:GetControler()~=d:GetControler() and (at:IsAttribute(ATTRIBUTE_WIND) or at:IsSetCard(0x5da))
return a and a:IsFaceup() and a:IsRelateToBattle() and (a:IsAttribute(ATTRIBUTE_WIND) or a:IsSetCard(0x5da))
end
function c47510028.ptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
......@@ -48,16 +48,13 @@ function c47510072.ffilter(c)
return c:GetAttribute()~=ATTRIBUTE_FIRE
end
function c47510072.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chkc then return chkc:IsOnField() and chkc:IsControler(tp) and chkc:IsFaceup() and chkc~=c end
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,c) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,c)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(c47510072.ffilter,tp,0,LOCATION_MZONE,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_HAND+LOCATION_MZONE)
end
function c47510072.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
if #g>0 and Duel.Destroy(g,REASON_EFFECT)~=0 then
local g=Duel.GetMatchingGroup(c47510072.ffilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if g:GetCount()>0 then
Duel.BreakEffect()
......
......@@ -125,7 +125,7 @@ function c47510201.desop(e,tp,eg,ep,ev,re,r,rp)
Duel.Destroy(sg,REASON_EFFECT)
end
end
function c47510201.indtg(c)
function c47510201.indtg(e,c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE)
end
function c47510201.indct(e,re,r,rp)
......
......@@ -11,7 +11,6 @@ function c47510203.initial_effect(c)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,47510203)
e1:SetCost(c47510203.mcost)
e1:SetTarget(c47510203.mtg)
e1:SetOperation(c47510203.mop)
c:RegisterEffect(e1)
--splimit
......@@ -62,25 +61,18 @@ function c47510203.mcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler() and Duel.IsAbleToEnterBP() end
Duel.SendtoExtraP(e:GetHandler(),nil,0,REASON_COST)
end
function c47510203.mtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
end
function c47510203.mfilter(c)
function c47510203.mfilter(e,c)
return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_FIRE)
end
function c47510203.mop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(c47510203.mfilter,tp,LOCATION_MZONE,0,nil)
local tc=g:GetFirst()
local c=e:GetHandler()
while tc do
local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_EXTRA_ATTACK)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e3:SetValue(1)
tc:RegisterEffect(e3)
tc=g:GetNext()
end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_EXTRA_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c47510203.mfilter)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetValue(1)
Duel.RegisterEffect(e1,tp)
end
function c47510203.scost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsAttribute,1,nil,ATTRIBUTE_FIRE) 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