Skip to content

Y
ygopro
Commit 7d9dc09b authored by Fluorohydride's avatar Fluorohydride
Browse files
Options

Merge pull request #1044 from DailyShana/patch-1 

Applying custom activity counter
parents 285caef9 ac92c73e
Hide whitespace changes
Inline Side-by-side
Showing with 108 additions and 545 deletions
script/c14507213.lua
View file @ 7d9dc09b
......@@ -5,20 +5,16 @@ function c14507213.initial_effect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c14507213.condition)
e1:SetCost(c14507213.cost)
e1:SetTarget(c14507213.target)
e1:SetOperation(c14507213.activate)
c:RegisterEffect(e1)
end
function c14507213.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp or Duel.GetCurrentPhase()<PHASE_BATTLE
end
function c14507213.filter(c)
return c:IsFaceup() and c:IsCanBeSynchroMaterial()
end
function c14507213.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return true end
if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_BATTLE_PHASE)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_BP)
......
script/c17418744.lua
View file @ 7d9dc09b
......@@ -9,40 +9,17 @@ function c17418744.initial_effect(c)
e1:SetTarget(c17418744.target)
e1:SetOperation(c17418744.activate)
c:RegisterEffect(e1)
if not c17418744.global_check then
c17418744.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SUMMON_SUCCESS)
ge1:SetOperation(c17418744.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
ge2:SetOperation(c17418744.checkop)
Duel.RegisterEffect(ge2,0)
local ge3=Effect.CreateEffect(c)
ge3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge3:SetCode(EVENT_SPSUMMON_SUCCESS)
ge3:SetOperation(c17418744.checkop)
Duel.RegisterEffect(ge3,0)
end
Duel.AddCustomActivityCounter(17418744,ACTIVITY_SUMMON,c17418744.counterfilter)
Duel.AddCustomActivityCounter(17418744,ACTIVITY_SPSUMMON,c17418744.counterfilter)
Duel.AddCustomActivityCounter(17418744,ACTIVITY_FLIPSUMMON,c17418744.counterfilter)
end
function c17418744.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if tc:IsAttribute(0x6f) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,17418744,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,17418744,RESET_PHASE+PHASE_END,0,1) end
function c17418744.counterfilter(c)
return c:IsAttribute(ATTRIBUTE_LIGHT)
end
function c17418744.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,17418744)==0 end
if chk==0 then return Duel.GetCustomActivityCount(17418744,tp,ACTIVITY_SUMMON)==0
and Duel.GetCustomActivityCount(17418744,tp,ACTIVITY_SPSUMMON)==0
and Duel.GetCustomActivityCount(17418744,tp,ACTIVITY_FLIPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c21715135.lua
View file @ 7d9dc09b
......@@ -11,33 +11,16 @@ function c21715135.initial_effect(c)
e1:SetTarget(c21715135.target)
e1:SetOperation(c21715135.activate)
c:RegisterEffect(e1)
if not c21715135.global_check then
c21715135.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c21715135.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(21715135,ACTIVITY_SPSUMMON,c21715135.counterfilter)
end
function c21715135.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if tc:GetSummonType()~=SUMMON_TYPE_XYZ then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,21715135,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,21715135,RESET_PHASE+PHASE_END,0,1) end
function c21715135.counterfilter(c)
return c:GetSummonType()==SUMMON_TYPE_XYZ
end
function c21715135.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
end
function c21715135.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,21715135)==0 end
if chk==0 then return Duel.GetCustomActivityCount(21715135,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c33236860.lua
View file @ 7d9dc09b
......@@ -29,11 +29,7 @@ function c33236860.descon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():GetSummonType()==SUMMON_TYPE_SYNCHRO
end
function c33236860.descost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local ph=Duel.GetCurrentPhase()
if Duel.GetTurnPlayer()==tp then return ph~=PHASE_BATTLE and ph~=PHASE_MAIN2 end
return true
end
if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_BATTLE_PHASE)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_BP)
......
script/c3395226.lua
View file @ 7d9dc09b
......@@ -11,30 +11,13 @@ function c3395226.initial_effect(c)
e1:SetTarget(c3395226.sptg)
e1:SetOperation(c3395226.spop)
c:RegisterEffect(e1)
if not c3395226.global_check then
c3395226.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c3395226.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(3395226,ACTIVITY_SPSUMMON,c3395226.counterfilter)
end
function c3395226.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if not tc:IsAttribute(ATTRIBUTE_LIGHT) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,3395226,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,3395226,RESET_PHASE+PHASE_END,0,1) end
function c3395226.counterfilter(c)
return c:IsAttribute(ATTRIBUTE_LIGHT)
end
function c3395226.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,3395226)==0 end
if chk==0 then return Duel.GetCustomActivityCount(3395226,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c3580032.lua
View file @ 7d9dc09b
......@@ -36,30 +36,14 @@ function c3580032.initial_effect(c)
e3:SetTarget(c3580032.xyztg)
e3:SetOperation(c3580032.xyzop)
c:RegisterEffect(e3)
if not c3580032.global_check then
c3580032.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c3580032.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(3580032,ACTIVITY_SPSUMMON,c3580032.counterfilter)
end
function c3580032.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if not tc:IsSetCard(0x107a) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,3580032,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,3580032,RESET_PHASE+PHASE_END,0,1) end
function c3580032.counterfilter(c)
return c:IsSetCard(0x107a)
end
function c3580032.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsReleasable() and Duel.GetFlagEffect(tp,3580032)==0 end
if chk==0 then return e:GetHandler():IsReleasable()
and Duel.GetCustomActivityCount(3580032,tp,ACTIVITY_SPSUMMON)==0 end
Duel.Release(e:GetHandler(),REASON_COST)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
......
script/c43140791.lua
View file @ 7d9dc09b
......@@ -10,33 +10,11 @@ function c43140791.initial_effect(c)
e1:SetTarget(c43140791.target)
e1:SetOperation(c43140791.activate)
c:RegisterEffect(e1)
if not c43140791.global_check then
c43140791.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SUMMON_SUCCESS)
ge1:SetOperation(c43140791.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_SPSUMMON_SUCCESS)
ge2:SetOperation(c43140791.checkop)
Duel.RegisterEffect(ge2,0)
end
Duel.AddCustomActivityCounter(43140791,ACTIVITY_SUMMON,c43140791.counterfilter)
Duel.AddCustomActivityCounter(43140791,ACTIVITY_SPSUMMON,c43140791.counterfilter)
end
function c43140791.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
local lv=tc:GetLevel()
if lv==3 or lv==4 then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,43140791,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,43140791,RESET_PHASE+PHASE_END,0,1) end
function c43140791.counterfilter(c)
return c:GetLevel()~=3 and c:GetLevel()~=4
end
function c43140791.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_INSECT)
......@@ -45,7 +23,8 @@ function c43140791.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c43140791.cfilter,tp,LOCATION_MZONE,0,1,nil)
end
function c43140791.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,43140791)==0 end
if chk==0 then return Duel.GetCustomActivityCount(43140791,tp,ACTIVITY_SUMMON)==0
and Duel.GetCustomActivityCount(43140791,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c44256816.lua
View file @ 7d9dc09b
......@@ -11,33 +11,16 @@ function c44256816.initial_effect(c)
e1:SetTarget(c44256816.target)
e1:SetOperation(c44256816.activate)
c:RegisterEffect(e1)
if not c44256816.global_check then
c44256816.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c44256816.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(44256816,ACTIVITY_SPSUMMON,c44256816.counterfilter)
end
function c44256816.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if not tc:IsSetCard(0x9b) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,44256816,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,44256816,RESET_PHASE+PHASE_END,0,1) end
function c44256816.counterfilter(c)
return c:IsSetCard(0x9b)
end
function c44256816.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0
end
function c44256816.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,44256816)==0 end
if chk==0 then return Duel.GetCustomActivityCount(44256816,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c52601736.lua
View file @ 7d9dc09b
--׳װC ۥåѩ`
--甲虫装機 ホッパー
function c52601736.initial_effect(c)
--equip
local e1=Effect.CreateEffect(c)
......
script/c53573406.lua
View file @ 7d9dc09b
......@@ -18,24 +18,10 @@ function c53573406.initial_effect(c)
e2:SetTarget(c53573406.sptg)
e2:SetOperation(c53573406.spop)
c:RegisterEffect(e2)
if not c53573406.global_check then
c53573406.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c53573406.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(53573406,ACTIVITY_SPSUMMON,c53573406.counterfilter)
end
function c53573406.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
local sump=tc:GetSummonPlayer()
if not tc:IsPreviousLocation(LOCATION_EXTRA) and Duel.GetFlagEffect(sump,53573406)==0 then
Duel.RegisterFlagEffect(sump,53573406,RESET_PHASE+PHASE_END,0,1)
end
tc=eg:GetNext()
end
function c53573406.counterfilter(c)
return c:GetSummonLocation()==LOCATION_EXTRA
end
function c53573406.cfilter(c)
return c:IsFaceup() and c:IsLevelAbove(5)
......@@ -44,12 +30,12 @@ function c53573406.sumcon(e)
return Duel.IsExistingMatchingCard(c53573406.cfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
end
function c53573406.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,53573406)==0 end
if chk==0 then return Duel.GetCustomActivityCount(53573406,tp,ACTIVITY_SPSUMMON)==0 end
local fid=e:GetHandler():GetFieldID()
e:SetLabel(fid)
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetReset(RESET_PHASE+PHASE_END)
e1:SetTargetRange(1,0)
......
script/c59048135.lua
View file @ 7d9dc09b
......@@ -24,32 +24,11 @@ function c59048135.initial_effect(c)
e3:SetTarget(c59048135.etarget)
e3:SetValue(c59048135.evalue)
c:RegisterEffect(e3)
if not c59048135.global_check then
c59048135.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c59048135.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_SUMMON_SUCCESS)
ge2:SetOperation(c59048135.checkop)
Duel.RegisterEffect(ge2,0)
end
Duel.AddCustomActivityCounter(59048135,ACTIVITY_SUMMON,c59048135.counterfilter)
Duel.AddCustomActivityCounter(59048135,ACTIVITY_SPSUMMON,c59048135.counterfilter)
end
function c59048135.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if not (tc:IsRace(RACE_PSYCHO) and tc:IsType(TYPE_XYZ)) and not tc:IsSetCard(0x76) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,59048135,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,59048135,RESET_PHASE+PHASE_END,0,1) end
function c59048135.counterfilter(c)
return c:IsRace(RACE_PSYCHO) and c:IsType(TYPE_XYZ) or c:IsSetCard(0x76)
end
function c59048135.etarget(e,c)
return c:IsRace(RACE_PSYCHO) and c:IsType(TYPE_XYZ)
......@@ -61,7 +40,8 @@ function c59048135.cfilter(c)
return c:IsSetCard(0x76) and c:IsType(TYPE_MONSTER) and c:IsDiscardable()
end
function c59048135.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,59048135)==0
if chk==0 then return Duel.GetCustomActivityCount(59048135,tp,ACTIVITY_SUMMON)==0
and Duel.GetCustomActivityCount(59048135,tp,ACTIVITY_SPSUMMON)==0
and Duel.IsExistingMatchingCard(c59048135.cfilter,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,c59048135.cfilter,1,1,REASON_COST+REASON_DISCARD,nil)
local e1=Effect.CreateEffect(e:GetHandler())
......
script/c59281922.lua
View file @ 7d9dc09b
......@@ -26,30 +26,13 @@ function c59281922.initial_effect(c)
e3:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
e3:SetValue(70095154)
c:RegisterEffect(e3)
if not c59281922.global_check then
c59281922.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c59281922.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(59281922,ACTIVITY_SPSUMMON,c59281922.counterfilter)
end
function c59281922.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if not tc:IsRace(RACE_MACHINE) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,59281922,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,59281922,RESET_PHASE+PHASE_END,0,1) end
function c59281922.counterfilter(c)
return c:IsRace(RACE_MACHINE)
end
function c59281922.lvcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,59281922)==0 end
if chk==0 then return Duel.GetCustomActivityCount(59281922,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c59951714.lua
View file @ 7d9dc09b
......@@ -23,27 +23,10 @@ function c59951714.initial_effect(c)
e3:SetTarget(c59951714.sptg)
e3:SetOperation(c59951714.spop)
c:RegisterEffect(e3)
if not c59951714.global_check then
c59951714.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c59951714.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(59951714,ACTIVITY_SPSUMMON,c59951714.counterfilter)
end
function c59951714.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if tc:IsPreviousLocation(LOCATION_EXTRA) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,59951714,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,59951714,RESET_PHASE+PHASE_END,0,1) end
function c59951714.counterfilter(c)
return not c:GetSummonLocation()==LOCATION_EXTRA
end
function c59951714.spr(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......@@ -56,7 +39,7 @@ function c59951714.spcon(e,tp,eg,ep,ev,re,r,rp)
return c:GetTurnID()~=Duel.GetTurnCount() and tp==Duel.GetTurnPlayer() and c:GetFlagEffect(59951714)>0
end
function c59951714.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,59951714)==0 end
if chk==0 then return Duel.GetCustomActivityCount(59951714,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
......
script/c63193879.lua
View file @ 7d9dc09b
......@@ -18,30 +18,13 @@ function c63193879.initial_effect(c)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetValue(1)
c:RegisterEffect(e2)
if not c63193879.global_check then
c63193879.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c63193879.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(63193879,ACTIVITY_SPSUMMON,c63193879.counterfilter)
end
function c63193879.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if not tc:IsAttribute(ATTRIBUTE_WATER) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,63193879,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,63193879,RESET_PHASE+PHASE_END,0,1) end
function c63193879.counterfilter(c)
return c:IsAttribute(ATTRIBUTE_WATER)
end
function c63193879.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,63193879)==0 end
if chk==0 then return Duel.GetCustomActivityCount(63193879,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c64319467.lua
View file @ 7d9dc09b
......@@ -11,30 +11,13 @@ function c64319467.initial_effect(c)
e1:SetTarget(c64319467.sptg)
e1:SetOperation(c64319467.spop)
c:RegisterEffect(e1)
if not c64319467.global_check then
c64319467.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c64319467.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(64319467,ACTIVITY_SPSUMMON,c64319467.counterfilter)
end
function c64319467.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if not tc:IsAttribute(ATTRIBUTE_WATER) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,64319467,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,64319467,RESET_PHASE+PHASE_END,0,1) end
function c64319467.counterfilter(c)
return c:IsAttribute(ATTRIBUTE_WATER)
end
function c64319467.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,64319467)==0 end
if chk==0 then return Duel.GetCustomActivityCount(64319467,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c65196094.lua
View file @ 7d9dc09b
......@@ -10,35 +10,14 @@ function c65196094.initial_effect(c)
e1:SetTarget(c65196094.target)
e1:SetOperation(c65196094.activate)
c:RegisterEffect(e1)
if not c65196094.global_check then
c65196094.global_check=true
c65196094[0]=true
c65196094[1]=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON)
ge1:SetOperation(c65196094.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c65196094.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c65196094.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
if tc:IsType(TYPE_SYNCHRO) then
c65196094[tc:GetControler()]=false
end
Duel.AddCustomActivityCounter(65196094,ACTIVITY_SPSUMMON,c65196094.counterfilter)
end
function c65196094.clear(e,tp,eg,ep,ev,re,r,rp)
c65196094[0]=true
c65196094[1]=true
function c65196094.counterfilter(c)
return not c:GetSummonType()==SUMMON_TYPE_SYNCHRO
end
function c65196094.cost(e,tp,eg,ep,ev,re,r,rp,chk)
e:SetLabel(1)
if chk==0 then return c65196094[tp] end
if chk==0 then return Duel.GetCustomActivityCount(65196094,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetRange(LOCATION_MZONE)
......
script/c65591858.lua
View file @ 7d9dc09b
......@@ -11,30 +11,13 @@ function c65591858.initial_effect(c)
e1:SetTarget(c65591858.sptg)
e1:SetOperation(c65591858.spop)
c:RegisterEffect(e1)
if not c65591858.global_check then
c65591858.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c65591858.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(65591858,ACTIVITY_SPSUMMON,c65591858.counterfilter)
end
function c65591858.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if not tc:IsSetCard(0x70) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,65591858,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,65591858,RESET_PHASE+PHASE_END,0,1) end
function c65591858.counterfilter(c)
return c:IsSetCard(0x70)
end
function c65591858.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,65591858)==0 end
if chk==0 then return Duel.GetCustomActivityCount(65591858,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c68144350.lua
View file @ 7d9dc09b
......@@ -11,35 +11,13 @@ function c68144350.initial_effect(c)
e1:SetTarget(c68144350.sptg)
e1:SetOperation(c68144350.spop)
c:RegisterEffect(e1)
if not c68144350.global_check then
c68144350.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c68144350.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c68144350.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c68144350.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if not tc:IsSetCard(0x84) then
c68144350[tc:GetSummonPlayer()]=false
end
tc=eg:GetNext()
end
Duel.AddCustomActivityCounter(68144350,ACTIVITY_SPSUMMON,c68144350.counterfilter)
end
function c68144350.clear(e,tp,eg,ep,ev,re,r,rp)
c68144350[0]=true
c68144350[1]=true
function c68144350.counterfilter(c)
return c:IsSetCard(0x84)
end
function c68144350.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return c68144350[tp] end
if chk==0 then return Duel.GetCustomActivityCount(68144350,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c71422989.lua
View file @ 7d9dc09b
......@@ -10,30 +10,13 @@ function c71422989.initial_effect(c)
e1:SetTarget(c71422989.target)
e1:SetOperation(c71422989.activate)
c:RegisterEffect(e1)
if not c71422989.global_check then
c71422989.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c71422989.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(71422989,ACTIVITY_SPSUMMON,c71422989.counterfilter)
end
function c71422989.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if not tc:IsSetCard(0x1047) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,71422989,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,71422989,RESET_PHASE+PHASE_END,0,1) end
function c71422989.counterfilter(c)
return c:IsSetCard(0x1047)
end
function c71422989.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,71422989)==0 end
if chk==0 then return Duel.GetCustomActivityCount(71422989,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c79844764.lua
View file @ 7d9dc09b
......@@ -8,30 +8,13 @@ function c79844764.initial_effect(c)
e1:SetCost(c79844764.cost)
e1:SetOperation(c79844764.activate)
c:RegisterEffect(e1)
if not c79844764.global_check then
c79844764.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c79844764.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(79844764,ACTIVITY_SPSUMMON,c79844764.counterfilter)
end
function c79844764.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
local p1=false
local p2=false
while tc do
if tc:IsPreviousLocation(LOCATION_EXTRA) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,79844764,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,79844764,RESET_PHASE+PHASE_END,0,1) end
function c79844764.counterfilter(c)
return not c:GetSummonLocation()==LOCATION_EXTRA
end
function c79844764.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,79844764)==0 end
if chk==0 then return Duel.GetCustomActivityCount(79844764,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c86308219.lua
View file @ 7d9dc09b
......@@ -11,27 +11,10 @@ function c86308219.initial_effect(c)
e1:SetTarget(c86308219.target)
e1:SetOperation(c86308219.activate)
c:RegisterEffect(e1)
if not c86308219.global_check then
c86308219.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c86308219.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(86308219,ACTIVITY_SPSUMMON,c86308219.counterfilter)
end
function c86308219.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if tc:IsPreviousLocation(LOCATION_DECK+LOCATION_EXTRA) then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,86308219,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,86308219,RESET_PHASE+PHASE_END,0,1) end
function c86308219.counterfilter(c)
return bit.band(c:GetSummonLocation(),LOCATION_DECK+LOCATION_EXTRA)==0
end
function c86308219.cfilter(c)
return c:IsFaceup() and (c:IsCode(76812113) or c:IsCode(12206212))
......@@ -40,7 +23,8 @@ function c86308219.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c86308219.cfilter,tp,LOCATION_MZONE,0,3,nil)
end
function c86308219.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,86308219)==0 and Duel.GetCurrentPhase()==PHASE_MAIN1 end
if chk==0 then return Duel.GetCustomActivityCount(86308219,tp,ACTIVITY_SPSUMMON)==0
and Duel.GetCurrentPhase()==PHASE_MAIN1 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c90951921.lua
View file @ 7d9dc09b
......@@ -11,37 +11,13 @@ function c90951921.initial_effect(c)
e1:SetTarget(c90951921.target)
e1:SetOperation(c90951921.activate)
c:RegisterEffect(e1)
if not c90951921.global_check then
c90951921.global_check=true
c90951921[0]=true
c90951921[1]=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c90951921.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c90951921.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c90951921.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if not tc:IsSetCard(0x70) then
c90951921[tc:GetSummonPlayer()]=false
end
tc=eg:GetNext()
end
Duel.AddCustomActivityCounter(90951921,ACTIVITY_SPSUMMON,c90951921.counterfilter)
end
function c90951921.clear(e,tp,eg,ep,ev,re,r,rp)
c90951921[0]=true
c90951921[1]=true
function c90951921.counterfilter(c)
return c:IsSetCard(0x70)
end
function c90951921.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return c90951921[tp] end
if chk==0 then return Duel.GetCustomActivityCount(90951921,tp,ACTIVITY_SPSUMMON)==0 end
--oath effects
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
......
script/c92729410.lua
View file @ 7d9dc09b
--ݤݤ
--子狸ぽんぽこ
function c92729410.initial_effect(c)
--spsummon
local e2=Effect.CreateEffect(c)
......@@ -10,35 +10,13 @@ function c92729410.initial_effect(c)
e2:SetTarget(c92729410.sptg)
e2:SetOperation(c92729410.spop)
c:RegisterEffect(e2)
if not c92729410.global_check then
c92729410.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c92729410.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c92729410.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c92729410.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if not tc:IsRace(RACE_BEAST) then
c92729410[tc:GetSummonPlayer()]=false
end
tc=eg:GetNext()
end
Duel.AddCustomActivityCounter(92729410,ACTIVITY_SPSUMMON,c92729410.counterfilter)
end
function c92729410.clear(e,tp,eg,ep,ev,re,r,rp)
c92729410[0]=true
c92729410[1]=true
function c92729410.counterfilter(c)
return c:IsRace(RACE_BEAST)
end
function c92729410.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return c92729410[tp] end
if chk==0 then return Duel.GetCustomActivityCount(92729410,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c93543806.lua
View file @ 7d9dc09b
--ʷzb?Υꥹ
--先史遺産ソル·モノリス
function c93543806.initial_effect(c)
--spsummon
local e1=Effect.CreateEffect(c)
......@@ -11,35 +11,13 @@ function c93543806.initial_effect(c)
e1:SetTarget(c93543806.lvtg)
e1:SetOperation(c93543806.lvop)
c:RegisterEffect(e1)
if not c93543806.global_check then
c93543806.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c93543806.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c93543806.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c93543806.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
while tc do
if not tc:IsSetCard(0x70) then
c93543806[tc:GetSummonPlayer()]=false
end
tc=eg:GetNext()
end
Duel.AddCustomActivityCounter(93543806,ACTIVITY_SPSUMMON,c93543806.counterfilter)
end
function c93543806.clear(e,tp,eg,ep,ev,re,r,rp)
c93543806[0]=true
c93543806[1]=true
function c93543806.counterfilter(c)
return c:IsSetCard(0x70)
end
function c93543806.lvcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return c93543806[tp] end
if chk==0 then return Duel.GetCustomActivityCount(93543806,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c96598015.lua
View file @ 7d9dc09b
......@@ -10,30 +10,13 @@ function c96598015.initial_effect(c)
e1:SetTarget(c96598015.target)
e1:SetOperation(c96598015.activate)
c:RegisterEffect(e1)
if not c96598015.global_check then
c96598015.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c96598015.checkop)
Duel.RegisterEffect(ge1,0)
end
Duel.AddCustomActivityCounter(96598015,ACTIVITY_SPSUMMON,c96598015.counterfilter)
end
function c96598015.checkop(e,tp,eg,ep,ev,re,r,rp)
local p1=nil
local p2=nil
local tc=eg:GetFirst()
while tc do
if bit.band(tc:GetSummonType(),SUMMON_TYPE_PENDULUM)~=SUMMON_TYPE_PENDULUM then
if tc:GetSummonPlayer()==0 then p1=true else p2=true end
end
tc=eg:GetNext()
end
if p1 then Duel.RegisterFlagEffect(0,96598015,RESET_PHASE+PHASE_END,0,1) end
if p2 then Duel.RegisterFlagEffect(1,96598015,RESET_PHASE+PHASE_END,0,1) end
function c96598015.counterfilter(c)
return bit.band(c:GetSummonType(),SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end
function c96598015.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,96598015)==0 end
if chk==0 then return Duel.GetCustomActivityCount(96598015,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
script/c97433739.lua
View file @ 7d9dc09b
......@@ -10,34 +10,13 @@ function c97433739.initial_effect(c)
e1:SetTarget(c97433739.target)
e1:SetOperation(c97433739.operation)
c:RegisterEffect(e1)
if not c97433739.global_check then
c97433739.global_check=true
c97433739[0]=true
c97433739[1]=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
ge1:SetOperation(c97433739.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=Effect.CreateEffect(c)
ge2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge2:SetCode(EVENT_PHASE_START+PHASE_DRAW)
ge2:SetOperation(c97433739.clear)
Duel.RegisterEffect(ge2,0)
end
end
function c97433739.checkop(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst()
if tc:GetSummonType()~=SUMMON_TYPE_XYZ then
c97433739[tc:GetControler()]=false
end
Duel.AddCustomActivityCounter(97433739,ACTIVITY_SPSUMMON,c97433739.counterfilter)
end
function c97433739.clear(e,tp,eg,ep,ev,re,r,rp)
c97433739[0]=true
c97433739[1]=true
function c97433739.counterfilter(c)
return c:GetSummonType()==SUMMON_TYPE_XYZ
end
function c97433739.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return c97433739[tp] end
if chk==0 then return Duel.GetCustomActivityCount(97433739,tp,ACTIVITY_SPSUMMON)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......
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