Commit 407a5f85 authored by mercury233's avatar mercury233

fix

parent 9693448a
...@@ -26,36 +26,41 @@ function c100340026.initial_effect(c) ...@@ -26,36 +26,41 @@ function c100340026.initial_effect(c)
e2:SetOperation(c100340026.thop) e2:SetOperation(c100340026.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
function c100340026.rfilter(c,ft,tp) function c100340026.rfilter(c,tp)
return c:IsSetCard(0x2f) and c:IsType(TYPE_MONSTER) and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup()) return c:IsSetCard(0x2f) and c:IsType(TYPE_MONSTER) and (c:IsControler(tp) or c:IsFaceup())
end
function c100340026.spfilter(c,e,tp)
return c:IsSetCard(0x2f) and c:IsType(TYPE_MONSTER) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c100340026.fselect(g,tp)
return Duel.GetMZoneCount(tp,g)>=g:GetCount() and Duel.CheckReleaseGroup(tp,aux.IsInGroup,#g,nil,g)
end end
function c100340026.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c100340026.cost(e,tp,eg,ep,ev,re,r,rp,chk)
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) e:SetLabel(100)
if chk==0 then return ft>-1 and Duel.CheckReleaseGroup(tp,c100340026.rfilter,1,nil,ft,tp) end local rg=Duel.GetReleaseGroup(tp):Filter(c100340026.rfilter,nil,tp)
local maxc=10 local sg=Duel.GetMatchingGroup(c100340026.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
if Duel.IsPlayerAffectedByEffect(tp,59822133) then maxc=1 end local ft=Duel.IsPlayerAffectedByEffect(tp,59822133) and 1 or 5
local g=Duel.SelectReleaseGroup(tp,c100340026.rfilter,1,maxc,nil,ft,tp) local maxc=math.min(ft,rg:GetCount(),(Duel.GetMZoneCount(tp,rg)),sg:GetClassCount(Card.GetCode))
if chk==0 then return maxc>0 and rg:CheckSubGroup(c100340026.fselect,1,maxc,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=rg:SelectSubGroup(tp,c100340026.fselect,false,1,maxc,tp)
e:SetLabel(g:GetCount()) e:SetLabel(g:GetCount())
Duel.Release(g,REASON_COST) Duel.Release(g,REASON_COST)
end end
function c100340026.filter(c,e,tp)
return c:IsSetCard(0x2f) and c:IsType(TYPE_MONSTER) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c100340026.target(e,tp,eg,ep,ev,re,r,rp,chk) function c100340026.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return e:GetLabel()==100 end
and Duel.IsExistingMatchingCard(c100340026.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,e:GetLabel(),tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end end
function c100340026.activate(e,tp,eg,ep,ev,re,r,rp) function c100340026.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
local g=Duel.GetMatchingGroup(c100340026.filter,tp,LOCATION_DECK,0,nil,e,tp) local g=Duel.GetMatchingGroup(c100340026.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
local ct=e:GetLabel() local ct=e:GetLabel()
if ft<ct or ft<=0 then return end if ft<ct or ft<=0 then return end
if Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end if Duel.IsPlayerAffectedByEffect(tp,59822133) then ct=1 end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ct) local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ct)
if sg and #sg>0 then if sg then
Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
end end
end end
...@@ -74,4 +79,4 @@ function c100340026.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -74,4 +79,4 @@ function c100340026.thop(e,tp,eg,ep,ev,re,r,rp)
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.SendtoHand(tc,nil,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -27,7 +27,6 @@ function c101104201.initial_effect(c) ...@@ -27,7 +27,6 @@ function c101104201.initial_effect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_CHAIN_SOLVING) e3:SetCode(EVENT_CHAIN_SOLVING)
e3:SetRange(LOCATION_SZONE) e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1)
e3:SetCondition(c101104201.negcon) e3:SetCondition(c101104201.negcon)
e3:SetOperation(c101104201.negop) e3:SetOperation(c101104201.negop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
...@@ -86,10 +85,12 @@ end ...@@ -86,10 +85,12 @@ end
function c101104201.negcon(e,tp,eg,ep,ev,re,r,rp) function c101104201.negcon(e,tp,eg,ep,ev,re,r,rp)
return rp==1-tp and Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)==LOCATION_MZONE return rp==1-tp and Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION)==LOCATION_MZONE
and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev) and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev)
and e:GetHandler():GetFlagEffect(101104201)==0
end end
function c101104201.negop(e,tp,eg,ep,ev,re,r,rp) function c101104201.negop(e,tp,eg,ep,ev,re,r,rp)
if Duel.SelectYesNo(tp,aux.Stringid(101104201,1)) then if Duel.SelectYesNo(tp,aux.Stringid(101104201,1)) then
Duel.Hint(HINT_CARD,0,101104201) Duel.Hint(HINT_CARD,0,101104201)
Duel.NegateEffect(ev) Duel.NegateEffect(ev)
e:GetHandler():RegisterFlagEffect(101104201,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
end end
end end
...@@ -54,7 +54,7 @@ function c101104202.efop(e,tp,eg,ep,ev,re,r,rp) ...@@ -54,7 +54,7 @@ function c101104202.efop(e,tp,eg,ep,ev,re,r,rp)
end end
end end
function c101104202.thfilter(c) function c101104202.thfilter(c)
return c:IsSetCard(0x7e) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return c:IsSetCard(0x107e) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end end
function c101104202.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c101104202.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101104202.thfilter,tp,LOCATION_DECK,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c101104202.thfilter,tp,LOCATION_DECK,0,1,nil) 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