Skip to content

Y
ygopro-222DIY-cards
Commit 592e2128 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

foo foo

parent 6dd0ab44
Hide whitespace changes
Inline Side-by-side
Showing with 90 additions and 74 deletions
expansions/script/c12042032.lua
View file @ 592e2128
...@@ -5,21 +5,19 @@ function cm.initial_effect(c) ...@@ -5,21 +5,19 @@ function cm.initial_effect(c)
--link summon --link summon
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_INSECT),2,2) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_INSECT),2,2)
if not cm.gchk then local ex=Effect.CreateEffect(c)
cm.gchk=true
local ex=Effect.GlobalEffect()
ex:SetType(EFFECT_TYPE_FIELD) ex:SetType(EFFECT_TYPE_FIELD)
ex:SetCode(EFFECT_EXTRA_LINK_MATERIAL) ex:SetCode(EFFECT_EXTRA_LINK_MATERIAL)
ex:SetRange(LOCATION_EXTRA)
ex:SetTargetRange(LOCATION_HAND,LOCATION_HAND) ex:SetTargetRange(LOCATION_HAND,LOCATION_HAND)
ex:SetCondition(function(e) ex:SetCondition(function(e)
return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil,12042000) return Duel.IsExistingMatchingCard(cm.exfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
end) end)
ex:SetValue(function(e,c,mg) ex:SetValue(function(e,c,mg)
return c:GetOriginalCode()==m return c:GetOriginalCode()==m
end) end)
ex:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_IMMUNE) ex:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
Duel.RegisterEffect(ex,0) c:RegisterEffect(ex)
end
--negate --negate
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
...@@ -47,6 +45,9 @@ function cm.initial_effect(c) ...@@ -47,6 +45,9 @@ function cm.initial_effect(c)
e5:SetOperation(cm.thop) e5:SetOperation(cm.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function cm.exfilter(c)
return c:IsFaceup() and c:IsCode(12042000)
end
function cm.negcon(e,tp,eg,ep,ev,re,r,rp) function cm.negcon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and re:GetHandler()~=e:GetHandler() return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and re:GetHandler()~=e:GetHandler()
and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev) and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
......
expansions/script/c33502151.lua
View file @ 592e2128
...@@ -15,10 +15,11 @@ function su_y.hdtograve(c,code,count) ---handtograve 33502151~33502157 ...@@ -15,10 +15,11 @@ function su_y.hdtograve(c,code,count) ---handtograve 33502151~33502157
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetRange(LOCATION_HAND) e1:SetRange(LOCATION_HAND)
if count~=nil then -- if count~=nil then
e1:SetCountLimit(count,code) -- e1:SetCountLimit(count,code)
end -- end
e1:SetCost(su_y.hcost) e1:SetCost(su_y.hcost)
e1:SetLabel(code)
e1:SetTarget(su_y.hdsptg0) e1:SetTarget(su_y.hdsptg0)
e1:SetOperation(su_y.hdspop0) e1:SetOperation(su_y.hdspop0)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
...@@ -26,8 +27,11 @@ function su_y.hdtograve(c,code,count) ---handtograve 33502151~33502157 ...@@ -26,8 +27,11 @@ function su_y.hdtograve(c,code,count) ---handtograve 33502151~33502157
end end
function su_y.hcost(e,tp,eg,ep,ev,re,r,rp,chk) function su_y.hcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler() local c=e:GetHandler()
if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0 and c:IsDiscardable(REASON_COST) end local code=e:GetLabel()
local ct=Duel.GetFlagEffect(e:GetHandlerPlayer(),code)
if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0 and c:IsDiscardable(REASON_COST) and ct==0 end
Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD) Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
Duel.RegisterFlagEffect(tp,code,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
...@@ -55,7 +59,7 @@ function su_y.hdspop0(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,7 +59,7 @@ function su_y.hdspop0(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.SelectMatchingCard(tp,su_y.thfilter1,tp,LOCATION_DECK,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,su_y.thfilter1,tp,LOCATION_DECK,0,1,1,nil)
if Duel.SSet(tp,g)~=0 then if Duel.SSet(tp,g)~=0 then
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
local tg=Duel.GetMatchingGroup(su_y.fcfil,tp,LOCATION_SZONE,0,nil) local tg=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_SZONE,0,nil)
local tc=tg:GetFirst() local tc=tg:GetFirst()
while tc do while tc do
tc:CancelToGrave() tc:CancelToGrave()
...@@ -70,9 +74,6 @@ end ...@@ -70,9 +74,6 @@ end
function su_y.stfil(c) function su_y.stfil(c)
return c:IsFacedown() and not c:IsLocation(LOCATION_FZONE) return c:IsFacedown() and not c:IsLocation(LOCATION_FZONE)
end end
function su_y.fcfil(c)
return c:IsFaceup() and not c:IsLocation(LOCATION_FZONE) and not c:IsStatus(STATUS_CHAINING)
end
function su_y.thfilter1(c) function su_y.thfilter1(c)
return (c:IsType(TYPE_TRAP) and c:IsType(TYPE_CONTINUOUS)) and c:IsSetCard(0x3a81) and c:IsSSetable() return (c:IsType(TYPE_TRAP) and c:IsType(TYPE_CONTINUOUS)) and c:IsSetCard(0x3a81) and c:IsSSetable()
end end
...@@ -127,10 +128,11 @@ end ...@@ -127,10 +128,11 @@ end
--Act In Set Turn --Act In Set Turn
function su_y.actcon(e) function su_y.actcon(e)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
return Duel.IsExistingMatchingCard(su_y.cfilter12,tp,LOCATION_ONFIELD,0,1,nil) -- return Duel.IsExistingMatchingCard(su_y.cfilter12,tp,LOCATION_ONFIELD,0,1,nil)
return Duel.GetMatchingGroupCount(su_y.cfilter12,tp,LOCATION_SZONE,0,1,nil)==0
end end
function su_y.cfilter12(c) function su_y.cfilter12(c)
return not(c:IsFaceup() and c:IsType(TYPE_SPELL+TYPE_TRAP) ) return c:IsFaceup() and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP))
end end
function su_y.chai(c,code,count,op) --- 33502151~33502157 function su_y.chai(c,code,count,op) --- 33502151~33502157
local tc=c local tc=c
...@@ -139,9 +141,9 @@ function su_y.chai(c,code,count,op) --- 33502151~33502157 ...@@ -139,9 +141,9 @@ function su_y.chai(c,code,count,op) --- 33502151~33502157
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAINING) e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_SZONE) e1:SetRange(LOCATION_SZONE)
if count~=nil then -- if count~=nil then
e1:SetCountLimit(count,code) -- e1:SetCountLimit(count,code)
end -- end
e1:SetCondition(su_y.chtcon) e1:SetCondition(su_y.chtcon)
e1:SetLabel(code) e1:SetLabel(code)
e1:SetOperation(op) e1:SetOperation(op)
...@@ -151,7 +153,8 @@ end ...@@ -151,7 +153,8 @@ end
function su_y.chtcon(e,tp,eg,ep,ev,re,r,rp) function su_y.chtcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local code=e:GetLabel() local code=e:GetLabel()
return re:GetHandler():GetOwner()==tp and c:GetFlagEffect(code)==0 and re~=e and Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0 local ct=Duel.GetFlagEffect(e:GetHandlerPlayer(),code)
return re:GetHandler():GetOwner()==tp and c:GetFlagEffect(code)==0 and re~=e and Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0 and ct==0
end end
----------------------------- -----------------------------
if not cm then return end if not cm then return end
...@@ -165,6 +168,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -165,6 +168,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502152.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502153.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502154.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502155.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502156.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c33502157.lua
View file @ 592e2128
...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp) ...@@ -12,6 +12,7 @@ function cm.op(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end if not Duel.SelectYesNo(tp,aux.Stringid(m,3)) then return end
c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5)) c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,5))
Duel.RegisterFlagEffect(tp,m,0,RESET_PHASE+PHASE_END,1)
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
expansions/script/c81003005.lua
View file @ 592e2128
--森永Miu的过去 --元气少女 森永Miu
function c81003005.initial_effect(c) local m=81003005
--activate local cm=_G["c"..m]
xpcall(function() require("expansions/script/c81000000") end,function() require("script/c81000000") end)
function cm.initial_effect(c)
--special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_NEGATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,81003005+EFFECT_COUNT_CODE_OATH) e1:SetCondition(cm.spcon)
e1:SetCondition(c81003005.condition) e1:SetTarget(cm.sptg)
e1:SetTarget(c81003005.target) e1:SetOperation(cm.spop)
e1:SetOperation(c81003005.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to grave
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOGRAVE)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,m)
e2:SetTarget(cm.drtg)
e2:SetOperation(cm.drop)
c:RegisterEffect(e2)
end end
function c81003005.cfilter(c) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return c:IsFaceup() and c:IsSetCard(0x817) return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
end end
function c81003005.condition(e,tp,eg,ep,ev,re,r,rp) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function cm.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if ep==tp then return false end if not c:IsRelateToEffect(e) then return end
return Duel.IsExistingMatchingCard(c81003005.cfilter,tp,LOCATION_MZONE,0,1,nil) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e3:SetTargetRange(1,0)
e3:SetTarget(cm.splimit)
e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp)
end
function cm.splimit(e,c)
return not c:IsRace(RACE_CYBERSE)
end end
function c81003005.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.filter(c)
local rc=re:GetHandler() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToGrave()
if chk==0 then return rc:IsSSetable() and (rc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
end end
function c81003005.activate(e,tp,eg,ep,ev,re,r,rp) function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
local rc=re:GetHandler() if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToGrave,tp,0,LOCATION_DECK,1,nil,tp)
if not Duel.NegateActivation(ev) then return end and Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_DECK,0,1,nil,1-tp) end
if rc:IsRelateToEffect(re) and not rc:IsLocation(LOCATION_DECK) then
if (rc:IsType(TYPE_FIELD) or Duel.GetLocationCount(tp,LOCATION_SZONE)>0) and rc:IsSSetable() then
Duel.BreakEffect()
rc:CancelToGrave()
Duel.SSet(tp,rc)
Duel.ConfirmCards(1-tp,rc)
local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
e0:SetReset(RESET_EVENT+RESETS_REDIRECT)
e0:SetValue(LOCATION_REMOVED)
rc:RegisterEffect(e0,true)
if rc:IsType(TYPE_QUICKPLAY) then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e1:SetCode(EFFECT_QP_ACT_IN_SET_TURN)
e1:SetReset(RESET_EVENT+RESETS_STANDARD)
rc:RegisterEffect(e1)
end
if rc:IsType(TYPE_TRAP) then
local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e2:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
e2:SetReset(RESET_EVENT+RESETS_STANDARD)
rc:RegisterEffect(e2)
end
end
end
end end
function cm.drop(e,tp,eg,ep,ev,re,r,rp)
local g1=Duel.GetMatchingGroup(cm.filter,tp,LOCATION_DECK,0,nil,tp)
local g2=Duel.GetMatchingGroup(cm.filter,1-tp,LOCATION_DECK,0,nil,1-tp)
if g1:GetCount()==0 or g2:GetCount()==0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local rg1=g1:Select(tp,1,1,nil)
Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
local rg2=g2:Select(1-tp,1,1,nil)
rg1:Merge(rg2)
Duel.SendtoGrave(rg1,REASON_EFFECT)
end
\ No newline at end of file
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