Commit aea1fd78 authored by mercury233's avatar mercury233

fix

parent 16fdc913
...@@ -34,6 +34,7 @@ function c100416024.initial_effect(c) ...@@ -34,6 +34,7 @@ function c100416024.initial_effect(c)
e4:SetRange(LOCATION_FZONE) e4:SetRange(LOCATION_FZONE)
e4:SetCountLimit(1,100416024+200) e4:SetCountLimit(1,100416024+200)
e4:SetCondition(c100416024.descon) e4:SetCondition(c100416024.descon)
e4:SetTarget(c100416024.destg)
e4:SetOperation(c100416024.desop) e4:SetOperation(c100416024.desop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
...@@ -78,15 +79,20 @@ function c100416024.getscale(c) ...@@ -78,15 +79,20 @@ function c100416024.getscale(c)
end end
function c100416024.desfilter(c,odevity) function c100416024.desfilter(c,odevity)
local sc=c100416024.getscale(c) local sc=c100416024.getscale(c)
return sc%2==odevity and c:GetOriginalType()&TYPE_PENDULUM>0 and c:IsFaceup() return c:IsSetCard(0x265) and c:GetOriginalType()&TYPE_PENDULUM>0 and c:IsFaceup() and sc%2==odevity
end end
function c100416024.descon(e,tp,eg,ep,ev,re,r,rp) function c100416024.descon(e,tp,eg,ep,ev,re,r,rp)
local g1=Duel.GetMatchingGroup(c100416024.desfilter,tp,LOCATION_ONFIELD,0,nil,1) local g1=Duel.GetMatchingGroup(c100416024.desfilter,tp,LOCATION_ONFIELD,0,nil,1)
local g2=Duel.GetMatchingGroup(c100416024.desfilter,tp,LOCATION_ONFIELD,0,nil,0) local g2=Duel.GetMatchingGroup(c100416024.desfilter,tp,LOCATION_ONFIELD,0,nil,0)
return g1:GetClassCount(c100416024.getscale)>=3 or g2:GetClassCount(c100416024.getscale)>=3 return g1:GetClassCount(c100416024.getscale)>=3 or g2:GetClassCount(c100416024.getscale)>=3
end end
function c100416024.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil) end
local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function c100416024.desop(e,tp,eg,ep,ev,re,r,rp) function c100416024.desop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local dg=g:Select(tp,1,1,nil) local dg=g:Select(tp,1,1,nil)
......
...@@ -5,7 +5,7 @@ function c101105206.initial_effect(c) ...@@ -5,7 +5,7 @@ function c101105206.initial_effect(c)
aux.AddCodeList(c,44508094) aux.AddCodeList(c,44508094)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,101105206) e1:SetCountLimit(1,101105206)
...@@ -30,7 +30,6 @@ end ...@@ -30,7 +30,6 @@ end
function c101105206.target(e,tp,eg,ep,ev,re,r,rp,chk) function c101105206.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101105206.tgfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c101105206.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,0,0,0)
end end
function c101105206.cfilter(c) function c101105206.cfilter(c)
return c:IsFaceup() and (c:IsCode(44508094) or c:IsType(TYPE_SYNCHRO) and aux.AddCodeList(c,44508094)) return c:IsFaceup() and (c:IsCode(44508094) or c:IsType(TYPE_SYNCHRO) and aux.AddCodeList(c,44508094))
...@@ -55,7 +54,7 @@ function c101105206.lvltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) ...@@ -55,7 +54,7 @@ function c101105206.lvltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and c101105206.lvlfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and c101105206.lvlfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c101105206.lvlfilter,tp,LOCATION_MZONE,0,1,nil) end if chk==0 then return Duel.IsExistingTarget(c101105206.lvlfilter,tp,LOCATION_MZONE,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD)
local g=Duel.SelectTarget(tp,c101105206.atkfilter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectTarget(tp,c101105206.lvlfilter,tp,LOCATION_MZONE,0,1,1,nil)
end end
function c101105206.lvlop(e,tp,eg,ep,ev,re,r,rp) function c101105206.lvlop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
......
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