Skip to content

Y
ygopro-scripts-888
Commit d83918c4 authored by woodee's avatar woodee
Browse files
Options

Merge pull request #127 from Tianchenglipu/patch-1 

move P Activation to utility.lua
parents c1fe2a65 918810aa
Hide whitespace changes
Inline Side-by-side
Showing with 2176 additions and 2734 deletions
c10117149.lua
View file @ d83918c4
--ブンボーグ005 --ブンボーグ005
function c10117149.initial_effect(c) function c10117149.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c10117149.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --destroy
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetTargetRange(1,0) e2:SetTarget(c10117149.destg)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c10117149.desop)
e2:SetTarget(c10117149.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--destroy local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetTarget(c10117149.destg)
e3:SetOperation(c10117149.desop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
--atk up --atk up
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UPDATE_ATTACK)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetValue(c10117149.atkval)
c:RegisterEffect(e4)
--spsummon
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetCode(EFFECT_UPDATE_ATTACK) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e5:SetCode(EVENT_DESTROYED)
e5:SetRange(LOCATION_MZONE) e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e5:SetValue(c10117149.atkval) e5:SetCountLimit(1,10117149)
e5:SetCondition(c10117149.spcon)
e5:SetTarget(c10117149.sptg)
e5:SetOperation(c10117149.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--spsummon
local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_SPECIAL_SUMMON)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e6:SetCode(EVENT_DESTROYED)
e6:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e6:SetCountLimit(1,10117149)
e6:SetCondition(c10117149.spcon)
e6:SetTarget(c10117149.sptg)
e6:SetOperation(c10117149.spop)
c:RegisterEffect(e6)
end end
function c10117149.splimit(e,c,tp,sumtp,sumpos) function c10117149.splimit(e,c,tp,sumtp,sumpos)
return not c:IsSetCard(0xab) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c:IsSetCard(0xab) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
......
c10239627.lua
View file @ d83918c4
...@@ -2,49 +2,44 @@ ...@@ -2,49 +2,44 @@
function c10239627.initial_effect(c) function c10239627.initial_effect(c)
c:EnableCounterPermit(0x3001,LOCATION_PZONE+LOCATION_MZONE) c:EnableCounterPermit(0x3001,LOCATION_PZONE+LOCATION_MZONE)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --add counter
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e1:SetCode(EVENT_CHAINING)
e1:SetRange(LOCATION_PZONE+LOCATION_MZONE)
e1:SetOperation(aux.chainreg)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--add counter
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_CHAIN_SOLVED)
e2:SetCode(EVENT_CHAINING)
e2:SetRange(LOCATION_PZONE+LOCATION_MZONE) e2:SetRange(LOCATION_PZONE+LOCATION_MZONE)
e2:SetOperation(aux.chainreg) e2:SetOperation(c10239627.acop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to hand
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetCode(EVENT_CHAIN_SOLVED) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_PZONE+LOCATION_MZONE) e3:SetRange(LOCATION_PZONE)
e3:SetOperation(c10239627.acop) e3:SetCountLimit(1)
e3:SetCost(c10239627.thcost)
e3:SetTarget(c10239627.thtg1)
e3:SetOperation(c10239627.thop1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--to hand local e4=e3:Clone()
local e4=Effect.CreateEffect(c) e4:SetRange(LOCATION_MZONE)
e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetTarget(c10239627.thtg2)
e4:SetType(EFFECT_TYPE_IGNITION) e4:SetOperation(c10239627.thop2)
e4:SetRange(LOCATION_PZONE)
e4:SetCountLimit(1)
e4:SetCost(c10239627.thcost)
e4:SetTarget(c10239627.thtg1)
e4:SetOperation(c10239627.thop1)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone() --atk up
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_UPDATE_ATTACK)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e5:SetTarget(c10239627.thtg2) e5:SetValue(c10239627.atkval)
e5:SetOperation(c10239627.thop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--atk up
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_UPDATE_ATTACK)
e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e6:SetRange(LOCATION_MZONE)
e6:SetValue(c10239627.atkval)
c:RegisterEffect(e6)
end end
function c10239627.acop(e,tp,eg,ep,ev,re,r,rp) function c10239627.acop(e,tp,eg,ep,ev,re,r,rp)
if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then if re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and e:GetHandler():GetFlagEffect(1)>0 then
......
c11609969.lua
View file @ d83918c4
--DD魔導賢者ケプラー --DD魔導賢者ケプラー
function c11609969.initial_effect(c) function c11609969.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c11609969.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --scale change
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1)
e2:SetTargetRange(1,0) e2:SetCondition(c11609969.sccon)
e2:SetCondition(aux.nfbdncon) e2:SetTarget(c11609969.sctg)
e2:SetTarget(c11609969.splimit) e2:SetOperation(c11609969.scop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale change --tohand
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetRange(LOCATION_PZONE) e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY) e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCountLimit(1) e3:SetCountLimit(1,11609969)
e3:SetCondition(c11609969.sccon) e3:SetTarget(c11609969.thtg)
e3:SetTarget(c11609969.sctg) e3:SetOperation(c11609969.thop)
e3:SetOperation(c11609969.scop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--tohand local e4=e3:Clone()
local e4=Effect.CreateEffect(c) e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_SUMMON_SUCCESS)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e4:SetCountLimit(1,11609969)
e4:SetTarget(c11609969.thtg)
e4:SetOperation(c11609969.thop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e5)
end end
function c11609969.splimit(e,c,tp,sumtp,sumpos) function c11609969.splimit(e,c,tp,sumtp,sumpos)
return not c:IsSetCard(0xaf) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c:IsSetCard(0xaf) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
......
c12525049.lua
View file @ d83918c4
--音響戦士ギータス --音響戦士ギータス
function c12525049.initial_effect(c) function c12525049.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(12525049,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,12525049)
e1:SetCost(c12525049.spcost)
e1:SetTarget(c12525049.sptg)
e1:SetOperation(c12525049.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(12525049,0)) e2:SetDescription(aux.Stringid(12525049,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCountLimit(1,12525049) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCost(c12525049.spcost) e2:SetTarget(c12525049.target)
e2:SetTarget(c12525049.sptg) e2:SetOperation(c12525049.operation)
e2:SetOperation(c12525049.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(12525049,1))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e3:SetTarget(c12525049.target)
e3:SetOperation(c12525049.operation)
c:RegisterEffect(e3)
end end
function c12525049.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c12525049.spcost(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
......
c13073850.lua
View file @ d83918c4
--クリフォート・エイリアス --クリフォート・エイリアス
function c13073850.initial_effect(c) function c13073850.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(c13073850.splimcon)
e1:SetTarget(c13073850.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk up
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(c13073850.splimcon) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c13073850.splimit) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa))
e2:SetValue(300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(13073850,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa)) e3:SetCondition(c13073850.ntcon)
e3:SetValue(300)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(13073850,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c13073850.lvop)
e4:SetCondition(c13073850.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c13073850.lvop) e5:SetOperation(c13073850.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c13073850.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c13073850.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --tohand
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetDescription(aux.Stringid(13073850,1))
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCategory(CATEGORY_TOHAND)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetRange(LOCATION_MZONE) e7:SetCode(EVENT_SUMMON_SUCCESS)
e7:SetCondition(c13073850.immcon) e7:SetProperty(EFFECT_FLAG_CARD_TARGET)
e7:SetValue(aux.qlifilter) e7:SetCondition(c13073850.thcon)
e7:SetTarget(c13073850.thtg)
e7:SetOperation(c13073850.thop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--tohand --tribute check
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(13073850,1)) e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCategory(CATEGORY_TOHAND) e8:SetCode(EFFECT_MATERIAL_CHECK)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e8:SetValue(c13073850.valcheck)
e8:SetCode(EVENT_SUMMON_SUCCESS) e8:SetLabelObject(e7)
e8:SetProperty(EFFECT_FLAG_CARD_TARGET)
e8:SetCondition(c13073850.thcon)
e8:SetTarget(c13073850.thtg)
e8:SetOperation(c13073850.thop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--tribute check
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetCode(EFFECT_MATERIAL_CHECK)
e9:SetValue(c13073850.valcheck)
e9:SetLabelObject(e8)
c:RegisterEffect(e9)
end end
function c13073850.splimcon(e) function c13073850.splimcon(e)
return not e:GetHandler():IsForbidden() return not e:GetHandler():IsForbidden()
......
c13760677.lua
View file @ d83918c4
--P・M・キャプチャー --P・M・キャプチャー
function c13760677.initial_effect(c) function c13760677.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --indes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(13760677,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c13760677.indcon)
e1:SetTarget(c13760677.indtg)
e1:SetOperation(c13760677.indop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--indes --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(13760677,0)) e2:SetDescription(aux.Stringid(13760677,1))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCondition(c13760677.indcon) e2:SetCode(EVENT_BATTLE_DESTROYING)
e2:SetTarget(c13760677.indtg) e2:SetCondition(c13760677.thcon)
e2:SetOperation(c13760677.indop) e2:SetTarget(c13760677.thtg)
e2:SetOperation(c13760677.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(13760677,1))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCode(EVENT_BATTLE_DESTROYING)
e3:SetCondition(c13760677.thcon)
e3:SetTarget(c13760677.thtg)
e3:SetOperation(c13760677.thop)
c:RegisterEffect(e3)
end end
function c13760677.cfilter(c,e,tp) function c13760677.cfilter(c,e,tp)
return c:IsRace(RACE_ZOMBIE) and c:GetSummonPlayer()==tp and c:GetSummonType()==SUMMON_TYPE_PENDULUM return c:IsRace(RACE_ZOMBIE) and c:GetSummonPlayer()==tp and c:GetSummonType()==SUMMON_TYPE_PENDULUM
...@@ -52,9 +47,9 @@ function c13760677.indop(e,tp,eg,ep,ev,re,r,rp) ...@@ -52,9 +47,9 @@ function c13760677.indop(e,tp,eg,ep,ev,re,r,rp)
e1:SetValue(1) e1:SetValue(1)
e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
tc:RegisterEffect(e1) tc:RegisterEffect(e1)
local e2=e1:Clone() local e1=e1:Clone()
e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT) e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
tc:RegisterEffect(e2) tc:RegisterEffect(e1)
tc=g:GetNext() tc=g:GetNext()
end end
end end
......
c14469229.lua
View file @ d83918c4
--宝玉の守護者 --宝玉の守護者
function c14469229.initial_effect(c) function c14469229.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --replace
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c14469229.indtg)
e1:SetValue(c14469229.indval)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--replace --double
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetDescription(aux.Stringid(14469229,0))
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e2:SetCountLimit(1) e2:SetRange(LOCATION_MZONE+LOCATION_HAND)
e2:SetTarget(c14469229.indtg) e2:SetCost(c14469229.cost)
e2:SetValue(c14469229.indval) e2:SetTarget(c14469229.target)
e2:SetOperation(c14469229.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(14469229,0))
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
e3:SetRange(LOCATION_MZONE+LOCATION_HAND)
e3:SetCost(c14469229.cost)
e3:SetTarget(c14469229.target)
e3:SetOperation(c14469229.operation)
c:RegisterEffect(e3)
end end
function c14469229.indfilter(c,tp) function c14469229.indfilter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsOnField() and c:IsReason(REASON_EFFECT) return c:IsFaceup() and c:IsControler(tp) and c:IsOnField() and c:IsReason(REASON_EFFECT)
......
c14920218.lua
View file @ d83918c4
--賤竜の魔術師 --賤竜の魔術師
function c14920218.initial_effect(c) function c14920218.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --to hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(14920218,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,14920218)
e1:SetCondition(c14920218.pcon)
e1:SetTarget(c14920218.ptg)
e1:SetOperation(c14920218.pop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(14920218,0)) e2:SetDescription(aux.Stringid(14920218,1))
e2:SetCategory(CATEGORY_TOHAND) e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCountLimit(1,14920218) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCondition(c14920218.pcon) e2:SetCountLimit(1,14920219)
e2:SetTarget(c14920218.ptg) e2:SetTarget(c14920218.thtg)
e2:SetOperation(c14920218.pop) e2:SetOperation(c14920218.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to hand local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetDescription(aux.Stringid(14920218,1))
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,14920219)
e3:SetTarget(c14920218.thtg)
e3:SetOperation(c14920218.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
end end
function c14920218.pcon(e,tp,eg,ep,ev,re,r,rp) function c14920218.pcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c15146890.lua
View file @ d83918c4
--竜脈の魔術師 --竜脈の魔術師
function c15146890.initial_effect(c) function c15146890.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(15146890,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DESTROY)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetCondition(c15146890.condition)
e1:SetCost(c15146890.cost)
e1:SetTarget(c15146890.target)
e1:SetOperation(c15146890.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(15146890,0))
e2:SetCategory(CATEGORY_DESTROY)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1)
e2:SetCondition(c15146890.condition)
e2:SetCost(c15146890.cost)
e2:SetTarget(c15146890.target)
e2:SetOperation(c15146890.operation)
c:RegisterEffect(e2)
end end
function c15146890.condition(e,tp,eg,ep,ev,re,r,rp) function c15146890.condition(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c1580833.lua
View file @ d83918c4
--ダイナミスト・ステゴサウラー --ダイナミスト・ステゴサウラー
function c1580833.initial_effect(c) function c1580833.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy replace
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetTarget(c1580833.reptg)
e1:SetValue(c1580833.repval)
e1:SetOperation(c1580833.repop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy replace --destroy
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_BATTLED)
e2:SetTarget(c1580833.reptg) e2:SetRange(LOCATION_MZONE)
e2:SetValue(c1580833.repval) e2:SetCountLimit(1)
e2:SetOperation(c1580833.repop) e2:SetCondition(c1580833.descon)
e2:SetTarget(c1580833.destg)
e2:SetOperation(c1580833.desop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--destroy
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLED)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c1580833.descon)
e3:SetTarget(c1580833.destg)
e3:SetOperation(c1580833.desop)
c:RegisterEffect(e3)
end end
function c1580833.filter(c,tp) function c1580833.filter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8)
......
c16178681.lua
View file @ d83918c4
--オッドアイズ・ペンデュラム・ドラゴン --オッドアイズ・ペンデュラム・ドラゴン
function c16178681.initial_effect(c) function c16178681.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --reduce
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(16178681,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_PRE_BATTLE_DAMAGE)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,16178681)
e1:SetCondition(c16178681.rdcon)
e1:SetOperation(c16178681.rdop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--reduce --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(16178681,0)) e2:SetDescription(aux.Stringid(16178681,1))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetCode(EVENT_PRE_BATTLE_DAMAGE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,16178681) e2:SetCountLimit(1,16178682)
e2:SetCondition(c16178681.rdcon) e2:SetCondition(c16178681.thcon)
e2:SetOperation(c16178681.rdop) e2:SetTarget(c16178681.thtg)
e2:SetOperation(c16178681.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand --double
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(16178681,1)) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetCode(EVENT_PRE_BATTLE_DAMAGE)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCondition(c16178681.damcon)
e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetOperation(c16178681.damop)
e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1,16178682)
e3:SetCondition(c16178681.thcon)
e3:SetTarget(c16178681.thtg)
e3:SetOperation(c16178681.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--double
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e4:SetCode(EVENT_PRE_BATTLE_DAMAGE)
e4:SetCondition(c16178681.damcon)
e4:SetOperation(c16178681.damop)
c:RegisterEffect(e4)
end end
function c16178681.rdcon(e,tp,eg,ep,ev,re,r,rp) function c16178681.rdcon(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker() local tc=Duel.GetAttacker()
......
c17086528.lua
View file @ d83918c4
--相生の魔術師 --相生の魔術師
function c17086528.initial_effect(c) function c17086528.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --rank
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c17086528.rktg)
e1:SetOperation(c17086528.rkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--rank --scale
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_CHANGE_LSCALE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCondition(c17086528.slcon)
e2:SetCountLimit(1) e2:SetValue(4)
e2:SetTarget(c17086528.rktg)
e2:SetOperation(c17086528.rkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EFFECT_CHANGE_RSCALE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CHANGE_LSCALE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_PZONE)
e3:SetCondition(c17086528.slcon)
e3:SetValue(4)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e4)
--damage 0 --damage 0
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_NO_BATTLE_DAMAGE)
c:RegisterEffect(e4)
--atk
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetCategory(CATEGORY_ATKCHANGE)
e5:SetCode(EFFECT_NO_BATTLE_DAMAGE) e5:SetType(EFFECT_TYPE_IGNITION)
e5:SetRange(LOCATION_MZONE)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetCountLimit(1)
e5:SetTarget(c17086528.atktg)
e5:SetOperation(c17086528.atkop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--atk
local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_ATKCHANGE)
e6:SetType(EFFECT_TYPE_IGNITION)
e6:SetRange(LOCATION_MZONE)
e6:SetProperty(EFFECT_FLAG_CARD_TARGET)
e6:SetCountLimit(1)
e6:SetTarget(c17086528.atktg)
e6:SetOperation(c17086528.atkop)
c:RegisterEffect(e6)
end end
function c17086528.rkfilter(c,tp) function c17086528.rkfilter(c,tp)
return c:IsFaceup() and c:IsType(TYPE_XYZ) return c:IsFaceup() and c:IsType(TYPE_XYZ)
......
c17330916.lua
View file @ d83918c4
--EMモンキーボード --EMモンキーボード
function c17330916.initial_effect(c) function c17330916.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c,false)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(17330916,0)) e1:SetDescription(1160)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c17330916.reg) e1:SetCost(c17330916.reg)
......
c17390179.lua
View file @ d83918c4
--閃光の騎士 --閃光の騎士
function c17390179.initial_effect(c) function c17390179.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
end end
c17857780.lua
View file @ d83918c4
--EMチアモール --EMチアモール
function c17857780.initial_effect(c) function c17857780.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c17857780.atktg)
e1:SetValue(300)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --atk
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(17857780,0))
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCategory(CATEGORY_ATKCHANGE)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetTarget(c17857780.atktg) e2:SetRange(LOCATION_MZONE)
e2:SetValue(300) e2:SetCountLimit(1,17857780)
e2:SetTarget(c17857780.target)
e2:SetOperation(c17857780.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(17857780,0))
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,17857780)
e3:SetTarget(c17857780.target)
e3:SetOperation(c17857780.operation)
c:RegisterEffect(e3)
end end
function c17857780.atktg(e,c) function c17857780.atktg(e,c)
return c:IsType(TYPE_PENDULUM) return c:IsType(TYPE_PENDULUM)
......
c17979378.lua
View file @ d83918c4
--DDプラウド・シュバリエ --DDプラウド・シュバリエ
function c17979378.initial_effect(c) function c17979378.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(17979378,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCost(c17979378.atkcost)
e1:SetTarget(c17979378.atktg)
e1:SetOperation(c17979378.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --scale
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(17979378,0)) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_LSCALE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCondition(c17979378.sccon)
e2:SetCountLimit(1) e2:SetValue(5)
e2:SetCost(c17979378.atkcost)
e2:SetTarget(c17979378.atktg)
e2:SetOperation(c17979378.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EFFECT_CHANGE_RSCALE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_CHANGE_LSCALE)
e3:SetRange(LOCATION_PZONE)
e3:SetCondition(c17979378.sccon)
e3:SetValue(5)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e4)
--to hand --to hand
local e5=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetCode(EVENT_SUMMON_SUCCESS) e4:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetTarget(c17979378.thtg) e4:SetTarget(c17979378.thtg)
e5:SetOperation(c17979378.thop) e4:SetOperation(c17979378.thop)
c:RegisterEffect(e5) c:RegisterEffect(e4)
end end
function c17979378.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c17979378.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,500) end if chk==0 then return Duel.CheckLPCost(tp,500) end
......
c19474136.lua
View file @ d83918c4
--マンドラゴン --マンドラゴン
function c19474136.initial_effect(c) function c19474136.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
end end
c20409757.lua
View file @ d83918c4
--時読みの魔術師 --時読みの魔術師
function c20409757.initial_effect(c) function c20409757.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c,false)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(1160)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCondition(c20409757.condition) e1:SetCondition(c20409757.condition)
......
c20773176.lua
View file @ d83918c4
--炎獣の影霊衣－セフィラエグザ --炎獣の影霊衣－セフィラエグザ
function c20773176.initial_effect(c) function c20773176.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c20773176.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e2:SetTargetRange(1,0) e2:SetCode(EVENT_DESTROYED)
e2:SetTarget(c20773176.splimit) e2:SetCountLimit(1,20773176)
e2:SetCondition(aux.nfbdncon) e2:SetCondition(c20773176.condition)
e2:SetTarget(c20773176.target)
e2:SetOperation(c20773176.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e3:SetCode(EVENT_DESTROYED)
e3:SetCountLimit(1,20773176)
e3:SetCondition(c20773176.condition)
e3:SetTarget(c20773176.target)
e3:SetOperation(c20773176.operation)
c:RegisterEffect(e3)
end end
function c20773176.splimit(e,c,sump,sumtype,sumpos,targetp) function c20773176.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0xb4) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0xb4) or c:IsSetCard(0xc4) then return false end
......
c21495657.lua
View file @ d83918c4
--宝竜星－セフィラフウシ --宝竜星－セフィラフウシ
function c21495657.initial_effect(c) function c21495657.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c21495657.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon success
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1,21495657)
e2:SetTargetRange(1,0) e2:SetCondition(c21495657.condition)
e2:SetTarget(c21495657.splimit) e2:SetTarget(c21495657.target)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c21495657.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon success
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCountLimit(1,21495657)
e3:SetCondition(c21495657.condition)
e3:SetTarget(c21495657.target)
e3:SetOperation(c21495657.operation)
c:RegisterEffect(e3)
end end
function c21495657.splimit(e,c,sump,sumtype,sumpos,targetp) function c21495657.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9e) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9e) or c:IsSetCard(0xc4) then return false end
......
c21970285.lua
View file @ d83918c4
--竜角の狩猟者 --竜角の狩猟者
function c21970285.initial_effect(c) function c21970285.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e1:SetTarget(c21970285.efilter)
e1:SetValue(200)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --avoid battle damage
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c21970285.efilter) e2:SetTarget(c21970285.efilter)
e2:SetValue(200) e2:SetValue(1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--avoid battle damage
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
e3:SetRange(LOCATION_PZONE)
e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetTarget(c21970285.efilter)
e3:SetValue(1)
c:RegisterEffect(e3)
end end
function c21970285.efilter(e,c) function c21970285.efilter(e,c)
return c:IsType(TYPE_NORMAL) return c:IsType(TYPE_NORMAL)
......
c22617205.lua
View file @ d83918c4
--覚星輝士－セフィラビュート --覚星輝士－セフィラビュート
function c22617205.initial_effect(c) function c22617205.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c22617205.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --destroy
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetCountLimit(1,22617205)
e2:SetTarget(c22617205.splimit) e2:SetTarget(c22617205.target)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c22617205.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--destroy local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetCountLimit(1,22617205)
e3:SetTarget(c22617205.target)
e3:SetOperation(c22617205.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e2:Clone()
e4:SetCode(EVENT_FLIP_SUMMON_SUCCESS) e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCondition(c22617205.condition)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e3:Clone()
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetCondition(c22617205.condition)
c:RegisterEffect(e5)
end end
function c22617205.splimit(e,c,sump,sumtype,sumpos,targetp) function c22617205.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9c) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9c) or c:IsSetCard(0xc4) then return false end
......
c23166823.lua
View file @ d83918c4
...@@ -2,34 +2,29 @@ ...@@ -2,34 +2,29 @@
function c23166823.initial_effect(c) function c23166823.initial_effect(c)
c:SetSPSummonOnce(23166823) c:SetSPSummonOnce(23166823)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c23166823.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetTarget(c23166823.thtg)
e2:SetTargetRange(1,0) e2:SetOperation(c23166823.thop)
e2:SetTarget(c23166823.splimit)
e2:SetCondition(aux.nfbdncon)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to hand local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetCondition(c23166823.condition)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetTarget(c23166823.thtg)
e3:SetOperation(c23166823.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCondition(c23166823.condition)
c:RegisterEffect(e4)
end end
function c23166823.splimit(e,c,sump,sumtype,sumpos,targetp) function c23166823.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0xb5) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0xb5) or c:IsSetCard(0xc4) then return false end
......
c24019092.lua
View file @ d83918c4
--イグナイト・マスケット --イグナイト・マスケット
function c24019092.initial_effect(c) function c24019092.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c24019092.thcon)
e1:SetTarget(c24019092.thtg)
e1:SetOperation(c24019092.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c24019092.thcon)
e2:SetTarget(c24019092.thtg)
e2:SetOperation(c24019092.thop)
c:RegisterEffect(e2)
end end
function c24019092.thcon(e,tp,eg,ep,ev,re,r,rp) function c24019092.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c24131534.lua
View file @ d83918c4
--イグナイト・マグナム --イグナイト・マグナム
function c24131534.initial_effect(c) function c24131534.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c24131534.thcon)
e1:SetTarget(c24131534.thtg)
e1:SetOperation(c24131534.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c24131534.thcon)
e2:SetTarget(c24131534.thtg)
e2:SetOperation(c24131534.thop)
c:RegisterEffect(e2)
end end
function c24131534.thcon(e,tp,eg,ep,ev,re,r,rp) function c24131534.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c24573625.lua
View file @ d83918c4
--ブンボーグ008 --ブンボーグ008
function c24573625.initial_effect(c) function c24573625.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(c24573625.splimcon)
e1:SetTarget(c24573625.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTargetRange(1,0) e2:SetValue(c24573625.value)
e2:SetCondition(c24573625.splimcon)
e2:SetTarget(c24573625.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk --attack twice
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetCode(EFFECT_EXTRA_ATTACK)
e3:SetValue(c24573625.value) e3:SetValue(1)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--attack twice
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_EXTRA_ATTACK) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetValue(1) e4:SetCode(EFFECT_CANNOT_DIRECT_ATTACK)
e4:SetCondition(c24573625.dircon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c) local e5=e4:Clone()
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetCode(EFFECT_CANNOT_ATTACK)
e5:SetRange(LOCATION_MZONE) e5:SetCondition(c24573625.atkcon2)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_CANNOT_DIRECT_ATTACK)
e5:SetCondition(c24573625.dircon)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EFFECT_CANNOT_ATTACK)
e6:SetCondition(c24573625.atkcon2)
c:RegisterEffect(e6)
--cannot be target --cannot be target
local e7=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_FIELD) e6:SetType(EFFECT_TYPE_FIELD)
e7:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
e7:SetProperty(EFFECT_FLAG_SET_AVAILABLE) e6:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e7:SetTargetRange(0,0xff) e6:SetTargetRange(0,0xff)
e7:SetCode(EFFECT_CANNOT_SELECT_EFFECT_TARGET) e6:SetCode(EFFECT_CANNOT_SELECT_EFFECT_TARGET)
e7:SetValue(c24573625.tglimit) e6:SetValue(c24573625.tglimit)
c:RegisterEffect(e7) c:RegisterEffect(e6)
end end
function c24573625.splimcon(e) function c24573625.splimcon(e)
return not e:GetHandler():IsForbidden() return not e:GetHandler():IsForbidden()
......
c26270847.lua
View file @ d83918c4
--EMシルバー・クロウ --EMシルバー・クロウ
function c26270847.initial_effect(c) function c26270847.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c26270847.atktg)
e1:SetValue(300)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --atk
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(26270847,0))
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetCategory(CATEGORY_ATKCHANGE)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetTarget(c26270847.atktg) e2:SetTarget(c26270847.target)
e2:SetValue(300) e2:SetOperation(c26270847.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(26270847,0))
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e3:SetCode(EVENT_ATTACK_ANNOUNCE)
e3:SetTarget(c26270847.target)
e3:SetOperation(c26270847.operation)
c:RegisterEffect(e3)
end end
function c26270847.atktg(e,c) function c26270847.atktg(e,c)
return c:IsSetCard(0x9f) return c:IsSetCard(0x9f)
......
c28865322.lua
View file @ d83918c4
--魔装邪龍 イーサルウェポン --魔装邪龍 イーサルウェポン
function c28865322.initial_effect(c) function c28865322.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCost(c28865322.descost)
e1:SetTarget(c28865322.destg)
e1:SetOperation(c28865322.desop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy --remove
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_REMOVE)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1) e2:SetTarget(c28865322.remtg)
e2:SetCost(c28865322.descost) e2:SetOperation(c28865322.remop)
e2:SetTarget(c28865322.destg)
e2:SetOperation(c28865322.desop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--remove local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_REMOVE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e3:SetTarget(c28865322.remtg)
e3:SetOperation(c28865322.remop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
end end
function c28865322.cfilter(c) function c28865322.cfilter(c)
return c:IsSetCard(0xca) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost() return c:IsSetCard(0xca) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
......
c31178212.lua
View file @ d83918c4
--マジェスペクター・ユニコーン --マジェスペクター・ユニコーン
function c31178212.initial_effect(c) function c31178212.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_QUICK_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetHintTiming(0,0x1e0)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,31178212)
e1:SetTarget(c31178212.thtg)
e1:SetOperation(c31178212.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --cannot target
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetHintTiming(0,0x1e0)
e2:SetRange(LOCATION_MZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,31178212) e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e2:SetTarget(c31178212.thtg) e2:SetValue(aux.tgoval)
e2:SetOperation(c31178212.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--cannot target --indes
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e3:SetValue(c31178212.indval)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE)
e4:SetValue(c31178212.indval)
c:RegisterEffect(e4)
end end
function c31178212.filter(c) function c31178212.filter(c)
return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand() return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
......
c31991800.lua
View file @ d83918c4
--マジェスペクター・ラクーン --マジェスペクター・ラクーン
function c31991800.initial_effect(c) function c31991800.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCountLimit(1,31991800)
e1:SetTarget(c31991800.thtg)
e1:SetOperation(c31991800.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1,31991800)
e2:SetTarget(c31991800.thtg)
e2:SetOperation(c31991800.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--cannot target --cannot target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e4:SetValue(c31991800.indval)
e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(c31991800.indval)
c:RegisterEffect(e5)
end end
function c31991800.thfilter(c) function c31991800.thfilter(c)
return c:IsSetCard(0xd0) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() return c:IsSetCard(0xd0) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
......
c32787239.lua
View file @ d83918c4
--EMラ・パンダ --EMラ・パンダ
function c32787239.initial_effect(c) function c32787239.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --scale change
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(32787239,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c32787239.sctg)
e1:SetOperation(c32787239.scop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--scale change --negate attack
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(32787239,0)) e2:SetDescription(aux.Stringid(32787239,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_BE_BATTLE_TARGET)
e2:SetCountLimit(1) e2:SetRange(LOCATION_MZONE)
e2:SetTarget(c32787239.sctg) e2:SetCountLimit(1,32787239)
e2:SetOperation(c32787239.scop) e2:SetCondition(c32787239.condition)
e2:SetOperation(c32787239.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--negate attack
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(32787239,1))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BE_BATTLE_TARGET)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1,32787239)
e3:SetCondition(c32787239.condition)
e3:SetOperation(c32787239.operation)
c:RegisterEffect(e3)
end end
function c32787239.sctg(e,tp,eg,ep,ev,re,r,rp,chk) function c32787239.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():GetLeftScale()<12 end if chk==0 then return e:GetHandler():GetLeftScale()<12 end
......
c33823832.lua
View file @ d83918c4
--EMファイア・マフライオ --EMファイア・マフライオ
function c33823832.initial_effect(c) function c33823832.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(33823832,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_DESTROYED)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c33823832.spcon)
e1:SetTarget(c33823832.sptg)
e1:SetOperation(c33823832.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --chain attack
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(33823832,0)) e2:SetDescription(aux.Stringid(33823832,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_DESTROYED) e2:SetCode(EVENT_BATTLED)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCondition(c33823832.spcon) e2:SetCountLimit(1)
e2:SetTarget(c33823832.sptg) e2:SetCondition(c33823832.cacon)
e2:SetOperation(c33823832.spop) e2:SetOperation(c33823832.caop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--chain attack
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(33823832,1))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLED)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c33823832.cacon)
e3:SetOperation(c33823832.caop)
c:RegisterEffect(e3)
end end
function c33823832.cfilter(c,tp) function c33823832.cfilter(c,tp)
return c:IsType(TYPE_PENDULUM) and c:IsPreviousLocation(LOCATION_MZONE) and c:GetPreviousControler()==tp return c:IsType(TYPE_PENDULUM) and c:IsPreviousLocation(LOCATION_MZONE) and c:GetPreviousControler()==tp
......
c368382.lua
View file @ d83918c4
--ダイナミスト・ブラキオン --ダイナミスト・ブラキオン
function c368382.initial_effect(c) function c368382.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(368382,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAIN_SOLVING)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c368382.negcon)
e1:SetOperation(c368382.negop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(368382,0)) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCategory(CATEGORY_DISABLE) e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetRange(LOCATION_HAND)
e2:SetRange(LOCATION_PZONE) e2:SetCondition(c368382.spcon)
e2:SetCondition(c368382.negcon)
e2:SetOperation(c368382.negop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--special summon
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_SPSUMMON_PROC)
e3:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e3:SetRange(LOCATION_HAND)
e3:SetCondition(c368382.spcon)
c:RegisterEffect(e3)
end end
function c368382.tfilter(c,tp) function c368382.tfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD)
......
c37752990.lua
View file @ d83918c4
--ダイナミスト・ケラトプス --ダイナミスト・ケラトプス
function c37752990.initial_effect(c) function c37752990.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy replace
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetTarget(c37752990.reptg)
e1:SetValue(c37752990.repval)
e1:SetOperation(c37752990.repop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy replace --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetCode(EFFECT_SPSUMMON_PROC)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetTarget(c37752990.reptg) e2:SetRange(LOCATION_HAND)
e2:SetValue(c37752990.repval) e2:SetCondition(c37752990.spcon)
e2:SetOperation(c37752990.repop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--special summon
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EFFECT_SPSUMMON_PROC)
e3:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e3:SetRange(LOCATION_HAND)
e3:SetCondition(c37752990.spcon)
c:RegisterEffect(e3)
end end
function c37752990.filter(c,tp) function c37752990.filter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8)
......
c37991342.lua
View file @ d83918c4
--クリフォート・ゲノム --クリフォート・ゲノム
function c37991342.initial_effect(c) function c37991342.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c37991342.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk down
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(aux.nfbdncon) e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetTarget(c37991342.splimit) e2:SetValue(-300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk down --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(37991342,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(0,LOCATION_MZONE) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetValue(-300) e3:SetCondition(c37991342.ntcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(37991342,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c37991342.lvop)
e4:SetCondition(c37991342.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c37991342.lvop) e5:SetOperation(c37991342.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c37991342.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c37991342.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --destroy
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetDescription(aux.Stringid(37991342,1))
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCategory(CATEGORY_DESTROY)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetRange(LOCATION_MZONE) e7:SetCode(EVENT_RELEASE)
e7:SetCondition(c37991342.immcon) e7:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e7:SetValue(aux.qlifilter) e7:SetTarget(c37991342.destg)
e7:SetOperation(c37991342.desop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--destroy
local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(37991342,1))
e8:SetCategory(CATEGORY_DESTROY)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e8:SetCode(EVENT_RELEASE)
e8:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e8:SetTarget(c37991342.destg)
e8:SetOperation(c37991342.desop)
c:RegisterEffect(e8)
end end
function c37991342.splimit(e,c) function c37991342.splimit(e,c)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c38988538.lua
View file @ d83918c4
--ダイナミスト・プレシオス --ダイナミスト・プレシオス
function c38988538.initial_effect(c) function c38988538.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(38988538,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAIN_SOLVING)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c38988538.negcon)
e1:SetOperation(c38988538.negop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(38988538,0)) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCategory(CATEGORY_DISABLE) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetRange(LOCATION_MZONE)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetRange(LOCATION_PZONE) e2:SetValue(c38988538.atkval)
e2:SetCondition(c38988538.negcon)
e2:SetOperation(c38988538.negop)
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_UPDATE_ATTACK) e3:SetCode(EFFECT_UPDATE_DEFENCE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(0,LOCATION_MZONE) e3:SetTargetRange(0,LOCATION_MZONE)
e3:SetValue(c38988538.atkval) e3:SetValue(c38988538.atkval)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_UPDATE_DEFENCE)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(0,LOCATION_MZONE)
e4:SetValue(c38988538.atkval)
c:RegisterEffect(e4)
end end
function c38988538.tfilter(c,tp) function c38988538.tfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD)
......
c39153655.lua
View file @ d83918c4
--DDケルベロス --DDケルベロス
function c39153655.initial_effect(c) function c39153655.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk/def
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(39153655,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c39153655.atktg)
e1:SetOperation(c39153655.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk/def --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(39153655,0)) e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_PZONE) e2:SetCondition(c39153655.thcon)
e2:SetCountLimit(1) e2:SetTarget(c39153655.thtg)
e2:SetTarget(c39153655.atktg) e2:SetOperation(c39153655.thop)
e2:SetOperation(c39153655.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCondition(c39153655.thcon)
e3:SetTarget(c39153655.thtg)
e3:SetOperation(c39153655.thop)
c:RegisterEffect(e3)
end end
function c39153655.filter(c) function c39153655.filter(c)
local lv=c:GetLevel() local lv=c:GetLevel()
......
c40318957.lua
View file @ d83918c4
--EMドクロバット・ジョーカー --EMドクロバット・ジョーカー
function c40318957.initial_effect(c) function c40318957.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c40318957.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --search
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(40318957,0))
e2:SetRange(LOCATION_PZONE) e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetTarget(c40318957.thtg)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c40318957.thop)
e2:SetTarget(c40318957.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--search
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(40318957,0))
e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetTarget(c40318957.thtg)
e3:SetOperation(c40318957.thop)
c:RegisterEffect(e3)
end end
function c40318957.filter(c) function c40318957.filter(c)
return c:IsSetCard(0x9f) or (c:IsSetCard(0x98) and c:IsType(TYPE_PENDULUM)) or c:IsSetCard(0x99) return c:IsSetCard(0x9f) or (c:IsSetCard(0x98) and c:IsType(TYPE_PENDULUM)) or c:IsSetCard(0x99)
......
c42002073.lua
View file @ d83918c4
--EMトランプ・ガール --EMトランプ・ガール
function c42002073.initial_effect(c) function c42002073.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1)
e1:SetTarget(c42002073.target)
e1:SetOperation(c42002073.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_MZONE) e2:SetCode(EVENT_DESTROYED)
e2:SetCountLimit(1) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetTarget(c42002073.target) e2:SetCondition(c42002073.spcon)
e2:SetOperation(c42002073.operation) e2:SetTarget(c42002073.sptg)
e2:SetOperation(c42002073.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--
local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_SPECIAL_SUMMON)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e6:SetCode(EVENT_DESTROYED)
e6:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e6:SetCondition(c42002073.spcon)
e6:SetTarget(c42002073.sptg)
e6:SetOperation(c42002073.spop)
c:RegisterEffect(e6)
end end
function c42002073.filter1(c,e) function c42002073.filter1(c,e)
return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
......
c4239451.lua
View file @ d83918c4
--EMヒックリカエル --EMヒックリカエル
function c4239451.initial_effect(c) function c4239451.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --swap1
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(4239451,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c4239451.adtg1)
e1:SetOperation(c4239451.adop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--swap1 --swap2
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(4239451,0)) e2:SetDescription(aux.Stringid(4239451,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetTarget(c4239451.adtg1) e2:SetCondition(c4239451.adcon2)
e2:SetOperation(c4239451.adop1) e2:SetTarget(c4239451.adtg2)
e2:SetOperation(c4239451.adop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--swap2
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(4239451,1))
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1)
e3:SetCondition(c4239451.adcon2)
e3:SetTarget(c4239451.adtg2)
e3:SetOperation(c4239451.adop2)
c:RegisterEffect(e3)
end end
function c4239451.filter(c) function c4239451.filter(c)
return c:IsFaceup() return c:IsFaceup()
......
c42880485.lua
View file @ d83918c4
--超重輝将ヒス－E --超重輝将ヒス－E
function c42880485.initial_effect(c) function c42880485.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(c42880485.splimcon)
e1:SetTarget(c42880485.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --level
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1)
e2:SetTargetRange(1,0) e2:SetTarget(c42880485.lvtg)
e2:SetCondition(c42880485.splimcon) e2:SetOperation(c42880485.lvop)
e2:SetTarget(c42880485.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--level --pos
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_IGNITION) e3:SetCategory(CATEGORY_POSITION)
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetCountLimit(1) e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e3:SetTarget(c42880485.lvtg) e3:SetTarget(c42880485.postg)
e3:SetOperation(c42880485.lvop) e3:SetOperation(c42880485.posop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--pos local e4=e3:Clone()
local e4=Effect.CreateEffect(c) e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCategory(CATEGORY_POSITION)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_SUMMON_SUCCESS)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e4:SetTarget(c42880485.postg)
e4:SetOperation(c42880485.posop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e5)
--normal summon with 1 tribute --normal summon with 1 tribute
local e6=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e6:SetDescription(aux.Stringid(42880485,0)) e5:SetDescription(aux.Stringid(42880485,0))
e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e6:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SUMMON_PROC) e5:SetCode(EFFECT_SUMMON_PROC)
e6:SetCondition(c42880485.otcon) e5:SetCondition(c42880485.otcon)
e6:SetOperation(c42880485.otop) e5:SetOperation(c42880485.otop)
e6:SetValue(SUMMON_TYPE_ADVANCE) e5:SetValue(SUMMON_TYPE_ADVANCE)
c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e6) c:RegisterEffect(e6)
local e7=e6:Clone()
e7:SetCode(EFFECT_SET_PROC)
c:RegisterEffect(e7)
-- --
local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE)
e7:SetCode(EFFECT_DEFENCE_ATTACK)
e7:SetValue(1)
c:RegisterEffect(e7)
--add setcode
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE) e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCode(EFFECT_DEFENCE_ATTACK) e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e8:SetValue(1) e8:SetCode(EFFECT_ADD_SETCODE)
e8:SetValue(0x9a)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--add setcode
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e9:SetCode(EFFECT_ADD_SETCODE)
e9:SetValue(0x9a)
c:RegisterEffect(e9)
end end
function c42880485.splimcon(e) function c42880485.splimcon(e)
return not e:GetHandler():IsForbidden() return not e:GetHandler():IsForbidden()
......
c43241495.lua
View file @ d83918c4
--EMトランポリンクス --EMトランポリンクス
function c43241495.initial_effect(c) function c43241495.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(43241495,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,43241495)
e1:SetCondition(c43241495.thcon)
e1:SetTarget(c43241495.thtg)
e1:SetOperation(c43241495.thop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(43241495,0)) e2:SetDescription(aux.Stringid(43241495,1))
e2:SetCategory(CATEGORY_TOHAND) e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,43241495)
e2:SetCondition(c43241495.thcon)
e2:SetTarget(c43241495.thtg) e2:SetTarget(c43241495.thtg)
e2:SetOperation(c43241495.thop1) e2:SetOperation(c43241495.thop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(43241495,1))
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetTarget(c43241495.thtg)
e3:SetOperation(c43241495.thop2)
c:RegisterEffect(e3)
end end
function c43241495.cfilter(c,tp) function c43241495.cfilter(c,tp)
return c:IsControler(tp) and c:GetSummonType()==SUMMON_TYPE_PENDULUM return c:IsControler(tp) and c:GetSummonType()==SUMMON_TYPE_PENDULUM
......
c43785278.lua
View file @ d83918c4
--フーコーの魔砲石 --フーコーの魔砲石
function c43785278.initial_effect(c) function c43785278.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c,false)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(1160)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c43785278.reg) e1:SetCost(c43785278.reg)
......
c44481227.lua
View file @ d83918c4
--EMラクダウン --EMラクダウン
function c44481227.initial_effect(c) function c44481227.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCondition(c44481227.condition)
e1:SetTarget(c44481227.target)
e1:SetOperation(c44481227.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --atk down
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_ATKCHANGE) e2:SetCategory(CATEGORY_ATKCHANGE)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_BATTLE_DESTROYED)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCountLimit(1) e2:SetCondition(c44481227.atkcon)
e2:SetCondition(c44481227.condition) e2:SetOperation(c44481227.atkop)
e2:SetTarget(c44481227.target)
e2:SetOperation(c44481227.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk down
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_ATKCHANGE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLE_DESTROYED)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCondition(c44481227.atkcon)
e3:SetOperation(c44481227.atkop)
c:RegisterEffect(e3)
end end
function c44481227.condition(e,tp,eg,ep,ev,re,r,rp) function c44481227.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsAbleToEnterBP() return Duel.IsAbleToEnterBP()
......
c45103815.lua
View file @ d83918c4
--召喚師ライズベルト --召喚師ライズベルト
function c45103815.initial_effect(c) function c45103815.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c45103815.lvtg)
e1:SetOperation(c45103815.lvop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--level
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1)
e2:SetTarget(c45103815.lvtg)
e2:SetOperation(c45103815.lvop)
c:RegisterEffect(e2)
end end
function c45103815.filter(c) function c45103815.filter(c)
return c:IsFaceup() and c:GetLevel()>0 return c:IsFaceup() and c:GetLevel()>0
......
c45627618.lua
View file @ d83918c4
...@@ -4,7 +4,7 @@ function c45627618.initial_effect(c) ...@@ -4,7 +4,7 @@ function c45627618.initial_effect(c)
aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),7,2) aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),7,2)
c:EnableReviveLimit() c:EnableReviveLimit()
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c,false)
--pendulum set --pendulum set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_IGNITION) e1:SetType(EFFECT_TYPE_IGNITION)
......
c47075569.lua
View file @ d83918c4
--EMペンデュラム・マジシャン --EMペンデュラム・マジシャン
function c47075569.initial_effect(c) function c47075569.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c47075569.atkcon)
e1:SetOperation(c47075569.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCondition(c47075569.atkcon) e2:SetCountLimit(1,47075569)
e2:SetOperation(c47075569.atkop) e2:SetTarget(c47075569.thtg)
e2:SetOperation(c47075569.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCountLimit(1,47075569)
e3:SetTarget(c47075569.thtg)
e3:SetOperation(c47075569.thop)
c:RegisterEffect(e3)
end end
function c47075569.cfilter(c,tp) function c47075569.cfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0x9f) and c:IsControler(tp) and c:GetSummonType()==SUMMON_TYPE_PENDULUM return c:IsFaceup() and c:IsSetCard(0x9f) and c:IsControler(tp) and c:GetSummonType()==SUMMON_TYPE_PENDULUM
......
c47198668.lua
View file @ d83918c4
--DDD死偉王ヘル・アーマゲドン --DDD死偉王ヘル・アーマゲドン
function c47198668.initial_effect(c) function c47198668.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk up
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c47198668.atktg1)
e1:SetOperation(c47198668.atkop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk up --atk up
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_ATKCHANGE)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCode(EVENT_DESTROYED)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetTarget(c47198668.atktg1) e2:SetCost(c47198668.atkcost)
e2:SetOperation(c47198668.atkop1) e2:SetTarget(c47198668.atktg2)
e2:SetOperation(c47198668.atkop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --indes
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_ATKCHANGE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e3:SetCode(EVENT_DESTROYED) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e3:SetValue(c47198668.efilter)
e3:SetCountLimit(1)
e3:SetCost(c47198668.atkcost)
e3:SetTarget(c47198668.atktg2)
e3:SetOperation(c47198668.atkop2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetValue(c47198668.efilter)
c:RegisterEffect(e4)
end end
function c47198668.filter1(c) function c47198668.filter1(c)
return c:IsFaceup() and c:IsSetCard(0xaf) return c:IsFaceup() and c:IsSetCard(0xaf)
......
c48940337.lua
View file @ d83918c4
--ランスフォリンクス --ランスフォリンクス
function c48940337.initial_effect(c) function c48940337.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --pierce
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_PIERCE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c48940337.target)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--pierce
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_PIERCE)
e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c48940337.target)
c:RegisterEffect(e2)
end end
function c48940337.target(e,c) function c48940337.target(e,c)
return c:IsType(TYPE_NORMAL) return c:IsType(TYPE_NORMAL)
......
c50407691.lua
View file @ d83918c4
--イグナイト・ライオット --イグナイト・ライオット
function c50407691.initial_effect(c) function c50407691.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c50407691.thcon)
e1:SetTarget(c50407691.thtg)
e1:SetOperation(c50407691.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c50407691.thcon)
e2:SetTarget(c50407691.thtg)
e2:SetOperation(c50407691.thop)
c:RegisterEffect(e2)
end end
function c50407691.thcon(e,tp,eg,ep,ev,re,r,rp) function c50407691.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c50485594.lua
View file @ d83918c4
--レスキューラット --レスキューラット
function c50485594.initial_effect(c) function c50485594.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --to hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(50485594,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,50485594+EFFECT_COUNT_CODE_DUEL)
e1:SetCost(c50485594.thcost)
e1:SetTarget(c50485594.thtg)
e1:SetOperation(c50485594.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(50485594,0)) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetCategory(CATEGORY_TOHAND) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetOperation(c50485594.regop)
e2:SetCountLimit(1,50485594+EFFECT_COUNT_CODE_DUEL)
e2:SetCost(c50485594.thcost)
e2:SetTarget(c50485594.thtg)
e2:SetOperation(c50485594.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--special summon
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetDescription(aux.Stringid(50485594,1))
e3:SetCode(EVENT_SUMMON_SUCCESS) e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetOperation(c50485594.regop) e3:SetRange(LOCATION_MZONE)
e3:SetCost(c50485594.spcost)
e3:SetCondition(c50485594.spcon)
e3:SetTarget(c50485594.sptg)
e3:SetOperation(c50485594.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(50485594,1))
e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_MZONE)
e4:SetCost(c50485594.spcost)
e4:SetCondition(c50485594.spcon)
e4:SetTarget(c50485594.sptg)
e4:SetOperation(c50485594.spop)
c:RegisterEffect(e4)
end end
function c50485594.thcost(e,tp,eg,ep,ev,re,r,rp,chk) function c50485594.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
......
c51194046.lua
View file @ d83918c4
--クリフォート・アセンブラ --クリフォート・アセンブラ
function c51194046.initial_effect(c) function c51194046.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c51194046.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --draw
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(51194046,0))
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_DRAW)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_PHASE+PHASE_END)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCountLimit(1)
e2:SetCondition(aux.nfbdncon) e2:SetCondition(c51194046.drcon)
e2:SetTarget(c51194046.splimit) e2:SetTarget(c51194046.drtg)
e2:SetOperation(c51194046.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--draw
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(51194046,0))
e3:SetCategory(CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1)
e3:SetCondition(c51194046.drcon)
e3:SetTarget(c51194046.drtg)
e3:SetOperation(c51194046.drop)
c:RegisterEffect(e3)
if not c51194046.global_check then if not c51194046.global_check then
c51194046.global_check=true c51194046.global_check=true
c51194046[0]=0 c51194046[0]=0
......
c51531505.lua
View file @ d83918c4
--竜穴の魔術師 --竜穴の魔術師
function c51531505.initial_effect(c) function c51531505.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(51531505,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DESTROY)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetCondition(c51531505.condition)
e1:SetCost(c51531505.cost)
e1:SetTarget(c51531505.target)
e1:SetOperation(c51531505.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(51531505,0))
e2:SetCategory(CATEGORY_DESTROY)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1)
e2:SetCondition(c51531505.condition)
e2:SetCost(c51531505.cost)
e2:SetTarget(c51531505.target)
e2:SetOperation(c51531505.operation)
c:RegisterEffect(e2)
end end
function c51531505.condition(e,tp,eg,ep,ev,re,r,rp) function c51531505.condition(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c52963531.lua
View file @ d83918c4
--EMマンモスプラッシュ --EMマンモスプラッシュ
function c52963531.initial_effect(c) function c52963531.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
......
c53724621.lua
View file @ d83918c4
--EMギタートル --EMギタートル
function c53724621.initial_effect(c) function c53724621.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --draw
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DRAW)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_CHAIN_SOLVING)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,53724621)
e1:SetCondition(c53724621.drcon)
e1:SetTarget(c53724621.drtg)
e1:SetOperation(c53724621.drop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--draw --scale
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DRAW) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetRange(LOCATION_MZONE)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_PZONE) e2:SetCountLimit(1)
e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetTarget(c53724621.target)
e2:SetCountLimit(1,53724621) e2:SetOperation(c53724621.operation)
e2:SetCondition(c53724621.drcon)
e2:SetTarget(c53724621.drtg)
e2:SetOperation(c53724621.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1)
e3:SetTarget(c53724621.target)
e3:SetOperation(c53724621.operation)
c:RegisterEffect(e3)
end end
function c53724621.drcon(e,tp,eg,ep,ev,re,r,rp) function c53724621.drcon(e,tp,eg,ep,ev,re,r,rp)
return rp==tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_PENDULUM) and re:GetHandler():IsSetCard(0x9f) and e:GetHandler()~=re:GetHandler() return rp==tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_PENDULUM) and re:GetHandler():IsSetCard(0x9f) and e:GetHandler()~=re:GetHandler()
......
c5399521.lua
View file @ d83918c4
--音響戦士マイクス --音響戦士マイクス
function c5399521.initial_effect(c) function c5399521.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --scale
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CHANGE_LSCALE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c5399521.slcon)
e1:SetValue(4)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--scale local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EFFECT_CHANGE_RSCALE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_CHANGE_LSCALE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c5399521.slcon)
e2:SetValue(4)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e3)
--tohand --tohand
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1)
e3:SetCondition(c5399521.thcon)
e3:SetTarget(c5399521.thtg)
e3:SetOperation(c5399521.thop)
c:RegisterEffect(e3)
--spsummon
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_TOHAND) e4:SetType(EFFECT_TYPE_FIELD)
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EFFECT_SPSUMMON_PROC)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_HAND)
e4:SetRange(LOCATION_PZONE) e4:SetCondition(c5399521.spcon)
e4:SetCountLimit(1) e4:SetOperation(c5399521.spop)
e4:SetCondition(c5399521.thcon)
e4:SetTarget(c5399521.thtg)
e4:SetOperation(c5399521.thop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon --extra summon
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e5:SetCode(EFFECT_SPSUMMON_PROC) e5:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetProperty(EFFECT_FLAG_UNCOPYABLE) e5:SetOperation(c5399521.sumop)
e5:SetRange(LOCATION_HAND)
e5:SetCondition(c5399521.spcon)
e5:SetOperation(c5399521.spop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--extra summon local e6=e5:Clone()
local e6=Effect.CreateEffect(c) e6:SetCode(EVENT_SPSUMMON_SUCCESS)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e6:SetCode(EVENT_SUMMON_SUCCESS)
e6:SetOperation(c5399521.sumop)
c:RegisterEffect(e6) c:RegisterEffect(e6)
local e7=e6:Clone()
e7:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e7)
end end
function c5399521.thcon(e,tp,eg,ep,ev,re,r,rp) function c5399521.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()==tp return Duel.GetTurnPlayer()==tp
......
c5506791.lua
View file @ d83918c4
--マジェスペクター・キャット --マジェスペクター・キャット
function c5506791.initial_effect(c) function c5506791.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCountLimit(1,5506791)
e1:SetOperation(c5506791.regop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1,5506791)
e2:SetOperation(c5506791.regop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--cannot target --cannot target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e4:SetValue(c5506791.indval)
e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(c5506791.indval)
c:RegisterEffect(e5)
end end
function c5506791.thfilter(c) function c5506791.thfilter(c)
return c:IsSetCard(0xd0) and c:IsAbleToHand() return c:IsSetCard(0xd0) and c:IsAbleToHand()
......
c55106249.lua
View file @ d83918c4
--ブンボーグ006 --ブンボーグ006
function c55106249.initial_effect(c) function c55106249.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c55106249.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --pos
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_POSITION)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetTarget(c55106249.postg)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c55106249.posop)
e2:SetTarget(c55106249.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--pos local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_POSITION)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetTarget(c55106249.postg)
e3:SetOperation(c55106249.posop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
--atk --atk
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_UPDATE_ATTACK)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_MZONE)
e4:SetValue(c55106249.atkval)
c:RegisterEffect(e4)
--to hand
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetCategory(CATEGORY_TOHAND)
e5:SetCode(EFFECT_UPDATE_ATTACK) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e5:SetCode(EVENT_DESTROYED)
e5:SetRange(LOCATION_MZONE) e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e5:SetValue(c55106249.atkval) e5:SetCountLimit(1,55106249)
e5:SetCondition(c55106249.thcon)
e5:SetTarget(c55106249.thtg)
e5:SetOperation(c55106249.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--to hand
local e6=Effect.CreateEffect(c)
e6:SetCategory(CATEGORY_TOHAND)
e6:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e6:SetCode(EVENT_DESTROYED)
e6:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e6:SetCountLimit(1,55106249)
e6:SetCondition(c55106249.thcon)
e6:SetTarget(c55106249.thtg)
e6:SetOperation(c55106249.thop)
c:RegisterEffect(e6)
end end
function c55106249.splimit(e,c,tp,sumtp,sumpos) function c55106249.splimit(e,c,tp,sumtp,sumpos)
return not c:IsSetCard(0xab) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c:IsSetCard(0xab) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
......
c57624336.lua
View file @ d83918c4
--エキセントリック・デーモン --エキセントリック・デーモン
function c57624336.initial_effect(c) function c57624336.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --Destroy spell & trap
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1,57624336)
e1:SetTarget(c57624336.destg1)
e1:SetOperation(c57624336.desop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Destroy spell & trap --Destroy monster
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1,57624336) e2:SetCountLimit(1,57624337)
e2:SetTarget(c57624336.destg1) e2:SetCost(c57624336.descost2)
e2:SetOperation(c57624336.desop1) e2:SetTarget(c57624336.destg2)
e2:SetOperation(c57624336.desop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--Destroy monster
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1,57624337)
e3:SetCost(c57624336.descost2)
e3:SetTarget(c57624336.destg2)
e3:SetOperation(c57624336.desop2)
c:RegisterEffect(e3)
end end
function c57624336.filter1(c) function c57624336.filter1(c)
return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable() return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsDestructable()
......
c57777714.lua
View file @ d83918c4
...@@ -2,35 +2,30 @@ ...@@ -2,35 +2,30 @@
function c57777714.initial_effect(c) function c57777714.initial_effect(c)
c:SetSPSummonOnce(57777714) c:SetSPSummonOnce(57777714)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c57777714.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetTargetRange(1,0) e2:SetTarget(c57777714.target)
e2:SetTarget(c57777714.splimit) e2:SetOperation(c57777714.operation)
e2:SetCondition(aux.nfbdncon)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCondition(c57777714.condition)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetTarget(c57777714.target)
e3:SetOperation(c57777714.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCondition(c57777714.condition)
c:RegisterEffect(e4)
end end
function c57777714.splimit(e,c,sump,sumtype,sumpos,targetp) function c57777714.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0xb5) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0xb5) or c:IsSetCard(0xc4) then return false end
......
c58016954.lua
View file @ d83918c4
--イェシャドール－セフィラナーガ --イェシャドール－セフィラナーガ
function c58016954.initial_effect(c) function c58016954.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c58016954.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_TOHAND)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetCountLimit(1,58016954)
e2:SetTarget(c58016954.splimit) e2:SetCondition(c58016954.condition1)
e2:SetCondition(aux.nfbdncon) e2:SetTarget(c58016954.target)
e2:SetOperation(c58016954.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_TO_GRAVE)
e3:SetCategory(CATEGORY_TOHAND) e3:SetCondition(aux.TRUE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCountLimit(1,58016954)
e3:SetCondition(c58016954.condition1)
e3:SetTarget(c58016954.target)
e3:SetOperation(c58016954.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_TO_GRAVE)
e4:SetCondition(aux.TRUE)
c:RegisterEffect(e4)
end end
function c58016954.splimit(e,c,sump,sumtype,sumpos,targetp) function c58016954.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9d) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9d) or c:IsSetCard(0xc4) then return false end
......
c58990362.lua
View file @ d83918c4
--秘竜星－セフィラシウゴ --秘竜星－セフィラシウゴ
function c58990362.initial_effect(c) function c58990362.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c58990362.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --search
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1,58990362)
e2:SetTargetRange(1,0) e2:SetCondition(c58990362.condition1)
e2:SetTarget(c58990362.splimit) e2:SetTarget(c58990362.target)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c58990362.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--search local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_DESTROYED)
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetCondition(c58990362.condition2)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCountLimit(1,58990362)
e3:SetCondition(c58990362.condition1)
e3:SetTarget(c58990362.target)
e3:SetOperation(c58990362.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_DESTROYED)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e4:SetCondition(c58990362.condition2)
c:RegisterEffect(e4)
end end
function c58990362.splimit(e,c,sump,sumtype,sumpos,targetp) function c58990362.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9e) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9e) or c:IsSetCard(0xc4) then return false end
......
c61639289.lua
View file @ d83918c4
--イグナイト・イーグル --イグナイト・イーグル
function c61639289.initial_effect(c) function c61639289.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c61639289.thcon)
e1:SetTarget(c61639289.thtg)
e1:SetOperation(c61639289.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c61639289.thcon)
e2:SetTarget(c61639289.thtg)
e2:SetOperation(c61639289.thop)
c:RegisterEffect(e2)
end end
function c61639289.thcon(e,tp,eg,ep,ev,re,r,rp) function c61639289.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c62312469.lua
View file @ d83918c4
--ダーク・ドリアード --ダーク・ドリアード
function c62312469.initial_effect(c) function c62312469.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c62312469.atktg)
e1:SetValue(c62312469.value)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EFFECT_UPDATE_DEFENCE)
e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c62312469.atktg)
e2:SetValue(c62312469.value)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_UPDATE_DEFENCE)
c:RegisterEffect(e3)
--deck sort --deck sort
local e4=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(62312469,0)) e3:SetDescription(aux.Stringid(62312469,0))
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e4:SetCode(EVENT_SUMMON_SUCCESS) e3:SetCode(EVENT_SUMMON_SUCCESS)
e4:SetTarget(c62312469.sttg) e3:SetTarget(c62312469.sttg)
e4:SetOperation(c62312469.stop) e3:SetOperation(c62312469.stop)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e5)
end end
function c62312469.atktg(e,c) function c62312469.atktg(e,c)
return c:IsAttribute(ATTRIBUTE_EARTH+ATTRIBUTE_WATER+ATTRIBUTE_FIRE+ATTRIBUTE_WIND) return c:IsAttribute(ATTRIBUTE_EARTH+ATTRIBUTE_WATER+ATTRIBUTE_FIRE+ATTRIBUTE_WIND)
......
c63251695.lua
View file @ d83918c4
--ダイナミスト・レックス --ダイナミスト・レックス
function c63251695.initial_effect(c) function c63251695.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(63251695,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DISABLE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_CHAIN_SOLVING)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c63251695.negcon)
e1:SetOperation(c63251695.negop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(63251695,0)) e2:SetCategory(CATEGORY_TODECK)
e2:SetCategory(CATEGORY_DISABLE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_DAMAGE_STEP_END)
e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetCondition(c63251695.effcon)
e2:SetRange(LOCATION_PZONE) e2:SetCost(c63251695.effcost)
e2:SetCondition(c63251695.negcon) e2:SetTarget(c63251695.efftg)
e2:SetOperation(c63251695.negop) e2:SetOperation(c63251695.effop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TODECK)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_DAMAGE_STEP_END)
e3:SetCondition(c63251695.effcon)
e3:SetCost(c63251695.effcost)
e3:SetTarget(c63251695.efftg)
e3:SetOperation(c63251695.effop)
c:RegisterEffect(e3)
end end
function c63251695.tfilter(c,tp) function c63251695.tfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) return c:IsFaceup() and c:IsSetCard(0xd8) and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD)
......
c64496451.lua
View file @ d83918c4
--クリフォート・ディスク --クリフォート・ディスク
function c64496451.initial_effect(c) function c64496451.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c64496451.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk up
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(aux.nfbdncon) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c64496451.splimit) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa))
e2:SetValue(300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(64496451,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa)) e3:SetCondition(c64496451.ntcon)
e3:SetValue(300)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(64496451,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c64496451.lvop)
e4:SetCondition(c64496451.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c64496451.lvop) e5:SetOperation(c64496451.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c64496451.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c64496451.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --summon success
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetDescription(aux.Stringid(64496451,1))
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCategory(CATEGORY_SPECIAL_SUMMON)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetRange(LOCATION_MZONE) e7:SetCode(EVENT_SUMMON_SUCCESS)
e7:SetCondition(c64496451.immcon) e7:SetCondition(c64496451.spcon)
e7:SetValue(aux.qlifilter) e7:SetTarget(c64496451.sptg)
e7:SetOperation(c64496451.spop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--summon success --tribute check
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(64496451,1)) e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCategory(CATEGORY_SPECIAL_SUMMON) e8:SetCode(EFFECT_MATERIAL_CHECK)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e8:SetValue(c64496451.valcheck)
e8:SetCode(EVENT_SUMMON_SUCCESS) e8:SetLabelObject(e7)
e8:SetCondition(c64496451.spcon)
e8:SetTarget(c64496451.sptg)
e8:SetOperation(c64496451.spop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--tribute check
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetCode(EFFECT_MATERIAL_CHECK)
e9:SetValue(c64496451.valcheck)
e9:SetLabelObject(e8)
c:RegisterEffect(e9)
end end
function c64496451.splimit(e,c) function c64496451.splimit(e,c)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c645794.lua
View file @ d83918c4
--マジェスペクター・フロッグ --マジェスペクター・フロッグ
function c645794.initial_effect(c) function c645794.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,645794)
e1:SetTarget(c645794.settg)
e1:SetOperation(c645794.setop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCountLimit(1,645794)
e2:SetTarget(c645794.settg)
e2:SetOperation(c645794.setop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--cannot target --cannot target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e4:SetValue(c645794.indval)
e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(c645794.indval)
c:RegisterEffect(e5)
end end
function c645794.filter(c) function c645794.filter(c)
return c:IsSetCard(0xd0) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable() return c:IsSetCard(0xd0) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
......
c64973287.lua
View file @ d83918c4
--ダイナミスト・プテラン --ダイナミスト・プテラン
function c64973287.initial_effect(c) function c64973287.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy replace
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetTarget(c64973287.reptg)
e1:SetValue(c64973287.repval)
e1:SetOperation(c64973287.repop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy replace --search
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(64973287,1))
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetTarget(c64973287.reptg) e2:SetCode(EVENT_BATTLE_DESTROYING)
e2:SetValue(c64973287.repval) e2:SetCondition(aux.bdocon)
e2:SetOperation(c64973287.repop) e2:SetTarget(c64973287.target)
e2:SetOperation(c64973287.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--search
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(64973287,1))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLE_DESTROYING)
e3:SetCondition(aux.bdocon)
e3:SetTarget(c64973287.target)
e3:SetOperation(c64973287.operation)
c:RegisterEffect(e3)
end end
function c64973287.repfilter(c,tp) function c64973287.repfilter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0xd8)
......
c65025250.lua
View file @ d83918c4
--妖仙獣 左鎌神柱 --妖仙獣 左鎌神柱
function c65025250.initial_effect(c) function c65025250.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy replace
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetTarget(c65025250.reptg)
e1:SetValue(c65025250.repval)
e1:SetOperation(c65025250.repop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy replace --to defence
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(65025250,0))
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetCategory(CATEGORY_POSITION)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetTarget(c65025250.reptg) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetValue(c65025250.repval) e2:SetTarget(c65025250.postg)
e2:SetOperation(c65025250.repop) e2:SetOperation(c65025250.posop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to defence --cannot be target
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(65025250,0)) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCategory(CATEGORY_POSITION) e3:SetCode(EFFECT_CANNOT_SELECT_EFFECT_TARGET)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e3:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e3:SetCode(EVENT_SUMMON_SUCCESS) e3:SetRange(LOCATION_MZONE)
e3:SetTarget(c65025250.postg) e3:SetTargetRange(0,0xff)
e3:SetOperation(c65025250.posop) e3:SetValue(c65025250.tgtg)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--cannot be target
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_CANNOT_SELECT_EFFECT_TARGET)
e4:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(0,0xff)
e4:SetValue(c65025250.tgtg)
c:RegisterEffect(e4)
end end
function c65025250.filter(c,tp) function c65025250.filter(c,tp)
return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE)
......
c65472618.lua
View file @ d83918c4
--魔装戦士 ドラゴディウス --魔装戦士 ドラゴディウス
function c65472618.initial_effect(c) function c65472618.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_START)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c65472618.atkcon)
e1:SetCost(c65472618.atkcost)
e1:SetOperation(c65472618.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --to hand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_ATKCHANGE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_DESTROYED)
e2:SetCode(EVENT_BATTLE_START) e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetRange(LOCATION_PZONE) e2:SetCondition(c65472618.regcon)
e2:SetCondition(c65472618.atkcon) e2:SetTarget(c65472618.regtg)
e2:SetCost(c65472618.atkcost) e2:SetOperation(c65472618.regop)
e2:SetOperation(c65472618.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to hand
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_DESTROYED)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCondition(c65472618.regcon)
e3:SetTarget(c65472618.regtg)
e3:SetOperation(c65472618.regop)
c:RegisterEffect(e3)
end end
function c65472618.atkcon(e,tp,eg,ep,ev,re,r,rp) function c65472618.atkcon(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker() local tc=Duel.GetAttacker()
......
c65518099.lua
View file @ d83918c4
--クリフォート・ツール --クリフォート・ツール
function c65518099.initial_effect(c) function c65518099.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c65518099.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(65518099,0))
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCountLimit(1)
e2:SetCondition(aux.nfbdncon) e2:SetCost(c65518099.cost)
e2:SetTarget(c65518099.splimit) e2:SetTarget(c65518099.target)
e2:SetOperation(c65518099.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(65518099,0))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1)
e3:SetCost(c65518099.cost)
e3:SetTarget(c65518099.target)
e3:SetOperation(c65518099.operation)
c:RegisterEffect(e3)
end end
function c65518099.splimit(e,c,tp,sumtp,sumpos) function c65518099.splimit(e,c,tp,sumtp,sumpos)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c67273917.lua
View file @ d83918c4
--イグナイト・デリンジャー --イグナイト・デリンジャー
function c67273917.initial_effect(c) function c67273917.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c67273917.thcon)
e1:SetTarget(c67273917.thtg)
e1:SetOperation(c67273917.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c67273917.thcon)
e2:SetTarget(c67273917.thtg)
e2:SetOperation(c67273917.thop)
c:RegisterEffect(e2)
end end
function c67273917.thcon(e,tp,eg,ep,ev,re,r,rp) function c67273917.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c68182934.lua
View file @ d83918c4
--Sky Dragoons of Draconia --Sky Dragoons of Draconia
function c68182934.initial_effect(c) function c68182934.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_DAMAGE)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCondition(c68182934.descon)
e1:SetTarget(c68182934.destg)
e1:SetOperation(c68182934.desop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_DAMAGE)
e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1)
e2:SetCondition(c68182934.descon)
e2:SetTarget(c68182934.destg)
e2:SetOperation(c68182934.desop)
c:RegisterEffect(e2)
end end
function c68182934.descon(e,tp,eg,ep,ev,re,r,rp) function c68182934.descon(e,tp,eg,ep,ev,re,r,rp)
local tc=eg:GetFirst() local tc=eg:GetFirst()
......
c68395509.lua
View file @ d83918c4
--マジェスペクター・クロウ --マジェスペクター・クロウ
function c68395509.initial_effect(c) function c68395509.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCountLimit(1,68395509)
e1:SetTarget(c68395509.thtg)
e1:SetOperation(c68395509.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1,68395509)
e2:SetTarget(c68395509.thtg)
e2:SetOperation(c68395509.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--cannot target --cannot target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e4:SetValue(c68395509.indval)
e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(c68395509.indval)
c:RegisterEffect(e5)
end end
function c68395509.thfilter(c) function c68395509.thfilter(c)
return c:IsSetCard(0xd0) and c:IsType(TYPE_SPELL) and c:IsAbleToHand() return c:IsSetCard(0xd0) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
......
c69211541.lua
View file @ d83918c4
--EMパートナーガ --EMパートナーガ
function c69211541.initial_effect(c) function c69211541.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(69211541,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c69211541.atktg)
e1:SetOperation(c69211541.atkop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --atk
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(69211541,0)) e2:SetDescription(aux.Stringid(69211541,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetCountLimit(1)
e2:SetTarget(c69211541.atktg) e2:SetTarget(c69211541.atktg)
e2:SetOperation(c69211541.atkop1) e2:SetOperation(c69211541.atkop2)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetDescription(aux.Stringid(69211541,1))
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetTarget(c69211541.atktg)
e3:SetOperation(c69211541.atkop2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
--cannot attack --cannot attack
local e5=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_FIELD) e4:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_CANNOT_ATTACK) e4:SetCode(EFFECT_CANNOT_ATTACK)
e5:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e5:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE) e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
e5:SetTarget(aux.TargetBoolFunction(Card.IsLevelBelow,5)) e4:SetTarget(aux.TargetBoolFunction(Card.IsLevelBelow,5))
c:RegisterEffect(e5) c:RegisterEffect(e4)
end end
function c69211541.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) function c69211541.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end
......
c69512157.lua
View file @ d83918c4
--竜魔王ベクターP --竜魔王ベクターP
function c69512157.initial_effect(c) function c69512157.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --disable
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(0,LOCATION_SZONE)
e1:SetTarget(c69512157.distg)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--disable --disable effect
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EFFECT_DISABLE) e2:SetCode(EVENT_CHAIN_SOLVING)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(0,LOCATION_SZONE) e2:SetOperation(c69512157.disop)
e2:SetTarget(c69512157.distg)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--disable effect
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EVENT_CHAIN_SOLVING)
e3:SetRange(LOCATION_PZONE)
e3:SetOperation(c69512157.disop)
c:RegisterEffect(e3)
end end
function c69512157.distg(e,c) function c69512157.distg(e,c)
return c:IsType(TYPE_SPELL) and (c:GetSequence()==6 or c:GetSequence()==7) return c:GetSequence()==6 or c:GetSequence()==7
end end
function c69512157.disop(e,tp,eg,ep,ev,re,r,rp) function c69512157.disop(e,tp,eg,ep,ev,re,r,rp)
local p,loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CONTROLER,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE) local p,loc,seq=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CONTROLER,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE)
......
c70026064.lua
View file @ d83918c4
--武神－ヒルコ --武神－ヒルコ
function c70026064.initial_effect(c) function c70026064.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetRange(LOCATION_PZONE)
e1:SetCost(c70026064.spcost)
e1:SetTarget(c70026064.sptg)
e1:SetOperation(c70026064.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_PZONE)
e2:SetCost(c70026064.spcost)
e2:SetTarget(c70026064.sptg)
e2:SetOperation(c70026064.spop)
c:RegisterEffect(e2)
end end
function c70026064.spcost(e,tp,eg,ep,ev,re,r,rp,chk) function c70026064.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
......
c70479321.lua
View file @ d83918c4
--EMドラミング・コング --EMドラミング・コング
function c70479321.initial_effect(c) function c70479321.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCondition(c70479321.atkcon)
e1:SetTarget(c70479321.atktg)
e1:SetOperation(c70479321.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --summon with no tribute
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_ATKCHANGE) e2:SetDescription(aux.Stringid(70479321,0))
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EFFECT_SUMMON_PROC)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCondition(c70479321.ntcon)
e2:SetCountLimit(1)
e2:SetCondition(c70479321.atkcon)
e2:SetTarget(c70479321.atktg)
e2:SetOperation(c70479321.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--summon with no tribute --change level
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(70479321,0))
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_UNCOPYABLE) e3:SetCode(EFFECT_SUMMON_COST)
e3:SetCode(EFFECT_SUMMON_PROC) e3:SetOperation(c70479321.lvop)
e3:SetCondition(c70479321.ntcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--change level
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_SUMMON_COST)
e4:SetOperation(c70479321.lvop)
c:RegisterEffect(e4)
--atk --atk
local e5=e2:Clone() local e4=e1:Clone()
e5:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e5:SetOperation(c70479321.atkop2) e4:SetOperation(c70479321.atkop2)
c:RegisterEffect(e5) c:RegisterEffect(e4)
end end
function c70479321.atkcon(e,tp,eg,ep,ev,re,r,rp) function c70479321.atkcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
......
c71578874.lua
View file @ d83918c4
--Emミラー・コンダクター --Emミラー・コンダクター
function c71578874.initial_effect(c) function c71578874.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk/def
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c71578874.adtg)
e1:SetOperation(c71578874.adop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk/def --swap
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_DAMAGE)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e2:SetHintTiming(TIMING_DAMAGE_STEP)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetTarget(c71578874.adtg) e2:SetCondition(c71578874.swcon)
e2:SetOperation(c71578874.adop) e2:SetTarget(c71578874.swtg)
e2:SetOperation(c71578874.swop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--swap
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DAMAGE)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
e3:SetHintTiming(TIMING_DAMAGE_STEP)
e3:SetCountLimit(1)
e3:SetCondition(c71578874.swcon)
e3:SetTarget(c71578874.swtg)
e3:SetOperation(c71578874.swop)
c:RegisterEffect(e3)
end end
function c71578874.filter(c) function c71578874.filter(c)
return c:IsFaceup() and c:GetAttack()~=c:GetDefence() return c:IsFaceup() and c:GetAttack()~=c:GetDefence()
......
c71692913.lua
View file @ d83918c4
--相克の魔術師 --相克の魔術師
function c71692913.initial_effect(c) function c71692913.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --xyz level
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c71692913.xyztg)
e1:SetOperation(c71692913.xyzop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--xyz level --disable
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1) e2:SetCountLimit(1)
e2:SetTarget(c71692913.xyztg) e2:SetTarget(c71692913.distg)
e2:SetOperation(c71692913.xyzop) e2:SetOperation(c71692913.disop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--disable
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DISABLE)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1)
e3:SetTarget(c71692913.distg)
e3:SetOperation(c71692913.disop)
c:RegisterEffect(e3)
end end
function c71692913.xyzfilter(c) function c71692913.xyzfilter(c)
return c:IsFaceup() and c:IsType(TYPE_XYZ) return c:IsFaceup() and c:IsType(TYPE_XYZ)
......
c72714461.lua
View file @ d83918c4
--慧眼の魔術師 --慧眼の魔術師
function c72714461.initial_effect(c) function c72714461.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --pendulum set
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(72714461,0)) e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c72714461.pencon)
e1:SetTarget(c72714461.pentg)
e1:SetOperation(c72714461.penop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--pendulum set --scale
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY) e2:SetDescription(aux.Stringid(72714461,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_HAND)
e2:SetCondition(c72714461.pencon) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetTarget(c72714461.pentg) e2:SetCost(c72714461.sccost)
e2:SetOperation(c72714461.penop) e2:SetTarget(c72714461.sctg)
e2:SetOperation(c72714461.scop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(72714461,1))
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_HAND)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCost(c72714461.sccost)
e3:SetTarget(c72714461.sctg)
e3:SetOperation(c72714461.scop)
c:RegisterEffect(e3)
end end
function c72714461.pencon(e,tp,eg,ep,ev,re,r,rp) function c72714461.pencon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c73130445.lua
View file @ d83918c4
--EMリザードロー --EMリザードロー
function c73130445.initial_effect(c) function c73130445.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DRAW)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,73130445)
e1:SetTarget(c73130445.destg)
e1:SetOperation(c73130445.desop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy --draw
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_DRAW) e2:SetCategory(CATEGORY_DRAW)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,73130445) e2:SetCode(EVENT_DESTROYED)
e2:SetTarget(c73130445.destg) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetOperation(c73130445.desop) e2:SetCountLimit(1,73130446)
e2:SetCondition(c73130445.drcon)
e2:SetTarget(c73130445.drtg)
e2:SetOperation(c73130445.drop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--draw
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DRAW)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_DESTROYED)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,73130446)
e3:SetCondition(c73130445.drcon)
e3:SetTarget(c73130445.drtg)
e3:SetOperation(c73130445.drop)
c:RegisterEffect(e3)
end end
function c73130445.destg(e,tp,eg,ep,ev,re,r,rp,chk) function c73130445.destg(e,tp,eg,ep,ev,re,r,rp,chk)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c73779005.lua
View file @ d83918c4
--ドラコニアの獣竜騎兵 --ドラコニアの獣竜騎兵
function c73779005.initial_effect(c) function c73779005.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --to hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLED)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetCondition(c73779005.thcon)
e1:SetTarget(c73779005.thtg)
e1:SetOperation(c73779005.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLED)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1)
e2:SetCondition(c73779005.thcon)
e2:SetTarget(c73779005.thtg)
e2:SetOperation(c73779005.thop)
c:RegisterEffect(e2)
end end
function c73779005.thcon(e,tp,eg,ep,ev,re,r,rp) function c73779005.thcon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker() local a=Duel.GetAttacker()
......
c74069667.lua
View file @ d83918c4
--DDD壊薙王アビス・ラグナロク --DDD壊薙王アビス・ラグナロク
function c74069667.initial_effect(c) function c74069667.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetRange(LOCATION_PZONE)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCountLimit(1,74069667)
e1:SetCondition(c74069667.spcon1)
e1:SetTarget(c74069667.sptg1)
e1:SetOperation(c74069667.spop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetCountLimit(1,74069668)
e2:SetCountLimit(1,74069667) e2:SetTarget(c74069667.sptg2)
e2:SetCondition(c74069667.spcon1) e2:SetOperation(c74069667.spop2)
e2:SetTarget(c74069667.sptg1)
e2:SetOperation(c74069667.spop1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e3:SetCountLimit(1,74069668)
e3:SetTarget(c74069667.sptg2)
e3:SetOperation(c74069667.spop2)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
--remove --remove
local e5=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e5:SetCategory(CATEGORY_REMOVE) e4:SetCategory(CATEGORY_REMOVE)
e5:SetType(EFFECT_TYPE_IGNITION) e4:SetType(EFFECT_TYPE_IGNITION)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e5:SetCountLimit(1) e4:SetCountLimit(1)
e5:SetCost(c74069667.rmcost) e4:SetCost(c74069667.rmcost)
e5:SetTarget(c74069667.rmtg) e4:SetTarget(c74069667.rmtg)
e5:SetOperation(c74069667.rmop) e4:SetOperation(c74069667.rmop)
c:RegisterEffect(e5) c:RegisterEffect(e4)
end end
function c74069667.cfilter(c,tp) function c74069667.cfilter(c,tp)
return c:IsFaceup() and c:IsSetCard(0xaf) and c:GetSummonPlayer()==tp return c:IsFaceup() and c:IsSetCard(0xaf) and c:GetSummonPlayer()==tp
......
c74605254.lua
View file @ d83918c4
--DD魔導賢者ガリレイ --DD魔導賢者ガリレイ
function c74605254.initial_effect(c) function c74605254.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(74605254,1)) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c74605254.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --scale change
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1)
e2:SetTargetRange(1,0) e2:SetCondition(c74605254.sccon)
e2:SetCondition(aux.nfbdncon) e2:SetTarget(c74605254.sctg)
e2:SetTarget(c74605254.splimit) e2:SetOperation(c74605254.scop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale change --tohand
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_DESTROY) e3:SetDescription(aux.Stringid(74605254,0))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetCategory(CATEGORY_TOHAND)
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_PHASE+PHASE_STANDBY) e3:SetCode(EVENT_FREE_CHAIN)
e3:SetCountLimit(1) e3:SetRange(LOCATION_HAND)
e3:SetCondition(c74605254.sccon) e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetTarget(c74605254.sctg) e3:SetCountLimit(1,74605254)
e3:SetOperation(c74605254.scop) e3:SetCost(c74605254.thcost)
e3:SetTarget(c74605254.thtg)
e3:SetOperation(c74605254.thop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--tohand
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(74605254,0))
e4:SetCategory(CATEGORY_TOHAND)
e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN)
e4:SetRange(LOCATION_HAND)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetCountLimit(1,74605254)
e4:SetCost(c74605254.thcost)
e4:SetTarget(c74605254.thtg)
e4:SetOperation(c74605254.thop)
c:RegisterEffect(e4)
end end
function c74605254.splimit(e,c,sump,sumtype,sumpos,targetp) function c74605254.splimit(e,c,sump,sumtype,sumpos,targetp)
return not c:IsSetCard(0xaf) and bit.band(sumtype,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM return not c:IsSetCard(0xaf) and bit.band(sumtype,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
......
c75195825.lua
View file @ d83918c4
--竜剣士マスターP --竜剣士マスターP
function c75195825.initial_effect(c) function c75195825.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(75195825,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_NO_TURN_RESET+EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c75195825.sctg)
e1:SetOperation(c75195825.scop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(75195825,0))
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_NO_TURN_RESET+EFFECT_FLAG_CARD_TARGET)
e2:SetCountLimit(1)
e2:SetTarget(c75195825.sctg)
e2:SetOperation(c75195825.scop)
c:RegisterEffect(e2)
end end
function c75195825.filter(c) function c75195825.filter(c)
return (c:GetSequence()==6 or c:GetSequence()==7) and c:IsDestructable() return (c:GetSequence()==6 or c:GetSequence()==7) and c:IsDestructable()
......
c7563579.lua
View file @ d83918c4
--Emヒグルミ --Emヒグルミ
function c7563579.initial_effect(c) function c7563579.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DAMAGE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_DESTROYED)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,7563579)
e1:SetCondition(c7563579.spcon1)
e1:SetTarget(c7563579.sptg1)
e1:SetOperation(c7563579.spop1)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DAMAGE) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_DESTROYED)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_DESTROYED)
e2:SetCountLimit(1,7563579) e2:SetCondition(c7563579.spcon2)
e2:SetCondition(c7563579.spcon1) e2:SetTarget(c7563579.sptg2)
e2:SetTarget(c7563579.sptg1) e2:SetOperation(c7563579.spop2)
e2:SetOperation(c7563579.spop1)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_DESTROYED)
e3:SetCondition(c7563579.spcon2)
e3:SetTarget(c7563579.sptg2)
e3:SetOperation(c7563579.spop2)
c:RegisterEffect(e3)
end end
function c7563579.cfilter(c,tp) function c7563579.cfilter(c,tp)
return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsSetCard(0xc6) return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsSetCard(0xc6)
......
c78274190.lua
View file @ d83918c4
--超重輝将サン－5 --超重輝将サン－5
function c78274190.initial_effect(c) function c78274190.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --scale
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CHANGE_LSCALE)
e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c78274190.sccon)
e1:SetValue(4)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--scale local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EFFECT_CHANGE_RSCALE)
e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCode(EFFECT_CHANGE_LSCALE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c78274190.sccon)
e2:SetValue(4)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e3)
--chain attack --chain attack
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(78274190,0))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLED)
e3:SetRange(LOCATION_PZONE)
e3:SetCountLimit(1)
e3:SetCondition(c78274190.cacon)
e3:SetOperation(c78274190.caop)
c:RegisterEffect(e3)
--draw
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(78274190,0)) e4:SetDescription(aux.Stringid(78274190,1))
e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCategory(CATEGORY_DRAW)
e4:SetCode(EVENT_BATTLED) e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_PZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1) e4:SetCountLimit(1,78274190)
e4:SetCondition(c78274190.cacon) e4:SetCondition(c78274190.condition)
e4:SetOperation(c78274190.caop) e4:SetCost(c78274190.cost)
e4:SetTarget(c78274190.target)
e4:SetOperation(c78274190.operation)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--draw --add setcode
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(78274190,1)) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCategory(CATEGORY_DRAW) e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e5:SetType(EFFECT_TYPE_IGNITION) e5:SetCode(EFFECT_ADD_SETCODE)
e5:SetRange(LOCATION_MZONE) e5:SetValue(0x9a)
e5:SetCountLimit(1,78274190)
e5:SetCondition(c78274190.condition)
e5:SetCost(c78274190.cost)
e5:SetTarget(c78274190.target)
e5:SetOperation(c78274190.operation)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--add setcode
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e6:SetCode(EFFECT_ADD_SETCODE)
e6:SetValue(0x9a)
c:RegisterEffect(e6)
end end
function c78274190.sccon(e) function c78274190.sccon(e)
local tp=e:GetHandlerPlayer() local tp=e:GetHandlerPlayer()
......
c78835747.lua
View file @ d83918c4
--EMカレイドスコーピオン --EMカレイドスコーピオン
function c78835747.initial_effect(c) function c78835747.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c78835747.atktg)
e1:SetValue(300)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --attack all
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(78835747,0))
e2:SetCode(EFFECT_UPDATE_ATTACK) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetTargetRange(LOCATION_MZONE,0) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetTarget(c78835747.atktg) e2:SetCountLimit(1)
e2:SetValue(300) e2:SetCondition(c78835747.condition)
e2:SetTarget(c78835747.target)
e2:SetOperation(c78835747.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--attack all
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(78835747,0))
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1)
e3:SetCondition(c78835747.condition)
e3:SetTarget(c78835747.target)
e3:SetOperation(c78835747.operation)
c:RegisterEffect(e3)
end end
function c78835747.atktg(e,c) function c78835747.atktg(e,c)
return c:IsAttribute(ATTRIBUTE_LIGHT) return c:IsAttribute(ATTRIBUTE_LIGHT)
......
c80335817.lua
View file @ d83918c4
--刻剣の魔術師 --刻剣の魔術師
function c80335817.initial_effect(c) function c80335817.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_DESTROY_REPLACE)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c80335817.indtg)
e1:SetValue(c80335817.indval)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --double
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_DESTROY_REPLACE) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetTarget(c80335817.indtg) e2:SetCondition(c80335817.atkcon)
e2:SetValue(c80335817.indval) e2:SetOperation(c80335817.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--double --Banish
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCategory(CATEGORY_REMOVE)
e3:SetCode(EVENT_SPSUMMON_SUCCESS) e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCondition(c80335817.atkcon) e3:SetRange(LOCATION_MZONE)
e3:SetOperation(c80335817.atkop) e3:SetCountLimit(1)
e3:SetTarget(c80335817.rmtg)
e3:SetOperation(c80335817.rmop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--Banish
local e4=Effect.CreateEffect(c)
e4:SetCategory(CATEGORY_REMOVE)
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetRange(LOCATION_MZONE)
e4:SetCountLimit(1)
e4:SetTarget(c80335817.rmtg)
e4:SetOperation(c80335817.rmop)
c:RegisterEffect(e4)
end end
function c80335817.filter(c,tp) function c80335817.filter(c,tp)
return c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsType(TYPE_PENDULUM) return c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsType(TYPE_PENDULUM)
......
c81571633.lua
View file @ d83918c4
--DDプラウド・オーガ --DDプラウド・オーガ
function c81571633.initial_effect(c) function c81571633.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(81571633,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetCost(c81571633.atkcost)
e1:SetTarget(c81571633.atktg)
e1:SetOperation(c81571633.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --scale
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(81571633,0)) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CHANGE_LSCALE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCondition(c81571633.sccon)
e2:SetCountLimit(1) e2:SetValue(5)
e2:SetCost(c81571633.atkcost)
e2:SetTarget(c81571633.atktg)
e2:SetOperation(c81571633.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--scale local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EFFECT_CHANGE_RSCALE)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetCode(EFFECT_CHANGE_LSCALE)
e3:SetRange(LOCATION_PZONE)
e3:SetCondition(c81571633.sccon)
e3:SetValue(5)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e4)
--spsummon --spsummon
local e5=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(81571633,1)) e4:SetDescription(aux.Stringid(81571633,1))
e5:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetCode(EVENT_SUMMON_SUCCESS) e4:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetTarget(c81571633.sptg) e4:SetTarget(c81571633.sptg)
e5:SetOperation(c81571633.spop) e4:SetOperation(c81571633.spop)
c:RegisterEffect(e5) c:RegisterEffect(e4)
end end
function c81571633.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) function c81571633.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLPCost(tp,500) end if chk==0 then return Duel.CheckLPCost(tp,500) end
......
c82114013.lua
View file @ d83918c4
--ドラコニアの海竜騎兵 --ドラコニアの海竜騎兵
function c82114013.initial_effect(c) function c82114013.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_DESTROYED)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,82114013)
e1:SetTarget(c82114013.sptg)
e1:SetOperation(c82114013.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_DESTROYED)
e2:SetRange(LOCATION_PZONE)
e2:SetCountLimit(1,82114013)
e2:SetTarget(c82114013.sptg)
e2:SetOperation(c82114013.spop)
c:RegisterEffect(e2)
end end
function c82114013.spfilter(c,e,tp) function c82114013.spfilter(c,e,tp)
return c:IsType(TYPE_NORMAL) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsType(TYPE_NORMAL) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
......
c83980492.lua
View file @ d83918c4
--銅鑼ドラゴン --銅鑼ドラゴン
function c83980492.initial_effect(c) function c83980492.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
end end
c84388461.lua
View file @ d83918c4
--剣聖の影霊衣－セフィラセイバー --剣聖の影霊衣－セフィラセイバー
function c84388461.initial_effect(c) function c84388461.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(84388461,0)) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c84388461.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_PZONE) e2:SetDescription(aux.Stringid(84388461,1))
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCountLimit(1,84388461)
e2:SetTargetRange(1,0) e2:SetRange(LOCATION_MZONE+LOCATION_HAND)
e2:SetTarget(c84388461.splimit) e2:SetCost(c84388461.cost)
e2:SetCondition(aux.nfbdncon) e2:SetTarget(c84388461.target)
e2:SetOperation(c84388461.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetDescription(aux.Stringid(84388461,1))
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetCountLimit(1,84388461)
e3:SetRange(LOCATION_MZONE+LOCATION_HAND)
e3:SetCost(c84388461.cost)
e3:SetTarget(c84388461.target)
e3:SetOperation(c84388461.operation)
c:RegisterEffect(e3)
end end
function c84388461.splimit(e,c,sump,sumtype,sumpos,targetp) function c84388461.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0xb4) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0xb4) or c:IsSetCard(0xc4) then return false end
......
c87475570.lua
View file @ d83918c4
--宝玉の先導者 --宝玉の先導者
function c87475570.initial_effect(c) function c87475570.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --cannot be target
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(LOCATION_ONFIELD,0)
e1:SetTarget(c87475570.tgtg)
e1:SetValue(aux.tgoval)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--cannot be target --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetDescription(aux.Stringid(87475570,0))
e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetTargetRange(LOCATION_ONFIELD,0) e2:SetRange(LOCATION_MZONE)
e2:SetTarget(c87475570.tgtg) e2:SetCost(c87475570.cost)
e2:SetValue(aux.tgoval) e2:SetTarget(c87475570.target)
e2:SetOperation(c87475570.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(87475570,0))
e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCost(c87475570.cost)
e3:SetTarget(c87475570.target)
e3:SetOperation(c87475570.operation)
c:RegisterEffect(e3)
end end
function c87475570.tgtg(e,c) function c87475570.tgtg(e,c)
return c:IsSetCard(0x1034) or (c:IsLocation(LOCATION_MZONE) and (c:IsCode(79407975) or c:IsCode(79856792))) return c:IsSetCard(0x1034) or (c:IsLocation(LOCATION_MZONE) and (c:IsCode(79407975) or c:IsCode(79856792)))
......
c87588741.lua
View file @ d83918c4
--クリフォート・アクセス --クリフォート・アクセス
function c87588741.initial_effect(c) function c87588741.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c87588741.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk down
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(aux.nfbdncon) e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetTarget(c87588741.splimit) e2:SetValue(-300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk down --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(87588741,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(0,LOCATION_MZONE) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetValue(-300) e3:SetCondition(c87588741.ntcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(87588741,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c87588741.lvop)
e4:SetCondition(c87588741.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c87588741.lvop) e5:SetOperation(c87588741.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c87588741.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c87588741.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --damage
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetDescription(aux.Stringid(87588741,1))
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCategory(CATEGORY_DAMAGE+CATEGORY_RECOVER)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetRange(LOCATION_MZONE) e7:SetCode(EVENT_SUMMON_SUCCESS)
e7:SetCondition(c87588741.immcon) e7:SetCondition(c87588741.damcon)
e7:SetValue(aux.qlifilter) e7:SetTarget(c87588741.damtg)
e7:SetOperation(c87588741.damop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--damage --tribute check
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(87588741,1)) e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCategory(CATEGORY_DAMAGE+CATEGORY_RECOVER) e8:SetCode(EFFECT_MATERIAL_CHECK)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e8:SetCode(EVENT_SUMMON_SUCCESS) e8:SetValue(c87588741.valcheck)
e8:SetCondition(c87588741.damcon) e8:SetLabelObject(e7)
e8:SetTarget(c87588741.damtg)
e8:SetOperation(c87588741.damop)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--tribute check
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetCode(EFFECT_MATERIAL_CHECK)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e9:SetValue(c87588741.valcheck)
e9:SetLabelObject(e8)
c:RegisterEffect(e9)
end end
function c87588741.splimit(e,c) function c87588741.splimit(e,c)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c88757791.lua
View file @ d83918c4
--法眼の魔術師 --法眼の魔術師
function c88757791.initial_effect(c) function c88757791.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --change scale
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(88757791,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
e1:SetCountLimit(1)
e1:SetTarget(c88757791.sctg)
e1:SetOperation(c88757791.scop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--change scale --indes
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(88757791,0)) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetOperation(c88757791.sumsuc)
e2:SetCountLimit(1)
e2:SetTarget(c88757791.sctg)
e2:SetOperation(c88757791.scop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--indes
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCode(EVENT_SPSUMMON_SUCCESS) e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetRange(LOCATION_MZONE)
e3:SetOperation(c88757791.sumsuc) e3:SetTargetRange(LOCATION_MZONE,0)
e3:SetCondition(c88757791.indcon)
e3:SetTarget(c88757791.indtg)
e3:SetValue(c88757791.indval)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(LOCATION_MZONE,0)
e4:SetCondition(c88757791.indcon)
e4:SetTarget(c88757791.indtg)
e4:SetValue(c88757791.indval)
c:RegisterEffect(e4)
end end
function c88757791.cfilter(c,tp) function c88757791.cfilter(c,tp)
return c:IsType(TYPE_PENDULUM) and not c:IsPublic() return c:IsType(TYPE_PENDULUM) and not c:IsPublic()
......
c88935103.lua
View file @ d83918c4
--貴竜の魔術師 --貴竜の魔術師
function c88935103.initial_effect(c) function c88935103.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --selfdes
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(88935103,0)) e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_SELF_DESTROY)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c88935103.descon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--selfdes --synchro limit
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e2:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
e2:SetCode(EFFECT_SELF_DESTROY) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_PZONE) e2:SetValue(c88935103.synlimit)
e2:SetCondition(c88935103.descon)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--synchro limit --todeck
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e3:SetCode(EFFECT_SEND_REPLACE)
e3:SetValue(c88935103.synlimit) e3:SetTarget(c88935103.check)
e3:SetValue(aux.FALSE)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--todeck --spsummon
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e4:SetDescription(aux.Stringid(88935103,1))
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
e4:SetCode(EFFECT_SEND_REPLACE) e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
e4:SetTarget(c88935103.check) e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetValue(aux.FALSE) e4:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e4:SetTarget(c88935103.sptg)
e4:SetOperation(c88935103.spop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--spsummon
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(88935103,1))
e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
e5:SetType(EFFECT_TYPE_IGNITION)
e5:SetRange(LOCATION_HAND+LOCATION_GRAVE)
e5:SetTarget(c88935103.sptg)
e5:SetOperation(c88935103.spop)
c:RegisterEffect(e5)
end end
function c88935103.descon(e) function c88935103.descon(e)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c89113320.lua
View file @ d83918c4
--EMビッグバイトタートル --EMビッグバイトタートル
function c89113320.initial_effect(c) function c89113320.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --lv
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(89113320,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c89113320.lvtg)
e1:SetOperation(c89113320.lvop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--lv --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(89113320,0)) e2:SetDescription(aux.Stringid(89113320,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_DESTROY)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCountLimit(1) e2:SetCode(EVENT_BATTLE_DESTROYED)
e2:SetTarget(c89113320.lvtg) e2:SetTarget(c89113320.target)
e2:SetOperation(c89113320.lvop) e2:SetOperation(c89113320.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(89113320,1))
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_BATTLE_DESTROYED)
e3:SetTarget(c89113320.target)
e3:SetOperation(c89113320.operation)
c:RegisterEffect(e3)
end end
function c89113320.filter(c) function c89113320.filter(c)
return (c:IsSetCard(0x9f) or c:IsSetCard(0x99)) and c:IsType(TYPE_MONSTER) return (c:IsSetCard(0x9f) or c:IsSetCard(0x99)) and c:IsType(TYPE_MONSTER)
......
c90885155.lua
View file @ d83918c4
--クリフォート・シェル --クリフォート・シェル
function c90885155.initial_effect(c) function c90885155.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c90885155.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk down
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(aux.nfbdncon) e2:SetTargetRange(0,LOCATION_MZONE)
e2:SetTarget(c90885155.splimit) e2:SetValue(-300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk down --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(90885155,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(0,LOCATION_MZONE) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetValue(-300) e3:SetCondition(c90885155.ntcon)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(90885155,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c90885155.lvop)
e4:SetCondition(c90885155.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c90885155.lvop) e5:SetOperation(c90885155.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c90885155.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c90885155.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --effect
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCode(EVENT_SUMMON_SUCCESS)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e7:SetRange(LOCATION_MZONE) e7:SetCondition(c90885155.effcon)
e7:SetCondition(c90885155.immcon) e7:SetOperation(c90885155.effop)
e7:SetValue(aux.qlifilter)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--effect --tribute check
local e8=Effect.CreateEffect(c) local e8=Effect.CreateEffect(c)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e8:SetType(EFFECT_TYPE_SINGLE)
e8:SetCode(EVENT_SUMMON_SUCCESS) e8:SetCode(EFFECT_MATERIAL_CHECK)
e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e8:SetCondition(c90885155.effcon) e8:SetValue(c90885155.valcheck)
e8:SetOperation(c90885155.effop) e8:SetLabelObject(e7)
c:RegisterEffect(e8) c:RegisterEffect(e8)
--tribute check
local e9=Effect.CreateEffect(c)
e9:SetType(EFFECT_TYPE_SINGLE)
e9:SetCode(EFFECT_MATERIAL_CHECK)
e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
e9:SetValue(c90885155.valcheck)
e9:SetLabelObject(e8)
c:RegisterEffect(e9)
end end
function c90885155.splimit(e,c) function c90885155.splimit(e,c)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c91420254.lua
View file @ d83918c4
--妖仙獣 右鎌神柱 --妖仙獣 右鎌神柱
function c91420254.initial_effect(c) function c91420254.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --scale change
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(91420254,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetCondition(c91420254.sccon)
e1:SetOperation(c91420254.scop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--scale change --to defence
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(91420254,0)) e2:SetDescription(aux.Stringid(91420254,1))
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_POSITION)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
e2:SetCountLimit(1) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetCondition(c91420254.sccon) e2:SetTarget(c91420254.postg)
e2:SetOperation(c91420254.scop) e2:SetOperation(c91420254.posop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--to defence --cannot be battle target
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(91420254,1)) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetCategory(CATEGORY_POSITION) e3:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F) e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_SUMMON_SUCCESS) e3:SetTargetRange(0,LOCATION_MZONE)
e3:SetTarget(c91420254.postg) e3:SetValue(c91420254.bttg)
e3:SetOperation(c91420254.posop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--cannot be battle target
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(0,LOCATION_MZONE)
e4:SetValue(c91420254.bttg)
c:RegisterEffect(e4)
end end
function c91420254.sccon(e,tp,eg,ep,ev,re,r,rp) function c91420254.sccon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c91584698.lua
View file @ d83918c4
--EMトランプ・ウィッチ --EMトランプ・ウィッチ
function c91584698.initial_effect(c) function c91584698.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --spsummon
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetTarget(c91584698.sptg)
e1:SetOperation(c91584698.spop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--spsummon --tohand
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCategory(CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1) e2:SetCost(c91584698.thcost)
e2:SetTarget(c91584698.sptg) e2:SetTarget(c91584698.thtg)
e2:SetOperation(c91584698.spop) e2:SetOperation(c91584698.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--tohand
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetCost(c91584698.thcost)
e3:SetTarget(c91584698.thtg)
e3:SetOperation(c91584698.thop)
c:RegisterEffect(e3)
end end
function c91584698.filter1(c,e) function c91584698.filter1(c,e)
return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
......
c91907707.lua
View file @ d83918c4
--クリフォート・アーカイブ --クリフォート・アーカイブ
function c91907707.initial_effect(c) function c91907707.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetCondition(aux.nfbdncon)
e1:SetTarget(c91907707.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --atk up
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetCondition(aux.nfbdncon) e2:SetTargetRange(LOCATION_MZONE,0)
e2:SetTarget(c91907707.splimit) e2:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa))
e2:SetValue(300)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--atk up --summon with no tribute
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetDescription(aux.Stringid(91907707,0))
e3:SetRange(LOCATION_PZONE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_UPDATE_ATTACK) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetTargetRange(LOCATION_MZONE,0) e3:SetCode(EFFECT_SUMMON_PROC)
e3:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xaa)) e3:SetCondition(c91907707.ntcon)
e3:SetValue(300)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--summon with no tribute --change level
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(91907707,0))
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetCode(EFFECT_SUMMON_COST)
e4:SetCode(EFFECT_SUMMON_PROC) e4:SetOperation(c91907707.lvop)
e4:SetCondition(c91907707.ntcon)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--change level
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetCode(EFFECT_SUMMON_COST) e5:SetCode(EFFECT_SPSUMMON_COST)
e5:SetOperation(c91907707.lvop) e5:SetOperation(c91907707.lvop2)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--immune
local e6=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_SINGLE) e6:SetType(EFFECT_TYPE_SINGLE)
e6:SetCode(EFFECT_SPSUMMON_COST) e6:SetCode(EFFECT_IMMUNE_EFFECT)
e6:SetOperation(c91907707.lvop2) e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE)
e6:SetRange(LOCATION_MZONE)
e6:SetCondition(c91907707.immcon)
e6:SetValue(aux.qlifilter)
c:RegisterEffect(e6) c:RegisterEffect(e6)
--immune --tohand
local e7=Effect.CreateEffect(c) local e7=Effect.CreateEffect(c)
e7:SetType(EFFECT_TYPE_SINGLE) e7:SetDescription(aux.Stringid(91907707,1))
e7:SetCode(EFFECT_IMMUNE_EFFECT) e7:SetCategory(CATEGORY_TOHAND)
e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE) e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e7:SetRange(LOCATION_MZONE) e7:SetCode(EVENT_RELEASE)
e7:SetCondition(c91907707.immcon) e7:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e7:SetValue(aux.qlifilter) e7:SetTarget(c91907707.thtg)
e7:SetOperation(c91907707.thop)
c:RegisterEffect(e7) c:RegisterEffect(e7)
--tohand
local e8=Effect.CreateEffect(c)
e8:SetDescription(aux.Stringid(91907707,1))
e8:SetCategory(CATEGORY_TOHAND)
e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e8:SetCode(EVENT_RELEASE)
e8:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e8:SetTarget(c91907707.thtg)
e8:SetOperation(c91907707.thop)
c:RegisterEffect(e8)
end end
function c91907707.splimit(e,c) function c91907707.splimit(e,c)
return not c:IsSetCard(0xaa) return not c:IsSetCard(0xaa)
......
c92536468.lua
View file @ d83918c4
--DDD反骨王レオニダス --DDD反骨王レオニダス
function c92536468.initial_effect(c) function c92536468.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --reverse damage
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EVENT_DAMAGE)
e1:SetCondition(c92536468.effcon)
e1:SetTarget(c92536468.revtg)
e1:SetOperation(c92536468.revop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--reverse damage --special summon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_HAND)
e2:SetCode(EVENT_DAMAGE) e2:SetCode(EVENT_DAMAGE)
e2:SetCondition(c92536468.effcon) e2:SetCondition(c92536468.effcon)
e2:SetTarget(c92536468.revtg) e2:SetTarget(c92536468.sptg)
e2:SetOperation(c92536468.revop) e2:SetOperation(c92536468.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--special summon --avoid damage
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_RECOVER) e3:SetType(EFFECT_TYPE_FIELD)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e3:SetRange(LOCATION_HAND) e3:SetCode(EFFECT_CHANGE_DAMAGE)
e3:SetCode(EVENT_DAMAGE) e3:SetRange(LOCATION_MZONE)
e3:SetCondition(c92536468.effcon) e3:SetTargetRange(1,0)
e3:SetTarget(c92536468.sptg) e3:SetValue(c92536468.damval)
e3:SetOperation(c92536468.spop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--avoid damage local e4=e3:Clone()
local e4=Effect.CreateEffect(c) e4:SetCode(EFFECT_NO_EFFECT_DAMAGE)
e4:SetType(EFFECT_TYPE_FIELD)
e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e4:SetCode(EFFECT_CHANGE_DAMAGE)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(1,0)
e4:SetValue(c92536468.damval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EFFECT_NO_EFFECT_DAMAGE)
c:RegisterEffect(e5)
end end
function c92536468.effcon(e,tp,eg,ep,ev,re,r,rp) function c92536468.effcon(e,tp,eg,ep,ev,re,r,rp)
return ep==tp and bit.band(r,REASON_EFFECT)~=0 return ep==tp and bit.band(r,REASON_EFFECT)~=0
......
c92746535.lua
View file @ d83918c4
--竜剣士ラスターP --竜剣士ラスターP
function c92746535.initial_effect(c) function c92746535.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --to hand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1)
e1:SetCondition(c92746535.thcon)
e1:SetTarget(c92746535.thtg)
e1:SetOperation(c92746535.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--to hand --cannot be material
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetType(EFFECT_TYPE_IGNITION) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
e2:SetCountLimit(1) e2:SetValue(c92746535.splimit)
e2:SetCondition(c92746535.thcon)
e2:SetTarget(c92746535.thtg)
e2:SetOperation(c92746535.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--cannot be material local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
e3:SetValue(c92746535.splimit)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e2:Clone()
e4:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL) e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e3:Clone()
e5:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
c:RegisterEffect(e5)
end end
function c92746535.thcon(e,tp,eg,ep,ev,re,r,rp) function c92746535.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c92870717.lua
View file @ d83918c4
--魔装戦士 ドラゴノックス --魔装戦士 ドラゴノックス
function c92870717.initial_effect(c) function c92870717.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c92870717.descon)
e1:SetTarget(c92870717.destg)
e1:SetOperation(c92870717.desop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
-- --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetRange(LOCATION_MZONE)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetCondition(c92870717.descon) e2:SetCountLimit(1)
e2:SetTarget(c92870717.destg) e2:SetCost(c92870717.spcost)
e2:SetOperation(c92870717.desop) e2:SetTarget(c92870717.sptg)
e2:SetOperation(c92870717.spop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon
local e3=Effect.CreateEffect(c)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1)
e3:SetCost(c92870717.spcost)
e3:SetTarget(c92870717.sptg)
e3:SetOperation(c92870717.spop)
c:RegisterEffect(e3)
end end
function c92870717.descon(e,tp,eg,ep,ev,re,r,rp) function c92870717.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp return Duel.GetTurnPlayer()~=tp
......
c93124273.lua
View file @ d83918c4
--Samurai Calvary of Reptier --Samurai Calvary of Reptier
function c93124273.initial_effect(c) function c93124273.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --destroy
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(93124273,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_DESTROY)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_BATTLE_START)
e1:SetTarget(c93124273.target)
e1:SetOperation(c93124273.operation)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--destroy
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(93124273,0))
e2:SetCategory(CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_BATTLE_START)
e2:SetTarget(c93124273.target)
e2:SetOperation(c93124273.operation)
c:RegisterEffect(e2)
end end
function c93124273.target(e,tp,eg,ep,ev,re,r,rp,chk) function c93124273.target(e,tp,eg,ep,ev,re,r,rp,chk)
local d=Duel.GetAttackTarget() local d=Duel.GetAttackTarget()
......
c93368494.lua
View file @ d83918c4
--魔妖仙獣 大刃禍是 --魔妖仙獣 大刃禍是
function c93368494.initial_effect(c) function c93368494.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --atk
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetDescription(aux.Stringid(93368494,0))
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCategory(CATEGORY_ATKCHANGE)
e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c93368494.atkcon)
e1:SetOperation(c93368494.atkop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--atk --spsummon limit
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(93368494,0)) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetCategory(CATEGORY_ATKCHANGE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EFFECT_SPSUMMON_CONDITION)
e2:SetCode(EVENT_ATTACK_ANNOUNCE) e2:SetValue(aux.penlimit)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c93368494.atkcon)
e2:SetOperation(c93368494.atkop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon limit --cannot disable
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON)
e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
e3:SetCode(EFFECT_SPSUMMON_CONDITION)
e3:SetValue(aux.penlimit)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--cannot disable --tohand
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetDescription(aux.Stringid(93368494,1))
e4:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON) e4:SetCategory(CATEGORY_TOHAND)
e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e4:SetCode(EVENT_SUMMON_SUCCESS)
e4:SetTarget(c93368494.thtg)
e4:SetOperation(c93368494.thop)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--tohand local e5=e4:Clone()
local e5=Effect.CreateEffect(c) e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetDescription(aux.Stringid(93368494,1))
e5:SetCategory(CATEGORY_TOHAND)
e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e5:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e5:SetCode(EVENT_SUMMON_SUCCESS)
e5:SetTarget(c93368494.thtg)
e5:SetOperation(c93368494.thop)
c:RegisterEffect(e5) c:RegisterEffect(e5)
local e6=e5:Clone()
e6:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e6)
--return --return
local e7=Effect.CreateEffect(c) local e6=Effect.CreateEffect(c)
e7:SetDescription(aux.Stringid(93368494,2)) e6:SetDescription(aux.Stringid(93368494,2))
e7:SetCategory(CATEGORY_TOHAND) e6:SetCategory(CATEGORY_TOHAND)
e7:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
e7:SetRange(LOCATION_MZONE) e6:SetRange(LOCATION_MZONE)
e7:SetCountLimit(1) e6:SetCountLimit(1)
e7:SetCode(EVENT_PHASE+PHASE_END) e6:SetCode(EVENT_PHASE+PHASE_END)
e7:SetCondition(c93368494.retcon) e6:SetCondition(c93368494.retcon)
e7:SetTarget(c93368494.rettg) e6:SetTarget(c93368494.rettg)
e7:SetOperation(c93368494.retop) e6:SetOperation(c93368494.retop)
c:RegisterEffect(e7) c:RegisterEffect(e6)
if not c93368494.global_check then if not c93368494.global_check then
c93368494.global_check=true c93368494.global_check=true
local ge1=Effect.CreateEffect(c) local ge1=Effect.CreateEffect(c)
......
c93662626.lua
View file @ d83918c4
--イグナイト・ウージー --イグナイト・ウージー
function c93662626.initial_effect(c) function c93662626.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c93662626.thcon)
e1:SetTarget(c93662626.thtg)
e1:SetOperation(c93662626.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c93662626.thcon)
e2:SetTarget(c93662626.thtg)
e2:SetOperation(c93662626.thop)
c:RegisterEffect(e2)
end end
function c93662626.thcon(e,tp,eg,ep,ev,re,r,rp) function c93662626.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c94415058.lua
View file @ d83918c4
--星読みの魔術師 --星読みの魔術師
function c94415058.initial_effect(c) function c94415058.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --actlimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_ATTACK_ANNOUNCE)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c94415058.actcon)
e1:SetOperation(c94415058.actop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--actlimit local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_BE_BATTLE_TARGET)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c94415058.actcon)
e2:SetOperation(c94415058.actop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_BE_BATTLE_TARGET)
c:RegisterEffect(e3)
--scale --scale
local e4=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_CHANGE_LSCALE) e3:SetCode(EFFECT_CHANGE_LSCALE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetRange(LOCATION_PZONE) e3:SetRange(LOCATION_PZONE)
e4:SetCondition(c94415058.sccon) e3:SetCondition(c94415058.sccon)
e4:SetValue(4) e3:SetValue(4)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e4:Clone()
e5:SetCode(EFFECT_CHANGE_RSCALE)
c:RegisterEffect(e5)
-- --
local e6=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e6:SetDescription(aux.Stringid(94415058,0)) e5:SetDescription(aux.Stringid(94415058,0))
e6:SetCategory(CATEGORY_SPECIAL_SUMMON) e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e6:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e6:SetCode(EVENT_TO_HAND) e5:SetCode(EVENT_TO_HAND)
e6:SetRange(LOCATION_MZONE) e5:SetRange(LOCATION_MZONE)
e6:SetCountLimit(1) e5:SetCountLimit(1)
e6:SetCondition(c94415058.spcon) e5:SetCondition(c94415058.spcon)
e6:SetTarget(c94415058.sptg) e5:SetTarget(c94415058.sptg)
e6:SetOperation(c94415058.spop) e5:SetOperation(c94415058.spop)
c:RegisterEffect(e6) c:RegisterEffect(e5)
end end
function c94415058.actcon(e,tp,eg,ep,ev,re,r,rp) function c94415058.actcon(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetAttacker() local tc=Duel.GetAttacker()
......
c94784213.lua
View file @ d83918c4
--マジェスペクター・フォックス --マジェスペクター・フォックス
function c94784213.initial_effect(c) function c94784213.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --search
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e1:SetCountLimit(1,94784213)
e1:SetTarget(c94784213.thtg)
e1:SetOperation(c94784213.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--search local e2=e1:Clone()
local e2=Effect.CreateEffect(c) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
e2:SetCountLimit(1,94784213)
e2:SetTarget(c94784213.thtg)
e2:SetOperation(c94784213.thop)
c:RegisterEffect(e2) c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
--cannot target --cannot target
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
e3:SetValue(aux.tgoval)
c:RegisterEffect(e3)
--indes
local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE) e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e4:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e4:SetRange(LOCATION_MZONE) e4:SetRange(LOCATION_MZONE)
e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET) e4:SetValue(c94784213.indval)
e4:SetValue(aux.tgoval)
c:RegisterEffect(e4) c:RegisterEffect(e4)
--indes
local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE)
e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e5:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
e5:SetRange(LOCATION_MZONE)
e5:SetValue(c94784213.indval)
c:RegisterEffect(e5)
end end
function c94784213.thfilter(c) function c94784213.thfilter(c)
return c:IsSetCard(0xd0) and c:IsType(TYPE_TRAP) and c:IsAbleToHand() return c:IsSetCard(0xd0) and c:IsType(TYPE_TRAP) and c:IsAbleToHand()
......
c95401059.lua
View file @ d83918c4
--オルシャドール－セフィラルーツ --オルシャドール－セフィラルーツ
function c95401059.initial_effect(c) function c95401059.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetTarget(c95401059.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --spsummon
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetRange(LOCATION_PZONE) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_SPSUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetCountLimit(1,95401059)
e2:SetTarget(c95401059.splimit) e2:SetCondition(c95401059.condition1)
e2:SetCondition(aux.nfbdncon) e2:SetTarget(c95401059.target)
e2:SetOperation(c95401059.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--spsummon local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_TO_GRAVE)
e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetCondition(aux.TRUE)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetCountLimit(1,95401059)
e3:SetCondition(c95401059.condition1)
e3:SetTarget(c95401059.target)
e3:SetOperation(c95401059.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_TO_GRAVE)
e4:SetCondition(aux.TRUE)
c:RegisterEffect(e4)
end end
function c95401059.splimit(e,c,sump,sumtype,sumpos,targetp) function c95401059.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9d) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9d) or c:IsSetCard(0xc4) then return false end
......
c96223501.lua
View file @ d83918c4
--竜星因士－セフィラツバーン --竜星因士－セフィラツバーン
function c96223501.initial_effect(c) function c96223501.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetTarget(c96223501.splimit)
e1:SetCondition(aux.nfbdncon)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --destroy
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_DESTROY)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e2:SetRange(LOCATION_PZONE) e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetTargetRange(1,0) e2:SetCountLimit(1,96223501)
e2:SetTarget(c96223501.splimit) e2:SetTarget(c96223501.target)
e2:SetCondition(aux.nfbdncon) e2:SetOperation(c96223501.operation)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--destroy local e3=e2:Clone()
local e3=Effect.CreateEffect(c) e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetCountLimit(1,96223501)
e3:SetTarget(c96223501.target)
e3:SetOperation(c96223501.operation)
c:RegisterEffect(e3) c:RegisterEffect(e3)
local e4=e3:Clone() local e4=e2:Clone()
e4:SetCode(EVENT_FLIP_SUMMON_SUCCESS) e4:SetCode(EVENT_SPSUMMON_SUCCESS)
e4:SetCondition(c96223501.condition)
c:RegisterEffect(e4) c:RegisterEffect(e4)
local e5=e3:Clone()
e5:SetCode(EVENT_SPSUMMON_SUCCESS)
e5:SetCondition(c96223501.condition)
c:RegisterEffect(e5)
end end
function c96223501.splimit(e,c,sump,sumtype,sumpos,targetp) function c96223501.splimit(e,c,sump,sumtype,sumpos,targetp)
if c:IsSetCard(0x9c) or c:IsSetCard(0xc4) then return false end if c:IsSetCard(0x9c) or c:IsSetCard(0xc4) then return false end
......
c96802306.lua
View file @ d83918c4
--イグナイト・キャリバー --イグナイト・キャリバー
function c96802306.initial_effect(c) function c96802306.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c96802306.thcon)
e1:SetTarget(c96802306.thtg)
e1:SetOperation(c96802306.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c96802306.thcon)
e2:SetTarget(c96802306.thtg)
e2:SetOperation(c96802306.thop)
c:RegisterEffect(e2)
end end
function c96802306.thcon(e,tp,eg,ep,ev,re,r,rp) function c96802306.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c97024987.lua
View file @ d83918c4
--イグナイト・ドラグノフ --イグナイト・ドラグノフ
function c97024987.initial_effect(c) function c97024987.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --tohand
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCondition(c97024987.thcon)
e1:SetTarget(c97024987.thtg)
e1:SetOperation(c97024987.thop)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--tohand
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_DESTROY+CATEGORY_TOHAND+CATEGORY_SEARCH)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_PZONE)
e2:SetCondition(c97024987.thcon)
e2:SetTarget(c97024987.thtg)
e2:SetOperation(c97024987.thop)
c:RegisterEffect(e2)
end end
function c97024987.thcon(e,tp,eg,ep,ev,re,r,rp) function c97024987.thcon(e,tp,eg,ep,ev,re,r,rp)
local seq=e:GetHandler():GetSequence() local seq=e:GetHandler():GetSequence()
......
c97466438.lua
View file @ d83918c4
--ヨコシマウマ --ヨコシマウマ
function c97466438.initial_effect(c) function c97466438.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c,false)
--Activate --Activate
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetDescription(1160)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCost(c97466438.reg) e1:SetCost(c97466438.reg)
......
c97588916.lua
View file @ d83918c4
--ブンボーグ007 --ブンボーグ007
function c97588916.initial_effect(c) function c97588916.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --splimit
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_PZONE)
e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e1:SetTargetRange(1,0)
e1:SetCondition(c97588916.splimcon)
e1:SetTarget(c97588916.splimit)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--splimit --
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_SINGLE)
e2:SetRange(LOCATION_PZONE) e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetRange(LOCATION_MZONE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EFFECT_UPDATE_ATTACK)
e2:SetTargetRange(1,0) e2:SetValue(c97588916.value)
e2:SetCondition(c97588916.splimcon)
e2:SetTarget(c97588916.splimit)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--
local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_SINGLE)
e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EFFECT_UPDATE_ATTACK)
e3:SetValue(c97588916.value)
c:RegisterEffect(e3)
--pierce --pierce
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE)
e4:SetCode(EFFECT_PIERCE)
c:RegisterEffect(e4)
--
local e5=Effect.CreateEffect(c) local e5=Effect.CreateEffect(c)
e5:SetType(EFFECT_TYPE_SINGLE) e5:SetType(EFFECT_TYPE_FIELD)
e5:SetCode(EFFECT_PIERCE) e5:SetRange(LOCATION_MZONE)
e5:SetTargetRange(0,LOCATION_MZONE)
e5:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e5:SetValue(c97588916.atlimit)
c:RegisterEffect(e5) c:RegisterEffect(e5)
--
local e6=Effect.CreateEffect(c)
e6:SetType(EFFECT_TYPE_FIELD)
e6:SetRange(LOCATION_MZONE)
e6:SetTargetRange(0,LOCATION_MZONE)
e6:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
e6:SetValue(c97588916.atlimit)
c:RegisterEffect(e6)
end end
function c97588916.splimcon(e) function c97588916.splimcon(e)
return not e:GetHandler():IsForbidden() return not e:GetHandler():IsForbidden()
......
c98301564.lua
View file @ d83918c4
--解放のアリアドネ --解放のアリアドネ
function c98301564.initial_effect(c) function c98301564.initial_effect(c)
--pendulum summon --pendulum summon
aux.AddPendulumProcedure(c) aux.EnablePendulumAttribute(c)
--Activate --Cost Change
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EFFECT_LPCOST_CHANGE)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e1:SetRange(LOCATION_PZONE)
e1:SetTargetRange(1,0)
e1:SetValue(c98301564.costchange)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--Cost Change
local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD) e2:SetType(EFFECT_TYPE_FIELD)
e2:SetCode(EFFECT_LPCOST_CHANGE) e2:SetCode(EFFECT_DISCARD_COST_CHANGE)
e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
e2:SetRange(LOCATION_PZONE) e2:SetRange(LOCATION_PZONE)
e2:SetTargetRange(1,0) e2:SetTargetRange(1,0)
e2:SetValue(c98301564.costchange)
c:RegisterEffect(e2) c:RegisterEffect(e2)
--search
local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
e3:SetType(EFFECT_TYPE_FIELD) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EFFECT_DISCARD_COST_CHANGE) e3:SetCode(EVENT_DESTROYED)
e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_PZONE) e3:SetCondition(c98301564.regcon)
e3:SetTargetRange(1,0) e3:SetTarget(c98301564.regtg)
e3:SetOperation(c98301564.regop)
c:RegisterEffect(e3) c:RegisterEffect(e3)
--search
local e4=Effect.CreateEffect(c)
e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e4:SetCode(EVENT_DESTROYED)
e4:SetProperty(EFFECT_FLAG_DELAY)
e4:SetCondition(c98301564.regcon)
e4:SetTarget(c98301564.regtg)
e4:SetOperation(c98301564.regop)
c:RegisterEffect(e4)
end end
function c98301564.costchange(e,re,rp,val) function c98301564.costchange(e,re,rp,val)
if re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsType(TYPE_TRAP) and re:GetHandler():IsType(TYPE_COUNTER) then if re and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:GetHandler():IsType(TYPE_TRAP) and re:GetHandler():IsType(TYPE_COUNTER) then
......
utility.lua
View file @ d83918c4
...@@ -1122,8 +1122,8 @@ function Auxiliary.RPEOperation2(filter) ...@@ -1122,8 +1122,8 @@ function Auxiliary.RPEOperation2(filter)
end end
end end
end end
--add procedure to Pendulum monster --add procedure to Pendulum monster, also allows registeration of activation effect
function Auxiliary.AddPendulumProcedure(c) function Auxiliary.EnablePendulumAttribute(c,reg)
local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SPSUMMON_PROC_G) e1:SetCode(EFFECT_SPSUMMON_PROC_G)
...@@ -1134,6 +1134,14 @@ function Auxiliary.AddPendulumProcedure(c) ...@@ -1134,6 +1134,14 @@ function Auxiliary.AddPendulumProcedure(c)
e1:SetOperation(Auxiliary.PendOperation()) e1:SetOperation(Auxiliary.PendOperation())
e1:SetValue(SUMMON_TYPE_PENDULUM) e1:SetValue(SUMMON_TYPE_PENDULUM)
c:RegisterEffect(e1) c:RegisterEffect(e1)
--register by default
if reg==nil or reg then
local e2=Effect.CreateEffect(c)
e2:SetDescription(1160)
e2:SetType(EFFECT_TYPE_ACTIVATE)
e2:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e2)
end
end end
function Auxiliary.PConditionFilter(c,e,tp,lscale,rscale) function Auxiliary.PConditionFilter(c,e,tp,lscale,rscale)
local lv=0 local lv=0
......
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