Skip to content

Y
ygopro-scripts-888
Commit 5c511c44 authored by wind2009's avatar wind2009
Browse files
Options

Fix code

parent b63c8694
Hide whitespace changes
Inline Side-by-side
Showing with 460 additions and 460 deletions
c10804018.lua
View file @ 5c511c44
--粛声なる竜神サフィラ
function c101204034.initial_effect(c)
function c10804018.initial_effect(c)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204034,0))
e1:SetDescription(aux.Stringid(10804018,0))
e1:SetCategory(CATEGORY_DRAW)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,101204034)
e1:SetCondition(c101204034.drcon)
e1:SetTarget(c101204034.drtg)
e1:SetOperation(c101204034.drop)
e1:SetCountLimit(1,10804018)
e1:SetCondition(c10804018.drcon)
e1:SetTarget(c10804018.drtg)
e1:SetOperation(c10804018.drop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204034,1))
e2:SetDescription(aux.Stringid(10804018,1))
e2:SetCategory(CATEGORY_HANDES)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetCode(EVENT_ATTACK_ANNOUNCE)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,101204134)
e2:SetCondition(c101204034.hscon)
e2:SetTarget(c101204034.hstg)
e2:SetOperation(c101204034.hsop)
e2:SetCountLimit(1,10804019)
e2:SetCondition(c10804018.hscon)
e2:SetTarget(c10804018.hstg)
e2:SetOperation(c10804018.hsop)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204034,2))
e3:SetDescription(aux.Stringid(10804018,2))
e3:SetCategory(CATEGORY_TOHAND)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetRange(LOCATION_MZONE)
e3:SetCode(EVENT_PHASE+PHASE_END)
e3:SetCountLimit(1,101204234)
e3:SetCondition(c101204034.thcon)
e3:SetTarget(c101204034.thtg)
e3:SetOperation(c101204034.thop)
e3:SetCountLimit(1,10804020)
e3:SetCondition(c10804018.thcon)
e3:SetTarget(c10804018.thtg)
e3:SetOperation(c10804018.thop)
c:RegisterEffect(e3)
end
function c101204034.cfilter(c)
function c10804018.cfilter(c)
return c:IsFaceupEx() and c:IsCode(25801745)
end
function c101204034.drcon(e,tp,eg,ep,ev,re,r,rp)
function c10804018.drcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL)
end
function c101204034.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204034.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil) and Duel.IsPlayerCanDraw(tp,2) end
function c10804018.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c10804018.cfilter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil) and Duel.IsPlayerCanDraw(tp,2) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(2)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,1)
end
function c101204034.drop(e,tp,eg,ep,ev,re,r,rp)
function c10804018.drop(e,tp,eg,ep,ev,re,r,rp)
local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
if Duel.Draw(p,2,REASON_EFFECT)==2 then
Duel.ShuffleHand(p)
......@@ -56,37 +56,37 @@ function c101204034.drop(e,tp,eg,ep,ev,re,r,rp)
Duel.DiscardHand(p,nil,1,1,REASON_EFFECT+REASON_DISCARD)
end
end
function c101204034.filter(c)
function c10804018.filter(c)
return c:IsFaceup() and c:IsType(TYPE_RITUAL) and (c:IsRace(RACE_DRAGON) or c:IsRace(RACE_WARRIOR)) and c:IsAttribute(ATTRIBUTE_LIGHT)
end
function c101204034.hscon(e,tp,eg,ep,ev,re,r,rp)
function c10804018.hscon(e,tp,eg,ep,ev,re,r,rp)
local a=Duel.GetAttacker()
local d=Duel.GetAttackTarget()
return c101204034.filter(a) or (d and c101204034.filter(d))
return c10804018.filter(a) or (d and c10804018.filter(d))
end
function c101204034.hstg(e,tp,eg,ep,ev,re,r,rp,chk)
function c10804018.hstg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end
Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,1-tp,1)
end
function c101204034.hsop(e,tp,eg,ep,ev,re,r,rp)
function c10804018.hsop(e,tp,eg,ep,ev,re,r,rp)
local g=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
if g:GetCount()==0 then return end
local sg=g:RandomSelect(tp,1)
Duel.SendtoGrave(sg,REASON_DISCARD+REASON_EFFECT)
end
function c101204034.thcon(e,tp,eg,ep,ev,re,r,rp)
function c10804018.thcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetTurnPlayer()~=tp
end
function c101204034.thfilter(c)
function c10804018.thfilter(c)
return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsAbleToHand()
end
function c101204034.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204034.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
function c10804018.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c10804018.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
end
function c101204034.thop(e,tp,eg,ep,ev,re,r,rp)
function c10804018.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204034.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c10804018.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
......
c18969888.lua
View file @ 5c511c44
--燦幻超龍ドランセンド·ドラギオン
function c101204040.initial_effect(c)
function c18969888.initial_effect(c)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204040,0))
e1:SetDescription(aux.Stringid(18969888,0))
e1:SetCategory(CATEGORY_POSITION)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetCondition(c101204040.poscon)
e1:SetTarget(c101204040.postg)
e1:SetOperation(c101204040.posop)
e1:SetCondition(c18969888.poscon)
e1:SetTarget(c18969888.postg)
e1:SetOperation(c18969888.posop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetType(EFFECT_TYPE_FIELD)
......@@ -25,43 +25,43 @@ function c101204040.initial_effect(c)
e3:SetTargetRange(0,1)
e3:SetRange(LOCATION_MZONE)
e3:SetValue(1)
e3:SetCondition(c101204040.actcon)
e3:SetCondition(c18969888.actcon)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(101204040,2))
e4:SetDescription(aux.Stringid(18969888,2))
e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e4:SetType(EFFECT_TYPE_QUICK_O)
e4:SetCode(EVENT_FREE_CHAIN)
e4:SetHintTiming(0,TIMING_BATTLE_START+TIMING_ATTACK+TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
e4:SetRange(LOCATION_GRAVE)
e4:SetCountLimit(1,101204040+EFFECT_COUNT_CODE_DUEL)
e4:SetCondition(c101204040.spcon)
e4:SetCost(c101204040.spcost)
e4:SetTarget(c101204040.sptg)
e4:SetOperation(c101204040.spop)
e4:SetCountLimit(1,18969888+EFFECT_COUNT_CODE_DUEL)
e4:SetCondition(c18969888.spcon)
e4:SetCost(c18969888.spcost)
e4:SetTarget(c18969888.sptg)
e4:SetOperation(c18969888.spop)
c:RegisterEffect(e4)
if not c101204040.global_check then
c101204040.global_check=true
if not c18969888.global_check then
c18969888.global_check=true
local ge1=Effect.GlobalEffect()
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
ge1:SetOperation(c101204040.checkop)
ge1:SetOperation(c18969888.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function c101204040.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,101204040,RESET_PHASE+PHASE_END,0,1)
Duel.RegisterFlagEffect(1-tp,101204040,RESET_PHASE+PHASE_END,0,1)
function c18969888.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,18969888,RESET_PHASE+PHASE_END,0,1)
Duel.RegisterFlagEffect(1-tp,18969888,RESET_PHASE+PHASE_END,0,1)
end
function c101204040.poscon(e,tp,eg,ep,ev,re,r,rp)
function c18969888.poscon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function c101204040.postg(e,tp,eg,ep,ev,re,r,rp,chk)
function c18969888.postg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
local sg=Duel.GetMatchingGroup(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
Duel.SetOperationInfo(0,CATEGORY_POSITION,sg,sg:GetCount(),0,0)
end
function c101204040.posop(e,tp,eg,ep,ev,re,r,rp)
function c18969888.posop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local sg=Duel.GetMatchingGroup(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
if sg:GetCount()>0 then
......@@ -72,30 +72,30 @@ function c101204040.posop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function c101204040.actcon(e)
function c18969888.actcon(e)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c101204040.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,101204040)>=3
function c18969888.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,18969888)>=3
end
function c101204040.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
function c18969888.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return true end
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204040,4))
e1:SetDescription(aux.Stringid(18969888,4))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e1:SetTargetRange(1,0)
Duel.RegisterEffect(e1,tp)
end
function c101204040.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
function c18969888.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c101204040.spop(e,tp,eg,ep,ev,re,r,rp)
function c18969888.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD):GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(101204040,3)) then
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD):GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(18969888,3)) then
local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD):Select(tp,1,1,nil)
if #g>0 then
Duel.BreakEffect()
......
c2333466.lua
View file @ 5c511c44
--破壊竜ガンドラＧ
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--atk gain
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -38,7 +38,7 @@ function s.value(e,c)
return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_REMOVED,LOCATION_REMOVED)*300
end
function s.cfilter(c)
return c:IsCode(101204051) and c:IsFaceup()
return c:IsCode(79791878) and c:IsFaceup()
end
function s.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_ONFIELD,0,1,nil)
......@@ -55,7 +55,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
end
end
function s.spfilter(c,e,tp)
return aux.IsCodeListed(c,101204051) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(7)
return aux.IsCodeListed(c,79791878) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(7)
end
function s.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp)
......
c27157727.lua
View file @ 5c511c44
......@@ -2,7 +2,7 @@
--Coded by Lee
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......@@ -44,14 +44,14 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.SpecialSummon(c,SUMMON_VALUE_SELF,tp,tp,true,false,POS_FACEUP)
end
function s.atkfilter(c)
return (c:IsCode(101204051) or (aux.IsCodeListed(c,101204051) and c:IsLocation(LOCATION_MZONE))) and c:IsFaceup()
return (c:IsCode(79791878) or (aux.IsCodeListed(c,79791878) and c:IsLocation(LOCATION_MZONE))) and c:IsFaceup()
end
function s.atkval(e,c)
local tp=e:GetHandlerPlayer()
return Duel.GetMatchingGroupCount(s.atkfilter,tp,LOCATION_ONFIELD,0,nil)*1000
end
function s.filter(c)
return c:IsCode(101204051) and c:IsFaceup()
return c:IsCode(79791878) and c:IsFaceup()
end
function s.descon(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetAttacker():IsControler(1-tp) and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD,0,1,nil)
......
c27483935.lua
View file @ 5c511c44
--古代の機械司令
function c101204008.initial_effect(c)
function c27483935.initial_effect(c)
aux.AddCodeList(c,83104731)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204008,0))
e1:SetDescription(aux.Stringid(27483935,0))
e1:SetCategory(CATEGORY_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_MZONE)
e1:SetCountLimit(1,101204008)
e1:SetCost(c101204008.scost)
e1:SetTarget(c101204008.stg)
e1:SetOperation(c101204008.sop)
e1:SetCountLimit(1,27483935)
e1:SetCost(c27483935.scost)
e1:SetTarget(c27483935.stg)
e1:SetOperation(c27483935.sop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204008,1))
e2:SetDescription(aux.Stringid(27483935,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_SUMMON_SUCCESS)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,101204108)
e2:SetCondition(c101204008.spcon)
e2:SetTarget(c101204008.sptg)
e2:SetOperation(c101204008.spop)
e2:SetCountLimit(1,27483936)
e2:SetCondition(c27483935.spcon)
e2:SetTarget(c27483935.sptg)
e2:SetOperation(c27483935.spop)
c:RegisterEffect(e2)
local e3=e2:Clone()
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e3)
local e4=Effect.CreateEffect(c)
e4:SetDescription(aux.Stringid(101204008,2))
e4:SetDescription(aux.Stringid(27483935,2))
e4:SetType(EFFECT_TYPE_IGNITION)
e4:SetRange(LOCATION_GRAVE)
e4:SetCountLimit(1,101204208)
e4:SetCountLimit(1,27483937)
e4:SetCost(aux.bfgcost)
e4:SetTarget(c101204008.tftg)
e4:SetOperation(c101204008.tfop)
e4:SetTarget(c27483935.tftg)
e4:SetOperation(c27483935.tfop)
c:RegisterEffect(e4)
end
function c101204008.costfilter(c,tp)
function c27483935.costfilter(c,tp)
return c:IsCode(83104731) and c:IsAbleToGraveAsCost()
and Duel.IsExistingMatchingCard(c101204008.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,c)
and Duel.IsExistingMatchingCard(c27483935.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,c)
end
function c101204008.scost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204008.costfilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_ONFIELD,0,1,nil,tp) end
function c27483935.scost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c27483935.costfilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_ONFIELD,0,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local g=Duel.SelectMatchingCard(tp,c101204008.costfilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp)
local g=Duel.SelectMatchingCard(tp,c27483935.costfilter,tp,LOCATION_DECK+LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp)
Duel.SendtoGrave(g,REASON_COST)
end
function c101204008.stg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204008.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
function c27483935.stg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c27483935.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
end
function c101204008.sumfilter(c)
function c27483935.sumfilter(c)
return c:IsSummonable(true,nil) and c:IsSetCard(0x7)
end
function c101204008.sop(e,tp,eg,ep,ev,re,r,rp)
function c27483935.sop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
local g=Duel.SelectMatchingCard(tp,c101204008.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c27483935.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
local tc=g:GetFirst()
if tc then
Duel.Summon(tp,tc,true,nil)
end
end
function c101204008.cfilter(c)
function c27483935.cfilter(c)
return c:IsFaceup() and c:IsCode(83104731)
end
function c101204008.spcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c101204008.cfilter,1,nil)
function c27483935.spcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c27483935.cfilter,1,nil)
end
function c101204008.filter1(c,e,tp)
function c27483935.filter1(c,e,tp)
return c:IsCode(83104731) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
end
function c101204008.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
function c27483935.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c101204008.filter1,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c27483935.filter1,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
end
function c101204008.spop(e,tp,eg,ep,ev,re,r,rp)
function c27483935.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c101204008.filter1),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c27483935.filter1),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
end
end
function c101204008.pfilter(c,tp)
function c27483935.pfilter(c,tp)
return c:IsType(TYPE_CONTINUOUS) and c:IsType(TYPE_TRAP) and c:IsSetCard(0x7)
and not c:IsForbidden() and c:CheckUniqueOnField(tp)
end
function c101204008.tftg(e,tp,eg,ep,ev,re,r,rp,chk)
function c27483935.tftg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
and Duel.IsExistingMatchingCard(c101204008.pfilter,tp,LOCATION_HAND,0,1,nil,tp) end
and Duel.IsExistingMatchingCard(c27483935.pfilter,tp,LOCATION_HAND,0,1,nil,tp) end
end
function c101204008.tfop(e,tp,eg,ep,ev,re,r,rp)
function c27483935.tfop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
local tc=Duel.SelectMatchingCard(tp,c101204008.pfilter,tp,LOCATION_HAND,0,1,1,nil,tp):GetFirst()
local tc=Duel.SelectMatchingCard(tp,c27483935.pfilter,tp,LOCATION_HAND,0,1,1,nil,tp):GetFirst()
if tc then Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) end
end
\ No newline at end of file
c31458630.lua
View file @ 5c511c44
--幻奏協奏曲
function c101204056.initial_effect(c)
function c31458630.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,101204056)
e1:SetTarget(c101204056.target)
e1:SetOperation(c101204056.activate)
e1:SetCountLimit(1,31458630)
e1:SetTarget(c31458630.target)
e1:SetOperation(c31458630.activate)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204056,1))
e2:SetDescription(aux.Stringid(31458630,1))
e2:SetCategory(CATEGORY_DRAW)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
e2:SetCode(EVENT_TO_GRAVE)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,101204156)
e2:SetCondition(c101204056.drcon)
e2:SetTarget(c101204056.drtg)
e2:SetOperation(c101204056.drop)
e2:SetCountLimit(1,31458631)
e2:SetCondition(c31458630.drcon)
e2:SetTarget(c31458630.drtg)
e2:SetOperation(c31458630.drop)
c:RegisterEffect(e2)
end
function c101204056.filter0(c,e)
function c31458630.filter0(c,e)
return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
end
function c101204056.filter1(c,e)
function c31458630.filter1(c,e)
return not c:IsImmuneToEffect(e)
end
function c101204056.filter2(c,e,tp,m,f,chkf)
function c31458630.filter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION) and c:IsRace(RACE_FAIRY) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
function c101204056.target(e,tp,eg,ep,ev,re,r,rp,chk)
function c31458630.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp)
mg1:Merge(Duel.GetMatchingGroup(c101204056.filter0,tp,LOCATION_PZONE,0,nil,e))
local res=Duel.IsExistingMatchingCard(c101204056.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
mg1:Merge(Duel.GetMatchingGroup(c31458630.filter0,tp,LOCATION_PZONE,0,nil,e))
local res=Duel.IsExistingMatchingCard(c31458630.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
if not res then
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
local mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
res=Duel.IsExistingMatchingCard(c101204056.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
res=Duel.IsExistingMatchingCard(c31458630.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
end
end
return res
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c101204056.activate(e,tp,eg,ep,ev,re,r,rp)
function c31458630.activate(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c101204056.filter1,nil,e)
mg1:Merge(Duel.GetMatchingGroup(c101204056.filter0,tp,LOCATION_PZONE,0,nil,e))
local sg1=Duel.GetMatchingGroup(c101204056.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg1=Duel.GetFusionMaterial(tp):Filter(c31458630.filter1,nil,e)
mg1:Merge(Duel.GetMatchingGroup(c31458630.filter0,tp,LOCATION_PZONE,0,nil,e))
local sg1=Duel.GetMatchingGroup(c31458630.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg2=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
......@@ -62,7 +62,7 @@ function c101204056.activate(e,tp,eg,ep,ev,re,r,rp)
local fgroup=ce:GetTarget()
mg2=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c101204056.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
sg2=Duel.GetMatchingGroup(c31458630.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
......@@ -84,20 +84,20 @@ function c101204056.activate(e,tp,eg,ep,ev,re,r,rp)
tc:CompleteProcedure()
end
end
function c101204056.cfilter(c,tp)
function c31458630.cfilter(c,tp)
return c:IsType(TYPE_FUSION) and c:IsSetCard(0x9b) and c:IsControler(tp)
end
function c101204056.drcon(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler()) and eg:IsExists(c101204056.cfilter,1,nil,tp)
function c31458630.drcon(e,tp,eg,ep,ev,re,r,rp)
return not eg:IsContains(e:GetHandler()) and eg:IsExists(c31458630.cfilter,1,nil,tp)
end
function c101204056.drtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
function c31458630.drtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local c=e:GetHandler()
if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
and c:IsAbleToDeck() end
Duel.SetOperationInfo(0,CATEGORY_TODECK,c,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
function c101204056.drop(e,tp,eg,ep,ev,re,r,rp)
function c31458630.drop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SendtoDeck(c,nil,SEQ_DECKBOTTOM,REASON_EFFECT)>0
and c:IsLocation(LOCATION_DECK) then
......
c32270212.lua
View file @ 5c511c44
--仲間の絆
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--activate
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
......@@ -14,17 +14,17 @@ function s.initial_effect(c)
c:RegisterEffect(e1)
end
function s.cfilter1(c)
return c:IsFaceup() and c:IsCode(101204051)
return c:IsFaceup() and c:IsCode(79791878)
end
function s.cfilter2(c)
return c:IsFaceup() and aux.IsCodeListed(c,101204051)
return c:IsFaceup() and aux.IsCodeListed(c,79791878)
end
function s.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(s.cfilter1,tp,LOCATION_ONFIELD,0,1,nil)
and Duel.IsExistingMatchingCard(s.cfilter2,tp,LOCATION_MZONE,0,1,nil)
end
function s.spfilter(c,e,tp)
return aux.IsCodeListed(c,101204051) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(4)
return aux.IsCodeListed(c,79791878) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(4)
end
function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
......
c37531679.lua
View file @ 5c511c44
......@@ -71,7 +71,7 @@ function s.eqlimit(e,c)
return c==e:GetLabelObject()
end
function s.thfilter(c)
return c:IsSetCard(0x2ac) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
return c:IsSetCard(0x1ac) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
end
function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
......
c38505587.lua
View file @ 5c511c44
--マシマシュマロン
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--battle indestructable
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_SINGLE)
......@@ -45,7 +45,7 @@ function s.initial_effect(c)
c:RegisterEffect(e4)
end
function s.indesfilter(c)
return c:IsFaceup() and c:IsCode(101204051)
return c:IsFaceup() and c:IsCode(79791878)
end
function s.indescon(e)
return Duel.IsExistingMatchingCard(s.indesfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
......
c39114494.lua
View file @ 5c511c44
--粛声なる祝福
function c101204062.initial_effect(c)
function c39114494.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204062,1))
e2:SetDescription(aux.Stringid(39114494,1))
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1,101204062)
e2:SetTarget(c101204062.thtg)
e2:SetOperation(c101204062.thop)
e2:SetCountLimit(1,39114494)
e2:SetTarget(c39114494.thtg)
e2:SetOperation(c39114494.thop)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204062,2))
e3:SetDescription(aux.Stringid(39114494,2))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetCode(EVENT_SUMMON_SUCCESS)
e3:SetRange(LOCATION_SZONE)
e3:SetCountLimit(1,101204162)
e3:SetCondition(c101204062.ricon)
e3:SetTarget(c101204062.ritg)
e3:SetOperation(c101204062.riop)
e3:SetCountLimit(1,39114495)
e3:SetCondition(c39114494.ricon)
e3:SetTarget(c39114494.ritg)
e3:SetOperation(c39114494.riop)
c:RegisterEffect(e3)
local e4=e3:Clone()
e4:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e4)
end
function c101204062.filter(c,e,tp)
return not c:IsCode(101204062) and c:IsFaceupEx() and c:IsSetCard(0x1a6) and c:IsAbleToHand()
function c39114494.filter(c,e,tp)
return not c:IsCode(39114494) and c:IsFaceupEx() and c:IsSetCard(0x1a6) and c:IsAbleToHand()
end
function c101204062.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c101204062.filter(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(c101204062.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
function c39114494.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and c39114494.filter(chkc,e,tp) end
if chk==0 then return Duel.IsExistingTarget(c39114494.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local tc=Duel.SelectTarget(tp,c101204062.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp):GetFirst()
local tc=Duel.SelectTarget(tp,c39114494.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp):GetFirst()
if tc:IsLocation(LOCATION_GRAVE) then
e:SetCategory(CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,tc,1,0,0)
......@@ -44,34 +44,34 @@ function c101204062.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
e:SetCategory(CATEGORY_TOHAND)
end
end
function c101204062.thop(e,tp,eg,ep,ev,re,r,rp)
function c39114494.thop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if not tc:IsRelateToEffect(e) then return end
if tc then
Duel.SendtoHand(tc,nil,REASON_EFFECT)
end
end
function c101204062.cfilter(c)
function c39114494.cfilter(c)
return c:IsFaceup() and not c:IsType(TYPE_RITUAL)
end
function c101204062.ricon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c101204062.cfilter,1,nil)
function c39114494.ricon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c39114494.cfilter,1,nil)
end
function c101204062.rfilter(c,e,tp)
function c39114494.rfilter(c,e,tp)
return c:IsType(TYPE_RITUAL) and (c:IsRace(RACE_DRAGON) or c:IsRace(RACE_WARRIOR)) and c:IsAttribute(ATTRIBUTE_LIGHT)
end
function c101204062.ritg(e,tp,eg,ep,ev,re,r,rp,chk)
function c39114494.ritg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local mg=Duel.GetRitualMaterial(tp)
return Duel.IsExistingMatchingCard(aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,nil,c101204062.rfilter,e,tp,mg,nil,Card.GetLevel,"Greater")
return Duel.IsExistingMatchingCard(aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,nil,c39114494.rfilter,e,tp,mg,nil,Card.GetLevel,"Greater")
end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
function c101204062.riop(e,tp,eg,ep,ev,re,r,rp)
function c39114494.riop(e,tp,eg,ep,ev,re,r,rp)
::cancel::
local mg=Duel.GetRitualMaterial(tp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local tg=Duel.SelectMatchingCard(tp,aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,1,nil,c101204062.rfilter,e,tp,mg,nil,Card.GetLevel,"Greater")
local tg=Duel.SelectMatchingCard(tp,aux.RitualUltimateFilter,tp,LOCATION_HAND,0,1,1,nil,c39114494.rfilter,e,tp,mg,nil,Card.GetLevel,"Greater")
local tc=tg:GetFirst()
if tc then
mg=mg:Filter(Card.IsCanBeRitualMaterial,tc,tc)
......@@ -91,7 +91,7 @@ function c101204062.riop(e,tp,eg,ep,ev,re,r,rp)
Duel.BreakEffect()
if Duel.SpecialSummonStep(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP) then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetDescription(aux.Stringid(101204062,3))
e1:SetDescription(aux.Stringid(39114494,3))
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CLIENT_HINT)
e1:SetRange(LOCATION_MZONE)
......
c39321065.lua
View file @ 5c511c44
--サイレント・ソードマン・ゼロ
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--level up
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
......@@ -48,7 +48,7 @@ function s.value(e,c)
return math.max(0,c:GetLevel()-c:GetOriginalLevel())*500
end
function s.tfilter(c,tp)
return c:IsLocation(LOCATION_ONFIELD) and (aux.IsCodeListed(c,101204051) or c:IsCode(101204051))
return c:IsLocation(LOCATION_ONFIELD) and (aux.IsCodeListed(c,79791878) or c:IsCode(79791878))
and c:IsControler(tp) and c:IsFaceup()
end
function s.negcon(e,tp,eg,ep,ev,re,r,rp)
......
c39931513.lua
View file @ 5c511c44
--天盃龍パイドラ
local s,id,o=GetID()
function c101204016.initial_effect(c)
function c39931513.initial_effect(c)
--to hand or set
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
......
c4064925.lua
View file @ 5c511c44
--古代の進軍
function c101204055.initial_effect(c)
function c4064925.initial_effect(c)
aux.AddCodeList(c,83104731)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,101204055+EFFECT_COUNT_CODE_OATH)
e1:SetCost(c101204055.cost)
e1:SetTarget(c101204055.target)
e1:SetOperation(c101204055.activate)
e1:SetCountLimit(1,4064925+EFFECT_COUNT_CODE_OATH)
e1:SetCost(c4064925.cost)
e1:SetTarget(c4064925.target)
e1:SetOperation(c4064925.activate)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204055,0))
e2:SetDescription(aux.Stringid(4064925,0))
e2:SetCategory(CATEGORY_DRAW)
e2:SetType(EFFECT_TYPE_IGNITION)
e2:SetRange(LOCATION_SZONE)
e2:SetCountLimit(1)
e2:SetCost(c101204055.drcost)
e2:SetTarget(c101204055.drtg)
e2:SetOperation(c101204055.drop)
e2:SetCost(c4064925.drcost)
e2:SetTarget(c4064925.drtg)
e2:SetOperation(c4064925.drop)
c:RegisterEffect(e2)
if not c101204055.global_check then
c101204055.global_check=true
if not c4064925.global_check then
c4064925.global_check=true
local ge1=Effect.CreateEffect(c)
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_SSET)
ge1:SetOperation(c101204055.checkop)
ge1:SetOperation(c4064925.checkop)
Duel.RegisterEffect(ge1,0)
local ge2=ge1:Clone()
ge2:SetCode(EVENT_MSET)
Duel.RegisterEffect(ge2,0)
local ge3=ge1:Clone()
ge3:SetCode(EVENT_SPSUMMON_SUCCESS)
ge3:SetCondition(c101204055.ssetcon)
ge3:SetCondition(c4064925.ssetcon)
Duel.RegisterEffect(ge3,0)
end
end
function c101204055.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(rp,101204055,RESET_PHASE+PHASE_END,0,1)
function c4064925.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(rp,4064925,RESET_PHASE+PHASE_END,0,1)
end
function c101204055.cfilter(c)
function c4064925.cfilter(c)
return c:IsFacedown()
end
function c101204055.ssetcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c101204055.cfilter,1,nil)
function c4064925.ssetcon(e,tp,eg,ep,ev,re,r,rp)
return eg:IsExists(c4064925.cfilter,1,nil)
end
function c101204055.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,101204055)==0 end
function c4064925.cost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetFlagEffect(tp,4064925)==0 end
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
......@@ -63,59 +63,59 @@ function c101204055.cost(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.RegisterEffect(e3,tp)
local e4=e1:Clone()
e4:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e4:SetTarget(c101204055.sumlimit)
e4:SetTarget(c4064925.sumlimit)
Duel.RegisterEffect(e4,tp)
end
function c101204055.sumlimit(e,c,sump,sumtype,sumpos,targetp)
function c4064925.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return bit.band(sumpos,POS_FACEDOWN)>0
end
function c101204055.filter(c)
return not c:IsCode(101204055) and c:IsSetCard(0x7) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) and c:IsAbleToHand()
function c4064925.filter(c)
return not c:IsCode(4064925) and c:IsSetCard(0x7) and (c:IsType(TYPE_SPELL) or c:IsType(TYPE_TRAP)) and c:IsAbleToHand()
end
function c101204055.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204055.filter,tp,LOCATION_DECK,0,1,nil) end
function c4064925.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c4064925.filter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c101204055.activate(e,tp,eg,ep,ev,re,r,rp)
function c4064925.activate(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204055.filter,tp,LOCATION_DECK,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c4064925.filter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
function c101204055.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
function c4064925.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckReleaseGroup(REASON_COST,tp,nil,1,nil,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
local g=Duel.SelectReleaseGroup(REASON_COST,tp,nil,1,1,nil,tp)
Duel.Release(g,REASON_COST)
end
function c101204055.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
function c4064925.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
Duel.SetTargetPlayer(tp)
Duel.SetTargetParam(1)
Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
end
function c101204055.drop(e,tp,eg,ep,ev,re,r,rp)
function c4064925.drop(e,tp,eg,ep,ev,re,r,rp)
local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
if Duel.Draw(p,d,REASON_EFFECT)~=0 and Duel.GetFlagEffect(tp,101204155)==0 then
if Duel.Draw(p,d,REASON_EFFECT)~=0 and Duel.GetFlagEffect(tp,4064926)==0 then
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetDescription(aux.Stringid(101204055,2))
e1:SetDescription(aux.Stringid(4064925,2))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_SUMMON_PROC)
e1:SetTargetRange(LOCATION_HAND,0)
e1:SetCountLimit(1,101204055)
e1:SetCondition(c101204055.ntcon)
e1:SetTarget(c101204055.nttg)
e1:SetCountLimit(1,4064925)
e1:SetCondition(c4064925.ntcon)
e1:SetTarget(c4064925.nttg)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
Duel.RegisterFlagEffect(tp,101204155,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
Duel.RegisterFlagEffect(tp,4064926,RESET_PHASE+PHASE_END,EFFECT_FLAG_OATH,1)
end
end
function c101204055.ntcon(e,c,minc)
function c4064925.ntcon(e,c,minc)
if c==nil then return true end
return minc==0 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0
end
function c101204055.nttg(e,c)
function c4064925.nttg(e,c)
return c:IsLevelAbove(5) and (c:IsCode(83104731) or aux.IsCodeListed(c,83104731))
end
\ No newline at end of file
c45464587.lua
View file @ 5c511c44
--ＧＰ－アニヒレーター
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204020)
aux.AddCodeList(c,60203670)
aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
......@@ -64,7 +64,7 @@ function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_DECK)
end
function s.spfilter(c,e,tp)
return c:IsCode(101204020) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
return c:IsCode(60203670) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function s.tdop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
c53541822.lua
View file @ 5c511c44
--古代の機械競闘
function c101204072.initial_effect(c)
function c53541822.initial_effect(c)
aux.AddCodeList(c,83104731)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_ACTIVATE)
......@@ -10,8 +10,8 @@ function c101204072.initial_effect(c)
e1:SetCode(EFFECT_IMMUNE_EFFECT)
e1:SetRange(LOCATION_SZONE)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c101204072.indtg)
e1:SetValue(c101204072.efilter)
e1:SetTarget(c53541822.indtg)
e1:SetValue(c53541822.efilter)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_REMOVE)
......@@ -19,55 +19,55 @@ function c101204072.initial_effect(c)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetRange(LOCATION_SZONE)
e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
e2:SetCountLimit(1,101204072)
e2:SetCondition(c101204072.condition)
e2:SetTarget(c101204072.target)
e2:SetOperation(c101204072.activate)
e2:SetCountLimit(1,53541822)
e2:SetCondition(c53541822.condition)
e2:SetTarget(c53541822.target)
e2:SetOperation(c53541822.activate)
c:RegisterEffect(e2)
end
function c101204072.indtg(e,c)
function c53541822.indtg(e,c)
return c:IsCode(83104731) or aux.IsCodeListed(c,83104731)
end
function c101204072.efilter(e,re)
function c53541822.efilter(e,re)
return e:GetHandlerPlayer()~=re:GetOwnerPlayer() and re:IsActivated() and re:IsActiveType(TYPE_MONSTER)
end
function c101204072.filter0(c)
function c53541822.filter0(c)
return c:IsOnField() and c:IsAbleToRemove()
end
function c101204072.filter1(c,e)
function c53541822.filter1(c,e)
return c:IsOnField() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e)
end
function c101204072.filter2(c,e,tp,m,f,chkf)
function c53541822.filter2(c,e,tp,m,f,chkf)
return c:IsType(TYPE_FUSION) and aux.IsCodeListed(c,83104731) and (not f or f(c))
and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
end
function c101204072.filter3(c)
function c53541822.filter3(c)
return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove()
end
function c101204072.condition(e,tp,eg,ep,ev,re,r,rp)
function c53541822.condition(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil)
end
function c101204072.fcheck(tp,sg,fc)
return sg:IsExists(c101204072.filter,1,nil)
function c53541822.fcheck(tp,sg,fc)
return sg:IsExists(c53541822.filter,1,nil)
end
function c101204072.filter(c)
function c53541822.filter(c)
return c:IsLocation(LOCATION_ONFIELD) and c:IsCode(83104731)
end
function c101204072.target(e,tp,eg,ep,ev,re,r,rp,chk)
function c53541822.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c101204072.filter0,nil)
local mg2=Duel.GetMatchingGroup(c101204072.filter3,tp,LOCATION_GRAVE,0,nil)
local mg1=Duel.GetFusionMaterial(tp):Filter(c53541822.filter0,nil)
local mg2=Duel.GetMatchingGroup(c53541822.filter3,tp,LOCATION_GRAVE,0,nil)
mg1:Merge(mg2)
aux.FCheckAdditional=c101204072.fcheck
local res=Duel.IsExistingMatchingCard(c101204072.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
aux.FCheckAdditional=c53541822.fcheck
local res=Duel.IsExistingMatchingCard(c53541822.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
if not res then
local ce=Duel.GetChainMaterial(tp)
if ce~=nil then
local fgroup=ce:GetTarget()
local mg3=fgroup(ce,e,tp)
local mf=ce:GetValue()
res=Duel.IsExistingMatchingCard(c101204072.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
res=Duel.IsExistingMatchingCard(c53541822.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
end
end
aux.FCheckAdditional=nil
......@@ -77,13 +77,13 @@ function c101204072.target(e,tp,eg,ep,ev,re,r,rp,chk)
Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD+LOCATION_GRAVE)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,1-tp,LOCATION_MZONE)
end
function c101204072.activate(e,tp,eg,ep,ev,re,r,rp)
function c53541822.activate(e,tp,eg,ep,ev,re,r,rp)
local chkf=tp
local mg1=Duel.GetFusionMaterial(tp):Filter(c101204072.filter1,nil,e)
local mg2=Duel.GetMatchingGroup(c101204072.filter3,tp,LOCATION_GRAVE,0,nil)
local mg1=Duel.GetFusionMaterial(tp):Filter(c53541822.filter1,nil,e)
local mg2=Duel.GetMatchingGroup(c53541822.filter3,tp,LOCATION_GRAVE,0,nil)
mg1:Merge(mg2)
aux.FCheckAdditional=c101204072.fcheck
local sg1=Duel.GetMatchingGroup(c101204072.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
aux.FCheckAdditional=c53541822.fcheck
local sg1=Duel.GetMatchingGroup(c53541822.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
local mg3=nil
local sg2=nil
local ce=Duel.GetChainMaterial(tp)
......@@ -91,7 +91,7 @@ function c101204072.activate(e,tp,eg,ep,ev,re,r,rp)
local fgroup=ce:GetTarget()
mg3=fgroup(ce,e,tp)
local mf=ce:GetValue()
sg2=Duel.GetMatchingGroup(c101204072.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
sg2=Duel.GetMatchingGroup(c53541822.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
end
if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
local sg=sg1:Clone()
......@@ -112,7 +112,7 @@ function c101204072.activate(e,tp,eg,ep,ev,re,r,rp)
end
tc:CompleteProcedure()
local e1=Effect.CreateEffect(e:GetHandler())
e1:SetDescription(aux.Stringid(101204072,2))
e1:SetDescription(aux.Stringid(53541822,2))
e1:SetType(EFFECT_TYPE_SINGLE)
e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
e1:SetCode(EFFECT_EXTRA_ATTACK)
......
c5786513.lua
View file @ 5c511c44
--時の沈黙-ターン・サイレンス
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--level up
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_DISABLE)
......@@ -32,10 +32,10 @@ function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
local g=Duel.SelectTarget(tp,s.lvfilter,tp,LOCATION_MZONE,0,1,1,nil)
end
function s.nfilter1(c)
return c:IsFaceup() and c:IsCode(101204051)
return c:IsFaceup() and c:IsCode(79791878)
end
function s.nfilter2(c)
return c:IsFaceup() and aux.IsCodeListed(c,101204051)
return c:IsFaceup() and aux.IsCodeListed(c,79791878)
end
function s.lvop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
......@@ -60,7 +60,7 @@ function s.bacon(e,tp,eg,ep,ev,re,r,rp)
if tc:IsControler(1-tp) then tc=Duel.GetAttackTarget() end
if not tc then return false end
e:SetLabelObject(tc)
return tc:IsFaceup() and aux.IsCodeListed(tc,101204051)
return tc:IsFaceup() and aux.IsCodeListed(tc,79791878)
end
function s.baop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
c64603182.lua
View file @ 5c511c44
--古代の機械暗黒巨人
function c101204006.initial_effect(c)
function c64603182.initial_effect(c)
aux.AddCodeList(c,83104731)
aux.EnableChangeCode(c,83104731,LOCATION_MZONE+LOCATION_GRAVE)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204006,0))
e1:SetDescription(aux.Stringid(64603182,0))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_HANDES)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,101204006)
e1:SetTarget(c101204006.thtg)
e1:SetOperation(c101204006.thop)
e1:SetCountLimit(1,64603182)
e1:SetTarget(c64603182.thtg)
e1:SetOperation(c64603182.thop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
......@@ -21,20 +21,20 @@ function c101204006.initial_effect(c)
e3:SetCode(EFFECT_CANNOT_ACTIVATE)
e3:SetRange(LOCATION_MZONE)
e3:SetTargetRange(0,1)
e3:SetValue(c101204006.aclimit)
e3:SetCondition(c101204006.actcon)
e3:SetValue(c64603182.aclimit)
e3:SetCondition(c64603182.actcon)
c:RegisterEffect(e3)
end
function c101204006.thfilter(c)
return not c:IsCode(101204006) and (c:IsSetCard(0x7) or c:IsCode(37694547)) and c:IsAbleToHand()
function c64603182.thfilter(c)
return not c:IsCode(64603182) and (c:IsSetCard(0x7) or c:IsCode(37694547)) and c:IsAbleToHand()
end
function c101204006.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204006.thfilter,tp,LOCATION_DECK,0,1,nil) end
function c64603182.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c64603182.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c101204006.thop(e,tp,eg,ep,ev,re,r,rp)
function c64603182.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204006.thfilter,tp,LOCATION_DECK,0,1,2,nil)
local g=Duel.SelectMatchingCard(tp,c64603182.thfilter,tp,LOCATION_DECK,0,1,2,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
......@@ -58,15 +58,15 @@ function c101204006.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterEffect(e3,tp)
local e4=e1:Clone()
e4:SetCode(EFFECT_LIMIT_SPECIAL_SUMMON_POSITION)
e4:SetTarget(c101204006.sumlimit)
e4:SetTarget(c64603182.sumlimit)
Duel.RegisterEffect(e4,tp)
end
function c101204006.sumlimit(e,c,sump,sumtype,sumpos,targetp)
function c64603182.sumlimit(e,c,sump,sumtype,sumpos,targetp)
return bit.band(sumpos,POS_FACEDOWN)>0
end
function c101204006.aclimit(e,re,tp)
function c64603182.aclimit(e,re,tp)
return re:IsHasType(EFFECT_TYPE_ACTIVATE)
end
function c101204006.actcon(e)
function c64603182.actcon(e)
return Duel.GetAttacker()==e:GetHandler()
end
\ No newline at end of file
c64881644.lua
View file @ 5c511c44
--幻奏の歌姫ルフラン
function c101204009.initial_effect(c)
function c64881644.initial_effect(c)
aux.EnablePendulumAttribute(c)
local e0=Effect.CreateEffect(c)
e0:SetDescription(aux.Stringid(101204009,0))
e0:SetDescription(aux.Stringid(64881644,0))
e0:SetCategory(CATEGORY_ATKCHANGE)
e0:SetType(EFFECT_TYPE_IGNITION)
e0:SetRange(LOCATION_PZONE)
e0:SetProperty(EFFECT_FLAG_CARD_TARGET)
e0:SetCountLimit(1,101204009)
e0:SetTarget(c101204009.atktg)
e0:SetOperation(c101204009.atkop)
e0:SetCountLimit(1,64881644)
e0:SetTarget(c64881644.atktg)
e0:SetOperation(c64881644.atkop)
c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204009,1))
e1:SetDescription(aux.Stringid(64881644,1))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,101204109)
e1:SetCountLimit(1,64881645)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetTarget(c101204009.thtg)
e1:SetOperation(c101204009.thop)
e1:SetTarget(c64881644.thtg)
e1:SetOperation(c64881644.thop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204009,2))
e3:SetDescription(aux.Stringid(64881644,2))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_EXTRA)
e3:SetCountLimit(1,101204209)
e3:SetCondition(c101204009.pencon)
e3:SetTarget(c101204009.pentg)
e3:SetOperation(c101204009.penop)
e3:SetCountLimit(1,64881646)
e3:SetCondition(c64881644.pencon)
e3:SetTarget(c64881644.pentg)
e3:SetOperation(c64881644.penop)
c:RegisterEffect(e3)
end
function c101204009.tgfilter(c)
function c64881644.tgfilter(c)
return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9b) and c:IsAbleToGrave()
end
function c101204009.filter(c)
function c64881644.filter(c)
return c:IsType(TYPE_FUSION) and c:IsSetCard(0x9b) and c:IsFaceup()
end
function c101204009.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101204009.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c101204009.filter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(c101204009.tgfilter,tp,LOCATION_DECK,0,1,nil) end
function c64881644.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c64881644.filter(chkc) end
if chk==0 then return Duel.IsExistingTarget(c64881644.filter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(c64881644.tgfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
local g=Duel.SelectTarget(tp,c101204009.filter,tp,LOCATION_MZONE,0,1,1,nil)
local g=Duel.SelectTarget(tp,c64881644.filter,tp,LOCATION_MZONE,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_ATKCHANGE,g,1,0,0)
Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
end
function c101204009.atkop(e,tp,eg,ep,ev,re,r,rp)
function c64881644.atkop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
local tg=Duel.SelectMatchingCard(tp,c101204009.tgfilter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
local tg=Duel.SelectMatchingCard(tp,c64881644.tgfilter,tp,LOCATION_DECK,0,1,1,nil):GetFirst()
if tg and Duel.SendtoGrave(tg,REASON_COST)~=0 and tg:IsLocation(LOCATION_GRAVE) then
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) and tc:IsFaceup() then
......@@ -66,31 +66,31 @@ function c101204009.atkop(e,tp,eg,ep,ev,re,r,rp)
end
end
end
function c101204009.thfilter(c)
return not c:IsCode(101204009) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9b) and c:IsAbleToHand()
function c64881644.thfilter(c)
return not c:IsCode(64881644) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9b) and c:IsAbleToHand()
end
function c101204009.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204009.thfilter,tp,LOCATION_DECK,0,1,nil) end
function c64881644.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c64881644.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c101204009.thop(e,tp,eg,ep,ev,re,r,rp)
function c64881644.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204009.thfilter,tp,LOCATION_DECK,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c64881644.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if #g>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
function c101204009.cfilter(c,tp)
function c64881644.cfilter(c,tp)
return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsSetCard(0x9b) and c:IsControler(tp)
end
function c101204009.pencon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsFaceup() and eg:IsExists(c101204009.cfilter,1,nil,tp)
function c64881644.pencon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsFaceup() and eg:IsExists(c64881644.cfilter,1,nil,tp)
end
function c101204009.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
function c64881644.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
end
function c101204009.penop(e,tp,eg,ep,ev,re,r,rp)
function c64881644.penop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then
Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
......
c65326118.lua
View file @ 5c511c44
--天盃龍ファドラ
function c101204017.initial_effect(c)
function c65326118.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204017,0))
e1:SetDescription(aux.Stringid(65326118,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,101204017)
e1:SetTarget(c101204017.sptg)
e1:SetOperation(c101204017.spop)
e1:SetCountLimit(1,65326118)
e1:SetTarget(c65326118.sptg)
e1:SetOperation(c65326118.spop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
......@@ -23,59 +23,59 @@ function c101204017.initial_effect(c)
e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
e4:SetRange(LOCATION_MZONE)
e4:SetTargetRange(LOCATION_MZONE,0)
e4:SetTarget(c101204017.indtg)
e4:SetTarget(c65326118.indtg)
e4:SetValue(1)
c:RegisterEffect(e4)
local e5=Effect.CreateEffect(c)
e5:SetDescription(aux.Stringid(101204017,2))
e5:SetDescription(aux.Stringid(65326118,2))
e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
e5:SetType(EFFECT_TYPE_QUICK_O)
e5:SetCode(EVENT_FREE_CHAIN)
e5:SetHintTiming(0,TIMING_BATTLE_START+TIMING_BATTLE_STEP_END+TIMING_BATTLE_END)
e5:SetRange(LOCATION_MZONE)
e5:SetCountLimit(1)
e5:SetCondition(c101204017.sccon)
e5:SetTarget(c101204017.sctg)
e5:SetOperation(c101204017.scop)
e5:SetCondition(c65326118.sccon)
e5:SetTarget(c65326118.sctg)
e5:SetOperation(c65326118.scop)
c:RegisterEffect(e5)
end
function c101204017.filter(c,e,tp)
function c65326118.filter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c101204017.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101204017.filter(chkc,e,tp) end
function c65326118.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c65326118.filter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c101204017.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
and Duel.IsExistingTarget(c65326118.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c101204017.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
local g=Duel.SelectTarget(tp,c65326118.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function c101204017.spop(e,tp,eg,ep,ev,re,r,rp)
function c65326118.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
end
end
function c101204017.indtg(e,c)
function c65326118.indtg(e,c)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
end
function c101204017.sccon(e,tp,eg,ep,ev,re,r,rp)
function c65326118.sccon(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c101204017.mfilter(c)
function c65326118.mfilter(c)
return not c:IsStatus(STATUS_SUMMONING)
end
function c101204017.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=Duel.GetMatchingGroup(c101204017.mfilter,tp,LOCATION_MZONE,0,nil)
function c65326118.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=Duel.GetMatchingGroup(c65326118.mfilter,tp,LOCATION_MZONE,0,nil)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler(),mg) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c101204017.scop(e,tp,eg,ep,ev,re,r,rp)
function c65326118.scop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local mg=Duel.GetMatchingGroup(c101204017.mfilter,tp,LOCATION_MZONE,0,nil)
local mg=Duel.GetMatchingGroup(c65326118.mfilter,tp,LOCATION_MZONE,0,nil)
if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
local g=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,c,mg)
if g:GetCount()>0 then
......
c65726770.lua
View file @ 5c511c44
--サイレント・マジシャン・ゼロ
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--level up
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
......@@ -55,7 +55,7 @@ function s.value(e,c)
return math.max(0,c:GetLevel()-c:GetOriginalLevel())*500
end
function s.cfilter(c)
return c:IsFaceup() and c:IsCode(101204051)
return c:IsFaceup() and c:IsCode(79791878)
end
function s.negcon(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
......
c66730191.lua
View file @ 5c511c44
--燦幻開門
function c101204060.initial_effect(c)
function c66730191.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_ACTIVATE)
e1:SetCode(EVENT_FREE_CHAIN)
e1:SetCountLimit(1,101204060+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c101204060.target)
e1:SetOperation(c101204060.activate)
e1:SetCountLimit(1,66730191+EFFECT_COUNT_CODE_OATH)
e1:SetTarget(c66730191.target)
e1:SetOperation(c66730191.activate)
c:RegisterEffect(e1)
end
function c101204060.filter(c)
function c66730191.filter(c)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4) and c:IsAbleToHand()
end
function c101204060.spfilter(c,e,tp)
function c66730191.spfilter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c101204060.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204060.filter,tp,LOCATION_DECK,0,1,nil) or Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
function c66730191.target(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c66730191.filter,tp,LOCATION_DECK,0,1,nil) or Duel.IsExistingMatchingCard(c66730191.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
end
function c101204060.activate(e,tp,eg,ep,ev,re,r,rp)
function c66730191.activate(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase()
local op=0
if Duel.IsExistingMatchingCard(c101204060.filter,tp,LOCATION_DECK,0,1,nil) then
if not Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) or Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(101204060,1)) then
if Duel.IsExistingMatchingCard(c66730191.filter,tp,LOCATION_DECK,0,1,nil) then
if not Duel.IsExistingMatchingCard(c66730191.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) or Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and Duel.IsExistingMatchingCard(c66730191.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(66730191,1)) then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204060.filter,tp,LOCATION_DECK,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c66730191.filter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
......@@ -36,12 +36,12 @@ function c101204060.activate(e,tp,eg,ep,ev,re,r,rp)
end
end
Duel.AdjustAll()
if op==0 or Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE and Duel.SelectYesNo(tp,aux.Stringid(101204060,2)) then
if op==0 or Duel.IsExistingMatchingCard(c66730191.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE and Duel.SelectYesNo(tp,aux.Stringid(66730191,2)) then
if op~=0 then
Duel.BreakEffect()
end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c101204060.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp,e,tp)
local g=Duel.SelectMatchingCard(tp,c66730191.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
......
c78679226.lua
View file @ 5c511c44
--未来への沈黙
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--Activate without draw
local e1=Effect.CreateEffect(c)
e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
......@@ -21,10 +21,10 @@ function s.initial_effect(c)
c:RegisterEffect(e2)
end
function s.sfilter(c)
return c:IsFaceup() and c:IsCode(101204051)
return c:IsFaceup() and c:IsCode(79791878)
end
function s.mfilter(c)
return c:IsFaceup() and aux.IsCodeListed(c,101204051) and c:IsType(TYPE_MONSTER)
return c:IsFaceup() and aux.IsCodeListed(c,79791878) and c:IsType(TYPE_MONSTER)
end
function s.ndcon(e,tp,eg,ep,ev,re,r,rp)
return not s.dcon(e,tp,eg,ep,ev,re,r,rp)
......@@ -34,7 +34,7 @@ function s.dcon(e,tp,eg,ep,ev,re,r,rp)
and Duel.IsExistingMatchingCard(s.sfilter,tp,LOCATION_ONFIELD,0,1,nil) and Duel.IsExistingMatchingCard(s.mfilter,tp,LOCATION_MZONE,0,1,nil)
end
function s.filter(c)
return aux.IsCodeListed(c,101204051) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
return aux.IsCodeListed(c,79791878) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
end
function s.ndtarget(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil) end
......
c79791878.lua
View file @ 5c511c44
--光の黄金櫃
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--Activate
local e1=Effect.CreateEffect(c)
e1:SetType(EFFECT_TYPE_ACTIVATE)
......
c82570174.lua
View file @ 5c511c44
--燦幻昇龍バイデント·ドラギオン
function c101204039.initial_effect(c)
function c82570174.initial_effect(c)
aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
c:EnableReviveLimit()
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204039,0))
e1:SetDescription(aux.Stringid(82570174,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetCode(EVENT_SPSUMMON_SUCCESS)
e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
e1:SetCountLimit(1,101204039)
e1:SetCondition(c101204039.spcon)
e1:SetTarget(c101204039.sptg)
e1:SetOperation(c101204039.spop)
e1:SetCountLimit(1,82570174)
e1:SetCondition(c82570174.spcon)
e1:SetTarget(c82570174.sptg)
e1:SetOperation(c82570174.spop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204039,1))
e2:SetDescription(aux.Stringid(82570174,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
e2:SetType(EFFECT_TYPE_QUICK_O)
e2:SetCode(EVENT_FREE_CHAIN)
e2:SetHintTiming(0,TIMING_BATTLE_START+TIMING_ATTACK+TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
e2:SetRange(LOCATION_GRAVE)
e2:SetCountLimit(1,101204139+EFFECT_COUNT_CODE_DUEL)
e2:SetCondition(c101204039.spcon2)
e2:SetCost(c101204039.spcost2)
e2:SetTarget(c101204039.sptg2)
e2:SetOperation(c101204039.spop2)
e2:SetCountLimit(1,82570175+EFFECT_COUNT_CODE_DUEL)
e2:SetCondition(c82570174.spcon2)
e2:SetCost(c82570174.spcost2)
e2:SetTarget(c82570174.sptg2)
e2:SetOperation(c82570174.spop2)
c:RegisterEffect(e2)
if not c101204039.global_check then
c101204039.global_check=true
if not c82570174.global_check then
c82570174.global_check=true
local ge1=Effect.GlobalEffect()
ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
ge1:SetOperation(c101204039.checkop)
ge1:SetOperation(c82570174.checkop)
Duel.RegisterEffect(ge1,0)
end
end
function c101204039.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,101204039,RESET_PHASE+PHASE_END,0,1)
Duel.RegisterFlagEffect(1-tp,101204039,RESET_PHASE+PHASE_END,0,1)
function c82570174.checkop(e,tp,eg,ep,ev,re,r,rp)
Duel.RegisterFlagEffect(tp,82570174,RESET_PHASE+PHASE_END,0,1)
Duel.RegisterFlagEffect(1-tp,82570174,RESET_PHASE+PHASE_END,0,1)
end
function c101204039.spcon(e,tp,eg,ep,ev,re,r,rp)
function c82570174.spcon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
end
function c101204039.spfilter(c,e,tp)
function c82570174.spfilter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c101204039.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c101204039.spfilter(chkc,e,tp) end
function c82570174.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c82570174.spfilter(chkc,e,tp) end
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingTarget(c101204039.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
and Duel.IsExistingTarget(c82570174.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectTarget(tp,c101204039.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
local g=Duel.SelectTarget(tp,c82570174.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
end
function c101204039.spop(e,tp,eg,ep,ev,re,r,rp)
function c82570174.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
......@@ -69,26 +69,26 @@ function c101204039.spop(e,tp,eg,ep,ev,re,r,rp)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function c101204039.spcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,101204039)>=3
function c82570174.spcon2(e,tp,eg,ep,ev,re,r,rp)
return Duel.GetFlagEffect(tp,82570174)>=3
end
function c101204039.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
function c82570174.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
local c=e:GetHandler()
if chk==0 then return true end
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204039,3))
e1:SetDescription(aux.Stringid(82570174,3))
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
e1:SetTargetRange(1,0)
Duel.RegisterEffect(e1,tp)
end
function c101204039.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
function c82570174.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c101204039.spop2(e,tp,eg,ep,ev,re,r,rp)
function c82570174.spop2(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) and Duel.SelectYesNo(tp,aux.Stringid(101204039,2)) then
if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) and Duel.SelectYesNo(tp,aux.Stringid(82570174,2)) then
local g=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
if #g>0 then
Duel.BreakEffect()
......
c90276649.lua
View file @ 5c511c44
--幻奏の歌姫クープレ
function c101204010.initial_effect(c)
function c90276649.initial_effect(c)
aux.EnablePendulumAttribute(c)
local e0=Effect.CreateEffect(c)
e0:SetType(EFFECT_TYPE_FIELD)
......@@ -7,98 +7,98 @@ function c101204010.initial_effect(c)
e0:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
e0:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
e0:SetTargetRange(1,0)
e0:SetTarget(c101204010.splimit)
e0:SetTarget(c90276649.splimit)
c:RegisterEffect(e0)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204010,0))
e1:SetDescription(aux.Stringid(90276649,0))
e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_PZONE)
e1:SetCountLimit(1,101204010)
e1:SetCondition(c101204010.thcon)
e1:SetTarget(c101204010.thtg)
e1:SetOperation(c101204010.thop)
e1:SetCountLimit(1,90276649)
e1:SetCondition(c90276649.thcon)
e1:SetTarget(c90276649.thtg)
e1:SetOperation(c90276649.thop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204010,1))
e2:SetDescription(aux.Stringid(90276649,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_TO_HAND)
e2:SetCountLimit(1,101204110)
e2:SetCondition(c101204010.spcon)
e2:SetCost(c101204010.spcost)
e2:SetTarget(c101204010.sptg)
e2:SetOperation(c101204010.spop)
e2:SetCountLimit(1,90276650)
e2:SetCondition(c90276649.spcon)
e2:SetCost(c90276649.spcost)
e2:SetTarget(c90276649.sptg)
e2:SetOperation(c90276649.spop)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204010,2))
e3:SetDescription(aux.Stringid(90276649,2))
e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e3:SetCode(EVENT_SPSUMMON_SUCCESS)
e3:SetProperty(EFFECT_FLAG_DELAY)
e3:SetRange(LOCATION_EXTRA)
e3:SetCountLimit(1,101204210)
e3:SetCondition(c101204010.pencon)
e3:SetTarget(c101204010.pentg)
e3:SetOperation(c101204010.penop)
e3:SetCountLimit(1,90276651)
e3:SetCondition(c90276649.pencon)
e3:SetTarget(c90276649.pentg)
e3:SetOperation(c90276649.penop)
c:RegisterEffect(e3)
end
function c101204010.splimit(e,c,tp,sumtp,sumpos)
function c90276649.splimit(e,c,tp,sumtp,sumpos)
return not c:IsAttribute(ATTRIBUTE_LIGHT) and bit.band(sumtp,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
end
function c101204010.thcfilter(c)
function c90276649.thcfilter(c)
return c:IsFaceup() and not c:IsSetCard(0x9b)
end
function c101204010.thcon(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsExistingMatchingCard(c101204010.thcfilter,tp,LOCATION_MZONE,0,1,nil)
function c90276649.thcon(e,tp,eg,ep,ev,re,r,rp)
return not Duel.IsExistingMatchingCard(c90276649.thcfilter,tp,LOCATION_MZONE,0,1,nil)
end
function c101204010.thfilter(c)
function c90276649.thfilter(c)
return c:IsSetCard(0x9b) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
end
function c101204010.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c101204010.thfilter,tp,LOCATION_DECK,0,1,nil) end
function c90276649.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(c90276649.thfilter,tp,LOCATION_DECK,0,1,nil) end
Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
end
function c101204010.thop(e,tp,eg,ep,ev,re,r,rp)
function c90276649.thop(e,tp,eg,ep,ev,re,r,rp)
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
local g=Duel.SelectMatchingCard(tp,c101204010.thfilter,tp,LOCATION_DECK,0,1,1,nil)
local g=Duel.SelectMatchingCard(tp,c90276649.thfilter,tp,LOCATION_DECK,0,1,1,nil)
if g:GetCount()>0 then
Duel.SendtoHand(g,nil,REASON_EFFECT)
Duel.ConfirmCards(1-tp,g)
end
end
function c101204010.spcon(e,tp,eg,ep,ev,re,r,rp)
function c90276649.spcon(e,tp,eg,ep,ev,re,r,rp)
return not (r==REASON_RULE)
end
function c101204010.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
function c90276649.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return not e:GetHandler():IsPublic() end
end
function c101204010.spfilter(c,e,tp)
function c90276649.spfilter(c,e,tp)
return c:IsLevelBelow(4) and c:IsSetCard(0x9b) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c101204010.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
function c90276649.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c101204010.spfilter,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c90276649.spfilter,tp,LOCATION_GRAVE+LOCATION_HAND,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_HAND)
end
function c101204010.spop(e,tp,eg,ep,ev,re,r,rp)
function c90276649.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c101204010.spfilter),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c90276649.spfilter),tp,LOCATION_GRAVE+LOCATION_HAND,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c101204010.cfilter(c,tp)
function c90276649.cfilter(c,tp)
return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsSetCard(0x9b) and c:IsControler(tp)
end
function c101204010.pencon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsFaceup() and eg:IsExists(c101204010.cfilter,1,nil,tp)
function c90276649.pencon(e,tp,eg,ep,ev,re,r,rp)
return e:GetHandler():IsFaceup() and eg:IsExists(c90276649.cfilter,1,nil,tp)
end
function c101204010.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
function c90276649.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
end
function c101204010.penop(e,tp,eg,ep,ev,re,r,rp)
function c90276649.penop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsRelateToEffect(e) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1)) then
Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
......
c91098230.lua
View file @ 5c511c44
--古代の機械戦車兵
function c101204007.initial_effect(c)
function c91098230.initial_effect(c)
aux.AddCodeList(c,83104731)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204007,0))
e1:SetDescription(aux.Stringid(91098230,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
e1:SetProperty(EFFECT_FLAG_DELAY)
e1:SetCode(EVENT_SUMMON_SUCCESS)
e1:SetCountLimit(1,101204007)
e1:SetTarget(c101204007.sptg)
e1:SetOperation(c101204007.spop)
e1:SetCountLimit(1,91098230)
e1:SetTarget(c91098230.sptg)
e1:SetOperation(c91098230.spop)
c:RegisterEffect(e1)
local e2=e1:Clone()
e2:SetCode(EVENT_SPSUMMON_SUCCESS)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204007,1))
e3:SetDescription(aux.Stringid(91098230,1))
e3:SetCategory(CATEGORY_DESTROY)
e3:SetType(EFFECT_TYPE_IGNITION)
e3:SetRange(LOCATION_MZONE)
e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
e3:SetCountLimit(1,101204107)
e3:SetTarget(c101204007.destg)
e3:SetOperation(c101204007.desop)
e3:SetCountLimit(1,91098231)
e3:SetTarget(c91098230.destg)
e3:SetOperation(c91098230.desop)
c:RegisterEffect(e3)
end
function c101204007.filter1(c,e,tp)
return not c:IsCode(101204007) and c:IsSetCard(0x7) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
function c91098230.filter1(c,e,tp)
return not c:IsCode(91098230) and c:IsSetCard(0x7) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
and (c:IsLocation(LOCATION_HAND) or c:IsLocation(LOCATION_GRAVE) and Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_MZONE,1,nil))
end
function c101204007.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
function c91098230.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c101204007.filter1,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c91098230.filter1,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
end
function c101204007.spop(e,tp,eg,ep,ev,re,r,rp)
function c91098230.spop(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c101204007.filter1),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c91098230.filter1),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
end
end
function c101204007.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
function c91098230.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
if chkc then return chkc:IsOnField() end
if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,0,1,nil) end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,0,1,1,nil)
Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
end
function c101204007.desop(e,tp,eg,ep,ev,re,r,rp)
function c91098230.desop(e,tp,eg,ep,ev,re,r,rp)
local tc=Duel.GetFirstTarget()
if tc:IsRelateToEffect(e) then
Duel.Destroy(tc,REASON_EFFECT)
......@@ -58,11 +58,11 @@ function c101204007.desop(e,tp,eg,ep,ev,re,r,rp)
e1:SetType(EFFECT_TYPE_FIELD)
e1:SetCode(EFFECT_UPDATE_ATTACK)
e1:SetTargetRange(LOCATION_MZONE,0)
e1:SetTarget(c101204007.atktg)
e1:SetTarget(c91098230.atktg)
e1:SetValue(600)
e1:SetReset(RESET_PHASE+PHASE_END)
Duel.RegisterEffect(e1,tp)
end
function c101204007.atktg(e,c)
function c91098230.atktg(e,c)
return c:IsCode(83104731) or aux.IsCodeListed(c,83104731)
end
\ No newline at end of file
c91810826.lua
View file @ 5c511c44
--天盃龍チュンドラ
function c101204018.initial_effect(c)
function c91810826.initial_effect(c)
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(101204018,0))
e1:SetDescription(aux.Stringid(91810826,0))
e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
e1:SetType(EFFECT_TYPE_IGNITION)
e1:SetRange(LOCATION_HAND)
e1:SetCountLimit(1,101204018)
e1:SetCondition(c101204018.spcon)
e1:SetTarget(c101204018.sptg)
e1:SetOperation(c101204018.spop)
e1:SetCountLimit(1,91810826)
e1:SetCondition(c91810826.spcon)
e1:SetTarget(c91810826.sptg)
e1:SetOperation(c91810826.spop)
c:RegisterEffect(e1)
local e2=Effect.CreateEffect(c)
e2:SetDescription(aux.Stringid(101204018,1))
e2:SetDescription(aux.Stringid(91810826,1))
e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
e2:SetProperty(EFFECT_FLAG_DELAY)
e2:SetCode(EVENT_BATTLE_START)
e2:SetRange(LOCATION_MZONE)
e2:SetCountLimit(1,101204118)
e2:SetTarget(c101204018.sptg2)
e2:SetOperation(c101204018.spop2)
e2:SetCountLimit(1,91810827)
e2:SetTarget(c91810826.sptg2)
e2:SetOperation(c91810826.spop2)
c:RegisterEffect(e2)
local e3=Effect.CreateEffect(c)
e3:SetDescription(aux.Stringid(101204018,2))
e3:SetDescription(aux.Stringid(91810826,2))
e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
e3:SetType(EFFECT_TYPE_QUICK_O)
e3:SetCode(EVENT_FREE_CHAIN)
e3:SetHintTiming(0,TIMING_BATTLE_START+TIMING_BATTLE_STEP_END+TIMING_BATTLE_END)
e3:SetRange(LOCATION_MZONE)
e3:SetCountLimit(1)
e3:SetCondition(c101204018.sccon)
e3:SetTarget(c101204018.sctg)
e3:SetOperation(c101204018.scop)
e3:SetCondition(c91810826.sccon)
e3:SetTarget(c91810826.sctg)
e3:SetOperation(c91810826.scop)
c:RegisterEffect(e3)
end
function c101204018.cfilter(c)
function c91810826.cfilter(c)
return c:IsFaceup() and c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
end
function c101204018.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c101204018.cfilter,tp,LOCATION_MZONE,0,1,nil)
function c91810826.spcon(e,tp,eg,ep,ev,re,r,rp)
return Duel.IsExistingMatchingCard(c91810826.cfilter,tp,LOCATION_MZONE,0,1,nil)
end
function c101204018.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
function c91810826.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
end
function c101204018.spop(e,tp,eg,ep,ev,re,r,rp)
function c91810826.spop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if not c:IsRelateToEffect(e) then return end
Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
end
function c101204018.filter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4) and not c:IsCode(101204018)
function c91810826.filter(c,e,tp)
return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4) and not c:IsCode(91810826)
and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
end
function c101204018.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
function c91810826.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
and Duel.IsExistingMatchingCard(c101204018.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
and Duel.IsExistingMatchingCard(c91810826.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
end
function c101204018.spop2(e,tp,eg,ep,ev,re,r,rp)
function c91810826.spop2(e,tp,eg,ep,ev,re,r,rp)
if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
local g=Duel.SelectMatchingCard(tp,c101204018.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
local g=Duel.SelectMatchingCard(tp,c91810826.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
if g:GetCount()>0 then
Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
end
end
function c101204018.sccon(e,tp,eg,ep,ev,re,r,rp)
function c91810826.sccon(e,tp,eg,ep,ev,re,r,rp)
local ph=Duel.GetCurrentPhase()
return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
end
function c101204018.mfilter(c)
function c91810826.mfilter(c)
return not c:IsStatus(STATUS_SUMMONING)
end
function c101204018.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=Duel.GetMatchingGroup(c101204018.mfilter,tp,LOCATION_MZONE,0,nil)
function c91810826.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
local mg=Duel.GetMatchingGroup(c91810826.mfilter,tp,LOCATION_MZONE,0,nil)
if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler(),mg) end
Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
end
function c101204018.scop(e,tp,eg,ep,ev,re,r,rp)
function c91810826.scop(e,tp,eg,ep,ev,re,r,rp)
local c=e:GetHandler()
if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
local mg=Duel.GetMatchingGroup(c101204018.mfilter,tp,LOCATION_MZONE,0,nil)
local mg=Duel.GetMatchingGroup(c91810826.mfilter,tp,LOCATION_MZONE,0,nil)
local g=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,c,mg)
if g:GetCount()>0 then
Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
......
c92110878.lua
View file @ 5c511c44
--トリコロール・ガジェット
local s,id,o=GetID()
function s.initial_effect(c)
aux.AddCodeList(c,101204051)
aux.AddCodeList(c,79791878)
--search
local e1=Effect.CreateEffect(c)
e1:SetDescription(aux.Stringid(id,0))
......@@ -29,7 +29,7 @@ function s.initial_effect(c)
c:RegisterEffect(e1)
end
function s.srfilter(c)
return (c:IsCode(101204051) or aux.IsCodeListed(c,101204051) and c:IsType(TYPE_SPELL+TYPE_TRAP)) and c:IsAbleToHand()
return (c:IsCode(79791878) or aux.IsCodeListed(c,79791878) and c:IsType(TYPE_SPELL+TYPE_TRAP)) and c:IsAbleToHand()
end
function s.srtg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.srfilter,tp,LOCATION_DECK,0,1,nil) end
......@@ -47,7 +47,7 @@ function s.setcon(e,tp,eg,ep,ev,re,r,rp)
return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
end
function s.setfilter(c)
return c:IsCode(101204071) and c:IsSSetable()
return c:IsCode(27157727) and c:IsSSetable()
end
function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil) end
......
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