Skip to content

P
pre-release-database-cdb
Commit b7c1ee75 authored by fallenstardust's avatar fallenstardust
Browse files
Options

add LEDE-JP new cards scripts 

调整卡包ydk
parent 6e50b2b3
Pipeline #24328 passed with stages
        in 1 minute and 42 seconds
        Hide whitespace changes
        Inline Side-by-side
        Showing with 564 additions and 50 deletions
        pack/2023-10-20 AGOV-EN（T1202）.ydk 0 → 100644
        View file @ b7c1ee75
        #created by ygomobile
        #main
        101202081
        101202082
        101202083
        101202084
        101202085
        101202086
        101202087
        101202088
        101202090
        101202091
        101202092
        #extra
        101202089
        \ No newline at end of file
        pack/2023-11-25 TW01.ydk 0 → 100644
        View file @ b7c1ee75
        #created by ygomobile
        #main
        100211002
        100211003
        100211004
        100211052
        100211053
        100211099
        100211100
        100211122
        100211125
        #extra
        100211001
        100211050
        100211051
        100211097
        100211098
        100211123
        100211124
        \ No newline at end of file
        pack/2023-12-16 24PP.ydk 0 → 100644
        View file @ b7c1ee75
        #created by ygomobile
        #main
        100214001
        100214002
        100214003
        100214004
        100214005
        100214006
        100214007
        100214008
        100214009
        100214010
        100214011
        100214012
        100214013
        100214014
        100214015
        100214016
        100214017
        100214018
        #extra
        100214019
        !side
        pack/chocolate-pudding-a-la-mode.ydk
        View file @ b7c1ee75
        #created by ygomobile
        #main
        100200244
        100211002
        100211003
        100211004
        100211052
        100211053
        100211099
        100211100
        100211122
        100211125
        100212002
        100212003
        100212006
        ......@@ -29,52 +20,15 @@
        101204053
        101204054
        101204071
        100214001
        100214002
        100214003
        100214004
        100214005
        100214006
        100214007
        100214008
        100214009
        100214010
        100214011
        100214012
        100214013
        100214014
        100214015
        100214016
        100214017
        100214018
        100216001
        #extra
        100211001
        100211050
        100211051
        100211097
        100211098
        100211123
        100211124
        100212004
        100212005
        100213002
        100215003
        100214019
        101204039
        101204040
        !side
        100200248
        100200249
        101202081
        101202082
        101202083
        101202084
        101202085
        101202086
        101202087
        101202088
        101202089
        101202090
        101202091
        101202092
        \ No newline at end of file
        !side
        \ No newline at end of file
        script/c101204017.lua 0 → 100644
        View file @ b7c1ee75
        --天盃龍ファドラ
        function c101204017.initial_effect(c)
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204017,0))
        e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
        e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
        e1:SetCode(EVENT_SUMMON_SUCCESS)
        e1:SetCountLimit(1,101204017)
        e1:SetTarget(c101204017.sptg)
        e1:SetOperation(c101204017.spop)
        c:RegisterEffect(e1)
        local e2=e1:Clone()
        e2:SetCode(EVENT_SPSUMMON_SUCCESS)
        c:RegisterEffect(e2)
        local e3=e1:Clone()
        e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
        e3:SetCode(EVENT_BATTLE_START)
        e3:SetRange(LOCATION_MZONE)
        c:RegisterEffect(e3)
        local e4=Effect.CreateEffect(c)
        e4:SetType(EFFECT_TYPE_FIELD)
        e4:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
        e4:SetRange(LOCATION_MZONE)
        e4:SetTargetRange(LOCATION_MZONE,0)
        e4:SetTarget(c101204017.indtg)
        e4:SetValue(1)
        c:RegisterEffect(e4)
        local e5=Effect.CreateEffect(c)
        e5:SetDescription(aux.Stringid(101204017,2))
        e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e5:SetType(EFFECT_TYPE_QUICK_O)
        e5:SetCode(EVENT_FREE_CHAIN)
        e5:SetHintTiming(0,TIMING_BATTLE_START+TIMING_BATTLE_END)
        e5:SetRange(LOCATION_MZONE)
        e5:SetCountLimit(1)
        e5:SetCondition(c101204017.sccon)
        e5:SetTarget(c101204017.sctg)
        e5:SetOperation(c101204017.scop)
        c:RegisterEffect(e5)
        end
        function c101204017.filter(c,e,tp)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4)
        and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
        end
        function c101204017.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101204017.filter(chkc,e,tp) end
        if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and Duel.IsExistingTarget(c101204017.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local g=Duel.SelectTarget(tp,c101204017.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
        end
        function c101204017.spop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        local tc=Duel.GetFirstTarget()
        if tc:IsRelateToEffect(e) then
        Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
        end
        end
        function c101204017.indtg(e,c)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
        end
        function c101204017.sccon(e,tp,eg,ep,ev,re,r,rp)
        local ph=Duel.GetCurrentPhase()
        return not e:GetHandler():IsStatus(STATUS_CHAINING) and (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
        end
        function c101204017.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler()) end
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
        end
        function c101204017.scop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
        local g=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,c)
        if g:GetCount()>0 then
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local sg=g:Select(tp,1,1,nil)
        Duel.SynchroSummon(tp,sg:GetFirst(),c)
        end
        end
        script/c101204018.lua 0 → 100644
        View file @ b7c1ee75
        --天盃龍チュンドラ
        function c101204018.initial_effect(c)
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204018,0))
        e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e1:SetType(EFFECT_TYPE_IGNITION)
        e1:SetRange(LOCATION_HAND)
        e1:SetCountLimit(1,101204018)
        e1:SetCondition(c101204018.spcon)
        e1:SetTarget(c101204018.sptg)
        e1:SetOperation(c101204018.spop)
        c:RegisterEffect(e1)
        local e2=Effect.CreateEffect(c)
        e2:SetDescription(aux.Stringid(101204018,1))
        e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
        e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
        e2:SetCode(EVENT_BATTLE_START)
        e2:SetRange(LOCATION_MZONE)
        e2:SetCountLimit(1,101204118)
        e2:SetTarget(c101204018.sptg2)
        e2:SetOperation(c101204018.spop2)
        c:RegisterEffect(e2)
        local e3=Effect.CreateEffect(c)
        e3:SetDescription(aux.Stringid(101204018,2))
        e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e3:SetType(EFFECT_TYPE_QUICK_O)
        e3:SetCode(EVENT_FREE_CHAIN)
        e3:SetHintTiming(0,TIMING_BATTLE_START+TIMING_BATTLE_END)
        e3:SetRange(LOCATION_MZONE)
        e3:SetCountLimit(1)
        e3:SetCondition(c101204018.sccon)
        e3:SetTarget(c101204018.sctg)
        e3:SetOperation(c101204018.scop)
        c:RegisterEffect(e3)
        end
        function c101204018.cfilter(c)
        return c:IsFaceup() and c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
        end
        function c101204018.spcon(e,tp,eg,ep,ev,re,r,rp)
        return Duel.IsExistingMatchingCard(c101204018.cfilter,tp,LOCATION_MZONE,0,2,nil)
        end
        function c101204018.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
        end
        function c101204018.spop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if not c:IsRelateToEffect(e) then return end
        Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
        end
        function c101204018.filter(c,e,tp)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4) and not c:IsCode(101204018)
        and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
        end
        function c101204018.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and Duel.IsExistingMatchingCard(c101204018.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
        end
        function c101204018.spop2(e,tp,eg,ep,ev,re,r,rp)
        if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local g=Duel.SelectMatchingCard(tp,c101204018.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
        if g:GetCount()>0 then
        Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
        end
        end
        function c101204018.sccon(e,tp,eg,ep,ev,re,r,rp)
        local ph=Duel.GetCurrentPhase()
        return not e:GetHandler():IsStatus(STATUS_CHAINING) and (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
        end
        function c101204018.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler()) end
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
        end
        function c101204018.scop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
        local g=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,c)
        if g:GetCount()>0 then
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local sg=g:Select(tp,1,1,nil)
        Duel.SynchroSummon(tp,sg:GetFirst(),c)
        end
        end
        \ No newline at end of file
        script/c101204039.lua 0 → 100644
        View file @ b7c1ee75
        --燦幻昇龍バイデント·ドラギオン
        function c101204039.initial_effect(c)
        aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
        c:EnableReviveLimit()
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204039,0))
        e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
        e1:SetCode(EVENT_SPSUMMON_SUCCESS)
        e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
        e1:SetCountLimit(1,101204039)
        e1:SetCondition(c101204039.spcon)
        e1:SetTarget(c101204039.sptg)
        e1:SetOperation(c101204039.spop)
        c:RegisterEffect(e1)
        local e2=Effect.CreateEffect(c)
        e2:SetDescription(aux.Stringid(101204039,1))
        e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
        e2:SetType(EFFECT_TYPE_QUICK_O)
        e2:SetCode(EVENT_FREE_CHAIN)
        e2:SetHintTiming(0,TIMING_BATTLE_START+TIMING_ATTACK+TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
        e2:SetRange(LOCATION_GRAVE)
        e2:SetCountLimit(1,101204140+EFFECT_COUNT_CODE_DUEL)
        e2:SetCondition(c101204039.spcon2)
        e2:SetCost(c101204039.spcost2)
        e2:SetTarget(c101204039.sptg2)
        e2:SetOperation(c101204039.spop2)
        c:RegisterEffect(e2)
        if not c101204039.global_check then
        c101204039.global_check=true
        local ge1=Effect.GlobalEffect()
        ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
        ge1:SetOperation(c101204039.checkop)
        Duel.RegisterEffect(ge1,0)
        end
        end
        function c101204039.checkop(e,tp,eg,ep,ev,re,r,rp)
        Duel.RegisterFlagEffect(tp,101204039,RESET_PHASE+PHASE_END,0,1)
        Duel.RegisterFlagEffect(1-tp,101204039,RESET_PHASE+PHASE_END,0,1)
        end
        function c101204039.spcon(e,tp,eg,ep,ev,re,r,rp)
        return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
        end
        function c101204039.spfilter(c,e,tp)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
        and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
        end
        function c101204039.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c101204039.spfilter(chkc,e,tp) end
        if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
        and Duel.IsExistingTarget(c101204039.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local g=Duel.SelectTarget(tp,c101204039.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
        end
        function c101204039.spop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        local tc=Duel.GetFirstTarget()
        if tc:IsRelateToEffect(e) then
        Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
        end
        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(aux.TargetBoolFunction(aux.NOT(Card.IsRace),RACE_DRAGON))
        e1:SetReset(RESET_PHASE+PHASE_END)
        Duel.RegisterEffect(e1,tp)
        end
        function c101204039.spcon2(e,tp,eg,ep,ev,re,r,rp)
        return Duel.GetFlagEffect(tp,101204039)>=3
        end
        function c101204039.spcost2(e,tp,eg,ep,ev,re,r,rp,chk)
        local c=e:GetHandler()
        if chk==0 then return true end
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204039,3))
        e1:SetType(EFFECT_TYPE_FIELD)
        e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
        e1:SetTargetRange(1,0)
        Duel.RegisterEffect(e1,tp)
        end
        function c101204039.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
        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 c101204039.spop2(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) and Duel.SelectYesNo(tp,aux.Stringid(101204039,2)) then
        local g=Duel.SelectMatchingCard(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
        if #g>0 then
        Duel.Destroy(g,REASON_EFFECT)
        end
        end
        end
        \ No newline at end of file
        script/c101204040.lua 0 → 100644
        View file @ b7c1ee75
        --燦幻超龍ドランセンド·ドラギオン
        function c101204040.initial_effect(c)
        aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
        c:EnableReviveLimit()
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204040,0))
        e1:SetCategory(CATEGORY_POSITION)
        e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
        e1:SetProperty(EFFECT_FLAG_DELAY)
        e1:SetCode(EVENT_SPSUMMON_SUCCESS)
        e1:SetCondition(c101204040.poscon)
        e1:SetTarget(c101204040.postg)
        e1:SetOperation(c101204040.posop)
        c:RegisterEffect(e1)
        local e2=Effect.CreateEffect(c)
        e2:SetType(EFFECT_TYPE_FIELD)
        e2:SetCode(EFFECT_MUST_ATTACK)
        e2:SetRange(LOCATION_MZONE)
        e2:SetTargetRange(0,LOCATION_MZONE)
        c:RegisterEffect(e2)
        local e3=Effect.CreateEffect(c)
        e3:SetType(EFFECT_TYPE_FIELD)
        e3:SetCode(EFFECT_CANNOT_ACTIVATE)
        e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
        e3:SetTargetRange(0,1)
        e3:SetRange(LOCATION_MZONE)
        e3:SetValue(1)
        e3:SetCondition(c101204040.actcon)
        c:RegisterEffect(e3)
        local e4=Effect.CreateEffect(c)
        e4:SetDescription(aux.Stringid(101204040,2))
        e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
        e4:SetType(EFFECT_TYPE_QUICK_O)
        e4:SetCode(EVENT_FREE_CHAIN)
        e4:SetHintTiming(0,TIMING_BATTLE_START+TIMING_ATTACK+TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
        e4:SetRange(LOCATION_GRAVE)
        e4:SetCountLimit(1,c101204040+EFFECT_COUNT_CODE_DUEL)
        e4:SetCondition(c101204040.spcon)
        e4:SetCost(c101204040.spcost)
        e4:SetTarget(c101204040.sptg)
        e4:SetOperation(c101204040.spop)
        c:RegisterEffect(e4)
        if not c101204040.global_check then
        c101204040.global_check=true
        local ge1=Effect.GlobalEffect()
        ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        ge1:SetCode(EVENT_ATTACK_ANNOUNCE)
        ge1:SetOperation(c101204040.checkop)
        Duel.RegisterEffect(ge1,0)
        end
        end
        function c101204040.checkop(e,tp,eg,ep,ev,re,r,rp)
        Duel.RegisterFlagEffect(tp,c101204040,RESET_PHASE+PHASE_END,0,1)
        Duel.RegisterFlagEffect(1-tp,c101204040,RESET_PHASE+PHASE_END,0,1)
        end
        function c101204040.poscon(e,tp,eg,ep,ev,re,r,rp)
        return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
        end
        function c101204040.postg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
        local sg=Duel.GetMatchingGroup(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
        Duel.SetOperationInfo(0,CATEGORY_POSITION,sg,sg:GetCount(),0,0)
        end
        function c101204040.posop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        local sg=Duel.GetMatchingGroup(Card.IsDefensePos,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
        if sg:GetCount()>0 then
        local sc=sg:GetFirst()
        while sc do
        Duel.ChangePosition(sc,POS_FACEUP_ATTACK)
        sc=sg:GetNext()
        end
        end
        end
        function c101204040.actcon(e)
        local ph=Duel.GetCurrentPhase()
        return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
        end
        function c101204040.spcon(e,tp,eg,ep,ev,re,r,rp)
        return Duel.GetFlagEffect(tp,101204040)>=3
        end
        function c101204040.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
        local c=e:GetHandler()
        if chk==0 then return true end
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(101204040,4))
        e1:SetType(EFFECT_TYPE_FIELD)
        e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CLIENT_HINT)
        e1:SetTargetRange(1,0)
        Duel.RegisterEffect(e1,tp)
        end
        function c101204040.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
        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 c101204040.spop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 and Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD):GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(101204040,3)) then
        local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD):Select(tp,1,1,nil)
        if #g>0 then
        Duel.Destroy(g,REASON_EFFECT)
        end
        end
        end
        \ No newline at end of file
        script/c101204059.lua 0 → 100644
        View file @ b7c1ee75
        --盃満ちる燦幻荘
        function c101204059.initial_effect(c)
        local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_ACTIVATE)
        e1:SetCode(EVENT_FREE_CHAIN)
        c:RegisterEffect(e1)
        local e2=Effect.CreateEffect(c)
        e2:SetType(EFFECT_TYPE_FIELD)
        e2:SetCode(EFFECT_IMMUNE_EFFECT)
        e2:SetRange(LOCATION_FZONE)
        e2:SetTargetRange(LOCATION_MZONE,0)
        e2:SetCondition(c101204059.indcon)
        e2:SetTarget(c101204059.indtg)
        e2:SetValue(c101204059.efilter)
        c:RegisterEffect(e2)
        local e3=Effect.CreateEffect(c)
        e3:SetDescription(aux.Stringid(101204059,1))
        e3:SetCategory(CATEGORY_TODECK+CATEGORY_TOHAND+CATEGORY_HANDES)
        e3:SetType(EFFECT_TYPE_IGNITION)
        e3:SetRange(LOCATION_FZONE)
        e3:SetCountLimit(1,101204059)
        e3:SetTarget(c101204059.thtg)
        e3:SetOperation(c101204059.thop)
        c:RegisterEffect(e3)
        local e4=Effect.CreateEffect(c)
        e4:SetDescription(aux.Stringid(101204059,2))
        e4:SetCategory(CATEGORY_ATKCHANGE)
        e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
        e4:SetCode(EVENT_DESTROYED)
        e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
        e4:SetCondition(c101204059.atkcon)
        e4:SetTarget(c101204059.atktg)
        e4:SetOperation(c101204059.atkop)
        c:RegisterEffect(e4)
        end
        function c101204059.indcon(e)
        return Duel.GetCurrentPhase()==PHASE_MAIN1
        end
        function c101204059.indtg(e,c)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
        end
        function c101204059.efilter(e,re)
        return e:GetHandlerPlayer()~=re:GetOwnerPlayer() and re:IsActivated()
        end
        function c101204059.filter(c)
        return c:IsSetCard(0x2aa) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
        end
        function c101204059.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(c101204059.filter,tp,LOCATION_DECK,0,1,nil) end
        Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
        Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,1)
        end
        function c101204059.thop(e,tp,eg,ep,ev,re,r,rp)
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
        local g=Duel.SelectMatchingCard(tp,c101204059.filter,tp,LOCATION_DECK,0,1,1,nil)
        if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)~=0 and g:GetFirst():IsLocation(LOCATION_HAND) then
        Duel.ConfirmCards(1-tp,g)
        Duel.ShuffleHand(tp)
        Duel.BreakEffect()
        Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD,nil)
        end
        end
        function c101204059.atkcon(e,tp,eg,ep,ev,re,r,rp)
        local ph=Duel.GetCurrentPhase()
        return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
        end
        function c101204059.atkfilter(c)
        return c:IsFaceup() and c:IsType(TYPE_SYNCHRO) and c:IsRace(RACE_DRAGON)
        end
        function c101204059.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101204059.atkfilter(chkc) end
        if chk==0 then return Duel.IsExistingTarget(c101204059.atkfilter,tp,LOCATION_MZONE,0,1,nil) end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
        Duel.SelectTarget(tp,c101204059.atkfilter,tp,LOCATION_MZONE,0,1,1,nil)
        end
        function c101204059.atkop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        local tc=Duel.GetFirstTarget()
        if tc:IsRelateToEffect(e) and tc:IsFaceup() then
        local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_SINGLE)
        e1:SetCode(EFFECT_SET_ATTACK_FINAL)
        e1:SetValue(tc:GetAttack()*2)
        e1:SetReset(RESET_EVENT+RESETS_STANDARD)
        tc:RegisterEffect(e1)
        end
        end
        \ No newline at end of file
        script/c101204060.lua 0 → 100644
        View file @ b7c1ee75
        --燦幻開門
        function c101204060.initial_effect(c)
        local e1=Effect.CreateEffect(c)
        e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH+CATEGORY_SPECIAL_SUMMON)
        e1:SetType(EFFECT_TYPE_ACTIVATE)
        e1:SetCode(EVENT_FREE_CHAIN)
        e1:SetCountLimit(1,101204060+EFFECT_COUNT_CODE_OATH)
        e1:SetTarget(c101204060.target)
        e1:SetOperation(c101204060.activate)
        c:RegisterEffect(e1)
        end
        function c101204060.filter(c)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE) and c:IsLevelBelow(4) and c:IsAbleToHand()
        end
        function c101204060.spfilter(c,e,tp)
        return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_FIRE)
        and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
        end
        function c101204060.target(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(c101204060.filter,tp,LOCATION_DECK,0,1,nil) or Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
        Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
        end
        function c101204060.activate(e,tp,eg,ep,ev,re,r,rp)
        local ph=Duel.GetCurrentPhase()
        local op=0
        if Duel.IsExistingMatchingCard(c101204060.filter,tp,LOCATION_DECK,0,1,nil) then
        if not Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) or Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(101204060,1)) then
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
        local g=Duel.SelectMatchingCard(tp,c101204060.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
        op=1
        end
        Duel.AdjustAll()
        if op==0 or Duel.IsExistingMatchingCard(c101204060.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>=1 and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE and Duel.SelectYesNo(tp,aux.Stringid(101204060,2)) then
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local g=Duel.SelectMatchingCard(tp,c101204060.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp,e,tp)
        if g:GetCount()>0 then
        Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
        end
        end
        end
        test-release.cdb
        View file @ b7c1ee75
        No preview for this file type
        test-strings.conf
        View file @ b7c1ee75
        ......@@ -5,5 +5,5 @@
        !setname 0x2a7 白斗气 ホワイト・オーラ
        !setname 0x10ac 哥布林骑手
        !setname 0x2a8 玩具
        !setname 0x2a9 燦幻
        !setname 0x2aa 天盃龙
        \ No newline at end of file
        !setname 0x2a9 璨幻
        !setname 0x2aa 天杯龙
        \ No newline at end of file
        Markdown is supported
        0% or
        You are about to add 0 people to the discussion. Proceed with caution.
        Finish editing this message first!
        Please register or to comment