Commit 6594ca84 authored by TanakaKotoha's avatar TanakaKotoha

888

parent bcb15ec2
......@@ -166,15 +166,16 @@ function c33400413.atkop(e,tp,eg,ep,ev,re,r,rp)
end
function c33400413.desfilter1(c)
return c:IsReleasable() and (c:IsSetCard(0x341) or c:IsSetCard(0x340) or c:IsSetCard(0x6343))
return (c:IsSetCard(0x341) or c:IsSetCard(0x340) or c:IsSetCard(0x6343))
and Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c)
end
function c33400413.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_ONFIELD,1,nil) and Duel.IsExistingTarget(c33400413.desfilter1,tp,LOCATION_ONFIELD,0,1,nil) end
if chk==0 then return Duel.IsExistingTarget(c33400413.desfilter1,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g1=Duel.SelectTarget(tp,c33400413.desfilter1,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g2=Duel.SelectTarget(tp,nil,tp,0,LOCATION_ONFIELD,1,2,nil)
local g2=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,2,g1)
g1:Merge(g2)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,g1:GetCount(),0,0)
end
......
......@@ -28,7 +28,7 @@ function c33401200.condition(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c33401200.cfilter,1,nil,tp)
end
function c33401200.cfilter2(c,tp,rp)
return c:IsSetCard(0x341) and ((rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD)) or c:IsReason(REASON_BATTLE))
return c:IsSetCard(0x341) and ((rp==1-tp and c:IsReason(REASON_EFFECT) and c:GetPreviousControler()==tp and c:IsPreviousLocation(LOCATION_ONFIELD)) or c:IsReason(REASON_BATTLE))
end
function c33401200.condition2(e,tp,eg,ep,ev,re,r,rp)
return aux.exccon(e) and eg:IsExists(c33401200.cfilter2,1,nil,tp,rp)
......@@ -37,7 +37,7 @@ function c33401200.dfilter(c)
return c:IsSetCard(0x341) and c:IsLevelAbove(1) and c:IsAbleToGrave()
end
function c33401200.filter(c,e,tp,m,ft)
if not (c:IsCode(33400037) or c:IsCode(33400222) or c:IsCode(33400320)) or bit.band(c:GetType(),0x81)~=0x81
if not (c:IsCode(33400037) or c:IsCode(33400222) or c:IsCode(33400320) or c:IsCode(33400413)) or bit.band(c:GetType(),0x81)~=0x81
or not c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_RITUAL,tp,false,true) then return false end
local mg=m:Filter(Card.IsCanBeRitualMaterial,c,c)
local dg=Duel.GetMatchingGroup(c33401200.dfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,nil)
......
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