Commit 393a599d authored by TanakaKotoha's avatar TanakaKotoha

dededededededededededede

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