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)))
......
This diff is collapsed.
--法眼の魔術師 --法眼の魔術師
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()
......
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
This diff is collapsed.
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment