Commit e50b5621 authored by wind2009's avatar wind2009

Fix 糾罪巧-Archaη.TAIL

parent cd3501df
Pipeline #40026 passed with stages
in 2 minutes and 25 seconds
--糾罪巧-Archaη.TAIL --糾罪巧Archaη.TAIL
local s,id,o=GetID() local s,id,o=GetID()
function s.initial_effect(c) function s.initial_effect(c)
--pendulum summon --pendulum summon
...@@ -57,10 +57,10 @@ function s.initial_effect(c) ...@@ -57,10 +57,10 @@ function s.initial_effect(c)
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_TO_GRAVE) e5:SetCode(EVENT_TO_GRAVE)
e5:SetRange(LOCATION_MZONE) e5:SetLabelObject(c)
e5:SetCondition(s.damcon) e5:SetCondition(s.damcon)
e5:SetOperation(s.damop) e5:SetOperation(s.damop)
c:RegisterEffect(e5) Duel.RegisterEffect(e5,0)
Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter) Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
end end
function s.counterfilter(c) function s.counterfilter(c)
...@@ -157,18 +157,25 @@ function s.indtg2(e,c) ...@@ -157,18 +157,25 @@ function s.indtg2(e,c)
return c:IsType(TYPE_MONSTER) or c:IsSetCard(0x2d5) and c:IsType(TYPE_SPELL) and c:IsFaceup() return c:IsType(TYPE_MONSTER) or c:IsSetCard(0x2d5) and c:IsType(TYPE_SPELL) and c:IsFaceup()
end end
function s.flipop(e,tp,eg,ep,ev,re,r,rp) function s.flipop(e,tp,eg,ep,ev,re,r,rp)
e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1) e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3))
end
function s.efffilter(c,ec)
return c==ec and c:IsFaceup() and c:GetFlagEffect(id)>0 and not c:IsStatus(STATUS_BATTLE_DESTROYED) and not c:IsDisabled()
end end
function s.damcon(e,tp,eg,ep,ev,re,r,rp) function s.damcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetFlagEffect(id)>0 local c=e:GetLabelObject()
local p=c:GetControler()
return Duel.IsExistingMatchingCard(s.efffilter,p,LOCATION_MZONE,0,1,nil,c)
end end
function s.damfilter(c,tp) function s.damfilter(c,tp)
return c:GetOwner()==1-tp and c:IsType(TYPE_MONSTER) return c:GetOwner()==1-tp and c:IsType(TYPE_MONSTER)
end end
function s.damop(e,tp,eg,ep,ev,re,r,rp) function s.damop(e,tp,eg,ep,ev,re,r,rp)
local dam=eg:FilterCount(s.damfilter,nil,tp) local c=e:GetLabelObject()
if dam>0 then local p=c:GetControler()
local dam=eg:IsExists(s.damfilter,1,nil,p)
if dam then
Duel.Hint(HINT_CARD,0,id) Duel.Hint(HINT_CARD,0,id)
Duel.Damage(1-tp,dam*900,REASON_EFFECT) Duel.Damage(1-p,900,REASON_EFFECT)
end end
end end
\ No newline at end of file
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