Commit faed19be authored by TanakaKotoha's avatar TanakaKotoha

nanodesu

parent ca1e8ca2
...@@ -12,6 +12,9 @@ function cm.initial_effect(c) ...@@ -12,6 +12,9 @@ function cm.initial_effect(c)
e1:SetTarget(cm.target) e1:SetTarget(cm.target)
e1:SetOperation(cm.activate) e1:SetOperation(cm.activate)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local sg=Group.CreateGroup()
sg:KeepAlive()
e1:SetLabelObject(sg)
end end
function cm.cfilter(c) function cm.cfilter(c)
return c:IsFaceup() and Duel.IsExistingMatchingCard(cm.filter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,c:GetOriginalCodeRule()) return c:IsFaceup() and Duel.IsExistingMatchingCard(cm.filter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c,c:GetOriginalCodeRule())
...@@ -26,10 +29,12 @@ end ...@@ -26,10 +29,12 @@ end
function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
local g=Duel.GetMatchingGroup(cm.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=Duel.GetMatchingGroup(cm.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) and Duel.IsExistingMatchingCard(Card.IsOriginalCodeRule,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,g:GetFirst():GetOriginalCodeRule()) end if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) and Duel.IsExistingMatchingCard(Card.IsOriginalCodeRule,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,g:GetFirst():GetOriginalCodeRule()) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE) local sg=e:GetLabelObject()
sg:Merge(g)
Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),tp,LOCATION_DECK+LOCATION_GRAVE)
end end
function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.activate(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.cfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) local g=e:GetLabelObject()
if #g==0 then return end if #g==0 then return end
local dg=Group.CreateGroup() local dg=Group.CreateGroup()
local tc=g:GetFirst() local tc=g:GetFirst()
......
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