Commit 45434c7f authored by mercury233's avatar mercury233

fix

parent c038521e
...@@ -62,7 +62,7 @@ function c100235001.tgcon(e) ...@@ -62,7 +62,7 @@ function c100235001.tgcon(e)
end end
function c100235001.efftg(e,tp,eg,ep,ev,re,r,rp,chk) function c100235001.efftg(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
local b2=c:GetFlagEffect(100235001)==0 local b2=c:GetFlagEffect(100235101)==0
local b3=Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) local b3=Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
if chk==0 then return true end if chk==0 then return true end
local op=0 local op=0
...@@ -101,7 +101,7 @@ function c100235001.effop(e,tp,eg,ep,ev,re,r,rp) ...@@ -101,7 +101,7 @@ function c100235001.effop(e,tp,eg,ep,ev,re,r,rp)
e1:SetLabel(Duel.GetTurnCount()+tct) e1:SetLabel(Duel.GetTurnCount()+tct)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_SELF_TURN,1+tct) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_SELF_TURN,1+tct)
c:RegisterEffect(e1) c:RegisterEffect(e1)
c:RegisterFlagEffect(100235001,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END,0,1+tct) c:RegisterFlagEffect(100235101,RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END,0,1+tct)
end end
else else
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
......
...@@ -22,9 +22,12 @@ function c100411027.initial_effect(c) ...@@ -22,9 +22,12 @@ function c100411027.initial_effect(c)
e2:SetOperation(c100411027.tdop) e2:SetOperation(c100411027.tdop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c100411027.cfilter(c)
return c:GetSequence()==5
end
function c100411027.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100411027.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then if chk==0 then
local ct=Duel.GetMatchingGroupCount(Card.IsSequence,tp,LOCATION_SZONE,LOCATION_SZONE,nil,5) local ct=Duel.GetMatchingGroupCount(c100411027.cfilter,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
ct=ct+Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,TYPE_FIELD) ct=ct+Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,TYPE_FIELD)
if ct==0 then return false end if ct==0 then return false end
for p=0,1 do for p=0,1 do
...@@ -36,7 +39,7 @@ function c100411027.target(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -36,7 +39,7 @@ function c100411027.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,0,PLAYER_ALL,0) Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,0,PLAYER_ALL,0)
end end
function c100411027.activate(e,tp,eg,ep,ev,re,r,rp) function c100411027.activate(e,tp,eg,ep,ev,re,r,rp)
local ct=Duel.GetMatchingGroupCount(Card.IsSequence,tp,LOCATION_SZONE,LOCATION_SZONE,nil,5) local ct=Duel.GetMatchingGroupCount(c100411027.cfilter,tp,LOCATION_SZONE,LOCATION_SZONE,nil)
ct=ct+Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,TYPE_FIELD) ct=ct+Duel.GetMatchingGroupCount(Card.IsType,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,TYPE_FIELD)
if ct==0 then return end if ct==0 then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end if Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end
......
...@@ -46,10 +46,10 @@ function c100411038.destg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -46,10 +46,10 @@ function c100411038.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if e:GetLabel()==100 then if e:GetLabel()==100 then
e:SetLabel(0) e:SetLabel(0)
return Duel.IsExistingMatchingCard(c100411038.rmfilter,tp,LOCATION_MZONE,0,1,tp) return Duel.IsExistingMatchingCard(c100411038.rmfilter,tp,LOCATION_MZONE,0,1,tp)
and Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) and Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil)
else return false end else return false end
end end
local rt=Duel.GetTargetCount(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler()) local rt=Duel.GetTargetCount(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
local ct=0 local ct=0
local min=1 local min=1
while ct<rt do while ct<rt do
...@@ -61,7 +61,7 @@ function c100411038.destg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -61,7 +61,7 @@ function c100411038.destg(e,tp,eg,ep,ev,re,r,rp,chk)
min=0 min=0
end end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,ct,e:GetHandler()) local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,ct,ct,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end end
function c100411038.desop(e,tp,eg,ep,ev,re,r,rp) function c100411038.desop(e,tp,eg,ep,ev,re,r,rp)
......
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