Commit 2a7fda74 authored by mercury233's avatar mercury233

fix

parent 910f8160
...@@ -55,31 +55,22 @@ function c83755611.tdop(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,31 +55,22 @@ function c83755611.tdop(e,tp,eg,ep,ev,re,r,rp)
Duel.SendtoDeck(g,nil,2,REASON_EFFECT) Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
end end
end end
function c83755611.filter(c,e,tp) function c83755611.desfilter(c,ft)
return ft>0 or (c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5)
end
function c83755611.spfilter(c,e,tp)
return c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c83755611.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c83755611.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return false end if chkc then return false end
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
if chk==0 then if chk==0 then return ft>-1
if not Duel.IsExistingTarget(c83755611.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) then return false end and Duel.IsExistingTarget(c83755611.desfilter,tp,LOCATION_ONFIELD,0,1,nil,ft)
if ft<0 then and Duel.IsExistingTarget(c83755611.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
return false
elseif ft>0 then
return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,0,1,nil)
else
return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_MZONE,0,1,nil)
end
end
local g1=nil
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
if ft>0 then local g1=Duel.SelectTarget(tp,c83755611.desfilter,tp,LOCATION_ONFIELD,0,1,1,nil,ft)
g1=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,nil)
else
g1=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,0,1,1,nil)
end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g2=Duel.SelectTarget(tp,c83755611.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g2=Duel.SelectTarget(tp,c83755611.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g2,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g2,1,0,0)
end end
......
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