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