Skip to content

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

lua update

parent 813e12de
Show whitespace changes
Inline Side-by-side
Showing with 75 additions and 344 deletions
expansions/script/c81000000.lua
View file @ 60c11e56
...@@ -28,3 +28,38 @@ function Tenka.ReikaCon(e,tp,eg,ep,ev,re,r,rp) ...@@ -28,3 +28,38 @@ function Tenka.ReikaCon(e,tp,eg,ep,ev,re,r,rp)
end end
return true return true
end end
--koikake atk
function Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(Tenka.atkcon)
e0:SetValue(Tenka.btkval)
c:RegisterEffect(e0)
end
function Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(Tenka.atkcon)
e0:SetValue(Tenka.atkval)
c:RegisterEffect(e0)
end
function Tenka.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function Tenka.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function Tenka.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(Tenka.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function Tenka.btkval(e,c)
return c:GetLevel()*300
end
expansions/script/c81041001.lua
View file @ 60c11e56
--最初回忆·姬野星奏 --最初回忆·姬野星奏
require("expansions/script/c81000000")
function c81041001.initial_effect(c) function c81041001.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041001.atkcon)
e0:SetValue(c81041001.atkval)
c:RegisterEffect(e0)
--level up --level up
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -40,13 +33,6 @@ function c81041001.initial_effect(c) ...@@ -40,13 +33,6 @@ function c81041001.initial_effect(c)
e5:SetOperation(c81041001.negop) e5:SetOperation(c81041001.negop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c81041001.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041001.atkval(e,c)
return c:GetLevel()*300
end
function c81041001.lvfilter(c) function c81041001.lvfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0 return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end end
......
expansions/script/c81041002.lua
View file @ 60c11e56
--最初回忆·新堂彩音 --最初回忆·新堂彩音
require("expansions/script/c81000000")
function c81041002.initial_effect(c) function c81041002.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041002.atkcon)
e0:SetValue(c81041002.atkval)
c:RegisterEffect(e0)
--level --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -38,13 +31,6 @@ function c81041002.initial_effect(c) ...@@ -38,13 +31,6 @@ function c81041002.initial_effect(c)
e3:SetOperation(c81041002.koperation) e3:SetOperation(c81041002.koperation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041002.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041002.atkval(e,c)
return c:GetLevel()*300
end
function c81041002.cfilter(c) function c81041002.cfilter(c)
return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM)
end end
......
expansions/script/c81041003.lua
View file @ 60c11e56
--最初回忆·小鞠由依 --最初回忆·小鞠由依
require("expansions/script/c81000000")
function c81041003.initial_effect(c) function c81041003.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041003.atkcon)
e0:SetValue(c81041003.atkval)
c:RegisterEffect(e0)
--level up --level up
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetType(EFFECT_TYPE_QUICK_O)
...@@ -48,13 +41,6 @@ function c81041003.initial_effect(c) ...@@ -48,13 +41,6 @@ function c81041003.initial_effect(c)
e5:SetOperation(c81041003.rdop) e5:SetOperation(c81041003.rdop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c81041003.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041003.atkval(e,c)
return c:GetLevel()*300
end
function c81041003.lvcon(e,tp,eg,ep,ev,re,r,rp) function c81041003.lvcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp and (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE) return Duel.GetTurnPlayer()==tp and (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE)
end end
......
expansions/script/c81041004.lua
View file @ 60c11e56
--最初回忆·四条凛香 --最初回忆·四条凛香
require("expansions/script/c81000000")
function c81041004.initial_effect(c) function c81041004.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041004.atkcon)
e0:SetValue(c81041004.atkval)
c:RegisterEffect(e0)
--level --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -46,13 +39,6 @@ function c81041004.initial_effect(c) ...@@ -46,13 +39,6 @@ function c81041004.initial_effect(c)
e4:SetOperation(c81041004.pspop) e4:SetOperation(c81041004.pspop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c81041004.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041004.atkval(e,c)
return c:GetLevel()*300
end
function c81041004.filter(c) function c81041004.filter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0 return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end end
......
expansions/script/c81041006.lua
View file @ 60c11e56
--最初回忆·国见洸太郎 --最初回忆·国见洸太郎
require("expansions/script/c81000000")
function c81041006.initial_effect(c) function c81041006.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,c81041006.mfilter,2) aux.AddLinkProcedure(c,c81041006.mfilter,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041006.atkcon)
e0:SetValue(c81041006.atkval)
c:RegisterEffect(e0)
--disable special summon --disable special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY) e1:SetCategory(CATEGORY_DISABLE_SUMMON+CATEGORY_DESTROY)
...@@ -39,17 +32,6 @@ end ...@@ -39,17 +32,6 @@ end
function c81041006.mfilter(c) function c81041006.mfilter(c)
return c:IsAttack(1550) and c:IsDefense(1050) return c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041006.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041006.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041006.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041006.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041006.discon(e,tp,eg,ep,ev,re,r,rp) function c81041006.discon(e,tp,eg,ep,ev,re,r,rp)
return tp~=ep and Duel.GetCurrentChain()==0 return tp~=ep and Duel.GetCurrentChain()==0
end end
......
expansions/script/c81041008.lua
View file @ 60c11e56
--樱花邂逅·姬野星奏 --樱花邂逅·姬野星奏
require("expansions/script/c81000000")
function c81041008.initial_effect(c) function c81041008.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041008.atkcon)
e0:SetValue(c81041008.atkval)
c:RegisterEffect(e0)
--draw --draw
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
...@@ -39,13 +32,6 @@ function c81041008.initial_effect(c) ...@@ -39,13 +32,6 @@ function c81041008.initial_effect(c)
e3:SetOperation(c81041008.dlvop) e3:SetOperation(c81041008.dlvop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041008.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041008.atkval(e,c)
return c:GetLevel()*300
end
function c81041008.filter(c) function c81041008.filter(c)
return c:IsFaceup() and c:GetLevel()>0 return c:IsFaceup() and c:GetLevel()>0
end end
......
expansions/script/c81041009.lua
View file @ 60c11e56
--路上的日常·国见洸太郎 --路上的日常·国见洸太郎
require("expansions/script/c81000000")
function c81041009.initial_effect(c) function c81041009.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,99,c81041009.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,99,c81041009.lcheck)
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041009.atkcon)
e0:SetValue(c81041009.atkval)
c:RegisterEffect(e0)
--tohand --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TODECK) e1:SetCategory(CATEGORY_TODECK)
...@@ -41,17 +34,6 @@ end ...@@ -41,17 +34,6 @@ end
function c81041009.mzfilter(c) function c81041009.mzfilter(c)
return c:IsLinkType(TYPE_RITUAL) and c:IsLinkType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050) return c:IsLinkType(TYPE_RITUAL) and c:IsLinkType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041009.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041009.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041009.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041009.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041009.costfilter(c) function c81041009.costfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>c:GetOriginalLevel() return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>c:GetOriginalLevel()
end end
......
expansions/script/c81041010.lua
View file @ 60c11e56
--百变少女·桜田志乃 --百变少女·桜田志乃
require("expansions/script/c81000000")
function c81041010.initial_effect(c) function c81041010.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041010.atkcon)
e0:SetValue(c81041010.atkval)
c:RegisterEffect(e0)
--level --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -54,13 +47,6 @@ function c81041010.initial_effect(c) ...@@ -54,13 +47,6 @@ function c81041010.initial_effect(c)
e5:SetOperation(c81041010.spop) e5:SetOperation(c81041010.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
end end
function c81041010.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041010.atkval(e,c)
return c:GetLevel()*300
end
function c81041010.lvfilter(c) function c81041010.lvfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()~=c:GetOriginalLevel() return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()~=c:GetOriginalLevel()
end end
......
expansions/script/c81041011.lua
View file @ 60c11e56
--海边回忆·姬野星奏 --海边回忆·姬野星奏
require("expansions/script/c81000000")
function c81041011.initial_effect(c) function c81041011.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041011.btkcon)
e0:SetValue(c81041011.btkval)
c:RegisterEffect(e0)
--Increase ATK --Increase ATK
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY) e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DESTROY)
...@@ -43,13 +36,6 @@ function c81041011.initial_effect(c) ...@@ -43,13 +36,6 @@ function c81041011.initial_effect(c)
e3:SetOperation(c81041011.negop) e3:SetOperation(c81041011.negop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041011.btkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041011.btkval(e,c)
return c:GetLevel()*300
end
function c81041011.atkcon(e,tp,eg,ep,ev,re,r,rp) function c81041011.atkcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
if not a:IsControler(tp) then if not a:IsControler(tp) then
......
expansions/script/c81041012.lua
View file @ 60c11e56
--温柔之心·新堂彩音 --温柔之心·新堂彩音
require("expansions/script/c81000000")
function c81041012.initial_effect(c) function c81041012.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041012.btkcon)
e0:SetValue(c81041012.btkval)
c:RegisterEffect(e0)
--counter --counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
...@@ -41,13 +34,6 @@ function c81041012.initial_effect(c) ...@@ -41,13 +34,6 @@ function c81041012.initial_effect(c)
e3:SetOperation(c81041012.thop) e3:SetOperation(c81041012.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041012.btkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041012.btkval(e,c)
return c:GetLevel()*300
end
function c81041012.atkcon(e,tp,eg,ep,ev,re,r,rp) function c81041012.atkcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
local d=Duel.GetAttackTarget() local d=Duel.GetAttackTarget()
......
expansions/script/c81041013.lua
View file @ 60c11e56
--花园少女·小鞠由依 --花园少女·小鞠由依
require("expansions/script/c81000000")
function c81041013.initial_effect(c) function c81041013.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041013.atkcon)
e0:SetValue(c81041013.atkval)
c:RegisterEffect(e0)
--level --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -42,13 +35,6 @@ function c81041013.initial_effect(c) ...@@ -42,13 +35,6 @@ function c81041013.initial_effect(c)
e3:SetOperation(c81041013.drop) e3:SetOperation(c81041013.drop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041013.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041013.atkval(e,c)
return c:GetLevel()*300
end
function c81041013.lvcost(e,tp,eg,ep,ev,re,r,rp,chk) function c81041013.lvcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD) Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
......
expansions/script/c81041014.lua
View file @ 60c11e56
--烦恼相谈·四条凛香 --烦恼相谈·四条凛香
require("expansions/script/c81000000")
function c81041014.initial_effect(c) function c81041014.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041014.atkcon)
e0:SetValue(c81041014.atkval)
c:RegisterEffect(e0)
--handes --handes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_HANDES) e1:SetCategory(CATEGORY_HANDES)
...@@ -41,13 +34,6 @@ function c81041014.initial_effect(c) ...@@ -41,13 +34,6 @@ function c81041014.initial_effect(c)
e4:SetOperation(c81041014.damop) e4:SetOperation(c81041014.damop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c81041014.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041014.atkval(e,c)
return c:GetLevel()*300
end
function c81041014.cfilter(c,e,tp) function c81041014.cfilter(c,e,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsCanBeEffectTarget(e) return c:IsFaceup() and c:IsControler(tp) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsCanBeEffectTarget(e)
end end
......
expansions/script/c81041015.lua
View file @ 60c11e56
--国见洸太郎 & 姬野星奏 --国见洸太郎 & 姬野星奏
require("expansions/script/c81000000")
function c81041015.initial_effect(c) function c81041015.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,c81041015.mfilter,2) aux.AddLinkProcedure(c,c81041015.mfilter,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041015.atkcon)
e0:SetValue(c81041015.atkval)
c:RegisterEffect(e0)
--To hand --To hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_TODECK) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_TODECK)
...@@ -38,17 +31,6 @@ end ...@@ -38,17 +31,6 @@ end
function c81041015.mfilter(c) function c81041015.mfilter(c)
return c:IsAttack(1550) and c:IsDefense(1050) return c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041015.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041015.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041015.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041015.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041015.thfilter(c) function c81041015.thfilter(c)
return c:IsCode(81041005) and c:IsFaceup() and c:IsAbleToHand() return c:IsCode(81041005) and c:IsFaceup() and c:IsAbleToHand()
end end
......
expansions/script/c81041018.lua
View file @ 60c11e56
--寒冬之约·姬野星奏 --寒冬之约·姬野星奏
require("expansions/script/c81000000")
function c81041018.initial_effect(c) function c81041018.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041018.atkcon)
e0:SetValue(c81041018.atkval)
c:RegisterEffect(e0)
--atk --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
...@@ -49,13 +42,6 @@ function c81041018.initial_effect(c) ...@@ -49,13 +42,6 @@ function c81041018.initial_effect(c)
e4:SetOperation(c81041018.rmop) e4:SetOperation(c81041018.rmop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c81041018.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041018.atkval(e,c)
return c:GetLevel()*300
end
function c81041018.atktg(e,c) function c81041018.atktg(e,c)
return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM)
end end
......
expansions/script/c81041019.lua
View file @ 60c11e56
--缄默之言·新堂彩音 --缄默之言·新堂彩音
require("expansions/script/c81000000")
function c81041019.initial_effect(c) function c81041019.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041019.atkcon)
e0:SetValue(c81041019.atkval)
c:RegisterEffect(e0)
--Add counter --Add counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
...@@ -38,13 +31,6 @@ function c81041019.initial_effect(c) ...@@ -38,13 +31,6 @@ function c81041019.initial_effect(c)
e3:SetOperation(c81041019.thop) e3:SetOperation(c81041019.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041019.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041019.atkval(e,c)
return c:GetLevel()*300
end
function c81041019.stkcon(e,tp,eg,ep,ev,re,r,rp) function c81041019.stkcon(e,tp,eg,ep,ev,re,r,rp)
local at=Duel.GetAttacker() local at=Duel.GetAttacker()
return at:IsControler(tp) and at:IsType(TYPE_RITUAL) and at:IsType(TYPE_PENDULUM) return at:IsControler(tp) and at:IsType(TYPE_RITUAL) and at:IsType(TYPE_PENDULUM)
......
expansions/script/c81041020.lua
View file @ 60c11e56
--点心时间·小鞠由依 --点心时间·小鞠由依
require("expansions/script/c81000000")
function c81041020.initial_effect(c) function c81041020.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041020.atkcon)
e0:SetValue(c81041020.atkval)
c:RegisterEffect(e0)
--special summon --special summon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND) e1:SetCategory(CATEGORY_TOHAND)
...@@ -39,13 +32,6 @@ function c81041020.initial_effect(c) ...@@ -39,13 +32,6 @@ function c81041020.initial_effect(c)
e3:SetOperation(c81041020.caop) e3:SetOperation(c81041020.caop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
end end
function c81041020.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041020.atkval(e,c)
return c:GetLevel()*300
end
function c81041020.cacon(e,tp,eg,ep,ev,re,r,rp) function c81041020.cacon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
local d=Duel.GetAttackTarget() local d=Duel.GetAttackTarget()
......
expansions/script/c81041022.lua
View file @ 60c11e56
--国见洸太郎 & 新堂彩音 --国见洸太郎 & 新堂彩音
require("expansions/script/c81000000")
function c81041022.initial_effect(c) function c81041022.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,c81041022.mfilter,2) aux.AddLinkProcedure(c,c81041022.mfilter,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041022.atkcon)
e0:SetValue(c81041022.atkval)
c:RegisterEffect(e0)
--to hand --to hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(81041022,0)) e1:SetDescription(aux.Stringid(81041022,0))
...@@ -39,17 +32,6 @@ end ...@@ -39,17 +32,6 @@ end
function c81041022.mfilter(c) function c81041022.mfilter(c)
return c:IsAttack(1550) and c:IsDefense(1050) return c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041022.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041022.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041022.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041022.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041022.thcfilter(c,ec) function c81041022.thcfilter(c,ec)
if c:IsLocation(LOCATION_MZONE) then if c:IsLocation(LOCATION_MZONE) then
return ec:GetLinkedGroup():IsContains(c) return ec:GetLinkedGroup():IsContains(c)
......
expansions/script/c81041024.lua
View file @ 60c11e56
--国见洸太郎 & 四条凛香 --国见洸太郎 & 四条凛香
require("expansions/script/c81000000")
function c81041024.initial_effect(c) function c81041024.initial_effect(c)
--link summon --link summon
aux.AddLinkProcedure(c,c81041024.mfilter,2) aux.AddLinkProcedure(c,c81041024.mfilter,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041024.atkcon)
e0:SetValue(c81041024.atkval)
c:RegisterEffect(e0)
--move --move
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(81041024,0)) e1:SetDescription(aux.Stringid(81041024,0))
...@@ -38,17 +31,6 @@ end ...@@ -38,17 +31,6 @@ end
function c81041024.mfilter(c) function c81041024.mfilter(c)
return c:IsAttack(1550) and c:IsDefense(1050) return c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041024.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041024.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041024.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041024.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041024.seqfilter(c) function c81041024.seqfilter(c)
return c:IsFaceup() and c:IsAttack(1550) return c:IsFaceup() and c:IsAttack(1550)
end end
......
expansions/script/c81041025.lua
View file @ 60c11e56
--不灭回忆·小鞠由依 --不灭回忆·小鞠由依
require("expansions/script/c81000000")
function c81041025.initial_effect(c) function c81041025.initial_effect(c)
--pendulum summon --pendulum summon
aux.EnablePendulumAttribute(c) aux.EnablePendulumAttribute(c)
c:EnableReviveLimit() c:EnableReviveLimit()
--atk Tenka.KoikakeRitual(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetCondition(c81041025.atkcon)
e0:SetValue(c81041025.atkval)
c:RegisterEffect(e0)
--level --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
...@@ -46,13 +39,6 @@ function c81041025.initial_effect(c) ...@@ -46,13 +39,6 @@ function c81041025.initial_effect(c)
e4:SetOperation(c81041025.ctop) e4:SetOperation(c81041025.ctop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
end end
function c81041025.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041025.atkval(e,c)
return c:GetLevel()*300
end
function c81041025.filter(c) function c81041025.filter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsLevelBelow(4) return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:IsLevelBelow(4)
end end
......
expansions/script/c81041027.lua
View file @ 60c11e56
--小鞠由依 & 国见菜子 --小鞠由依 & 国见菜子
require("expansions/script/c81000000")
function c81041027.initial_effect(c) function c81041027.initial_effect(c)
c:EnableReviveLimit() c:EnableReviveLimit()
aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,99,c81041027.lcheck) aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2,99,c81041027.lcheck)
--atk up Tenka.KoikakeLink(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_SINGLE)
e0:SetCode(EFFECT_UPDATE_ATTACK)
e0:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e0:SetRange(LOCATION_MZONE)
e0:SetCondition(c81041027.atkcon)
e0:SetValue(c81041027.atkval)
c:RegisterEffect(e0)
--negate --negate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE) e1:SetCategory(CATEGORY_DISABLE)
...@@ -40,17 +33,6 @@ end ...@@ -40,17 +33,6 @@ end
function c81041027.mzfilter(c) function c81041027.mzfilter(c)
return c:IsLinkType(TYPE_RITUAL) and c:IsLinkType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050) return c:IsLinkType(TYPE_RITUAL) and c:IsLinkType(TYPE_PENDULUM) and c:IsAttack(1550) and c:IsDefense(1050)
end end
function c81041027.atkcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c81041027.atkfilter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_PENDULUM) and c:GetLevel()>0
end
function c81041027.atkval(e,c)
local lg=c:GetLinkedGroup():Filter(c81041027.atkfilter,nil)
return lg:GetSum(Card.GetLevel)*300
end
function c81041027.con(e,tp,eg,ep,ev,re,r,rp) function c81041027.con(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2) and (Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2)
......
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