From 3e8207d89f2ec6721164230f5a4e5560da89f3e6 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 28 Jul 2025 23:39:25 +0900 Subject: [PATCH 01/11] Add some hint for delayed effect --- c22283204.lua | 1 + c35480699.lua | 20 ++++++++++-------- c51405049.lua | 38 +++++++++++++++++---------------- c52947044.lua | 56 +++++++++++++++++++++++++------------------------ c59750328.lua | 22 ++++++++++--------- c59822133.lua | 58 ++++++++++++++++++++++++++------------------------- c67171933.lua | 1 + c68191756.lua | 36 +++++++++++++++++--------------- c72537897.lua | 44 +++++++++++++++++++------------------- c81470373.lua | 48 ++++++++++++++++++++++-------------------- c82983267.lua | 1 + c88284599.lua | 1 + c93946239.lua | 20 ++++++++++-------- c9822220.lua | 58 ++++++++++++++++++++++++++------------------------- 14 files changed, 214 insertions(+), 190 deletions(-) diff --git a/c22283204.lua b/c22283204.lua index 51b126cfd6..feac51e026 100644 --- a/c22283204.lua +++ b/c22283204.lua @@ -75,6 +75,7 @@ function s.rmcon(fid) end end function s.rmop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() if tc and tc:IsOnField() then Duel.Remove(tc,POS_FACEUP,REASON_EFFECT) diff --git a/c35480699.lua b/c35480699.lua index 93f734b9e7..2c96e3fa22 100644 --- a/c35480699.lua +++ b/c35480699.lua @@ -1,21 +1,22 @@ --皆既日蝕の書 -function c35480699.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_POSITION+CATEGORY_DRAW) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetTarget(c35480699.target) - e1:SetOperation(c35480699.activate) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c35480699.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsCanTurnSet,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end local g=Duel.GetMatchingGroup(Card.IsCanTurnSet,tp,LOCATION_MZONE,LOCATION_MZONE,nil) Duel.SetOperationInfo(0,CATEGORY_POSITION,g,g:GetCount(),0,0) end -function c35480699.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(Card.IsCanTurnSet,tp,LOCATION_MZONE,LOCATION_MZONE,nil) if g:GetCount()>0 then Duel.ChangePosition(g,POS_FACEDOWN_DEFENSE) @@ -25,14 +26,15 @@ function c35480699.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetReset(RESET_PHASE+PHASE_END) - e1:SetCondition(c35480699.flipcon) - e1:SetOperation(c35480699.flipop) + e1:SetCondition(s.flipcon) + e1:SetOperation(s.flipop) Duel.RegisterEffect(e1,tp) end -function c35480699.flipcon(e,tp,eg,ep,ev,re,r,rp) +function s.flipcon(e,tp,eg,ep,ev,re,r,rp) return Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_MZONE,1,nil) end -function c35480699.flipop(e,tp,eg,ep,ev,re,r,rp) +function s.flipop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local g=Duel.GetMatchingGroup(Card.IsFacedown,tp,0,LOCATION_MZONE,nil) local ct=Duel.ChangePosition(g,POS_FACEUP_DEFENSE) Duel.BreakEffect() diff --git a/c51405049.lua b/c51405049.lua index e739aec968..3b0caa1852 100644 --- a/c51405049.lua +++ b/c51405049.lua @@ -1,38 +1,39 @@ --ワンチャン！？ -function c51405049.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCondition(c51405049.condition) - e1:SetTarget(c51405049.target) - e1:SetOperation(c51405049.activate) + e1:SetCondition(s.condition) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c51405049.cfilter(c) +function s.cfilter(c) return c:IsFaceup() and c:IsLevel(1) end -function c51405049.condition(e,tp,eg,ep,ev,re,r,rp) - return Duel.IsExistingMatchingCard(c51405049.cfilter,tp,LOCATION_MZONE,0,1,nil) +function s.condition(e,tp,eg,ep,ev,re,r,rp) + return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil) end -function c51405049.filter(c) +function s.filter(c) return c:IsLevel(1) and c:IsAbleToHand() end -function c51405049.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c51405049.filter,tp,LOCATION_DECK,0,1,nil) end +function s.target(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c51405049.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c51405049.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetCode(EVENT_SUMMON_SUCCESS) - e1:SetOperation(c51405049.regop) + e1:SetOperation(s.regop) e1:SetLabel(g:GetFirst():GetCode()) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) @@ -40,23 +41,24 @@ function c51405049.activate(e,tp,eg,ep,ev,re,r,rp) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetCountLimit(1) - e2:SetCondition(c51405049.damcon) - e2:SetOperation(c51405049.damop) + e2:SetCondition(s.damcon) + e2:SetOperation(s.damop) e2:SetReset(RESET_PHASE+PHASE_END) e2:SetLabelObject(e1) Duel.RegisterEffect(e2,tp) end end -function c51405049.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) if e:GetLabel()==0 then return end local tc=eg:GetFirst() if tc:IsSummonPlayer(tp) and tc:IsCode(e:GetLabel()) then e:SetLabel(0) end end -function c51405049.damcon(e,tp,eg,ep,ev,re,r,rp) +function s.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetLabelObject():GetLabel()~=0 end -function c51405049.damop(e,tp,eg,ep,ev,re,r,rp) +function s.damop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) Duel.Damage(tp,2000,REASON_EFFECT) end diff --git a/c52947044.lua b/c52947044.lua index ff6a69e0eb..22b362578e 100644 --- a/c52947044.lua +++ b/c52947044.lua @@ -1,43 +1,44 @@ --フュージョン・デステニー -function c52947044.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_DECKDES) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,52947044+EFFECT_COUNT_CODE_OATH) - e1:SetTarget(c52947044.target) - e1:SetOperation(c52947044.activate) + e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c52947044.filter0(c) +function s.filter0(c) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToGrave() end -function c52947044.filter1(c,e) +function s.filter1(c,e) return not c:IsImmuneToEffect(e) and c:IsLocation(LOCATION_HAND) end -function c52947044.filter2(c,e,tp,m,f,chkf) +function s.filter2(c,e,tp,m,f,chkf) return c:IsType(TYPE_FUSION) and aux.IsMaterialListSetCard(c,0xc008) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function c52947044.fcheck(tp,sg,fc) +function s.fcheck(tp,sg,fc) return sg:IsExists(Card.IsFusionSetCard,1,nil,0xc008) end -function c52947044.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp local mg1=Duel.GetFusionMaterial(tp):Filter(Card.IsLocation,nil,LOCATION_HAND) - local mg2=Duel.GetMatchingGroup(c52947044.filter0,tp,LOCATION_DECK,0,nil) + local mg2=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_DECK,0,nil) mg1:Merge(mg2) - aux.FCheckAdditional=c52947044.fcheck - local res=Duel.IsExistingMatchingCard(c52947044.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=s.fcheck + local res=Duel.IsExistingMatchingCard(s.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(c52947044.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) + res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) end end aux.FCheckAdditional=nil @@ -45,14 +46,14 @@ function c52947044.target(e,tp,eg,ep,ev,re,r,rp,chk) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) end -function c52947044.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c52947044.filter1,nil,e) - local mg2=Duel.GetMatchingGroup(c52947044.filter0,tp,LOCATION_DECK,0,nil) + local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e) + local mg2=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_DECK,0,nil) mg1:Merge(mg2) - aux.FCheckAdditional=c52947044.fcheck - local sg1=Duel.GetMatchingGroup(c52947044.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=s.fcheck + local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg3=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -60,7 +61,7 @@ function c52947044.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(c52947044.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf) + sg2=Duel.GetMatchingGroup(s.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() @@ -80,13 +81,13 @@ function c52947044.activate(e,tp,eg,ep,ev,re,r,rp) fop(ce,e,tp,tc,mat2) end tc:CompleteProcedure() - tc:RegisterFlagEffect(52947044,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2) + tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) - e1:SetCondition(c52947044.descon) - e1:SetOperation(c52947044.desop) + e1:SetCondition(s.descon) + e1:SetOperation(s.desop) e1:SetReset(RESET_PHASE+PHASE_END,2) e1:SetCountLimit(1) e1:SetLabel(Duel.GetTurnCount()) @@ -100,18 +101,19 @@ function c52947044.activate(e,tp,eg,ep,ev,re,r,rp) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e2:SetTargetRange(1,0) - e2:SetTarget(c52947044.splimit) + e2:SetTarget(s.splimit) e2:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e2,tp) end -function c52947044.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local tc=e:GetLabelObject() - return Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(52947044)~=0 + return Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(id)~=0 end -function c52947044.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.Destroy(tc,REASON_EFFECT) end -function c52947044.splimit(e,c) +function s.splimit(e,c) return not (c:IsAttribute(ATTRIBUTE_DARK) and c:IsSetCard(0x8)) end diff --git a/c59750328.lua b/c59750328.lua index c6fd7f4630..ac9a1d0806 100644 --- a/c59750328.lua +++ b/c59750328.lua @@ -1,17 +1,18 @@ --命削りの宝札 -function c59750328.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_DRAW) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,59750328+EFFECT_COUNT_CODE_OATH) - e1:SetCost(c59750328.cost) - e1:SetTarget(c59750328.target) - e1:SetOperation(c59750328.activate) + e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH) + e1:SetCost(s.cost) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c59750328.cost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetActivityCount(tp,ACTIVITY_SPSUMMON)==0 end local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) @@ -21,13 +22,13 @@ function c59750328.cost(e,tp,eg,ep,ev,re,r,rp,chk) e1:SetTargetRange(1,0) Duel.RegisterEffect(e1,tp) end -function c59750328.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) local ct=3-Duel.GetMatchingGroupCount(nil,tp,LOCATION_HAND,0,e:GetHandler()) if chk==0 then return ct>0 and Duel.IsPlayerCanDraw(tp,ct) end Duel.SetTargetPlayer(tp) Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,ct) end -function c59750328.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER) local ct=3-Duel.GetFieldGroupCount(p,LOCATION_HAND,0) if ct>0 then @@ -52,10 +53,11 @@ function c59750328.activate(e,tp,eg,ep,ev,re,r,rp) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetCountLimit(1) e3:SetReset(RESET_PHASE+PHASE_END) - e3:SetOperation(c59750328.tgop) + e3:SetOperation(s.tgop) Duel.RegisterEffect(e3,p) end -function c59750328.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local g=Duel.GetFieldGroup(e:GetOwnerPlayer(),LOCATION_HAND,0) Duel.SendtoGrave(g,REASON_EFFECT) end diff --git a/c59822133.lua b/c59822133.lua index 04dc5360cc..9176b03b0f 100644 --- a/c59822133.lua +++ b/c59822133.lua @@ -1,76 +1,77 @@ --青眼の精霊龍 -function c59822133.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsSetCard,0xdd),1) c:EnableReviveLimit() --special summon limit local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) - e1:SetCode(59822133) + e1:SetCode(id) e1:SetRange(LOCATION_MZONE) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetTargetRange(1,1) c:RegisterEffect(e1) --negate local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(59822133,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetCategory(CATEGORY_NEGATE) e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL) e2:SetType(EFFECT_TYPE_QUICK_O) e2:SetRange(LOCATION_MZONE) e2:SetCountLimit(1) e2:SetCode(EVENT_CHAINING) - e2:SetCondition(c59822133.negcon) - e2:SetTarget(c59822133.negtg) - e2:SetOperation(c59822133.negop) + e2:SetCondition(s.negcon) + e2:SetTarget(s.negtg) + e2:SetOperation(s.negop) c:RegisterEffect(e2) --special summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(59822133,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) e3:SetRange(LOCATION_MZONE) e3:SetCode(EVENT_FREE_CHAIN) - e3:SetCondition(c59822133.spcon) - e3:SetCost(c59822133.spcost) - e3:SetTarget(c59822133.sptg) - e3:SetOperation(c59822133.spop) + e3:SetCondition(s.spcon) + e3:SetCost(s.spcost) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c59822133.negcon(e,tp,eg,ep,ev,re,r,rp) +function s.negcon(e,tp,eg,ep,ev,re,r,rp) return re:GetActivateLocation()==LOCATION_GRAVE and Duel.IsChainNegatable(ev) end -function c59822133.negtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.negtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0) end -function c59822133.negop(e,tp,eg,ep,ev,re,r,rp) +function s.negop(e,tp,eg,ep,ev,re,r,rp) Duel.NegateActivation(ev) end -function c59822133.spcon(e,tp,eg,ep,ev,re,r,rp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) end -function c59822133.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsReleasable() end Duel.Release(e:GetHandler(),REASON_COST) end -function c59822133.spfilter(c,e,tp,mc) +function s.spfilter(c,e,tp,mc) return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsType(TYPE_SYNCHRO) - and not c:IsCode(59822133) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) + and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0 end -function c59822133.sptg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c59822133.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,e:GetHandler()) end +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,e:GetHandler()) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) end -function c59822133.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,c59822133.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,nil) + local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,nil) local tc=g:GetFirst() if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)~=0 then local fid=e:GetHandler():GetFieldID() - tc:RegisterFlagEffect(59822133,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid) + tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetCode(EVENT_PHASE+PHASE_END) @@ -79,16 +80,17 @@ function c59822133.spop(e,tp,eg,ep,ev,re,r,rp) e1:SetLabel(fid) e1:SetLabelObject(tc) e1:SetReset(RESET_PHASE+PHASE_END) - e1:SetCondition(c59822133.descon) - e1:SetOperation(c59822133.desop) + e1:SetCondition(s.descon) + e1:SetOperation(s.desop) Duel.RegisterEffect(e1,tp) end end -function c59822133.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local tc=e:GetLabelObject() - return tc:GetFlagEffectLabel(59822133)==e:GetLabel() + return tc:GetFlagEffectLabel(id)==e:GetLabel() end -function c59822133.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.Destroy(tc,REASON_EFFECT) end diff --git a/c67171933.lua b/c67171933.lua index 16ea72706b..ccfe04f56f 100644 --- a/c67171933.lua +++ b/c67171933.lua @@ -74,6 +74,7 @@ function s.tgcon(e,tp,eg,ep,ev,re,r,rp) else return true end end function s.tgop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) Duel.SendtoGrave(e:GetLabelObject(),REASON_EFFECT) end function s.splimit(e,c) diff --git a/c68191756.lua b/c68191756.lua index 3dae185872..811d797ce4 100644 --- a/c68191756.lua +++ b/c68191756.lua @@ -1,25 +1,26 @@ --星遺物の機憶 -function c68191756.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetCountLimit(1,68191756+EFFECT_COUNT_CODE_OATH) - e1:SetTarget(c68191756.target) - e1:SetOperation(c68191756.activate) + e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c68191756.filter(c,e,tp) +function s.filter(c,e,tp) return c:IsSetCard(0x10c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) end -function c68191756.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c68191756.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK) end -function c68191756.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if e:IsHasType(EFFECT_TYPE_ACTIVATE) then local e1=Effect.CreateEffect(c) @@ -27,17 +28,17 @@ function c68191756.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetTargetRange(1,0) - e1:SetTarget(c68191756.splimit) + e1:SetTarget(s.splimit) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,c68191756.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) local tc=g:GetFirst() if tc and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then local fid=c:GetFieldID() - tc:RegisterFlagEffect(68191756,RESET_EVENT+RESETS_STANDARD,0,1,fid) + tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1,fid) local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE) @@ -45,25 +46,26 @@ function c68191756.activate(e,tp,eg,ep,ev,re,r,rp) e3:SetCountLimit(1) e3:SetLabel(fid) e3:SetLabelObject(tc) - e3:SetCondition(c68191756.thcon) - e3:SetOperation(c68191756.thop) + e3:SetCondition(s.thcon) + e3:SetOperation(s.thop) Duel.RegisterEffect(e3,tp) end Duel.SpecialSummonComplete() end -function c68191756.splimit(e,c) +function s.splimit(e,c) return not c:IsSetCard(0x10c) end -function c68191756.thcon(e,tp,eg,ep,ev,re,r,rp) +function s.thcon(e,tp,eg,ep,ev,re,r,rp) local tc=e:GetLabelObject() - if tc:GetFlagEffectLabel(68191756)==e:GetLabel() then + if tc:GetFlagEffectLabel(id)==e:GetLabel() then return true else e:Reset() return false end end -function c68191756.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.SendtoHand(tc,nil,REASON_EFFECT) end diff --git a/c72537897.lua b/c72537897.lua index 542edd21a5..648815e53f 100644 --- a/c72537897.lua +++ b/c72537897.lua @@ -1,31 +1,32 @@ --魔獣の懐柔 -function c72537897.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCondition(c72537897.condition) - e1:SetTarget(c72537897.target) - e1:SetOperation(c72537897.activate) + e1:SetCondition(s.condition) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c72537897.condition(e,tp,eg,ep,ev,re,r,rp) +function s.condition(e,tp,eg,ep,ev,re,r,rp) return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0 end -function c72537897.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsRace(RACE_BEAST) and c:IsLevelBelow(2) and c:IsType(TYPE_EFFECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c72537897.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then - local g=Duel.GetMatchingGroup(c72537897.spfilter,tp,LOCATION_DECK,0,nil,e,tp) + local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_DECK,0,nil,e,tp) return not Duel.IsPlayerAffectedByEffect(tp,59822133) and Duel.GetLocationCount(tp,LOCATION_MZONE)>2 and g:GetClassCount(Card.GetCode)>=3 end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,3,tp,LOCATION_DECK) end -function c72537897.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - local g=Duel.GetMatchingGroup(c72537897.spfilter,tp,LOCATION_DECK,0,nil,e,tp) + local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_DECK,0,nil,e,tp) if not Duel.IsPlayerAffectedByEffect(tp,59822133) and Duel.GetLocationCount(tp,LOCATION_MZONE)>2 and g:GetClassCount(Card.GetCode)>=3 then @@ -35,7 +36,7 @@ function c72537897.activate(e,tp,eg,ep,ev,re,r,rp) local tc=sg1:GetFirst() while tc do Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) - tc:RegisterFlagEffect(72537897,RESET_EVENT+RESETS_STANDARD,0,1,fid) + tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1,fid) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_DISABLE) @@ -57,8 +58,8 @@ function c72537897.activate(e,tp,eg,ep,ev,re,r,rp) e3:SetCountLimit(1) e3:SetLabel(fid) e3:SetLabelObject(sg1) - e3:SetCondition(c72537897.descon) - e3:SetOperation(c72537897.desop) + e3:SetCondition(s.descon) + e3:SetOperation(s.desop) Duel.RegisterEffect(e3,tp) Duel.SpecialSummonComplete() end @@ -68,27 +69,28 @@ function c72537897.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetTargetRange(1,0) - e1:SetTarget(c72537897.splimit) + e1:SetTarget(s.splimit) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end end -function c72537897.splimit(e,c) +function s.splimit(e,c) return c:GetRace()~=RACE_BEAST end -function c72537897.desfilter(c,fid) - return c:GetFlagEffectLabel(72537897)==fid +function s.desfilter(c,fid) + return c:GetFlagEffectLabel(id)==fid end -function c72537897.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local g=e:GetLabelObject() - if not g:IsExists(c72537897.desfilter,1,nil,e:GetLabel()) then + if not g:IsExists(s.desfilter,1,nil,e:GetLabel()) then g:DeleteGroup() e:Reset() return false else return true end end -function c72537897.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local g=e:GetLabelObject() - local tg=g:Filter(c72537897.desfilter,nil,e:GetLabel()) + local tg=g:Filter(s.desfilter,nil,e:GetLabel()) Duel.Destroy(tg,REASON_EFFECT) end diff --git a/c81470373.lua b/c81470373.lua index 053f24ef66..492eb4760c 100644 --- a/c81470373.lua +++ b/c81470373.lua @@ -1,66 +1,67 @@ --BF－毒風のシムーン -function c81470373.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --search and normal summon / gy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(81470373,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SUMMON+CATEGORY_TOGRAVE) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,81470373) - e1:SetCondition(c81470373.sumcon) - e1:SetCost(c81470373.sumcost) - e1:SetTarget(c81470373.sumtg) - e1:SetOperation(c81470373.sumop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.sumcon) + e1:SetCost(s.sumcost) + e1:SetTarget(s.sumtg) + e1:SetOperation(s.sumop) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD) e2:SetCode(EFFECT_SUMMON_PROC) e2:SetRange(LOCATION_HAND) - e2:SetCondition(c81470373.ntcon) + e2:SetCondition(s.ntcon) e2:SetValue(SUMMON_TYPE_NORMAL) c:RegisterEffect(e2) e1:SetLabelObject(e2) end -function c81470373.ntcon(e,c,minc) +function s.ntcon(e,c,minc) if c==nil then return true end return minc==0 and Duel.CheckTribute(c,0) end -function c81470373.sumcon(e,tp,eg,ep,ev,re,r,rp) +function s.sumcon(e,tp,eg,ep,ev,re,r,rp) return Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)==0 end -function c81470373.cfilter(c) +function s.cfilter(c) return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost() end -function c81470373.sumcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sumcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() - if chk==0 then return Duel.IsExistingMatchingCard(c81470373.cfilter,tp,LOCATION_HAND,0,1,c) end + if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_HAND,0,1,c) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,c81470373.cfilter,tp,LOCATION_HAND,0,1,1,c) + local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_HAND,0,1,1,c) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function c81470373.acfilter(c,tp) +function s.acfilter(c,tp) return c:IsCode(91351370) and not c:IsForbidden() and c:CheckUniqueOnField(tp) end -function c81470373.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 - or not Duel.IsExistingMatchingCard(c81470373.acfilter,tp,LOCATION_DECK,0,1,nil,tp) then return false end + or not Duel.IsExistingMatchingCard(s.acfilter,tp,LOCATION_DECK,0,1,nil,tp) then return false end return e:GetHandler():IsSummonable(true,e:GetLabelObject()) or e:GetHandler():IsAbleToGrave() end end -function c81470373.sumop(e,tp,eg,ep,ev,re,r,rp) +function s.sumop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetTargetRange(1,0) - e1:SetTarget(c81470373.splimit) + e1:SetTarget(s.splimit) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD) - local tc=Duel.SelectMatchingCard(tp,c81470373.acfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst() + local tc=Duel.SelectMatchingCard(tp,s.acfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst() if tc and Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)~=0 then local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) @@ -68,7 +69,7 @@ function c81470373.sumop(e,tp,eg,ep,ev,re,r,rp) e1:SetRange(LOCATION_SZONE) e1:SetCountLimit(1) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) - e1:SetOperation(c81470373.tgop) + e1:SetOperation(s.tgop) tc:RegisterEffect(e1) if not c:IsRelateToEffect(e) then return end local se=e:GetLabelObject() @@ -82,10 +83,11 @@ function c81470373.sumop(e,tp,eg,ep,ev,re,r,rp) end end end -function c81470373.splimit(e,c) +function s.splimit(e,c) return not c:IsAttribute(ATTRIBUTE_DARK) and c:IsLocation(LOCATION_EXTRA) end -function c81470373.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local c=e:GetHandler() if Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) then Duel.Damage(tp,1000,REASON_EFFECT) diff --git a/c82983267.lua b/c82983267.lua index f279491a79..5d8481f4d3 100644 --- a/c82983267.lua +++ b/c82983267.lua @@ -76,6 +76,7 @@ function s.tdcon3(e,tp,eg,ep,ev,re,r,rp) return Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(id)~=0 end function s.tdop3(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end diff --git a/c88284599.lua b/c88284599.lua index b0a2315e8a..f78d106037 100644 --- a/c88284599.lua +++ b/c88284599.lua @@ -95,6 +95,7 @@ function s.tdcon(e,tp,eg,ep,ev,re,r,rp) return Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(id)~=0 end function s.tdop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end diff --git a/c93946239.lua b/c93946239.lua index 21eb0d6bf2..e8e82c6cd4 100644 --- a/c93946239.lua +++ b/c93946239.lua @@ -1,26 +1,27 @@ --無の煉獄 -function c93946239.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_DRAW) e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCondition(c93946239.condition) - e1:SetTarget(c93946239.target) - e1:SetOperation(c93946239.activate) + e1:SetCondition(s.condition) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) end -function c93946239.condition(e,tp,eg,ep,ev,re,r,rp) +function s.condition(e,tp,eg,ep,ev,re,r,rp) return Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)>2 end -function c93946239.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(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 c93946239.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Draw(p,d,REASON_EFFECT) local e1=Effect.CreateEffect(e:GetHandler()) @@ -28,10 +29,11 @@ function c93946239.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetReset(RESET_PHASE+PHASE_END) - e1:SetOperation(c93946239.disop) + e1:SetOperation(s.disop) Duel.RegisterEffect(e1,p) end -function c93946239.disop(e,tp,eg,ep,ev,re,r,rp) +function s.disop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local g=Duel.GetFieldGroup(e:GetOwnerPlayer(),LOCATION_HAND,0) Duel.SendtoGrave(g,REASON_EFFECT+REASON_DISCARD) end diff --git a/c9822220.lua b/c9822220.lua index 4db06f4f26..baf5a252e2 100644 --- a/c9822220.lua +++ b/c9822220.lua @@ -1,32 +1,33 @@ --天獄の王 -function c9822220.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --public local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(9822220,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,9822220) - e1:SetOperation(c9822220.operation) + e1:SetCountLimit(1,id) + e1:SetOperation(s.operation) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(9822220,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetRange(LOCATION_HAND) e2:SetCode(EVENT_CHAINING) e2:SetProperty(EFFECT_FLAG_DELAY) - e2:SetCountLimit(1,9822220) - e2:SetCondition(c9822220.spcon) - e2:SetTarget(c9822220.sptg) - e2:SetOperation(c9822220.spop) + e2:SetCountLimit(1,id) + e2:SetCondition(s.spcon) + e2:SetTarget(s.sptg) + e2:SetOperation(s.spop) c:RegisterEffect(e2) end -function c9822220.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end local fid=c:GetFieldID() - c:RegisterFlagEffect(9822220,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,EFFECT_FLAG_CLIENT_HINT,1,fid,66) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN,EFFECT_FLAG_CLIENT_HINT,1,fid,66) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_PUBLIC) @@ -39,24 +40,24 @@ function c9822220.operation(e,tp,eg,ep,ev,re,r,rp) e2:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD) e2:SetLabel(fid) e2:SetLabelObject(c) - e2:SetCondition(c9822220.indcon) - e2:SetTarget(c9822220.indtg) + e2:SetCondition(s.indcon) + e2:SetTarget(s.indtg) e2:SetValue(1) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_OPPO_TURN) Duel.RegisterEffect(e2,tp) end -function c9822220.indcon(e) +function s.indcon(e) local c=e:GetLabelObject() - return c:GetFlagEffectLabel(9822220)==e:GetLabel() + return c:GetFlagEffectLabel(id)==e:GetLabel() end -function c9822220.indtg(e,c) +function s.indtg(e,c) return c:IsFacedown() end -function c9822220.spcon(e,tp,eg,ep,ev,re,r,rp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) return re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and not re:GetHandler():IsStatus(STATUS_ACT_FROM_HAND) end -function c9822220.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end @@ -67,20 +68,20 @@ function c9822220.sptg(e,tp,eg,ep,ev,re,r,rp,chk) e:SetLabel(0) end end -function c9822220.setfilter(c) +function s.setfilter(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable() end -function c9822220.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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 then - local g=Duel.GetMatchingGroup(c9822220.setfilter,tp,LOCATION_DECK,0,nil) - if e:GetLabel()==1 and g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(9822220,2)) then + local g=Duel.GetMatchingGroup(s.setfilter,tp,LOCATION_DECK,0,nil) + if e:GetLabel()==1 and g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) local sg=g:Select(tp,1,1,nil) Duel.SSet(tp,sg) local tc=sg:GetFirst() - tc:RegisterFlagEffect(9822220,RESET_EVENT+RESETS_REDIRECT,0,1) + tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_REDIRECT,0,1) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetCode(EVENT_PHASE+PHASE_END) @@ -89,22 +90,23 @@ function c9822220.spop(e,tp,eg,ep,ev,re,r,rp) e1:SetLabel(Duel.GetTurnCount()+1) e1:SetLabelObject(tc) e1:SetReset(RESET_PHASE+PHASE_END,2) - e1:SetCondition(c9822220.rmcon) - e1:SetOperation(c9822220.rmop) + e1:SetCondition(s.rmcon) + e1:SetOperation(s.rmop) Duel.RegisterEffect(e1,tp) end end end -function c9822220.rmcon(e,tp,eg,ep,ev,re,r,rp) +function s.rmcon(e,tp,eg,ep,ev,re,r,rp) local tc=e:GetLabelObject() - if tc:GetFlagEffect(9822220)~=0 then + if tc:GetFlagEffect(id)~=0 then return Duel.GetTurnCount()==e:GetLabel() else e:Reset() return false end end -function c9822220.rmop(e,tp,eg,ep,ev,re,r,rp) +function s.rmop(e,tp,eg,ep,ev,re,r,rp) + Duel.Hint(HINT_CARD,0,id) local tc=e:GetLabelObject() Duel.Remove(tc,POS_FACEUP,REASON_EFFECT) end From 40a5f5bdc206ff6f52985d8cc7be32072732d495 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 8 Sep 2025 01:03:27 +0900 Subject: [PATCH 02/11] use getid --- c11755663.lua | 39 ++++++++++++------------ c1906812.lua | 55 +++++++++++++++++----------------- c19462747.lua | 49 +++++++++++++++--------------- c24919805.lua | 39 ++++++++++++------------ c2542230.lua | 65 ++++++++++++++++++++-------------------- c25861589.lua | 2 +- c30989084.lua | 2 +- c3410461.lua | 41 ++++++++++++------------- c34848821.lua | 47 +++++++++++++++-------------- c34995106.lua | 83 ++++++++++++++++++++++++++------------------------- c39049051.lua | 61 ++++++++++++++++++------------------- c41373230.lua | 55 +++++++++++++++++----------------- c52481437.lua | 65 ++++++++++++++++++++-------------------- c53389254.lua | 69 +++++++++++++++++++++--------------------- c53971455.lua | 53 ++++++++++++++++---------------- c56585883.lua | 57 ++++++++++++++++++----------------- c56980148.lua | 55 +++++++++++++++++----------------- c58383100.lua | 61 ++++++++++++++++++------------------- c59123937.lua | 67 +++++++++++++++++++++-------------------- c62022479.lua | 49 +++++++++++++++--------------- c67100549.lua | 71 +++++++++++++++++++++---------------------- c70427670.lua | 52 ++++++++++++++++---------------- c71039903.lua | 43 +++++++++++++------------- c73167098.lua | 2 +- c75311421.lua | 47 +++++++++++++++-------------- c81570454.lua | 51 +++++++++++++++---------------- c84764038.lua | 63 +++++++++++++++++++------------------- c86943389.lua | 49 +++++++++++++++--------------- c87746184.lua | 75 +++++++++++++++++++++++----------------------- c92003832.lua | 14 ++++----- c93595154.lua | 57 ++++++++++++++++++----------------- c96345188.lua | 53 ++++++++++++++++---------------- 32 files changed, 809 insertions(+), 782 deletions(-) diff --git a/c11755663.lua b/c11755663.lua index 70279a812d..ab44ba28ef 100644 --- a/c11755663.lua +++ b/c11755663.lua @@ -1,29 +1,30 @@ --ダイナレスラー・マーシャルアンガ -function c11755663.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --indes local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(11755663,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(c11755663.atkcon) - e1:SetCost(c11755663.atkcost) - e1:SetOperation(c11755663.atkop) + e1:SetCondition(s.atkcon) + e1:SetCost(s.atkcost) + e1:SetOperation(s.atkop) c:RegisterEffect(e1) --revive local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(11755663,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(c11755663.sumcon) - e2:SetTarget(c11755663.sumtg) - e2:SetOperation(c11755663.sumop) + e2:SetCondition(s.sumcon) + e2:SetTarget(s.sumtg) + e2:SetOperation(s.sumop) c:RegisterEffect(e2) end -function c11755663.atkcon(e,tp,eg,ep,ev,re,r,rp) +function s.atkcon(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetAttacker() if tc:IsControler(1-tp) then tc=Duel.GetAttackTarget() end if not tc then return false end @@ -31,13 +32,13 @@ function c11755663.atkcon(e,tp,eg,ep,ev,re,r,rp) local bc=tc:GetBattleTarget() return bc and tc:IsSetCard(0x11a) and bc:IsAttackAbove(tc:GetAttack()) end -function c11755663.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsAbleToGraveAsCost() end Duel.SendtoGrave(c,REASON_COST) - c:RegisterFlagEffect(11755663,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c11755663.atkop(e,tp,eg,ep,ev,re,r,rp) +function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=e:GetLabelObject() if tc:IsRelateToBattle() then @@ -50,26 +51,26 @@ function c11755663.atkop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_DAMAGE_STEP_END) - e2:SetOperation(c11755663.skipop) + e2:SetOperation(s.skipop) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE) Duel.RegisterEffect(e2,tp) end end -function c11755663.skipop(e,tp,eg,ep,ev,re,r,rp) +function s.skipop(e,tp,eg,ep,ev,re,r,rp) Duel.SkipPhase(Duel.GetTurnPlayer(),PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1) end -function c11755663.sumcon(e,tp,eg,ep,ev,re,r,rp) +function s.sumcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - return c:GetFlagEffect(11755663)>0 + return c:GetFlagEffect(id)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function c11755663.sumop(e,tp,eg,ep,ev,re,r,rp) +function s.sumop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c1906812.lua b/c1906812.lua index eb2558bd0e..5436f80e26 100644 --- a/c1906812.lua +++ b/c1906812.lua @@ -1,49 +1,50 @@ --鉄駆竜スプリンド -function c1906812.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --fusion material c:EnableReviveLimit() - aux.AddFusionProcCodeFun(c,68468459,c1906812.mfilter,1,true,true) + aux.AddFusionProcCodeFun(c,68468459,s.mfilter,1,true,true) --move local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(1906812,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,1906812) - e1:SetTarget(c1906812.seqtg) - e1:SetOperation(c1906812.seqop) + e1:SetCountLimit(1,id) + e1:SetTarget(s.seqtg) + e1:SetOperation(s.seqop) c:RegisterEffect(e1) --to grave local e0=Effect.CreateEffect(c) e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e0:SetCode(EVENT_TO_GRAVE) - e0:SetOperation(c1906812.regop) + e0:SetOperation(s.regop) c:RegisterEffect(e0) --to hand/spsummon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(1906812,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,1906813) - e2:SetCondition(c1906812.thcon) - e2:SetTarget(c1906812.thtg) - e2:SetOperation(c1906812.thop) + e2:SetCountLimit(1,id+o) + e2:SetCondition(s.thcon) + e2:SetTarget(s.thtg) + e2:SetOperation(s.thop) c:RegisterEffect(e2) end -function c1906812.branded_fusion_check(tp,sg,fc) - return aux.gffcheck(sg,Card.IsFusionCode,68468459,c1906812.mfilter,nil) +function s.branded_fusion_check(tp,sg,fc) + return aux.gffcheck(sg,Card.IsFusionCode,68468459,s.mfilter,nil) end -function c1906812.mfilter(c) +function s.mfilter(c) return c:IsStatus(STATUS_SPSUMMON_TURN) and c:IsFusionType(TYPE_EFFECT) and c:IsLocation(LOCATION_MZONE) end -function c1906812.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)>0 end end -function c1906812.seqop(e,tp,eg,ep,ev,re,r,rp) +function s.seqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) or not c:IsControler(tp) or Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)<=0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE) @@ -54,30 +55,30 @@ function c1906812.seqop(e,tp,eg,ep,ev,re,r,rp) Duel.MoveSequence(c,seq) if c:GetSequence()==seq then local g=c:GetColumnGroup():Filter(Card.IsFaceup,nil) - if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(1906812,2)) then + if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then Duel.BreakEffect() Duel.Destroy(g,REASON_EFFECT) end end end -function c1906812.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(1906812,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c1906812.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(1906812)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c1906812.thfilter(c,e,tp) +function s.thfilter(c,e,tp) if not (c:IsSetCard(0x155) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) end -function c1906812.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c1906812.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) 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,e,tp) end end -function c1906812.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,c1906812.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c19462747.lua b/c19462747.lua index d85ba05fe1..8af87f29e0 100644 --- a/c19462747.lua +++ b/c19462747.lua @@ -1,14 +1,15 @@ --BF－弔風のデス -function c19462747.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --lv up local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(19462747,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCountLimit(1,19462747) - e1:SetTarget(c19462747.target) - e1:SetOperation(c19462747.operation) + e1:SetCountLimit(1,id) + e1:SetTarget(s.target) + e1:SetOperation(s.operation) c:RegisterEffect(e1) local e2=e1:Clone() e2:SetCode(EVENT_SPSUMMON_SUCCESS) @@ -18,38 +19,38 @@ function c19462747.initial_effect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c19462747.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(19462747,3)) + e4:SetDescription(aux.Stringid(id,3)) e4:SetCategory(CATEGORY_DAMAGE) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetCountLimit(1) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(c19462747.damcon) - e4:SetTarget(c19462747.damtg) - e4:SetOperation(c19462747.damop) + e4:SetCondition(s.damcon) + e4:SetTarget(s.damtg) + e4:SetOperation(s.damop) c:RegisterEffect(e4) end -function c19462747.filter(c) +function s.filter(c) return c:IsFaceup() and c:GetLevel()>0 and c:IsSetCard(0x33) end -function c19462747.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c19462747.filter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c19462747.filter,tp,LOCATION_MZONE,0,1,nil) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) - local g=Duel.SelectTarget(tp,c19462747.filter,tp,LOCATION_MZONE,0,1,1,nil) + local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil) local op=0 Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT) if g:GetFirst():IsLevel(1) then - op=Duel.SelectOption(tp,aux.Stringid(19462747,1)) + op=Duel.SelectOption(tp,aux.Stringid(id,1)) else - op=Duel.SelectOption(tp,aux.Stringid(19462747,1),aux.Stringid(19462747,2)) + op=Duel.SelectOption(tp,aux.Stringid(id,1),aux.Stringid(id,2)) end e:SetLabel(op) end -function c19462747.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=Duel.GetFirstTarget() if tc:IsFaceup() and tc:IsRelateToEffect(e) then @@ -66,20 +67,20 @@ function c19462747.operation(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e1) end end -function c19462747.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(19462747,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c19462747.damcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(19462747)>0 +function s.damcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c19462747.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(tp) Duel.SetTargetParam(1000) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,0,0,tp,1000) end -function c19462747.damop(e,tp,eg,ep,ev,re,r,rp) +function s.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end diff --git a/c24919805.lua b/c24919805.lua index 108190abca..d79b2195b3 100644 --- a/c24919805.lua +++ b/c24919805.lua @@ -1,25 +1,26 @@ --無頼特急バトレイン -function c24919805.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --damage local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(24919805,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DAMAGE) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCost(c24919805.damcost) - e1:SetTarget(c24919805.damtg) - e1:SetOperation(c24919805.damop) + e1:SetCost(s.damcost) + e1:SetTarget(s.damtg) + e1:SetOperation(s.damop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c24919805.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c24919805.damcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.damcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetCurrentPhase()==PHASE_MAIN1 end local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) @@ -29,40 +30,40 @@ function c24919805.damcost(e,tp,eg,ep,ev,re,r,rp,chk) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end -function c24919805.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(1-tp) Duel.SetTargetParam(500) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,500) end -function c24919805.damop(e,tp,eg,ep,ev,re,r,rp) +function s.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end -function c24919805.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(24919805,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,24919805) - e1:SetTarget(c24919805.thtg) - e1:SetOperation(c24919805.thop) + e1:SetCountLimit(1,id) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end -function c24919805.filter(c) +function s.filter(c) return c:IsLevel(10) and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand() end -function c24919805.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c24919805.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c24919805.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c24919805.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c2542230.lua b/c2542230.lua index f7ed0fd258..b5a19716be 100644 --- a/c2542230.lua +++ b/c2542230.lua @@ -1,5 +1,6 @@ --スカーレッド・コクーン -function c2542230.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) aux.AddCodeList(c,70902743) --Activate local e1=Effect.CreateEffect(c) @@ -7,20 +8,20 @@ function c2542230.initial_effect(c) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCost(c2542230.cost) - e1:SetTarget(c2542230.target) - e1:SetOperation(c2542230.activate) + e1:SetCost(s.cost) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c2542230.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) -- local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(2542230,0)) + e3:SetDescription(aux.Stringid(id,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) @@ -28,12 +29,12 @@ function c2542230.initial_effect(c) e3:SetRange(LOCATION_GRAVE) e3:SetHintTiming(TIMING_END_PHASE) e3:SetCountLimit(1) - e3:SetCondition(c2542230.spcon) - e3:SetTarget(c2542230.sptg) - e3:SetOperation(c2542230.spop) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c2542230.cost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end local c=e:GetHandler() local cid=Duel.GetChainInfo(0,CHAININFO_CHAIN_ID) @@ -46,30 +47,30 @@ function c2542230.cost(e,tp,eg,ep,ev,re,r,rp,chk) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_CHAIN_DISABLED) - e2:SetOperation(c2542230.tgop) + e2:SetOperation(s.tgop) e2:SetLabel(cid) e2:SetReset(RESET_CHAIN) Duel.RegisterEffect(e2,tp) end -function c2542230.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) local cid=Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID) if cid~=e:GetLabel() then return end if e:GetOwner():IsRelateToChain(ev) then e:GetOwner():CancelToGrave(false) end end -function c2542230.filter(c) +function s.filter(c) return c:IsFaceup() and c:IsRace(RACE_DRAGON) and c:IsType(TYPE_SYNCHRO) end -function c2542230.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c2542230.filter(chkc) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end if chk==0 then return e:IsCostChecked() - and Duel.IsExistingTarget(c2542230.filter,tp,LOCATION_MZONE,0,1,nil) end + and Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) - Duel.SelectTarget(tp,c2542230.filter,tp,LOCATION_MZONE,0,1,1,nil) + Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) end -function c2542230.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsLocation(LOCATION_SZONE) then return end if not c:IsRelateToEffect(e) or c:IsStatus(STATUS_LEAVE_CONFIRMED) then return end @@ -80,7 +81,7 @@ function c2542230.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e1:SetValue(c2542230.eqlimit) + e1:SetValue(s.eqlimit) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -88,7 +89,7 @@ function c2542230.activate(e,tp,eg,ep,ev,re,r,rp) e2:SetCode(EFFECT_DISABLE) e2:SetRange(LOCATION_SZONE) e2:SetTargetRange(0,LOCATION_MZONE) - e2:SetCondition(c2542230.discon) + e2:SetCondition(s.discon) e2:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e2) Duel.AdjustInstantly(c) @@ -96,34 +97,34 @@ function c2542230.activate(e,tp,eg,ep,ev,re,r,rp) c:CancelToGrave(false) end end -function c2542230.eqlimit(e,c) +function s.eqlimit(e,c) return e:GetHandler():GetEquipTarget()==c or c:IsControler(e:GetHandlerPlayer()) and c:IsRace(RACE_DRAGON) and c:IsType(TYPE_SYNCHRO) end -function c2542230.discon(e) +function s.discon(e) local ec=e:GetHandler():GetEquipTarget() return Duel.GetAttacker()==ec or Duel.GetAttackTarget()==ec end -function c2542230.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(2542230,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c2542230.spcon(e,tp,eg,ep,ev,re,r,rp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - return c:GetFlagEffect(2542230)~=0 and Duel.GetCurrentPhase()==PHASE_END + return c:GetFlagEffect(id)~=0 and Duel.GetCurrentPhase()==PHASE_END end -function c2542230.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsCode(70902743) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c2542230.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c2542230.spfilter(chkc,e,tp) end +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(c2542230.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,c2542230.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function c2542230.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) diff --git a/c25861589.lua b/c25861589.lua index 09e2b25f45..304e81e8b6 100644 --- a/c25861589.lua +++ b/c25861589.lua @@ -1,6 +1,6 @@ --アロマブレンド local s,id,o=GetID() -function c25861589.initial_effect(c) +function s.initial_effect(c) aux.AddCodeList(c,15177750,92266279,28265983) --Activate local e1=Effect.CreateEffect(c) diff --git a/c30989084.lua b/c30989084.lua index 88e857e030..5ea8331593 100644 --- a/c30989084.lua +++ b/c30989084.lua @@ -1,6 +1,6 @@ --アロマリリス－ローズマリー local s,id,o=GetID() -function c30989084.initial_effect(c) +function s.initial_effect(c) --link summon c:EnableReviveLimit() aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_PLANT),2,3) diff --git a/c3410461.lua b/c3410461.lua index 7c095bc14f..18a96705b3 100644 --- a/c3410461.lua +++ b/c3410461.lua @@ -1,9 +1,10 @@ --深淵竜アルバ・レナトゥス -function c3410461.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFunRep(c,68468459,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),1,127,true,true) - aux.AddContactFusionProcedure(c,c3410461.cfilter,LOCATION_MZONE,LOCATION_MZONE,Duel.SendtoGrave,REASON_COST) + aux.AddContactFusionProcedure(c,s.cfilter,LOCATION_MZONE,LOCATION_MZONE,Duel.SendtoGrave,REASON_COST) --spsummon condition local e0=Effect.CreateEffect(c) e0:SetType(EFFECT_TYPE_SINGLE) @@ -22,34 +23,34 @@ function c3410461.initial_effect(c) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_SPSUMMON_SUCCESS) - e2:SetOperation(c3410461.atkop) + e2:SetOperation(s.atkop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c3410461.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --to hand/set local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(3410461,0)) + e4:SetDescription(aux.Stringid(id,0)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(c3410461.thcon) - e4:SetTarget(c3410461.thtg) - e4:SetOperation(c3410461.thop) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c3410461.branded_fusion_check(tp,sg,fc) +function s.branded_fusion_check(tp,sg,fc) return #sg<2 or aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsRace,RACE_DRAGON) end -function c3410461.cfilter(c,fc) +function s.cfilter(c,fc) return c:IsAbleToGraveAsCost() and (c:IsControler(fc:GetControler()) or c:IsFaceup()) end -function c3410461.atkop(e,tp,eg,ep,ev,re,r,rp) +function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -58,23 +59,23 @@ function c3410461.atkop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) end -function c3410461.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(3410461,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c3410461.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(3410461)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c3410461.thfilter(c) +function s.thfilter(c) return c:GetType()==TYPE_SPELL and c:IsSetCard(0x46) and c:IsAbleToHand() end -function c3410461.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c3410461.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c3410461.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c3410461.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) local tc=g:GetFirst() if tc then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c34848821.lua b/c34848821.lua index a3af88066e..16d001a2f5 100644 --- a/c34848821.lua +++ b/c34848821.lua @@ -1,5 +1,6 @@ --痕喰竜ブリガンド -function c34848821.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsLevelAbove,8),1,true,true) @@ -18,60 +19,60 @@ function c34848821.initial_effect(c) e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_SET_AVAILABLE) e2:SetRange(LOCATION_MZONE) e2:SetTargetRange(LOCATION_MZONE,0) - e2:SetCondition(c34848821.imcon) - e2:SetTarget(c34848821.imval) - e2:SetValue(c34848821.imfilter) + e2:SetCondition(s.imcon) + e2:SetTarget(s.imval) + e2:SetValue(s.imfilter) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c34848821.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --to hand/spsummon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(34848821,0)) + e4:SetDescription(aux.Stringid(id,0)) e4:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,34848821) - e4:SetCondition(c34848821.thcon) - e4:SetTarget(c34848821.thtg) - e4:SetOperation(c34848821.thop) + e4:SetCountLimit(1,id) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c34848821.branded_fusion_check(tp,sg,fc) +function s.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsLevelAbove,8) end -function c34848821.imcon(e) +function s.imcon(e) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) end -function c34848821.imval(e,c) +function s.imval(e,c) return c~=e:GetHandler() end -function c34848821.imfilter(e,re,rp) +function s.imfilter(e,re,rp) return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_MONSTER) end -function c34848821.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(34848821,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c34848821.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(34848821)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c34848821.thfilter(c,e,tp) +function s.thfilter(c,e,tp) if not (c:IsSetCard(0x14d) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) end -function c34848821.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c34848821.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) 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,e,tp) end end -function c34848821.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,c34848821.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c34995106.lua b/c34995106.lua index 34d1bf7375..7c9ea42ef1 100644 --- a/c34995106.lua +++ b/c34995106.lua @@ -1,76 +1,77 @@ --白の烙印 -function c34995106.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(34995106,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_REMOVE) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,34995106) - e1:SetTarget(c34995106.target) - e1:SetOperation(c34995106.activate) + e1:SetCountLimit(1,id) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c34995106.regcon) - e2:SetOperation(c34995106.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(34995106,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,34995107) - e3:SetCondition(c34995106.setcon) - e3:SetTarget(c34995106.settg) - e3:SetOperation(c34995106.setop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.setcon) + e3:SetTarget(s.settg) + e3:SetOperation(s.setop) c:RegisterEffect(e3) end -function c34995106.filter1(c,e) +function s.filter1(c,e) return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) end -function c34995106.filter2(c,e) +function s.filter2(c,e) return not c:IsImmuneToEffect(e) end -function c34995106.spfilter(c,e,tp,m,f,chkf) +function s.spfilter(c,e,tp,m,f,chkf) return (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function c34995106.chkfilter(c,tp) +function s.chkfilter(c,tp) return c:IsControler(tp) and c:IsCode(68468459) end -function c34995106.exfilter(c,tp) +function s.exfilter(c,tp) return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) end -function c34995106.fcheck(tp,sg,fc) - if sg:IsExists(c34995106.chkfilter,1,nil,tp) then +function s.fcheck(tp,sg,fc) + if sg:IsExists(s.chkfilter,1,nil,tp) then return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) else - return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) and not sg:IsExists(c34995106.exfilter,1,nil,tp) + return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) and not sg:IsExists(s.exfilter,1,nil,tp) end end -function c34995106.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c34995106.filter2,nil,e) - local mg2=Duel.GetMatchingGroup(c34995106.filter1,tp,LOCATION_GRAVE,0,nil,e) - if mg1:IsExists(c34995106.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(c34995106.chkfilter,1,nil,tp) then + local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter2,nil,e) + local mg2=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) + if mg1:IsExists(s.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(s.chkfilter,1,nil,tp) then mg1:Merge(mg2) end - aux.FCheckAdditional=c34995106.fcheck - local res=Duel.IsExistingMatchingCard(c34995106.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=s.fcheck + local res=Duel.IsExistingMatchingCard(s.spfilter,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(c34995106.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) + res=Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) end end aux.FCheckAdditional=nil @@ -79,15 +80,15 @@ function c34995106.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,tp,LOCATION_GRAVE) end -function c34995106.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c34995106.filter2,nil,e) - local mg2=Duel.GetMatchingGroup(c34995106.filter1,tp,LOCATION_GRAVE,0,nil,e) - if mg1:IsExists(c34995106.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(c34995106.chkfilter,1,nil,tp) then + local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter2,nil,e) + local mg2=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) + if mg1:IsExists(s.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(s.chkfilter,1,nil,tp) then mg1:Merge(mg2) end - aux.FCheckAdditional=c34995106.fcheck - local sg1=Duel.GetMatchingGroup(c34995106.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=s.fcheck + local sg1=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg3=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -95,7 +96,7 @@ function c34995106.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(c34995106.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf) + sg2=Duel.GetMatchingGroup(s.spfilter,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() @@ -121,22 +122,22 @@ function c34995106.activate(e,tp,eg,ep,ev,re,r,rp) end aux.FCheckAdditional=nil end -function c34995106.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function c34995106.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(34995106,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c34995106.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(34995106)>0 +function s.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c34995106.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c34995106.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c39049051.lua b/c39049051.lua index 3edcc51ec5..32e2db1ee1 100644 --- a/c39049051.lua +++ b/c39049051.lua @@ -1,21 +1,22 @@ --歌氷麗月 -function c39049051.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,39049051) - e1:SetTarget(c39049051.target) - e1:SetOperation(c39049051.activate) + e1:SetCountLimit(1,id) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c39049051.regcon) - e2:SetOperation(c39049051.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --to hand local e3=Effect.CreateEffect(c) @@ -23,31 +24,31 @@ function c39049051.initial_effect(c) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,39049052) - e3:SetCondition(c39049051.thcon) - e3:SetTarget(c39049051.thtg) - e3:SetOperation(c39049051.thop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c39049051.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsRace(RACE_FAIRY+RACE_SPELLCASTER+RACE_WINDBEAST+RACE_BEASTWARRIOR) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c39049051.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c39049051.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,tp,LOCATION_HAND) end -function c39049051.eqlimit(e,c) +function s.eqlimit(e,c) return e:GetOwner()==c end -function c39049051.drfilter(c) +function s.drfilter(c) return c:IsRace(RACE_DRAGON) and c:IsFaceup() and c:IsAbleToHand() end -function c39049051.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,c39049051.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) local tc=g:GetFirst() if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then Duel.Equip(tp,c,tc) @@ -57,34 +58,34 @@ function c39049051.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(c39049051.eqlimit) + e1:SetValue(s.eqlimit) c:RegisterEffect(e1) - local hg=Duel.GetMatchingGroup(c39049051.drfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) - if hg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(39049051,2)) then + local hg=Duel.GetMatchingGroup(s.drfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) + if hg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then Duel.BreakEffect() Duel.SendtoHand(hg,nil,REASON_EFFECT) end end end -function c39049051.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end -function c39049051.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(39049051,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) +function s.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c39049051.thfilter(c) +function s.thfilter(c) return (c:IsSetCard(0x46) and c:IsType(TYPE_SPELL) or c:IsCode(6205579)) and c:IsAbleToHand() end -function c39049051.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(39049051)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c39049051.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c39049051.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c39049051.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c39049051.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c41373230.lua b/c41373230.lua index 44e1994a26..642d115336 100644 --- a/c41373230.lua +++ b/c41373230.lua @@ -1,5 +1,6 @@ --灰燼竜バスタード -function c41373230.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsAttackAbove,2500),1,true,true) @@ -7,44 +8,44 @@ function c41373230.initial_effect(c) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_MATERIAL_CHECK) - e1:SetValue(c41373230.matcheck) + e1:SetValue(s.matcheck) c:RegisterEffect(e1) --immune local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetCondition(c41373230.imcon) - e2:SetOperation(c41373230.imop) + e2:SetCondition(s.imcon) + e2:SetOperation(s.imop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c41373230.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --to hand/spsummon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(41373230,0)) + e4:SetDescription(aux.Stringid(id,0)) e4:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,41373230) - e4:SetCondition(c41373230.thcon) - e4:SetTarget(c41373230.thtg) - e4:SetOperation(c41373230.thop) + e4:SetCountLimit(1,id) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c41373230.branded_fusion_check(tp,sg,fc) +function s.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsAttackAbove,2500) end -function c41373230.matfilter(c) +function s.matfilter(c) return c:IsFusionType(TYPE_MONSTER) and c:GetOriginalLevel()>0 end -function c41373230.matcheck(e,c) - local g=c:GetMaterial():Filter(c41373230.matfilter,nil) +function s.matcheck(e,c) + local g=c:GetMaterial():Filter(s.matfilter,nil) local atk=g:GetSum(Card.GetOriginalLevel) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -53,42 +54,42 @@ function c41373230.matcheck(e,c) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_DISABLE) c:RegisterEffect(e1) end -function c41373230.imcon(e,tp,eg,ep,ev,re,r,rp) +function s.imcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) end -function c41373230.imop(e,tp,eg,ep,ev,re,r,rp) +function s.imop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e1:SetValue(c41373230.efilter) + e1:SetValue(s.efilter) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end -function c41373230.efilter(e,te) +function s.efilter(e,te) local tc=te:GetOwner() return tc~=e:GetHandler() and te:IsActiveType(TYPE_MONSTER) and te:IsActivated() and te:GetActivateLocation()==LOCATION_MZONE and tc:IsSummonLocation(LOCATION_EXTRA) end -function c41373230.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(41373230,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c41373230.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(41373230)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c41373230.thfilter(c,e,tp) +function s.thfilter(c,e,tp) if not (c:IsSetCard(0x145) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) end -function c41373230.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c41373230.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) 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,e,tp) end end -function c41373230.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,c41373230.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c52481437.lua b/c52481437.lua index 447771ec28..52d916e4d3 100644 --- a/c52481437.lua +++ b/c52481437.lua @@ -1,88 +1,89 @@ --弾丸特急バレット・ライナー -function c52481437.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(52481437,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,52481437) - e1:SetCondition(c52481437.spcon) - e1:SetTarget(c52481437.sptg) - e1:SetOperation(c52481437.spop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.spcon) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --attack cost local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_ATTACK_COST) - e2:SetCost(c52481437.atcost) - e2:SetOperation(c52481437.atop) + e2:SetCost(s.atcost) + e2:SetOperation(s.atop) c:RegisterEffect(e2) --register to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c52481437.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(52481437,1)) + e4:SetDescription(aux.Stringid(id,1)) e4:SetCategory(CATEGORY_TOHAND) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,52481438) + e4:SetCountLimit(1,id+o) e4:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(c52481437.thcon) - e4:SetTarget(c52481437.thtg) - e4:SetOperation(c52481437.thop) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c52481437.cfilter(c) +function s.cfilter(c) return c:IsFaceup() and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) end -function c52481437.spcon(e,tp,eg,ep,ev,re,r,rp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0) - return #g>0 and g:FilterCount(c52481437.cfilter,nil)==#g + return #g>0 and g:FilterCount(s.cfilter,nil)==#g end -function c52481437.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function c52481437.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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 c52481437.atcost(e,c,tp) +function s.atcost(e,c,tp) return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_ONFIELD,0,2,e:GetHandler()) end -function c52481437.atop(e,tp,eg,ep,ev,re,r,rp) +function s.atop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_ONFIELD,0,2,2,e:GetHandler()) Duel.SendtoGrave(sg,REASON_COST) end -function c52481437.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(52481437,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c52481437.thfilter(c) - return c:IsRace(RACE_MACHINE) and not c:IsCode(52481437) and c:IsAbleToHand() +function s.thfilter(c) + return c:IsRace(RACE_MACHINE) and not c:IsCode(id) and c:IsAbleToHand() end -function c52481437.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(52481437)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c52481437.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c52481437.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c52481437.thfilter,tp,LOCATION_GRAVE,0,1,nil) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,c52481437.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_GRAVE) end -function c52481437.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c53389254.lua b/c53389254.lua index e66c0efd3a..0dc6f834a5 100644 --- a/c53389254.lua +++ b/c53389254.lua @@ -1,5 +1,6 @@ --A BF－五月雨のソハヤ -function c53389254.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) c:EnableReviveLimit() @@ -8,42 +9,42 @@ function c53389254.initial_effect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCondition(c53389254.tncon) - e1:SetOperation(c53389254.tnop) + e1:SetCondition(s.tncon) + e1:SetOperation(s.tnop) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_MATERIAL_CHECK) - e2:SetValue(c53389254.valcheck) + e2:SetValue(s.valcheck) e2:SetLabelObject(e1) c:RegisterEffect(e2) --special summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(53389254,0)) + e3:SetDescription(aux.Stringid(id,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_SPSUMMON_SUCCESS) - e3:SetCountLimit(1,53389254) - e3:SetCondition(c53389254.spcon1) - e3:SetTarget(c53389254.sptg1) - e3:SetOperation(c53389254.spop1) + e3:SetCountLimit(1,id) + e3:SetCondition(s.spcon1) + e3:SetTarget(s.sptg1) + e3:SetOperation(s.spop1) c:RegisterEffect(e3) --special summon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(53389254,1)) + e4:SetDescription(aux.Stringid(id,1)) e4:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetType(EFFECT_TYPE_IGNITION) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,53389255) - e4:SetCondition(c53389254.spcon2) - e4:SetCost(c53389254.spcost) - e4:SetTarget(c53389254.sptg2) - e4:SetOperation(c53389254.spop2) + e4:SetCountLimit(1,id+o) + e4:SetCondition(s.spcon2) + e4:SetCost(s.spcost) + e4:SetTarget(s.sptg2) + e4:SetOperation(s.spop2) c:RegisterEffect(e4) end -c53389254.treat_itself_tuner=true -function c53389254.valcheck(e,c) +s.treat_itself_tuner=true +function s.valcheck(e,c) local g=c:GetMaterial() if g:IsExists(Card.IsSetCard,1,nil,0x33) then e:GetLabelObject():SetLabel(1) @@ -51,10 +52,10 @@ function c53389254.valcheck(e,c) e:GetLabelObject():SetLabel(0) end end -function c53389254.tncon(e,tp,eg,ep,ev,re,r,rp) +function s.tncon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and e:GetLabel()==1 end -function c53389254.tnop(e,tp,eg,ep,ev,re,r,rp) +function s.tnop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -64,44 +65,44 @@ function c53389254.tnop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) end -function c53389254.spcon1(e,tp,eg,ep,ev,re,r,rp) +function s.spcon1(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) end -function c53389254.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsSetCard(0x1033) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c53389254.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c53389254.spfilter(chkc,e,tp) end +function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(c53389254.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,c53389254.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function c53389254.spop1(e,tp,eg,ep,ev,re,r,rp) +function s.spop1(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) end end -function c53389254.spcon2(e,tp,eg,ep,ev,re,r,rp) +function s.spcon2(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetTurnID()==Duel.GetTurnCount() and not e:GetHandler():IsReason(REASON_RETURN) end -function c53389254.costfilter(c) - return c:IsCode(53389254) and c:IsAbleToRemoveAsCost() +function s.costfilter(c) + return c:IsCode(id) and c:IsAbleToRemoveAsCost() end -function c53389254.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c53389254.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,c53389254.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler()) + local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler()) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function c53389254.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c53389254.spop2(e,tp,eg,ep,ev,re,r,rp) +function s.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) diff --git a/c53971455.lua b/c53971455.lua index 8c19ddc8c7..fc1c656a27 100644 --- a/c53971455.lua +++ b/c53971455.lua @@ -1,52 +1,53 @@ --赫聖の妖騎士 -function c53971455.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsLevel,4),aux.NonTuner(nil),1) c:EnableReviveLimit() --atkup local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(53971455,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetCode(EVENT_LEAVE_DECK) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCondition(c53971455.atkcon) - e1:SetTarget(c53971455.atktg) - e1:SetOperation(c53971455.atkop) + e1:SetCondition(s.atkcon) + e1:SetTarget(s.atktg) + e1:SetOperation(s.atkop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c53971455.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(53971455,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,53971455) - e3:SetCondition(c53971455.spcon) - e3:SetTarget(c53971455.sptg) - e3:SetOperation(c53971455.spop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c53971455.atkcon(e,tp,eg,ep,ev,re,r,rp) +function s.atkcon(e,tp,eg,ep,ev,re,r,rp) return eg:IsExists(Card.IsPreviousLocation,1,nil,LOCATION_EXTRA) end -function c53971455.atktg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end end -function c53971455.atkfilter(c,e) +function s.atkfilter(c,e) return c:IsFaceup() and not c:IsImmuneToEffect(e) end -function c53971455.atkop(e,tp,eg,ep,ev,re,r,rp) +function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - local g=Duel.GetMatchingGroup(c53971455.atkfilter,tp,LOCATION_MZONE,0,nil,e) + local g=Duel.GetMatchingGroup(s.atkfilter,tp,LOCATION_MZONE,0,nil,e) if g:GetCount()>0 then for tc in aux.Next(g) do local e1=Effect.CreateEffect(c) @@ -58,7 +59,7 @@ function c53971455.atkop(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e1) end local sg=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) - if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(53971455,2)) then + if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE) local tg=sg:Select(tp,1,1,nil) @@ -83,24 +84,24 @@ function c53971455.atkop(e,tp,eg,ep,ev,re,r,rp) end end end -function c53971455.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(53971455,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) +function s.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c53971455.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(53971455)>0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c53971455.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER) and aux.AtkEqualsDef(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c53971455.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c53971455.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK) end -function c53971455.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c53971455.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end diff --git a/c56585883.lua b/c56585883.lua index dad1df8c87..6fbfb0e9f3 100644 --- a/c56585883.lua +++ b/c56585883.lua @@ -1,78 +1,79 @@ --ハーピィ・ハーピスト -function c56585883.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --change name aux.EnableChangeCode(c,76812113,LOCATION_MZONE+LOCATION_GRAVE) --return local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(56585883,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetCategory(CATEGORY_TOHAND) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCode(EVENT_SUMMON_SUCCESS) - e2:SetCountLimit(1,56585883) - e2:SetTarget(c56585883.target) - e2:SetOperation(c56585883.operation) + e2:SetCountLimit(1,id) + e2:SetTarget(s.target) + e2:SetOperation(s.operation) c:RegisterEffect(e2) --reg local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetCode(EVENT_TO_GRAVE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e3:SetOperation(c56585883.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(56585883,1)) + e4:SetDescription(aux.Stringid(id,1)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,56585884) + e4:SetCountLimit(1,id+o) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(c56585883.thcon) - e4:SetTarget(c56585883.thtg) - e4:SetOperation(c56585883.thop) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c56585883.filter1(c) +function s.filter1(c) return c:IsFaceup() and c:IsRace(RACE_WINDBEAST) and c:IsAbleToHand() end -function c56585883.filter2(c) +function s.filter2(c) return c:IsFaceup() and c:IsAbleToHand() end -function c56585883.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return false end - if chk==0 then return Duel.IsExistingTarget(c56585883.filter1,tp,LOCATION_MZONE,0,1,e:GetHandler()) - and Duel.IsExistingTarget(c56585883.filter2,tp,0,LOCATION_MZONE,1,nil) end + if chk==0 then return Duel.IsExistingTarget(s.filter1,tp,LOCATION_MZONE,0,1,e:GetHandler()) + and Duel.IsExistingTarget(s.filter2,tp,0,LOCATION_MZONE,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) - local g1=Duel.SelectTarget(tp,c56585883.filter1,tp,LOCATION_MZONE,0,1,1,e:GetHandler()) + local g1=Duel.SelectTarget(tp,s.filter1,tp,LOCATION_MZONE,0,1,1,e:GetHandler()) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) - local g2=Duel.SelectTarget(tp,c56585883.filter2,tp,0,LOCATION_MZONE,1,1,nil) + local g2=Duel.SelectTarget(tp,s.filter2,tp,0,LOCATION_MZONE,1,1,nil) g1:Merge(g2) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,2,0,0) end -function c56585883.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) end end -function c56585883.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(56585883,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c56585883.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(56585883)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c56585883.thfilter(c) +function s.thfilter(c) return c:IsAttackBelow(1500) and c:IsRace(RACE_WINDBEAST) and c:IsLevel(4) and c:IsAbleToHand() end -function c56585883.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c56585883.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c56585883.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c56585883.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c56980148.lua b/c56980148.lua index 2adbd8b805..9b030d8660 100644 --- a/c56980148.lua +++ b/c56980148.lua @@ -1,70 +1,71 @@ --ダイナレスラー・システゴ -function c56980148.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --search local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(56980148,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCountLimit(1,56980148) - e1:SetTarget(c56980148.thtg) - e1:SetOperation(c56980148.tgop) + e1:SetCountLimit(1,id) + e1:SetTarget(s.thtg) + e1:SetOperation(s.tgop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c56980148.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(56980148,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_PHASE+PHASE_END) - e3:SetCountLimit(1,56980149) + e3:SetCountLimit(1,id+o) e3:SetRange(LOCATION_GRAVE) - e3:SetCondition(c56980148.spcon) - e3:SetTarget(c56980148.sptg) - e3:SetOperation(c56980148.spop) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c56980148.thfilter(c) +function s.thfilter(c) return ((c:IsSetCard(0x11a) and c:IsType(TYPE_MONSTER)) or c:IsCode(90173539)) and c:IsAbleToHand() end -function c56980148.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c56980148.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c56980148.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c56980148.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.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 c56980148.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(56980148,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c56980148.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(56980148)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 - and Duel.IsExistingTarget(c56980148.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,c56980148.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function c56980148.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) diff --git a/c58383100.lua b/c58383100.lua index d65d920ec7..b2d43940b6 100644 --- a/c58383100.lua +++ b/c58383100.lua @@ -1,62 +1,63 @@ --光波鏡騎士 -function c58383100.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(58383100,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e1:SetCode(EVENT_TO_GRAVE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(c58383100.spcon) - e1:SetCost(c58383100.spcost) - e1:SetTarget(c58383100.sptg) - e1:SetOperation(c58383100.spop) + e1:SetCondition(s.spcon) + e1:SetCost(s.spcost) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --search local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c58383100.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(58383100,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,58383100) - e3:SetCondition(c58383100.thcon) - e3:SetTarget(c58383100.thtg) - e3:SetOperation(c58383100.thop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c58383100.cfilter(c,e,tp) +function s.cfilter(c,e,tp) return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE) and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousSetCard(0xe5) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c58383100.spcon(e,tp,eg,ep,ev,re,r,rp) - return eg:GetCount()==1 and c58383100.cfilter(eg:GetFirst(),e,tp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return eg:GetCount()==1 and s.cfilter(eg:GetFirst(),e,tp) end -function c58383100.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsDiscardable() end Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD) end -function c58383100.filter(c,tp) +function s.filter(c,tp) return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0 end -function c58383100.sptg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c58383100.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) end +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) end local ec=eg:GetFirst() Duel.SetTargetCard(ec) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND+LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,ec,1,0,0) end -function c58383100.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) - local tg=Duel.SelectMatchingCard(tp,c58383100.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp) + local tg=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp) local tc=tg:GetFirst() if tc and Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE) then local ec=Duel.GetFirstTarget() @@ -65,23 +66,23 @@ function c58383100.spop(e,tp,eg,ep,ev,re,r,rp) end end end -function c58383100.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(58383100,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c58383100.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(58383100)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c58383100.thfilter(c) +function s.thfilter(c) return c:IsSetCard(0xe5) and c:IsAbleToHand() end -function c58383100.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c58383100.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c58383100.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c58383100.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c59123937.lua b/c59123937.lua index 489bfe2816..98cd7c9041 100644 --- a/c59123937.lua +++ b/c59123937.lua @@ -1,88 +1,89 @@ --DDヴァイス・テュポーン -function c59123937.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(59123937,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) - e1:SetCountLimit(1,59123937) - e1:SetCost(c59123937.spcost) - e1:SetTarget(c59123937.sptg) - e1:SetOperation(c59123937.spop) + e1:SetCountLimit(1,id) + e1:SetCost(s.spcost) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c59123937.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --fusion summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(59123937,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,59123938) - e1:SetCondition(c59123937.condition) - e1:SetTarget(c59123937.target) - e1:SetOperation(c59123937.operation) + e1:SetCountLimit(1,id+o) + e1:SetCondition(s.condition) + e1:SetTarget(s.target) + e1:SetOperation(s.operation) c:RegisterEffect(e1) end -function c59123937.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsSetCard,1,nil,0xaf) end local g=Duel.SelectReleaseGroup(tp,Card.IsSetCard,1,1,nil,0xaf) Duel.Release(g,REASON_COST) end -function c59123937.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsLevel(7) and c:IsSetCard(0x10af) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c59123937.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 - and Duel.IsExistingMatchingCard(c59123937.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c59123937.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,c59123937.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 c59123937.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(59123937,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c59123937.filter0(c) +function s.filter0(c) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() end -function c59123937.filter1(c,e) +function s.filter1(c,e) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function c59123937.filter2(c,e,tp,m,f,gc,chkf) +function s.filter2(c,e,tp,m,f,gc,chkf) return c:IsType(TYPE_FUSION) and c:IsSetCard(0x10af) and c:IsLevelAbove(8) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,gc,chkf) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 end -function c59123937.condition(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(59123937)~=0 +function s.condition(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)~=0 end -function c59123937.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then local chkf=tp - local mg1=Duel.GetMatchingGroup(c59123937.filter0,tp,LOCATION_GRAVE,0,nil) - local res=Duel.IsExistingMatchingCard(c59123937.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,chkf) + local mg1=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_GRAVE,0,nil) + local res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,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(c59123937.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf) + res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf) end end return res @@ -90,12 +91,12 @@ function c59123937.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,c,1,tp,LOCATION_GRAVE) end -function c59123937.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local chkf=tp if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end - local mg1=Duel.GetMatchingGroup(c59123937.filter1,tp,LOCATION_GRAVE,0,nil,e) - local sg1=Duel.GetMatchingGroup(c59123937.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf) + local mg1=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) + local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -103,7 +104,7 @@ function c59123937.operation(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(c59123937.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,chkf) + sg2=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,chkf) end if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then local sg=sg1:Clone() diff --git a/c62022479.lua b/c62022479.lua index 44d0519cbb..887761ea63 100644 --- a/c62022479.lua +++ b/c62022479.lua @@ -1,68 +1,69 @@ --烙印の絆 -function c62022479.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(62022479,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,62022479) - e1:SetTarget(c62022479.target) - e1:SetOperation(c62022479.activate) + e1:SetCountLimit(1,id) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c62022479.regcon) - e2:SetOperation(c62022479.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(62022479,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,62022480) - e3:SetCondition(c62022479.setcon) - e3:SetTarget(c62022479.settg) - e3:SetOperation(c62022479.setop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.setcon) + e3:SetTarget(s.settg) + e3:SetOperation(s.setop) c:RegisterEffect(e3) end -function c62022479.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return (c:IsFaceup() or c:IsLocation(LOCATION_HAND+LOCATION_GRAVE)) and c:IsCode(68468459) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c62022479.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c62022479.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED) end -function c62022479.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(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(c62022479.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end end -function c62022479.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function c62022479.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(62022479,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c62022479.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(62022479)>0 +function s.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c62022479.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c62022479.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c67100549.lua b/c67100549.lua index 02ffa6cbb3..e05b5db621 100644 --- a/c67100549.lua +++ b/c67100549.lua @@ -1,97 +1,98 @@ --烙印凶鳴 -function c67100549.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(67100549,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetCondition(c67100549.conditon) - e1:SetTarget(c67100549.target) - e1:SetOperation(c67100549.activate) + e1:SetCondition(s.conditon) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c67100549.regcon) - e2:SetOperation(c67100549.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(67100549,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetCode(EVENT_FREE_CHAIN) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,67100549) + e3:SetCountLimit(1,id) e3:SetHintTiming(TIMING_END_PHASE) - e3:SetCondition(c67100549.setcon) - e3:SetTarget(c67100549.settg) - e3:SetOperation(c67100549.setop) + e3:SetCondition(s.setcon) + e3:SetTarget(s.settg) + e3:SetOperation(s.setop) c:RegisterEffect(e3) - if not c67100549.global_check then - c67100549.global_check=true + if not s.global_check then + s.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_TO_GRAVE) - ge1:SetCondition(c67100549.checkcon) - ge1:SetOperation(c67100549.checkop) + ge1:SetCondition(s.checkcon) + ge1:SetOperation(s.checkop) Duel.RegisterEffect(ge1,0) end end -function c67100549.checkcon(e,tp,eg,ep,ev,re,r,rp) +function s.checkcon(e,tp,eg,ep,ev,re,r,rp) return eg:IsExists(Card.IsType,1,nil,TYPE_FUSION) end -function c67100549.checkop(e,tp,eg,ep,ev,re,r,rp) +function s.checkop(e,tp,eg,ep,ev,re,r,rp) local g=eg:Filter(Card.IsType,nil,TYPE_FUSION) local tc=g:GetFirst() while tc do - if Duel.GetFlagEffect(tc:GetControler(),67100549)==0 then - Duel.RegisterFlagEffect(tc:GetControler(),67100549,RESET_PHASE+PHASE_END,0,1) + if Duel.GetFlagEffect(tc:GetControler(),id)==0 then + Duel.RegisterFlagEffect(tc:GetControler(),id,RESET_PHASE+PHASE_END,0,1) end - if Duel.GetFlagEffect(0,67100549)>0 and Duel.GetFlagEffect(1,67100549)>0 then + if Duel.GetFlagEffect(0,id)>0 and Duel.GetFlagEffect(1,id)>0 then break end tc=g:GetNext() end end -function c67100549.conditon(e,tp,eg,ep,ev,re,r,rp) - return Duel.GetFlagEffect(tp,67100549)>0 +function s.conditon(e,tp,eg,ep,ev,re,r,rp) + return Duel.GetFlagEffect(tp,id)>0 end -function c67100549.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c67100549.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c67100549.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED) end -function c67100549.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(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(c67100549.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end end -function c67100549.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function c67100549.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(67100549,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c67100549.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(67100549)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 +function s.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 end -function c67100549.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c67100549.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c70427670.lua b/c70427670.lua index 974b0ac7c8..1c74bee9e5 100644 --- a/c70427670.lua +++ b/c70427670.lua @@ -1,59 +1,59 @@ --捕食植物ブフォリキュラ local s,id,o=GetID() -function c70427670.initial_effect(c) +function s.initial_effect(c) aux.EnablePendulumAttribute(c) --Pendulum Effect : Fusion Summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(70427670,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_PZONE) - e1:SetCountLimit(1,70427670) - e1:SetTarget(c70427670.fustg) - e1:SetOperation(c70427670.fusop) + e1:SetCountLimit(1,id) + e1:SetTarget(s.fustg) + e1:SetOperation(s.fusop) c:RegisterEffect(e1) --Monster Effect : Send to Hand (Pendulum Monster) local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(70427670,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetCategory(CATEGORY_TOHAND) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetCode(EVENT_BE_MATERIAL) - e2:SetCountLimit(1,70427670+o) - e2:SetCondition(c70427670.thcon) - e2:SetTarget(c70427670.thtg) - e2:SetOperation(c70427670.thop) + e2:SetCountLimit(1,id+o) + e2:SetCondition(s.thcon) + e2:SetTarget(s.thtg) + e2:SetOperation(s.thop) c:RegisterEffect(e2) end -function c70427670.fusfilter1(c,e) +function s.fusfilter1(c,e) return not c:IsImmuneToEffect(e) end -function c70427670.fusfilter2(c,e,tp,m,f,chkf) +function s.fusfilter2(c,e,tp,m,f,chkf) return c:IsType(TYPE_FUSION) and c:IsAttribute(ATTRIBUTE_DARK) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function c70427670.fustg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.fustg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp local mg1=Duel.GetFusionMaterial(tp) - local res=Duel.IsExistingMatchingCard(c70427670.fusfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(s.fusfilter2,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(c70427670.fusfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) + res=Duel.IsExistingMatchingCard(s.fusfilter2,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 c70427670.fusop(e,tp,eg,ep,ev,re,r,rp) +function s.fusop(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c70427670.fusfilter1,nil,e) - local sg1=Duel.GetMatchingGroup(c70427670.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local mg1=Duel.GetFusionMaterial(tp):Filter(s.fusfilter1,nil,e) + local sg1=Duel.GetMatchingGroup(s.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -61,7 +61,7 @@ function c70427670.fusop(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(c70427670.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf) + sg2=Duel.GetMatchingGroup(s.fusfilter2,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() @@ -83,20 +83,20 @@ function c70427670.fusop(e,tp,eg,ep,ev,re,r,rp) tc:CompleteProcedure() end end -function c70427670.thcon(e,tp,eg,ep,ev,re,r,rp) +function s.thcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup() and c:IsLocation(LOCATION_EXTRA)) and r==REASON_FUSION end -function c70427670.thfilter(c) - return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_PENDULUM) and not c:IsCode(70427670) and c:IsAbleToHand() +function s.thfilter(c) + return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_PENDULUM) and not c:IsCode(id) and c:IsAbleToHand() end -function c70427670.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c70427670.thfilter,tp,LOCATION_EXTRA,0,1,nil) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_EXTRA,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA) end -function c70427670.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c70427670.thfilter,tp,LOCATION_EXTRA,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_EXTRA,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) end diff --git a/c71039903.lua b/c71039903.lua index 3b72e7cf08..9e55e9ca28 100644 --- a/c71039903.lua +++ b/c71039903.lua @@ -1,66 +1,67 @@ --太古の白石 -function c71039903.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c71039903.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) -- local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(71039903,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetCategory(CATEGORY_TOHAND) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,71039903) + e2:SetCountLimit(1,id) e2:SetCost(aux.bfgcost) - e2:SetTarget(c71039903.target) - e2:SetOperation(c71039903.operation) + e2:SetTarget(s.target) + e2:SetOperation(s.operation) c:RegisterEffect(e2) end -function c71039903.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(71039903,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) e1:SetCountLimit(1) - e1:SetTarget(c71039903.sptg) - e1:SetOperation(c71039903.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end -function c71039903.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsSetCard(0xdd) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c71039903.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c71039903.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c71039903.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c71039903.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 c71039903.filter(c) +function s.filter(c) return c:IsSetCard(0xdd) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c71039903.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c71039903.filter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c71039903.filter,tp,LOCATION_GRAVE,0,1,nil) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.filter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,c71039903.filter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function c71039903.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then end diff --git a/c73167098.lua b/c73167098.lua index 0d1684ecb1..c635b5565e 100644 --- a/c73167098.lua +++ b/c73167098.lua @@ -1,6 +1,6 @@ --アロマリリス－マグノリア local s,id,o=GetID() -function c73167098.initial_effect(c) +function s.initial_effect(c) --material aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0xc9),aux.FilterBoolFunction(Card.IsRace,RACE_PLANT),true) c:EnableReviveLimit() diff --git a/c75311421.lua b/c75311421.lua index eceff4e79a..8e0d2278ce 100644 --- a/c75311421.lua +++ b/c75311421.lua @@ -1,71 +1,72 @@ --ボティス -function c75311421.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --to hand local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) - e1:SetTarget(c75311421.thtg) - e1:SetOperation(c75311421.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetCondition(c75311421.regcon) - e2:SetOperation(c75311421.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(c75311421.seqcon) - e3:SetTarget(c75311421.seqtg) - e3:SetOperation(c75311421.seqop) + e3:SetCondition(s.seqcon) + e3:SetTarget(s.seqtg) + e3:SetOperation(s.seqop) c:RegisterEffect(e3) end -function c75311421.thtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 and Duel.IsPlayerCanRemove(tp) end end -function c75311421.rmfilter(c,g) - return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and g:IsExists(c75311421.thfilter,1,c,c:GetCode()) +function s.rmfilter(c,g) + return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and g:IsExists(s.thfilter,1,c,c:GetCode()) end -function c75311421.thfilter(c,code) +function s.thfilter(c,code) return c:IsCode(code) and c:IsAbleToHand() end -function c75311421.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 then return end Duel.ConfirmDecktop(tp,3) local g=Duel.GetDecktopGroup(tp,3) local dg=Duel.GetFieldGroup(tp,LOCATION_DECK,0) - local sg=g:Filter(c75311421.rmfilter,nil,dg) - if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(75311421,0)) then + local sg=g:Filter(s.rmfilter,nil,dg) + if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local rc=sg:Select(tp,1,1,nil):GetFirst() Duel.Remove(rc,POS_FACEUP,REASON_EFFECT) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local tc=dg:FilterSelect(tp,c75311421.thfilter,1,1,rc,rc:GetCode()) + local tc=dg:FilterSelect(tp,s.thfilter,1,1,rc,rc:GetCode()) Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,tc) end Duel.ShuffleDeck(tp) end -function c75311421.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_NORMAL) end -function c75311421.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(75311421,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c75311421.seqcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(75311421)>0 +function s.seqcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c75311421.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>2 end end -function c75311421.seqop(e,tp,eg,ep,ev,re,r,rp) +function s.seqop(e,tp,eg,ep,ev,re,r,rp) Duel.SortDecktop(tp,tp,3) end diff --git a/c81570454.lua b/c81570454.lua index d1cc99158f..52792ce41b 100644 --- a/c81570454.lua +++ b/c81570454.lua @@ -1,45 +1,46 @@ --焔聖騎士－ローラン -function c81570454.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --equip local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(81570454,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,81570454) + e1:SetCountLimit(1,id) e1:SetCondition(aux.dscon) - e1:SetTarget(c81570454.eqtg) - e1:SetOperation(c81570454.eqop) + e1:SetTarget(s.eqtg) + e1:SetOperation(s.eqop) c:RegisterEffect(e1) --to hand local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c81570454.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(81570454,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,81570455) - e3:SetCondition(c81570454.thcon) - e3:SetTarget(c81570454.thtg) - e3:SetOperation(c81570454.thop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c81570454.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function s.eqtg(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 chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil) end -function c81570454.eqop(e,tp,eg,ep,ev,re,r,rp) +function s.eqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end local tc=Duel.GetFirstTarget() @@ -53,7 +54,7 @@ function c81570454.eqop(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(c81570454.eqlimit) + e1:SetValue(s.eqlimit) e1:SetLabelObject(tc) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -63,26 +64,26 @@ function c81570454.eqop(e,tp,eg,ep,ev,re,r,rp) e2:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e2) end -function c81570454.eqlimit(e,c) +function s.eqlimit(e,c) return c==e:GetLabelObject() end -function c81570454.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(81570454,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c81570454.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(81570454)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c81570454.thfilter(c) - return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR)) or c:IsType(TYPE_EQUIP)) and not c:IsCode(81570454) and c:IsAbleToHand() +function s.thfilter(c) + return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR)) or c:IsType(TYPE_EQUIP)) and not c:IsCode(id) and c:IsAbleToHand() end -function c81570454.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c81570454.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c81570454.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c81570454.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c84764038.lua b/c84764038.lua index dabffd5348..24bfeaaefa 100644 --- a/c84764038.lua +++ b/c84764038.lua @@ -1,84 +1,85 @@ --彼岸の悪鬼 スカラマリオン -function c84764038.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --self destroy local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetRange(LOCATION_MZONE) e1:SetCode(EFFECT_SELF_DESTROY) - e1:SetCondition(c84764038.sdcon) + e1:SetCondition(s.sdcon) c:RegisterEffect(e1) --Special Summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(84764038,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetRange(LOCATION_HAND) - e2:SetCountLimit(1,84764038) - e2:SetCondition(c84764038.sscon) - e2:SetTarget(c84764038.sstg) - e2:SetOperation(c84764038.ssop) + e2:SetCountLimit(1,id) + e2:SetCondition(s.sscon) + e2:SetTarget(s.sstg) + e2:SetOperation(s.ssop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c84764038.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(84764038,1)) + e4:SetDescription(aux.Stringid(id,1)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,84764038) + e4:SetCountLimit(1,id) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(c84764038.thcon) - e4:SetTarget(c84764038.thtg) - e4:SetOperation(c84764038.thop) + e4:SetCondition(s.thcon) + e4:SetTarget(s.thtg) + e4:SetOperation(s.thop) c:RegisterEffect(e4) end -function c84764038.sdfilter(c) +function s.sdfilter(c) return c:IsFacedown() or not c:IsSetCard(0xb1) end -function c84764038.sdcon(e) - return Duel.IsExistingMatchingCard(c84764038.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) +function s.sdcon(e) + return Duel.IsExistingMatchingCard(s.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) end -function c84764038.filter(c) +function s.filter(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) end -function c84764038.sscon(e,tp,eg,ep,ev,re,r,rp) - return not Duel.IsExistingMatchingCard(c84764038.filter,tp,LOCATION_ONFIELD,0,1,nil) +function s.sscon(e,tp,eg,ep,ev,re,r,rp) + return not Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD,0,1,nil) end -function c84764038.sstg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sstg(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 c84764038.ssop(e,tp,eg,ep,ev,re,r,rp) +function s.ssop(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 c84764038.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(84764038,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c84764038.thfilter(c) +function s.thfilter(c) return c:IsLevel(3) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FIEND) - and not c:IsCode(84764038) and c:IsAbleToHand() + and not c:IsCode(id) and c:IsAbleToHand() end -function c84764038.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(84764038)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c84764038.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c84764038.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c84764038.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c84764038.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c86943389.lua b/c86943389.lua index a3150093dc..f33ad42a71 100644 --- a/c86943389.lua +++ b/c86943389.lua @@ -1,43 +1,44 @@ --HSR快刀乱破ズール -function c86943389.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) c:EnableReviveLimit() --Double ATK local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(86943389,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_BATTLE_START) - e1:SetCondition(c86943389.atkcon) - e1:SetOperation(c86943389.atkop) + e1:SetCondition(s.atkcon) + e1:SetOperation(s.atkop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c86943389.regcon) - e2:SetOperation(c86943389.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(86943389,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_TOHAND) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetCountLimit(1) e3:SetRange(LOCATION_GRAVE) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) - e3:SetCondition(c86943389.thcon) - e3:SetTarget(c86943389.thtg) - e3:SetOperation(c86943389.thop) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c86943389.atkcon(e,tp,eg,ep,ev,re,r,rp) +function s.atkcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local bc=c:GetBattleTarget() return bc and bc:IsSummonType(SUMMON_TYPE_SPECIAL) end -function c86943389.atkop(e,tp,eg,ep,ev,re,r,rp) +function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsFaceup() and c:IsRelateToEffect(e) then local e1=Effect.CreateEffect(c) @@ -48,28 +49,28 @@ function c86943389.atkop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e1) end end -function c86943389.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_SYNCHRO) end -function c86943389.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(86943389,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c86943389.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(86943389)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c86943389.thfilter(c) - return c:IsSetCard(0x2016) and not c:IsCode(86943389) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.thfilter(c) + return c:IsSetCard(0x2016) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c86943389.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c86943389.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c86943389.thfilter,tp,LOCATION_GRAVE,0,1,nil) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,c86943389.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function c86943389.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c87746184.lua b/c87746184.lua index 588fcda5ee..8586d6b6d9 100644 --- a/c87746184.lua +++ b/c87746184.lua @@ -1,70 +1,71 @@ --烙印竜アルビオン -function c87746184.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsFusionAttribute,ATTRIBUTE_LIGHT),1,true,true) --fusion summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(87746184,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetProperty(EFFECT_FLAG_DELAY) - e1:SetCountLimit(1,87746184) - e1:SetCondition(c87746184.condition) - e1:SetTarget(c87746184.target) - e1:SetOperation(c87746184.activate) + e1:SetCountLimit(1,id) + e1:SetCondition(s.condition) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c87746184.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --to hand/set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(87746184,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,87746185) - e3:SetCondition(c87746184.thcon) - e3:SetTarget(c87746184.thtg) - e3:SetOperation(c87746184.thop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c87746184.branded_fusion_check(tp,sg,fc) +function s.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsFusionAttribute,ATTRIBUTE_LIGHT) end -function c87746184.condition(e,tp,eg,ep,ev,re,r,rp) +function s.condition(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) and Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)==0 end -function c87746184.filter1(c,e) +function s.filter1(c,e) return c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function c87746184.filter2(c,e,tp,m,f,chkf) - return c:IsType(TYPE_FUSION) and c:IsLevelBelow(8) and not c:IsCode(87746184) and (not f or f(c)) +function s.filter2(c,e,tp,m,f,chkf) + return c:IsType(TYPE_FUSION) and c:IsLevelBelow(8) and not c:IsCode(id) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function c87746184.filter3(c,e) +function s.filter3(c,e) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function c87746184.target(e,tp,eg,ep,ev,re,r,rp,chk) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c87746184.filter1,nil,e) - local mg2=Duel.GetMatchingGroup(c87746184.filter3,tp,LOCATION_GRAVE,0,nil,e) + local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e) + local mg2=Duel.GetMatchingGroup(s.filter3,tp,LOCATION_GRAVE,0,nil,e) mg1:Merge(mg2) - local res=Duel.IsExistingMatchingCard(c87746184.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(s.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(c87746184.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) + res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) end end return res @@ -72,13 +73,13 @@ function c87746184.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD+LOCATION_HAND+LOCATION_GRAVE) end -function c87746184.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local chkf=tp if Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)~=0 then return end - local mg1=Duel.GetFusionMaterial(tp):Filter(c87746184.filter1,nil,e) - local mg2=Duel.GetMatchingGroup(c87746184.filter3,tp,LOCATION_GRAVE,0,nil,e) + local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e) + local mg2=Duel.GetMatchingGroup(s.filter3,tp,LOCATION_GRAVE,0,nil,e) mg1:Merge(mg2) - local sg1=Duel.GetMatchingGroup(c87746184.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg3=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -86,7 +87,7 @@ function c87746184.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(c87746184.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf) + sg2=Duel.GetMatchingGroup(s.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() @@ -108,23 +109,23 @@ function c87746184.activate(e,tp,eg,ep,ev,re,r,rp) tc:CompleteProcedure() end end -function c87746184.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(87746184,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c87746184.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(87746184)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c87746184.thfilter(c) +function s.thfilter(c) if not (c:IsSetCard(0x15d) and c:IsType(TYPE_SPELL+TYPE_TRAP)) then return false end return c:IsAbleToHand() or c:IsSSetable() end -function c87746184.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c87746184.thfilter,tp,LOCATION_DECK,0,1,nil) 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 end -function c87746184.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,c87746184.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) local tc=g:GetFirst() if tc then if tc:IsAbleToHand() and (not tc:IsSSetable() or Duel.SelectOption(tp,1190,1153)==0) then diff --git a/c92003832.lua b/c92003832.lua index 8255332024..09ec46c53d 100644 --- a/c92003832.lua +++ b/c92003832.lua @@ -43,10 +43,10 @@ function s.fscon(e,tp,eg,ep,ev,re,r,rp) local ph=Duel.GetCurrentPhase() return ph==PHASE_MAIN1 or ph==PHASE_MAIN2 end -function c92003832.spfilter1(c,e) +function s.spfilter1(c,e) return not c:IsImmuneToEffect(e) end -function c92003832.spfilter2(c,e,tp,m,f,chkf) +function s.spfilter2(c,e,tp,m,f,chkf) return c:IsType(TYPE_FUSION) and c:IsSetCard(0x192) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end @@ -54,14 +54,14 @@ function s.fstg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp local mg1=Duel.GetFusionMaterial(tp) - local res=Duel.IsExistingMatchingCard(c92003832.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(s.spfilter2,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(c92003832.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) + res=Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) end end return res @@ -70,8 +70,8 @@ function s.fstg(e,tp,eg,ep,ev,re,r,rp,chk) end function s.fsop(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(c92003832.spfilter1,nil,e) - local sg1=Duel.GetMatchingGroup(c92003832.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local mg1=Duel.GetFusionMaterial(tp):Filter(s.spfilter1,nil,e) + local sg1=Duel.GetMatchingGroup(s.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -79,7 +79,7 @@ function s.fsop(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(c92003832.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf) + sg2=Duel.GetMatchingGroup(s.spfilter2,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() diff --git a/c93595154.lua b/c93595154.lua index 5e7ff7d2cc..efacbe6ba8 100644 --- a/c93595154.lua +++ b/c93595154.lua @@ -1,77 +1,78 @@ --烙印の裁き -function c93595154.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(93595154,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetTarget(c93595154.target) - e1:SetOperation(c93595154.activate) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c93595154.regcon) - e2:SetOperation(c93595154.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(93595154,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetCode(EVENT_FREE_CHAIN) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,93595154) + e3:SetCountLimit(1,id) e3:SetHintTiming(TIMING_END_PHASE) - e3:SetCondition(c93595154.setcon) - e3:SetTarget(c93595154.settg) - e3:SetOperation(c93595154.setop) + e3:SetCondition(s.setcon) + e3:SetTarget(s.settg) + e3:SetOperation(s.setop) c:RegisterEffect(e3) end -function c93595154.filter(c,tp) - return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevelAbove(8) and Duel.IsExistingMatchingCard(c93595154.desfilter,tp,0,LOCATION_MZONE,1,nil,c:GetAttack()) +function s.filter(c,tp) + return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevelAbove(8) and Duel.IsExistingMatchingCard(s.desfilter,tp,0,LOCATION_MZONE,1,nil,c:GetAttack()) end -function c93595154.desfilter(c,atk) +function s.desfilter(c,atk) return c:IsFaceup() and c:IsAttackAbove(atk) end -function c93595154.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c93595154.filter(chkc,tp) end - if chk==0 then return Duel.IsExistingTarget(c93595154.filter,tp,LOCATION_MZONE,0,1,nil,tp) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc,tp) end + if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) - local g=Duel.SelectTarget(tp,c93595154.filter,tp,LOCATION_MZONE,0,1,1,nil,tp) - local dg=Duel.GetMatchingGroup(c93595154.desfilter,tp,0,LOCATION_MZONE,nil,g:GetFirst():GetAttack()) + local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil,tp) + local dg=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil,g:GetFirst():GetAttack()) Duel.SetOperationInfo(0,CATEGORY_DESTROY,dg,dg:GetCount(),0,0) end -function c93595154.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsFaceup() and tc:IsRelateToEffect(e) then - local g=Duel.GetMatchingGroup(c93595154.desfilter,tp,0,LOCATION_MZONE,nil,tc:GetAttack()) + local g=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil,tc:GetAttack()) if g:GetCount()>0 then Duel.Destroy(g,REASON_EFFECT) end end end -function c93595154.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function c93595154.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(93595154,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c93595154.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(93595154)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 +function s.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 end -function c93595154.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c93595154.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c96345188.lua b/c96345188.lua index 263de5dcc9..2109d9a407 100644 --- a/c96345188.lua +++ b/c96345188.lua @@ -1,51 +1,52 @@ --RR－ミミクリー・レイニアス -function c96345188.initial_effect(c) +local s,id,o=GetID() +function s.initial_effect(c) --level local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCondition(c96345188.lvcon) - e1:SetTarget(c96345188.lvtg) - e1:SetOperation(c96345188.lvop) + e1:SetCondition(s.lvcon) + e1:SetTarget(s.lvtg) + e1:SetOperation(s.lvop) c:RegisterEffect(e1) --search local e2=Effect.CreateEffect(c) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,96345188) - e2:SetCondition(c96345188.thcon) + e2:SetCountLimit(1,id) + e2:SetCondition(s.thcon) e2:SetCost(aux.bfgcost) - e2:SetTarget(c96345188.thtg) - e2:SetOperation(c96345188.thop) + e2:SetTarget(s.thtg) + e2:SetOperation(s.thop) c:RegisterEffect(e2) - if not c96345188.global_check then - c96345188.global_check=true + if not s.global_check then + s.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_SUMMON_SUCCESS) ge1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) ge1:SetOperation(aux.sumreg) - ge1:SetLabel(96345188) + ge1:SetLabel(id) Duel.RegisterEffect(ge1,0) local ge2=ge1:Clone() ge2:SetCode(EVENT_SPSUMMON_SUCCESS) - ge2:SetLabel(96345188) + ge2:SetLabel(id) Duel.RegisterEffect(ge2,0) end end -function c96345188.lvcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(96345188)>0 +function s.lvcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c96345188.filter(c) +function s.filter(c) return c:IsFaceup() and c:GetLevel()>0 and c:IsSetCard(0xba) end -function c96345188.lvtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c96345188.filter,tp,LOCATION_MZONE,0,1,nil) end +function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_MZONE,0,1,nil) end end -function c96345188.lvop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetMatchingGroup(c96345188.filter,tp,LOCATION_MZONE,0,nil) +function s.lvop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetMatchingGroup(s.filter,tp,LOCATION_MZONE,0,nil) local tc=g:GetFirst() while tc do local e1=Effect.CreateEffect(e:GetHandler()) @@ -58,19 +59,19 @@ function c96345188.lvop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function c96345188.thcon(e,tp,eg,ep,ev,re,r,rp) +function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetTurnID()==Duel.GetTurnCount() and not e:GetHandler():IsReason(REASON_RETURN) end -function c96345188.thfilter(c) - return c:IsSetCard(0xba) and not c:IsCode(96345188) and c:IsAbleToHand() +function s.thfilter(c) + return c:IsSetCard(0xba) and not c:IsCode(id) and c:IsAbleToHand() end -function c96345188.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c96345188.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c96345188.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c96345188.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) From c6c2ca703603920600ad5295228fbe5cd99c3e79 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 8 Sep 2025 02:13:58 +0900 Subject: [PATCH 03/11] Add to GY this turn hint --- c11755663.lua | 2 +- c1906812.lua | 2 +- c19462747.lua | 2 +- c24919805.lua | 6 ++++++ c2542230.lua | 2 +- c3410461.lua | 2 +- c34848821.lua | 2 +- c34995106.lua | 2 +- c39049051.lua | 2 +- c41373230.lua | 2 +- c52481437.lua | 2 +- c53389254.lua | 16 ++++++++++++++++ c53971455.lua | 2 +- c56585883.lua | 2 +- c56980148.lua | 2 +- c58383100.lua | 2 +- c59123937.lua | 22 +++++++++++----------- c62022479.lua | 2 +- c66328392.lua | 2 +- c67100549.lua | 2 +- c68663427.lua | 2 +- c71039903.lua | 6 ++++++ c71545247.lua | 2 +- c75311421.lua | 2 +- c81570454.lua | 2 +- c84764038.lua | 2 +- c86943389.lua | 2 +- c87746184.lua | 2 +- c93595154.lua | 2 +- c96345188.lua | 16 ++++++++++++++++ 30 files changed, 80 insertions(+), 36 deletions(-) diff --git a/c11755663.lua b/c11755663.lua index ab44ba28ef..e8cb790d5f 100644 --- a/c11755663.lua +++ b/c11755663.lua @@ -36,7 +36,7 @@ function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsAbleToGraveAsCost() end Duel.SendtoGrave(c,REASON_COST) - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() diff --git a/c1906812.lua b/c1906812.lua index 5436f80e26..69740fff8d 100644 --- a/c1906812.lua +++ b/c1906812.lua @@ -63,7 +63,7 @@ function s.seqop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c19462747.lua b/c19462747.lua index 8af87f29e0..48241fff87 100644 --- a/c19462747.lua +++ b/c19462747.lua @@ -69,7 +69,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,4)) end function s.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c24919805.lua b/c24919805.lua index d79b2195b3..5b7dfcd2cd 100644 --- a/c24919805.lua +++ b/c24919805.lua @@ -53,6 +53,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(aux.Stringid(id,2)) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end function s.filter(c) return c:IsLevel(10) and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand() diff --git a/c2542230.lua b/c2542230.lua index b5a19716be..1edfd5351b 100644 --- a/c2542230.lua +++ b/c2542230.lua @@ -107,7 +107,7 @@ function s.discon(e) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() diff --git a/c3410461.lua b/c3410461.lua index 18a96705b3..d768b3d9d9 100644 --- a/c3410461.lua +++ b/c3410461.lua @@ -61,7 +61,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c34848821.lua b/c34848821.lua index 16d001a2f5..be8caa7168 100644 --- a/c34848821.lua +++ b/c34848821.lua @@ -57,7 +57,7 @@ function s.imfilter(e,re,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c34995106.lua b/c34995106.lua index 7c9ea42ef1..29200991da 100644 --- a/c34995106.lua +++ b/c34995106.lua @@ -128,7 +128,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c39049051.lua b/c39049051.lua index 32e2db1ee1..a5a8df0018 100644 --- a/c39049051.lua +++ b/c39049051.lua @@ -71,7 +71,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) end function s.thfilter(c) return (c:IsSetCard(0x46) and c:IsType(TYPE_SPELL) or c:IsCode(6205579)) and c:IsAbleToHand() diff --git a/c41373230.lua b/c41373230.lua index 642d115336..5cb21b7cf0 100644 --- a/c41373230.lua +++ b/c41373230.lua @@ -74,7 +74,7 @@ function s.efilter(e,te) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c52481437.lua b/c52481437.lua index 52d916e4d3..9ae81c4bf1 100644 --- a/c52481437.lua +++ b/c52481437.lua @@ -68,7 +68,7 @@ function s.atop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thfilter(c) return c:IsRace(RACE_MACHINE) and not c:IsCode(id) and c:IsAbleToHand() diff --git a/c53389254.lua b/c53389254.lua index 0dc6f834a5..f359041436 100644 --- a/c53389254.lua +++ b/c53389254.lua @@ -42,6 +42,13 @@ function s.initial_effect(c) e4:SetTarget(s.sptg2) e4:SetOperation(s.spop2) c:RegisterEffect(e4) + --register to grave + local e5=Effect.CreateEffect(c) + e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) + e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) + e5:SetCode(EVENT_TO_GRAVE) + e5:SetOperation(s.regop) + c:RegisterEffect(e5) end s.treat_itself_tuner=true function s.valcheck(e,c) @@ -108,3 +115,12 @@ function s.spop2(e,tp,eg,ep,ev,re,r,rp) Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) end end +function s.regop(e,tp,eg,ep,ev,re,r,rp) + local c=e:GetHandler() + local e1=Effect.CreateEffect(c) + e1:SetType(EFFECT_TYPE_SINGLE) + e1:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e1:SetDescription(aux.Stringid(id,2)) + e1:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e1) +end diff --git a/c53971455.lua b/c53971455.lua index fc1c656a27..99b25ec91e 100644 --- a/c53971455.lua +++ b/c53971455.lua @@ -85,7 +85,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c56585883.lua b/c56585883.lua index 6fbfb0e9f3..61db00d8b9 100644 --- a/c56585883.lua +++ b/c56585883.lua @@ -59,7 +59,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,2)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c56980148.lua b/c56980148.lua index 9b030d8660..12f8f09ad2 100644 --- a/c56980148.lua +++ b/c56980148.lua @@ -49,7 +49,7 @@ function s.tgop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 diff --git a/c59123937.lua b/c59123937.lua index 98cd7c9041..4dae32e05c 100644 --- a/c59123937.lua +++ b/c59123937.lua @@ -20,16 +20,16 @@ function s.initial_effect(c) e2:SetOperation(s.regop) c:RegisterEffect(e2) --fusion summon - local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) - e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) - e1:SetType(EFFECT_TYPE_IGNITION) - e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,id+o) - e1:SetCondition(s.condition) - e1:SetTarget(s.target) - e1:SetOperation(s.operation) - c:RegisterEffect(e1) + local e3=Effect.CreateEffect(c) + e3:SetDescription(aux.Stringid(id,1)) + e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) + e3:SetType(EFFECT_TYPE_IGNITION) + e3:SetRange(LOCATION_GRAVE) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.condition) + e3:SetTarget(s.target) + e3:SetOperation(s.operation) + c:RegisterEffect(e3) end function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsSetCard,1,nil,0xaf) end @@ -54,7 +54,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.filter0(c) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() diff --git a/c62022479.lua b/c62022479.lua index 887761ea63..6c4af384b2 100644 --- a/c62022479.lua +++ b/c62022479.lua @@ -54,7 +54,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c66328392.lua b/c66328392.lua index d36b1b113d..3b2072b0f4 100644 --- a/c66328392.lua +++ b/c66328392.lua @@ -93,7 +93,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)~=0 diff --git a/c67100549.lua b/c67100549.lua index e05b5db621..1e8eab0d05 100644 --- a/c67100549.lua +++ b/c67100549.lua @@ -83,7 +83,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 diff --git a/c68663427.lua b/c68663427.lua index 5efa0655a5..afdaeca028 100644 --- a/c68663427.lua +++ b/c68663427.lua @@ -94,7 +94,7 @@ function s.eftg(e,c) and c:IsType(TYPE_XYZ) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) end function s.eqcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c71039903.lua b/c71039903.lua index 9e55e9ca28..5833219bd0 100644 --- a/c71039903.lua +++ b/c71039903.lua @@ -34,6 +34,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(aux.Stringid(id,2)) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end function s.spfilter(c,e,tp) return c:IsSetCard(0xdd) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) diff --git a/c71545247.lua b/c71545247.lua index 9eabbd57f7..9e522b0d35 100644 --- a/c71545247.lua +++ b/c71545247.lua @@ -66,7 +66,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.tdcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c75311421.lua b/c75311421.lua index 8e0d2278ce..16ecdd5add 100644 --- a/c75311421.lua +++ b/c75311421.lua @@ -59,7 +59,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1)) end function s.seqcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c81570454.lua b/c81570454.lua index 52792ce41b..5fe333326b 100644 --- a/c81570454.lua +++ b/c81570454.lua @@ -69,7 +69,7 @@ function s.eqlimit(e,c) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c84764038.lua b/c84764038.lua index 24bfeaaefa..cf505a52aa 100644 --- a/c84764038.lua +++ b/c84764038.lua @@ -64,7 +64,7 @@ function s.ssop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,2)) end function s.thfilter(c) return c:IsLevel(3) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FIEND) diff --git a/c86943389.lua b/c86943389.lua index f33ad42a71..dbb80208cf 100644 --- a/c86943389.lua +++ b/c86943389.lua @@ -55,7 +55,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c87746184.lua b/c87746184.lua index 8586d6b6d9..3bdd64296f 100644 --- a/c87746184.lua +++ b/c87746184.lua @@ -111,7 +111,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c93595154.lua b/c93595154.lua index efacbe6ba8..49b30b48b2 100644 --- a/c93595154.lua +++ b/c93595154.lua @@ -63,7 +63,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 diff --git a/c96345188.lua b/c96345188.lua index 2109d9a407..56f947ce40 100644 --- a/c96345188.lua +++ b/c96345188.lua @@ -35,6 +35,13 @@ function s.initial_effect(c) ge2:SetLabel(id) Duel.RegisterEffect(ge2,0) end + --register to grave + local e3=Effect.CreateEffect(c) + e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) + e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) + e3:SetCode(EVENT_TO_GRAVE) + e3:SetOperation(s.regop) + c:RegisterEffect(e3) end function s.lvcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 @@ -77,3 +84,12 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.ConfirmCards(1-tp,g) end end +function s.regop(e,tp,eg,ep,ev,re,r,rp) + local c=e:GetHandler() + local e1=Effect.CreateEffect(c) + e1:SetType(EFFECT_TYPE_SINGLE) + e1:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e1:SetDescription(aux.Stringid(id,0)) + e1:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e1) +end From f48d2a9ce5ecab486e3ca2be4ff12691117c5d84 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 8 Sep 2025 02:26:28 +0900 Subject: [PATCH 04/11] revert untouched file --- c25861589.lua | 2 +- c30989084.lua | 2 +- c73167098.lua | 2 +- 3 files changed, 3 insertions(+), 3 deletions(-) diff --git a/c25861589.lua b/c25861589.lua index 304e81e8b6..09e2b25f45 100644 --- a/c25861589.lua +++ b/c25861589.lua @@ -1,6 +1,6 @@ --アロマブレンド local s,id,o=GetID() -function s.initial_effect(c) +function c25861589.initial_effect(c) aux.AddCodeList(c,15177750,92266279,28265983) --Activate local e1=Effect.CreateEffect(c) diff --git a/c30989084.lua b/c30989084.lua index 5ea8331593..88e857e030 100644 --- a/c30989084.lua +++ b/c30989084.lua @@ -1,6 +1,6 @@ --アロマリリス－ローズマリー local s,id,o=GetID() -function s.initial_effect(c) +function c30989084.initial_effect(c) --link summon c:EnableReviveLimit() aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_PLANT),2,3) diff --git a/c73167098.lua b/c73167098.lua index c635b5565e..0d1684ecb1 100644 --- a/c73167098.lua +++ b/c73167098.lua @@ -1,6 +1,6 @@ --アロマリリス－マグノリア local s,id,o=GetID() -function s.initial_effect(c) +function c73167098.initial_effect(c) --material aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0xc9),aux.FilterBoolFunction(Card.IsRace,RACE_PLANT),true) c:EnableReviveLimit() From 52913dadf4b1f5e6af3647141ed193bb88566494 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 8 Sep 2025 02:30:12 +0900 Subject: [PATCH 05/11] revert untouched --- c70427670.lua | 52 +++++++++++++++++++++++++-------------------------- 1 file changed, 26 insertions(+), 26 deletions(-) diff --git a/c70427670.lua b/c70427670.lua index 1c74bee9e5..974b0ac7c8 100644 --- a/c70427670.lua +++ b/c70427670.lua @@ -1,59 +1,59 @@ --捕食植物ブフォリキュラ local s,id,o=GetID() -function s.initial_effect(c) +function c70427670.initial_effect(c) aux.EnablePendulumAttribute(c) --Pendulum Effect : Fusion Summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(70427670,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_PZONE) - e1:SetCountLimit(1,id) - e1:SetTarget(s.fustg) - e1:SetOperation(s.fusop) + e1:SetCountLimit(1,70427670) + e1:SetTarget(c70427670.fustg) + e1:SetOperation(c70427670.fusop) c:RegisterEffect(e1) --Monster Effect : Send to Hand (Pendulum Monster) local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(70427670,1)) e2:SetCategory(CATEGORY_TOHAND) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetCode(EVENT_BE_MATERIAL) - e2:SetCountLimit(1,id+o) - e2:SetCondition(s.thcon) - e2:SetTarget(s.thtg) - e2:SetOperation(s.thop) + e2:SetCountLimit(1,70427670+o) + e2:SetCondition(c70427670.thcon) + e2:SetTarget(c70427670.thtg) + e2:SetOperation(c70427670.thop) c:RegisterEffect(e2) end -function s.fusfilter1(c,e) +function c70427670.fusfilter1(c,e) return not c:IsImmuneToEffect(e) end -function s.fusfilter2(c,e,tp,m,f,chkf) +function c70427670.fusfilter2(c,e,tp,m,f,chkf) return c:IsType(TYPE_FUSION) and c:IsAttribute(ATTRIBUTE_DARK) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function s.fustg(e,tp,eg,ep,ev,re,r,rp,chk) +function c70427670.fustg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp local mg1=Duel.GetFusionMaterial(tp) - local res=Duel.IsExistingMatchingCard(s.fusfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(c70427670.fusfilter2,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(s.fusfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) + res=Duel.IsExistingMatchingCard(c70427670.fusfilter2,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 s.fusop(e,tp,eg,ep,ev,re,r,rp) +function c70427670.fusop(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(s.fusfilter1,nil,e) - local sg1=Duel.GetMatchingGroup(s.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local mg1=Duel.GetFusionMaterial(tp):Filter(c70427670.fusfilter1,nil,e) + local sg1=Duel.GetMatchingGroup(c70427670.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -61,7 +61,7 @@ function s.fusop(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(s.fusfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf) + sg2=Duel.GetMatchingGroup(c70427670.fusfilter2,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() @@ -83,20 +83,20 @@ function s.fusop(e,tp,eg,ep,ev,re,r,rp) tc:CompleteProcedure() end end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) +function c70427670.thcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup() and c:IsLocation(LOCATION_EXTRA)) and r==REASON_FUSION end -function s.thfilter(c) - return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_PENDULUM) and not c:IsCode(id) and c:IsAbleToHand() +function c70427670.thfilter(c) + return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_PENDULUM) and not c:IsCode(70427670) 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_EXTRA,0,1,nil) end +function c70427670.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c70427670.thfilter,tp,LOCATION_EXTRA,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c70427670.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_EXTRA,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c70427670.thfilter,tp,LOCATION_EXTRA,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) end From ca658918f3c45eb52f2fb02109847916d0e271e0 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Mon, 8 Sep 2025 13:43:55 +0900 Subject: [PATCH 06/11] revert untouched file --- c92003832.lua | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) diff --git a/c92003832.lua b/c92003832.lua index 09ec46c53d..8255332024 100644 --- a/c92003832.lua +++ b/c92003832.lua @@ -43,10 +43,10 @@ function s.fscon(e,tp,eg,ep,ev,re,r,rp) local ph=Duel.GetCurrentPhase() return ph==PHASE_MAIN1 or ph==PHASE_MAIN2 end -function s.spfilter1(c,e) +function c92003832.spfilter1(c,e) return not c:IsImmuneToEffect(e) end -function s.spfilter2(c,e,tp,m,f,chkf) +function c92003832.spfilter2(c,e,tp,m,f,chkf) return c:IsType(TYPE_FUSION) and c:IsSetCard(0x192) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end @@ -54,14 +54,14 @@ function s.fstg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp local mg1=Duel.GetFusionMaterial(tp) - local res=Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(c92003832.spfilter2,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(s.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) + res=Duel.IsExistingMatchingCard(c92003832.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf) end end return res @@ -70,8 +70,8 @@ function s.fstg(e,tp,eg,ep,ev,re,r,rp,chk) end function s.fsop(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(s.spfilter1,nil,e) - local sg1=Duel.GetMatchingGroup(s.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local mg1=Duel.GetFusionMaterial(tp):Filter(c92003832.spfilter1,nil,e) + local sg1=Duel.GetMatchingGroup(c92003832.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -79,7 +79,7 @@ function s.fsop(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(s.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,chkf) + sg2=Duel.GetMatchingGroup(c92003832.spfilter2,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() From 336d0ecc45da89a7e2838b0a8edfb00e272c4300 Mon Sep 17 00:00:00 2001 From: purerosefallen <78877@qq.com> Date: Tue, 9 Sep 2025 11:44:40 +0800 Subject: [PATCH 07/11] update desc to 227 --- c11755663.lua | 2 +- c1906812.lua | 2 +- c19462747.lua | 2 +- c24919805.lua | 2 +- c2542230.lua | 2 +- c3410461.lua | 2 +- c34848821.lua | 2 +- c34995106.lua | 2 +- c39049051.lua | 2 +- c41373230.lua | 2 +- c52481437.lua | 2 +- c53389254.lua | 2 +- c53971455.lua | 2 +- c56585883.lua | 2 +- c56980148.lua | 2 +- c58383100.lua | 2 +- c59123937.lua | 2 +- c62022479.lua | 2 +- c66328392.lua | 2 +- c67100549.lua | 2 +- c68663427.lua | 2 +- c71039903.lua | 2 +- c71545247.lua | 2 +- c75311421.lua | 2 +- c81570454.lua | 2 +- c84764038.lua | 2 +- c86943389.lua | 2 +- c87746184.lua | 2 +- c93595154.lua | 2 +- c96345188.lua | 2 +- 30 files changed, 30 insertions(+), 30 deletions(-) diff --git a/c11755663.lua b/c11755663.lua index e8cb790d5f..ed33c823fd 100644 --- a/c11755663.lua +++ b/c11755663.lua @@ -36,7 +36,7 @@ function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsAbleToGraveAsCost() end Duel.SendtoGrave(c,REASON_COST) - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() diff --git a/c1906812.lua b/c1906812.lua index 69740fff8d..9e8e68a0d4 100644 --- a/c1906812.lua +++ b/c1906812.lua @@ -63,7 +63,7 @@ function s.seqop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c19462747.lua b/c19462747.lua index 48241fff87..a20d5b2bdd 100644 --- a/c19462747.lua +++ b/c19462747.lua @@ -69,7 +69,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,4)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c24919805.lua b/c24919805.lua index 5b7dfcd2cd..f6130f930f 100644 --- a/c24919805.lua +++ b/c24919805.lua @@ -56,7 +56,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) - e2:SetDescription(aux.Stringid(id,2)) + e2:SetDescription(227) e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e2) end diff --git a/c2542230.lua b/c2542230.lua index 1edfd5351b..84a32e14a7 100644 --- a/c2542230.lua +++ b/c2542230.lua @@ -107,7 +107,7 @@ function s.discon(e) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() diff --git a/c3410461.lua b/c3410461.lua index d768b3d9d9..28a231cfcc 100644 --- a/c3410461.lua +++ b/c3410461.lua @@ -61,7 +61,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c34848821.lua b/c34848821.lua index be8caa7168..1f5406ebb2 100644 --- a/c34848821.lua +++ b/c34848821.lua @@ -57,7 +57,7 @@ function s.imfilter(e,re,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c34995106.lua b/c34995106.lua index 29200991da..28b3b4802d 100644 --- a/c34995106.lua +++ b/c34995106.lua @@ -128,7 +128,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c39049051.lua b/c39049051.lua index a5a8df0018..8864d7110a 100644 --- a/c39049051.lua +++ b/c39049051.lua @@ -71,7 +71,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thfilter(c) return (c:IsSetCard(0x46) and c:IsType(TYPE_SPELL) or c:IsCode(6205579)) and c:IsAbleToHand() diff --git a/c41373230.lua b/c41373230.lua index 5cb21b7cf0..bd36e7a314 100644 --- a/c41373230.lua +++ b/c41373230.lua @@ -74,7 +74,7 @@ function s.efilter(e,te) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c52481437.lua b/c52481437.lua index 9ae81c4bf1..a60a3e16f1 100644 --- a/c52481437.lua +++ b/c52481437.lua @@ -68,7 +68,7 @@ function s.atop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thfilter(c) return c:IsRace(RACE_MACHINE) and not c:IsCode(id) and c:IsAbleToHand() diff --git a/c53389254.lua b/c53389254.lua index f359041436..c0e5aa0487 100644 --- a/c53389254.lua +++ b/c53389254.lua @@ -120,7 +120,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_CLIENT_HINT) - e1:SetDescription(aux.Stringid(id,2)) + e1:SetDescription(227) e1:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e1) end diff --git a/c53971455.lua b/c53971455.lua index 99b25ec91e..cba4a61112 100644 --- a/c53971455.lua +++ b/c53971455.lua @@ -85,7 +85,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c56585883.lua b/c56585883.lua index 61db00d8b9..866ae5aee2 100644 --- a/c56585883.lua +++ b/c56585883.lua @@ -59,7 +59,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,2)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c56980148.lua b/c56980148.lua index 12f8f09ad2..039897081d 100644 --- a/c56980148.lua +++ b/c56980148.lua @@ -49,7 +49,7 @@ function s.tgop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 diff --git a/c59123937.lua b/c59123937.lua index 4dae32e05c..fce00181f0 100644 --- a/c59123937.lua +++ b/c59123937.lua @@ -54,7 +54,7 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.filter0(c) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() diff --git a/c62022479.lua b/c62022479.lua index 6c4af384b2..819554896a 100644 --- a/c62022479.lua +++ b/c62022479.lua @@ -54,7 +54,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c66328392.lua b/c66328392.lua index 3b2072b0f4..4d40f98dc5 100644 --- a/c66328392.lua +++ b/c66328392.lua @@ -93,7 +93,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)~=0 diff --git a/c67100549.lua b/c67100549.lua index 1e8eab0d05..6285606cb9 100644 --- a/c67100549.lua +++ b/c67100549.lua @@ -83,7 +83,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 diff --git a/c68663427.lua b/c68663427.lua index afdaeca028..71545e0149 100644 --- a/c68663427.lua +++ b/c68663427.lua @@ -94,7 +94,7 @@ function s.eftg(e,c) and c:IsType(TYPE_XYZ) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,3)) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.eqcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c71039903.lua b/c71039903.lua index 5833219bd0..2bad26897b 100644 --- a/c71039903.lua +++ b/c71039903.lua @@ -37,7 +37,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) - e2:SetDescription(aux.Stringid(id,2)) + e2:SetDescription(227) e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e2) end diff --git a/c71545247.lua b/c71545247.lua index 9e522b0d35..efd7357284 100644 --- a/c71545247.lua +++ b/c71545247.lua @@ -66,7 +66,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.tdcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c75311421.lua b/c75311421.lua index 16ecdd5add..752231c4e0 100644 --- a/c75311421.lua +++ b/c75311421.lua @@ -59,7 +59,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,1)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.seqcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c81570454.lua b/c81570454.lua index 5fe333326b..4e50b7ca3b 100644 --- a/c81570454.lua +++ b/c81570454.lua @@ -69,7 +69,7 @@ function s.eqlimit(e,c) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c84764038.lua b/c84764038.lua index cf505a52aa..436d8e91f4 100644 --- a/c84764038.lua +++ b/c84764038.lua @@ -64,7 +64,7 @@ function s.ssop(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,2)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thfilter(c) return c:IsLevel(3) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FIEND) diff --git a/c86943389.lua b/c86943389.lua index dbb80208cf..39af522169 100644 --- a/c86943389.lua +++ b/c86943389.lua @@ -55,7 +55,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c87746184.lua b/c87746184.lua index 3bdd64296f..0acac541a2 100644 --- a/c87746184.lua +++ b/c87746184.lua @@ -111,7 +111,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c93595154.lua b/c93595154.lua index 49b30b48b2..ed16587cb9 100644 --- a/c93595154.lua +++ b/c93595154.lua @@ -63,7 +63,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0)) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 diff --git a/c96345188.lua b/c96345188.lua index 56f947ce40..2409504915 100644 --- a/c96345188.lua +++ b/c96345188.lua @@ -89,7 +89,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_CLIENT_HINT) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(227) e1:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e1) end From d6294476bdd1696c7b2a2315c5fb98477d0be326 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Tue, 9 Sep 2025 23:03:11 +0900 Subject: [PATCH 08/11] add getid --- c1315120.lua | 1 + c14509651.lua | 1 + c16780318.lua | 1 + c19337371.lua | 1 + c1966438.lua | 1 + c26655293.lua | 1 + c293542.lua | 1 + c30604579.lua | 1 + c31353051.lua | 1 + c31383545.lua | 1 + c31829185.lua | 1 + c32472237.lua | 1 + c32476603.lua | 1 + c34614910.lua | 1 + c34796454.lua | 1 + c35770983.lua | 1 + c36687247.lua | 1 + c37021315.lua | 1 + c42149850.lua | 1 + c43586926.lua | 1 + c48633301.lua | 1 + c5087128.lua | 1 + c53266486.lua | 1 + c55610595.lua | 1 + c63009228.lua | 1 + c64910482.lua | 1 + c71861848.lua | 1 + c77121851.lua | 1 + c80250185.lua | 1 + c84121193.lua | 1 + c88753985.lua | 1 + c93483212.lua | 1 + c93751476.lua | 1 + c95816395.lua | 1 + c9791914.lua | 1 + c99991455.lua | 1 + 36 files changed, 36 insertions(+) diff --git a/c1315120.lua b/c1315120.lua index 345cc5cb59..c510cae553 100644 --- a/c1315120.lua +++ b/c1315120.lua @@ -1,4 +1,5 @@ --TG ストライカー +local s,id,o=GetID() function c1315120.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) diff --git a/c14509651.lua b/c14509651.lua index 06d03ddb92..405fabfab7 100644 --- a/c14509651.lua +++ b/c14509651.lua @@ -1,4 +1,5 @@ --カース・ネクロフィア +local s,id,o=GetID() function c14509651.initial_effect(c) --special summon by effect local e0=Effect.CreateEffect(c) diff --git a/c16780318.lua b/c16780318.lua index 48499d5106..665cb1c977 100644 --- a/c16780318.lua +++ b/c16780318.lua @@ -1,4 +1,5 @@ --超勝負！ +local s,id,o=GetID() function c16780318.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) diff --git a/c19337371.lua b/c19337371.lua index 2758036429..1dcc41a1d5 100644 --- a/c19337371.lua +++ b/c19337371.lua @@ -1,4 +1,5 @@ --ヒステリック・サイン +local s,id,o=GetID() function c19337371.initial_effect(c) local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) diff --git a/c1966438.lua b/c1966438.lua index bfd5f7af9f..37f3f56496 100644 --- a/c1966438.lua +++ b/c1966438.lua @@ -1,4 +1,5 @@ --雙極の破械神 +local s,id,o=GetID() function c1966438.initial_effect(c) c:SetSPSummonOnce(1966438) --spsummon diff --git a/c26655293.lua b/c26655293.lua index 0fc55dd8a8..17cefca23f 100644 --- a/c26655293.lua +++ b/c26655293.lua @@ -1,4 +1,5 @@ --マグナヴァレット・ドラゴン +local s,id,o=GetID() function c26655293.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c293542.lua b/c293542.lua index cfb035d5d4..479b9d4b50 100644 --- a/c293542.lua +++ b/c293542.lua @@ -1,4 +1,5 @@ --TG ワーウルフ +local s,id,o=GetID() function c293542.initial_effect(c) --spsummon local e1=Effect.CreateEffect(c) diff --git a/c30604579.lua b/c30604579.lua index 07445cfc54..58d9c10f68 100644 --- a/c30604579.lua +++ b/c30604579.lua @@ -1,4 +1,5 @@ --極神皇トール +local s,id,o=GetID() function c30604579.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,c30604579.tfilter,aux.NonTuner(nil),2) diff --git a/c31353051.lua b/c31353051.lua index b221e8841b..e47bef7e69 100644 --- a/c31353051.lua +++ b/c31353051.lua @@ -1,4 +1,5 @@ --エクスプロードヴァレット・ドラゴン +local s,id,o=GetID() function c31353051.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c31383545.lua b/c31383545.lua index 5a983466f5..10f9e8635a 100644 --- a/c31383545.lua +++ b/c31383545.lua @@ -1,4 +1,5 @@ --XX－セイバー ダークソウル +local s,id,o=GetID() function c31383545.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c31829185.lua b/c31829185.lua index 8be0ed9dc8..19a6ac740d 100644 --- a/c31829185.lua +++ b/c31829185.lua @@ -1,4 +1,5 @@ --ダーク・ネクロフィア +local s,id,o=GetID() function c31829185.initial_effect(c) c:EnableReviveLimit() --special summon diff --git a/c32472237.lua b/c32472237.lua index 397c0e80c1..fe2dbd3c12 100644 --- a/c32472237.lua +++ b/c32472237.lua @@ -1,4 +1,5 @@ --メタルヴァレット・ドラゴン +local s,id,o=GetID() function c32472237.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c32476603.lua b/c32476603.lua index cb18e135a0..4392924b6d 100644 --- a/c32476603.lua +++ b/c32476603.lua @@ -1,4 +1,5 @@ --シルバーヴァレット・ドラゴン +local s,id,o=GetID() function c32476603.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c34614910.lua b/c34614910.lua index 5cba37dc42..4a02425287 100644 --- a/c34614910.lua +++ b/c34614910.lua @@ -1,4 +1,5 @@ --六花精シクラン +local s,id,o=GetID() function c34614910.initial_effect(c) --level local e1=Effect.CreateEffect(c) diff --git a/c34796454.lua b/c34796454.lua index 9bf4010eab..0c53a7fa98 100644 --- a/c34796454.lua +++ b/c34796454.lua @@ -1,4 +1,5 @@ --三連星のトリオン +local s,id,o=GetID() function c34796454.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c35770983.lua b/c35770983.lua index 63ac7b50a6..dc24bcb012 100644 --- a/c35770983.lua +++ b/c35770983.lua @@ -1,4 +1,5 @@ --ダイナレスラー・マーシャルアンキロ +local s,id,o=GetID() function c35770983.initial_effect(c) --atk local e1=Effect.CreateEffect(c) diff --git a/c36687247.lua b/c36687247.lua index 828a9ee88c..315c7adb1c 100644 --- a/c36687247.lua +++ b/c36687247.lua @@ -1,4 +1,5 @@ --TG ラッシュ・ライノ +local s,id,o=GetID() function c36687247.initial_effect(c) --atkup local e1=Effect.CreateEffect(c) diff --git a/c37021315.lua b/c37021315.lua index a807b9d9b9..6b031c778c 100644 --- a/c37021315.lua +++ b/c37021315.lua @@ -1,4 +1,5 @@ --泥岩の霊長－マンドストロング +local s,id,o=GetID() function c37021315.initial_effect(c) --set local e1=Effect.CreateEffect(c) diff --git a/c42149850.lua b/c42149850.lua index b99ebe0e34..1ace7a71e6 100644 --- a/c42149850.lua +++ b/c42149850.lua @@ -1,4 +1,5 @@ --使い捨て学習装置 +local s,id,o=GetID() function c42149850.initial_effect(c) --activate local e1=Effect.CreateEffect(c) diff --git a/c43586926.lua b/c43586926.lua index f748f07794..9f5ab698d1 100644 --- a/c43586926.lua +++ b/c43586926.lua @@ -1,4 +1,5 @@ --ドル・ドラ +local s,id,o=GetID() function c43586926.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c48633301.lua b/c48633301.lua index 73457d0112..5336cbd909 100644 --- a/c48633301.lua +++ b/c48633301.lua @@ -1,4 +1,5 @@ --TG ブースター・ラプトル +local s,id,o=GetID() function c48633301.initial_effect(c) --special summon rule local e1=Effect.CreateEffect(c) diff --git a/c5087128.lua b/c5087128.lua index 20237c7464..a360caa68f 100644 --- a/c5087128.lua +++ b/c5087128.lua @@ -1,4 +1,5 @@ --シェルヴァレット・ドラゴン +local s,id,o=GetID() function c5087128.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c53266486.lua b/c53266486.lua index fb7d50fa5e..065e6ab1ee 100644 --- a/c53266486.lua +++ b/c53266486.lua @@ -1,4 +1,5 @@ --アネスヴァレット・ドラゴン +local s,id,o=GetID() function c53266486.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c55610595.lua b/c55610595.lua index f68c37b5a3..ee8ff92525 100644 --- a/c55610595.lua +++ b/c55610595.lua @@ -1,4 +1,5 @@ --BF－上弦のピナーカ +local s,id,o=GetID() function c55610595.initial_effect(c) --synchro limit local e1=Effect.CreateEffect(c) diff --git a/c63009228.lua b/c63009228.lua index 19e5996d5c..207414ddc4 100644 --- a/c63009228.lua +++ b/c63009228.lua @@ -1,4 +1,5 @@ --レスキュー・インターレーサー +local s,id,o=GetID() function c63009228.initial_effect(c) --Damage to 0 local e1=Effect.CreateEffect(c) diff --git a/c64910482.lua b/c64910482.lua index 2a612de66a..aff58c04f9 100644 --- a/c64910482.lua +++ b/c64910482.lua @@ -1,4 +1,5 @@ --TG サイバー・マジシャン +local s,id,o=GetID() function c64910482.initial_effect(c) --synchro custom local e1=Effect.CreateEffect(c) diff --git a/c71861848.lua b/c71861848.lua index cdfeea2cba..bf8e471fcd 100644 --- a/c71861848.lua +++ b/c71861848.lua @@ -1,4 +1,5 @@ --転生炎獣コヨーテ +local s,id,o=GetID() function c71861848.initial_effect(c) --register effect local e1=Effect.CreateEffect(c) diff --git a/c77121851.lua b/c77121851.lua index bab0ad76de..29ea6cbdbf 100644 --- a/c77121851.lua +++ b/c77121851.lua @@ -1,4 +1,5 @@ --暗黒のマンティコア +local s,id,o=GetID() function c77121851.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c80250185.lua b/c80250185.lua index 34a006a328..36dfdd1ec1 100644 --- a/c80250185.lua +++ b/c80250185.lua @@ -1,4 +1,5 @@ --オートヴァレット・ドラゴン +local s,id,o=GetID() function c80250185.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) diff --git a/c84121193.lua b/c84121193.lua index dc12f7ba2c..19923af1bc 100644 --- a/c84121193.lua +++ b/c84121193.lua @@ -1,4 +1,5 @@ --コードブレイカー・ウイルスソードマン +local s,id,o=GetID() function c84121193.initial_effect(c) --link summon aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2) diff --git a/c88753985.lua b/c88753985.lua index 1531a5206d..0c3496e12d 100644 --- a/c88753985.lua +++ b/c88753985.lua @@ -1,4 +1,5 @@ --きつね火 +local s,id,o=GetID() function c88753985.initial_effect(c) --register local e1=Effect.CreateEffect(c) diff --git a/c93483212.lua b/c93483212.lua index 84c4f3fe42..d58fcad799 100644 --- a/c93483212.lua +++ b/c93483212.lua @@ -1,4 +1,5 @@ --極神聖帝オーディン +local s,id,o=GetID() function c93483212.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,c93483212.tfilter,aux.NonTuner(nil),2) diff --git a/c93751476.lua b/c93751476.lua index 57e1d68eb3..a42886071b 100644 --- a/c93751476.lua +++ b/c93751476.lua @@ -1,4 +1,5 @@ --猛炎星－テンレイ +local s,id,o=GetID() function c93751476.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c95816395.lua b/c95816395.lua index a0745bb781..732ecd374d 100644 --- a/c95816395.lua +++ b/c95816395.lua @@ -1,4 +1,5 @@ --どぐう +local s,id,o=GetID() function c95816395.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) diff --git a/c9791914.lua b/c9791914.lua index 3ae55f2509..4a266d83c9 100644 --- a/c9791914.lua +++ b/c9791914.lua @@ -1,4 +1,5 @@ --白銀のスナイパー +local s,id,o=GetID() function c9791914.initial_effect(c) --Negate local e1=Effect.CreateEffect(c) diff --git a/c99991455.lua b/c99991455.lua index 88868f0e75..79c957438e 100644 --- a/c99991455.lua +++ b/c99991455.lua @@ -1,4 +1,5 @@ --覇雷星ライジン +local s,id,o=GetID() function c99991455.initial_effect(c) --fusion material c:EnableReviveLimit() From 037c014baf54901374927f0632a4469b059ece45 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Tue, 9 Sep 2025 23:08:18 +0900 Subject: [PATCH 09/11] use getid --- c1315120.lua | 28 +++++++++--------- c14509651.lua | 52 ++++++++++++++++----------------- c16780318.lua | 48 +++++++++++++++---------------- c19337371.lua | 50 ++++++++++++++++---------------- c1966438.lua | 80 +++++++++++++++++++++++++-------------------------- c26655293.lua | 42 +++++++++++++-------------- c293542.lua | 42 +++++++++++++-------------- c30604579.lua | 62 +++++++++++++++++++-------------------- c31353051.lua | 42 +++++++++++++-------------- c31383545.lua | 22 +++++++------- c31829185.lua | 44 ++++++++++++++-------------- c32472237.lua | 42 +++++++++++++-------------- c32476603.lua | 42 +++++++++++++-------------- c34614910.lua | 58 ++++++++++++++++++------------------- c34796454.lua | 16 +++++------ c35770983.lua | 48 +++++++++++++++---------------- c36687247.lua | 28 +++++++++--------- c37021315.lua | 40 +++++++++++++------------- c42149850.lua | 42 +++++++++++++-------------- c43586926.lua | 18 ++++++------ c48633301.lua | 34 +++++++++++----------- c5087128.lua | 52 ++++++++++++++++----------------- c53266486.lua | 42 +++++++++++++-------------- c55610595.lua | 28 +++++++++--------- c63009228.lua | 36 +++++++++++------------ c64910482.lua | 62 +++++++++++++++++++-------------------- c71861848.lua | 60 +++++++++++++++++++------------------- c77121851.lua | 34 +++++++++++----------- c80250185.lua | 42 +++++++++++++-------------- c84121193.lua | 52 ++++++++++++++++----------------- c88753985.lua | 16 +++++------ c93483212.lua | 62 +++++++++++++++++++-------------------- c93751476.lua | 44 ++++++++++++++-------------- c95816395.lua | 28 +++++++++--------- c9791914.lua | 20 ++++++------- c99991455.lua | 36 +++++++++++------------ 36 files changed, 747 insertions(+), 747 deletions(-) diff --git a/c1315120.lua b/c1315120.lua index c510cae553..720facbdd7 100644 --- a/c1315120.lua +++ b/c1315120.lua @@ -1,54 +1,54 @@ --TG ストライカー local s,id,o=GetID() -function c1315120.initial_effect(c) +function s.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(c1315120.spcon) + e1:SetCondition(s.spcon) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c1315120.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c1315120.spcon(e,c) +function s.spcon(e,c) if c==nil then return true end return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_MZONE,0)==0 and Duel.GetFieldGroupCount(c:GetControler(),0,LOCATION_MZONE)>0 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 end -function c1315120.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(1315120,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c1315120.thtg) - e1:SetOperation(c1315120.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c1315120.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(1315120) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c1315120.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c1315120.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c1315120.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c1315120.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c14509651.lua b/c14509651.lua index 405fabfab7..80bec3f536 100644 --- a/c14509651.lua +++ b/c14509651.lua @@ -1,61 +1,61 @@ --カース・ネクロフィア local s,id,o=GetID() -function c14509651.initial_effect(c) +function s.initial_effect(c) --special summon by effect local e0=Effect.CreateEffect(c) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetType(EFFECT_TYPE_SINGLE) e0:SetCode(EFFECT_SPSUMMON_CONDITION) - e0:SetValue(c14509651.splimit) + e0:SetValue(s.splimit) c:RegisterEffect(e0) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(14509651,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,14509651) - e1:SetTarget(c14509651.sptg1) - e1:SetOperation(c14509651.spop1) + e1:SetCountLimit(1,id) + e1:SetTarget(s.sptg1) + e1:SetOperation(s.spop1) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetOperation(c14509651.tgop) + e2:SetOperation(s.tgop) c:RegisterEffect(e2) --special summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(14509651,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,14509652) - e3:SetCondition(c14509651.spcon2) - e3:SetTarget(c14509651.sptg2) - e3:SetOperation(c14509651.spop2) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.spcon2) + e3:SetTarget(s.sptg2) + e3:SetOperation(s.spop2) c:RegisterEffect(e3) end -function c14509651.splimit(e,se,sp,st) +function s.splimit(e,se,sp,st) return se:IsHasType(EFFECT_TYPE_ACTIONS) end -function c14509651.spcfilter(c) +function s.spcfilter(c) return c:IsRace(RACE_FIEND) and c:IsFaceup() and c:IsAbleToDeck() end -function c14509651.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and c14509651.spcfilter(chkc) end +function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and s.spcfilter(chkc) end local c=e:GetHandler() if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(c14509651.spcfilter,tp,LOCATION_REMOVED,0,3,nil) end + and Duel.IsExistingTarget(s.spcfilter,tp,LOCATION_REMOVED,0,3,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) - local g=Duel.SelectTarget(tp,c14509651.spcfilter,tp,LOCATION_REMOVED,0,3,3,nil) + local g=Duel.SelectTarget(tp,s.spcfilter,tp,LOCATION_REMOVED,0,3,3,nil) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,3,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function c14509651.spop1(e,tp,eg,ep,ev,re,r,rp) +function s.spop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then @@ -63,27 +63,27 @@ function c14509651.spop1(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end end -function c14509651.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(14509651,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end end -function c14509651.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(14509651)>0 +function s.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c14509651.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function c14509651.spop2(e,tp,eg,ep,ev,re,r,rp) +function s.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 then local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_SZONE,0,nil) local ct=g:GetClassCount(Card.GetCode) local dg=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil) - if ct>0 and #dg>0 and Duel.SelectYesNo(tp,aux.Stringid(14509651,2)) then + if ct>0 and #dg>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local sg=dg:Select(tp,1,ct,nil) diff --git a/c16780318.lua b/c16780318.lua index 665cb1c977..8f299e254e 100644 --- a/c16780318.lua +++ b/c16780318.lua @@ -1,32 +1,32 @@ --超勝負！ local s,id,o=GetID() -function c16780318.initial_effect(c) +function s.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOEXTRA+CATEGORY_DESTROY+CATEGORY_DRAW+CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetTarget(c16780318.target) - e1:SetOperation(c16780318.activate) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --register GY effect local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c16780318.regcon) - e2:SetOperation(c16780318.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c16780318.exfilter(c,tp) +function s.exfilter(c,tp) return c:IsFaceup() and c:IsType(TYPE_SYNCHRO) and c:IsAbleToExtra() and Duel.GetMZoneCount(tp,c)>=4 end -function c16780318.spfilter(c,e,tp) +function s.spfilter(c,e,tp) return c:IsSetCard(0xe6) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) end -function c16780318.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c16780318.exfilter,tp,LOCATION_MZONE,0,1,nil,tp) and not Duel.IsPlayerAffectedByEffect(tp,59822133) - and Duel.IsExistingMatchingCard(c16780318.spfilter,tp,LOCATION_GRAVE,0,4,nil,e,tp) and Duel.IsPlayerCanDraw(tp,1) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.exfilter,tp,LOCATION_MZONE,0,1,nil,tp) and not Duel.IsPlayerAffectedByEffect(tp,59822133) + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,4,nil,e,tp) and Duel.IsPlayerCanDraw(tp,1) end Duel.SetTargetPlayer(tp) Duel.SetTargetParam(1) @@ -34,14 +34,14 @@ function c16780318.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,nil,1,tp,LOCATION_MZONE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,4,tp,LOCATION_GRAVE) end -function c16780318.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) - local g=Duel.SelectMatchingCard(tp,c16780318.exfilter,tp,LOCATION_MZONE,0,1,1,nil,tp) + local g=Duel.SelectMatchingCard(tp,s.exfilter,tp,LOCATION_MZONE,0,1,1,nil,tp) local tg=g:GetFirst() if tg and Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tg:IsLocation(LOCATION_EXTRA) then if Duel.GetLocationCount(tp,LOCATION_MZONE)<4 or Duel.IsPlayerAffectedByEffect(tp,59822133) then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16780318.spfilter),tp,LOCATION_GRAVE,0,4,4,nil,e,tp) + local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE,0,4,4,nil,e,tp) if #sg>0 then if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)~=0 then Duel.BreakEffect() @@ -51,7 +51,7 @@ function c16780318.activate(e,tp,eg,ep,ev,re,r,rp) Duel.ConfirmCards(1-p,tc) if tc:IsType(TYPE_MONSTER) and tc:IsSetCard(0xe6) then if tc:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.SelectYesNo(tp,aux.Stringid(16780318,0)) then + and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP) end else @@ -65,33 +65,33 @@ function c16780318.activate(e,tp,eg,ep,ev,re,r,rp) end end end -function c16780318.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return re and re:GetHandler():IsSetCard(0xe6) and re:GetHandler():IsType(TYPE_MONSTER) and bit.band(r,REASON_EFFECT)>0 end -function c16780318.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(16780318,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_TOHAND) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) e1:SetCountLimit(1) - e1:SetTarget(c16780318.thtg) - e1:SetOperation(c16780318.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end -function c16780318.thfilter(c) +function s.thfilter(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() end -function c16780318.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c16780318.thfilter,tp,LOCATION_GRAVE,0,1,nil) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE) end -function c16780318.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16780318.thfilter),tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.thfilter),tp,LOCATION_GRAVE,0,1,1,nil) if #g>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c19337371.lua b/c19337371.lua index 1dcc41a1d5..c7bb02a73b 100644 --- a/c19337371.lua +++ b/c19337371.lua @@ -1,68 +1,68 @@ --ヒステリック・サイン local s,id,o=GetID() -function c19337371.initial_effect(c) +function s.initial_effect(c) local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,19337371) - e1:SetTarget(c19337371.target) - e1:SetOperation(c19337371.activate) + e1:SetCountLimit(1,id) + e1:SetTarget(s.target) + e1:SetOperation(s.activate) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c19337371.regcon) - e2:SetOperation(c19337371.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --search local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(19337371,0)) + e3:SetDescription(aux.Stringid(id,0)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetRange(LOCATION_GRAVE) e3:SetCode(EVENT_PHASE+PHASE_END) - e3:SetCountLimit(1,19337371) - e3:SetCondition(c19337371.thcon) - e3:SetTarget(c19337371.thtg) - e3:SetOperation(c19337371.thop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.thcon) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c19337371.filter(c) +function s.filter(c) return c:IsCode(90219263) and c:IsAbleToHand() end -function c19337371.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c19337371.filter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end +function s.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE+LOCATION_DECK) end -function c19337371.activate(e,tp,eg,ep,ev,re,r,rp) +function s.activate(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c19337371.filter),tp,LOCATION_GRAVE+LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.filter),tp,LOCATION_GRAVE+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 c19337371.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_HAND+LOCATION_ONFIELD) end -function c19337371.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(19337371,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) +function s.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c19337371.thfilter(c) +function s.thfilter(c) return c:IsSetCard(0x64) and c:IsAbleToHand() end -function c19337371.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(19337371)>0 +function s.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c19337371.thtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c19337371.thop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetMatchingGroup(c19337371.thfilter,tp,LOCATION_DECK,0,nil) +function s.thop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_DECK,0,nil) if g:GetCount()==0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) local g1=g:SelectSubGroup(tp,aux.dncheck,false,1,3) diff --git a/c1966438.lua b/c1966438.lua index 37f3f56496..ec9a6e1c80 100644 --- a/c1966438.lua +++ b/c1966438.lua @@ -1,106 +1,106 @@ --雙極の破械神 local s,id,o=GetID() -function c1966438.initial_effect(c) - c:SetSPSummonOnce(1966438) +function s.initial_effect(c) + c:SetSPSummonOnce(id) --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(1966438,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) - e1:SetCode(EVENT_CUSTOM+1966438) + e1:SetCode(EVENT_CUSTOM+id) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e1:SetRange(LOCATION_HAND) - e1:SetCondition(c1966438.spcon) - e1:SetTarget(c1966438.sptg) - e1:SetOperation(c1966438.spop) + e1:SetCondition(s.spcon) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --destroy local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(1966438,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetCategory(CATEGORY_DESTROY) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetProperty(EFFECT_FLAG_DELAY) - e2:SetCost(c1966438.descost) - e2:SetTarget(c1966438.destg) - e2:SetOperation(c1966438.desop) + e2:SetCost(s.descost) + e2:SetTarget(s.destg) + e2:SetOperation(s.desop) c:RegisterEffect(e2) --spsummon2 local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetCondition(c1966438.regcon1) - e3:SetOperation(c1966438.regop1) + e3:SetCondition(s.regcon1) + e3:SetOperation(s.regop1) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(1966438,2)) + e4:SetDescription(aux.Stringid(id,2)) e4:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) e4:SetCountLimit(1) - e4:SetCondition(c1966438.spcon2) - e4:SetTarget(c1966438.sptg2) - e4:SetOperation(c1966438.spop2) + e4:SetCondition(s.spcon2) + e4:SetTarget(s.sptg2) + e4:SetOperation(s.spop2) c:RegisterEffect(e4) - if not c1966438.global_check then - c1966438.global_check=true + if not s.global_check then + s.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_DESTROYED) - ge1:SetCondition(c1966438.regcon) - ge1:SetOperation(c1966438.regop) + ge1:SetCondition(s.regcon) + ge1:SetOperation(s.regop) Duel.RegisterEffect(ge1,0) end end -function c1966438.regcon1(e,tp,eg,ep,ev,re,r,rp) +function s.regcon1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) end -function c1966438.regop1(e,tp,eg,ep,ev,re,r,rp) +function s.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(1966438,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c1966438.spcfilter(c,tp) +function s.spcfilter(c,tp) return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_ONFIELD) end -function c1966438.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local v=0 - if eg:IsExists(c1966438.spcfilter,1,nil,0) then v=v+1 end - if eg:IsExists(c1966438.spcfilter,1,nil,1) then v=v+2 end + if eg:IsExists(s.spcfilter,1,nil,0) then v=v+1 end + if eg:IsExists(s.spcfilter,1,nil,1) then v=v+2 end if v==0 then return false end e:SetLabel(({0,1,PLAYER_ALL})[v]) return true end -function c1966438.regop(e,tp,eg,ep,ev,re,r,rp) - Duel.RaiseEvent(eg,EVENT_CUSTOM+1966438,re,r,rp,ep,e:GetLabel()) +function s.regop(e,tp,eg,ep,ev,re,r,rp) + Duel.RaiseEvent(eg,EVENT_CUSTOM+id,re,r,rp,ep,e:GetLabel()) end -function c1966438.spcon(e,tp,eg,ep,ev,re,r,rp) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) return ev==tp or ev==PLAYER_ALL end -function c1966438.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function c1966438.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) end end -function c1966438.descost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.descost(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 Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD) end -function c1966438.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) if chk==0 then return g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) end -function c1966438.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) if g:GetCount()>0 then @@ -108,15 +108,15 @@ function c1966438.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Destroy(g,REASON_EFFECT) end end -function c1966438.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(1966438)>0 +function s.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c1966438.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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,tp,LOCATION_GRAVE) end -function c1966438.spop2(e,tp,eg,ep,ev,re,r,rp) +function s.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c26655293.lua b/c26655293.lua index 17cefca23f..8993a44f9e 100644 --- a/c26655293.lua +++ b/c26655293.lua @@ -1,41 +1,41 @@ --マグナヴァレット・ドラゴン local s,id,o=GetID() -function c26655293.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(26655293,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,26655293) - e1:SetCondition(c26655293.descon) - e1:SetTarget(c26655293.destg) - e1:SetOperation(c26655293.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c26655293.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c26655293.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c26655293.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,LOCATION_MZONE,c) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function c26655293.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 then local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE) if g:GetCount()==0 then return end @@ -45,34 +45,34 @@ function c26655293.desop(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoGrave(sg,REASON_EFFECT) end end -function c26655293.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(26655293,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,26655294) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c26655293.sptg) - e1:SetOperation(c26655293.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c26655293.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(26655293) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c26655293.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c26655293.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c26655293.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c26655293.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c293542.lua b/c293542.lua index 479b9d4b50..8c7447e66a 100644 --- a/c293542.lua +++ b/c293542.lua @@ -1,67 +1,67 @@ --TG ワーウルフ local s,id,o=GetID() -function c293542.initial_effect(c) +function s.initial_effect(c) --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(293542,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetRange(LOCATION_HAND) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCondition(c293542.spcon) - e1:SetTarget(c293542.sptg) - e1:SetOperation(c293542.spop) + e1:SetCondition(s.spcon) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c293542.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c293542.cfilter(c) +function s.cfilter(c) return c:IsFaceup() and c:IsLevelBelow(4) end -function c293542.spcon(e,tp,eg,ep,ev,re,r,rp) - return eg:IsExists(c293542.cfilter,1,nil) +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return eg:IsExists(s.cfilter,1,nil) end -function c293542.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c293542.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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 c293542.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(293542,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c293542.thtg) - e1:SetOperation(c293542.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c293542.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(293542) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c293542.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c293542.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c293542.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c293542.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c30604579.lua b/c30604579.lua index 58d9c10f68..b29ae0f447 100644 --- a/c30604579.lua +++ b/c30604579.lua @@ -1,57 +1,57 @@ --極神皇トール local s,id,o=GetID() -function c30604579.initial_effect(c) +function s.initial_effect(c) --synchro summon - aux.AddSynchroProcedure(c,c30604579.tfilter,aux.NonTuner(nil),2) + aux.AddSynchroProcedure(c,s.tfilter,aux.NonTuner(nil),2) c:EnableReviveLimit() --negate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(30604579,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DISABLE) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetTarget(c30604579.distg) - e1:SetOperation(c30604579.disop) + e1:SetTarget(s.distg) + e1:SetOperation(s.disop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c30604579.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(30604579,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(c30604579.spcon) - e3:SetCost(c30604579.spcost) - e3:SetTarget(c30604579.sptg) - e3:SetOperation(c30604579.spop) + e3:SetCondition(s.spcon) + e3:SetCost(s.spcost) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) --damage local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(30604579,2)) + e4:SetDescription(aux.Stringid(id,2)) e4:SetCategory(CATEGORY_DAMAGE) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e4:SetCode(EVENT_SPSUMMON_SUCCESS) - e4:SetCondition(c30604579.damcon) - e4:SetTarget(c30604579.damtg) - e4:SetOperation(c30604579.damop) + e4:SetCondition(s.damcon) + e4:SetTarget(s.damtg) + e4:SetOperation(s.damop) c:RegisterEffect(e4) end -function c30604579.tfilter(c) +function s.tfilter(c) return c:IsSetCard(0x6042) or c:IsHasEffect(61777313) end -function c30604579.distg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.distg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end end -function c30604579.disop(e,tp,eg,ep,ev,re,r,rp) +function s.disop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil) local tc=g:GetFirst() local c=e:GetHandler() @@ -69,47 +69,47 @@ function c30604579.disop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function c30604579.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local pos=c:GetPreviousPosition() if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(30604579,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end end -function c30604579.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(30604579)~=0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)~=0 end -function c30604579.cfilter(c) +function s.cfilter(c) return c:IsSetCard(0x6042) and c:IsType(TYPE_TUNER) and c:IsAbleToRemoveAsCost() end -function c30604579.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c30604579.cfilter,tp,LOCATION_GRAVE,0,1,nil) end +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,c30604579.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function c30604579.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c30604579.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),SUMMON_VALUE_SELF,tp,tp,false,false,POS_FACEUP) end end -function c30604579.damcon(e,tp,eg,ep,ev,re,r,rp) +function s.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+SUMMON_VALUE_SELF end -function c30604579.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(1-tp) Duel.SetTargetParam(800) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800) end -function c30604579.damop(e,tp,eg,ep,ev,re,r,rp) +function s.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end diff --git a/c31353051.lua b/c31353051.lua index e47bef7e69..7d4e56f384 100644 --- a/c31353051.lua +++ b/c31353051.lua @@ -1,40 +1,40 @@ --エクスプロードヴァレット・ドラゴン local s,id,o=GetID() -function c31353051.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(31353051,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,31353051) - e1:SetCondition(c31353051.descon) - e1:SetTarget(c31353051.destg) - e1:SetOperation(c31353051.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c31353051.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c31353051.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c31353051.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDestructable() end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,PLAYER_ALL,2000) end -function c31353051.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then Duel.BreakEffect() @@ -43,34 +43,34 @@ function c31353051.desop(e,tp,eg,ep,ev,re,r,rp) Duel.RDComplete() end end -function c31353051.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(31353051,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,31353052) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c31353051.sptg) - e1:SetOperation(c31353051.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c31353051.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(31353051) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c31353051.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c31353051.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c31353051.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c31353051.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c31383545.lua b/c31383545.lua index 10f9e8635a..06df13578e 100644 --- a/c31383545.lua +++ b/c31383545.lua @@ -1,40 +1,40 @@ --XX－セイバー ダークソウル local s,id,o=GetID() -function c31383545.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c31383545.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) end -function c31383545.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(31383545,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c31383545.thtg) - e1:SetOperation(c31383545.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c31383545.filter(c) +function s.filter(c) return c:IsSetCard(0x100d) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c31383545.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c31383545.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c31383545.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c31383545.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c31829185.lua b/c31829185.lua index 19a6ac740d..6485a7d854 100644 --- a/c31829185.lua +++ b/c31829185.lua @@ -1,6 +1,6 @@ --ダーク・ネクロフィア local s,id,o=GetID() -function c31829185.initial_effect(c) +function s.initial_effect(c) c:EnableReviveLimit() --special summon local e1=Effect.CreateEffect(c) @@ -8,16 +8,16 @@ function c31829185.initial_effect(c) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(c31829185.spcon) - e1:SetTarget(c31829185.sptg) - e1:SetOperation(c31829185.spop) + e1:SetCondition(s.spcon) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetOperation(c31829185.tgop) + e2:SetOperation(s.tgop) c:RegisterEffect(e2) --equip local e3=Effect.CreateEffect(c) @@ -26,22 +26,22 @@ function c31829185.initial_effect(c) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(c31829185.eqcon) - e3:SetTarget(c31829185.eqtg) - e3:SetOperation(c31829185.eqop) + e3:SetCondition(s.eqcon) + e3:SetTarget(s.eqtg) + e3:SetOperation(s.eqop) c:RegisterEffect(e3) end -function c31829185.spfilter(c) +function s.spfilter(c) return c:IsRace(RACE_FIEND) and c:IsAbleToRemoveAsCost() end -function c31829185.spcon(e,c) +function s.spcon(e,c) if c==nil then return true end local tp=c:GetControler() return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c31829185.spfilter,tp,LOCATION_GRAVE,0,3,nil) + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,3,nil) end -function c31829185.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) - local g=Duel.GetMatchingGroup(c31829185.spfilter,tp,LOCATION_GRAVE,0,nil) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) + local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_GRAVE,0,nil) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local sg=g:CancelableSelect(tp,3,3,nil) if sg then @@ -50,22 +50,22 @@ function c31829185.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) return true else return false end end -function c31829185.spop(e,tp,eg,ep,ev,re,r,rp,c) +function s.spop(e,tp,eg,ep,ev,re,r,rp,c) local g=e:GetLabelObject() Duel.Remove(g,POS_FACEUP,REASON_SPSUMMON) g:DeleteGroup() end -function c31829185.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(31829185,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end end -function c31829185.eqcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(31829185)>0 +function s.eqcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c31829185.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsFaceup() end if chk==0 then return true end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) @@ -74,10 +74,10 @@ function c31829185.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c31829185.eqlimit(e,c) +function s.eqlimit(e,c) return e:GetOwner()==c end -function c31829185.eqop(e,tp,eg,ep,ev,re,r,rp) +function s.eqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end local tc=Duel.GetFirstTarget() @@ -89,7 +89,7 @@ function c31829185.eqop(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(c31829185.eqlimit) + e1:SetValue(s.eqlimit) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_EQUIP) diff --git a/c32472237.lua b/c32472237.lua index fe2dbd3c12..bfdfb4298a 100644 --- a/c32472237.lua +++ b/c32472237.lua @@ -1,41 +1,41 @@ --メタルヴァレット・ドラゴン local s,id,o=GetID() -function c32472237.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(32472237,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,32472237) - e1:SetCondition(c32472237.descon) - e1:SetTarget(c32472237.destg) - e1:SetOperation(c32472237.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c32472237.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c32472237.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c32472237.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local cg=c:GetColumnGroup():Filter(Card.IsControler,nil,1-tp) if chk==0 then return c:IsDestructable() and cg:GetCount()>0 end cg:AddCard(c) Duel.SetOperationInfo(0,CATEGORY_DESTROY,cg,cg:GetCount(),0,0) end -function c32472237.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local cg=c:GetColumnGroup():Filter(Card.IsControler,nil,1-tp) if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 and cg:GetCount()>0 then @@ -43,34 +43,34 @@ function c32472237.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Destroy(cg,REASON_EFFECT) end end -function c32472237.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(32472237,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,32472238) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c32472237.sptg) - e1:SetOperation(c32472237.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c32472237.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(32472237) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c32472237.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c32472237.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c32472237.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c32472237.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c32476603.lua b/c32476603.lua index 4392924b6d..26e76dd1b3 100644 --- a/c32476603.lua +++ b/c32476603.lua @@ -1,41 +1,41 @@ --シルバーヴァレット・ドラゴン local s,id,o=GetID() -function c32476603.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(32476603,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,32476603) - e1:SetCondition(c32476603.descon) - e1:SetTarget(c32476603.destg) - e1:SetOperation(c32476603.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c32476603.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c32476603.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c32476603.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_EXTRA,nil) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) end -function c32476603.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,0,LOCATION_EXTRA) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 and g:GetCount()>0 then Duel.BreakEffect() @@ -48,34 +48,34 @@ function c32476603.desop(e,tp,eg,ep,ev,re,r,rp) Duel.ShuffleExtra(1-tp) end end -function c32476603.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(32476603,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,32476604) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c32476603.sptg) - e1:SetOperation(c32476603.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c32476603.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(32476603) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c32476603.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c32476603.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c32476603.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c32476603.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c34614910.lua b/c34614910.lua index 4a02425287..056daa2be6 100644 --- a/c34614910.lua +++ b/c34614910.lua @@ -1,55 +1,55 @@ --六花精シクラン local s,id,o=GetID() -function c34614910.initial_effect(c) +function s.initial_effect(c) --level local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(34614910,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetRange(LOCATION_MZONE+LOCATION_HAND) - e1:SetCountLimit(1,34614910) - e1:SetCost(c34614910.lvcost) - e1:SetTarget(c34614910.lvtg) - e1:SetOperation(c34614910.lvop) + e1:SetCountLimit(1,id) + e1:SetCost(s.lvcost) + e1:SetTarget(s.lvtg) + e1:SetOperation(s.lvop) c:RegisterEffect(e1) --spsummon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c34614910.regcon) - e2:SetOperation(c34614910.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(34614910,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,34614911) - e3:SetCondition(c34614910.spcon) - e3:SetTarget(c34614910.sptg) - e3:SetOperation(c34614910.spop) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c34614910.lvfilter(c) +function s.lvfilter(c) return c:IsFaceup() and c:IsRace(RACE_PLANT) and c:IsLevelAbove(3) end -function c34614910.lvcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.lvcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsReleasable() end Duel.Release(e:GetHandler(),REASON_COST) end -function c34614910.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c34614910.lvfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c34614910.lvfilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end +function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.lvfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.lvfilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) - Duel.SelectTarget(tp,c34614910.lvfilter,tp,LOCATION_MZONE,0,1,2,nil) + Duel.SelectTarget(tp,s.lvfilter,tp,LOCATION_MZONE,0,1,2,nil) end -function c34614910.cfilter(c,e) +function s.cfilter(c,e) return c:IsFaceup() and c:IsRelateToEffect(e) end -function c34614910.lvop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c34614910.cfilter,nil,e) +function s.lvop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(s.cfilter,nil,e) local tc=g:GetFirst() while tc do local e1=Effect.CreateEffect(e:GetHandler()) @@ -62,22 +62,22 @@ function c34614910.lvop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function c34614910.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsReason(REASON_RELEASE) end -function c34614910.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(34614910,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c34614910.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(34614910)>0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c34614910.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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,tp,LOCATION_GRAVE) end -function c34614910.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c34796454.lua b/c34796454.lua index 0c53a7fa98..996ccb11fa 100644 --- a/c34796454.lua +++ b/c34796454.lua @@ -1,36 +1,36 @@ --三連星のトリオン local s,id,o=GetID() -function c34796454.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c34796454.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) end -function c34796454.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_SUMMON) and c:IsReason(REASON_MATERIAL) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(34796454,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c34796454.sptg) - e1:SetOperation(c34796454.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c34796454.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c34796454.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if not e:GetHandler():IsRelateToEffect(e) then return end Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c35770983.lua b/c35770983.lua index dc24bcb012..3b2047ed96 100644 --- a/c35770983.lua +++ b/c35770983.lua @@ -1,49 +1,49 @@ --ダイナレスラー・マーシャルアンキロ local s,id,o=GetID() -function c35770983.initial_effect(c) +function s.initial_effect(c) --atk local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(35770983,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_ATKCHANGE) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND+LOCATION_MZONE) - e1:SetCondition(c35770983.atkcon) - e1:SetCost(c35770983.atkcost) - e1:SetOperation(c35770983.atkop) + e1:SetCondition(s.atkcon) + e1:SetCost(s.atkcost) + e1:SetOperation(s.atkop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c35770983.regcon) - e2:SetOperation(c35770983.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(35770983,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,35770983) - e3:SetCondition(c35770983.spcon) - e3:SetTarget(c35770983.sptg) - e3:SetOperation(c35770983.spop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c35770983.atkcon(e,tp,eg,ep,ev,re,r,rp) +function s.atkcon(e,tp,eg,ep,ev,re,r,rp) local a=Duel.GetAttacker() local d=Duel.GetAttackTarget() if not a or not d then return false end if a:IsControler(1-tp) then a,d=d,a end return a~=e:GetHandler() and a:IsFaceup() and a:IsSetCard(0x11a) and a:IsRelateToBattle() and d:IsFaceup() and d:IsRelateToBattle() end -function c35770983.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end Duel.SendtoGrave(e:GetHandler(),REASON_COST) end -function c35770983.atkop(e,tp,eg,ep,ev,re,r,rp) +function s.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local a=Duel.GetAttacker() local d=Duel.GetAttackTarget() @@ -59,12 +59,12 @@ function c35770983.atkop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_DAMAGE_STEP_END) - e2:SetOperation(c35770983.atkop2) + e2:SetOperation(s.atkop2) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE) d:RegisterEffect(e2) end end -function c35770983.atkop2(e,tp,eg,ep,ev,re,r,rp) +function s.atkop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToBattle() then local e1=Effect.CreateEffect(c) @@ -75,22 +75,22 @@ function c35770983.atkop2(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e1) end end -function c35770983.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) end -function c35770983.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(35770983,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c35770983.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(35770983)>0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c35770983.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c35770983.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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 then local e1=Effect.CreateEffect(c) diff --git a/c36687247.lua b/c36687247.lua index 315c7adb1c..acdb32c319 100644 --- a/c36687247.lua +++ b/c36687247.lua @@ -1,13 +1,13 @@ --TG ラッシュ・ライノ local s,id,o=GetID() -function c36687247.initial_effect(c) +function s.initial_effect(c) --atkup local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetRange(LOCATION_MZONE) - e1:SetCondition(c36687247.atcon) + e1:SetCondition(s.atcon) e1:SetValue(400) c:RegisterEffect(e1) --to grave @@ -15,39 +15,39 @@ function c36687247.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c36687247.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c36687247.atcon(e) +function s.atcon(e) local ph=Duel.GetCurrentPhase() return (ph==PHASE_DAMAGE or ph==PHASE_DAMAGE_CAL) and e:GetHandler()==Duel.GetAttacker() end -function c36687247.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(36687247,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c36687247.thtg) - e1:SetOperation(c36687247.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c36687247.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(36687247) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c36687247.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c36687247.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c36687247.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c36687247.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c37021315.lua b/c37021315.lua index 6b031c778c..154da9d2e4 100644 --- a/c37021315.lua +++ b/c37021315.lua @@ -1,6 +1,6 @@ --泥岩の霊長－マンドストロング local s,id,o=GetID() -function c37021315.initial_effect(c) +function s.initial_effect(c) --set local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -12,50 +12,50 @@ function c37021315.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c37021315.regcon) - e2:SetOperation(c37021315.regop) + e2:SetCondition(s.regcon) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(37021315,0)) + e3:SetDescription(aux.Stringid(id,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,37021315) - e3:SetCondition(c37021315.spcon) - e3:SetTarget(c37021315.sptg) - e3:SetOperation(c37021315.spop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.spcon) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c37021315.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_DESTROY) and c:IsReason(REASON_EFFECT) and c:IsPreviousControler(tp) and rp==1-tp end -function c37021315.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(37021315,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c37021315.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(37021315)>0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c37021315.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function c37021315.cfilter(c) - return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(37021315) +function s.cfilter(c) + return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(id) end -function c37021315.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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.IsExistingMatchingCard(aux.NecroValleyFilter(c37021315.cfilter),tp,LOCATION_GRAVE,0,1,nil) - and Duel.SelectYesNo(tp,aux.Stringid(37021315,1)) then + and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(s.cfilter),tp,LOCATION_GRAVE,0,1,nil) + and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c37021315.cfilter),tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.cfilter),tp,LOCATION_GRAVE,0,1,1,nil) Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) end diff --git a/c42149850.lua b/c42149850.lua index 1ace7a71e6..475035f461 100644 --- a/c42149850.lua +++ b/c42149850.lua @@ -1,38 +1,38 @@ --使い捨て学習装置 local s,id,o=GetID() -function c42149850.initial_effect(c) +function s.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET) - e1:SetTarget(c42149850.target) - e1:SetOperation(c42149850.operation) + e1:SetTarget(s.target) + e1:SetOperation(s.operation) c:RegisterEffect(e1) --atk up local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_EQUIP) e2:SetCode(EFFECT_UPDATE_ATTACK) - e2:SetValue(c42149850.atkval) + e2:SetValue(s.atkval) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetCondition(c42149850.regcon) - e3:SetOperation(c42149850.regop) + e3:SetCondition(s.regcon) + e3:SetOperation(s.regop) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(42149850,0)) + e4:SetDescription(aux.Stringid(id,0)) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,42149850) - e4:SetCondition(c42149850.setcon) - e4:SetTarget(c42149850.settg) - e4:SetOperation(c42149850.setop) + e4:SetCountLimit(1,id) + e4:SetCondition(s.setcon) + e4:SetTarget(s.settg) + e4:SetOperation(s.setop) c:RegisterEffect(e4) --equip limit local e5=Effect.CreateEffect(c) @@ -42,37 +42,37 @@ function c42149850.initial_effect(c) e5:SetValue(1) c:RegisterEffect(e5) end -function c42149850.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) end -function c42149850.operation(e,tp,eg,ep,ev,re,r,rp) +function s.operation(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,e:GetHandler(),tc) end end -function c42149850.atkval(e,c) +function s.atkval(e,c) return Duel.GetMatchingGroupCount(Card.IsType,e:GetHandler():GetControler(),LOCATION_GRAVE,0,nil,TYPE_MONSTER)*200 end -function c42149850.regcon(e,tp,eg,ep,ev,re,r,rp) +function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) end -function c42149850.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(42149850,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c42149850.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(42149850)>0 +function s.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c42149850.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function c42149850.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SSet(tp,c)~=0 then diff --git a/c43586926.lua b/c43586926.lua index 9f5ab698d1..1ec836d70f 100644 --- a/c43586926.lua +++ b/c43586926.lua @@ -1,36 +1,36 @@ --ドル・ドラ local s,id,o=GetID() -function c43586926.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c43586926.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) end -function c43586926.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(43586926,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetRange(LOCATION_GRAVE) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,43586926+EFFECT_COUNT_CODE_DUEL) - e1:SetTarget(c43586926.sptg) - e1:SetOperation(c43586926.spop) + e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_DUEL) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c43586926.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function c43586926.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) then local e1=Effect.CreateEffect(c) diff --git a/c48633301.lua b/c48633301.lua index 5336cbd909..91a64eee33 100644 --- a/c48633301.lua +++ b/c48633301.lua @@ -1,58 +1,58 @@ --TG ブースター・ラプトル local s,id,o=GetID() -function c48633301.initial_effect(c) +function s.initial_effect(c) --special summon rule local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,48633301+EFFECT_COUNT_CODE_OATH) - e1:SetCondition(c48633301.sprcon) + e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH) + e1:SetCondition(s.sprcon) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c48633301.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c48633301.sprfilter(c) +function s.sprfilter(c) return c:IsFaceup() and c:IsSetCard(0x27) end -function c48633301.sprcon(e,c) +function s.sprcon(e,c) if c==nil then return true end local tp=c:GetControler() return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c48633301.sprfilter,tp,LOCATION_MZONE,0,1,nil) + and Duel.IsExistingMatchingCard(s.sprfilter,tp,LOCATION_MZONE,0,1,nil) end -function c48633301.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(48633301,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c48633301.thtg) - e1:SetOperation(c48633301.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c48633301.thfilter(c) - return c:IsSetCard(0x27) and not c:IsCode(48633301) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.thfilter(c) + return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c48633301.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c48633301.thfilter,tp,LOCATION_DECK,0,1,nil) 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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c48633301.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c48633301.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c5087128.lua b/c5087128.lua index a360caa68f..896d06e064 100644 --- a/c5087128.lua +++ b/c5087128.lua @@ -1,52 +1,52 @@ --シェルヴァレット・ドラゴン local s,id,o=GetID() -function c5087128.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(5087128,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,5087128) - e1:SetCondition(c5087128.descon) - e1:SetTarget(c5087128.destg) - e1:SetOperation(c5087128.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c5087128.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c5087128.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c5087128.desfilter(c,g) +function s.desfilter(c,g) return g:IsContains(c) end -function c5087128.desfilter2(c,s,tp) +function s.desfilter2(c,s,tp) local seq=c:GetSequence() return seq<5 and math.abs(seq-s)==1 and c:IsControler(tp) end -function c5087128.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() - local g=Duel.GetMatchingGroup(c5087128.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c:GetColumnGroup()) + local g=Duel.GetMatchingGroup(s.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c:GetColumnGroup()) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function c5087128.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local lg=c:GetColumnGroup() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then - local g=Duel.GetMatchingGroup(c5087128.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,lg) + local g=Duel.GetMatchingGroup(s.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,lg) if g:GetCount()==0 then return end Duel.BreakEffect() local tc=nil @@ -58,40 +58,40 @@ function c5087128.desop(e,tp,eg,ep,ev,re,r,rp) end local seq=tc:GetSequence() local dg=Group.CreateGroup() - if seq<5 then dg=Duel.GetMatchingGroup(c5087128.desfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,seq,tc:GetControler()) end + if seq<5 then dg=Duel.GetMatchingGroup(s.desfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,seq,tc:GetControler()) end if Duel.Destroy(tc,REASON_EFFECT)~=0 and dg:GetCount()>0 then Duel.Destroy(dg,REASON_EFFECT) end end end -function c5087128.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(5087128,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,5087129) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c5087128.sptg) - e1:SetOperation(c5087128.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c5087128.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(5087128) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c5087128.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c5087128.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c5087128.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c5087128.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c53266486.lua b/c53266486.lua index 065e6ab1ee..8ac4278cf2 100644 --- a/c53266486.lua +++ b/c53266486.lua @@ -1,40 +1,40 @@ --アネスヴァレット・ドラゴン local s,id,o=GetID() -function c53266486.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(53266486,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,53266486) - e1:SetCondition(c53266486.descon) - e1:SetTarget(c53266486.destg) - e1:SetOperation(c53266486.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c53266486.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c53266486.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c53266486.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDestructable() and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) end -function c53266486.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil) @@ -61,34 +61,34 @@ function c53266486.desop(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e4) end end -function c53266486.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(53266486,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,53266487) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c53266486.sptg) - e1:SetOperation(c53266486.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c53266486.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(53266486) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c53266486.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c53266486.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c53266486.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c53266486.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c55610595.lua b/c55610595.lua index ee8ff92525..196e63ebdc 100644 --- a/c55610595.lua +++ b/c55610595.lua @@ -1,26 +1,26 @@ --BF－上弦のピナーカ local s,id,o=GetID() -function c55610595.initial_effect(c) +function s.initial_effect(c) --synchro limit local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) - e1:SetValue(c55610595.synlimit) + e1:SetValue(s.synlimit) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c55610595.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c55610595.synlimit(e,c) +function s.synlimit(e,c) if not c then return false end return not c:IsSetCard(0x33) end -function c55610595.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) @@ -28,23 +28,23 @@ function c55610595.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,55610595) - e1:SetTarget(c55610595.thtg) - e1:SetOperation(c55610595.thop) + e1:SetCountLimit(1,id) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c55610595.filter(c) - return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and not c:IsCode(55610595) and c:IsAbleToHand() +function s.filter(c) + return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and not c:IsCode(id) and c:IsAbleToHand() end -function c55610595.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c55610595.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c55610595.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c55610595.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c63009228.lua b/c63009228.lua index 207414ddc4..acdf3bc6c0 100644 --- a/c63009228.lua +++ b/c63009228.lua @@ -1,41 +1,41 @@ --レスキュー・インターレーサー local s,id,o=GetID() -function c63009228.initial_effect(c) +function s.initial_effect(c) --Damage to 0 local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(63009228,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,63009228) - e1:SetCondition(c63009228.dmcon) - e1:SetCost(c63009228.dmcost) - e1:SetOperation(c63009228.dmop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.dmcon) + e1:SetCost(s.dmcost) + e1:SetOperation(s.dmop) c:RegisterEffect(e1) --revive local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(63009228,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(c63009228.sumcon) - e2:SetTarget(c63009228.sumtg) - e2:SetOperation(c63009228.sumop) + e2:SetCondition(s.sumcon) + e2:SetTarget(s.sumtg) + e2:SetOperation(s.sumop) c:RegisterEffect(e2) end -function c63009228.dmcon(e,tp,eg,ep,ev,re,r,rp) +function s.dmcon(e,tp,eg,ep,ev,re,r,rp) local d=Duel.GetAttackTarget() return d and d:IsControler(tp) and d:IsRace(RACE_CYBERSE) and Duel.GetBattleDamage(tp)>0 end -function c63009228.dmcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.dmcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDiscardable() end Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD) - c:RegisterFlagEffect(63009228,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c63009228.dmop(e,tp,eg,ep,ev,re,r,rp) +function s.dmop(e,tp,eg,ep,ev,re,r,rp) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE) @@ -44,14 +44,14 @@ function c63009228.dmop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_PHASE+PHASE_DAMAGE) Duel.RegisterEffect(e1,tp) end -function c63009228.sumcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(63009228)>0 +function s.sumcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c63009228.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function c63009228.sumop(e,tp,eg,ep,ev,re,r,rp) +function s.sumop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c64910482.lua b/c64910482.lua index aff58c04f9..b68c823db0 100644 --- a/c64910482.lua +++ b/c64910482.lua @@ -1,51 +1,51 @@ --TG サイバー・マジシャン local s,id,o=GetID() -function c64910482.initial_effect(c) +function s.initial_effect(c) --synchro custom local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_SYNCHRO_MATERIAL_CUSTOM) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) - e1:SetTarget(c64910482.syntg) + e1:SetTarget(s.syntg) e1:SetValue(1) - e1:SetOperation(c64910482.synop) + e1:SetOperation(s.synop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c64910482.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) --hand synchro local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e3:SetCode(EFFECT_HAND_SYNCHRO) - e3:SetTarget(c64910482.hsyntg) + e3:SetTarget(s.hsyntg) c:RegisterEffect(e3) end -function c64910482.synfilter1(c,syncard,tuner,f) +function s.synfilter1(c,syncard,tuner,f) return c:IsFaceupEx() and c:IsCanBeSynchroMaterial(syncard,tuner) and (f==nil or f(c,syncard)) end -function c64910482.synfilter2(c,syncard,tuner,f) +function s.synfilter2(c,syncard,tuner,f) return c:IsSetCard(0x27) and c:IsNotTuner(syncard) and c:IsCanBeSynchroMaterial(syncard,tuner) and (f==nil or f(c,syncard)) end -function c64910482.syncheck(c,g,mg,tp,lv,syncard,minc,maxc) +function s.syncheck(c,g,mg,tp,lv,syncard,minc,maxc) g:AddCard(c) local ct=g:GetCount() - local res=c64910482.syngoal(g,tp,lv,syncard,minc,ct) - or (ct=minc and g:CheckWithSumEqual(Card.GetSynchroLevel,lv,ct,ct,syncard) and Duel.GetLocationCountFromEx(tp,tp,g,syncard)>0 and aux.MustMaterialCheck(g,tp,EFFECT_MUST_BE_SMATERIAL) end -function c64910482.syntg(e,syncard,f,min,max) +function s.syntg(e,syncard,f,min,max) local minc=min+1 local maxc=max+1 local c=e:GetHandler() @@ -53,29 +53,29 @@ function c64910482.syntg(e,syncard,f,min,max) local lv=syncard:GetLevel() if lv<=c:GetLevel() then return false end local g=Group.FromCards(c) - local mg=Duel.GetSynchroMaterial(tp):Filter(c64910482.synfilter1,c,syncard,c,f) + local mg=Duel.GetSynchroMaterial(tp):Filter(s.synfilter1,c,syncard,c,f) if syncard:IsSetCard(0x27) then - local exg=Duel.GetMatchingGroup(c64910482.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) + local exg=Duel.GetMatchingGroup(s.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) mg:Merge(exg) end - return mg:IsExists(c64910482.syncheck,1,g,g,mg,tp,lv,syncard,minc,maxc) + return mg:IsExists(s.syncheck,1,g,g,mg,tp,lv,syncard,minc,maxc) end -function c64910482.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) +function s.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) local minc=min+1 local maxc=max+1 local c=e:GetHandler() local lv=syncard:GetLevel() local g=Group.FromCards(c) - local mg=Duel.GetSynchroMaterial(tp):Filter(c64910482.synfilter1,c,syncard,c,f) + local mg=Duel.GetSynchroMaterial(tp):Filter(s.synfilter1,c,syncard,c,f) if syncard:IsSetCard(0x27) then - local exg=Duel.GetMatchingGroup(c64910482.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) + local exg=Duel.GetMatchingGroup(s.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) mg:Merge(exg) end for i=1,maxc do - local cg=mg:Filter(c64910482.syncheck,g,g,mg,tp,lv,syncard,minc,maxc) + local cg=mg:Filter(s.syncheck,g,g,mg,tp,lv,syncard,minc,maxc) if cg:GetCount()==0 then break end local minct=1 - if c64910482.syngoal(g,tp,lv,syncard,minc,i) then + if s.syngoal(g,tp,lv,syncard,minc,i) then minct=0 end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL) @@ -85,37 +85,37 @@ function c64910482.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) end Duel.SetSynchroMaterial(g) end -function c64910482.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(64910482,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c64910482.thtg) - e1:SetOperation(c64910482.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c64910482.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(64910482) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function s.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function c64910482.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c64910482.filter,tp,LOCATION_DECK,0,1,nil) end +function s.thtg(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 Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c64910482.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c64910482.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.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 c64910482.hsyntg(e,c,syncard) +function s.hsyntg(e,c,syncard) return c:IsSetCard(0x27) and c:IsNotTuner(syncard) end diff --git a/c71861848.lua b/c71861848.lua index bf8e471fcd..d2eb4e6f8a 100644 --- a/c71861848.lua +++ b/c71861848.lua @@ -1,76 +1,76 @@ --転生炎獣コヨーテ local s,id,o=GetID() -function c71861848.initial_effect(c) +function s.initial_effect(c) --register effect local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_BE_MATERIAL) - e1:SetOperation(c71861848.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(71861848,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,71861848) - e2:SetCondition(c71861848.condition) - e2:SetTarget(c71861848.sptg) - e2:SetOperation(c71861848.spop) + e2:SetCountLimit(1,id) + e2:SetCondition(s.condition) + e2:SetTarget(s.sptg) + e2:SetOperation(s.spop) c:RegisterEffect(e2) --to hand local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(71861848,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCategory(CATEGORY_TOHAND) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,71861848) - e3:SetCondition(c71861848.condition) - e3:SetTarget(c71861848.thtg) - e3:SetOperation(c71861848.thop) + e3:SetCountLimit(1,id) + e3:SetCondition(s.condition) + e3:SetTarget(s.thtg) + e3:SetOperation(s.thop) c:RegisterEffect(e3) end -function c71861848.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) if r==REASON_LINK then - e:GetHandler():RegisterFlagEffect(71861848,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end end -function c71861848.condition(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(71861848)>0 +function s.condition(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c71861848.spfilter(c,e,tp) - return c:IsSetCard(0x119) and not c:IsCode(71861848) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x119) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) end -function c71861848.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c71861848.spfilter(chkc,e,tp) end +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(c71861848.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,c71861848.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function c71861848.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) end end -function c71861848.thfilter(c) - return c:IsSetCard(0x119) and c:IsAbleToHand() and not c:IsCode(71861848) +function s.thfilter(c) + return c:IsSetCard(0x119) and c:IsAbleToHand() and not c:IsCode(id) end -function c71861848.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c71861848.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(c71861848.thfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,c71861848.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function c71861848.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c77121851.lua b/c77121851.lua index 29ea6cbdbf..029a2b418c 100644 --- a/c77121851.lua +++ b/c77121851.lua @@ -1,51 +1,51 @@ --暗黒のマンティコア local s,id,o=GetID() -function c77121851.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c77121851.tgop) + e1:SetOperation(s.tgop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(77121851,0)) + e2:SetDescription(aux.Stringid(id,0)) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(c77121851.spcon) - e2:SetCost(c77121851.spcost) - e2:SetTarget(c77121851.sptg) - e2:SetOperation(c77121851.spop) + e2:SetCondition(s.spcon) + e2:SetCost(s.spcost) + e2:SetTarget(s.sptg) + e2:SetOperation(s.spop) c:RegisterEffect(e2) end -function c77121851.tgop(e,tp,eg,ep,ev,re,r,rp) +function s.tgop(e,tp,eg,ep,ev,re,r,rp) if bit.band(r,REASON_RETURN+REASON_ADJUST)~=0 then return end - e:GetHandler():RegisterFlagEffect(77121851,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c77121851.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(77121851)~=0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)~=0 end -function c77121851.costfilter(c) +function s.costfilter(c) return c:IsRace(RACE_BEAST+RACE_BEASTWARRIOR+RACE_WINDBEAST) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsAbleToGraveAsCost() end -function c77121851.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local loc=LOCATION_HAND+LOCATION_MZONE if ft<1 then loc=LOCATION_MZONE end - if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(c77121851.costfilter,tp,loc,0,1,nil) end + if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(s.costfilter,tp,loc,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) - local g=Duel.SelectMatchingCard(tp,c77121851.costfilter,tp,loc,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,loc,0,1,1,nil) Duel.SendtoGrave(g,REASON_COST) end -function c77121851.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function c77121851.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) diff --git a/c80250185.lua b/c80250185.lua index 36dfdd1ec1..26b95c1044 100644 --- a/c80250185.lua +++ b/c80250185.lua @@ -1,41 +1,41 @@ --オートヴァレット・ドラゴン local s,id,o=GetID() -function c80250185.initial_effect(c) +function s.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(80250185,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,80250185) - e1:SetCondition(c80250185.descon) - e1:SetTarget(c80250185.destg) - e1:SetOperation(c80250185.desop) + e1:SetCountLimit(1,id) + e1:SetCondition(s.descon) + e1:SetTarget(s.destg) + e1:SetOperation(s.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c80250185.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) end -function c80250185.descon(e,tp,eg,ep,ev,re,r,rp) +function s.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function c80250185.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,TYPE_SPELL+TYPE_TRAP) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function c80250185.desop(e,tp,eg,ep,ev,re,r,rp) +function s.desop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 then local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,TYPE_SPELL+TYPE_TRAP) if g:GetCount()==0 then return end @@ -45,34 +45,34 @@ function c80250185.desop(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoGrave(sg,REASON_EFFECT) end end -function c80250185.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(80250185,1)) + e1:SetDescription(aux.Stringid(id,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,80250186) + e1:SetCountLimit(1,id+o) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c80250185.sptg) - e1:SetOperation(c80250185.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c80250185.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(80250185) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c80250185.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c80250185.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c80250185.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c80250185.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 diff --git a/c84121193.lua b/c84121193.lua index 19923af1bc..1865cd1e1e 100644 --- a/c84121193.lua +++ b/c84121193.lua @@ -1,44 +1,44 @@ --コードブレイカー・ウイルスソードマン local s,id,o=GetID() -function c84121193.initial_effect(c) +function s.initial_effect(c) --link summon aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2) c:EnableReviveLimit() --spsummon1 local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(84121193,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCountLimit(1,84121193) - e1:SetCost(c84121193.spcon1) - e1:SetTarget(c84121193.sptg1) - e1:SetOperation(c84121193.spop1) + e1:SetCountLimit(1,id) + e1:SetCost(s.spcon1) + e1:SetTarget(s.sptg1) + e1:SetOperation(s.spop1) c:RegisterEffect(e1) --spsummon2 local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(c84121193.regcon1) - e2:SetOperation(c84121193.regop1) + e2:SetCondition(s.regcon1) + e2:SetOperation(s.regop1) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(84121193,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,84121194) - e3:SetCondition(c84121193.spcon2) - e3:SetTarget(c84121193.sptg2) - e3:SetOperation(c84121193.spop2) + e3:SetCountLimit(1,id+o) + e3:SetCondition(s.spcon2) + e3:SetTarget(s.sptg2) + e3:SetOperation(s.spop2) c:RegisterEffect(e3) end -function c84121193.spcon1(e,tp,eg,ep,ev,re,r,rp) +function s.spcon1(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetMutualLinkedGroupCount()>0 end -function c84121193.spfilter(c,e,tp) +function s.spfilter(c,e,tp) if not c:IsCode(8662794) then return false end local ok=false for p=0,1 do @@ -48,12 +48,12 @@ function c84121193.spfilter(c,e,tp) end return ok end -function c84121193.sptg1(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsRelateToEffect(e) - and Duel.IsExistingMatchingCard(c84121193.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE) end -function c84121193.spop1(e,tp,eg,ep,ev,re,r,rp) +function s.spop1(e,tp,eg,ep,ev,re,r,rp) local zone={} local flag={} for p=0,1 do @@ -65,7 +65,7 @@ function c84121193.spop1(e,tp,eg,ep,ev,re,r,rp) local ft2=Duel.GetLocationCount(1,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone[1]) if ft1+ft2<=0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c84121193.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp) if g:GetCount()>0 then local tc=g:GetFirst() if tc then @@ -88,23 +88,23 @@ function c84121193.spop1(e,tp,eg,ep,ev,re,r,rp) end end end -function c84121193.regcon1(e,tp,eg,ep,ev,re,r,rp) +function s.regcon1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsReason(REASON_DESTROY) and rp==1-tp and c:IsPreviousControler(tp) end -function c84121193.regop1(e,tp,eg,ep,ev,re,r,rp) +function s.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(84121193,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end -function c84121193.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(84121193)>0 +function s.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)>0 end -function c84121193.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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,tp,LOCATION_GRAVE) end -function c84121193.spop2(e,tp,eg,ep,ev,re,r,rp) +function s.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c88753985.lua b/c88753985.lua index 0c3496e12d..7409326395 100644 --- a/c88753985.lua +++ b/c88753985.lua @@ -1,12 +1,12 @@ --きつね火 local s,id,o=GetID() -function c88753985.initial_effect(c) +function s.initial_effect(c) --register local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_BATTLE_DESTROYED) - e1:SetOperation(c88753985.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) @@ -16,27 +16,27 @@ function c88753985.initial_effect(c) e2:SetValue(1) c:RegisterEffect(e2) end -function c88753985.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE) and c:IsPreviousPosition(POS_FACEUP) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(88753985,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c88753985.sptg) - e1:SetOperation(c88753985.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c88753985.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function c88753985.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) diff --git a/c93483212.lua b/c93483212.lua index d58fcad799..e8bff2e10c 100644 --- a/c93483212.lua +++ b/c93483212.lua @@ -1,52 +1,52 @@ --極神聖帝オーディン local s,id,o=GetID() -function c93483212.initial_effect(c) +function s.initial_effect(c) --synchro summon - aux.AddSynchroProcedure(c,c93483212.tfilter,aux.NonTuner(nil),2) + aux.AddSynchroProcedure(c,s.tfilter,aux.NonTuner(nil),2) c:EnableReviveLimit() --disable local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(93483212,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetOperation(c93483212.imop) + e1:SetOperation(s.imop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c93483212.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(93483212,1)) + e3:SetDescription(aux.Stringid(id,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(c93483212.spcon) - e3:SetCost(c93483212.spcost) - e3:SetTarget(c93483212.sptg) - e3:SetOperation(c93483212.spop) + e3:SetCondition(s.spcon) + e3:SetCost(s.spcost) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) --damage local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(93483212,2)) + e4:SetDescription(aux.Stringid(id,2)) e4:SetCategory(CATEGORY_DRAW) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e4:SetCode(EVENT_SPSUMMON_SUCCESS) - e4:SetCondition(c93483212.drcon) - e4:SetTarget(c93483212.drtg) - e4:SetOperation(c93483212.drop) + e4:SetCondition(s.drcon) + e4:SetTarget(s.drtg) + e4:SetOperation(s.drop) c:RegisterEffect(e4) end -function c93483212.tfilter(c) +function s.tfilter(c) return c:IsSetCard(0x3042) or c:IsHasEffect(61777313) end -function c93483212.imop(e,tp,eg,ep,ev,re,r,rp) +function s.imop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsFaceup() and c:IsRelateToEffect(e) then local e1=Effect.CreateEffect(c) @@ -54,55 +54,55 @@ function c93483212.imop(e,tp,eg,ep,ev,re,r,rp) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetRange(LOCATION_MZONE) e1:SetCode(EFFECT_IMMUNE_EFFECT) - e1:SetValue(c93483212.imfilter) + e1:SetValue(s.imfilter) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c93483212.imfilter(e,re) +function s.imfilter(e,re) return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) end -function c93483212.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local pos=c:GetPreviousPosition() if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(93483212,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) end end -function c93483212.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(93483212)~=0 +function s.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(id)~=0 end -function c93483212.cfilter(c) +function s.cfilter(c) return c:IsSetCard(0x3042) and c:IsType(TYPE_TUNER) and c:IsAbleToRemoveAsCost() end -function c93483212.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c93483212.cfilter,tp,LOCATION_GRAVE,0,1,nil) end +function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,c93483212.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function c93483212.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c93483212.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),SUMMON_VALUE_SELF,tp,tp,false,false,POS_FACEUP) end end -function c93483212.drcon(e,tp,eg,ep,ev,re,r,rp) +function s.drcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+SUMMON_VALUE_SELF end -function c93483212.drtg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.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 c93483212.drop(e,tp,eg,ep,ev,re,r,rp) +function s.drop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Draw(p,d,REASON_EFFECT) end diff --git a/c93751476.lua b/c93751476.lua index a42886071b..417fe9bed8 100644 --- a/c93751476.lua +++ b/c93751476.lua @@ -1,69 +1,69 @@ --猛炎星－テンレイ local s,id,o=GetID() -function c93751476.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c93751476.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) --set local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(93751476,1)) + e2:SetDescription(aux.Stringid(id,1)) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetCode(EVENT_BE_MATERIAL) - e2:SetCondition(c93751476.setcon) - e2:SetTarget(c93751476.settg) - e2:SetOperation(c93751476.setop) + e2:SetCondition(s.setcon) + e2:SetTarget(s.settg) + e2:SetOperation(s.setop) c:RegisterEffect(e2) end -function c93751476.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_EFFECT) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(93751476,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c93751476.sptg) - e1:SetOperation(c93751476.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c93751476.spfilter(c,e,tp) - return c:IsSetCard(0x79) and c:IsLevel(4) and not c:IsCode(93751476) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function s.spfilter(c,e,tp) + return c:IsSetCard(0x79) and c:IsLevel(4) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function c93751476.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(c93751476.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function c93751476.spop(e,tp,eg,ep,ev,re,r,rp) +function s.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,c93751476.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,s.spfilter,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 c93751476.setcon(e,tp,eg,ep,ev,re,r,rp) +function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsLocation(LOCATION_GRAVE) and r==REASON_SYNCHRO and e:GetHandler():GetReasonCard():IsSetCard(0x79) end -function c93751476.filter(c) +function s.filter(c) return c:IsSetCard(0x7c) and c:IsType(TYPE_SPELL) and c:IsSSetable() end -function c93751476.settg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c93751476.filter,tp,LOCATION_DECK,0,1,nil) end +function s.settg(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 end -function c93751476.setop(e,tp,eg,ep,ev,re,r,rp) +function s.setop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) - local g=Duel.SelectMatchingCard(tp,c93751476.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SSet(tp,g:GetFirst()) end diff --git a/c95816395.lua b/c95816395.lua index 732ecd374d..87a195f94b 100644 --- a/c95816395.lua +++ b/c95816395.lua @@ -1,44 +1,44 @@ --どぐう local s,id,o=GetID() -function c95816395.initial_effect(c) +function s.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(c95816395.regop) + e1:SetOperation(s.regop) c:RegisterEffect(e1) end -function c95816395.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if rp==1-tp and c:IsReason(REASON_EFFECT) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(95816395,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,95816395) + e1:SetCountLimit(1,id) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c95816395.thtg) - e1:SetOperation(c95816395.thop) + e1:SetTarget(s.thtg) + e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c95816395.filter(c,tp) +function s.filter(c,tp) return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() - and not Duel.IsExistingMatchingCard(c95816395.cfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,c:GetLevel()) + and not Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,c:GetLevel()) end -function c95816395.cfilter(c,lv) +function s.cfilter(c,lv) return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsLevel(lv) end -function c95816395.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(c95816395.filter,tp,LOCATION_DECK,0,1,nil,tp) end +function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil,tp) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function c95816395.thop(e,tp,eg,ep,ev,re,r,rp) +function s.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,c95816395.filter,tp,LOCATION_DECK,0,1,1,nil,tp) + local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil,tp) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c9791914.lua b/c9791914.lua index 4a266d83c9..115b7d514e 100644 --- a/c9791914.lua +++ b/c9791914.lua @@ -1,6 +1,6 @@ --白銀のスナイパー local s,id,o=GetID() -function c9791914.initial_effect(c) +function s.initial_effect(c) --Negate local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -12,36 +12,36 @@ function c9791914.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(c9791914.regop) + e2:SetOperation(s.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(9791914,0)) + e3:SetDescription(aux.Stringid(id,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetTarget(c9791914.sptg) - e3:SetOperation(c9791914.spop) + e3:SetTarget(s.sptg) + e3:SetOperation(s.spop) c:RegisterEffect(e3) end -function c9791914.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_SZONE) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_EFFECT) and c:IsReason(REASON_DESTROY) and rp==1-tp then - c:RegisterFlagEffect(9791914,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,0) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,0) end end -function c9791914.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) end - if chk==0 then return e:GetHandler():GetFlagEffect(9791914)>0 end + if chk==0 then return e:GetHandler():GetFlagEffect(id)>0 end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local g=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0) end -function c9791914.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then local tc=Duel.GetFirstTarget() if tc and tc:IsRelateToEffect(e) then diff --git a/c99991455.lua b/c99991455.lua index 79c957438e..6f1a611ba1 100644 --- a/c99991455.lua +++ b/c99991455.lua @@ -1,9 +1,9 @@ --覇雷星ライジン local s,id,o=GetID() -function c99991455.initial_effect(c) +function s.initial_effect(c) --fusion material c:EnableReviveLimit() - aux.AddFusionProcFun2(c,c99991455.ffilter1,c99991455.ffilter2,true) + aux.AddFusionProcFun2(c,s.ffilter1,s.ffilter2,true) --pierce local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -13,7 +13,7 @@ function c99991455.initial_effect(c) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE) - e2:SetCondition(c99991455.damcon) + e2:SetCondition(s.damcon) e2:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE)) c:RegisterEffect(e2) --to grave @@ -21,50 +21,50 @@ function c99991455.initial_effect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(c99991455.regop) + e3:SetOperation(s.regop) c:RegisterEffect(e3) end -function c99991455.ffilter1(c) +function s.ffilter1(c) return c:IsLevelAbove(5) and c:IsRace(RACE_WARRIOR) and c:IsFusionAttribute(ATTRIBUTE_LIGHT) end -function c99991455.ffilter2(c) +function s.ffilter2(c) return c:IsRace(RACE_WARRIOR) and c:IsFusionAttribute(ATTRIBUTE_EARTH) end -function c99991455.damcon(e) +function s.damcon(e) local c=e:GetHandler() local bc=c:GetBattleTarget() return bc and not bc:IsLevelAbove(0) end -function c99991455.regop(e,tp,eg,ep,ev,re,r,rp) +function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(99991455,0)) + e1:SetDescription(aux.Stringid(id,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCountLimit(1,99991455) + e1:SetCountLimit(1,id) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(c99991455.sptg) - e1:SetOperation(c99991455.spop) + e1:SetTarget(s.sptg) + e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function c99991455.filter(c,e,tp) +function s.filter(c,e,tp) return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(7) and c:IsRace(RACE_WARRIOR) end -function c99991455.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c99991455.filter(chkc,e,tp) end +function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.filter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>=2 and not Duel.IsPlayerAffectedByEffect(tp,59822133) - and Duel.IsExistingTarget(c99991455.filter,tp,LOCATION_GRAVE,0,2,nil,e,tp) end + and Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,0,2,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,c99991455.filter,tp,LOCATION_GRAVE,0,2,2,nil,e,tp) + local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,0,2,2,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,2,0,0) end -function c99991455.spop(e,tp,eg,ep,ev,re,r,rp) +function s.spop(e,tp,eg,ep,ev,re,r,rp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) if ft<=0 then return end local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e) From 9533b811cac939731ed3cbea111c78ff7c59d606 Mon Sep 17 00:00:00 2001 From: Vury Leo Date: Wed, 10 Sep 2025 00:17:03 +0900 Subject: [PATCH 10/11] Add more cards --- c1315120.lua | 6 ++++++ c14509651.lua | 2 +- c16780318.lua | 6 ++++++ c19337371.lua | 2 +- c1966438.lua | 2 +- c26655293.lua | 6 ++++++ c293542.lua | 6 ++++++ c30604579.lua | 2 +- c31353051.lua | 6 ++++++ c31383545.lua | 6 ++++++ c31829185.lua | 2 +- c32472237.lua | 6 ++++++ c32476603.lua | 6 ++++++ c34614910.lua | 2 +- c34796454.lua | 6 ++++++ c35770983.lua | 2 +- c36687247.lua | 6 ++++++ c37021315.lua | 2 +- c42149850.lua | 2 +- c43586926.lua | 6 ++++++ c47759571.lua | 2 +- c48633301.lua | 6 ++++++ c5087128.lua | 6 ++++++ c53266486.lua | 6 ++++++ c55610595.lua | 6 ++++++ c63009228.lua | 4 +++- c64910482.lua | 6 ++++++ c71861848.lua | 4 ++-- c74820316.lua | 2 +- c77121851.lua | 2 +- c79625003.lua | 2 +- c80250185.lua | 6 ++++++ c84121193.lua | 2 +- c86527709.lua | 6 ++++++ c88753985.lua | 6 ++++++ c93483212.lua | 2 +- c93751476.lua | 6 ++++++ c95816395.lua | 6 ++++++ c9791914.lua | 2 +- c99991455.lua | 6 ++++++ 40 files changed, 153 insertions(+), 19 deletions(-) diff --git a/c1315120.lua b/c1315120.lua index 720facbdd7..98d223efa5 100644 --- a/c1315120.lua +++ b/c1315120.lua @@ -37,6 +37,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c14509651.lua b/c14509651.lua index 80bec3f536..16627227c0 100644 --- a/c14509651.lua +++ b/c14509651.lua @@ -67,7 +67,7 @@ function s.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.spcon2(e,tp,eg,ep,ev,re,r,rp) diff --git a/c16780318.lua b/c16780318.lua index 8f299e254e..e1ae047ccd 100644 --- a/c16780318.lua +++ b/c16780318.lua @@ -81,6 +81,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end function s.thfilter(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand() diff --git a/c19337371.lua b/c19337371.lua index c7bb02a73b..9a673cef7d 100644 --- a/c19337371.lua +++ b/c19337371.lua @@ -49,7 +49,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_HAND+LOCATION_ONFIELD) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thfilter(c) return c:IsSetCard(0x64) and c:IsAbleToHand() diff --git a/c1966438.lua b/c1966438.lua index ec9a6e1c80..29b6a07dfe 100644 --- a/c1966438.lua +++ b/c1966438.lua @@ -60,7 +60,7 @@ function s.regcon1(e,tp,eg,ep,ev,re,r,rp) end function s.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcfilter(c,tp) return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_ONFIELD) diff --git a/c26655293.lua b/c26655293.lua index 8993a44f9e..3bb857916b 100644 --- a/c26655293.lua +++ b/c26655293.lua @@ -59,6 +59,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c293542.lua b/c293542.lua index 8c7447e66a..78d083f89f 100644 --- a/c293542.lua +++ b/c293542.lua @@ -50,6 +50,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c30604579.lua b/c30604579.lua index b29ae0f447..2fbe7677cf 100644 --- a/c30604579.lua +++ b/c30604579.lua @@ -75,7 +75,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.spcon(e,tp,eg,ep,ev,re,r,rp) diff --git a/c31353051.lua b/c31353051.lua index 7d4e56f384..a3f6f23533 100644 --- a/c31353051.lua +++ b/c31353051.lua @@ -57,6 +57,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c31383545.lua b/c31383545.lua index 06df13578e..e6f9418e6e 100644 --- a/c31383545.lua +++ b/c31383545.lua @@ -23,6 +23,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c31829185.lua b/c31829185.lua index 6485a7d854..c7fef67c0e 100644 --- a/c31829185.lua +++ b/c31829185.lua @@ -59,7 +59,7 @@ function s.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.eqcon(e,tp,eg,ep,ev,re,r,rp) diff --git a/c32472237.lua b/c32472237.lua index bfdfb4298a..c3ea365b81 100644 --- a/c32472237.lua +++ b/c32472237.lua @@ -57,6 +57,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c32476603.lua b/c32476603.lua index 26e76dd1b3..c6889455aa 100644 --- a/c32476603.lua +++ b/c32476603.lua @@ -62,6 +62,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c34614910.lua b/c34614910.lua index 056daa2be6..a22de5797b 100644 --- a/c34614910.lua +++ b/c34614910.lua @@ -67,7 +67,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c34796454.lua b/c34796454.lua index 996ccb11fa..53d4c0815a 100644 --- a/c34796454.lua +++ b/c34796454.lua @@ -23,6 +23,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) diff --git a/c35770983.lua b/c35770983.lua index 3b2047ed96..0bbe2acfdb 100644 --- a/c35770983.lua +++ b/c35770983.lua @@ -80,7 +80,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c36687247.lua b/c36687247.lua index acdb32c319..fe463648e6 100644 --- a/c36687247.lua +++ b/c36687247.lua @@ -36,6 +36,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c37021315.lua b/c37021315.lua index 154da9d2e4..f7fac8550f 100644 --- a/c37021315.lua +++ b/c37021315.lua @@ -34,7 +34,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c42149850.lua b/c42149850.lua index 475035f461..63187a57e6 100644 --- a/c42149850.lua +++ b/c42149850.lua @@ -63,7 +63,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c43586926.lua b/c43586926.lua index 1ec836d70f..f81c0bb638 100644 --- a/c43586926.lua +++ b/c43586926.lua @@ -24,6 +24,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) diff --git a/c47759571.lua b/c47759571.lua index 4d10689368..a26d9be314 100644 --- a/c47759571.lua +++ b/c47759571.lua @@ -84,7 +84,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsReason(REASON_BATTLE+REASON_EFFECT) and e:GetHandler():IsReason(REASON_DESTROY) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c48633301.lua b/c48633301.lua index 91a64eee33..4eac64153d 100644 --- a/c48633301.lua +++ b/c48633301.lua @@ -41,6 +41,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.thfilter(c) diff --git a/c5087128.lua b/c5087128.lua index 896d06e064..e9bb71a539 100644 --- a/c5087128.lua +++ b/c5087128.lua @@ -78,6 +78,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c53266486.lua b/c53266486.lua index 8ac4278cf2..1626c69508 100644 --- a/c53266486.lua +++ b/c53266486.lua @@ -75,6 +75,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c55610595.lua b/c55610595.lua index 196e63ebdc..c9e65af78c 100644 --- a/c55610595.lua +++ b/c55610595.lua @@ -33,6 +33,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c63009228.lua b/c63009228.lua index acdf3bc6c0..d1a5944960 100644 --- a/c63009228.lua +++ b/c63009228.lua @@ -33,7 +33,9 @@ function s.dmcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDiscardable() end Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD) - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + if c:IsLocation(LOCATION_GRAVE) then + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + end end function s.dmop(e,tp,eg,ep,ev,re,r,rp) local e1=Effect.CreateEffect(e:GetHandler()) diff --git a/c64910482.lua b/c64910482.lua index b68c823db0..f8925c89a7 100644 --- a/c64910482.lua +++ b/c64910482.lua @@ -99,6 +99,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c) diff --git a/c71861848.lua b/c71861848.lua index d2eb4e6f8a..ad48326e50 100644 --- a/c71861848.lua +++ b/c71861848.lua @@ -36,8 +36,8 @@ function s.initial_effect(c) c:RegisterEffect(e3) end function s.regop(e,tp,eg,ep,ev,re,r,rp) - if r==REASON_LINK then - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + if r==REASON_LINK and e:GetHandler():IsLocation(LOCATION_GRAVE) then + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.condition(e,tp,eg,ep,ev,re,r,rp) diff --git a/c74820316.lua b/c74820316.lua index 0c35f9ed34..a6875e5732 100644 --- a/c74820316.lua +++ b/c74820316.lua @@ -60,7 +60,7 @@ function s.regcon(e,tp,eg,ep,ev,re,r,rp) end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.thcon1(e,tp,eg,ep,ev,re,r,rp) return not aux.IsCanBeQuickEffect(e:GetHandler(),tp,90351981) diff --git a/c77121851.lua b/c77121851.lua index 029a2b418c..bda6d2e570 100644 --- a/c77121851.lua +++ b/c77121851.lua @@ -24,7 +24,7 @@ function s.initial_effect(c) end function s.tgop(e,tp,eg,ep,ev,re,r,rp) if bit.band(r,REASON_RETURN+REASON_ADJUST)~=0 then return end - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)~=0 diff --git a/c79625003.lua b/c79625003.lua index 579e847499..a6d857482e 100644 --- a/c79625003.lua +++ b/c79625003.lua @@ -89,7 +89,7 @@ end function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_DESTROY) and c:IsSummonType(SUMMON_TYPE_XYZ) and c:IsPreviousLocation(LOCATION_ONFIELD) then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.spcon(e,tp,eg,ep,ev,re,r,rp) diff --git a/c80250185.lua b/c80250185.lua index 26b95c1044..3ab211c98d 100644 --- a/c80250185.lua +++ b/c80250185.lua @@ -59,6 +59,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c84121193.lua b/c84121193.lua index 1865cd1e1e..6ffe978ecd 100644 --- a/c84121193.lua +++ b/c84121193.lua @@ -94,7 +94,7 @@ function s.regcon1(e,tp,eg,ep,ev,re,r,rp) end function s.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end function s.spcon2(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetFlagEffect(id)>0 diff --git a/c86527709.lua b/c86527709.lua index bfb6135021..986bfbe549 100644 --- a/c86527709.lua +++ b/c86527709.lua @@ -79,6 +79,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.setop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end diff --git a/c88753985.lua b/c88753985.lua index 7409326395..5f508b7624 100644 --- a/c88753985.lua +++ b/c88753985.lua @@ -30,6 +30,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) diff --git a/c93483212.lua b/c93483212.lua index e8bff2e10c..21fc3ef9ef 100644 --- a/c93483212.lua +++ b/c93483212.lua @@ -68,7 +68,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end function s.spcon(e,tp,eg,ep,ev,re,r,rp) diff --git a/c93751476.lua b/c93751476.lua index 417fe9bed8..56a4b43929 100644 --- a/c93751476.lua +++ b/c93751476.lua @@ -33,6 +33,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.spfilter(c,e,tp) diff --git a/c95816395.lua b/c95816395.lua index 87a195f94b..c13f1acc30 100644 --- a/c95816395.lua +++ b/c95816395.lua @@ -23,6 +23,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c,tp) diff --git a/c9791914.lua b/c9791914.lua index 115b7d514e..0acd79daff 100644 --- a/c9791914.lua +++ b/c9791914.lua @@ -30,7 +30,7 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_SZONE) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_EFFECT) and c:IsReason(REASON_DESTROY) and rp==1-tp then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,0) + c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,0,0,227) end end function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) diff --git a/c99991455.lua b/c99991455.lua index 6f1a611ba1..56fe287647 100644 --- a/c99991455.lua +++ b/c99991455.lua @@ -50,6 +50,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetOperation(s.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) + local e2=Effect.CreateEffect(c) + e2:SetType(EFFECT_TYPE_SINGLE) + e2:SetProperty(EFFECT_FLAG_CLIENT_HINT) + e2:SetDescription(227) + e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) + c:RegisterEffect(e2) end end function s.filter(c,e,tp) From eef312d3c8de5e8767f203f05a23578257c7cdc0 Mon Sep 17 00:00:00 2001 From: purerosefallen <78877@qq.com> Date: Mon, 22 Sep 2025 10:00:05 +0800 Subject: [PATCH 11/11] revert GetIDs --- c11755663.lua | 39 ++++++++++++------------ c1315120.lua | 29 +++++++++--------- c14509651.lua | 53 ++++++++++++++++---------------- c16780318.lua | 49 +++++++++++++++--------------- c1906812.lua | 55 +++++++++++++++++----------------- c19337371.lua | 51 ++++++++++++++++--------------- c19462747.lua | 49 +++++++++++++++--------------- c1966438.lua | 81 +++++++++++++++++++++++++------------------------ c24919805.lua | 39 ++++++++++++------------ c2542230.lua | 65 ++++++++++++++++++++-------------------- c26655293.lua | 43 +++++++++++++------------- c293542.lua | 43 +++++++++++++------------- c30604579.lua | 63 +++++++++++++++++++------------------- c31353051.lua | 43 +++++++++++++------------- c31383545.lua | 23 +++++++------- c31829185.lua | 45 ++++++++++++++-------------- c32472237.lua | 43 +++++++++++++------------- c32476603.lua | 43 +++++++++++++------------- c3410461.lua | 41 +++++++++++++------------ c34614910.lua | 59 ++++++++++++++++++------------------ c34796454.lua | 17 +++++------ c34848821.lua | 47 ++++++++++++++--------------- c34995106.lua | 83 +++++++++++++++++++++++++-------------------------- c35770983.lua | 49 +++++++++++++++--------------- c36687247.lua | 29 +++++++++--------- c37021315.lua | 41 +++++++++++++------------ c39049051.lua | 61 +++++++++++++++++++------------------ c41373230.lua | 55 +++++++++++++++++----------------- c42149850.lua | 43 +++++++++++++------------- c43586926.lua | 19 ++++++------ c48633301.lua | 35 +++++++++++----------- c5087128.lua | 53 ++++++++++++++++---------------- c52481437.lua | 65 ++++++++++++++++++++-------------------- c53266486.lua | 43 +++++++++++++------------- c53389254.lua | 73 ++++++++++++++++++++++---------------------- c53971455.lua | 53 ++++++++++++++++---------------- c55610595.lua | 29 +++++++++--------- c56585883.lua | 57 +++++++++++++++++------------------ c56980148.lua | 55 +++++++++++++++++----------------- c58383100.lua | 61 +++++++++++++++++++------------------ c59123937.lua | 67 ++++++++++++++++++++--------------------- c62022479.lua | 49 +++++++++++++++--------------- c63009228.lua | 37 +++++++++++------------ c64910482.lua | 63 +++++++++++++++++++------------------- c67100549.lua | 71 ++++++++++++++++++++++--------------------- c71039903.lua | 43 +++++++++++++------------- c71861848.lua | 61 +++++++++++++++++++------------------ c75311421.lua | 47 ++++++++++++++--------------- c77121851.lua | 35 +++++++++++----------- c80250185.lua | 43 +++++++++++++------------- c81570454.lua | 51 ++++++++++++++++--------------- c84121193.lua | 53 ++++++++++++++++---------------- c84764038.lua | 63 +++++++++++++++++++------------------- c86943389.lua | 49 +++++++++++++++--------------- c87746184.lua | 75 +++++++++++++++++++++++----------------------- c88753985.lua | 17 +++++------ c93483212.lua | 63 +++++++++++++++++++------------------- c93595154.lua | 57 +++++++++++++++++------------------ c93751476.lua | 45 ++++++++++++++-------------- c95816395.lua | 29 +++++++++--------- c96345188.lua | 57 +++++++++++++++++------------------ c9791914.lua | 21 +++++++------ c99991455.lua | 37 +++++++++++------------ 63 files changed, 1497 insertions(+), 1560 deletions(-) diff --git a/c11755663.lua b/c11755663.lua index ed33c823fd..ffae02eb19 100644 --- a/c11755663.lua +++ b/c11755663.lua @@ -1,30 +1,29 @@ --ダイナレスラー・マーシャルアンガ -local s,id,o=GetID() -function s.initial_effect(c) +function c11755663.initial_effect(c) --indes local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(11755663,0)) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(s.atkcon) - e1:SetCost(s.atkcost) - e1:SetOperation(s.atkop) + e1:SetCondition(c11755663.atkcon) + e1:SetCost(c11755663.atkcost) + e1:SetOperation(c11755663.atkop) c:RegisterEffect(e1) --revive local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(11755663,1)) e2:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(s.sumcon) - e2:SetTarget(s.sumtg) - e2:SetOperation(s.sumop) + e2:SetCondition(c11755663.sumcon) + e2:SetTarget(c11755663.sumtg) + e2:SetOperation(c11755663.sumop) c:RegisterEffect(e2) end -function s.atkcon(e,tp,eg,ep,ev,re,r,rp) +function c11755663.atkcon(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetAttacker() if tc:IsControler(1-tp) then tc=Duel.GetAttackTarget() end if not tc then return false end @@ -32,13 +31,13 @@ function s.atkcon(e,tp,eg,ep,ev,re,r,rp) local bc=tc:GetBattleTarget() return bc and tc:IsSetCard(0x11a) and bc:IsAttackAbove(tc:GetAttack()) end -function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c11755663.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsAbleToGraveAsCost() end Duel.SendtoGrave(c,REASON_COST) - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(11755663,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.atkop(e,tp,eg,ep,ev,re,r,rp) +function c11755663.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=e:GetLabelObject() if tc:IsRelateToBattle() then @@ -51,26 +50,26 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_DAMAGE_STEP_END) - e2:SetOperation(s.skipop) + e2:SetOperation(c11755663.skipop) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE) Duel.RegisterEffect(e2,tp) end end -function s.skipop(e,tp,eg,ep,ev,re,r,rp) +function c11755663.skipop(e,tp,eg,ep,ev,re,r,rp) Duel.SkipPhase(Duel.GetTurnPlayer(),PHASE_BATTLE,RESET_PHASE+PHASE_BATTLE_STEP,1) end -function s.sumcon(e,tp,eg,ep,ev,re,r,rp) +function c11755663.sumcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - return c:GetFlagEffect(id)>0 + return c:GetFlagEffect(11755663)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function s.sumop(e,tp,eg,ep,ev,re,r,rp) +function c11755663.sumop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c1315120.lua b/c1315120.lua index 98d223efa5..48e3143e7b 100644 --- a/c1315120.lua +++ b/c1315120.lua @@ -1,40 +1,39 @@ --TG ストライカー -local s,id,o=GetID() -function s.initial_effect(c) +function c1315120.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(s.spcon) + e1:SetCondition(c1315120.spcon) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c1315120.regop) c:RegisterEffect(e2) end -function s.spcon(e,c) +function c1315120.spcon(e,c) if c==nil then return true end return Duel.GetFieldGroupCount(c:GetControler(),LOCATION_MZONE,0)==0 and Duel.GetFieldGroupCount(c:GetControler(),0,LOCATION_MZONE)>0 and Duel.GetLocationCount(c:GetControler(),LOCATION_MZONE)>0 end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c1315120.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(1315120,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c1315120.thtg) + e1:SetOperation(c1315120.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -45,16 +44,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c1315120.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(1315120) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(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 +function c1315120.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c1315120.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c1315120.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c1315120.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c14509651.lua b/c14509651.lua index 16627227c0..903d16caea 100644 --- a/c14509651.lua +++ b/c14509651.lua @@ -1,61 +1,60 @@ --カース・ネクロフィア -local s,id,o=GetID() -function s.initial_effect(c) +function c14509651.initial_effect(c) --special summon by effect local e0=Effect.CreateEffect(c) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e0:SetType(EFFECT_TYPE_SINGLE) e0:SetCode(EFFECT_SPSUMMON_CONDITION) - e0:SetValue(s.splimit) + e0:SetValue(c14509651.splimit) c:RegisterEffect(e0) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(14509651,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TODECK) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,id) - e1:SetTarget(s.sptg1) - e1:SetOperation(s.spop1) + e1:SetCountLimit(1,14509651) + e1:SetTarget(c14509651.sptg1) + e1:SetOperation(c14509651.spop1) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetOperation(s.tgop) + e2:SetOperation(c14509651.tgop) c:RegisterEffect(e2) --special summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(14509651,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.spcon2) - e3:SetTarget(s.sptg2) - e3:SetOperation(s.spop2) + e3:SetCountLimit(1,14509652) + e3:SetCondition(c14509651.spcon2) + e3:SetTarget(c14509651.sptg2) + e3:SetOperation(c14509651.spop2) c:RegisterEffect(e3) end -function s.splimit(e,se,sp,st) +function c14509651.splimit(e,se,sp,st) return se:IsHasType(EFFECT_TYPE_ACTIONS) end -function s.spcfilter(c) +function c14509651.spcfilter(c) return c:IsRace(RACE_FIEND) and c:IsFaceup() and c:IsAbleToDeck() end -function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and s.spcfilter(chkc) end +function c14509651.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and c14509651.spcfilter(chkc) end local c=e:GetHandler() if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(s.spcfilter,tp,LOCATION_REMOVED,0,3,nil) end + and Duel.IsExistingTarget(c14509651.spcfilter,tp,LOCATION_REMOVED,0,3,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) - local g=Duel.SelectTarget(tp,s.spcfilter,tp,LOCATION_REMOVED,0,3,3,nil) + local g=Duel.SelectTarget(tp,c14509651.spcfilter,tp,LOCATION_REMOVED,0,3,3,nil) Duel.SetOperationInfo(0,CATEGORY_TODECK,g,3,0,0) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function s.spop1(e,tp,eg,ep,ev,re,r,rp) +function c14509651.spop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then @@ -63,27 +62,27 @@ function s.spop1(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT) end end -function s.tgop(e,tp,eg,ep,ev,re,r,rp) +function c14509651.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(14509651,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c14509651.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(14509651)>0 end -function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function c14509651.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function s.spop2(e,tp,eg,ep,ev,re,r,rp) +function c14509651.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 then local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_SZONE,0,nil) local ct=g:GetClassCount(Card.GetCode) local dg=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD,nil) - if ct>0 and #dg>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then + if ct>0 and #dg>0 and Duel.SelectYesNo(tp,aux.Stringid(14509651,2)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local sg=dg:Select(tp,1,ct,nil) diff --git a/c16780318.lua b/c16780318.lua index e1ae047ccd..8857cb399d 100644 --- a/c16780318.lua +++ b/c16780318.lua @@ -1,32 +1,31 @@ --超勝負！ -local s,id,o=GetID() -function s.initial_effect(c) +function c16780318.initial_effect(c) --Activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOEXTRA+CATEGORY_DESTROY+CATEGORY_DRAW+CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetTarget(c16780318.target) + e1:SetOperation(c16780318.activate) c:RegisterEffect(e1) --register GY effect local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c16780318.regcon) + e2:SetOperation(c16780318.regop) c:RegisterEffect(e2) end -function s.exfilter(c,tp) +function c16780318.exfilter(c,tp) return c:IsFaceup() and c:IsType(TYPE_SYNCHRO) and c:IsAbleToExtra() and Duel.GetMZoneCount(tp,c)>=4 end -function s.spfilter(c,e,tp) +function c16780318.spfilter(c,e,tp) return c:IsSetCard(0xe6) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.exfilter,tp,LOCATION_MZONE,0,1,nil,tp) and not Duel.IsPlayerAffectedByEffect(tp,59822133) - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,4,nil,e,tp) and Duel.IsPlayerCanDraw(tp,1) +function c16780318.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c16780318.exfilter,tp,LOCATION_MZONE,0,1,nil,tp) and not Duel.IsPlayerAffectedByEffect(tp,59822133) + and Duel.IsExistingMatchingCard(c16780318.spfilter,tp,LOCATION_GRAVE,0,4,nil,e,tp) and Duel.IsPlayerCanDraw(tp,1) end Duel.SetTargetPlayer(tp) Duel.SetTargetParam(1) @@ -34,14 +33,14 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,nil,1,tp,LOCATION_MZONE) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,4,tp,LOCATION_GRAVE) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c16780318.activate(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) - local g=Duel.SelectMatchingCard(tp,s.exfilter,tp,LOCATION_MZONE,0,1,1,nil,tp) + local g=Duel.SelectMatchingCard(tp,c16780318.exfilter,tp,LOCATION_MZONE,0,1,1,nil,tp) local tg=g:GetFirst() if tg and Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tg:IsLocation(LOCATION_EXTRA) then if Duel.GetLocationCount(tp,LOCATION_MZONE)<4 or Duel.IsPlayerAffectedByEffect(tp,59822133) then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE,0,4,4,nil,e,tp) + local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16780318.spfilter),tp,LOCATION_GRAVE,0,4,4,nil,e,tp) if #sg>0 then if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)~=0 then Duel.BreakEffect() @@ -51,7 +50,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) Duel.ConfirmCards(1-p,tc) if tc:IsType(TYPE_MONSTER) and tc:IsSetCard(0xe6) then if tc:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then + and Duel.SelectYesNo(tp,aux.Stringid(16780318,0)) then Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP) end else @@ -65,20 +64,20 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) end end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c16780318.regcon(e,tp,eg,ep,ev,re,r,rp) return re and re:GetHandler():IsSetCard(0xe6) and re:GetHandler():IsType(TYPE_MONSTER) and bit.band(r,REASON_EFFECT)>0 end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c16780318.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(16780318,1)) e1:SetCategory(CATEGORY_TOHAND) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) e1:SetCountLimit(1) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c16780318.thtg) + e1:SetOperation(c16780318.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -88,16 +87,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e2) end -function s.thfilter(c) +function c16780318.thfilter(c) return 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_GRAVE,0,1,nil) end +function c16780318.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c16780318.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c16780318.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.thfilter),tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c16780318.thfilter),tp,LOCATION_GRAVE,0,1,1,nil) if #g>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c1906812.lua b/c1906812.lua index 9e8e68a0d4..6ad8c84218 100644 --- a/c1906812.lua +++ b/c1906812.lua @@ -1,50 +1,49 @@ --鉄駆竜スプリンド -local s,id,o=GetID() -function s.initial_effect(c) +function c1906812.initial_effect(c) --fusion material c:EnableReviveLimit() - aux.AddFusionProcCodeFun(c,68468459,s.mfilter,1,true,true) + aux.AddFusionProcCodeFun(c,68468459,c1906812.mfilter,1,true,true) --move local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(1906812,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetTarget(s.seqtg) - e1:SetOperation(s.seqop) + e1:SetCountLimit(1,1906812) + e1:SetTarget(c1906812.seqtg) + e1:SetOperation(c1906812.seqop) c:RegisterEffect(e1) --to grave local e0=Effect.CreateEffect(c) e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e0:SetCode(EVENT_TO_GRAVE) - e0:SetOperation(s.regop) + e0:SetOperation(c1906812.regop) c:RegisterEffect(e0) --to hand/spsummon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(1906812,1)) e2:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,id+o) - e2:SetCondition(s.thcon) - e2:SetTarget(s.thtg) - e2:SetOperation(s.thop) + e2:SetCountLimit(1,1906813) + e2:SetCondition(c1906812.thcon) + e2:SetTarget(c1906812.thtg) + e2:SetOperation(c1906812.thop) c:RegisterEffect(e2) end -function s.branded_fusion_check(tp,sg,fc) - return aux.gffcheck(sg,Card.IsFusionCode,68468459,s.mfilter,nil) +function c1906812.branded_fusion_check(tp,sg,fc) + return aux.gffcheck(sg,Card.IsFusionCode,68468459,c1906812.mfilter,nil) end -function s.mfilter(c) +function c1906812.mfilter(c) return c:IsStatus(STATUS_SPSUMMON_TURN) and c:IsFusionType(TYPE_EFFECT) and c:IsLocation(LOCATION_MZONE) end -function s.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c1906812.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)>0 end end -function s.seqop(e,tp,eg,ep,ev,re,r,rp) +function c1906812.seqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) or not c:IsControler(tp) or Duel.GetLocationCount(tp,LOCATION_MZONE,PLAYER_NONE,0)<=0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE) @@ -55,30 +54,30 @@ function s.seqop(e,tp,eg,ep,ev,re,r,rp) Duel.MoveSequence(c,seq) if c:GetSequence()==seq then local g=c:GetColumnGroup():Filter(Card.IsFaceup,nil) - if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then + if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(1906812,2)) then Duel.BreakEffect() Duel.Destroy(g,REASON_EFFECT) end end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c1906812.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(1906812,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c1906812.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(1906812)>0 end -function s.thfilter(c,e,tp) +function c1906812.thfilter(c,e,tp) if not (c:IsSetCard(0x155) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) 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,e,tp) end +function c1906812.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c1906812.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c1906812.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c1906812.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c19337371.lua b/c19337371.lua index 9a673cef7d..db00e8612d 100644 --- a/c19337371.lua +++ b/c19337371.lua @@ -1,68 +1,67 @@ --ヒステリック・サイン -local s,id,o=GetID() -function s.initial_effect(c) +function c19337371.initial_effect(c) local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,id) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCountLimit(1,19337371) + e1:SetTarget(c19337371.target) + e1:SetOperation(c19337371.activate) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c19337371.regcon) + e2:SetOperation(c19337371.regop) c:RegisterEffect(e2) --search local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,0)) + e3:SetDescription(aux.Stringid(19337371,0)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetRange(LOCATION_GRAVE) e3:SetCode(EVENT_PHASE+PHASE_END) - e3:SetCountLimit(1,id) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,19337371) + e3:SetCondition(c19337371.thcon) + e3:SetTarget(c19337371.thtg) + e3:SetOperation(c19337371.thop) c:RegisterEffect(e3) end -function s.filter(c) +function c19337371.filter(c) return c:IsCode(90219263) and c:IsAbleToHand() end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end +function c19337371.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c19337371.filter,tp,LOCATION_GRAVE+LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE+LOCATION_DECK) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c19337371.activate(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.filter),tp,LOCATION_GRAVE+LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c19337371.filter),tp,LOCATION_GRAVE+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 s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c19337371.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_HAND+LOCATION_ONFIELD) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) +function c19337371.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(19337371,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thfilter(c) +function c19337371.thfilter(c) return c:IsSetCard(0x64) and c:IsAbleToHand() end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c19337371.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(19337371)>0 end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c19337371.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_DECK,0,nil) +function c19337371.thop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetMatchingGroup(c19337371.thfilter,tp,LOCATION_DECK,0,nil) if g:GetCount()==0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) local g1=g:SelectSubGroup(tp,aux.dncheck,false,1,3) diff --git a/c19462747.lua b/c19462747.lua index a20d5b2bdd..1e64946395 100644 --- a/c19462747.lua +++ b/c19462747.lua @@ -1,15 +1,14 @@ --BF－弔風のデス -local s,id,o=GetID() -function s.initial_effect(c) +function c19462747.initial_effect(c) --lv up local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(19462747,0)) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCountLimit(1,id) - e1:SetTarget(s.target) - e1:SetOperation(s.operation) + e1:SetCountLimit(1,19462747) + e1:SetTarget(c19462747.target) + e1:SetOperation(c19462747.operation) c:RegisterEffect(e1) local e2=e1:Clone() e2:SetCode(EVENT_SPSUMMON_SUCCESS) @@ -19,38 +18,38 @@ function s.initial_effect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c19462747.regop) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,3)) + e4:SetDescription(aux.Stringid(19462747,3)) e4:SetCategory(CATEGORY_DAMAGE) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetCountLimit(1) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(s.damcon) - e4:SetTarget(s.damtg) - e4:SetOperation(s.damop) + e4:SetCondition(c19462747.damcon) + e4:SetTarget(c19462747.damtg) + e4:SetOperation(c19462747.damop) c:RegisterEffect(e4) end -function s.filter(c) +function c19462747.filter(c) return c:IsFaceup() and c:GetLevel()>0 and c:IsSetCard(0x33) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end +function c19462747.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c19462747.filter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c19462747.filter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP) - local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil) + local g=Duel.SelectTarget(tp,c19462747.filter,tp,LOCATION_MZONE,0,1,1,nil) local op=0 Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT) if g:GetFirst():IsLevel(1) then - op=Duel.SelectOption(tp,aux.Stringid(id,1)) + op=Duel.SelectOption(tp,aux.Stringid(19462747,1)) else - op=Duel.SelectOption(tp,aux.Stringid(id,1),aux.Stringid(id,2)) + op=Duel.SelectOption(tp,aux.Stringid(19462747,1),aux.Stringid(19462747,2)) end e:SetLabel(op) end -function s.operation(e,tp,eg,ep,ev,re,r,rp) +function c19462747.operation(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local tc=Duel.GetFirstTarget() if tc:IsFaceup() and tc:IsRelateToEffect(e) then @@ -67,20 +66,20 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e1) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c19462747.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(19462747,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.damcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c19462747.damcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(19462747)>0 end -function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c19462747.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(tp) Duel.SetTargetParam(1000) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,0,0,tp,1000) end -function s.damop(e,tp,eg,ep,ev,re,r,rp) +function c19462747.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end diff --git a/c1966438.lua b/c1966438.lua index 29b6a07dfe..458fe9ee35 100644 --- a/c1966438.lua +++ b/c1966438.lua @@ -1,106 +1,105 @@ --雙極の破械神 -local s,id,o=GetID() -function s.initial_effect(c) - c:SetSPSummonOnce(id) +function c1966438.initial_effect(c) + c:SetSPSummonOnce(1966438) --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(1966438,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) - e1:SetCode(EVENT_CUSTOM+id) + e1:SetCode(EVENT_CUSTOM+1966438) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY) e1:SetRange(LOCATION_HAND) - e1:SetCondition(s.spcon) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCondition(c1966438.spcon) + e1:SetTarget(c1966438.sptg) + e1:SetOperation(c1966438.spop) c:RegisterEffect(e1) --destroy local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(1966438,1)) e2:SetCategory(CATEGORY_DESTROY) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetProperty(EFFECT_FLAG_DELAY) - e2:SetCost(s.descost) - e2:SetTarget(s.destg) - e2:SetOperation(s.desop) + e2:SetCost(c1966438.descost) + e2:SetTarget(c1966438.destg) + e2:SetOperation(c1966438.desop) c:RegisterEffect(e2) --spsummon2 local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetCondition(s.regcon1) - e3:SetOperation(s.regop1) + e3:SetCondition(c1966438.regcon1) + e3:SetOperation(c1966438.regop1) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,2)) + e4:SetDescription(aux.Stringid(1966438,2)) e4:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) e4:SetCountLimit(1) - e4:SetCondition(s.spcon2) - e4:SetTarget(s.sptg2) - e4:SetOperation(s.spop2) + e4:SetCondition(c1966438.spcon2) + e4:SetTarget(c1966438.sptg2) + e4:SetOperation(c1966438.spop2) c:RegisterEffect(e4) - if not s.global_check then - s.global_check=true + if not c1966438.global_check then + c1966438.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_DESTROYED) - ge1:SetCondition(s.regcon) - ge1:SetOperation(s.regop) + ge1:SetCondition(c1966438.regcon) + ge1:SetOperation(c1966438.regop) Duel.RegisterEffect(ge1,0) end end -function s.regcon1(e,tp,eg,ep,ev,re,r,rp) +function c1966438.regcon1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) end -function s.regop1(e,tp,eg,ep,ev,re,r,rp) +function c1966438.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(1966438,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcfilter(c,tp) +function c1966438.spcfilter(c,tp) return c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_ONFIELD) end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c1966438.regcon(e,tp,eg,ep,ev,re,r,rp) local v=0 - if eg:IsExists(s.spcfilter,1,nil,0) then v=v+1 end - if eg:IsExists(s.spcfilter,1,nil,1) then v=v+2 end + if eg:IsExists(c1966438.spcfilter,1,nil,0) then v=v+1 end + if eg:IsExists(c1966438.spcfilter,1,nil,1) then v=v+2 end if v==0 then return false end e:SetLabel(({0,1,PLAYER_ALL})[v]) return true end -function s.regop(e,tp,eg,ep,ev,re,r,rp) - Duel.RaiseEvent(eg,EVENT_CUSTOM+id,re,r,rp,ep,e:GetLabel()) +function c1966438.regop(e,tp,eg,ep,ev,re,r,rp) + Duel.RaiseEvent(eg,EVENT_CUSTOM+1966438,re,r,rp,ep,e:GetLabel()) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) +function c1966438.spcon(e,tp,eg,ep,ev,re,r,rp) return ev==tp or ev==PLAYER_ALL end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c1966438.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c1966438.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) end end -function s.descost(e,tp,eg,ep,ev,re,r,rp,chk) +function c1966438.descost(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 Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c1966438.destg(e,tp,eg,ep,ev,re,r,rp,chk) local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) if chk==0 then return g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c1966438.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil) if g:GetCount()>0 then @@ -108,15 +107,15 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Destroy(g,REASON_EFFECT) end end -function s.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c1966438.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(1966438)>0 end -function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function c1966438.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,tp,LOCATION_GRAVE) end -function s.spop2(e,tp,eg,ep,ev,re,r,rp) +function c1966438.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c24919805.lua b/c24919805.lua index f6130f930f..81f8f2d0dc 100644 --- a/c24919805.lua +++ b/c24919805.lua @@ -1,26 +1,25 @@ --無頼特急バトレイン -local s,id,o=GetID() -function s.initial_effect(c) +function c24919805.initial_effect(c) --damage local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(24919805,0)) e1:SetCategory(CATEGORY_DAMAGE) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCost(s.damcost) - e1:SetTarget(s.damtg) - e1:SetOperation(s.damop) + e1:SetCost(c24919805.damcost) + e1:SetTarget(c24919805.damtg) + e1:SetOperation(c24919805.damop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c24919805.regop) c:RegisterEffect(e2) end -function s.damcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c24919805.damcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetCurrentPhase()==PHASE_MAIN1 end local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) @@ -30,27 +29,27 @@ function s.damcost(e,tp,eg,ep,ev,re,r,rp,chk) e1:SetReset(RESET_PHASE+PHASE_END) Duel.RegisterEffect(e1,tp) end -function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c24919805.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(1-tp) Duel.SetTargetParam(500) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,500) end -function s.damop(e,tp,eg,ep,ev,re,r,rp) +function c24919805.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c24919805.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(24919805,1)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,id) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetCountLimit(1,24919805) + e1:SetTarget(c24919805.thtg) + e1:SetOperation(c24919805.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -60,16 +59,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e2) end -function s.filter(c) +function c24919805.filter(c) return c:IsLevel(10) and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsAbleToHand() end -function s.thtg(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 +function c24919805.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c24919805.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c24919805.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c24919805.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c2542230.lua b/c2542230.lua index 84a32e14a7..d9371c1a55 100644 --- a/c2542230.lua +++ b/c2542230.lua @@ -1,6 +1,5 @@ --スカーレッド・コクーン -local s,id,o=GetID() -function s.initial_effect(c) +function c2542230.initial_effect(c) aux.AddCodeList(c,70902743) --Activate local e1=Effect.CreateEffect(c) @@ -8,20 +7,20 @@ function s.initial_effect(c) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCost(s.cost) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCost(c2542230.cost) + e1:SetTarget(c2542230.target) + e1:SetOperation(c2542230.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c2542230.regop) c:RegisterEffect(e2) -- local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,0)) + e3:SetDescription(aux.Stringid(2542230,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) @@ -29,12 +28,12 @@ function s.initial_effect(c) e3:SetRange(LOCATION_GRAVE) e3:SetHintTiming(TIMING_END_PHASE) e3:SetCountLimit(1) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCondition(c2542230.spcon) + e3:SetTarget(c2542230.sptg) + e3:SetOperation(c2542230.spop) c:RegisterEffect(e3) end -function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) +function c2542230.cost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end local c=e:GetHandler() local cid=Duel.GetChainInfo(0,CHAININFO_CHAIN_ID) @@ -47,30 +46,30 @@ function s.cost(e,tp,eg,ep,ev,re,r,rp,chk) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_CHAIN_DISABLED) - e2:SetOperation(s.tgop) + e2:SetOperation(c2542230.tgop) e2:SetLabel(cid) e2:SetReset(RESET_CHAIN) Duel.RegisterEffect(e2,tp) end -function s.tgop(e,tp,eg,ep,ev,re,r,rp) +function c2542230.tgop(e,tp,eg,ep,ev,re,r,rp) local cid=Duel.GetChainInfo(ev,CHAININFO_CHAIN_ID) if cid~=e:GetLabel() then return end if e:GetOwner():IsRelateToChain(ev) then e:GetOwner():CancelToGrave(false) end end -function s.filter(c) +function c2542230.filter(c) return c:IsFaceup() and c:IsRace(RACE_DRAGON) and c:IsType(TYPE_SYNCHRO) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end +function c2542230.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c2542230.filter(chkc) end if chk==0 then return e:IsCostChecked() - and Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end + and Duel.IsExistingTarget(c2542230.filter,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) - Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil) + Duel.SelectTarget(tp,c2542230.filter,tp,LOCATION_MZONE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c2542230.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsLocation(LOCATION_SZONE) then return end if not c:IsRelateToEffect(e) or c:IsStatus(STATUS_LEAVE_CONFIRMED) then return end @@ -81,7 +80,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e1:SetValue(s.eqlimit) + e1:SetValue(c2542230.eqlimit) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -89,7 +88,7 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) e2:SetCode(EFFECT_DISABLE) e2:SetRange(LOCATION_SZONE) e2:SetTargetRange(0,LOCATION_MZONE) - e2:SetCondition(s.discon) + e2:SetCondition(c2542230.discon) e2:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e2) Duel.AdjustInstantly(c) @@ -97,34 +96,34 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) c:CancelToGrave(false) end end -function s.eqlimit(e,c) +function c2542230.eqlimit(e,c) return e:GetHandler():GetEquipTarget()==c or c:IsControler(e:GetHandlerPlayer()) and c:IsRace(RACE_DRAGON) and c:IsType(TYPE_SYNCHRO) end -function s.discon(e) +function c2542230.discon(e) local ec=e:GetHandler():GetEquipTarget() return Duel.GetAttacker()==ec or Duel.GetAttackTarget()==ec end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c2542230.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(2542230,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) +function c2542230.spcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - return c:GetFlagEffect(id)~=0 and Duel.GetCurrentPhase()==PHASE_END + return c:GetFlagEffect(2542230)~=0 and Duel.GetCurrentPhase()==PHASE_END end -function s.spfilter(c,e,tp) +function c2542230.spfilter(c,e,tp) return c:IsCode(70902743) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end +function c2542230.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c2542230.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(c2542230.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,c2542230.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c2542230.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) diff --git a/c26655293.lua b/c26655293.lua index 3bb857916b..d1d575f11d 100644 --- a/c26655293.lua +++ b/c26655293.lua @@ -1,41 +1,40 @@ --マグナヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c26655293.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(26655293,0)) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,26655293) + e1:SetCondition(c26655293.descon) + e1:SetTarget(c26655293.destg) + e1:SetOperation(c26655293.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c26655293.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c26655293.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c26655293.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(nil,tp,LOCATION_MZONE,LOCATION_MZONE,c) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c26655293.desop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 then local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,LOCATION_MZONE) if g:GetCount()==0 then return end @@ -45,18 +44,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoGrave(sg,REASON_EFFECT) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c26655293.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(26655293,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,26655294) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c26655293.sptg) + e1:SetOperation(c26655293.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -67,18 +66,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c26655293.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(26655293) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c26655293.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c26655293.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c26655293.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c26655293.spfilter,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 diff --git a/c293542.lua b/c293542.lua index 78d083f89f..3f4e3f10a5 100644 --- a/c293542.lua +++ b/c293542.lua @@ -1,53 +1,52 @@ --TG ワーウルフ -local s,id,o=GetID() -function s.initial_effect(c) +function c293542.initial_effect(c) --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(293542,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetRange(LOCATION_HAND) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCondition(s.spcon) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCondition(c293542.spcon) + e1:SetTarget(c293542.sptg) + e1:SetOperation(c293542.spop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c293542.regop) c:RegisterEffect(e2) end -function s.cfilter(c) +function c293542.cfilter(c) return c:IsFaceup() and c:IsLevelBelow(4) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return eg:IsExists(s.cfilter,1,nil) +function c293542.spcon(e,tp,eg,ep,ev,re,r,rp) + return eg:IsExists(c293542.cfilter,1,nil) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c293542.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 s.spop(e,tp,eg,ep,ev,re,r,rp) +function c293542.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 s.regop(e,tp,eg,ep,ev,re,r,rp) +function c293542.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(293542,1)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c293542.thtg) + e1:SetOperation(c293542.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -58,16 +57,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c293542.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(293542) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(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 +function c293542.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c293542.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c293542.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c293542.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c30604579.lua b/c30604579.lua index 2fbe7677cf..e3cc2cbeb9 100644 --- a/c30604579.lua +++ b/c30604579.lua @@ -1,57 +1,56 @@ --極神皇トール -local s,id,o=GetID() -function s.initial_effect(c) +function c30604579.initial_effect(c) --synchro summon - aux.AddSynchroProcedure(c,s.tfilter,aux.NonTuner(nil),2) + aux.AddSynchroProcedure(c,c30604579.tfilter,aux.NonTuner(nil),2) c:EnableReviveLimit() --negate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(30604579,0)) e1:SetCategory(CATEGORY_DISABLE) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetTarget(s.distg) - e1:SetOperation(s.disop) + e1:SetTarget(c30604579.distg) + e1:SetOperation(c30604579.disop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c30604579.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(30604579,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(s.spcon) - e3:SetCost(s.spcost) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCondition(c30604579.spcon) + e3:SetCost(c30604579.spcost) + e3:SetTarget(c30604579.sptg) + e3:SetOperation(c30604579.spop) c:RegisterEffect(e3) --damage local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,2)) + e4:SetDescription(aux.Stringid(30604579,2)) e4:SetCategory(CATEGORY_DAMAGE) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e4:SetCode(EVENT_SPSUMMON_SUCCESS) - e4:SetCondition(s.damcon) - e4:SetTarget(s.damtg) - e4:SetOperation(s.damop) + e4:SetCondition(c30604579.damcon) + e4:SetTarget(c30604579.damtg) + e4:SetOperation(c30604579.damop) c:RegisterEffect(e4) end -function s.tfilter(c) +function c30604579.tfilter(c) return c:IsSetCard(0x6042) or c:IsHasEffect(61777313) end -function s.distg(e,tp,eg,ep,ev,re,r,rp,chk) +function c30604579.distg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end end -function s.disop(e,tp,eg,ep,ev,re,r,rp) +function c30604579.disop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil) local tc=g:GetFirst() local c=e:GetHandler() @@ -69,47 +68,47 @@ function s.disop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c30604579.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local pos=c:GetPreviousPosition() if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(30604579,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)~=0 +function c30604579.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(30604579)~=0 end -function s.cfilter(c) +function c30604579.cfilter(c) return c:IsSetCard(0x6042) and c:IsType(TYPE_TUNER) and c:IsAbleToRemoveAsCost() end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end +function c30604579.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c30604579.cfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c30604579.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c30604579.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 s.spop(e,tp,eg,ep,ev,re,r,rp) +function c30604579.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),SUMMON_VALUE_SELF,tp,tp,false,false,POS_FACEUP) end end -function s.damcon(e,tp,eg,ep,ev,re,r,rp) +function c30604579.damcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+SUMMON_VALUE_SELF end -function s.damtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c30604579.damtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetTargetPlayer(1-tp) Duel.SetTargetParam(800) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800) end -function s.damop(e,tp,eg,ep,ev,re,r,rp) +function c30604579.damop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Damage(p,d,REASON_EFFECT) end diff --git a/c31353051.lua b/c31353051.lua index a3f6f23533..0d5108fff6 100644 --- a/c31353051.lua +++ b/c31353051.lua @@ -1,40 +1,39 @@ --エクスプロードヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c31353051.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(31353051,0)) e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,31353051) + e1:SetCondition(c31353051.descon) + e1:SetTarget(c31353051.destg) + e1:SetOperation(c31353051.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c31353051.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c31353051.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c31353051.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDestructable() end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,PLAYER_ALL,2000) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c31353051.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then Duel.BreakEffect() @@ -43,18 +42,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.RDComplete() end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c31353051.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(31353051,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,31353052) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c31353051.sptg) + e1:SetOperation(c31353051.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -65,18 +64,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c31353051.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(31353051) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c31353051.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c31353051.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c31353051.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c31353051.spfilter,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 diff --git a/c31383545.lua b/c31383545.lua index e6f9418e6e..1efdd44211 100644 --- a/c31383545.lua +++ b/c31383545.lua @@ -1,26 +1,25 @@ --XX－セイバー ダークソウル -local s,id,o=GetID() -function s.initial_effect(c) +function c31383545.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c31383545.regop) c:RegisterEffect(e1) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c31383545.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(31383545,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c31383545.thtg) + e1:SetOperation(c31383545.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -31,16 +30,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) +function c31383545.filter(c) return c:IsSetCard(0x100d) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(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 +function c31383545.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c31383545.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c31383545.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c31383545.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c31829185.lua b/c31829185.lua index c7fef67c0e..6833a2528d 100644 --- a/c31829185.lua +++ b/c31829185.lua @@ -1,6 +1,5 @@ --ダーク・ネクロフィア -local s,id,o=GetID() -function s.initial_effect(c) +function c31829185.initial_effect(c) c:EnableReviveLimit() --special summon local e1=Effect.CreateEffect(c) @@ -8,16 +7,16 @@ function s.initial_effect(c) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(s.spcon) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCondition(c31829185.spcon) + e1:SetTarget(c31829185.sptg) + e1:SetOperation(c31829185.spop) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetOperation(s.tgop) + e2:SetOperation(c31829185.tgop) c:RegisterEffect(e2) --equip local e3=Effect.CreateEffect(c) @@ -26,22 +25,22 @@ function s.initial_effect(c) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(s.eqcon) - e3:SetTarget(s.eqtg) - e3:SetOperation(s.eqop) + e3:SetCondition(c31829185.eqcon) + e3:SetTarget(c31829185.eqtg) + e3:SetOperation(c31829185.eqop) c:RegisterEffect(e3) end -function s.spfilter(c) +function c31829185.spfilter(c) return c:IsRace(RACE_FIEND) and c:IsAbleToRemoveAsCost() end -function s.spcon(e,c) +function c31829185.spcon(e,c) if c==nil then return true end local tp=c:GetControler() return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,3,nil) + and Duel.IsExistingMatchingCard(c31829185.spfilter,tp,LOCATION_GRAVE,0,3,nil) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) - local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_GRAVE,0,nil) +function c31829185.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) + local g=Duel.GetMatchingGroup(c31829185.spfilter,tp,LOCATION_GRAVE,0,nil) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local sg=g:CancelableSelect(tp,3,3,nil) if sg then @@ -50,22 +49,22 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,c) return true else return false end end -function s.spop(e,tp,eg,ep,ev,re,r,rp,c) +function c31829185.spop(e,tp,eg,ep,ev,re,r,rp,c) local g=e:GetLabelObject() Duel.Remove(g,POS_FACEUP,REASON_SPSUMMON) g:DeleteGroup() end -function s.tgop(e,tp,eg,ep,ev,re,r,rp) +function c31829185.tgop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and rp==1-tp and bit.band(r,REASON_DESTROY)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(31829185,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.eqcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c31829185.eqcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(31829185)>0 end -function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function c31829185.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and chkc:IsFaceup() end if chk==0 then return true end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL) @@ -74,10 +73,10 @@ function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.eqlimit(e,c) +function c31829185.eqlimit(e,c) return e:GetOwner()==c end -function s.eqop(e,tp,eg,ep,ev,re,r,rp) +function c31829185.eqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end local tc=Duel.GetFirstTarget() @@ -89,7 +88,7 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(s.eqlimit) + e1:SetValue(c31829185.eqlimit) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_EQUIP) diff --git a/c32472237.lua b/c32472237.lua index c3ea365b81..6ede2043cc 100644 --- a/c32472237.lua +++ b/c32472237.lua @@ -1,41 +1,40 @@ --メタルヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c32472237.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(32472237,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,32472237) + e1:SetCondition(c32472237.descon) + e1:SetTarget(c32472237.destg) + e1:SetOperation(c32472237.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c32472237.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c32472237.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c32472237.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local cg=c:GetColumnGroup():Filter(Card.IsControler,nil,1-tp) if chk==0 then return c:IsDestructable() and cg:GetCount()>0 end cg:AddCard(c) Duel.SetOperationInfo(0,CATEGORY_DESTROY,cg,cg:GetCount(),0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c32472237.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local cg=c:GetColumnGroup():Filter(Card.IsControler,nil,1-tp) if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 and cg:GetCount()>0 then @@ -43,18 +42,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.Destroy(cg,REASON_EFFECT) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c32472237.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(32472237,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,32472238) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c32472237.sptg) + e1:SetOperation(c32472237.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -65,18 +64,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c32472237.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(32472237) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c32472237.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c32472237.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c32472237.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c32472237.spfilter,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 diff --git a/c32476603.lua b/c32476603.lua index c6889455aa..88679920ae 100644 --- a/c32476603.lua +++ b/c32476603.lua @@ -1,41 +1,40 @@ --シルバーヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c32476603.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(32476603,0)) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,32476603) + e1:SetCondition(c32476603.descon) + e1:SetTarget(c32476603.destg) + e1:SetOperation(c32476603.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c32476603.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c32476603.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c32476603.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_EXTRA,nil) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c32476603.desop(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,0,LOCATION_EXTRA) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 and g:GetCount()>0 then Duel.BreakEffect() @@ -48,18 +47,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.ShuffleExtra(1-tp) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c32476603.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(32476603,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,32476604) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c32476603.sptg) + e1:SetOperation(c32476603.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -70,18 +69,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c32476603.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(32476603) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c32476603.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c32476603.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c32476603.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c32476603.spfilter,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 diff --git a/c3410461.lua b/c3410461.lua index 28a231cfcc..042ed13492 100644 --- a/c3410461.lua +++ b/c3410461.lua @@ -1,10 +1,9 @@ --深淵竜アルバ・レナトゥス -local s,id,o=GetID() -function s.initial_effect(c) +function c3410461.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFunRep(c,68468459,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),1,127,true,true) - aux.AddContactFusionProcedure(c,s.cfilter,LOCATION_MZONE,LOCATION_MZONE,Duel.SendtoGrave,REASON_COST) + aux.AddContactFusionProcedure(c,c3410461.cfilter,LOCATION_MZONE,LOCATION_MZONE,Duel.SendtoGrave,REASON_COST) --spsummon condition local e0=Effect.CreateEffect(c) e0:SetType(EFFECT_TYPE_SINGLE) @@ -23,34 +22,34 @@ function s.initial_effect(c) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_SPSUMMON_SUCCESS) - e2:SetOperation(s.atkop) + e2:SetOperation(c3410461.atkop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c3410461.regop) c:RegisterEffect(e3) --to hand/set local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,0)) + e4:SetDescription(aux.Stringid(3410461,0)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCondition(c3410461.thcon) + e4:SetTarget(c3410461.thtg) + e4:SetOperation(c3410461.thop) c:RegisterEffect(e4) end -function s.branded_fusion_check(tp,sg,fc) +function c3410461.branded_fusion_check(tp,sg,fc) return #sg<2 or aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsRace,RACE_DRAGON) end -function s.cfilter(c,fc) +function c3410461.cfilter(c,fc) return c:IsAbleToGraveAsCost() and (c:IsControler(fc:GetControler()) or c:IsFaceup()) end -function s.atkop(e,tp,eg,ep,ev,re,r,rp) +function c3410461.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -59,23 +58,23 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c3410461.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(3410461,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c3410461.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(3410461)>0 end -function s.thfilter(c) +function c3410461.thfilter(c) return c:GetType()==TYPE_SPELL and c:IsSetCard(0x46) 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 +function c3410461.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c3410461.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c3410461.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c3410461.thfilter,tp,LOCATION_DECK,0,1,1,nil) local tc=g:GetFirst() if tc then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c34614910.lua b/c34614910.lua index a22de5797b..29545b3676 100644 --- a/c34614910.lua +++ b/c34614910.lua @@ -1,55 +1,54 @@ --六花精シクラン -local s,id,o=GetID() -function s.initial_effect(c) +function c34614910.initial_effect(c) --level local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(34614910,0)) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetRange(LOCATION_MZONE+LOCATION_HAND) - e1:SetCountLimit(1,id) - e1:SetCost(s.lvcost) - e1:SetTarget(s.lvtg) - e1:SetOperation(s.lvop) + e1:SetCountLimit(1,34614910) + e1:SetCost(c34614910.lvcost) + e1:SetTarget(c34614910.lvtg) + e1:SetOperation(c34614910.lvop) c:RegisterEffect(e1) --spsummon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c34614910.regcon) + e2:SetOperation(c34614910.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(34614910,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCountLimit(1,34614911) + e3:SetCondition(c34614910.spcon) + e3:SetTarget(c34614910.sptg) + e3:SetOperation(c34614910.spop) c:RegisterEffect(e3) end -function s.lvfilter(c) +function c34614910.lvfilter(c) return c:IsFaceup() and c:IsRace(RACE_PLANT) and c:IsLevelAbove(3) end -function s.lvcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c34614910.lvcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsReleasable() end Duel.Release(e:GetHandler(),REASON_COST) end -function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.lvfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.lvfilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end +function c34614910.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c34614910.lvfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c34614910.lvfilter,tp,LOCATION_MZONE,0,1,e:GetHandler()) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) - Duel.SelectTarget(tp,s.lvfilter,tp,LOCATION_MZONE,0,1,2,nil) + Duel.SelectTarget(tp,c34614910.lvfilter,tp,LOCATION_MZONE,0,1,2,nil) end -function s.cfilter(c,e) +function c34614910.cfilter(c,e) return c:IsFaceup() and c:IsRelateToEffect(e) end -function s.lvop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(s.cfilter,nil,e) +function c34614910.lvop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c34614910.cfilter,nil,e) local tc=g:GetFirst() while tc do local e1=Effect.CreateEffect(e:GetHandler()) @@ -62,22 +61,22 @@ function s.lvop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c34614910.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsReason(REASON_RELEASE) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c34614910.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(34614910,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c34614910.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(34614910)>0 end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c34614910.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,tp,LOCATION_GRAVE) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c34614910.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c34796454.lua b/c34796454.lua index 53d4c0815a..0a25bffc8a 100644 --- a/c34796454.lua +++ b/c34796454.lua @@ -1,26 +1,25 @@ --三連星のトリオン -local s,id,o=GetID() -function s.initial_effect(c) +function c34796454.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c34796454.regop) c:RegisterEffect(e1) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c34796454.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_SUMMON) and c:IsReason(REASON_MATERIAL) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(34796454,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c34796454.sptg) + e1:SetOperation(c34796454.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -31,12 +30,12 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c34796454.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 s.spop(e,tp,eg,ep,ev,re,r,rp) +function c34796454.spop(e,tp,eg,ep,ev,re,r,rp) if not e:GetHandler():IsRelateToEffect(e) then return end Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c34848821.lua b/c34848821.lua index 1f5406ebb2..10f2839227 100644 --- a/c34848821.lua +++ b/c34848821.lua @@ -1,6 +1,5 @@ --痕喰竜ブリガンド -local s,id,o=GetID() -function s.initial_effect(c) +function c34848821.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsLevelAbove,8),1,true,true) @@ -19,60 +18,60 @@ function s.initial_effect(c) e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE+EFFECT_FLAG_SET_AVAILABLE) e2:SetRange(LOCATION_MZONE) e2:SetTargetRange(LOCATION_MZONE,0) - e2:SetCondition(s.imcon) - e2:SetTarget(s.imval) - e2:SetValue(s.imfilter) + e2:SetCondition(c34848821.imcon) + e2:SetTarget(c34848821.imval) + e2:SetValue(c34848821.imfilter) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c34848821.regop) c:RegisterEffect(e3) --to hand/spsummon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,0)) + e4:SetDescription(aux.Stringid(34848821,0)) e4:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,id) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCountLimit(1,34848821) + e4:SetCondition(c34848821.thcon) + e4:SetTarget(c34848821.thtg) + e4:SetOperation(c34848821.thop) c:RegisterEffect(e4) end -function s.branded_fusion_check(tp,sg,fc) +function c34848821.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsLevelAbove,8) end -function s.imcon(e) +function c34848821.imcon(e) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) end -function s.imval(e,c) +function c34848821.imval(e,c) return c~=e:GetHandler() end -function s.imfilter(e,re,rp) +function c34848821.imfilter(e,re,rp) return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_MONSTER) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c34848821.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(34848821,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c34848821.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(34848821)>0 end -function s.thfilter(c,e,tp) +function c34848821.thfilter(c,e,tp) if not (c:IsSetCard(0x14d) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) 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,e,tp) end +function c34848821.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c34848821.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c34848821.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c34848821.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c34995106.lua b/c34995106.lua index 28b3b4802d..2d9cb2aed3 100644 --- a/c34995106.lua +++ b/c34995106.lua @@ -1,77 +1,76 @@ --白の烙印 -local s,id,o=GetID() -function s.initial_effect(c) +function c34995106.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(34995106,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_REMOVE) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,id) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCountLimit(1,34995106) + e1:SetTarget(c34995106.target) + e1:SetOperation(c34995106.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c34995106.regcon) + e2:SetOperation(c34995106.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(34995106,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.setcon) - e3:SetTarget(s.settg) - e3:SetOperation(s.setop) + e3:SetCountLimit(1,34995107) + e3:SetCondition(c34995106.setcon) + e3:SetTarget(c34995106.settg) + e3:SetOperation(c34995106.setop) c:RegisterEffect(e3) end -function s.filter1(c,e) +function c34995106.filter1(c,e) return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e) end -function s.filter2(c,e) +function c34995106.filter2(c,e) return not c:IsImmuneToEffect(e) end -function s.spfilter(c,e,tp,m,f,chkf) +function c34995106.spfilter(c,e,tp,m,f,chkf) return (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function s.chkfilter(c,tp) +function c34995106.chkfilter(c,tp) return c:IsControler(tp) and c:IsCode(68468459) end -function s.exfilter(c,tp) +function c34995106.exfilter(c,tp) return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) end -function s.fcheck(tp,sg,fc) - if sg:IsExists(s.chkfilter,1,nil,tp) then +function c34995106.fcheck(tp,sg,fc) + if sg:IsExists(c34995106.chkfilter,1,nil,tp) then return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) else - return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) and not sg:IsExists(s.exfilter,1,nil,tp) + return sg:IsExists(Card.IsRace,1,nil,RACE_DRAGON) and not sg:IsExists(c34995106.exfilter,1,nil,tp) end end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) +function c34995106.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter2,nil,e) - local mg2=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) - if mg1:IsExists(s.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(s.chkfilter,1,nil,tp) then + local mg1=Duel.GetFusionMaterial(tp):Filter(c34995106.filter2,nil,e) + local mg2=Duel.GetMatchingGroup(c34995106.filter1,tp,LOCATION_GRAVE,0,nil,e) + if mg1:IsExists(c34995106.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(c34995106.chkfilter,1,nil,tp) then mg1:Merge(mg2) end - aux.FCheckAdditional=s.fcheck - local res=Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=c34995106.fcheck + local res=Duel.IsExistingMatchingCard(c34995106.spfilter,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(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) + res=Duel.IsExistingMatchingCard(c34995106.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) end end aux.FCheckAdditional=nil @@ -80,15 +79,15 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,tp,LOCATION_GRAVE) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c34995106.activate(e,tp,eg,ep,ev,re,r,rp) local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter2,nil,e) - local mg2=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) - if mg1:IsExists(s.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(s.chkfilter,1,nil,tp) then + local mg1=Duel.GetFusionMaterial(tp):Filter(c34995106.filter2,nil,e) + local mg2=Duel.GetMatchingGroup(c34995106.filter1,tp,LOCATION_GRAVE,0,nil,e) + if mg1:IsExists(c34995106.chkfilter,1,nil,tp) and mg2:GetCount()>0 or mg2:IsExists(c34995106.chkfilter,1,nil,tp) then mg1:Merge(mg2) end - aux.FCheckAdditional=s.fcheck - local sg1=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + aux.FCheckAdditional=c34995106.fcheck + local sg1=Duel.GetMatchingGroup(c34995106.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg3=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -96,7 +95,7 @@ function s.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(s.spfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf) + sg2=Duel.GetMatchingGroup(c34995106.spfilter,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() @@ -122,22 +121,22 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) end aux.FCheckAdditional=nil end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c34995106.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c34995106.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(34995106,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c34995106.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(34995106)>0 end -function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function c34995106.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c34995106.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c35770983.lua b/c35770983.lua index 0bbe2acfdb..25f4edfe61 100644 --- a/c35770983.lua +++ b/c35770983.lua @@ -1,49 +1,48 @@ --ダイナレスラー・マーシャルアンキロ -local s,id,o=GetID() -function s.initial_effect(c) +function c35770983.initial_effect(c) --atk local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(35770983,0)) e1:SetCategory(CATEGORY_ATKCHANGE) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND+LOCATION_MZONE) - e1:SetCondition(s.atkcon) - e1:SetCost(s.atkcost) - e1:SetOperation(s.atkop) + e1:SetCondition(c35770983.atkcon) + e1:SetCost(c35770983.atkcost) + e1:SetOperation(c35770983.atkop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c35770983.regcon) + e2:SetOperation(c35770983.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(35770983,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCountLimit(1,35770983) + e3:SetCondition(c35770983.spcon) + e3:SetTarget(c35770983.sptg) + e3:SetOperation(c35770983.spop) c:RegisterEffect(e3) end -function s.atkcon(e,tp,eg,ep,ev,re,r,rp) +function c35770983.atkcon(e,tp,eg,ep,ev,re,r,rp) local a=Duel.GetAttacker() local d=Duel.GetAttackTarget() if not a or not d then return false end if a:IsControler(1-tp) then a,d=d,a end return a~=e:GetHandler() and a:IsFaceup() and a:IsSetCard(0x11a) and a:IsRelateToBattle() and d:IsFaceup() and d:IsRelateToBattle() end -function s.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c35770983.atkcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end Duel.SendtoGrave(e:GetHandler(),REASON_COST) end -function s.atkop(e,tp,eg,ep,ev,re,r,rp) +function c35770983.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local a=Duel.GetAttacker() local d=Duel.GetAttackTarget() @@ -59,12 +58,12 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_DAMAGE_STEP_END) - e2:SetOperation(s.atkop2) + e2:SetOperation(c35770983.atkop2) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE) d:RegisterEffect(e2) end end -function s.atkop2(e,tp,eg,ep,ev,re,r,rp) +function c35770983.atkop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToBattle() then local e1=Effect.CreateEffect(c) @@ -75,22 +74,22 @@ function s.atkop2(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e1) end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c35770983.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c35770983.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(35770983,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c35770983.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(35770983)>0 end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c35770983.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 s.spop(e,tp,eg,ep,ev,re,r,rp) +function c35770983.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 then local e1=Effect.CreateEffect(c) diff --git a/c36687247.lua b/c36687247.lua index fe463648e6..7e6e24be1e 100644 --- a/c36687247.lua +++ b/c36687247.lua @@ -1,13 +1,12 @@ --TG ラッシュ・ライノ -local s,id,o=GetID() -function s.initial_effect(c) +function c36687247.initial_effect(c) --atkup local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_UPDATE_ATTACK) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetRange(LOCATION_MZONE) - e1:SetCondition(s.atcon) + e1:SetCondition(c36687247.atcon) e1:SetValue(400) c:RegisterEffect(e1) --to grave @@ -15,25 +14,25 @@ function s.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c36687247.regop) c:RegisterEffect(e2) end -function s.atcon(e) +function c36687247.atcon(e) local ph=Duel.GetCurrentPhase() return (ph==PHASE_DAMAGE or ph==PHASE_DAMAGE_CAL) and e:GetHandler()==Duel.GetAttacker() end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c36687247.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(36687247,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c36687247.thtg) + e1:SetOperation(c36687247.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -44,16 +43,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c36687247.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(36687247) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(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 +function c36687247.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c36687247.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c36687247.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c36687247.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c37021315.lua b/c37021315.lua index f7fac8550f..aaad71ad10 100644 --- a/c37021315.lua +++ b/c37021315.lua @@ -1,6 +1,5 @@ --泥岩の霊長－マンドストロング -local s,id,o=GetID() -function s.initial_effect(c) +function c37021315.initial_effect(c) --set local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -12,50 +11,50 @@ function s.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c37021315.regcon) + e2:SetOperation(c37021315.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,0)) + e3:SetDescription(aux.Stringid(37021315,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCountLimit(1,37021315) + e3:SetCondition(c37021315.spcon) + e3:SetTarget(c37021315.sptg) + e3:SetOperation(c37021315.spop) c:RegisterEffect(e3) end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c37021315.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_DESTROY) and c:IsReason(REASON_EFFECT) and c:IsPreviousControler(tp) and rp==1-tp end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c37021315.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(37021315,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c37021315.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(37021315)>0 end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c37021315.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function s.cfilter(c) - return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(id) +function c37021315.cfilter(c) + return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() and not c:IsCode(37021315) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c37021315.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.IsExistingMatchingCard(aux.NecroValleyFilter(s.cfilter),tp,LOCATION_GRAVE,0,1,nil) - and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then + and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(c37021315.cfilter),tp,LOCATION_GRAVE,0,1,nil) + and Duel.SelectYesNo(tp,aux.Stringid(37021315,1)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.cfilter),tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c37021315.cfilter),tp,LOCATION_GRAVE,0,1,1,nil) Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) end diff --git a/c39049051.lua b/c39049051.lua index 8864d7110a..3fdb9621c8 100644 --- a/c39049051.lua +++ b/c39049051.lua @@ -1,22 +1,21 @@ --歌氷麗月 -local s,id,o=GetID() -function s.initial_effect(c) +function c39049051.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,id) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCountLimit(1,39049051) + e1:SetTarget(c39049051.target) + e1:SetOperation(c39049051.activate) c:RegisterEffect(e1) --reg local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c39049051.regcon) + e2:SetOperation(c39049051.regop) c:RegisterEffect(e2) --to hand local e3=Effect.CreateEffect(c) @@ -24,31 +23,31 @@ function s.initial_effect(c) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,39049052) + e3:SetCondition(c39049051.thcon) + e3:SetTarget(c39049051.thtg) + e3:SetOperation(c39049051.thop) c:RegisterEffect(e3) end -function s.spfilter(c,e,tp) +function c39049051.spfilter(c,e,tp) return c:IsRace(RACE_FAIRY+RACE_SPELLCASTER+RACE_WINDBEAST+RACE_BEASTWARRIOR) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) +function c39049051.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c39049051.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,tp,LOCATION_HAND) end -function s.eqlimit(e,c) +function c39049051.eqlimit(e,c) return e:GetOwner()==c end -function s.drfilter(c) +function c39049051.drfilter(c) return c:IsRace(RACE_DRAGON) and c:IsFaceup() and c:IsAbleToHand() end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c39049051.activate(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c39049051.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp) local tc=g:GetFirst() if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then Duel.Equip(tp,c,tc) @@ -58,34 +57,34 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(s.eqlimit) + e1:SetValue(c39049051.eqlimit) c:RegisterEffect(e1) - local hg=Duel.GetMatchingGroup(s.drfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) - if hg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then + local hg=Duel.GetMatchingGroup(c39049051.drfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) + if hg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(39049051,2)) then Duel.BreakEffect() Duel.SendtoHand(hg,nil,REASON_EFFECT) end end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c39049051.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) +function c39049051.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(39049051,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thfilter(c) +function c39049051.thfilter(c) return (c:IsSetCard(0x46) and c:IsType(TYPE_SPELL) or c:IsCode(6205579)) and c:IsAbleToHand() end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c39049051.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(39049051)>0 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 +function c39049051.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c39049051.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c39049051.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c39049051.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c41373230.lua b/c41373230.lua index bd36e7a314..49d1613c51 100644 --- a/c41373230.lua +++ b/c41373230.lua @@ -1,6 +1,5 @@ --灰燼竜バスタード -local s,id,o=GetID() -function s.initial_effect(c) +function c41373230.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsAttackAbove,2500),1,true,true) @@ -8,44 +7,44 @@ function s.initial_effect(c) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_MATERIAL_CHECK) - e1:SetValue(s.matcheck) + e1:SetValue(c41373230.matcheck) c:RegisterEffect(e1) --immune local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_SPSUMMON_SUCCESS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetCondition(s.imcon) - e2:SetOperation(s.imop) + e2:SetCondition(c41373230.imcon) + e2:SetOperation(c41373230.imop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c41373230.regop) c:RegisterEffect(e3) --to hand/spsummon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,0)) + e4:SetDescription(aux.Stringid(41373230,0)) e4:SetCategory(CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,id) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCountLimit(1,41373230) + e4:SetCondition(c41373230.thcon) + e4:SetTarget(c41373230.thtg) + e4:SetOperation(c41373230.thop) c:RegisterEffect(e4) end -function s.branded_fusion_check(tp,sg,fc) +function c41373230.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsAttackAbove,2500) end -function s.matfilter(c) +function c41373230.matfilter(c) return c:IsFusionType(TYPE_MONSTER) and c:GetOriginalLevel()>0 end -function s.matcheck(e,c) - local g=c:GetMaterial():Filter(s.matfilter,nil) +function c41373230.matcheck(e,c) + local g=c:GetMaterial():Filter(c41373230.matfilter,nil) local atk=g:GetSum(Card.GetOriginalLevel) local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -54,42 +53,42 @@ function s.matcheck(e,c) e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_DISABLE) c:RegisterEffect(e1) end -function s.imcon(e,tp,eg,ep,ev,re,r,rp) +function c41373230.imcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) end -function s.imop(e,tp,eg,ep,ev,re,r,rp) +function c41373230.imop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_IMMUNE_EFFECT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e1:SetValue(s.efilter) + e1:SetValue(c41373230.efilter) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end -function s.efilter(e,te) +function c41373230.efilter(e,te) local tc=te:GetOwner() return tc~=e:GetHandler() and te:IsActiveType(TYPE_MONSTER) and te:IsActivated() and te:GetActivateLocation()==LOCATION_MZONE and tc:IsSummonLocation(LOCATION_EXTRA) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c41373230.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(41373230,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c41373230.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(41373230)>0 end -function s.thfilter(c,e,tp) +function c41373230.thfilter(c,e,tp) if not (c:IsSetCard(0x145) and c:IsType(TYPE_MONSTER) or c:IsCode(68468459)) then return false end local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) return c:IsAbleToHand() or (ft>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) 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,e,tp) end +function c41373230.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c41373230.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c41373230.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c41373230.thfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local tc=g:GetFirst() if tc then diff --git a/c42149850.lua b/c42149850.lua index 63187a57e6..5d6805afe7 100644 --- a/c42149850.lua +++ b/c42149850.lua @@ -1,38 +1,37 @@ --使い捨て学習装置 -local s,id,o=GetID() -function s.initial_effect(c) +function c42149850.initial_effect(c) --activate local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET) - e1:SetTarget(s.target) - e1:SetOperation(s.operation) + e1:SetTarget(c42149850.target) + e1:SetOperation(c42149850.operation) c:RegisterEffect(e1) --atk up local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_EQUIP) e2:SetCode(EFFECT_UPDATE_ATTACK) - e2:SetValue(s.atkval) + e2:SetValue(c42149850.atkval) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetCondition(s.regcon) - e3:SetOperation(s.regop) + e3:SetCondition(c42149850.regcon) + e3:SetOperation(c42149850.regop) c:RegisterEffect(e3) local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,0)) + e4:SetDescription(aux.Stringid(42149850,0)) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,id) - e4:SetCondition(s.setcon) - e4:SetTarget(s.settg) - e4:SetOperation(s.setop) + e4:SetCountLimit(1,42149850) + e4:SetCondition(c42149850.setcon) + e4:SetTarget(c42149850.settg) + e4:SetOperation(c42149850.setop) c:RegisterEffect(e4) --equip limit local e5=Effect.CreateEffect(c) @@ -42,37 +41,37 @@ function s.initial_effect(c) e5:SetValue(1) c:RegisterEffect(e5) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function c42149850.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0) end -function s.operation(e,tp,eg,ep,ev,re,r,rp) +function c42149850.operation(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then Duel.Equip(tp,e:GetHandler(),tc) end end -function s.atkval(e,c) +function c42149850.atkval(e,c) return Duel.GetMatchingGroupCount(Card.IsType,e:GetHandler():GetControler(),LOCATION_GRAVE,0,nil,TYPE_MONSTER)*200 end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c42149850.regcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c42149850.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(42149850,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c42149850.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(42149850)>0 end -function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function c42149850.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c42149850.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SSet(tp,c)~=0 then diff --git a/c43586926.lua b/c43586926.lua index f81c0bb638..65c1aeaa39 100644 --- a/c43586926.lua +++ b/c43586926.lua @@ -1,27 +1,26 @@ --ドル・ドラ -local s,id,o=GetID() -function s.initial_effect(c) +function c43586926.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c43586926.regop) c:RegisterEffect(e1) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c43586926.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then --spsummon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(43586926,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetRange(LOCATION_GRAVE) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_DUEL) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCountLimit(1,43586926+EFFECT_COUNT_CODE_DUEL) + e1:SetTarget(c43586926.sptg) + e1:SetOperation(c43586926.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -32,11 +31,11 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c43586926.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c43586926.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) then local e1=Effect.CreateEffect(c) diff --git a/c48633301.lua b/c48633301.lua index 4eac64153d..d25ae443a4 100644 --- a/c48633301.lua +++ b/c48633301.lua @@ -1,44 +1,43 @@ --TG ブースター・ラプトル -local s,id,o=GetID() -function s.initial_effect(c) +function c48633301.initial_effect(c) --special summon rule local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_SPSUMMON_PROC) e1:SetProperty(EFFECT_FLAG_UNCOPYABLE) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH) - e1:SetCondition(s.sprcon) + e1:SetCountLimit(1,48633301+EFFECT_COUNT_CODE_OATH) + e1:SetCondition(c48633301.sprcon) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c48633301.regop) c:RegisterEffect(e2) end -function s.sprfilter(c) +function c48633301.sprfilter(c) return c:IsFaceup() and c:IsSetCard(0x27) end -function s.sprcon(e,c) +function c48633301.sprcon(e,c) if c==nil then return true end local tp=c:GetControler() return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.sprfilter,tp,LOCATION_MZONE,0,1,nil) + and Duel.IsExistingMatchingCard(c48633301.sprfilter,tp,LOCATION_MZONE,0,1,nil) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c48633301.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(48633301,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c48633301.thtg) + e1:SetOperation(c48633301.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -49,16 +48,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.thfilter(c) - return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c48633301.thfilter(c) + return c:IsSetCard(0x27) and not c:IsCode(48633301) and c:IsType(TYPE_MONSTER) 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 +function c48633301.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c48633301.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c48633301.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c48633301.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c5087128.lua b/c5087128.lua index e9bb71a539..4b984bcf61 100644 --- a/c5087128.lua +++ b/c5087128.lua @@ -1,52 +1,51 @@ --シェルヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c5087128.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(5087128,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,5087128) + e1:SetCondition(c5087128.descon) + e1:SetTarget(c5087128.destg) + e1:SetOperation(c5087128.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c5087128.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c5087128.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.desfilter(c,g) +function c5087128.desfilter(c,g) return g:IsContains(c) end -function s.desfilter2(c,s,tp) +function c5087128.desfilter2(c,s,tp) local seq=c:GetSequence() return seq<5 and math.abs(seq-s)==1 and c:IsControler(tp) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c5087128.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() - local g=Duel.GetMatchingGroup(s.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c:GetColumnGroup()) + local g=Duel.GetMatchingGroup(c5087128.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,c:GetColumnGroup()) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c5087128.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local lg=c:GetColumnGroup() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then - local g=Duel.GetMatchingGroup(s.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,lg) + local g=Duel.GetMatchingGroup(c5087128.desfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,lg) if g:GetCount()==0 then return end Duel.BreakEffect() local tc=nil @@ -58,24 +57,24 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) end local seq=tc:GetSequence() local dg=Group.CreateGroup() - if seq<5 then dg=Duel.GetMatchingGroup(s.desfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,seq,tc:GetControler()) end + if seq<5 then dg=Duel.GetMatchingGroup(c5087128.desfilter2,tp,LOCATION_MZONE,LOCATION_MZONE,nil,seq,tc:GetControler()) end if Duel.Destroy(tc,REASON_EFFECT)~=0 and dg:GetCount()>0 then Duel.Destroy(dg,REASON_EFFECT) end end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c5087128.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(5087128,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,5087129) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c5087128.sptg) + e1:SetOperation(c5087128.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -86,18 +85,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c5087128.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(5087128) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c5087128.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c5087128.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c5087128.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c5087128.spfilter,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 diff --git a/c52481437.lua b/c52481437.lua index a60a3e16f1..3c10df815f 100644 --- a/c52481437.lua +++ b/c52481437.lua @@ -1,89 +1,88 @@ --弾丸特急バレット・ライナー -local s,id,o=GetID() -function s.initial_effect(c) +function c52481437.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(52481437,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,id) - e1:SetCondition(s.spcon) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCountLimit(1,52481437) + e1:SetCondition(c52481437.spcon) + e1:SetTarget(c52481437.sptg) + e1:SetOperation(c52481437.spop) c:RegisterEffect(e1) --attack cost local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_ATTACK_COST) - e2:SetCost(s.atcost) - e2:SetOperation(s.atop) + e2:SetCost(c52481437.atcost) + e2:SetOperation(c52481437.atop) c:RegisterEffect(e2) --register to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c52481437.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,1)) + e4:SetDescription(aux.Stringid(52481437,1)) e4:SetCategory(CATEGORY_TOHAND) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,id+o) + e4:SetCountLimit(1,52481438) e4:SetProperty(EFFECT_FLAG_CARD_TARGET) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCondition(c52481437.thcon) + e4:SetTarget(c52481437.thtg) + e4:SetOperation(c52481437.thop) c:RegisterEffect(e4) end -function s.cfilter(c) +function c52481437.cfilter(c) return c:IsFaceup() and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) +function c52481437.spcon(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetFieldGroup(tp,LOCATION_MZONE,0) - return #g>0 and g:FilterCount(s.cfilter,nil)==#g + return #g>0 and g:FilterCount(c52481437.cfilter,nil)==#g end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c52481437.sptg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c52481437.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 s.atcost(e,c,tp) +function c52481437.atcost(e,c,tp) return Duel.IsExistingMatchingCard(Card.IsAbleToGraveAsCost,tp,LOCATION_ONFIELD,0,2,e:GetHandler()) end -function s.atop(e,tp,eg,ep,ev,re,r,rp) +function c52481437.atop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) local sg=Duel.SelectMatchingCard(tp,Card.IsAbleToGraveAsCost,tp,LOCATION_ONFIELD,0,2,2,e:GetHandler()) Duel.SendtoGrave(sg,REASON_COST) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c52481437.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(52481437,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thfilter(c) - return c:IsRace(RACE_MACHINE) and not c:IsCode(id) and c:IsAbleToHand() +function c52481437.thfilter(c) + return c:IsRace(RACE_MACHINE) and not c:IsCode(52481437) and c:IsAbleToHand() end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c52481437.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(52481437)>0 end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end +function c52481437.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c52481437.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c52481437.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,c52481437.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,tp,LOCATION_GRAVE) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c52481437.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c53266486.lua b/c53266486.lua index 1626c69508..293deaf18c 100644 --- a/c53266486.lua +++ b/c53266486.lua @@ -1,40 +1,39 @@ --アネスヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c53266486.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(53266486,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,53266486) + e1:SetCondition(c53266486.descon) + e1:SetTarget(c53266486.destg) + e1:SetOperation(c53266486.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c53266486.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c53266486.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c53266486.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDestructable() and Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c53266486.desop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) and Duel.Destroy(c,REASON_EFFECT)>0 then local g=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil) @@ -61,18 +60,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e4) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c53266486.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(53266486,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,53266487) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c53266486.sptg) + e1:SetOperation(c53266486.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -83,18 +82,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c53266486.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(53266486) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c53266486.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c53266486.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c53266486.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c53266486.spfilter,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 diff --git a/c53389254.lua b/c53389254.lua index c0e5aa0487..c4124f0cfd 100644 --- a/c53389254.lua +++ b/c53389254.lua @@ -1,6 +1,5 @@ --A BF－五月雨のソハヤ -local s,id,o=GetID() -function s.initial_effect(c) +function c53389254.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) c:EnableReviveLimit() @@ -9,49 +8,49 @@ function s.initial_effect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCondition(s.tncon) - e1:SetOperation(s.tnop) + e1:SetCondition(c53389254.tncon) + e1:SetOperation(c53389254.tnop) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_MATERIAL_CHECK) - e2:SetValue(s.valcheck) + e2:SetValue(c53389254.valcheck) e2:SetLabelObject(e1) c:RegisterEffect(e2) --special summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,0)) + e3:SetDescription(aux.Stringid(53389254,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_SPSUMMON_SUCCESS) - e3:SetCountLimit(1,id) - e3:SetCondition(s.spcon1) - e3:SetTarget(s.sptg1) - e3:SetOperation(s.spop1) + e3:SetCountLimit(1,53389254) + e3:SetCondition(c53389254.spcon1) + e3:SetTarget(c53389254.sptg1) + e3:SetOperation(c53389254.spop1) c:RegisterEffect(e3) --special summon local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,1)) + e4:SetDescription(aux.Stringid(53389254,1)) e4:SetCategory(CATEGORY_SPECIAL_SUMMON) e4:SetType(EFFECT_TYPE_IGNITION) e4:SetRange(LOCATION_GRAVE) - e4:SetCountLimit(1,id+o) - e4:SetCondition(s.spcon2) - e4:SetCost(s.spcost) - e4:SetTarget(s.sptg2) - e4:SetOperation(s.spop2) + e4:SetCountLimit(1,53389255) + e4:SetCondition(c53389254.spcon2) + e4:SetCost(c53389254.spcost) + e4:SetTarget(c53389254.sptg2) + e4:SetOperation(c53389254.spop2) c:RegisterEffect(e4) --register to grave local e5=Effect.CreateEffect(c) e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e5:SetCode(EVENT_TO_GRAVE) - e5:SetOperation(s.regop) + e5:SetOperation(c53389254.regop) c:RegisterEffect(e5) end -s.treat_itself_tuner=true -function s.valcheck(e,c) +c53389254.treat_itself_tuner=true +function c53389254.valcheck(e,c) local g=c:GetMaterial() if g:IsExists(Card.IsSetCard,1,nil,0x33) then e:GetLabelObject():SetLabel(1) @@ -59,10 +58,10 @@ function s.valcheck(e,c) e:GetLabelObject():SetLabel(0) end end -function s.tncon(e,tp,eg,ep,ev,re,r,rp) +function c53389254.tncon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and e:GetLabel()==1 end -function s.tnop(e,tp,eg,ep,ev,re,r,rp) +function c53389254.tnop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -72,50 +71,50 @@ function s.tnop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e1) end -function s.spcon1(e,tp,eg,ep,ev,re,r,rp) +function c53389254.spcon1(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) end -function s.spfilter(c,e,tp) +function c53389254.spfilter(c,e,tp) return c:IsSetCard(0x1033) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end +function c53389254.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c53389254.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(c53389254.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,c53389254.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function s.spop1(e,tp,eg,ep,ev,re,r,rp) +function c53389254.spop1(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) end end -function s.spcon2(e,tp,eg,ep,ev,re,r,rp) +function c53389254.spcon2(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetTurnID()==Duel.GetTurnCount() and not e:GetHandler():IsReason(REASON_RETURN) end -function s.costfilter(c) - return c:IsCode(id) and c:IsAbleToRemoveAsCost() +function c53389254.costfilter(c) + return c:IsCode(53389254) and c:IsAbleToRemoveAsCost() end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end +function c53389254.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c53389254.costfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler()) + local g=Duel.SelectMatchingCard(tp,c53389254.costfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler()) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function c53389254.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 s.spop2(e,tp,eg,ep,ev,re,r,rp) +function c53389254.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c53389254.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) diff --git a/c53971455.lua b/c53971455.lua index cba4a61112..3b680de0f1 100644 --- a/c53971455.lua +++ b/c53971455.lua @@ -1,53 +1,52 @@ --赫聖の妖騎士 -local s,id,o=GetID() -function s.initial_effect(c) +function c53971455.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsLevel,4),aux.NonTuner(nil),1) c:EnableReviveLimit() --atkup local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(53971455,0)) e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetCode(EVENT_LEAVE_DECK) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCondition(s.atkcon) - e1:SetTarget(s.atktg) - e1:SetOperation(s.atkop) + e1:SetCondition(c53971455.atkcon) + e1:SetTarget(c53971455.atktg) + e1:SetOperation(c53971455.atkop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c53971455.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(53971455,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCountLimit(1,53971455) + e3:SetCondition(c53971455.spcon) + e3:SetTarget(c53971455.sptg) + e3:SetOperation(c53971455.spop) c:RegisterEffect(e3) end -function s.atkcon(e,tp,eg,ep,ev,re,r,rp) +function c53971455.atkcon(e,tp,eg,ep,ev,re,r,rp) return eg:IsExists(Card.IsPreviousLocation,1,nil,LOCATION_EXTRA) end -function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk) +function c53971455.atktg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end end -function s.atkfilter(c,e) +function c53971455.atkfilter(c,e) return c:IsFaceup() and not c:IsImmuneToEffect(e) end -function s.atkop(e,tp,eg,ep,ev,re,r,rp) +function c53971455.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - local g=Duel.GetMatchingGroup(s.atkfilter,tp,LOCATION_MZONE,0,nil,e) + local g=Duel.GetMatchingGroup(c53971455.atkfilter,tp,LOCATION_MZONE,0,nil,e) if g:GetCount()>0 then for tc in aux.Next(g) do local e1=Effect.CreateEffect(c) @@ -59,7 +58,7 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) tc:RegisterEffect(e1) end local sg=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil) - if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then + if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(53971455,2)) then Duel.BreakEffect() Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE) local tg=sg:Select(tp,1,1,nil) @@ -84,24 +83,24 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) end end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) +function c53971455.regop(e,tp,eg,ep,ev,re,r,rp) + e:GetHandler():RegisterFlagEffect(53971455,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c53971455.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(53971455)>0 end -function s.spfilter(c,e,tp) +function c53971455.spfilter(c,e,tp) return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER) and aux.AtkEqualsDef(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c53971455.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c53971455.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c53971455.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,s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c53971455.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end diff --git a/c55610595.lua b/c55610595.lua index c9e65af78c..e5db33b234 100644 --- a/c55610595.lua +++ b/c55610595.lua @@ -1,26 +1,25 @@ --BF－上弦のピナーカ -local s,id,o=GetID() -function s.initial_effect(c) +function c55610595.initial_effect(c) --synchro limit local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) - e1:SetValue(s.synlimit) + e1:SetValue(c55610595.synlimit) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c55610595.regop) c:RegisterEffect(e2) end -function s.synlimit(e,c) +function c55610595.synlimit(e,c) if not c then return false end return not c:IsSetCard(0x33) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c55610595.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) @@ -28,9 +27,9 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) - e1:SetCountLimit(1,id) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetCountLimit(1,55610595) + e1:SetTarget(c55610595.thtg) + e1:SetOperation(c55610595.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -41,16 +40,16 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) - return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and not c:IsCode(id) and c:IsAbleToHand() +function c55610595.filter(c) + return c:IsSetCard(0x33) and c:IsType(TYPE_MONSTER) and not c:IsCode(55610595) and c:IsAbleToHand() end -function s.thtg(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 +function c55610595.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c55610595.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c55610595.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c55610595.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c56585883.lua b/c56585883.lua index 866ae5aee2..8bbd92cbc0 100644 --- a/c56585883.lua +++ b/c56585883.lua @@ -1,79 +1,78 @@ --ハーピィ・ハーピスト -local s,id,o=GetID() -function s.initial_effect(c) +function c56585883.initial_effect(c) --change name aux.EnableChangeCode(c,76812113,LOCATION_MZONE+LOCATION_GRAVE) --return local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,0)) + e2:SetDescription(aux.Stringid(56585883,0)) e2:SetCategory(CATEGORY_TOHAND) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetCode(EVENT_SUMMON_SUCCESS) - e2:SetCountLimit(1,id) - e2:SetTarget(s.target) - e2:SetOperation(s.operation) + e2:SetCountLimit(1,56585883) + e2:SetTarget(c56585883.target) + e2:SetOperation(c56585883.operation) c:RegisterEffect(e2) --reg local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetCode(EVENT_TO_GRAVE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e3:SetOperation(s.regop) + e3:SetOperation(c56585883.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,1)) + e4:SetDescription(aux.Stringid(56585883,1)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,id+o) + e4:SetCountLimit(1,56585884) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCondition(c56585883.thcon) + e4:SetTarget(c56585883.thtg) + e4:SetOperation(c56585883.thop) c:RegisterEffect(e4) end -function s.filter1(c) +function c56585883.filter1(c) return c:IsFaceup() and c:IsRace(RACE_WINDBEAST) and c:IsAbleToHand() end -function s.filter2(c) +function c56585883.filter2(c) return c:IsFaceup() and c:IsAbleToHand() end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function c56585883.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return false end - if chk==0 then return Duel.IsExistingTarget(s.filter1,tp,LOCATION_MZONE,0,1,e:GetHandler()) - and Duel.IsExistingTarget(s.filter2,tp,0,LOCATION_MZONE,1,nil) end + if chk==0 then return Duel.IsExistingTarget(c56585883.filter1,tp,LOCATION_MZONE,0,1,e:GetHandler()) + and Duel.IsExistingTarget(c56585883.filter2,tp,0,LOCATION_MZONE,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) - local g1=Duel.SelectTarget(tp,s.filter1,tp,LOCATION_MZONE,0,1,1,e:GetHandler()) + local g1=Duel.SelectTarget(tp,c56585883.filter1,tp,LOCATION_MZONE,0,1,1,e:GetHandler()) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND) - local g2=Duel.SelectTarget(tp,s.filter2,tp,0,LOCATION_MZONE,1,1,nil) + local g2=Duel.SelectTarget(tp,c56585883.filter2,tp,0,LOCATION_MZONE,1,1,nil) g1:Merge(g2) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g1,2,0,0) end -function s.operation(e,tp,eg,ep,ev,re,r,rp) +function c56585883.operation(e,tp,eg,ep,ev,re,r,rp) local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c56585883.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(56585883,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c56585883.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(56585883)>0 end -function s.thfilter(c) +function c56585883.thfilter(c) return c:IsAttackBelow(1500) and c:IsRace(RACE_WINDBEAST) and c:IsLevel(4) 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 +function c56585883.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c56585883.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c56585883.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c56585883.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c56980148.lua b/c56980148.lua index 039897081d..6f85ac423d 100644 --- a/c56980148.lua +++ b/c56980148.lua @@ -1,71 +1,70 @@ --ダイナレスラー・システゴ -local s,id,o=GetID() -function s.initial_effect(c) +function c56980148.initial_effect(c) --search local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(56980148,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DELAY) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCountLimit(1,id) - e1:SetTarget(s.thtg) - e1:SetOperation(s.tgop) + e1:SetCountLimit(1,56980148) + e1:SetTarget(c56980148.thtg) + e1:SetOperation(c56980148.tgop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c56980148.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(56980148,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_PHASE+PHASE_END) - e3:SetCountLimit(1,id+o) + e3:SetCountLimit(1,56980149) e3:SetRange(LOCATION_GRAVE) - e3:SetCondition(s.spcon) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCondition(c56980148.spcon) + e3:SetTarget(c56980148.sptg) + e3:SetOperation(c56980148.spop) c:RegisterEffect(e3) end -function s.thfilter(c) +function c56980148.thfilter(c) return ((c:IsSetCard(0x11a) and c:IsType(TYPE_MONSTER)) or c:IsCode(90173539)) 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 +function c56980148.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c56980148.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.tgop(e,tp,eg,ep,ev,re,r,rp) +function c56980148.tgop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c56980148.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 s.regop(e,tp,eg,ep,ev,re,r,rp) +function c56980148.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(56980148,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 and Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)0 - and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(c56980148.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,c56980148.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c56980148.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) diff --git a/c58383100.lua b/c58383100.lua index 35dba35e89..1145fca2e1 100644 --- a/c58383100.lua +++ b/c58383100.lua @@ -1,63 +1,62 @@ --光波鏡騎士 -local s,id,o=GetID() -function s.initial_effect(c) +function c58383100.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(58383100,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP) e1:SetCode(EVENT_TO_GRAVE) e1:SetRange(LOCATION_HAND) - e1:SetCondition(s.spcon) - e1:SetCost(s.spcost) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCondition(c58383100.spcon) + e1:SetCost(c58383100.spcost) + e1:SetTarget(c58383100.sptg) + e1:SetOperation(c58383100.spop) c:RegisterEffect(e1) --search local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c58383100.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(58383100,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,58383100) + e3:SetCondition(c58383100.thcon) + e3:SetTarget(c58383100.thtg) + e3:SetOperation(c58383100.thop) c:RegisterEffect(e3) end -function s.cfilter(c,e,tp) +function c58383100.cfilter(c,e,tp) return c:IsControler(tp) and c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE) and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousSetCard(0xe5) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return eg:GetCount()==1 and s.cfilter(eg:GetFirst(),e,tp) +function c58383100.spcon(e,tp,eg,ep,ev,re,r,rp) + return eg:GetCount()==1 and c58383100.cfilter(eg:GetFirst(),e,tp) end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c58383100.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsDiscardable() end Duel.SendtoGrave(e:GetHandler(),REASON_COST+REASON_DISCARD) end -function s.filter(c,tp) +function c58383100.filter(c,tp) return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0 end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) end +function c58383100.sptg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c58383100.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,e:GetHandler(),tp) end local ec=eg:GetFirst() Duel.SetTargetCard(ec) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND+LOCATION_ONFIELD) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,ec,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c58383100.spop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) - local tg=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp) + local tg=Duel.SelectMatchingCard(tp,c58383100.filter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,1,nil,tp) local tc=tg:GetFirst() if tc and Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE) then local ec=Duel.GetFirstTarget() @@ -66,23 +65,23 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp) end end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c58383100.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(58383100,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c58383100.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(58383100)>0 end -function s.thfilter(c) +function c58383100.thfilter(c) return c:IsSetCard(0xe5) 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 +function c58383100.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c58383100.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c58383100.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c58383100.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c59123937.lua b/c59123937.lua index fce00181f0..a6a1fe6744 100644 --- a/c59123937.lua +++ b/c59123937.lua @@ -1,89 +1,88 @@ --DDヴァイス・テュポーン -local s,id,o=GetID() -function s.initial_effect(c) +function c59123937.initial_effect(c) --special summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(59123937,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) - e1:SetCountLimit(1,id) - e1:SetCost(s.spcost) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetCountLimit(1,59123937) + e1:SetCost(c59123937.spcost) + e1:SetTarget(c59123937.sptg) + e1:SetOperation(c59123937.spop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c59123937.regop) c:RegisterEffect(e2) --fusion summon local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(59123937,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e3:SetType(EFFECT_TYPE_IGNITION) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.condition) - e3:SetTarget(s.target) - e3:SetOperation(s.operation) + e3:SetCountLimit(1,59123938) + e3:SetCondition(c59123937.condition) + e3:SetTarget(c59123937.target) + e3:SetOperation(c59123937.operation) c:RegisterEffect(e3) end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c59123937.spcost(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsSetCard,1,nil,0xaf) end local g=Duel.SelectReleaseGroup(tp,Card.IsSetCard,1,1,nil,0xaf) Duel.Release(g,REASON_COST) end -function s.spfilter(c,e,tp) +function c59123937.spfilter(c,e,tp) return c:IsLevel(7) and c:IsSetCard(0x10af) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c59123937.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>-1 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c59123937.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c59123937.spop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c59123937.spfilter,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 s.regop(e,tp,eg,ep,ev,re,r,rp) +function c59123937.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(59123937,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.filter0(c) +function c59123937.filter0(c) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() end -function s.filter1(c,e) +function c59123937.filter1(c,e) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function s.filter2(c,e,tp,m,f,gc,chkf) +function c59123937.filter2(c,e,tp,m,f,gc,chkf) return c:IsType(TYPE_FUSION) and c:IsSetCard(0x10af) and c:IsLevelAbove(8) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,gc,chkf) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 end -function s.condition(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)~=0 +function c59123937.condition(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(59123937)~=0 end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) +function c59123937.target(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then local chkf=tp - local mg1=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_GRAVE,0,nil) - local res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,chkf) + local mg1=Duel.GetMatchingGroup(c59123937.filter0,tp,LOCATION_GRAVE,0,nil) + local res=Duel.IsExistingMatchingCard(c59123937.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,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(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf) + res=Duel.IsExistingMatchingCard(c59123937.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,c,chkf) end end return res @@ -91,12 +90,12 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,c,1,tp,LOCATION_GRAVE) end -function s.operation(e,tp,eg,ep,ev,re,r,rp) +function c59123937.operation(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local chkf=tp if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end - local mg1=Duel.GetMatchingGroup(s.filter1,tp,LOCATION_GRAVE,0,nil,e) - local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf) + local mg1=Duel.GetMatchingGroup(c59123937.filter1,tp,LOCATION_GRAVE,0,nil,e) + local sg1=Duel.GetMatchingGroup(c59123937.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf) local mg2=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -104,7 +103,7 @@ function s.operation(e,tp,eg,ep,ev,re,r,rp) local fgroup=ce:GetTarget() mg2=fgroup(ce,e,tp) local mf=ce:GetValue() - sg2=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,chkf) + sg2=Duel.GetMatchingGroup(c59123937.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,mf,c,chkf) end if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then local sg=sg1:Clone() diff --git a/c62022479.lua b/c62022479.lua index 819554896a..c6f33f04b5 100644 --- a/c62022479.lua +++ b/c62022479.lua @@ -1,69 +1,68 @@ --烙印の絆 -local s,id,o=GetID() -function s.initial_effect(c) +function c62022479.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(62022479,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) - e1:SetCountLimit(1,id) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCountLimit(1,62022479) + e1:SetTarget(c62022479.target) + e1:SetOperation(c62022479.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c62022479.regcon) + e2:SetOperation(c62022479.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(62022479,1)) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.setcon) - e3:SetTarget(s.settg) - e3:SetOperation(s.setop) + e3:SetCountLimit(1,62022480) + e3:SetCondition(c62022479.setcon) + e3:SetTarget(c62022479.settg) + e3:SetOperation(c62022479.setop) c:RegisterEffect(e3) end -function s.spfilter(c,e,tp) +function c62022479.spfilter(c,e,tp) return (c:IsFaceup() or c:IsLocation(LOCATION_HAND+LOCATION_GRAVE)) and c:IsCode(68468459) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) +function c62022479.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c62022479.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c62022479.activate(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(s.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c62022479.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c62022479.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c62022479.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(62022479,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c62022479.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(62022479)>0 end -function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function c62022479.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c62022479.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c63009228.lua b/c63009228.lua index d1a5944960..fc28fd89a9 100644 --- a/c63009228.lua +++ b/c63009228.lua @@ -1,43 +1,42 @@ --レスキュー・インターレーサー -local s,id,o=GetID() -function s.initial_effect(c) +function c63009228.initial_effect(c) --Damage to 0 local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(63009228,0)) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_PRE_DAMAGE_CALCULATE) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,id) - e1:SetCondition(s.dmcon) - e1:SetCost(s.dmcost) - e1:SetOperation(s.dmop) + e1:SetCountLimit(1,63009228) + e1:SetCondition(c63009228.dmcon) + e1:SetCost(c63009228.dmcost) + e1:SetOperation(c63009228.dmop) c:RegisterEffect(e1) --revive local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(63009228,1)) e2:SetType(EFFECT_TYPE_TRIGGER_F+EFFECT_TYPE_FIELD) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(s.sumcon) - e2:SetTarget(s.sumtg) - e2:SetOperation(s.sumop) + e2:SetCondition(c63009228.sumcon) + e2:SetTarget(c63009228.sumtg) + e2:SetOperation(c63009228.sumop) c:RegisterEffect(e2) end -function s.dmcon(e,tp,eg,ep,ev,re,r,rp) +function c63009228.dmcon(e,tp,eg,ep,ev,re,r,rp) local d=Duel.GetAttackTarget() return d and d:IsControler(tp) and d:IsRace(RACE_CYBERSE) and Duel.GetBattleDamage(tp)>0 end -function s.dmcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c63009228.dmcost(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() if chk==0 then return c:IsDiscardable() end Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD) if c:IsLocation(LOCATION_GRAVE) then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(63009228,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.dmop(e,tp,eg,ep,ev,re,r,rp) +function c63009228.dmop(e,tp,eg,ep,ev,re,r,rp) local e1=Effect.CreateEffect(e:GetHandler()) e1:SetType(EFFECT_TYPE_FIELD) e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE) @@ -46,14 +45,14 @@ function s.dmop(e,tp,eg,ep,ev,re,r,rp) e1:SetReset(RESET_PHASE+PHASE_DAMAGE) Duel.RegisterEffect(e1,tp) end -function s.sumcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c63009228.sumcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(63009228)>0 end -function s.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c63009228.sumtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function s.sumop(e,tp,eg,ep,ev,re,r,rp) +function c63009228.sumop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) end diff --git a/c64910482.lua b/c64910482.lua index f8925c89a7..42ab377062 100644 --- a/c64910482.lua +++ b/c64910482.lua @@ -1,51 +1,50 @@ --TG サイバー・マジシャン -local s,id,o=GetID() -function s.initial_effect(c) +function c64910482.initial_effect(c) --synchro custom local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetCode(EFFECT_SYNCHRO_MATERIAL_CUSTOM) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) - e1:SetTarget(s.syntg) + e1:SetTarget(c64910482.syntg) e1:SetValue(1) - e1:SetOperation(s.synop) + e1:SetOperation(c64910482.synop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c64910482.regop) c:RegisterEffect(e2) --hand synchro local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE) e3:SetCode(EFFECT_HAND_SYNCHRO) - e3:SetTarget(s.hsyntg) + e3:SetTarget(c64910482.hsyntg) c:RegisterEffect(e3) end -function s.synfilter1(c,syncard,tuner,f) +function c64910482.synfilter1(c,syncard,tuner,f) return c:IsFaceupEx() and c:IsCanBeSynchroMaterial(syncard,tuner) and (f==nil or f(c,syncard)) end -function s.synfilter2(c,syncard,tuner,f) +function c64910482.synfilter2(c,syncard,tuner,f) return c:IsSetCard(0x27) and c:IsNotTuner(syncard) and c:IsCanBeSynchroMaterial(syncard,tuner) and (f==nil or f(c,syncard)) end -function s.syncheck(c,g,mg,tp,lv,syncard,minc,maxc) +function c64910482.syncheck(c,g,mg,tp,lv,syncard,minc,maxc) g:AddCard(c) local ct=g:GetCount() - local res=s.syngoal(g,tp,lv,syncard,minc,ct) - or (ct=minc and g:CheckWithSumEqual(Card.GetSynchroLevel,lv,ct,ct,syncard) and Duel.GetLocationCountFromEx(tp,tp,g,syncard)>0 and aux.MustMaterialCheck(g,tp,EFFECT_MUST_BE_SMATERIAL) end -function s.syntg(e,syncard,f,min,max) +function c64910482.syntg(e,syncard,f,min,max) local minc=min+1 local maxc=max+1 local c=e:GetHandler() @@ -53,29 +52,29 @@ function s.syntg(e,syncard,f,min,max) local lv=syncard:GetLevel() if lv<=c:GetLevel() then return false end local g=Group.FromCards(c) - local mg=Duel.GetSynchroMaterial(tp):Filter(s.synfilter1,c,syncard,c,f) + local mg=Duel.GetSynchroMaterial(tp):Filter(c64910482.synfilter1,c,syncard,c,f) if syncard:IsSetCard(0x27) then - local exg=Duel.GetMatchingGroup(s.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) + local exg=Duel.GetMatchingGroup(c64910482.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) mg:Merge(exg) end - return mg:IsExists(s.syncheck,1,g,g,mg,tp,lv,syncard,minc,maxc) + return mg:IsExists(c64910482.syncheck,1,g,g,mg,tp,lv,syncard,minc,maxc) end -function s.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) +function c64910482.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) local minc=min+1 local maxc=max+1 local c=e:GetHandler() local lv=syncard:GetLevel() local g=Group.FromCards(c) - local mg=Duel.GetSynchroMaterial(tp):Filter(s.synfilter1,c,syncard,c,f) + local mg=Duel.GetSynchroMaterial(tp):Filter(c64910482.synfilter1,c,syncard,c,f) if syncard:IsSetCard(0x27) then - local exg=Duel.GetMatchingGroup(s.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) + local exg=Duel.GetMatchingGroup(c64910482.synfilter2,tp,LOCATION_HAND,0,c,syncard,c,f) mg:Merge(exg) end for i=1,maxc do - local cg=mg:Filter(s.syncheck,g,g,mg,tp,lv,syncard,minc,maxc) + local cg=mg:Filter(c64910482.syncheck,g,g,mg,tp,lv,syncard,minc,maxc) if cg:GetCount()==0 then break end local minct=1 - if s.syngoal(g,tp,lv,syncard,minc,i) then + if c64910482.syngoal(g,tp,lv,syncard,minc,i) then minct=0 end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL) @@ -85,18 +84,18 @@ function s.synop(e,tp,eg,ep,ev,re,r,rp,syncard,f,min,max) end Duel.SetSynchroMaterial(g) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c64910482.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(64910482,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c64910482.thtg) + e1:SetOperation(c64910482.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -107,21 +106,21 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c) - return c:IsSetCard(0x27) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c64910482.filter(c) + return c:IsSetCard(0x27) and not c:IsCode(64910482) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(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 +function c64910482.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c64910482.filter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c64910482.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c64910482.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 s.hsyntg(e,c,syncard) +function c64910482.hsyntg(e,c,syncard) return c:IsSetCard(0x27) and c:IsNotTuner(syncard) end diff --git a/c67100549.lua b/c67100549.lua index 6285606cb9..c24b41222c 100644 --- a/c67100549.lua +++ b/c67100549.lua @@ -1,98 +1,97 @@ --烙印凶鳴 -local s,id,o=GetID() -function s.initial_effect(c) +function c67100549.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(67100549,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetCondition(s.conditon) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCondition(c67100549.conditon) + e1:SetTarget(c67100549.target) + e1:SetOperation(c67100549.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c67100549.regcon) + e2:SetOperation(c67100549.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(67100549,1)) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetCode(EVENT_FREE_CHAIN) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) + e3:SetCountLimit(1,67100549) e3:SetHintTiming(TIMING_END_PHASE) - e3:SetCondition(s.setcon) - e3:SetTarget(s.settg) - e3:SetOperation(s.setop) + e3:SetCondition(c67100549.setcon) + e3:SetTarget(c67100549.settg) + e3:SetOperation(c67100549.setop) c:RegisterEffect(e3) - if not s.global_check then - s.global_check=true + if not c67100549.global_check then + c67100549.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_TO_GRAVE) - ge1:SetCondition(s.checkcon) - ge1:SetOperation(s.checkop) + ge1:SetCondition(c67100549.checkcon) + ge1:SetOperation(c67100549.checkop) Duel.RegisterEffect(ge1,0) end end -function s.checkcon(e,tp,eg,ep,ev,re,r,rp) +function c67100549.checkcon(e,tp,eg,ep,ev,re,r,rp) return eg:IsExists(Card.IsType,1,nil,TYPE_FUSION) end -function s.checkop(e,tp,eg,ep,ev,re,r,rp) +function c67100549.checkop(e,tp,eg,ep,ev,re,r,rp) local g=eg:Filter(Card.IsType,nil,TYPE_FUSION) local tc=g:GetFirst() while tc do - if Duel.GetFlagEffect(tc:GetControler(),id)==0 then - Duel.RegisterFlagEffect(tc:GetControler(),id,RESET_PHASE+PHASE_END,0,1) + if Duel.GetFlagEffect(tc:GetControler(),67100549)==0 then + Duel.RegisterFlagEffect(tc:GetControler(),67100549,RESET_PHASE+PHASE_END,0,1) end - if Duel.GetFlagEffect(0,id)>0 and Duel.GetFlagEffect(1,id)>0 then + if Duel.GetFlagEffect(0,67100549)>0 and Duel.GetFlagEffect(1,67100549)>0 then break end tc=g:GetNext() end end -function s.conditon(e,tp,eg,ep,ev,re,r,rp) - return Duel.GetFlagEffect(tp,id)>0 +function c67100549.conditon(e,tp,eg,ep,ev,re,r,rp) + return Duel.GetFlagEffect(tp,67100549)>0 end -function s.spfilter(c,e,tp) +function c67100549.spfilter(c,e,tp) return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end +function c67100549.target(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(c67100549.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c67100549.activate(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(s.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c67100549.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp) if g:GetCount()>0 then Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c67100549.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c67100549.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(67100549,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 +function c67100549.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(67100549)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 end -function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function c67100549.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c67100549.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c71039903.lua b/c71039903.lua index 2bad26897b..4b958d7b19 100644 --- a/c71039903.lua +++ b/c71039903.lua @@ -1,37 +1,36 @@ --太古の白石 -local s,id,o=GetID() -function s.initial_effect(c) +function c71039903.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c71039903.regop) c:RegisterEffect(e1) -- local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,0)) + e2:SetDescription(aux.Stringid(71039903,0)) e2:SetCategory(CATEGORY_TOHAND) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,id) + e2:SetCountLimit(1,71039903) e2:SetCost(aux.bfgcost) - e2:SetTarget(s.target) - e2:SetOperation(s.operation) + e2:SetTarget(c71039903.target) + e2:SetOperation(c71039903.operation) c:RegisterEffect(e2) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c71039903.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(71039903,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetRange(LOCATION_GRAVE) e1:SetCountLimit(1) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c71039903.sptg) + e1:SetOperation(c71039903.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -41,33 +40,33 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) e2:SetReset(RESET_EVENT|RESETS_STANDARD|RESET_PHASE|PHASE_END) c:RegisterEffect(e2) end -function s.spfilter(c,e,tp) +function c71039903.spfilter(c,e,tp) return c:IsSetCard(0xdd) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c71039903.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c71039903.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c71039903.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c71039903.spfilter,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 s.filter(c) +function c71039903.filter(c) return c:IsSetCard(0xdd) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.filter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,0,1,nil) end +function c71039903.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c71039903.filter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c71039903.filter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,c71039903.filter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function s.operation(e,tp,eg,ep,ev,re,r,rp) +function c71039903.operation(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 then end diff --git a/c71861848.lua b/c71861848.lua index ad48326e50..a0e5aa5718 100644 --- a/c71861848.lua +++ b/c71861848.lua @@ -1,76 +1,75 @@ --転生炎獣コヨーテ -local s,id,o=GetID() -function s.initial_effect(c) +function c71861848.initial_effect(c) --register effect local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_BE_MATERIAL) - e1:SetOperation(s.regop) + e1:SetOperation(c71861848.regop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,0)) + e2:SetDescription(aux.Stringid(71861848,0)) e2:SetProperty(EFFECT_FLAG_CARD_TARGET) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,id) - e2:SetCondition(s.condition) - e2:SetTarget(s.sptg) - e2:SetOperation(s.spop) + e2:SetCountLimit(1,71861848) + e2:SetCondition(c71861848.condition) + e2:SetTarget(c71861848.sptg) + e2:SetOperation(c71861848.spop) c:RegisterEffect(e2) --to hand local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(71861848,1)) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCategory(CATEGORY_TOHAND) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) - e3:SetCondition(s.condition) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,71861848) + e3:SetCondition(c71861848.condition) + e3:SetTarget(c71861848.thtg) + e3:SetOperation(c71861848.thop) c:RegisterEffect(e3) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c71861848.regop(e,tp,eg,ep,ev,re,r,rp) if r==REASON_LINK and e:GetHandler():IsLocation(LOCATION_GRAVE) then - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + e:GetHandler():RegisterFlagEffect(71861848,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.condition(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c71861848.condition(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(71861848)>0 end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x119) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) +function c71861848.spfilter(c,e,tp) + return c:IsSetCard(0x119) and not c:IsCode(71861848) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end +function c71861848.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c71861848.spfilter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingTarget(c71861848.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectTarget(tp,c71861848.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c71861848.spop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) end end -function s.thfilter(c) - return c:IsSetCard(0x119) and c:IsAbleToHand() and not c:IsCode(id) +function c71861848.thfilter(c) + return c:IsSetCard(0x119) and c:IsAbleToHand() and not c:IsCode(71861848) end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end +function c71861848.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and c71861848.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c71861848.thfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,c71861848.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c71861848.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c75311421.lua b/c75311421.lua index 752231c4e0..46ab452cdb 100644 --- a/c75311421.lua +++ b/c75311421.lua @@ -1,72 +1,71 @@ --ボティス -local s,id,o=GetID() -function s.initial_effect(c) +function c75311421.initial_effect(c) --to hand local e1=Effect.CreateEffect(c) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SUMMON_SUCCESS) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c75311421.thtg) + e1:SetOperation(c75311421.thop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetCode(EVENT_TO_GRAVE) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c75311421.regcon) + e2:SetOperation(c75311421.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(s.seqcon) - e3:SetTarget(s.seqtg) - e3:SetOperation(s.seqop) + e3:SetCondition(c75311421.seqcon) + e3:SetTarget(c75311421.seqtg) + e3:SetOperation(c75311421.seqop) c:RegisterEffect(e3) end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c75311421.thtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=3 and Duel.IsPlayerCanRemove(tp) end end -function s.rmfilter(c,g) - return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and g:IsExists(s.thfilter,1,c,c:GetCode()) +function c75311421.rmfilter(c,g) + return c:IsType(TYPE_MONSTER) and c:IsAbleToRemove() and g:IsExists(c75311421.thfilter,1,c,c:GetCode()) end -function s.thfilter(c,code) +function c75311421.thfilter(c,code) return c:IsCode(code) and c:IsAbleToHand() end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c75311421.thop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<3 then return end Duel.ConfirmDecktop(tp,3) local g=Duel.GetDecktopGroup(tp,3) local dg=Duel.GetFieldGroup(tp,LOCATION_DECK,0) - local sg=g:Filter(s.rmfilter,nil,dg) - if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then + local sg=g:Filter(c75311421.rmfilter,nil,dg) + if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(75311421,0)) then Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local rc=sg:Select(tp,1,1,nil):GetFirst() Duel.Remove(rc,POS_FACEUP,REASON_EFFECT) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local tc=dg:FilterSelect(tp,s.thfilter,1,1,rc,rc:GetCode()) + local tc=dg:FilterSelect(tp,c75311421.thfilter,1,1,rc,rc:GetCode()) Duel.SendtoHand(tc,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,tc) end Duel.ShuffleDeck(tp) end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c75311421.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_NORMAL) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c75311421.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(75311421,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.seqcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c75311421.seqcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(75311421)>0 end -function s.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c75311421.seqtg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_DECK)>2 end end -function s.seqop(e,tp,eg,ep,ev,re,r,rp) +function c75311421.seqop(e,tp,eg,ep,ev,re,r,rp) Duel.SortDecktop(tp,tp,3) end diff --git a/c77121851.lua b/c77121851.lua index bda6d2e570..25c8be3d9d 100644 --- a/c77121851.lua +++ b/c77121851.lua @@ -1,51 +1,50 @@ --暗黒のマンティコア -local s,id,o=GetID() -function s.initial_effect(c) +function c77121851.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.tgop) + e1:SetOperation(c77121851.tgop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,0)) + e2:SetDescription(aux.Stringid(77121851,0)) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e2:SetCode(EVENT_PHASE+PHASE_END) e2:SetRange(LOCATION_GRAVE) e2:SetCountLimit(1) - e2:SetCondition(s.spcon) - e2:SetCost(s.spcost) - e2:SetTarget(s.sptg) - e2:SetOperation(s.spop) + e2:SetCondition(c77121851.spcon) + e2:SetCost(c77121851.spcost) + e2:SetTarget(c77121851.sptg) + e2:SetOperation(c77121851.spop) c:RegisterEffect(e2) end -function s.tgop(e,tp,eg,ep,ev,re,r,rp) +function c77121851.tgop(e,tp,eg,ep,ev,re,r,rp) if bit.band(r,REASON_RETURN+REASON_ADJUST)~=0 then return end - e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + e:GetHandler():RegisterFlagEffect(77121851,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)~=0 +function c77121851.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(77121851)~=0 end -function s.costfilter(c) +function c77121851.costfilter(c) return c:IsRace(RACE_BEAST+RACE_BEASTWARRIOR+RACE_WINDBEAST) and (c:IsLocation(LOCATION_HAND) or c:IsFaceup()) and c:IsAbleToGraveAsCost() end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) +function c77121851.spcost(e,tp,eg,ep,ev,re,r,rp,chk) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) local loc=LOCATION_HAND+LOCATION_MZONE if ft<1 then loc=LOCATION_MZONE end - if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(s.costfilter,tp,loc,0,1,nil) end + if chk==0 then return ft>-1 and Duel.IsExistingMatchingCard(c77121851.costfilter,tp,loc,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) - local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,loc,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c77121851.costfilter,tp,loc,0,1,1,nil) Duel.SendtoGrave(g,REASON_COST) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c77121851.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c77121851.spop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) diff --git a/c80250185.lua b/c80250185.lua index 3ab211c98d..a3db0b2e88 100644 --- a/c80250185.lua +++ b/c80250185.lua @@ -1,41 +1,40 @@ --オートヴァレット・ドラゴン -local s,id,o=GetID() -function s.initial_effect(c) +function c80250185.initial_effect(c) --destroy local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(80250185,0)) e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetCode(EVENT_CHAINING) e1:SetRange(LOCATION_MZONE) - e1:SetCountLimit(1,id) - e1:SetCondition(s.descon) - e1:SetTarget(s.destg) - e1:SetOperation(s.desop) + e1:SetCountLimit(1,80250185) + e1:SetCondition(c80250185.descon) + e1:SetTarget(c80250185.destg) + e1:SetOperation(c80250185.desop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c80250185.regop) c:RegisterEffect(e2) end -function s.descon(e,tp,eg,ep,ev,re,r,rp) +function c80250185.descon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end local g=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS) if not g or not g:IsContains(c) then return false end return re:IsActiveType(TYPE_LINK) end -function s.destg(e,tp,eg,ep,ev,re,r,rp,chk) +function c80250185.destg(e,tp,eg,ep,ev,re,r,rp,chk) local c=e:GetHandler() local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,TYPE_SPELL+TYPE_TRAP) if chk==0 then return c:IsDestructable() and g:GetCount()>0 end Duel.SetOperationInfo(0,CATEGORY_DESTROY,c,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) end -function s.desop(e,tp,eg,ep,ev,re,r,rp) +function c80250185.desop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.Destroy(e:GetHandler(),REASON_EFFECT)>0 then local g=Duel.GetMatchingGroup(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil,TYPE_SPELL+TYPE_TRAP) if g:GetCount()==0 then return end @@ -45,18 +44,18 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp) Duel.SendtoGrave(sg,REASON_EFFECT) end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c80250185.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,1)) + e1:SetDescription(aux.Stringid(80250185,1)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id+o) + e1:SetCountLimit(1,80250186) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c80250185.sptg) + e1:SetOperation(c80250185.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -67,18 +66,18 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x102) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c80250185.spfilter(c,e,tp) + return c:IsSetCard(0x102) and not c:IsCode(80250185) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c80250185.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c80250185.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c80250185.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c80250185.spfilter,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 diff --git a/c81570454.lua b/c81570454.lua index 4e50b7ca3b..681b062ed2 100644 --- a/c81570454.lua +++ b/c81570454.lua @@ -1,46 +1,45 @@ --焔聖騎士－ローラン -local s,id,o=GetID() -function s.initial_effect(c) +function c81570454.initial_effect(c) --equip local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(81570454,0)) e1:SetCategory(CATEGORY_EQUIP) e1:SetType(EFFECT_TYPE_QUICK_O) e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP) e1:SetCode(EVENT_FREE_CHAIN) e1:SetRange(LOCATION_HAND) - e1:SetCountLimit(1,id) + e1:SetCountLimit(1,81570454) e1:SetCondition(aux.dscon) - e1:SetTarget(s.eqtg) - e1:SetOperation(s.eqop) + e1:SetTarget(c81570454.eqtg) + e1:SetOperation(c81570454.eqop) c:RegisterEffect(e1) --to hand local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c81570454.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(81570454,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,81570455) + e3:SetCondition(c81570454.thcon) + e3:SetTarget(c81570454.thtg) + e3:SetOperation(c81570454.thop) c:RegisterEffect(e3) end -function s.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function c81570454.eqtg(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 chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 and Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP) Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil) end -function s.eqop(e,tp,eg,ep,ev,re,r,rp) +function c81570454.eqop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if not c:IsRelateToEffect(e) then return end local tc=Duel.GetFirstTarget() @@ -54,7 +53,7 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp) e1:SetCode(EFFECT_EQUIP_LIMIT) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetReset(RESET_EVENT+RESETS_STANDARD) - e1:SetValue(s.eqlimit) + e1:SetValue(c81570454.eqlimit) e1:SetLabelObject(tc) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -64,26 +63,26 @@ function s.eqop(e,tp,eg,ep,ev,re,r,rp) e2:SetReset(RESET_EVENT+RESETS_STANDARD) c:RegisterEffect(e2) end -function s.eqlimit(e,c) +function c81570454.eqlimit(e,c) return c==e:GetLabelObject() end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c81570454.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(81570454,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c81570454.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(81570454)>0 end -function s.thfilter(c) - return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR)) or c:IsType(TYPE_EQUIP)) and not c:IsCode(id) and c:IsAbleToHand() +function c81570454.thfilter(c) + return ((c:IsAttribute(ATTRIBUTE_FIRE) and c:IsRace(RACE_WARRIOR)) or c:IsType(TYPE_EQUIP)) and not c:IsCode(81570454) 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 +function c81570454.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c81570454.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c81570454.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c81570454.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c84121193.lua b/c84121193.lua index 6ffe978ecd..43487d696d 100644 --- a/c84121193.lua +++ b/c84121193.lua @@ -1,44 +1,43 @@ --コードブレイカー・ウイルスソードマン -local s,id,o=GetID() -function s.initial_effect(c) +function c84121193.initial_effect(c) --link summon aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2) c:EnableReviveLimit() --spsummon1 local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(84121193,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SPSUMMON_SUCCESS) - e1:SetCountLimit(1,id) - e1:SetCost(s.spcon1) - e1:SetTarget(s.sptg1) - e1:SetOperation(s.spop1) + e1:SetCountLimit(1,84121193) + e1:SetCost(c84121193.spcon1) + e1:SetTarget(c84121193.sptg1) + e1:SetOperation(c84121193.spop1) c:RegisterEffect(e1) --spsummon2 local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon1) - e2:SetOperation(s.regop1) + e2:SetCondition(c84121193.regcon1) + e2:SetOperation(c84121193.regop1) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(84121193,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.spcon2) - e3:SetTarget(s.sptg2) - e3:SetOperation(s.spop2) + e3:SetCountLimit(1,84121194) + e3:SetCondition(c84121193.spcon2) + e3:SetTarget(c84121193.sptg2) + e3:SetOperation(c84121193.spop2) c:RegisterEffect(e3) end -function s.spcon1(e,tp,eg,ep,ev,re,r,rp) +function c84121193.spcon1(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetMutualLinkedGroupCount()>0 end -function s.spfilter(c,e,tp) +function c84121193.spfilter(c,e,tp) if not c:IsCode(8662794) then return false end local ok=false for p=0,1 do @@ -48,12 +47,12 @@ function s.spfilter(c,e,tp) end return ok end -function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk) +function c84121193.sptg1(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsRelateToEffect(e) - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c84121193.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE) end -function s.spop1(e,tp,eg,ep,ev,re,r,rp) +function c84121193.spop1(e,tp,eg,ep,ev,re,r,rp) local zone={} local flag={} for p=0,1 do @@ -65,7 +64,7 @@ function s.spop1(e,tp,eg,ep,ev,re,r,rp) local ft2=Duel.GetLocationCount(1,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone[1]) if ft1+ft2<=0 then return end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c84121193.spfilter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil,e,tp) if g:GetCount()>0 then local tc=g:GetFirst() if tc then @@ -88,23 +87,23 @@ function s.spop1(e,tp,eg,ep,ev,re,r,rp) end end end -function s.regcon1(e,tp,eg,ep,ev,re,r,rp) +function c84121193.regcon1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsReason(REASON_DESTROY) and rp==1-tp and c:IsPreviousControler(tp) end -function s.regop1(e,tp,eg,ep,ev,re,r,rp) +function c84121193.regop1(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(84121193,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.spcon2(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c84121193.spcon2(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(84121193)>0 end -function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk) +function c84121193.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,tp,LOCATION_GRAVE) end -function s.spop2(e,tp,eg,ep,ev,re,r,rp) +function c84121193.spop2(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then diff --git a/c84764038.lua b/c84764038.lua index 436d8e91f4..0a851ecc1c 100644 --- a/c84764038.lua +++ b/c84764038.lua @@ -1,85 +1,84 @@ --彼岸の悪鬼 スカラマリオン -local s,id,o=GetID() -function s.initial_effect(c) +function c84764038.initial_effect(c) --self destroy local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE) e1:SetRange(LOCATION_MZONE) e1:SetCode(EFFECT_SELF_DESTROY) - e1:SetCondition(s.sdcon) + e1:SetCondition(c84764038.sdcon) c:RegisterEffect(e1) --Special Summon local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,0)) + e2:SetDescription(aux.Stringid(84764038,0)) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetCategory(CATEGORY_SPECIAL_SUMMON) e2:SetRange(LOCATION_HAND) - e2:SetCountLimit(1,id) - e2:SetCondition(s.sscon) - e2:SetTarget(s.sstg) - e2:SetOperation(s.ssop) + e2:SetCountLimit(1,84764038) + e2:SetCondition(c84764038.sscon) + e2:SetTarget(c84764038.sstg) + e2:SetOperation(c84764038.ssop) c:RegisterEffect(e2) --to grave local e3=Effect.CreateEffect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c84764038.regop) c:RegisterEffect(e3) --search local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,1)) + e4:SetDescription(aux.Stringid(84764038,1)) e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e4:SetCode(EVENT_PHASE+PHASE_END) - e4:SetCountLimit(1,id) + e4:SetCountLimit(1,84764038) e4:SetRange(LOCATION_GRAVE) - e4:SetCondition(s.thcon) - e4:SetTarget(s.thtg) - e4:SetOperation(s.thop) + e4:SetCondition(c84764038.thcon) + e4:SetTarget(c84764038.thtg) + e4:SetOperation(c84764038.thop) c:RegisterEffect(e4) end -function s.sdfilter(c) +function c84764038.sdfilter(c) return c:IsFacedown() or not c:IsSetCard(0xb1) end -function s.sdcon(e) - return Duel.IsExistingMatchingCard(s.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) +function c84764038.sdcon(e) + return Duel.IsExistingMatchingCard(c84764038.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) end -function s.filter(c) +function c84764038.filter(c) return c:IsType(TYPE_SPELL+TYPE_TRAP) end -function s.sscon(e,tp,eg,ep,ev,re,r,rp) - return not Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD,0,1,nil) +function c84764038.sscon(e,tp,eg,ep,ev,re,r,rp) + return not Duel.IsExistingMatchingCard(c84764038.filter,tp,LOCATION_ONFIELD,0,1,nil) end -function s.sstg(e,tp,eg,ep,ev,re,r,rp,chk) +function c84764038.sstg(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 s.ssop(e,tp,eg,ep,ev,re,r,rp) +function c84764038.ssop(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 s.regop(e,tp,eg,ep,ev,re,r,rp) +function c84764038.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(84764038,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thfilter(c) +function c84764038.thfilter(c) return c:IsLevel(3) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_FIEND) - and not c:IsCode(id) and c:IsAbleToHand() + and not c:IsCode(84764038) and c:IsAbleToHand() end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c84764038.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(84764038)>0 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 +function c84764038.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c84764038.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c84764038.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c84764038.thfilter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c86943389.lua b/c86943389.lua index 39af522169..8db30daf03 100644 --- a/c86943389.lua +++ b/c86943389.lua @@ -1,44 +1,43 @@ --HSR快刀乱破ズール -local s,id,o=GetID() -function s.initial_effect(c) +function c86943389.initial_effect(c) --synchro summon aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1) c:EnableReviveLimit() --Double ATK local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(86943389,0)) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_BATTLE_START) - e1:SetCondition(s.atkcon) - e1:SetOperation(s.atkop) + e1:SetCondition(c86943389.atkcon) + e1:SetOperation(c86943389.atkop) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c86943389.regcon) + e2:SetOperation(c86943389.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(86943389,1)) e3:SetCategory(CATEGORY_TOHAND) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetCountLimit(1) e3:SetRange(LOCATION_GRAVE) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCondition(c86943389.thcon) + e3:SetTarget(c86943389.thtg) + e3:SetOperation(c86943389.thop) c:RegisterEffect(e3) end -function s.atkcon(e,tp,eg,ep,ev,re,r,rp) +function c86943389.atkcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local bc=c:GetBattleTarget() return bc and bc:IsSummonType(SUMMON_TYPE_SPECIAL) end -function s.atkop(e,tp,eg,ep,ev,re,r,rp) +function c86943389.atkop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsFaceup() and c:IsRelateToEffect(e) then local e1=Effect.CreateEffect(c) @@ -49,28 +48,28 @@ function s.atkop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e1) end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c86943389.regcon(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_SYNCHRO) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c86943389.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(86943389,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c86943389.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(86943389)>0 end -function s.thfilter(c) - return c:IsSetCard(0x2016) and not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() +function c86943389.thfilter(c) + return c:IsSetCard(0x2016) and not c:IsCode(86943389) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand() end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.thfilter(chkc) end - if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end +function c86943389.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c86943389.thfilter(chkc) end + if chk==0 then return Duel.IsExistingTarget(c86943389.thfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectTarget(tp,c86943389.thfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c86943389.thop(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsRelateToEffect(e) then Duel.SendtoHand(tc,nil,REASON_EFFECT) diff --git a/c87746184.lua b/c87746184.lua index 0acac541a2..e755cc7798 100644 --- a/c87746184.lua +++ b/c87746184.lua @@ -1,71 +1,70 @@ --烙印竜アルビオン -local s,id,o=GetID() -function s.initial_effect(c) +function c87746184.initial_effect(c) --fusion material c:EnableReviveLimit() aux.AddFusionProcCodeFun(c,68468459,aux.FilterBoolFunction(Card.IsFusionAttribute,ATTRIBUTE_LIGHT),1,true,true) --fusion summon local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(87746184,0)) e1:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_SPSUMMON_SUCCESS) e1:SetProperty(EFFECT_FLAG_DELAY) - e1:SetCountLimit(1,id) - e1:SetCondition(s.condition) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetCountLimit(1,87746184) + e1:SetCondition(c87746184.condition) + e1:SetTarget(c87746184.target) + e1:SetOperation(c87746184.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c87746184.regop) c:RegisterEffect(e2) --to hand/set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(87746184,1)) e3:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id+o) - e3:SetCondition(s.thcon) - e3:SetTarget(s.thtg) - e3:SetOperation(s.thop) + e3:SetCountLimit(1,87746185) + e3:SetCondition(c87746184.thcon) + e3:SetTarget(c87746184.thtg) + e3:SetOperation(c87746184.thop) c:RegisterEffect(e3) end -function s.branded_fusion_check(tp,sg,fc) +function c87746184.branded_fusion_check(tp,sg,fc) return aux.gffcheck(sg,Card.IsFusionCode,68468459,Card.IsFusionAttribute,ATTRIBUTE_LIGHT) end -function s.condition(e,tp,eg,ep,ev,re,r,rp) +function c87746184.condition(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) and Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)==0 end -function s.filter1(c,e) +function c87746184.filter1(c,e) return c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function s.filter2(c,e,tp,m,f,chkf) - return c:IsType(TYPE_FUSION) and c:IsLevelBelow(8) and not c:IsCode(id) and (not f or f(c)) +function c87746184.filter2(c,e,tp,m,f,chkf) + return c:IsType(TYPE_FUSION) and c:IsLevelBelow(8) and not c:IsCode(87746184) and (not f or f(c)) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf) end -function s.filter3(c,e) +function c87746184.filter3(c,e) return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk) +function c87746184.target(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then local chkf=tp - local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e) - local mg2=Duel.GetMatchingGroup(s.filter3,tp,LOCATION_GRAVE,0,nil,e) + local mg1=Duel.GetFusionMaterial(tp):Filter(c87746184.filter1,nil,e) + local mg2=Duel.GetMatchingGroup(c87746184.filter3,tp,LOCATION_GRAVE,0,nil,e) mg1:Merge(mg2) - local res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf) + local res=Duel.IsExistingMatchingCard(c87746184.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(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) + res=Duel.IsExistingMatchingCard(c87746184.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf) end end return res @@ -73,13 +72,13 @@ function s.target(e,tp,eg,ep,ev,re,r,rp,chk) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA) Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD+LOCATION_HAND+LOCATION_GRAVE) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c87746184.activate(e,tp,eg,ep,ev,re,r,rp) local chkf=tp if Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)~=0 then return end - local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e) - local mg2=Duel.GetMatchingGroup(s.filter3,tp,LOCATION_GRAVE,0,nil,e) + local mg1=Duel.GetFusionMaterial(tp):Filter(c87746184.filter1,nil,e) + local mg2=Duel.GetMatchingGroup(c87746184.filter3,tp,LOCATION_GRAVE,0,nil,e) mg1:Merge(mg2) - local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) + local sg1=Duel.GetMatchingGroup(c87746184.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf) local mg3=nil local sg2=nil local ce=Duel.GetChainMaterial(tp) @@ -87,7 +86,7 @@ function s.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(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf) + sg2=Duel.GetMatchingGroup(c87746184.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() @@ -109,23 +108,23 @@ function s.activate(e,tp,eg,ep,ev,re,r,rp) tc:CompleteProcedure() end end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c87746184.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(87746184,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c87746184.thcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(87746184)>0 end -function s.thfilter(c) +function c87746184.thfilter(c) if not (c:IsSetCard(0x15d) and c:IsType(TYPE_SPELL+TYPE_TRAP)) then return false end return c:IsAbleToHand() or c:IsSSetable() 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 +function c87746184.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c87746184.thfilter,tp,LOCATION_DECK,0,1,nil) end end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c87746184.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c87746184.thfilter,tp,LOCATION_DECK,0,1,1,nil) local tc=g:GetFirst() if tc then if tc:IsAbleToHand() and (not tc:IsSSetable() or Duel.SelectOption(tp,1190,1153)==0) then diff --git a/c88753985.lua b/c88753985.lua index 5f508b7624..caa8c77f0b 100644 --- a/c88753985.lua +++ b/c88753985.lua @@ -1,12 +1,11 @@ --きつね火 -local s,id,o=GetID() -function s.initial_effect(c) +function c88753985.initial_effect(c) --register local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_BATTLE_DESTROYED) - e1:SetOperation(s.regop) + e1:SetOperation(c88753985.regop) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) @@ -16,18 +15,18 @@ function s.initial_effect(c) e2:SetValue(1) c:RegisterEffect(e2) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c88753985.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsLocation(LOCATION_GRAVE) and c:IsReason(REASON_BATTLE) and c:IsPreviousPosition(POS_FACEUP) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(88753985,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c88753985.sptg) + e1:SetOperation(c88753985.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -38,11 +37,11 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c88753985.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return true end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c88753985.spop(e,tp,eg,ep,ev,re,r,rp) if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP) diff --git a/c93483212.lua b/c93483212.lua index 21fc3ef9ef..71a1da524f 100644 --- a/c93483212.lua +++ b/c93483212.lua @@ -1,52 +1,51 @@ --極神聖帝オーディン -local s,id,o=GetID() -function s.initial_effect(c) +function c93483212.initial_effect(c) --synchro summon - aux.AddSynchroProcedure(c,s.tfilter,aux.NonTuner(nil),2) + aux.AddSynchroProcedure(c,c93483212.tfilter,aux.NonTuner(nil),2) c:EnableReviveLimit() --disable local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(93483212,0)) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetOperation(s.imop) + e1:SetOperation(c93483212.imop) c:RegisterEffect(e1) --special summon local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c93483212.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(93483212,1)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetCondition(s.spcon) - e3:SetCost(s.spcost) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetCondition(c93483212.spcon) + e3:SetCost(c93483212.spcost) + e3:SetTarget(c93483212.sptg) + e3:SetOperation(c93483212.spop) c:RegisterEffect(e3) --damage local e4=Effect.CreateEffect(c) - e4:SetDescription(aux.Stringid(id,2)) + e4:SetDescription(aux.Stringid(93483212,2)) e4:SetCategory(CATEGORY_DRAW) e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET) e4:SetCode(EVENT_SPSUMMON_SUCCESS) - e4:SetCondition(s.drcon) - e4:SetTarget(s.drtg) - e4:SetOperation(s.drop) + e4:SetCondition(c93483212.drcon) + e4:SetTarget(c93483212.drtg) + e4:SetOperation(c93483212.drop) c:RegisterEffect(e4) end -function s.tfilter(c) +function c93483212.tfilter(c) return c:IsSetCard(0x3042) or c:IsHasEffect(61777313) end -function s.imop(e,tp,eg,ep,ev,re,r,rp) +function c93483212.imop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsFaceup() and c:IsRelateToEffect(e) then local e1=Effect.CreateEffect(c) @@ -54,55 +53,55 @@ function s.imop(e,tp,eg,ep,ev,re,r,rp) e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE) e1:SetRange(LOCATION_MZONE) e1:SetCode(EFFECT_IMMUNE_EFFECT) - e1:SetValue(s.imfilter) + e1:SetValue(c93483212.imfilter) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) end end -function s.imfilter(e,re) +function c93483212.imfilter(e,re) return re:IsActiveType(TYPE_SPELL+TYPE_TRAP) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c93483212.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local pos=c:GetPreviousPosition() if c:IsReason(REASON_BATTLE) then pos=c:GetBattlePosition() end if rp==1-tp and c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:IsPreviousLocation(LOCATION_ONFIELD) and bit.band(pos,POS_FACEUP)~=0 then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(93483212,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end end -function s.spcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)~=0 +function c93483212.spcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(93483212)~=0 end -function s.cfilter(c) +function c93483212.cfilter(c) return c:IsSetCard(0x3042) and c:IsType(TYPE_TUNER) and c:IsAbleToRemoveAsCost() end -function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end +function c93483212.spcost(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c93483212.cfilter,tp,LOCATION_GRAVE,0,1,nil) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) - local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c93483212.cfilter,tp,LOCATION_GRAVE,0,1,1,nil) Duel.Remove(g,POS_FACEUP,REASON_COST) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c93483212.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 s.spop(e,tp,eg,ep,ev,re,r,rp) +function c93483212.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) then Duel.SpecialSummon(e:GetHandler(),SUMMON_VALUE_SELF,tp,tp,false,false,POS_FACEUP) end end -function s.drcon(e,tp,eg,ep,ev,re,r,rp) +function c93483212.drcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetSummonType()==SUMMON_TYPE_SPECIAL+SUMMON_VALUE_SELF end -function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk) +function c93483212.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 s.drop(e,tp,eg,ep,ev,re,r,rp) +function c93483212.drop(e,tp,eg,ep,ev,re,r,rp) local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM) Duel.Draw(p,d,REASON_EFFECT) end diff --git a/c93595154.lua b/c93595154.lua index ed16587cb9..40fdc4c158 100644 --- a/c93595154.lua +++ b/c93595154.lua @@ -1,78 +1,77 @@ --烙印の裁き -local s,id,o=GetID() -function s.initial_effect(c) +function c93595154.initial_effect(c) aux.AddCodeList(c,68468459) --Activate local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(93595154,0)) e1:SetCategory(CATEGORY_DESTROY) e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EVENT_FREE_CHAIN) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE) - e1:SetTarget(s.target) - e1:SetOperation(s.activate) + e1:SetTarget(c93595154.target) + e1:SetOperation(c93595154.activate) c:RegisterEffect(e1) --to grave local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetCondition(s.regcon) - e2:SetOperation(s.regop) + e2:SetCondition(c93595154.regcon) + e2:SetOperation(c93595154.regop) c:RegisterEffect(e2) --set local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,1)) + e3:SetDescription(aux.Stringid(93595154,1)) e3:SetType(EFFECT_TYPE_QUICK_O) e3:SetCode(EVENT_FREE_CHAIN) e3:SetRange(LOCATION_GRAVE) - e3:SetCountLimit(1,id) + e3:SetCountLimit(1,93595154) e3:SetHintTiming(TIMING_END_PHASE) - e3:SetCondition(s.setcon) - e3:SetTarget(s.settg) - e3:SetOperation(s.setop) + e3:SetCondition(c93595154.setcon) + e3:SetTarget(c93595154.settg) + e3:SetOperation(c93595154.setop) c:RegisterEffect(e3) end -function s.filter(c,tp) - return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevelAbove(8) and Duel.IsExistingMatchingCard(s.desfilter,tp,0,LOCATION_MZONE,1,nil,c:GetAttack()) +function c93595154.filter(c,tp) + return c:IsFaceup() and c:IsType(TYPE_FUSION) and c:IsLevelAbove(8) and Duel.IsExistingMatchingCard(c93595154.desfilter,tp,0,LOCATION_MZONE,1,nil,c:GetAttack()) end -function s.desfilter(c,atk) +function c93595154.desfilter(c,atk) return c:IsFaceup() and c:IsAttackAbove(atk) end -function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc,tp) end - if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil,tp) end +function c93595154.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c93595154.filter(chkc,tp) end + if chk==0 then return Duel.IsExistingTarget(c93595154.filter,tp,LOCATION_MZONE,0,1,nil,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET) - local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil,tp) - local dg=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil,g:GetFirst():GetAttack()) + local g=Duel.SelectTarget(tp,c93595154.filter,tp,LOCATION_MZONE,0,1,1,nil,tp) + local dg=Duel.GetMatchingGroup(c93595154.desfilter,tp,0,LOCATION_MZONE,nil,g:GetFirst():GetAttack()) Duel.SetOperationInfo(0,CATEGORY_DESTROY,dg,dg:GetCount(),0,0) end -function s.activate(e,tp,eg,ep,ev,re,r,rp) +function c93595154.activate(e,tp,eg,ep,ev,re,r,rp) local tc=Duel.GetFirstTarget() if tc:IsFaceup() and tc:IsRelateToEffect(e) then - local g=Duel.GetMatchingGroup(s.desfilter,tp,0,LOCATION_MZONE,nil,tc:GetAttack()) + local g=Duel.GetMatchingGroup(c93595154.desfilter,tp,0,LOCATION_MZONE,nil,tc:GetAttack()) if g:GetCount()>0 then Duel.Destroy(g,REASON_EFFECT) end end end -function s.regcon(e,tp,eg,ep,ev,re,r,rp) +function c93595154.regcon(e,tp,eg,ep,ev,re,r,rp) local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2) return e:GetHandler():IsReason(REASON_COST) and re and re:IsActivated() and (code1==68468459 or code2==68468459) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c93595154.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) + c:RegisterFlagEffect(93595154,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,227) end -function s.setcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 +function c93595154.setcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(93595154)>0 and Duel.GetCurrentPhase()&PHASE_END~=0 end -function s.settg(e,tp,eg,ep,ev,re,r,rp,chk) +function c93595154.settg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return e:GetHandler():IsSSetable() end Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0) end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c93595154.setop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsRelateToEffect(e) then Duel.SSet(tp,c) diff --git a/c93751476.lua b/c93751476.lua index 56a4b43929..7ebc1c28d3 100644 --- a/c93751476.lua +++ b/c93751476.lua @@ -1,36 +1,35 @@ --猛炎星－テンレイ -local s,id,o=GetID() -function s.initial_effect(c) +function c93751476.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c93751476.regop) c:RegisterEffect(e1) --set local e2=Effect.CreateEffect(c) - e2:SetDescription(aux.Stringid(id,1)) + e2:SetDescription(aux.Stringid(93751476,1)) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O) e2:SetProperty(EFFECT_FLAG_DELAY) e2:SetCode(EVENT_BE_MATERIAL) - e2:SetCondition(s.setcon) - e2:SetTarget(s.settg) - e2:SetOperation(s.setop) + e2:SetCondition(c93751476.setcon) + e2:SetTarget(c93751476.settg) + e2:SetOperation(c93751476.setop) c:RegisterEffect(e2) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c93751476.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_EFFECT) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(93751476,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetCountLimit(1) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c93751476.sptg) + e1:SetOperation(c93751476.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -41,35 +40,35 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.spfilter(c,e,tp) - return c:IsSetCard(0x79) and c:IsLevel(4) and not c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) +function c93751476.spfilter(c,e,tp) + return c:IsSetCard(0x79) and c:IsLevel(4) and not c:IsCode(93751476) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk) +function c93751476.sptg(e,tp,eg,ep,ev,re,r,rp,chk) if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 - and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end + and Duel.IsExistingMatchingCard(c93751476.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c93751476.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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp) + local g=Duel.SelectMatchingCard(tp,c93751476.spfilter,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 s.setcon(e,tp,eg,ep,ev,re,r,rp) +function c93751476.setcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():IsLocation(LOCATION_GRAVE) and r==REASON_SYNCHRO and e:GetHandler():GetReasonCard():IsSetCard(0x79) end -function s.filter(c) +function c93751476.filter(c) return c:IsSetCard(0x7c) and c:IsType(TYPE_SPELL) and c:IsSSetable() end -function s.settg(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 +function c93751476.settg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c93751476.filter,tp,LOCATION_DECK,0,1,nil) end end -function s.setop(e,tp,eg,ep,ev,re,r,rp) +function c93751476.setop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c93751476.filter,tp,LOCATION_DECK,0,1,1,nil) if g:GetCount()>0 then Duel.SSet(tp,g:GetFirst()) end diff --git a/c95816395.lua b/c95816395.lua index c13f1acc30..c409b3ebf8 100644 --- a/c95816395.lua +++ b/c95816395.lua @@ -1,26 +1,25 @@ --どぐう -local s,id,o=GetID() -function s.initial_effect(c) +function c95816395.initial_effect(c) --to grave local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e1:SetCode(EVENT_TO_GRAVE) - e1:SetOperation(s.regop) + e1:SetOperation(c95816395.regop) c:RegisterEffect(e1) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c95816395.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if rp==1-tp and c:IsReason(REASON_EFFECT) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(95816395,0)) e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) - e1:SetCountLimit(1,id) + e1:SetCountLimit(1,95816395) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.thtg) - e1:SetOperation(s.thop) + e1:SetTarget(c95816395.thtg) + e1:SetOperation(c95816395.thop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -31,20 +30,20 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c,tp) +function c95816395.filter(c,tp) return c:IsType(TYPE_MONSTER) and c:IsAbleToHand() - and not Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,c:GetLevel()) + and not Duel.IsExistingMatchingCard(c95816395.cfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,c:GetLevel()) end -function s.cfilter(c,lv) +function c95816395.cfilter(c,lv) return (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsLevel(lv) end -function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil,tp) end +function c95816395.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c95816395.filter,tp,LOCATION_DECK,0,1,nil,tp) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c95816395.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil,tp) + local g=Duel.SelectMatchingCard(tp,c95816395.filter,tp,LOCATION_DECK,0,1,1,nil,tp) if g:GetCount()>0 then Duel.SendtoHand(g,nil,REASON_EFFECT) Duel.ConfirmCards(1-tp,g) diff --git a/c96345188.lua b/c96345188.lua index 2409504915..72add5c16d 100644 --- a/c96345188.lua +++ b/c96345188.lua @@ -1,38 +1,37 @@ --RR－ミミクリー・レイニアス -local s,id,o=GetID() -function s.initial_effect(c) +function c96345188.initial_effect(c) --level local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_IGNITION) e1:SetRange(LOCATION_MZONE) e1:SetCountLimit(1) - e1:SetCondition(s.lvcon) - e1:SetTarget(s.lvtg) - e1:SetOperation(s.lvop) + e1:SetCondition(c96345188.lvcon) + e1:SetTarget(c96345188.lvtg) + e1:SetOperation(c96345188.lvop) c:RegisterEffect(e1) --search local e2=Effect.CreateEffect(c) e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH) e2:SetType(EFFECT_TYPE_IGNITION) e2:SetRange(LOCATION_GRAVE) - e2:SetCountLimit(1,id) - e2:SetCondition(s.thcon) + e2:SetCountLimit(1,96345188) + e2:SetCondition(c96345188.thcon) e2:SetCost(aux.bfgcost) - e2:SetTarget(s.thtg) - e2:SetOperation(s.thop) + e2:SetTarget(c96345188.thtg) + e2:SetOperation(c96345188.thop) c:RegisterEffect(e2) - if not s.global_check then - s.global_check=true + if not c96345188.global_check then + c96345188.global_check=true local ge1=Effect.CreateEffect(c) ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) ge1:SetCode(EVENT_SUMMON_SUCCESS) ge1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) ge1:SetOperation(aux.sumreg) - ge1:SetLabel(id) + ge1:SetLabel(96345188) Duel.RegisterEffect(ge1,0) local ge2=ge1:Clone() ge2:SetCode(EVENT_SPSUMMON_SUCCESS) - ge2:SetLabel(id) + ge2:SetLabel(96345188) Duel.RegisterEffect(ge2,0) end --register to grave @@ -40,20 +39,20 @@ function s.initial_effect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c96345188.regop) c:RegisterEffect(e3) end -function s.lvcon(e,tp,eg,ep,ev,re,r,rp) - return e:GetHandler():GetFlagEffect(id)>0 +function c96345188.lvcon(e,tp,eg,ep,ev,re,r,rp) + return e:GetHandler():GetFlagEffect(96345188)>0 end -function s.filter(c) +function c96345188.filter(c) return c:IsFaceup() and c:GetLevel()>0 and c:IsSetCard(0xba) end -function s.lvtg(e,tp,eg,ep,ev,re,r,rp,chk) - if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_MZONE,0,1,nil) end +function c96345188.lvtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c96345188.filter,tp,LOCATION_MZONE,0,1,nil) end end -function s.lvop(e,tp,eg,ep,ev,re,r,rp) - local g=Duel.GetMatchingGroup(s.filter,tp,LOCATION_MZONE,0,nil) +function c96345188.lvop(e,tp,eg,ep,ev,re,r,rp) + local g=Duel.GetMatchingGroup(c96345188.filter,tp,LOCATION_MZONE,0,nil) local tc=g:GetFirst() while tc do local e1=Effect.CreateEffect(e:GetHandler()) @@ -66,25 +65,25 @@ function s.lvop(e,tp,eg,ep,ev,re,r,rp) tc=g:GetNext() end end -function s.thcon(e,tp,eg,ep,ev,re,r,rp) +function c96345188.thcon(e,tp,eg,ep,ev,re,r,rp) return e:GetHandler():GetTurnID()==Duel.GetTurnCount() and not e:GetHandler():IsReason(REASON_RETURN) end -function s.thfilter(c) - return c:IsSetCard(0xba) and not c:IsCode(id) and c:IsAbleToHand() +function c96345188.thfilter(c) + return c:IsSetCard(0xba) and not c:IsCode(96345188) 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 +function c96345188.thtg(e,tp,eg,ep,ev,re,r,rp,chk) + if chk==0 then return Duel.IsExistingMatchingCard(c96345188.thfilter,tp,LOCATION_DECK,0,1,nil) end Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK) end -function s.thop(e,tp,eg,ep,ev,re,r,rp) +function c96345188.thop(e,tp,eg,ep,ev,re,r,rp) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) - local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil) + local g=Duel.SelectMatchingCard(tp,c96345188.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 s.regop(e,tp,eg,ep,ev,re,r,rp) +function c96345188.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) diff --git a/c9791914.lua b/c9791914.lua index 0acd79daff..651a89cdf8 100644 --- a/c9791914.lua +++ b/c9791914.lua @@ -1,6 +1,5 @@ --白銀のスナイパー -local s,id,o=GetID() -function s.initial_effect(c) +function c9791914.initial_effect(c) --Negate local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -12,36 +11,36 @@ function s.initial_effect(c) e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e2:SetCode(EVENT_TO_GRAVE) - e2:SetOperation(s.regop) + e2:SetOperation(c9791914.regop) c:RegisterEffect(e2) local e3=Effect.CreateEffect(c) - e3:SetDescription(aux.Stringid(id,0)) + e3:SetDescription(aux.Stringid(9791914,0)) e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F) e3:SetProperty(EFFECT_FLAG_CARD_TARGET) e3:SetCode(EVENT_PHASE+PHASE_END) e3:SetRange(LOCATION_GRAVE) e3:SetCountLimit(1) - e3:SetTarget(s.sptg) - e3:SetOperation(s.spop) + e3:SetTarget(c9791914.sptg) + e3:SetOperation(c9791914.spop) c:RegisterEffect(e3) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c9791914.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsPreviousLocation(LOCATION_SZONE) and c:IsPreviousPosition(POS_FACEDOWN) and c:IsReason(REASON_EFFECT) and c:IsReason(REASON_DESTROY) and rp==1-tp then - c:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,0,0,227) + c:RegisterFlagEffect(9791914,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,0,0,227) end end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) +function c9791914.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) end - if chk==0 then return e:GetHandler():GetFlagEffect(id)>0 end + if chk==0 then return e:GetHandler():GetFlagEffect(9791914)>0 end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY) local g=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0) Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c9791914.spop(e,tp,eg,ep,ev,re,r,rp) if e:GetHandler():IsRelateToEffect(e) and Duel.SpecialSummon(e:GetHandler(),0,tp,tp,false,false,POS_FACEUP)~=0 then local tc=Duel.GetFirstTarget() if tc and tc:IsRelateToEffect(e) then diff --git a/c99991455.lua b/c99991455.lua index 56fe287647..26844aab68 100644 --- a/c99991455.lua +++ b/c99991455.lua @@ -1,9 +1,8 @@ --覇雷星ライジン -local s,id,o=GetID() -function s.initial_effect(c) +function c99991455.initial_effect(c) --fusion material c:EnableReviveLimit() - aux.AddFusionProcFun2(c,s.ffilter1,s.ffilter2,true) + aux.AddFusionProcFun2(c,c99991455.ffilter1,c99991455.ffilter2,true) --pierce local e1=Effect.CreateEffect(c) e1:SetType(EFFECT_TYPE_SINGLE) @@ -13,7 +12,7 @@ function s.initial_effect(c) local e2=Effect.CreateEffect(c) e2:SetType(EFFECT_TYPE_SINGLE) e2:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE) - e2:SetCondition(s.damcon) + e2:SetCondition(c99991455.damcon) e2:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE)) c:RegisterEffect(e2) --to grave @@ -21,33 +20,33 @@ function s.initial_effect(c) e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS) e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE) e3:SetCode(EVENT_TO_GRAVE) - e3:SetOperation(s.regop) + e3:SetOperation(c99991455.regop) c:RegisterEffect(e3) end -function s.ffilter1(c) +function c99991455.ffilter1(c) return c:IsLevelAbove(5) and c:IsRace(RACE_WARRIOR) and c:IsFusionAttribute(ATTRIBUTE_LIGHT) end -function s.ffilter2(c) +function c99991455.ffilter2(c) return c:IsRace(RACE_WARRIOR) and c:IsFusionAttribute(ATTRIBUTE_EARTH) end -function s.damcon(e) +function c99991455.damcon(e) local c=e:GetHandler() local bc=c:GetBattleTarget() return bc and not bc:IsLevelAbove(0) end -function s.regop(e,tp,eg,ep,ev,re,r,rp) +function c99991455.regop(e,tp,eg,ep,ev,re,r,rp) local c=e:GetHandler() if c:IsReason(REASON_BATTLE+REASON_EFFECT) and c:IsReason(REASON_DESTROY) then local e1=Effect.CreateEffect(c) - e1:SetDescription(aux.Stringid(id,0)) + e1:SetDescription(aux.Stringid(99991455,0)) e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetProperty(EFFECT_FLAG_CARD_TARGET) - e1:SetCountLimit(1,id) + e1:SetCountLimit(1,99991455) e1:SetRange(LOCATION_GRAVE) - e1:SetTarget(s.sptg) - e1:SetOperation(s.spop) + e1:SetTarget(c99991455.sptg) + e1:SetOperation(c99991455.spop) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) c:RegisterEffect(e1) local e2=Effect.CreateEffect(c) @@ -58,19 +57,19 @@ function s.regop(e,tp,eg,ep,ev,re,r,rp) c:RegisterEffect(e2) end end -function s.filter(c,e,tp) +function c99991455.filter(c,e,tp) return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsLevelBelow(7) and c:IsRace(RACE_WARRIOR) end -function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) - if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.filter(chkc,e,tp) end +function c99991455.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc) + if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c99991455.filter(chkc,e,tp) end if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>=2 and not Duel.IsPlayerAffectedByEffect(tp,59822133) - and Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,0,2,nil,e,tp) end + and Duel.IsExistingTarget(c99991455.filter,tp,LOCATION_GRAVE,0,2,nil,e,tp) end Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) - local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,0,2,2,nil,e,tp) + local g=Duel.SelectTarget(tp,c99991455.filter,tp,LOCATION_GRAVE,0,2,2,nil,e,tp) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,2,0,0) end -function s.spop(e,tp,eg,ep,ev,re,r,rp) +function c99991455.spop(e,tp,eg,ep,ev,re,r,rp) local ft=Duel.GetLocationCount(tp,LOCATION_MZONE) if ft<=0 then return end local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)