Commit 2f63ef14 authored by Tachibana's avatar Tachibana

50947142+21142671

parent b7017ded
...@@ -29,6 +29,7 @@ function c1000362.initial_effect(c) ...@@ -29,6 +29,7 @@ function c1000362.initial_effect(c)
e2:SetOperation(c1000362.operation) e2:SetOperation(c1000362.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c1000362.material_type=TYPE_SYNCHRO
function c1000362.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c1000362.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() and aux.disfilter1(chkc) end if chkc then return chkc:IsOnField() and aux.disfilter1(chkc) end
if chk==0 then return Duel.IsExistingTarget(aux.disfilter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(aux.disfilter1,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
......
...@@ -26,6 +26,7 @@ function c1000363.initial_effect(c) ...@@ -26,6 +26,7 @@ function c1000363.initial_effect(c)
e2:SetOperation(c1000363.operation) e2:SetOperation(c1000363.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c1000363.material_type=TYPE_SYNCHRO
function c1000363.pmfilter(c) function c1000363.pmfilter(c)
return c:IsSetCard(0xc200) return c:IsSetCard(0xc200)
end end
......
...@@ -30,7 +30,13 @@ function c1000370.initial_effect(c) ...@@ -30,7 +30,13 @@ function c1000370.initial_effect(c)
e2:SetCondition(c1000370.condition) e2:SetCondition(c1000370.condition)
e2:SetTarget(c1000370.target) e2:SetTarget(c1000370.target)
e2:SetOperation(c1000370.operation) e2:SetOperation(c1000370.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function c1000370.sfilter(c) function c1000370.sfilter(c)
return c:IsRace(RACE_ZOMBIE) and c:IsType(TYPE_SYNCHRO) return c:IsRace(RACE_ZOMBIE) and c:IsType(TYPE_SYNCHRO)
......
...@@ -29,6 +29,7 @@ function c1000625.initial_effect(c) ...@@ -29,6 +29,7 @@ function c1000625.initial_effect(c)
e99:SetCode(EFFECT_CANNOT_CHANGE_CONTROL) e99:SetCode(EFFECT_CANNOT_CHANGE_CONTROL)
c:RegisterEffect(e99) c:RegisterEffect(e99)
end end
c1000625.material_type=TYPE_SYNCHRO
function c1000625.ctcon(e,tp,eg,ep,ev,re,r,rp) function c1000625.ctcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
end end
......
...@@ -19,6 +19,7 @@ function cm.initial_effect(c) ...@@ -19,6 +19,7 @@ function cm.initial_effect(c)
e2:SetOperation(cm.op) e2:SetOperation(cm.op)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
function cm.dircon(e) function cm.dircon(e)
return e:GetHandler():GetColumnGroup():Filter(Card.IsType,nil,TYPE_MONSTER)==0 return e:GetHandler():GetColumnGroup():Filter(Card.IsType,nil,TYPE_MONSTER)==0
end end
......
...@@ -43,6 +43,12 @@ function c1110131.initial_effect(c) ...@@ -43,6 +43,12 @@ function c1110131.initial_effect(c)
e5:SetOperation(c1110131.op5) e5:SetOperation(c1110131.op5)
c:RegisterEffect(e5) c:RegisterEffect(e5)
-- --
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
-- --
function c1110131.Filter(c) function c1110131.Filter(c)
......
...@@ -52,7 +52,14 @@ function c11115018.initial_effect(c) ...@@ -52,7 +52,14 @@ function c11115018.initial_effect(c)
e8:SetTarget(c11115018.gytg) e8:SetTarget(c11115018.gytg)
e8:SetOperation(c11115018.gyop) e8:SetOperation(c11115018.gyop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
c11115018.material_type=TYPE_SYNCHRO
function c11115018.sfilter(c) function c11115018.sfilter(c)
return c:IsSetCard(0xab5e) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0xab5e) and c:IsType(TYPE_SYNCHRO)
end end
...@@ -76,7 +83,7 @@ end ...@@ -76,7 +83,7 @@ end
function c11115018.gycon(e,tp,eg,ep,ev,re,r,rp) function c11115018.gycon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return (c:IsReason(REASON_BATTLE) or (c:GetReasonPlayer()~=tp and c:IsReason(REASON_EFFECT))) return (c:IsReason(REASON_BATTLE) or (c:GetReasonPlayer()~=tp and c:IsReason(REASON_EFFECT)))
and c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousPosition(POS_FACEUP)
end end
function c11115018.tgfilter(c) function c11115018.tgfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave() return c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()
......
...@@ -32,6 +32,7 @@ function c11115020.initial_effect(c) ...@@ -32,6 +32,7 @@ function c11115020.initial_effect(c)
e4:SetLabelObject(e3) e4:SetLabelObject(e3)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c11115020.material_type=TYPE_SYNCHRO
function c11115020.sfilter1(c) function c11115020.sfilter1(c)
return c:IsSetCard(0x1b5e) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0x1b5e) and c:IsType(TYPE_SYNCHRO)
end end
...@@ -58,7 +59,7 @@ end ...@@ -58,7 +59,7 @@ end
function c11115020.rmop(e,tp,eg,ep,ev,re,r,rp) function c11115020.rmop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,e:GetHandler()) local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,e:GetHandler())
if g:GetCount()>0 and Duel.Remove(g,POS_FACEUP,REASON_EFFECT)~=0 then if g:GetCount()>0 and Duel.Remove(g,POS_FACEUP,REASON_EFFECT)~=0 then
local og=Duel.GetOperatedGroup():Filter(Card.IsLocation,nil,LOCATION_REMOVED) local og=Duel.GetOperatedGroup():Filter(Card.IsLocation,nil,LOCATION_REMOVED)
for oc in aux.Next(og) do for oc in aux.Next(og) do
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,12 @@ function cm.initial_effect(c) ...@@ -47,6 +47,12 @@ function cm.initial_effect(c)
e4:SetCode(EFFECT_DISABLE) e4:SetCode(EFFECT_DISABLE)
e4:SetTarget(cm.immtg) e4:SetTarget(cm.immtg)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.matfilter1(c) function cm.matfilter1(c)
return c:IsSynchroType(TYPE_TUNER) return c:IsSynchroType(TYPE_TUNER)
......
...@@ -25,6 +25,12 @@ function c12005016.initial_effect(c) ...@@ -25,6 +25,12 @@ function c12005016.initial_effect(c)
e2:SetTarget(c12005016.sptg1) e2:SetTarget(c12005016.sptg1)
e2:SetOperation(c12005016.spop1) e2:SetOperation(c12005016.spop1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function c12005016.mfilter(c) function c12005016.mfilter(c)
return c:IsSetCard(0xfbb) or c:IsSetCard(0x1fbd) return c:IsSetCard(0xfbb) or c:IsSetCard(0x1fbd)
......
...@@ -28,8 +28,8 @@ function cm.initial_effect(c) ...@@ -28,8 +28,8 @@ function cm.initial_effect(c)
e2:SetTarget(cm.destg) e2:SetTarget(cm.destg)
e2:SetOperation(cm.desop) e2:SetOperation(cm.desop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,0,LOCATION_ONFIELD)
......
...@@ -39,6 +39,7 @@ function cm.initial_effect(c) ...@@ -39,6 +39,7 @@ function cm.initial_effect(c)
e4:SetOperation(cm.spop1) e4:SetOperation(cm.spop1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
cm.material_type=TYPE_SYNCHRO
function cm.cost1(e,c,tp,st) function cm.cost1(e,c,tp,st)
if bit.band(st,SUMMON_TYPE_SYNCHRO)~=SUMMON_TYPE_SYNCHRO then return true end if bit.band(st,SUMMON_TYPE_SYNCHRO)~=SUMMON_TYPE_SYNCHRO then return true end
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_ONFIELD,0,1,nil,12038000) return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_ONFIELD,0,1,nil,12038000)
......
...@@ -58,6 +58,12 @@ function cm.initial_effect(c) ...@@ -58,6 +58,12 @@ function cm.initial_effect(c)
e5:SetTarget(cm.sttg) e5:SetTarget(cm.sttg)
e5:SetOperation(cm.stop) e5:SetOperation(cm.stop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.TM(c) function cm.TM(c)
local m=_G["c"..c:GetCode()] local m=_G["c"..c:GetCode()]
......
...@@ -68,6 +68,12 @@ function cm.initial_effect(c) ...@@ -68,6 +68,12 @@ function cm.initial_effect(c)
e6:SetCondition(cm.discon) e6:SetCondition(cm.discon)
e6:SetOperation(cm.disop) e6:SetOperation(cm.disop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.synfilter(c,e,tp) function cm.synfilter(c,e,tp)
return c:IsRace(RACE_ZOMBIE) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_TUNER) return c:IsRace(RACE_ZOMBIE) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_TUNER)
......
...@@ -70,6 +70,12 @@ function cm.initial_effect(c) ...@@ -70,6 +70,12 @@ function cm.initial_effect(c)
e7:SetOperation(cm.spop2) e7:SetOperation(cm.spop2)
e7:SetLabelObject(e6) e7:SetLabelObject(e6)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.sprop(e,tp,eg,ep,ev,re,r,rp) function cm.sprop(e,tp,eg,ep,ev,re,r,rp)
local tp=e:GetHandler():GetControler() local tp=e:GetHandler():GetControler()
......
...@@ -43,6 +43,12 @@ function c16063009.initial_effect(c) ...@@ -43,6 +43,12 @@ function c16063009.initial_effect(c)
e3:SetTarget(c16063009.sptg) e3:SetTarget(c16063009.sptg)
e3:SetOperation(c16063009.spop) e3:SetOperation(c16063009.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function c16063009.matfilter1(c,syncard) function c16063009.matfilter1(c,syncard)
return c:IsSetCard(0x5c5) and c:IsType(TYPE_TUNER) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsCanBeSynchroMaterial(syncard) return c:IsSetCard(0x5c5) and c:IsType(TYPE_TUNER) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsCanBeSynchroMaterial(syncard)
......
--新津 涟库瓦 --新津 涟库瓦
function c16080010.initial_effect(c) function c16080010.initial_effect(c)
aux.AddSynchroProcedure(c,c16080010.tfilter,aux.NonTuner(),2) aux.AddSynchroProcedure(c,c16080010.tfilter,aux.NonTuner(Card.IsType,TYPE_SYNCHRO),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--change dis --change dis
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
...@@ -18,6 +18,7 @@ function c16080010.initial_effect(c) ...@@ -18,6 +18,7 @@ function c16080010.initial_effect(c)
e3:SetValue(LOCATION_DECKBOT) e3:SetValue(LOCATION_DECKBOT)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c16080010.material_type=TYPE_SYNCHRO
function c16080010.tfilter(c) function c16080010.tfilter(c)
return c:IsSetCard(0x5ca) return c:IsSetCard(0x5ca)
end end
......
...@@ -34,6 +34,7 @@ function c16080019.initial_effect(c) ...@@ -34,6 +34,7 @@ function c16080019.initial_effect(c)
e3:SetOperation(c16080019.disop) e3:SetOperation(c16080019.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c16080019.material_type=TYPE_SYNCHRO
function c16080019.tfilter(c) function c16080019.tfilter(c)
return c:IsSetCard(0x5ca) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0x5ca) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -29,6 +29,7 @@ function c16080027.initial_effect(c) ...@@ -29,6 +29,7 @@ function c16080027.initial_effect(c)
e4:SetOperation(c16080027.spop) e4:SetOperation(c16080027.spop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c16080027.material_type=TYPE_SYNCHRO
function c16080027.tfilter(c) function c16080027.tfilter(c)
return c:IsSetCard(0x5ca) return c:IsSetCard(0x5ca)
end end
......
...@@ -38,6 +38,7 @@ function c16081016.initial_effect(c) ...@@ -38,6 +38,7 @@ function c16081016.initial_effect(c)
e4:SetValue(1) e4:SetValue(1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c16081016.material_type=TYPE_SYNCHRO
function c16081016.filter(c) function c16081016.filter(c)
return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_BEAST) return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_BEAST)
end end
......
...@@ -27,6 +27,7 @@ function c16081017.initial_effect(c) ...@@ -27,6 +27,7 @@ function c16081017.initial_effect(c)
e2:SetOperation(c16081017.atkop) e2:SetOperation(c16081017.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c16081017.material_type=TYPE_SYNCHRO
function c16081017.filter(c) function c16081017.filter(c)
return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_BEAST) return c:IsAttribute(ATTRIBUTE_WIND) and c:IsRace(RACE_BEAST)
end end
......
...@@ -43,6 +43,7 @@ function cm.initial_effect(c) ...@@ -43,6 +43,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.disop) e3:SetOperation(cm.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.synfilter(c) function cm.synfilter(c)
return c:IsRace(RACE_ZOMBIE) and c:IsType(TYPE_SYNCHRO) return c:IsRace(RACE_ZOMBIE) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -61,6 +61,7 @@ function cm.initial_effect(c) ...@@ -61,6 +61,7 @@ function cm.initial_effect(c)
e8:SetOperation(cm.penop) e8:SetOperation(cm.penop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
cm.material_type=TYPE_SYNCHRO
function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil) local sg=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
......
...@@ -60,6 +60,12 @@ function cm.initial_effect(c) ...@@ -60,6 +60,12 @@ function cm.initial_effect(c)
e4:SetTarget(cm.tdtg) e4:SetTarget(cm.tdtg)
e4:SetOperation(cm.tdop) e4:SetOperation(cm.tdop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.CheckGroupRecursive(c,sg,g,f,min,max,ext_params) function cm.CheckGroupRecursive(c,sg,g,f,min,max,ext_params)
sg:AddCard(c) sg:AddCard(c)
......
...@@ -10,6 +10,12 @@ function cm.initial_effect(c) ...@@ -10,6 +10,12 @@ function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},nil,"de",rscon.sumtype("syn"),nil,cm.tg,cm.op) local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},nil,"de",rscon.sumtype("syn"),nil,cm.tg,cm.op)
local e2=rsef.QO(c,nil,{m,1},nil,"sp",nil,LOCATION_MZONE,cm.con2,nil,cm.tg2,cm.op2) local e2=rsef.QO(c,nil,{m,1},nil,"sp",nil,LOCATION_MZONE,cm.con2,nil,cm.tg2,cm.op2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.con2(e,tp) function cm.con2(e,tp)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,6,nil,18004005) return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,6,nil,18004005)
......
...@@ -10,6 +10,12 @@ function cm.initial_effect(c) ...@@ -10,6 +10,12 @@ function cm.initial_effect(c)
rssg.SexGunCode(c) rssg.SexGunCode(c)
local e1=rsef.STF(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},"rm",nil,rscon.sumtype("syn"),nil,cm.tg,cm.op) local e1=rsef.STF(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},"rm",nil,rscon.sumtype("syn"),nil,cm.tg,cm.op)
local e2=rsef.SV_IMMUNE_EFFECT(c,rsval.imoe,cm.con2) local e2=rsef.SV_IMMUNE_EFFECT(c,rsval.imoe,cm.con2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.con2(e) function cm.con2(e)
return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_GRAVE,0,6,nil,18004005) return Duel.IsExistingMatchingCard(Card.IsCode,e:GetHandlerPlayer(),LOCATION_GRAVE,0,6,nil,18004005)
......
...@@ -10,6 +10,12 @@ function cm.initial_effect(c) ...@@ -10,6 +10,12 @@ function cm.initial_effect(c)
rssg.SexGunCode(c) rssg.SexGunCode(c)
local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},"des","de",rscon.sumtype("syn"),cm.cost,cm.tg,cm.op) local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},{1,m},"des","de",rscon.sumtype("syn"),cm.cost,cm.tg,cm.op)
local e2=rsef.QO(c,nil,{m,1},nil,"sp",nil,LOCATION_MZONE,cm.con2,nil,cm.tg2,cm.op2) local e2=rsef.QO(c,nil,{m,1},nil,"sp",nil,LOCATION_MZONE,cm.con2,nil,cm.tg2,cm.op2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.con2(e,tp) function cm.con2(e,tp)
return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,6,nil,18004005) return Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,6,nil,18004005)
......
...@@ -23,6 +23,12 @@ function cm.initial_effect(c) ...@@ -23,6 +23,12 @@ function cm.initial_effect(c)
e5:SetCondition(cm.sumcon) e5:SetCondition(cm.sumcon)
e5:SetOperation(cm.sumsuc) e5:SetOperation(cm.sumsuc)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.sumcon(e,tp) function cm.sumcon(e,tp)
local c=e:GetHandler() local c=e:GetHandler()
......
...@@ -9,6 +9,12 @@ function cm.initial_effect(c) ...@@ -9,6 +9,12 @@ function cm.initial_effect(c)
local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},nil,"th","de,dsp",rscon.sumtype("syn"),nil,rsop.target({cm.thfilter,"th",LOCATION_GRAVE },{cm.thfilter,"th",0,LOCATION_GRAVE }),cm.op) local e1=rsef.STO(c,EVENT_SPSUMMON_SUCCESS,{m,0},nil,"th","de,dsp",rscon.sumtype("syn"),nil,rsop.target({cm.thfilter,"th",LOCATION_GRAVE },{cm.thfilter,"th",0,LOCATION_GRAVE }),cm.op)
local e2=rsef.FTO(c,EVENT_TO_GRAVE,{m,1},1,"se,th","de",LOCATION_MZONE,cm.tdcon,nil,rsop.target(cm.thfilter2,"th",LOCATION_DECK),cm.thop) local e2=rsef.FTO(c,EVENT_TO_GRAVE,{m,1},1,"se,th","de",LOCATION_MZONE,cm.tdcon,nil,rsop.target(cm.thfilter2,"th",LOCATION_DECK),cm.thop)
local e3=rsef.QO(c,nil,{m,2},1,"sp",nil,LOCATION_MZONE,cm.syncon,nil,rsop.target(cm.synfilter,"sp",LOCATION_EXTRA),cm.synop) local e3=rsef.QO(c,nil,{m,2},1,"sp",nil,LOCATION_MZONE,cm.syncon,nil,rsop.target(cm.synfilter,"sp",LOCATION_EXTRA),cm.synop)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.thfilter(c) function cm.thfilter(c)
return c:IsType(TYPE_TUNER) and c:IsAbleToHand() return c:IsType(TYPE_TUNER) and c:IsAbleToHand()
......
...@@ -32,6 +32,7 @@ function c21520094.initial_effect(c) ...@@ -32,6 +32,7 @@ function c21520094.initial_effect(c)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT) e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c21520094.material_type=TYPE_SYNCHRO
function c21520094.distg(e,c) function c21520094.distg(e,c)
return c:IsFacedown() return c:IsFacedown()
end end
......
...@@ -19,7 +19,7 @@ function c21520097.initial_effect(c) ...@@ -19,7 +19,7 @@ function c21520097.initial_effect(c)
e1_2:SetCode(EFFECT_CANNOT_ACTIVATE) e1_2:SetCode(EFFECT_CANNOT_ACTIVATE)
e1_2:SetTargetRange(1,1) e1_2:SetTargetRange(1,1)
e1_2:SetCondition(c21520097.discon) e1_2:SetCondition(c21520097.discon)
-- e1_2:SetValue(c21520097.aclimit) -- e1_2:SetValue(c21520097.aclimit)
e1_2:SetValue(1) e1_2:SetValue(1)
e1_2:SetReset(RESET_EVENT+RESETS_REDIRECT+RESET_DISABLE) e1_2:SetReset(RESET_EVENT+RESETS_REDIRECT+RESET_DISABLE)
c:RegisterEffect(e1_2) c:RegisterEffect(e1_2)
...@@ -42,6 +42,7 @@ function c21520097.initial_effect(c) ...@@ -42,6 +42,7 @@ function c21520097.initial_effect(c)
e3:SetValue(c21520097.efilter) e3:SetValue(c21520097.efilter)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c21520097.material_type=TYPE_SYNCHRO
function c21520097.efilter(e,te) function c21520097.efilter(e,te)
return te:IsActiveType(TYPE_SPELL+TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer() return te:IsActiveType(TYPE_SPELL+TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
end end
......
...@@ -34,6 +34,7 @@ function c21520199.initial_effect(c) ...@@ -34,6 +34,7 @@ function c21520199.initial_effect(c)
e3:SetOperation(c21520199.scop) e3:SetOperation(c21520199.scop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c21520199.material_type=TYPE_SYNCHRO
function c21520199.sfilter1(c) function c21520199.sfilter1(c)
return c:IsAttribute(ATTRIBUTE_WATER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsAttribute(ATTRIBUTE_WATER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
......
...@@ -6,7 +6,7 @@ function c21520200.initial_effect(c) ...@@ -6,7 +6,7 @@ function c21520200.initial_effect(c)
--synchro summon success --synchro summon success
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(21520200,1)) e1:SetDescription(aux.Stringid(21520200,1))
-- e1:SetCategory(CATEGORY_ATKCHANGE) -- e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
...@@ -33,7 +33,14 @@ function c21520200.initial_effect(c) ...@@ -33,7 +33,14 @@ function c21520200.initial_effect(c)
e3:SetTarget(c21520200.sctg) e3:SetTarget(c21520200.sctg)
e3:SetOperation(c21520200.scop) e3:SetOperation(c21520200.scop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
c21520200.material_type=TYPE_SYNCHRO
function c21520200.sfilter1(c) function c21520200.sfilter1(c)
return c:IsAttribute(ATTRIBUTE_WATER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsAttribute(ATTRIBUTE_WATER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
...@@ -55,12 +62,12 @@ function c21520200.disop(e,tp,eg,ep,ev,re,r,rp) ...@@ -55,12 +62,12 @@ function c21520200.disop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_NUMBER,1-tp,ct) Duel.Hint(HINT_NUMBER,1-tp,ct)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
-- e1:SetRange(LOCATION_MZONE) -- e1:SetRange(LOCATION_MZONE)
e1:SetCode(EFFECT_DISABLE_FIELD) e1:SetCode(EFFECT_DISABLE_FIELD)
e1:SetOperation(c21520200.disableop) e1:SetOperation(c21520200.disableop)
e1:SetLabel(dis) e1:SetLabel(dis)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,ct) e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,ct)
-- c:RegisterEffect(e1) -- c:RegisterEffect(e1)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
function c21520200.disableop(e,tp) function c21520200.disableop(e,tp)
......
...@@ -46,6 +46,12 @@ function c23000309.initial_effect(c) ...@@ -46,6 +46,12 @@ function c23000309.initial_effect(c)
e5:SetTarget(c23000309.sptg) e5:SetTarget(c23000309.sptg)
e5:SetOperation(c23000309.spop) e5:SetOperation(c23000309.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function c23000309.indct(e,re,r,rp) function c23000309.indct(e,re,r,rp)
if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then
......
...@@ -7,13 +7,13 @@ function cm.initial_effect(c) ...@@ -7,13 +7,13 @@ function cm.initial_effect(c)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),aux.NonTuner(Card.IsCode,23000304),1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),aux.NonTuner(Card.IsCode,23000304),1)
c:EnableReviveLimit() c:EnableReviveLimit()
--code --code
local e3=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CHANGE_CODE) e1:SetCode(EFFECT_CHANGE_CODE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_GRAVE+LOCATION_MZONE) e1:SetRange(LOCATION_GRAVE+LOCATION_MZONE)
e3:SetValue(23000304) e1:SetValue(23000304)
c:RegisterEffect(e3) c:RegisterEffect(e1)
--atk --atk
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
...@@ -28,27 +28,33 @@ function cm.initial_effect(c) ...@@ -28,27 +28,33 @@ function cm.initial_effect(c)
e3:SetCode(EFFECT_UPDATE_DEFENSE) e3:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--spsummon --spsummon
local e1=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,0)) e4:SetDescription(aux.Stringid(m,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY) e4:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_TO_GRAVE) e4:SetCode(EVENT_TO_GRAVE)
e1:SetCountLimit(1,m) e4:SetCountLimit(1,m)
e1:SetTarget(cm.target) e4:SetTarget(cm.target)
e1:SetOperation(cm.operation) e4:SetOperation(cm.operation)
c:RegisterEffect(e1) c:RegisterEffect(e4)
--
local e1=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(m,1)) e5:SetDescription(aux.Stringid(m,1))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW) e5:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY) e5:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_REMOVE) e5:SetCode(EVENT_REMOVE)
e1:SetCost(cm.cost) e5:SetCost(cm.cost)
e1:SetTarget(cm.target1) e5:SetTarget(cm.target1)
e1:SetOperation(cm.operation1) e5:SetOperation(cm.operation1)
c:RegisterEffect(e1) c:RegisterEffect(e5)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,m)==0 end if chk==0 then return Duel.GetFlagEffect(tp,m)==0 end
......
...@@ -22,6 +22,7 @@ function c30556008.initial_effect(c) ...@@ -22,6 +22,7 @@ function c30556008.initial_effect(c)
e4:SetOperation(c30556008.damop) e4:SetOperation(c30556008.damop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c30556008.material_type=TYPE_SYNCHRO
function c30556008.damtg(e,tp,eg,ep,ev,re,r,rp,chk) function c30556008.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,30556008)==0 end if chk==0 then return Duel.GetFlagEffect(tp,30556008)==0 end
Duel.SetTargetPlayer(1-tp) Duel.SetTargetPlayer(1-tp)
......
...@@ -32,6 +32,7 @@ function c30556009.initial_effect(c) ...@@ -32,6 +32,7 @@ function c30556009.initial_effect(c)
e3:SetOperation(c30556009.activate) e3:SetOperation(c30556009.activate)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c30556009.material_type=TYPE_SYNCHRO
function c30556009.efilter(e,te) function c30556009.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER) return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
end end
......
...@@ -37,6 +37,7 @@ function c33200026.initial_effect(c) ...@@ -37,6 +37,7 @@ function c33200026.initial_effect(c)
e4:SetOperation(c33200026.baop) e4:SetOperation(c33200026.baop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c33200026.material_type=TYPE_SYNCHRO
--e3 --e3
function c33200026.condition(e,tp,eg,ep,ev,re,r,rp) function c33200026.condition(e,tp,eg,ep,ev,re,r,rp)
......
...@@ -32,7 +32,7 @@ function c33200029.initial_effect(c) ...@@ -32,7 +32,7 @@ function c33200029.initial_effect(c)
e3:SetOperation(c33200029.spop) e3:SetOperation(c33200029.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c33200029.material_type=TYPE_SYNCHRO
--e1 --e1
function c33200029.con(e) function c33200029.con(e)
return Duel.GetCurrentPhase()~=PHASE_DRAW return Duel.GetCurrentPhase()~=PHASE_DRAW
......
...@@ -56,6 +56,7 @@ c:EnableCounterPermit(0x34f) ...@@ -56,6 +56,7 @@ c:EnableCounterPermit(0x34f)
e4:SetOperation(c33400012.thop) e4:SetOperation(c33400012.thop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c33400012.material_type=TYPE_SYNCHRO
function c33400012.sfilter(c) function c33400012.sfilter(c)
return c:IsSetCard(0x341) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0x341) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -30,6 +30,7 @@ function cm.initial_effect(c) ...@@ -30,6 +30,7 @@ function cm.initial_effect(c)
e4:SetCode(EFFECT_DISABLE) e4:SetCode(EFFECT_DISABLE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
cm.material_type=TYPE_SYNCHRO
--Synchro SUMMON --Synchro SUMMON
function cm.sfilter(c) function cm.sfilter(c)
return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO)
......
...@@ -38,6 +38,7 @@ function cm.initial_effect(c) ...@@ -38,6 +38,7 @@ function cm.initial_effect(c)
e12:SetCode(EVENT_SPSUMMON_SUCCESS) e12:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e12) c:RegisterEffect(e12)
end end
cm.material_type=TYPE_SYNCHRO
--Synchro SUMMON --Synchro SUMMON
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO) return c:IsSetCard(0xa82) and c:IsType(TYPE_SYNCHRO)
......
...@@ -42,6 +42,7 @@ function cm.initial_effect(c) ...@@ -42,6 +42,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e11) c:RegisterEffect(e11)
end end
cm.setname="Innocence" cm.setname="Innocence"
cm.material_type=TYPE_SYNCHRO
--Synchro SUMMON --Synchro SUMMON
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsType(TYPE_SYNCHRO) return c:IsType(TYPE_SYNCHRO)
......
...@@ -29,6 +29,7 @@ function c33500309.initial_effect(c) ...@@ -29,6 +29,7 @@ function c33500309.initial_effect(c)
e3:SetOperation(c33500309.nop) e3:SetOperation(c33500309.nop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c33500309.material_type=TYPE_SYNCHRO
function c33500309.efilter(e,ct) function c33500309.efilter(e,ct)
local player=e:GetHandler():GetControler() local player=e:GetHandler():GetControler()
local te,tp,loc=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER,CHAININFO_TRIGGERING_LOCATION) local te,tp,loc=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_PLAYER,CHAININFO_TRIGGERING_LOCATION)
......
...@@ -34,6 +34,7 @@ function cm.initial_effect(c) ...@@ -34,6 +34,7 @@ function cm.initial_effect(c)
e2:SetTarget(aux.TargetBoolFunction(Card.IsLocation,LOCATION_DECK)) e2:SetTarget(aux.TargetBoolFunction(Card.IsLocation,LOCATION_DECK))
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
function cm.rmcon(e,tp,eg,ep,ev,re,r,rp) function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
...@@ -66,24 +67,24 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp) ...@@ -66,24 +67,24 @@ function cm.rmop(e,tp,eg,ep,ev,re,r,rp)
e0:SetCode(EFFECT_PUBLIC) e0:SetCode(EFFECT_PUBLIC)
e0:SetReset(RESET_PHASE+PHASE_END,1) e0:SetReset(RESET_PHASE+PHASE_END,1)
sc:RegisterEffect(e0) sc:RegisterEffect(e0)
-- local e1=Effect.CreateEffect(e:GetHandler()) -- local e1=Effect.CreateEffect(e:GetHandler())
-- e1:SetType(EFFECT_TYPE_SINGLE) -- e1:SetType(EFFECT_TYPE_SINGLE)
-- e1:SetCode(EFFECT_CANNOT_TRIGGER) -- e1:SetCode(EFFECT_CANNOT_TRIGGER)
-- e1:SetReset(RESET_PHASE+PHASE_END,1) -- e1:SetReset(RESET_PHASE+PHASE_END,1)
-- sc:RegisterEffect(e1) -- sc:RegisterEffect(e1)
-- sc:RegisterFlagEffect(0,RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2)) -- sc:RegisterFlagEffect(0,RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(m,2))
-- local e5=Effect.CreateEffect(e:GetHandler()) -- local e5=Effect.CreateEffect(e:GetHandler())
-- e5:SetType(EFFECT_TYPE_FIELD) -- e5:SetType(EFFECT_TYPE_FIELD)
-- e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) -- e5:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
-- e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET) -- e5:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-- e5:SetTargetRange(1,1) -- e5:SetTargetRange(1,1)
-- e5:SetLabelObject(sc) -- e5:SetLabelObject(sc)
-- e5:SetTarget(cm.distg) -- e5:SetTarget(cm.distg)
-- e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) -- e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-- Duel.RegisterEffect(e5,tp) -- Duel.RegisterEffect(e5,tp)
-- local e6=e5:Clone() -- local e6=e5:Clone()
-- e6:SetCode(EFFECT_CANNOT_SUMMON) -- e6:SetCode(EFFECT_CANNOT_SUMMON)
-- Duel.RegisterEffect(e6,tp) -- Duel.RegisterEffect(e6,tp)
sc=g:GetNext() sc=g:GetNext()
end end
end end
......
...@@ -34,6 +34,7 @@ function cm.initial_effect(c) ...@@ -34,6 +34,7 @@ function cm.initial_effect(c)
e2:SetOperation(cm.thop) e2:SetOperation(cm.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
--Synchro SUMMON --Synchro SUMMON
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO)
......
...@@ -35,6 +35,7 @@ function cm.initial_effect(c) ...@@ -35,6 +35,7 @@ function cm.initial_effect(c)
e5:SetOperation(cm.sumsuc) e5:SetOperation(cm.sumsuc)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
cm.material_type=TYPE_SYNCHRO
--Synchro SUMMON --Synchro SUMMON
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsType(TYPE_SYNCHRO) return c:IsType(TYPE_SYNCHRO)
......
...@@ -40,6 +40,7 @@ function cm.initial_effect(c) ...@@ -40,6 +40,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.recop2) e3:SetOperation(cm.recop2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return ep==tp and ev>=1 return ep==tp and ev>=1
end end
......
...@@ -38,6 +38,7 @@ function cm.initial_effect(c) ...@@ -38,6 +38,7 @@ function cm.initial_effect(c)
e6:SetOperation(cm.disop) e6:SetOperation(cm.disop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
cm.material_type=TYPE_SYNCHRO
function cm.rmcon(e,tp,eg,ep,ev,re,r,rp) function cm.rmcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -46,6 +46,7 @@ function cm.initial_effect(c) ...@@ -46,6 +46,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
--e1 --e1
cm.material_type=TYPE_SYNCHRO
function cm.filter(c) function cm.filter(c)
return c:IsFacedown() return c:IsFacedown()
end end
......
...@@ -61,6 +61,7 @@ function cm.initial_effect(c) ...@@ -61,6 +61,7 @@ function cm.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
--Synchro SUMMON --Synchro SUMMON
cm.material_type=TYPE_SYNCHRO
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -41,6 +41,7 @@ function cm.initial_effect(c) ...@@ -41,6 +41,7 @@ function cm.initial_effect(c)
e8:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL) e8:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
cm.material_type=TYPE_SYNCHRO
function cm.spcon(e,tp,eg,ep,ev,re,r,rp) function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -31,6 +31,7 @@ function cm.initial_effect(c) ...@@ -31,6 +31,7 @@ function cm.initial_effect(c)
e2:SetOperation(cm.rmop) e2:SetOperation(cm.rmop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
function cm.discon(e,tp,eg,ep,ev,re,r,rp) function cm.discon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
if ep==tp or c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end if ep==tp or c:IsStatus(STATUS_BATTLE_DESTROYED) then return false end
......
...@@ -34,3 +34,4 @@ function cm.initial_effect(c) ...@@ -34,3 +34,4 @@ function cm.initial_effect(c)
end) end)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
cm.material_type=TYPE_SYNCHRO
...@@ -23,6 +23,7 @@ function cm.initial_effect(c) ...@@ -23,6 +23,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.disop) e3:SetOperation(cm.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.discon(e,tp,eg,ep,ev,re,r,rp) function cm.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and e:GetHandler():GetOriginalCode()==m and ep==1-tp return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and e:GetHandler():GetOriginalCode()==m and ep==1-tp
end end
...@@ -41,7 +42,7 @@ function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk) ...@@ -41,7 +42,7 @@ function cm.distg(e,tp,eg,ep,ev,re,r,rp,chk)
end end
end end
function cm.disop(e,tp,eg,ep,ev,re,r,rp) function cm.disop(e,tp,eg,ep,ev,re,r,rp)
if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
Duel.Destroy(eg,REASON_EFFECT) Duel.Destroy(eg,REASON_EFFECT)
end end
end end
\ No newline at end of file
...@@ -19,6 +19,12 @@ function cm.initial_effect(c) ...@@ -19,6 +19,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.distg) e3:SetTarget(cm.distg)
e3:SetOperation(cm.disop) e3:SetOperation(cm.disop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.discon(e,tp,eg,ep,ev,re,r,rp) function cm.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and ep==1-tp return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and ep==1-tp
......
...@@ -30,6 +30,12 @@ function cm.initial_effect(c) ...@@ -30,6 +30,12 @@ function cm.initial_effect(c)
e2:SetTarget(cm.target1) e2:SetTarget(cm.target1)
e2:SetOperation(cm.activate1) e2:SetOperation(cm.activate1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.filter(c) function cm.filter(c)
return c.Senya_desc_with_nanahira and c:IsSSetable() and c:IsType(TYPE_TRAP) and not c:IsHasEffect(EFFECT_NECRO_VALLEY) return c.Senya_desc_with_nanahira and c:IsSSetable() and c:IsType(TYPE_TRAP) and not c:IsHasEffect(EFFECT_NECRO_VALLEY)
......
...@@ -33,7 +33,14 @@ function cm.initial_effect(c) ...@@ -33,7 +33,14 @@ function cm.initial_effect(c)
return c.Senya_desc_with_nanahira return c.Senya_desc_with_nanahira
end) end)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
cm.material_type=TYPE_SYNCHRO
function cm.discon(e,tp,eg,ep,ev,re,r,rp) function cm.discon(e,tp,eg,ep,ev,re,r,rp)
return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
end end
......
...@@ -37,6 +37,7 @@ function cm.initial_effect(c) ...@@ -37,6 +37,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.thcon(e,tp,eg,ep,ev,re,r,rp) function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -39,6 +39,7 @@ function cm.initial_effect(c) ...@@ -39,6 +39,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.sumcon(e,tp,eg,ep,ev,re,r,rp) function cm.sumcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -46,6 +46,7 @@ function cm.initial_effect(c) ...@@ -46,6 +46,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeckAsCost(tp,1) end if chk==0 then return Duel.IsPlayerCanDiscardDeckAsCost(tp,1) end
Duel.DiscardDeck(tp,1,REASON_COST) Duel.DiscardDeck(tp,1,REASON_COST)
......
...@@ -34,6 +34,7 @@ function cm.initial_effect(c) ...@@ -34,6 +34,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.spop) e1:SetOperation(cm.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
cm.material_type=TYPE_SYNCHRO
function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDiscardDeckAsCost(tp,1) end if chk==0 then return Duel.IsPlayerCanDiscardDeckAsCost(tp,1) end
Duel.DiscardDeck(tp,1,REASON_COST) Duel.DiscardDeck(tp,1,REASON_COST)
......
...@@ -27,6 +27,12 @@ function cm.initial_effect(c) ...@@ -27,6 +27,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.sptg) e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp) function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -53,6 +53,12 @@ function cm.initial_effect(c) ...@@ -53,6 +53,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.sptg) e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp) function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -40,6 +40,12 @@ function cm.initial_effect(c) ...@@ -40,6 +40,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.sptg) e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.drcon(e,tp,eg,ep,ev,re,r,rp) function cm.drcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -28,6 +28,12 @@ function cm.initial_effect(c) ...@@ -28,6 +28,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.sptg) e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.thcon(e,tp,eg,ep,ev,re,r,rp) function cm.thcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
......
...@@ -19,6 +19,7 @@ function cm.initial_effect(c) ...@@ -19,6 +19,7 @@ function cm.initial_effect(c)
Duel.RegisterEffect(ge1,0) Duel.RegisterEffect(ge1,0)
end end
end end
cm.material_type=TYPE_SYNCHRO
function cm.resetcount(e,tp,eg,ep,ev,re,r,rp) function cm.resetcount(e,tp,eg,ep,ev,re,r,rp)
cm[0]=0 cm[0]=0
cm[1]=0 cm[1]=0
......
...@@ -11,6 +11,7 @@ function c40009414.initial_effect(c) ...@@ -11,6 +11,7 @@ function c40009414.initial_effect(c)
e1:SetOperation(c40009414.regop) e1:SetOperation(c40009414.regop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
c40009414.material_type=TYPE_SYNCHRO
function c40009414.regcon(e,tp,eg,ep,ev,re,r,rp) function c40009414.regcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -62,6 +62,12 @@ function c47500101.initial_effect(c) ...@@ -62,6 +62,12 @@ function c47500101.initial_effect(c)
e8:SetTarget(c47500101.ftg) e8:SetTarget(c47500101.ftg)
e8:SetOperation(c47500101.fop2) e8:SetOperation(c47500101.fop2)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function c47500101.pefilter(c) function c47500101.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) and c:IsLevel(8)
......
--响战士 --响战士
function c47500381.initial_effect(c) function c47500381.initial_effect(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(c47500381.sfilter),1,1) aux.AddSynchroProcedure(c,nil,aux.FilterBoolFunction(c47500381.sfilter),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--symphogear --symphogear
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47500381,0)) e1:SetDescription(aux.Stringid(47500381,0))
e1:SetCategory(CATEGORY_ATKCHANGE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,47500381) e1:SetCountLimit(1,47500381)
e1:SetCondition(c47500381.atkcon) e1:SetCondition(c47500381.atkcon)
e1:SetOperation(c47500381.atkop) e1:SetOperation(c47500381.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Scrap Fist --Scrap Fist
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47500381,1)) e2:SetDescription(aux.Stringid(47500381,1))
e2:SetCategory(CATEGORY_SEARCH) e2:SetCategory(CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START) e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,47500382) e2:SetCountLimit(1,47500382)
e2:SetCondition(c47500381.sfcon) e2:SetCondition(c47500381.sfcon)
e2:SetOperation(c47500381.sfop) e2:SetOperation(c47500381.sfop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c47500381.material_type=TYPE_SYNCHRO
function c47500381.sfilter(c) function c47500381.sfilter(c)
return c:IsType(TYPE_SYNCHRO) return c:IsType(TYPE_SYNCHRO)
end end
function c47500381.atkcon(e,tp,eg,ep,ev,re,r,rp) function c47500381.atkcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47500381.atkfilter(c) function c47500381.atkfilter(c)
return c:IsFaceup() return c:IsFaceup()
end end
function c47500381.atkop(e,tp,eg,ep,ev,re,r,rp) function c47500381.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c47500381.atkfilter,tp,LOCATION_MZONE,0,e:GetHandler()) local g=Duel.GetMatchingGroup(c47500381.atkfilter,tp,LOCATION_MZONE,0,e:GetHandler())
if g:GetCount()>0 and c:IsFaceup() and c:IsRelateToEffect(e) then if g:GetCount()>0 and c:IsFaceup() and c:IsRelateToEffect(e) then
local atk=0 local atk=0
local tc=g:GetFirst() local tc=g:GetFirst()
while tc do while tc do
atk=atk+tc:GetAttack() atk=atk+tc:GetAttack()
tc=g:GetNext() tc=g:GetNext()
end end
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(atk) e1:SetValue(atk)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
Duel.Hint(HINT_MUSIC,0,aux.Stringid(47500381,2)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(47500381,2))
local e0=Effect.CreateEffect(e:GetHandler()) local e0=Effect.CreateEffect(e:GetHandler())
e0:SetType(EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_FIELD)
e0:SetCode(EFFECT_CANNOT_ATTACK) e0:SetCode(EFFECT_CANNOT_ATTACK)
e0:SetTargetRange(LOCATION_MZONE,0) e0:SetTargetRange(LOCATION_MZONE,0)
e0:SetTarget(c47500381.ftarget) e0:SetTarget(c47500381.ftarget)
e0:SetLabel(c:GetFieldID()) e0:SetLabel(c:GetFieldID())
e0:SetReset(RESET_PHASE+PHASE_END) e0:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e0,tp) Duel.RegisterEffect(e0,tp)
end end
function c47500381.ftarget(e,c) function c47500381.ftarget(e,c)
return e:GetLabel()~=c:GetFieldID() return e:GetLabel()~=c:GetFieldID()
end end
function c47500381.sfcon(e,tp,eg,ep,ev,re,r,rp) function c47500381.sfcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
end end
function c47500381.sfop(e,tp,eg,ep,ev,re,r,rp) function c47500381.sfop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetCode(EFFECT_CANNOT_ACTIVATE) e1:SetCode(EFFECT_CANNOT_ACTIVATE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetTargetRange(0,1) e1:SetTargetRange(0,1)
e1:SetCondition(c47500381.actcon) e1:SetCondition(c47500381.actcon)
e1:SetValue(1) e1:SetValue(1)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_PIERCE) e2:SetCode(EFFECT_PIERCE)
e2:SetCondition(c47500381.effcon) e2:SetCondition(c47500381.effcon)
e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE) e3:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
e3:SetCondition(c47500381.damcon) e3:SetCondition(c47500381.damcon)
e3:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE)) e3:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE))
e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE) e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e4:SetCondition(c47500381.effcon) e4:SetCondition(c47500381.effcon)
e4:SetValue(1) e4:SetValue(1)
e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_DAMAGE_STEP_END) e5:SetCode(EVENT_DAMAGE_STEP_END)
e5:SetCondition(c47500381.descon) e5:SetCondition(c47500381.descon)
e5:SetOperation(c47500381.desop) e5:SetOperation(c47500381.desop)
e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e5:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c47500381.actcon(e) function c47500381.actcon(e)
local c=e:GetHandler() local c=e:GetHandler()
return (Duel.GetAttacker()==c or Duel.GetAttackTarget()==c) and c:GetBattleTarget()~=nil return (Duel.GetAttacker()==c or Duel.GetAttackTarget()==c) and c:GetBattleTarget()~=nil
and e:GetOwnerPlayer()==e:GetHandlerPlayer() and e:GetOwnerPlayer()==e:GetHandlerPlayer()
end end
function c47500381.effcon(e) function c47500381.effcon(e)
return e:GetOwnerPlayer()==e:GetHandlerPlayer() return e:GetOwnerPlayer()==e:GetHandlerPlayer()
end end
function c47500381.damcon(e) function c47500381.damcon(e)
return e:GetHandler():GetBattleTarget()~=nil return e:GetHandler():GetBattleTarget()~=nil
end end
function c47500381.descon(e,tp,eg,ep,ev,re,r,rp) function c47500381.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetBattleTarget() local tc=e:GetHandler():GetBattleTarget()
return tc and tc:IsRelateToBattle() and e:GetOwnerPlayer()==tp return tc and tc:IsRelateToBattle() and e:GetOwnerPlayer()==tp
end end
function c47500381.desop(e,tp,eg,ep,ev,re,r,rp) function c47500381.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=e:GetHandler():GetBattleTarget() local tc=e:GetHandler():GetBattleTarget()
Duel.Hint(HINT_CARD,0,47500381) Duel.Hint(HINT_CARD,0,47500381)
Duel.Destroy(tc,REASON_EFFECT) Duel.Destroy(tc,REASON_EFFECT)
end end
\ No newline at end of file
...@@ -2,90 +2,91 @@ ...@@ -2,90 +2,91 @@
local m=47501004 local m=47501004
local cm=_G["c"..m] local cm=_G["c"..m]
function c47501004.initial_effect(c) function c47501004.initial_effect(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.NonTuner(c47501004.synfilter2),2) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.NonTuner(c47501004.synfilter2),2)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon condition --spsummon condition
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION) e1:SetCode(EFFECT_SPSUMMON_CONDITION)
e1:SetValue(aux.synlimit) e1:SetValue(aux.synlimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--shield --shield
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47501004,0)) e1:SetDescription(aux.Stringid(47501004,0))
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c47501004.gdcon) e1:SetCondition(c47501004.gdcon)
e1:SetOperation(c47501004.gdop) e1:SetOperation(c47501004.gdop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47501004,0)) e2:SetDescription(aux.Stringid(47501004,0))
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_IMMUNE_EFFECT) e2:SetCode(EFFECT_IMMUNE_EFFECT)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE) e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetValue(c47501004.efilter2) e2:SetValue(c47501004.efilter2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_DEFENSE_ATTACK) e3:SetCode(EFFECT_DEFENSE_ATTACK)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetValue(1) e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--diseffect --diseffect
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(47501004,1)) e4:SetDescription(aux.Stringid(47501004,1))
e4:SetType(EFFECT_TYPE_QUICK_O) e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN) e4:SetCode(EVENT_FREE_CHAIN)
e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_NO_TURN_RESET) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_NO_TURN_RESET)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1) e4:SetCountLimit(1)
e4:SetOperation(c47501004.immop) e4:SetOperation(c47501004.immop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c47501004.material_type=TYPE_SYNCHRO
function c47501004.synfilter2(c) function c47501004.synfilter2(c)
return c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_FUSION) return c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_FUSION)
end end
function c47501004.gdcon(e,tp,eg,ep,ev,re,r,rp) function c47501004.gdcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47501004.gdop(e,tp,eg,ep,ev,re,r,rp) function c47501004.gdop(e,tp,eg,ep,ev,re,r,rp)
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_INDESTRUCTABLE_BATTLE) e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e1:SetTargetRange(LOCATION_MZONE,0) e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetReset(RESET_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetValue(1) e1:SetValue(1)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
local e3=Effect.CreateEffect(e:GetHandler()) local e3=Effect.CreateEffect(e:GetHandler())
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_IMMUNE_EFFECT) e3:SetCode(EFFECT_IMMUNE_EFFECT)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE) e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetValue(c47501004.efilter1) e3:SetValue(c47501004.efilter1)
e3:SetReset(RESET_PHASE+PHASE_END) e3:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e3,tp) Duel.RegisterEffect(e3,tp)
end end
function c47501004.efilter1(e,re) function c47501004.efilter1(e,re)
return e:GetOwnerPlayer()~=re:GetOwnerPlayer() return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
end end
function c47501004.efilter2(e,te) function c47501004.efilter2(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() return te:GetOwnerPlayer()~=e:GetHandlerPlayer()
end end
function c47501004.immop(e,tp,eg,ep,ev,re,r,rp) function c47501004.immop(e,tp,eg,ep,ev,re,r,rp)
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_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetTargetRange(0,LOCATION_ONFIELD) e1:SetTargetRange(0,LOCATION_ONFIELD)
e1:SetReset(RESET_PHASE+PHASE_END,2) e1:SetReset(RESET_PHASE+PHASE_END,2)
e1:SetValue(c47501004.efilter3) e1:SetValue(c47501004.efilter3)
Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
end end
function c47501004.efilter3(e,te) function c47501004.efilter3(e,te)
return te:GetOwnerPlayer()~=e:GetOwnerPlayer() return te:GetOwnerPlayer()~=e:GetOwnerPlayer()
end end
...@@ -4,7 +4,7 @@ function c47501006.initial_effect(c) ...@@ -4,7 +4,7 @@ function c47501006.initial_effect(c)
aux.AddCodeList(c,47500000) aux.AddCodeList(c,47500000)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.FilterBoolFunction(Card.IsCode,47500000),1,1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSynchroType,TYPE_SYNCHRO),aux.FilterBoolFunction(Card.IsCode,47500000),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--special summon rule --special summon rule
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_FIELD)
...@@ -43,7 +43,14 @@ function c47501006.initial_effect(c) ...@@ -43,7 +43,14 @@ function c47501006.initial_effect(c)
e5:SetTarget(c47501006.sptg) e5:SetTarget(c47501006.sptg)
e5:SetOperation(c47501006.spop) e5:SetOperation(c47501006.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
c47501006.material_type=TYPE_SYNCHRO
function c47501006.pefilter(c) function c47501006.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
...@@ -4,7 +4,7 @@ function c47501010.initial_effect(c) ...@@ -4,7 +4,7 @@ function c47501010.initial_effect(c)
aux.AddCodeList(c,47500000) aux.AddCodeList(c,47500000)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),aux.FilterBoolFunction(Card.IsType,TYPE_SYNCHRO),1,1) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsCode,47500000),aux.FilterBoolFunction(Card.IsType,TYPE_SYNCHRO),1,1)
c:EnableReviveLimit() c:EnableReviveLimit()
--special summon rule --special summon rule
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD) e0:SetType(EFFECT_TYPE_FIELD)
...@@ -74,6 +74,7 @@ function c47501010.initial_effect(c) ...@@ -74,6 +74,7 @@ function c47501010.initial_effect(c)
e8:SetTargetRange(LOCATION_MZONE,0) e8:SetTargetRange(LOCATION_MZONE,0)
c:RegisterEffect(e8) c:RegisterEffect(e8)
end end
c47501010.material_type=TYPE_SYNCHRO
function c47501010.pefilter(c) function c47501010.pefilter(c)
return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER) return c:IsRace(RACE_WARRIOR) or c:IsRace(RACE_SPELLCASTER)
end end
......
--天司长 圣德芬 --天司长 圣德芬
function c47579908.initial_effect(c) function c47579908.initial_effect(c)
c:SetSPSummonOnce(47579908) c:SetSPSummonOnce(47579908)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c,false) aux.EnablePendulumAttribute(c,false)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47579908.synfilter),aux.NonTuner(c47579908.synfilter2),2) aux.AddSynchroProcedure(c,aux.FilterBoolFunction(c47579908.synfilter),aux.NonTuner(c47579908.synfilter2),2)
c:EnableReviveLimit() c:EnableReviveLimit()
--cannot special summon --cannot special summon
local e0=Effect.CreateEffect(c) local e0=Effect.CreateEffect(c)
e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e0:SetType(EFFECT_TYPE_SINGLE) e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_SPSUMMON_CONDITION) e0:SetCode(EFFECT_SPSUMMON_CONDITION)
e0:SetValue(aux.synlimit) e0:SetValue(aux.synlimit)
c:RegisterEffect(e0) c:RegisterEffect(e0)
--indes --indes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_MZONE) e1:SetRange(LOCATION_MZONE)
e1:SetCondition(c47579908.inmcon) e1:SetCondition(c47579908.inmcon)
e1:SetValue(c47579908.efilter) e1:SetValue(c47579908.efilter)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Ain Soph Aur --Ain Soph Aur
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47579908,0)) e2:SetDescription(aux.Stringid(47579908,0))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,47579908+EFFECT_COUNT_CODE_OATH) e2:SetCountLimit(1,47579908+EFFECT_COUNT_CODE_OATH)
e2:SetCondition(c47579908.batcon) e2:SetCondition(c47579908.batcon)
e2:SetOperation(c47579908.batop) e2:SetOperation(c47579908.batop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--pendulum --pendulum
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_LEAVE_FIELD) e3:SetCode(EVENT_LEAVE_FIELD)
e3:SetProperty(EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCondition(c47579908.pencon) e3:SetCondition(c47579908.pencon)
e3:SetTarget(c47579908.pentg) e3:SetTarget(c47579908.pentg)
e3:SetOperation(c47579908.penop) e3:SetOperation(c47579908.penop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--immune --immune
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_IMMUNE_EFFECT) e4:SetCode(EFFECT_IMMUNE_EFFECT)
e4:SetRange(LOCATION_PZONE) e4:SetRange(LOCATION_PZONE)
e4:SetTargetRange(LOCATION_MZONE,0) e4:SetTargetRange(LOCATION_MZONE,0)
e4:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY)) e4:SetTarget(aux.TargetBoolFunction(Card.IsRace,RACE_FAIRY))
e4:SetValue(c47579908.efilter) e4:SetValue(c47579908.efilter)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon bgm --spsummon bgm
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EVENT_SPSUMMON_SUCCESS) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetOperation(c47579908.spsuc) e5:SetOperation(c47579908.spsuc)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--pierce --pierce
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_PIERCE) e6:SetCode(EFFECT_PIERCE)
e6:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47579908.material_type=TYPE_SYNCHRO
function c47579908.synfilter(c) function c47579908.synfilter(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
function c47579908.synfilter2(c) function c47579908.synfilter2(c)
return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION) return c:IsRace(RACE_FAIRY) and c:IsType(TYPE_SYNCHRO+TYPE_FUSION)
end end
function c47579908.inmcon(e,tp,eg,ep,ev,re,r,rp) function c47579908.inmcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47579908.efilter(e,te) function c47579908.efilter(e,te)
return te:GetOwner()~=e:GetOwner() return te:GetOwner()~=e:GetOwner()
end end
function c47579908.batcon(e,tp,eg,ep,ev,re,r,rp) function c47579908.batcon(e,tp,eg,ep,ev,re,r,rp)
return (e:GetHandler()==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil) or e:GetHandler()==Duel.GetAttackTarget() return (e:GetHandler()==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil) or e:GetHandler()==Duel.GetAttackTarget()
end end
function c47579908.atkfilter(c) function c47579908.atkfilter(c)
return c:IsFaceup() and c:IsRace(RACE_FAIRY) and not c:IsCode(47579908) return c:IsFaceup() and c:IsRace(RACE_FAIRY) and not c:IsCode(47579908)
end end
function c47579908.batop(e,tp,eg,ep,ev,re,r,rp) function c47579908.batop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local g=Duel.GetMatchingGroup(c47579908.atkfilter,tp,LOCATION_MZONE,0,nil) local g=Duel.GetMatchingGroup(c47579908.atkfilter,tp,LOCATION_MZONE,0,nil)
local atk=g:GetSum(Card.GetAttack) local atk=g:GetSum(Card.GetAttack)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN)
e1:SetValue(atk) e1:SetValue(atk)
c:RegisterEffect(e1) c:RegisterEffect(e1)
Duel.Hint(HINT_SOUND,0,aux.Stringid(47579908,2)) Duel.Hint(HINT_SOUND,0,aux.Stringid(47579908,2))
end end
function c47579908.indestg(e,c) function c47579908.indestg(e,c)
return c==e:GetHandler():GetBattleTarget() return c==e:GetHandler():GetBattleTarget()
end end
function c47579908.pencon(e,tp,eg,ep,ev,re,r,rp) function c47579908.pencon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO) return c:IsFaceup() and c:IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47579908.filter(c,e,tp) function c47579908.filter(c,e,tp)
return c:IsCode(47551000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsCode(47551000) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end end
function c47579908.pentg(e,tp,eg,ep,ev,re,r,rp,chk) function c47579908.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)>0 if chk==0 then return Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)>0
and Duel.IsExistingMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end and Duel.IsExistingMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) and Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end end
function c47579908.penop(e,tp,eg,ep,ev,re,r,rp) function c47579908.penop(e,tp,eg,ep,ev,re,r,rp)
if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return false end
local c=e:GetHandler() local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then if c:IsRelateToEffect(e) and Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true) then
if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end if Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_LINK)<=0 then return end
local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp) local tg=Duel.GetFirstMatchingCard(c47579908.filter,tp,LOCATION_EXTRA,0,nil,e,tp)
if tg then if tg then
Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP) Duel.SpecialSummon(tg,0,tp,tp,false,false,POS_FACEUP)
end end
end end
end end
function c47579908.efilter(e,te) function c47579908.efilter(e,te)
return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER) return te:GetOwnerPlayer()~=e:GetHandlerPlayer() and te:IsActiveType(TYPE_MONSTER)
end end
function c47579908.spsuc(e,tp,eg,ep,ev,re,r,rp) function c47579908.spsuc(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_MUSIC,0,aux.Stringid(47579908,2)) Duel.Hint(HINT_MUSIC,0,aux.Stringid(47579908,2))
end end
\ No newline at end of file
...@@ -77,6 +77,7 @@ function c47590008.initial_effect(c) ...@@ -77,6 +77,7 @@ function c47590008.initial_effect(c)
e10:SetCondition(c47590008.effcon) e10:SetCondition(c47590008.effcon)
c:RegisterEffect(e10) c:RegisterEffect(e10)
end end
c47590008.material_type=TYPE_SYNCHRO
function c47590008.effcon(e) function c47590008.effcon(e)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -2,93 +2,94 @@ ...@@ -2,93 +2,94 @@
local m=47591299 local m=47591299
local cm=_G["c"..m] local cm=_G["c"..m]
function c47591299.initial_effect(c) function c47591299.initial_effect(c)
--synchro summon --synchro summon
aux.AddSynchroProcedure(c,nil,aux.NonTuner(c47591299.synfilter),1) aux.AddSynchroProcedure(c,nil,aux.NonTuner(c47591299.synfilter),1)
c:EnableReviveLimit() c:EnableReviveLimit()
--检索 --检索
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(47591299,1)) e1:SetDescription(aux.Stringid(47591299,1))
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCondition(c47591299.poscon) e1:SetCondition(c47591299.poscon)
e1:SetTarget(c47591299.thtg) e1:SetTarget(c47591299.thtg)
e1:SetOperation(c47591299.thop) e1:SetOperation(c47591299.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--disable --disable
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(47591299,0)) e2:SetDescription(aux.Stringid(47591299,0))
e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY) e2:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_CHAINING) e2:SetCode(EVENT_CHAINING)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetCondition(c47591299.condition) e2:SetCondition(c47591299.condition)
e2:SetTarget(c47591299.target) e2:SetTarget(c47591299.target)
e2:SetOperation(c47591299.operation) e2:SetOperation(c47591299.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--boost --boost
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetValue(900) e3:SetValue(900)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e3:Clone()
e4:SetCode(EFFECT_UPDATE_DEFENSE) e4:SetCode(EFFECT_UPDATE_DEFENSE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--mudeki --mudeki
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD) e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT) e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetTargetRange(LOCATION_MZONE,0) e5:SetTargetRange(LOCATION_MZONE,0)
e5:SetValue(1) e5:SetValue(1)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e6=e5:Clone() local e6=e5:Clone()
e6:SetValue(aux.tgoval) e6:SetValue(aux.tgoval)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c47591299.material_type=TYPE_SYNCHRO
function c47591299.synfilter(c) function c47591299.synfilter(c)
return c:IsType(TYPE_SYNCHRO) and c:IsAttribute(ATTRIBUTE_WIND) return c:IsType(TYPE_SYNCHRO) and c:IsAttribute(ATTRIBUTE_WIND)
end end
function c47591299.poscon(e,tp,eg,ep,ev,re,r,rp) function c47591299.poscon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
function c47591299.filter(c) function c47591299.filter(c)
return c:IsCode(47591009) and c:IsAbleToHand() return c:IsCode(47591009) and c:IsAbleToHand()
end end
function c47591299.thtg(e,tp,eg,ep,ev,re,r,rp,chk) function c47591299.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c47591299.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c47591299.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED) Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
end end
function c47591299.thop(e,tp,eg,ep,ev,re,r,rp) function c47591299.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c47591299.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil) local g=Duel.SelectMatchingCard(tp,c47591299.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g) Duel.ConfirmCards(1-tp,g)
end end
end end
function c47591299.condition(e,tp,eg,ep,ev,re,r,rp) function c47591299.condition(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local rc=re:GetHandler() local rc=re:GetHandler()
return re:IsActiveType(TYPE_MONSTER) and rc~=c and not c:IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) return re:IsActiveType(TYPE_MONSTER) and rc~=c and not c:IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev)
end end
function c47591299.target(e,tp,eg,ep,ev,re,r,rp,chk) function c47591299.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end if chk==0 then return true end
Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
Duel.SetOperationInfo(0,CATEGORY_CONTROL,eg,1,0,0) Duel.SetOperationInfo(0,CATEGORY_CONTROL,eg,1,0,0)
end end
end end
function c47591299.operation(e,tp,eg,ep,ev,re,r,rp) function c47591299.operation(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler() local c=e:GetHandler()
local rc=re:GetHandler() local rc=re:GetHandler()
if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) then if Duel.NegateActivation(ev) and rc:IsRelateToEffect(re) then
Duel.GetControl(rc,tp,PHASE_END,1) Duel.GetControl(rc,tp,PHASE_END,1)
end end
end end
\ No newline at end of file
This diff is collapsed.
...@@ -44,6 +44,12 @@ function cm.initial_effect(c) ...@@ -44,6 +44,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.target2) e3:SetTarget(cm.target2)
e3:SetOperation(cm.operation2) e3:SetOperation(cm.operation2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.actcon(e) function cm.actcon(e)
return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler() return Duel.GetAttacker()==e:GetHandler() or Duel.GetAttackTarget()==e:GetHandler()
......
...@@ -53,6 +53,7 @@ function cm.initial_effect(c) ...@@ -53,6 +53,7 @@ function cm.initial_effect(c)
e1:SetOperation(cm.spop) e1:SetOperation(cm.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
end end
cm.material_type=TYPE_SYNCHRO
function cm.mfilter1(c) function cm.mfilter1(c)
return c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
......
...@@ -39,6 +39,7 @@ function cm.initial_effect(c) ...@@ -39,6 +39,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.sfilter1(c) function cm.sfilter1(c)
return c:IsType(TYPE_SYNCHRO) return c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -38,6 +38,7 @@ function cm.initial_effect(c) ...@@ -38,6 +38,7 @@ function cm.initial_effect(c)
e2:SetOperation(cm.disop) e2:SetOperation(cm.disop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
cm.material_type=TYPE_SYNCHRO
function cm.tfilter(c) function cm.tfilter(c)
return c:GetSummonLocation()==LOCATION_GRAVE return c:GetSummonLocation()==LOCATION_GRAVE
end end
......
...@@ -34,6 +34,7 @@ function c65001015.initial_effect(c) ...@@ -34,6 +34,7 @@ function c65001015.initial_effect(c)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c65001015[0]=0 c65001015[0]=0
c65001015.material_type=TYPE_SYNCHRO
function c65001015.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c65001015.destg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2) and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
......
...@@ -46,6 +46,7 @@ function c65010073.initial_effect(c) ...@@ -46,6 +46,7 @@ function c65010073.initial_effect(c)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c65010073.setname="RagnaTravellers" c65010073.setname="RagnaTravellers"
c65010073.material_type=TYPE_SYNCHRO
function c65010073.matfil(c) function c65010073.matfil(c)
return c.setname=="RagnaTravellers" and not c:IsType(TYPE_TUNER) return c.setname=="RagnaTravellers" and not c:IsType(TYPE_TUNER)
end end
......
...@@ -35,6 +35,7 @@ function c65010074.initial_effect(c) ...@@ -35,6 +35,7 @@ function c65010074.initial_effect(c)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c65010074.setname="RagnaTravellers" c65010074.setname="RagnaTravellers"
c65010074.material_type=TYPE_SYNCHRO
function c65010074.matfil(c) function c65010074.matfil(c)
return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK) return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK)
end end
......
...@@ -45,6 +45,7 @@ function c65010075.initial_effect(c) ...@@ -45,6 +45,7 @@ function c65010075.initial_effect(c)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c65010075.setname="RagnaTravellers" c65010075.setname="RagnaTravellers"
c65010075.material_type=TYPE_SYNCHRO
function c65010075.tunefil(c) function c65010075.tunefil(c)
return c:IsType(TYPE_TUNER) and c:IsType(TYPE_SYNCHRO) and c.setname=="RagnaTravellers" return c:IsType(TYPE_TUNER) and c:IsType(TYPE_SYNCHRO) and c.setname=="RagnaTravellers"
end end
......
...@@ -38,6 +38,7 @@ function c65010076.initial_effect(c) ...@@ -38,6 +38,7 @@ function c65010076.initial_effect(c)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c65010076.setname="RagnaTravellers" c65010076.setname="RagnaTravellers"
c65010076.material_type=TYPE_SYNCHRO
function c65010076.matfil(c) function c65010076.matfil(c)
return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK) return c:IsRace(RACE_WARRIOR) and c:IsAttribute(ATTRIBUTE_DARK)
end end
......
...@@ -36,6 +36,7 @@ function c65010084.initial_effect(c) ...@@ -36,6 +36,7 @@ function c65010084.initial_effect(c)
e4:SetValue(aux.tgoval) e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c65010084.material_type=TYPE_SYNCHRO
function c65010084.descon(e,tp,eg,ep,ev,re,r,rp) function c65010084.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -26,6 +26,12 @@ function cm.initial_effect(c) ...@@ -26,6 +26,12 @@ function cm.initial_effect(c)
e1:SetTarget(cm.negtg) e1:SetTarget(cm.negtg)
e1:SetOperation(cm.negop) e1:SetOperation(cm.negop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end 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) return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
......
...@@ -31,6 +31,12 @@ function cm.initial_effect(c) ...@@ -31,6 +31,12 @@ function cm.initial_effect(c)
e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e3:SetValue(aux.tgoval) e3:SetValue(aux.tgoval)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
function cm.tunfil(c) function cm.tunfil(c)
return c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FAIRY) return c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FAIRY)
......
...@@ -19,6 +19,7 @@ function cm.initial_effect(c) ...@@ -19,6 +19,7 @@ function cm.initial_effect(c)
e3:SetOperation(cm.negop) e3:SetOperation(cm.negop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
cm.material_type=TYPE_SYNCHRO
function cm.actlimit(e,re,tp) function cm.actlimit(e,re,tp)
return re:IsActiveType(TYPE_MONSTER) and not re:GetHandler():IsLocation(LOCATION_MZONE) return re:IsActiveType(TYPE_MONSTER) and not re:GetHandler():IsLocation(LOCATION_MZONE)
end end
......
...@@ -25,7 +25,7 @@ function c65020017.initial_effect(c) ...@@ -25,7 +25,7 @@ function c65020017.initial_effect(c)
e2:SetOperation(c65020017.tgop) e2:SetOperation(c65020017.tgop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c65020017.material_type=TYPE_SYNCHRO
function c65020017.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c65020017.tgtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_ONFIELD) end if chkc then return chkc:IsLocation(LOCATION_ONFIELD) end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_ONFIELD,1,nil) end
......
...@@ -38,6 +38,7 @@ function c65030083.initial_effect(c) ...@@ -38,6 +38,7 @@ function c65030083.initial_effect(c)
e5:SetOperation(c65030083.op) e5:SetOperation(c65030083.op)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
c65030083.material_type=TYPE_SYNCHRO
function c65030083.synfil(c) function c65030083.synfil(c)
return aux.IsCodeListed(c,65030086) and c:IsType(TYPE_SYNCHRO) return aux.IsCodeListed(c,65030086) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -50,6 +50,7 @@ function c65030084.initial_effect(c) ...@@ -50,6 +50,7 @@ function c65030084.initial_effect(c)
e3:SetOperation(c65030084.spop) e3:SetOperation(c65030084.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c65030084.material_type=TYPE_SYNCHRO
function c65030084.synfil(c) function c65030084.synfil(c)
return aux.IsCodeListed(c,65030086) and c:IsType(TYPE_SYNCHRO) return aux.IsCodeListed(c,65030086) and c:IsType(TYPE_SYNCHRO)
end end
......
...@@ -22,6 +22,7 @@ function c65040026.initial_effect(c) ...@@ -22,6 +22,7 @@ function c65040026.initial_effect(c)
e2:SetOperation(c65040026.atkop) e2:SetOperation(c65040026.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
end end
c65040026.material_type=TYPE_SYNCHRO
function c65040026.con(e,tp,eg,ep,ev,re,r,rp) function c65040026.con(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end end
......
...@@ -37,6 +37,7 @@ function c66619912.initial_effect(c) ...@@ -37,6 +37,7 @@ function c66619912.initial_effect(c)
e3:SetOperation(c66619912.hspop) e3:SetOperation(c66619912.hspop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
c66619912.material_type=TYPE_SYNCHRO
function c66619912.cost(e,tp,eg,ep,ev,re,r,rp,chk) function c66619912.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c66619912.cfilter,tp,LOCATION_ONFIELD,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(c66619912.cfilter,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
......
...@@ -2,79 +2,80 @@ ...@@ -2,79 +2,80 @@
local m=66915006 local m=66915006
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon condition --spsummon condition
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION) e1:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--move --move
local e11=Effect.CreateEffect(c) local e11=Effect.CreateEffect(c)
e11:SetDescription(aux.Stringid(m,0)) e11:SetDescription(aux.Stringid(m,0))
e11:SetProperty(EFFECT_FLAG_CARD_TARGET) e11:SetProperty(EFFECT_FLAG_CARD_TARGET)
e11:SetType(EFFECT_TYPE_IGNITION) e11:SetType(EFFECT_TYPE_IGNITION)
e11:SetRange(LOCATION_MZONE) e11:SetRange(LOCATION_MZONE)
e11:SetCode(EVENT_FREE_CHAIN) e11:SetCode(EVENT_FREE_CHAIN)
e11:SetCountLimit(1) e11:SetCountLimit(1)
e11:SetTarget(cm.tg) e11:SetTarget(cm.tg)
e11:SetOperation(cm.op) e11:SetOperation(cm.op)
c:RegisterEffect(e11) c:RegisterEffect(e11)
local e111=Effect.CreateEffect(c) local e111=Effect.CreateEffect(c)
e111:SetDescription(aux.Stringid(m,1)) e111:SetDescription(aux.Stringid(m,1))
e111:SetCategory(CATEGORY_TODECK) e111:SetCategory(CATEGORY_TODECK)
e111:SetType(EFFECT_TYPE_IGNITION) e111:SetType(EFFECT_TYPE_IGNITION)
e111:SetRange(LOCATION_MZONE) e111:SetRange(LOCATION_MZONE)
e111:SetCode(EVENT_FREE_CHAIN) e111:SetCode(EVENT_FREE_CHAIN)
e111:SetProperty(EFFECT_FLAG_CARD_TARGET) e111:SetProperty(EFFECT_FLAG_CARD_TARGET)
e111:SetCountLimit(1,m) e111:SetCountLimit(1,m)
e111:SetTarget(cm.targets) e111:SetTarget(cm.targets)
e111:SetOperation(cm.operations) e111:SetOperation(cm.operations)
c:RegisterEffect(e111) c:RegisterEffect(e111)
end end
cm.material_type=TYPE_SYNCHRO
function cm.seqfilter(c) function cm.seqfilter(c)
return c:IsFaceup() and c:IsSetCard(0x374) and c:IsType(TYPE_CONTINUOUS) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) return c:IsFaceup() and c:IsSetCard(0x374) and c:IsType(TYPE_CONTINUOUS) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP))
end end
function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(tp) and cm.seqfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_SZONE) and chkc:IsControler(tp) and cm.seqfilter(chkc) end
if chk==0 then return Duel.IsExistingTarget(cm.seqfilter,tp,LOCATION_SZONE,0,1,nil) if chk==0 then return Duel.IsExistingTarget(cm.seqfilter,tp,LOCATION_SZONE,0,1,nil)
and Duel.GetLocationCount(tp,LOCATION_SZONE,tp,LOCATION_REASON_CONTROL)>0 end and Duel.GetLocationCount(tp,LOCATION_SZONE,tp,LOCATION_REASON_CONTROL)>0 end
Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1)) Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,1))
Duel.SelectTarget(tp,cm.seqfilter,tp,LOCATION_SZONE,0,1,1,nil) Duel.SelectTarget(tp,cm.seqfilter,tp,LOCATION_SZONE,0,1,1,nil)
end end
function cm.op(e,tp,eg,ep,ev,re,r,rp) function cm.op(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
local s=Duel.SelectDisableField(tp,1,LOCATION_SZONE,0,0) local s=Duel.SelectDisableField(tp,1,LOCATION_SZONE,0,0)
local nseq=math.log(s,2)-8 local nseq=math.log(s,2)-8
Duel.MoveSequence(tc,nseq) Duel.MoveSequence(tc,nseq)
end end
function cm.filter(c,e,tp) function cm.filter(c,e,tp)
return c:IsFaceup() and c:IsSetCard(0x374) and c:IsAbleToDeck() return c:IsFaceup() and c:IsSetCard(0x374) and c:IsAbleToDeck()
and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode()) and c:IsType(TYPE_TRAP+TYPE_SPELL) and c:IsType(TYPE_CONTINUOUS) and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode()) and c:IsType(TYPE_TRAP+TYPE_SPELL) and c:IsType(TYPE_CONTINUOUS)
end end
function cm.spfilter(c,cc,e,tp,code) function cm.spfilter(c,cc,e,tp,code)
return c:IsSetCard(0x374) and not c:IsCode(code) and c:IsType(TYPE_TRAP+TYPE_SPELL) and c:IsType(TYPE_CONTINUOUS) return c:IsSetCard(0x374) and not c:IsCode(code) and c:IsType(TYPE_TRAP+TYPE_SPELL) and c:IsType(TYPE_CONTINUOUS)
end end
function cm.targets(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.targets(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_SZONE) and cm.filter(chkc,e,tp) end if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_SZONE) and cm.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.IsExistingTarget(cm.filter,tp,LOCATION_SZONE,0,1,nil,e,tp) end and Duel.IsExistingTarget(cm.filter,tp,LOCATION_SZONE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_SZONE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_SZONE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
end end
function cm.operations(e,tp,eg,ep,ev,re,r,rp) function cm.operations(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
local tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SELECT)
local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,tc:GetCode()) local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,tc:GetCode())
if g:GetCount()>0 then if g:GetCount()>0 then
local ss=g:GetFirst() local ss=g:GetFirst()
Duel.MoveToField(ss,tp,tp,LOCATION_SZONE,POS_FACEUP,true) Duel.MoveToField(ss,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
if tc:IsRelateToEffect(e) and tc:IsFaceup() then if tc:IsRelateToEffect(e) and tc:IsFaceup() then
Duel.SendtoDeck(tc,nil,2,REASON_EFFECT) Duel.SendtoDeck(tc,nil,2,REASON_EFFECT)
end end
end end
end end
\ No newline at end of file
...@@ -2,100 +2,101 @@ ...@@ -2,100 +2,101 @@
local m=66915019 local m=66915019
local cm=_G["c"..m] local cm=_G["c"..m]
function cm.initial_effect(c) function cm.initial_effect(c)
cm.dfc_front_side=66915020 cm.dfc_front_side=66915020
c:EnableReviveLimit() c:EnableReviveLimit()
--spsummon condition --spsummon condition
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e1:SetCode(EFFECT_SPSUMMON_CONDITION) e1:SetCode(EFFECT_SPSUMMON_CONDITION)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search --search
local e11=Effect.CreateEffect(c) local e11=Effect.CreateEffect(c)
e11:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW) e11:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
e11:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e11:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e11:SetCode(EVENT_SPSUMMON_SUCCESS) e11:SetCode(EVENT_SPSUMMON_SUCCESS)
e11:SetCondition(cm.condition) e11:SetCondition(cm.condition)
e11:SetTarget(cm.target) e11:SetTarget(cm.target)
e11:SetOperation(cm.operation) e11:SetOperation(cm.operation)
c:RegisterEffect(e11) c:RegisterEffect(e11)
--Activate --Activate
local e111=Effect.CreateEffect(c) local e111=Effect.CreateEffect(c)
e111:SetCategory(CATEGORY_SPECIAL_SUMMON) e111:SetCategory(CATEGORY_SPECIAL_SUMMON)
e111:SetProperty(EFFECT_FLAG_CARD_TARGET) e111:SetProperty(EFFECT_FLAG_CARD_TARGET)
e111:SetType(EFFECT_TYPE_IGNITION) e111:SetType(EFFECT_TYPE_IGNITION)
e111:SetRange(LOCATION_MZONE) e111:SetRange(LOCATION_MZONE)
e111:SetCode(EVENT_FREE_CHAIN) e111:SetCode(EVENT_FREE_CHAIN)
e111:SetCountLimit(1,m) e111:SetCountLimit(1,m)
e111:SetTarget(cm.targets) e111:SetTarget(cm.targets)
e111:SetOperation(cm.activate) e111:SetOperation(cm.activate)
c:RegisterEffect(e111) c:RegisterEffect(e111)
end end
cm.material_type=TYPE_SYNCHRO
function cm.condition(e,tp,eg,ep,ev,re,r,rp) function cm.condition(e,tp,eg,ep,ev,re,r,rp)
return re and re:GetHandler():IsCode(66915018) return re and re:GetHandler():IsCode(66915018)
end end
function cm.tdfilter(c) function cm.tdfilter(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck()
end 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)
if chk==0 then return true end if chk==0 then return true end
local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_SZONE,0,nil) local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_SZONE,0,nil)
Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
end end
function cm.thfilter1(c) function cm.thfilter1(c)
return (c:GetType()==TYPE_SPELL+TYPE_CONTINUOUS and c:IsSetCard(0x374) or c:IsCode(66915001)) and c:IsSSetable() return (c:GetType()==TYPE_SPELL+TYPE_CONTINUOUS and c:IsSetCard(0x374) or c:IsCode(66915001)) and c:IsSSetable()
end end
function cm.operation(e,tp,eg,ep,ev,re,r,rp) function cm.operation(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_SZONE,0,nil) local g=Duel.GetMatchingGroup(cm.tdfilter,tp,LOCATION_SZONE,0,nil)
if g:GetCount()>0 then if g:GetCount()>0 then
local ct=Duel.SendtoDeck(g,nil,2,REASON_EFFECT) local ct=Duel.SendtoDeck(g,nil,2,REASON_EFFECT)
if ct>=1 then if ct>=1 then
Duel.BreakEffect() Duel.BreakEffect()
local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetValue(1500) e1:SetValue(1500)
e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
e:GetHandler():RegisterEffect(e1) e:GetHandler():RegisterEffect(e1)
end end
local hg1=Duel.GetMatchingGroup(cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil) local hg1=Duel.GetMatchingGroup(cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,nil)
if ct>=2 and hg1:GetCount()>0 then if ct>=2 and hg1:GetCount()>0 then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
local ag=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil) local ag=Duel.SelectMatchingCard(tp,cm.thfilter1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
if ag:GetCount()>0 then if ag:GetCount()>0 then
Duel.SSet(tp,ag) Duel.SSet(tp,ag)
end end
end end
if ct>=3 then if ct>=3 then
Duel.BreakEffect() Duel.BreakEffect()
Duel.Draw(tp,2,REASON_EFFECT) Duel.Draw(tp,2,REASON_EFFECT)
end end
if ct==4 then if ct==4 then
local e2=Effect.CreateEffect(e:GetHandler()) local e2=Effect.CreateEffect(e:GetHandler())
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetCode(EFFECT_CANNOT_ACTIVATE) e2:SetCode(EFFECT_CANNOT_ACTIVATE)
e2:SetReset(RESET_PHASE+PHASE_END) e2:SetReset(RESET_PHASE+PHASE_END)
e2:SetTargetRange(0,LOCATION_HAND) e2:SetTargetRange(0,LOCATION_HAND)
Duel.RegisterEffect(e2,tp) Duel.RegisterEffect(e2,tp)
end end
end end
end end
function cm.filter(c,e,tp) function cm.filter(c,e,tp)
return c:IsCanBeSpecialSummoned(e,0,tp,true,true) and c:IsSetCard(0x1374) return c:IsCanBeSpecialSummoned(e,0,tp,true,true) and c:IsSetCard(0x1374)
end end
function cm.targets(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function cm.targets(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and cm.filter(chkc,e,tp) end if chkc then return chkc:IsLocation(LOCATION_GRAVE) and cm.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end and Duel.IsExistingTarget(cm.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) local g=Duel.SelectTarget(tp,cm.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
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 tc=Duel.GetFirstTarget() local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP) Duel.SpecialSummon(tc,0,tp,tp,true,true,POS_FACEUP)
end end
end end
\ No newline at end of file
...@@ -45,6 +45,12 @@ function cm.initial_effect(c) ...@@ -45,6 +45,12 @@ function cm.initial_effect(c)
e3:SetTarget(cm.sptg) e3:SetTarget(cm.sptg)
e3:SetOperation(cm.spop) e3:SetOperation(cm.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double tuner
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(21142671)
c:RegisterEffect(e9)
end end
cm.material_type=TYPE_SYNCHRO cm.material_type=TYPE_SYNCHRO
function cm.sfilter(c) function cm.sfilter(c)
......
...@@ -69,6 +69,7 @@ function c72411200.initial_effect(c) ...@@ -69,6 +69,7 @@ function c72411200.initial_effect(c)
e6:SetTarget(c72411200.reptg) e6:SetTarget(c72411200.reptg)
c:RegisterEffect(e6) c:RegisterEffect(e6)
end end
c72411200.material_type=TYPE_SYNCHRO
function c72411200.mfilter1(c) function c72411200.mfilter1(c)
return c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER) return c:IsRace(RACE_SPELLCASTER) and c:IsType(TYPE_SYNCHRO) and c:IsType(TYPE_TUNER)
end end
......
...@@ -27,3 +27,4 @@ function c75646123.initial_effect(c) ...@@ -27,3 +27,4 @@ function c75646123.initial_effect(c)
e4:SetValue(1) e4:SetValue(1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
c75646123.material_type=TYPE_SYNCHRO
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
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