Commit eb00d419 authored by TanakaKotoha's avatar TanakaKotoha

daniaozhuanzhuanzhuan

parent 1c1b0238
...@@ -3,7 +3,7 @@ local m=33502009 ...@@ -3,7 +3,7 @@ local m=33502009
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(c.setname,"Gmemories"),1) aux.AddSynchroProcedure(c,nil,cm.sfilter2,1)
c:EnableReviveLimit() c:EnableReviveLimit()
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
...@@ -25,22 +25,12 @@ function cm.initial_effect(c) ...@@ -25,22 +25,12 @@ function cm.initial_effect(c)
e3:SetCondition(cm.damcon1) e3:SetCondition(cm.damcon1)
e3:SetOperation(cm.damop1) e3:SetOperation(cm.damop1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
if not cm.global_check then
cm.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_CHAIN_SOLVING)
ge1:SetOperation(cm.count)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_CHAIN_SOLVED)
ge2:SetOperation(cm.reset)
Duel.RegisterEffect(ge2,0)
end
end end
cm.setname="Gmemories" cm.setname="Gmemories"
--e2 --e2
function cm.sfilter2(c)
return c.setname=="Gmemories"
end
function cm.thfilter(c) function cm.thfilter(c)
return c.setname=="Gmemories" and c:IsAbleToHand() return c.setname=="Gmemories" and c:IsAbleToHand()
end end
...@@ -64,17 +54,11 @@ function cm.thfilter0(c) ...@@ -64,17 +54,11 @@ function cm.thfilter0(c)
return c:IsOnField() return c:IsOnField()
end end
--e3 --e3
function cm.count(e,tp,eg,ep,ev,re,r,rp)
cm.chain_solving=true
end
function cm.reset(e,tp,eg,ep,ev,re,r,rp)
cm.chain_solving=false
end
function cm.tdfilter3(c,tpg) function cm.tdfilter3(c,tpg)
return c:IsControler(tpg) and c:GetOwner()~=tpg return c:IsControler(tpg) and c:GetOwner()~=tpg
end end
function cm.damcon1(e,tp,eg,ep,ev,re,r,rp) function cm.damcon1(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(cm.tdfilter3,1,nil,1-tp) and not cm.chain_solving return eg:IsExists(cm.tdfilter3,1,nil,1-tp)
end end
function cm.damop1(e,tp,eg,ep,ev,re,r,rp) function cm.damop1(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_CARD,0,m) Duel.Hint(HINT_CARD,0,m)
......
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