Commit 21822c17 authored by salix5's avatar salix5

Revert "Merge pull request #127 from Tianchenglipu/patch-1"

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