Commit 72db42a7 authored by POLYMER's avatar POLYMER

fix

parent 1611f74a
No preview for this file type
...@@ -101,7 +101,7 @@ function cm.imop(e,tp,eg,ep,ev,re,r,rp) ...@@ -101,7 +101,7 @@ function cm.imop(e,tp,eg,ep,ev,re,r,rp)
local e2=Effect.CreateEffect(e:GetHandler()) local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(0x20000000+m+1) e2:SetCode(0x20000000+m+1)
e2:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(e:GetHandler():GetLocation()) e2:SetRange(e:GetHandler():GetLocation())
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
e:GetHandler():RegisterEffect(e2) e:GetHandler():RegisterEffect(e2)
......
...@@ -23,7 +23,7 @@ function cm.initial_effect(c) ...@@ -23,7 +23,7 @@ function cm.initial_effect(c)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY) --e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCondition(cm.descon) e1:SetCondition(cm.descon)
e1:SetOperation(cm.desop2) e1:SetOperation(cm.desop2)
Duel.RegisterEffect(e1,0) Duel.RegisterEffect(e1,0)
...@@ -59,7 +59,7 @@ function cm.filter(c,e) ...@@ -59,7 +59,7 @@ function cm.filter(c,e)
local b2,g2=Duel.CheckEvent(EVENT_SPSUMMON_SUCCESS,true) local b2,g2=Duel.CheckEvent(EVENT_SPSUMMON_SUCCESS,true)
return c:GetPreviousLocation()==LOCATION_DECK and (not b1 or not g1:IsContains(c)) and (not b2 or not g2:IsContains(c)) return c:GetPreviousLocation()==LOCATION_DECK and (not b1 or not g1:IsContains(c)) and (not b2 or not g2:IsContains(c))
end end
return not (e:GetCode()==EVENT_SUMMON_SUCCESS and c:GetFlagEffect(m)>0) return c:GetPreviousLocation()==LOCATION_DECK and not (e:GetCode()==EVENT_SUMMON_SUCCESS and c:GetFlagEffect(m)>0)
end end
function cm.descon(e,tp,eg,ep,ev,re,r,rp) function cm.descon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.filter,1,nil,e) return eg:IsExists(cm.filter,1,nil,e)
...@@ -68,7 +68,7 @@ function cm.desop2(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,7 +68,7 @@ function cm.desop2(e,tp,eg,ep,ev,re,r,rp)
Duel.RaiseEvent(eg,EVENT_CUSTOM+m,re,r,rp,ep,ev) Duel.RaiseEvent(eg,EVENT_CUSTOM+m,re,r,rp,ep,ev)
end end
function cm.descon3(e,tp,eg,ep,ev,re,r,rp) function cm.descon3(e,tp,eg,ep,ev,re,r,rp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():GetFieldID()==re:GetHandler():GetRealFieldID() return re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():GetFieldID()==re:GetHandler():GetRealFieldID() and re:GetHandler():GetPreviousLocation()==LOCATION_DECK
end end
function cm.desop3(e,tp,eg,ep,ev,re,r,rp) function cm.desop3(e,tp,eg,ep,ev,re,r,rp)
Duel.RaiseEvent(eg,EVENT_CUSTOM+m,re,r,rp,ep,ev) Duel.RaiseEvent(eg,EVENT_CUSTOM+m,re,r,rp,ep,ev)
......
This diff is collapsed.
--灰流丽·惊奇
function c35531500.initial_effect(c)
aux.AddCodeList(c,14558127)
--sp
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,TIMING_END_PHASE)
e1:SetRange(LOCATION_GRAVE)
e1:SetCountLimit(1,35531500)
e1:SetTarget(c35531500.sptg)
e1:SetOperation(c35531500.spop)
c:RegisterEffect(e1)
end
function c35531500.ctfil(c,e,tp)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsAbleToRemoveAsCost() and Duel.IsExistingMatchingCard(c35531500.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp,c:GetLevel())
end
function c35531500.espfil(c,e,tp,lv)
return c:IsType(TYPE_SYNCHRO) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsLevel(lv+e:GetHandler():GetLevel())
end
function c35531500.espfil2(c,e,tp,lv1,lv2)
return c:IsType(TYPE_SYNCHRO) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsLevel(lv1+lv2+e:GetHandler():GetLevel())
end
function c35531500.pbfil(c,e,tp,lv)
return not c:IsPublic() and c:IsLevelAbove(1) and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and Duel.IsExistingMatchingCard(c35531500.espfil2,tp,LOCATION_EXTRA,0,1,nil,e,tp,lv,c:GetLevel())
end
function c35531500.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() and Duel.IsExistingMatchingCard(c35531500.ctfil,tp,LOCATION_GRAVE,0,1,e:GetHandler(),e,tp) end
local tc=Duel.SelectMatchingCard(tp,c35531500.ctfil,tp,LOCATION_GRAVE,0,1,1,e:GetHandler(),e,tp):GetFirst()
local lv=tc:GetLevel()
local g=Group.FromCards(tc,e:GetHandler())
if Duel.IsExistingMatchingCard(c35531500.pbfil,tp,LOCATION_HAND,0,1,nil,e,tp,lv) and Duel.SelectYesNo(tp,aux.Stringid(35531500,0)) then
local pc=Duel.SelectMatchingCard(tp,c35531500.pbfil,tp,LOCATION_HAND,0,1,1,nil,e,tp,lv):GetFirst()
Duel.ConfirmCards(1-tp,pc)
Duel.ShuffleHand(tp)
lv=lv+pc:GetLevel()
end
e:SetLabel(lv)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function c35531500.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local lv=e:GetLabel()
if lv and Duel.IsExistingMatchingCard(c35531500.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp,lv) then
local sc=Duel.SelectMatchingCard(tp,c35531500.espfil,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv):GetFirst()
Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
sc:CompleteProcedure()
end
end
--灰流丽·可爱
function c35531502.initial_effect(c)
aux.AddCodeList(c,14558127)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC)
e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,35531501+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(c35531502.hspcon)
c:RegisterEffect(e1)
--to deck and sp
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_HAND)
e2:SetCountLimit(1,15531502)
e2:SetTarget(c35531502.tgsptg)
e2:SetOperation(c35531502.tgspop)
c:RegisterEffect(e2)
end
function c35531502.cfilter(c)
return c:IsFaceup() and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and not c:IsCode(35531502)
end
function c35531502.hspcon(e,c)
if c==nil then return true end
return Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 and
Duel.IsExistingMatchingCard(c35531502.cfilter,c:GetControler(),LOCATION_MZONE,0,1,nil)
end
function c35531502.espfil(c,e,tp)
return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsType(TYPE_SYNCHRO)
end
function c35531502.tgsptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToGrave() and Duel.IsExistingTarget(c35531502.tdfil,tp,LOCATION_GRAVE,0,1,nil) and Duel.IsExistingMatchingCard(c35531502.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
local g=Duel.SelectTarget(tp,c35531502.tdfil,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c35531502.tgspop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)~=0 and c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and Duel.IsExistingMatchingCard(c35531502.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp) then
local sc=Duel.SelectMatchingCard(tp,c35531502.espfil,tp,LOCATION_EXTRA,0,1,1,nil,e,tp):GetFirst()
Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
sc:CompleteProcedure()
end
end
--灰流丽·疑问
function c35531503.initial_effect(c)
aux.AddCodeList(c,14558127)
--negate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,35531503)
e1:SetCondition(c35531503.discon)
e1:SetCost(c35531503.discost)
e1:SetTarget(c35531503.distg)
e1:SetOperation(c35531503.disop)
c:RegisterEffect(e1)
--search
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_HAND)
e2:SetCountLimit(1,35531503)
e2:SetCost(c35531503.thcost)
e2:SetTarget(c35531503.thtg)
e2:SetOperation(c35531503.thop)
c:RegisterEffect(e2)
end
function c35531503.discon(e,tp,eg,ep,ev,re,r,rp)
local ex2,g2,gc2,dp2,dv2=Duel.GetOperationInfo(ev,CATEGORY_SPECIAL_SUMMON)
local ex3,g3,gc3,dp3,dv3=Duel.GetOperationInfo(ev,CATEGORY_TOGRAVE)
local ex4=re:IsHasCategory(CATEGORY_DRAW)
local ex5=re:IsHasCategory(CATEGORY_SEARCH)
local ex6=re:IsHasCategory(CATEGORY_DECKDES)
return ((ex2 and bit.band(dv2,LOCATION_DECK)==LOCATION_DECK)
or (ex3 and bit.band(dv3,LOCATION_DECK)==LOCATION_DECK)
or ex4 or ex5 or ex6) and Duel.IsChainDisablable(ev)
end
function c35531503.discost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsDiscardable() end
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
function c35531503.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
end
function c35531503.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.NegateEffect(ev)
end
function c35531503.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return c:IsDiscardable() end
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
end
function c35531503.thfilter(c)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and not c:IsCode(35531503) and c:IsAbleToHand()
end
function c35531503.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(c35531503.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c35531503.thop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.SelectMatchingCard(tp,c35531503.thfilter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
if tc then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,tc)
end
end
--灰流丽·委屈
function c35531504.initial_effect(c)
aux.AddCodeList(c,14558127)
--special summon
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,35531504)
e1:SetCondition(function(e)
return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_MZONE,0)==0 end)
e1:SetCost(c35531504.spcost)
e1:SetTarget(c35531504.sptg)
e1:SetOperation(c35531504.spop)
c:RegisterEffect(e1)
end
function c35531504.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsDiscardable() end
Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD)
end
function c35531504.spfilter(c,e,tp)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c35531504.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c35531504.spfilter,tp,LOCATION_HAND,0,1,e:GetHandler(),e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
function c35531504.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c35531504.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
--灰流丽·咬
function c35531505.initial_effect(c)
aux.AddCodeList(c,14558127)
--deckdes
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DECKDES)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_TO_GRAVE)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,35531505)
e1:SetCondition(c35531505.dkcon)
e1:SetTarget(c35531505.dktg)
e1:SetOperation(c35531505.dkop)
c:RegisterEffect(e1)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,15531505)
e2:SetCost(aux.bfgcost)
e2:SetTarget(c35531505.sptg)
e2:SetOperation(c35531505.spop)
c:RegisterEffect(e2)
--Release
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_RELEASE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_DESTROYED)
e3:SetCountLimit(1,25531505)
e3:SetCondition(c35531505.rlcon)
e3:SetTarget(c35531505.rltg)
e3:SetOperation(c35531505.rlop)
c:RegisterEffect(e3)
end
function c35531505.dkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsPreviousLocation(LOCATION_HAND+LOCATION_DECK)
end
function c35531505.dktg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,3) and Duel.IsPlayerCanDiscardDeck(1-tp,3) end
Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,PLAYER_ALL,3)
end
function c35531505.dkop(e,tp,eg,ep,ev,re,r,rp)
local g1=Duel.GetDecktopGroup(tp,3)
local g2=Duel.GetDecktopGroup(1-tp,3)
g1:Merge(g2)
Duel.DisableShuffleCheck()
Duel.SendtoGrave(g1,REASON_EFFECT)
end
function c35531505.spfilter(c,e,tp)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and not c:IsCode(35531505) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c35531505.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c35531505.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
function c35531505.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c35531505.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c35531505.rlcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return c:IsReason(REASON_EFFECT) and rp==1-tp and c:IsPreviousControler(tp)
end
function c35531505.rltg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsReleasableByEffect,tp,0,LOCATION_MZONE,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_RELEASE,nil,1,1-tp,LOCATION_MZONE)
end
function c35531505.rlop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.SelectMatchingCard(tp,Card.IsReleasableByEffect,tp,0,LOCATION_MZONE,1,1,nil)
if g:GetCount()>0 then
Duel.Release(g,REASON_EFFECT)
end
end
--灰流丽·欺负小蓝
function c35531508.initial_effect(c)
aux.AddCodeList(c,14558127)
--Synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit()
--deckdes
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DECKDES+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,35531508)
e1:SetCondition(function(e)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) end)
e1:SetTarget(c35531508.ddtg)
e1:SetOperation(c35531508.ddop)
c:RegisterEffect(e1)
--to hand
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,15531508)
e1:SetCost(c35531508.srcost)
e1:SetTarget(c35531508.srtg)
e1:SetOperation(c35531508.srop)
c:RegisterEffect(e1)
end
function c35531508.ddtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,2) end
Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,2)
end
function c35531508.thfil(c)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsAbleToHand()
end
function c35531508.ddop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.DiscardDeck(tp,2,REASON_EFFECT)~=0 and Duel.IsExistingMatchingCard(c35531508.thfil,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(35531508,0)) then
Duel.BreakEffect()
local sc=Duel.SelectMatchingCard(tp,c35531508.thfil,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
Duel.SendtoHand(sc,tp,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sc)
end
end
function c35531508.srcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST)
end
function c35531508.thgck(g)
return g:FilterCount(Card.IsLocation,nil,LOCATION_GRAVE)==1
and g:FilterCount(Card.IsLocation,nil,LOCATION_DECK)==1
end
function c35531508.srtg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetMatchingGroup(c35531508.thfil,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
if chk==0 then return g:CheckSubGroup(c35531508.thgck,2,2) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK+LOCATION_GRAVE)
end
function c35531508.srop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c35531508.thfil,tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
if g:CheckSubGroup(c35531508.thgck,2,2) then
local sg=g:SelectSubGroup(tp,c35531508.thgck,false,2,2)
Duel.SendtoHand(sg,tp,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
end
end
--灰流丽·带上手铐
function c35531509.initial_effect(c)
aux.AddCodeList(c,14558127)
--Synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit()
--lv
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(35531509,1))
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,35531509)
e1:SetTarget(c35531509.lvtg)
e1:SetOperation(c35531509.lvop)
c:RegisterEffect(e1)
--special summon
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(35531509,2))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,15531509)
e2:SetCost(c35531509.spcost)
e2:SetTarget(c35531509.sptg)
e2:SetOperation(c35531509.spop)
c:RegisterEffect(e2)
--des
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e3:SetCode(EVENT_BE_MATERIAL)
e3:SetCountLimit(1,25531509)
e3:SetCondition(c35531509.descon)
e3:SetTarget(c35531509.destg)
e3:SetOperation(c35531509.desop)
c:RegisterEffect(e3)
end
function c35531509.pbfil(c)
return not c:IsPublic() and c:IsAttribute(ATTRIBUTE_FIRE)
end
function c35531509.lvtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531509.pbfil,tp,LOCATION_HAND,0,1,nil) end
local tc=Duel.SelectMatchingCard(tp,c35531509.pbfil,tp,LOCATION_HAND,0,1,1,nil):GetFirst()
Duel.ConfirmCards(1-tp,tc)
e:SetLabel(tc:GetLevel())
Duel.ShuffleHand(tp)
end
function c35531509.lvop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local lv=e:GetLabel()
if lv and c:IsRelateToEffect(e) then
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_LEVEL)
e1:SetRange(LOCATION_MZONE)
e1:SetValue(-lv)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
c:RegisterEffect(e1)
end
end
function c35531509.ctfil(c)
return c:IsAbleToHandAsCost() and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127))
end
function c35531509.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531509.ctfil,tp,LOCATION_DECK+LOCATION_GRAVE,0,2,nil) end
local g=Duel.SelectMatchingCard(tp,c35531509.ctfil,tp,LOCATION_DECK+LOCATION_GRAVE,0,2,2,nil)
Duel.SendtoHand(g,nil,REASON_COST)
end
function c35531509.spfilter(c,e,tp)
return c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
end
function c35531509.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c35531509.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
function c35531509.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c35531509.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
end
end
function c35531509.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsLocation(LOCATION_GRAVE) and r==REASON_SYNCHRO
end
function c35531509.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
end
function c35531509.desop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
end
end
--灰流丽·选择困难症
function c35531510.initial_effect(c)
aux.AddCodeList(c,14558127)
--Synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit()
--negate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,35531510)
e1:SetTarget(c35531510.negtg)
e1:SetOperation(c35531510.negop)
c:RegisterEffect(e1)
--special summon
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,15531510)
e2:SetCost(c35531510.spcost)
e2:SetTarget(c35531510.sptg)
e2:SetOperation(c35531510.spop)
c:RegisterEffect(e2)
end
function c35531510.negtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
end
function c35531510.negop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsFaceup() and tc:IsRelateToEffect(e) then
Duel.NegateRelatedChain(tc,RESET_TURN_SET)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_DISABLE)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_DISABLE_EFFECT)
e2:SetValue(RESET_TURN_SET)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CANNOT_ATTACK)
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e3)
end
end
function c35531510.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsReleasable() end
Duel.Release(e:GetHandler(),REASON_COST)
end
function c35531510.spfilter(c,e,tp,mc)
return c:IsLevelBelow(9) and aux.IsCodeListed(c,14558127) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
end
function c35531510.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531510.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,nil) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c35531510.spop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tc=Duel.SelectMatchingCard(tp,c35531510.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,nil):GetFirst()
if tc then
if Duel.SpecialSummonStep(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP) then
tc:CompleteProcedure()
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_ADD_TYPE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetValue(TYPE_TUNER)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
tc:RegisterEffect(e1)
end
Duel.SpecialSummonComplete()
end
end
--灰流丽·为什么会有墓指这种东西
function c35531511.initial_effect(c)
aux.AddCodeList(c,14558127)
--Synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(function(c) return c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_ZOMBIE) end),2)
c:EnableReviveLimit()
--remove
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_REMOVE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,35531511)
e1:SetTarget(c35531511.rmtg)
e1:SetOperation(c35531511.rmop)
c:RegisterEffect(e1)
--damage
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c35531511.damcon)
e2:SetOperation(c35531511.damop)
c:RegisterEffect(e2)
--negate
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_CHAINING)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,15531511)
e2:SetCondition(c35531511.discon)
e2:SetTarget(c35531511.distg)
e2:SetOperation(c35531511.disop)
c:RegisterEffect(e2)
end
function c35531511.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
local x=Duel.GetMatchingGroupCount(function(c) return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) end,tp,LOCATION_GRAVE,0,nil)
if chk==0 then return x>0 and Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,x,nil)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,g:GetCount(),nil,LOCATION_ONFIELD)
end
function c35531511.rmop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
if g:GetCount()>0 then
Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
end
end
function c35531511.cfilter(c,tp)
return c:IsSummonPlayer(1-tp)
end
function c35531511.damcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
return eg:IsExists(c35531511.cfilter,1,nil,tp)
end
function c35531511.damop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,35531511)
Duel.Damage(1-tp,500,REASON_EFFECT)
end
function c35531511.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end
function c35531511.distg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
end
end
function c35531511.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT)
end
end
--被欺负的灰流丽
function c35531512.initial_effect(c)
aux.AddCodeList(c,14558127)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,35531512+EFFECT_COUNT_CODE_OATH)
e1:SetCondition(c35531512.condition)
e1:SetTarget(c35531512.target)
e1:SetOperation(c35531512.activate)
c:RegisterEffect(e1)
end
function c35531512.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(function(c) return c:IsFaceup() and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) end,tp,LOCATION_MZONE,0,1,nil)
end
function c35531512.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsPlayerCanSpecialSummonMonster(tp,35531513,0,TYPES_TOKEN_MONSTER,0,1800,3,RACE_ZOMBIE,ATTRIBUTE_FIRE,POS_FACEUP) end
Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
end
function c35531512.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0
or not Duel.IsPlayerCanSpecialSummonMonster(tp,35531513,0,TYPES_TOKEN_MONSTER,0,1800,3,RACE_ZOMBIE,ATTRIBUTE_FIRE,POS_FACEUP) then return end
local token=Duel.CreateToken(tp,35531513)
Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
end
--查询着的灰流丽
function c35531514.initial_effect(c)
aux.AddCodeList(c,14558127)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,35531514+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c35531514.target)
e1:SetOperation(c35531514.activate)
c:RegisterEffect(e1)
end
function c35531514.filter(c)
return c:IsType(TYPE_MONSTER) and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsAbleToGrave()
end
function c35531514.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531514.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c35531514.thfilter(c)
return c:IsRace(RACE_ZOMBIE) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToHand()
end
function c35531514.activate(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c35531514.filter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 and Duel.SendtoGrave(g,REASON_EFFECT)~=0 and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 and Duel.SelectYesNo(tp,aux.Stringid(35531514,0)) then
Duel.ConfirmDecktop(tp,3)
local g=Duel.GetDecktopGroup(tp,3)
if g:GetCount()>0 and g:IsExists(c35531514.thfilter,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(35531514,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local sg=g:FilterSelect(tp,c35531514.thfilter,1,1,nil)
Duel.SendtoHand(sg,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,sg)
Duel.ShuffleHand(tp)
end
Duel.ShuffleDeck(tp)
end
end
--被破坏轮惩罚的灰流丽
function c35531515.initial_effect(c)
aux.AddCodeList(c,14558127)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c35531515.cost)
c:RegisterEffect(e1)
--to grave
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(35531515,1))
e1:SetCategory(CATEGORY_TOGRAVE)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_SZONE)
e1:SetCountLimit(1)
e1:SetLabel(1)
e1:SetCondition(c35531515.effcon)
e1:SetTarget(c35531515.tgtg)
e1:SetOperation(c35531515.tgop)
c:RegisterEffect(e1)
--SpecialSummon
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(35531515,2))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1)
e2:SetLabel(3)
e2:SetCondition(c35531515.effcon)
e2:SetTarget(c35531515.sptg)
e2:SetOperation(c35531515.spop)
c:RegisterEffect(e2)
--SpecialSummon
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(35531515,3))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1)
e2:SetLabel(5)
e2:SetCondition(c35531515.effcon)
e2:SetTarget(c35531515.esptg)
e2:SetOperation(c35531515.espop)
c:RegisterEffect(e2)
end
function c35531515.ctfil(c)
return c:IsAbleToRemoveAsCost() and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127))
end
function c35531515.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531515.ctfil,tp,LOCATION_GRAVE,0,1,nil) end
local g=Duel.SelectMatchingCard(tp,c35531515.ctfil,tp,LOCATION_GRAVE,0,1,1,nil)
Duel.Remove(g,POS_FACEUP,REASON_COST)
end
function c35531515.effcon(e)
local tp=e:GetHandlerPlayer()
return Duel.GetMatchingGroupCount(function(c) return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) end,tp,LOCATION_GRAVE,0,nil)>=e:GetLabel()
end
function c35531515.tgfil(c)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
end
function c35531515.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c35531515.tgfil,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c35531515.tgop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c35531515.tgfil,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoGrave(g,REASON_EFFECT)
end
end
function c35531515.spfil(c,e,tp)
return (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c35531515.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c35531515.spfil,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
end
function c35531515.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c35531515.spfil,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c35531515.tdfil(c)
return c:IsAbleToDeckOrExtraAsCost() and (c:IsCode(14558127) or aux.IsCodeListed(c,14558127)) and c:IsLevelAbove(1)
end
function c35531515.espfil(c,e,tp,g)
return c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and c:IsLevel(g:GetSum(Card.GetLevel)) and aux.IsCodeListed(c,14558127) and c:IsType(TYPE_SYNCHRO)
end
function c35531515.tdgck(g,e,tp)
return g:FilterCount(function(c) return c:IsType(TYPE_TUNER) end,nil)==1
and g:FilterCount(function(c) return not c:IsType(TYPE_TUNER) end,nil)==1
and Duel.IsExistingMatchingCard(c35531515.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp,g)
end
function c35531515.esptg(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetMatchingGroup(c35531515.tdfil,tp,LOCATION_GRAVE,0,nil)
if chk==0 then return g:CheckSubGroup(c35531515.tdgck,2,2,e,tp) end
local sg=g:SelectSubGroup(tp,c35531515.tdgck,false,2,2,e,tp)
sg:KeepAlive()
e:SetLabelObject(sg)
Duel.SendtoDeck(sg,nil,2,REASON_COST)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c35531515.espop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local g=e:GetLabelObject()
if g:GetCount()>0 and Duel.IsExistingMatchingCard(c35531515.espfil,tp,LOCATION_EXTRA,0,1,nil,e,tp,g) then
local sc=Duel.SelectMatchingCard(tp,c35531515.espfil,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,g):GetFirst()
Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
sc:CompleteProcedure()
end
end
...@@ -86,6 +86,7 @@ function c9911357.thop(e,tp,eg,ep,ev,re,r,rp) ...@@ -86,6 +86,7 @@ function c9911357.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
local tc=g1:RandomSelect(tp,1):GetFirst() local tc=g1:RandomSelect(tp,1):GetFirst()
if tc then if tc then
Duel.ConfirmCards(tp,tc)
tc:RegisterFlagEffect(9911357,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,66) tc:RegisterFlagEffect(9911357,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,66)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
...@@ -47,6 +47,7 @@ function c9911359.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -47,6 +47,7 @@ function c9911359.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_OPSELECTED,tp,aux.Stringid(9911359,1)) Duel.Hint(HINT_OPSELECTED,tp,aux.Stringid(9911359,1))
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_CONFIRM) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_CONFIRM)
local tc=cg:Select(1-tp,1,1,nil):GetFirst() local tc=cg:Select(1-tp,1,1,nil):GetFirst()
Duel.ConfirmCards(tp,tc)
tc:RegisterFlagEffect(9911359,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,66) tc:RegisterFlagEffect(9911359,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,66)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
......
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