Skip to content

Y
ygopro-222DIY-cards
Commit 6a8a7362 authored by Huangnan's avatar Huangnan
Browse files
Options

fix

parent 6acc04ad
Pipeline #38815 failed with stages
        in 119 minutes and 28 seconds
        Show whitespace changes
        Inline Side-by-side
        Showing with 138 additions and 72 deletions
        expansions/FiNALE.cdb
        View file @ 6a8a7362
        No preview for this file type
        expansions/script/c13700316.lua
        View file @ 6a8a7362
        ......@@ -24,28 +24,40 @@ function s.initial_effect(c)
        --溯行之影
        local e1=Effect.CreateEffect(c)
        e1:SetDescription(aux.Stringid(id,3))
        e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_QUICK_F)
        e1:SetCode(EVENT_PHASE_START+PHASE_STANDBY)
        e1:SetProperty(CATEGORY_GRAVE_SPSUMMON)
        e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
        e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
        e1:SetCategory(CATEGORY_GRAVE_SPSUMMON)
        e1:SetRange(LOCATION_GRAVE)
        e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
        e1:SetCondition(s.recon)
        e1:SetTarget(s.retg)
        e1:SetOperation(s.regop)
        e1:SetOperation(s.reop)
        c:RegisterEffect(e1)
        --徒劳的镜世探寻
        local e2=Effect.CreateEffect(c)
        e2:SetDescription(aux.Stringid(id,4))
        e2:SetCategory(CATEGORY_GRAVE_SPSUMMON+CATEGORY_ATKCHANGE)
        e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
        e2:SetDescription(aux.Stringid(id,5))
        e2:SetType(EFFECT_TYPE_IGNITION)
        e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
        e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
        e2:SetRange(LOCATION_MZONE)
        e2:SetCountLimit(1)
        e2:SetCondition(s.scon)
        e2:SetCost(s.scost)
        e2:SetTarget(s.stg)
        e2:SetOperation(s.sop)
        e2:SetTarget(s.sctg)
        e2:SetOperation(s.scop)
        c:RegisterEffect(e2)
        local e4=Effect.CreateEffect(c)
        e4:SetDescription(aux.Stringid(id,6))
        e4:SetType(EFFECT_TYPE_IGNITION)
        e4:SetCategory(CATEGORY_GRAVE_SPSUMMON)
        e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
        e4:SetRange(LOCATION_MZONE)
        e4:SetCountLimit(1)
        e4:SetCondition(s.scon)
        e4:SetCost(s.scost)
        e4:SetTarget(s.srtg)
        e4:SetOperation(s.srop)
        c:RegisterEffect(e4)
        --镜世的永劫回归
        local e3=Effect.CreateEffect(c)
        e3:SetDescription(aux.Stringid(id,7))
        ......@@ -63,94 +75,143 @@ function s.splimit(e,se,sp,st)
        end
        --word
        function s.wordop(e,tp,eg,ep,ev,re,r,rp)
        Duel.Hint(21,0,aux.Stringid(id,0))
        Duel.Hint(21,0,aux.Stringid(id,1))
        Duel.Hint(21,0,aux.Stringid(id,2))
        Duel.Hint(24,0,aux.Stringid(id,0))
        Duel.Hint(24,0,aux.Stringid(id,1))
        Duel.Hint(24,0,aux.Stringid(id,2))
        end
        --溯行之影
        function s.recon(e,tp,eg,ep,ev,re,r,rp)
        return Duel.GetTurnPlayer()==tp and Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,13700314)
        end
        function s.retg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
        if chk==0 then return e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
        end
        function s.reop(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then
        if Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP) then
        Duel.Hint(HINTMSG_SELECT,tp,HINTMSG_OPERATECARD)
        local tc=Duel.SelectMatchingCard(tp,Card.IsCode,tp,LOCATION_GRAVE,0,1,1,nil,13700314):GetFirst()
        Duel.Overlay(c,tc)
        end
        local gc=Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)
        Duel.Remove(Duel.GetDecktopGroup(tp,gc),POS_FACEDOWN,REASON_EFFECT)
        end
        --无尽的镜世探寻
        --镜界调和法
        function s.scon(e,tp,eg,ep,ev,re,r,rp)
        return e:GetHandler():GetOverlayGroup():IsExists(Card.IsCode,1,nil,13700314)
        end
        function s.scost(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and e:GetHandler():IsAbleToGrave() end
        if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) and e:GetHandler():IsAbleToGrave() and Duel.IsPlayerCanSpecialSummon(tp) end
        e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
        Duel.SendtoGrave(e:GetHandler(),REASON_COST)
        end
        function s.cfilter1(c,e,tp)
        local no=c.TC_number
        return c:IsSetCard(0xc851) and c:GetOverlayGroup():IsExists(s.ffilter1,1,nil)
        return c:IsSetCard(0xc851) and c:GetOverlayGroup():IsExists(s.ffilter1,1,nil,e,tp,no)
        end
        function s.ffilter1(c,e,tp,no)
        return c.TC_number and c.TC_number==no and c:IsSetCard(0x851) and not (c:IsSetCard(0x3851,0x6851,0xa851,0xc851)) and c:IsType(TYPE_XYZ) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,true,false)
        return c.TC_number and c.TC_number==no and c:IsSetCard(0x851) and not c:IsSetCard(0x3851,0x6851,0xa851,0xc851) and c:IsType(TYPE_XYZ)
        end
        function s.cfilter2(c,e,tp)
        local no=c.TC_number
        return c:IsSetCard(0xc851) and Duel.IsExistingMatchingCard(s.ffilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
        return c:IsSetCard(0xc851) and Duel.IsExistingMatchingCard(s.ffilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp,no)
        end
        function s.ffilter2(c,e,tp,no)
        return c.TC_number and c.TC_number==no and c:IsSetCard(0x851) and not (c:IsSetCard(0x3851,0x6851,0xa851,0xc851)) and c:IsType(TYPE_XYZ) and c:IsCanOverlay()
        return c.TC_number and c.TC_number==no and c:IsSetCard(0x851) and not c:IsSetCard(0x3851,0x6851,0xa851,0xc851) and c:IsType(TYPE_XYZ) and c:IsCanOverlay()
        end
        function s.stg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        function s.sctg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        local c=e:GetHandler()
        local b1=Duel.IsExistingMatchingCard(s.cfilter1,tp,LOCATION_MZONE,0,1,c)
        local b2=Duel.IsExistingMatchingCard(s.cfilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
        if chk==0 then return (b1 or b2) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
        local op=0
        if b1 and b2 then
        op=Duel.SelectOption(tp,aux.Stringid(id,5),aux.Stringid(id,6))
        elseif b1 then
        op=Duel.SelectOption(tp,aux.Stringid(id,5))
        elseif b2 then
        op=Duel.SelectOption(tp,aux.Stringid(id,6))
        else return end
        if op==1 then
        if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.cfilter1(chkc) end
        end
        if op==2 then
        if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and s.cfilter2(chkc) end
        end
        e:SetLabel(op)
        end
        function s.sop(e,tp,eg,ep,ev,re,r,rp)
        local op=e:GetLabel()
        if op==1 then
        local tc=e:GetFirstTarget()
        if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.cfilter1(chkc,e,tp) end
        if chk==0 then return Duel.IsExistingTarget(s.cfilter1,tp,LOCATION_MZONE,0,1,c,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
        Duel.SelectTarget(tp,s.cfilter1,tp,LOCATION_MZONE,0,1,1,c)
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
        end
        function s.scop(e,tp,eg,ep,ev,re,r,rp)
        local tc=Duel.GetFirstTarget()
        if tc:IsRelateToEffect(e) then
        local no=tc.TC_number
        local oc=tc:GetOverlayGroup():Select(s.ffilter1,tp,1,1,nil)
        local og=tc:GetOverlayGroup():Filter(s.ffilter1,nil,e,tp,no)
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        local oc=og:Select(tp,1,1,nil):GetFirst()
        Duel.SpecialSummon(oc,0,tp,tp,true,false,POS_FACEUP)
        local mg=tc:GetOverlayGroup()
        if mg:GetCount()>0 then Duel.Overlay(oc,mg,false) end
        Duel.Overlay(oc,tc)
        end
        end
        if op==2 then
        local tc=e:GetFirstTarget()
        local e1=Effect.CreateEffect(e:GetHandler())
        e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        e1:SetCode(EVENT_PHASE+PHASE_END)
        e1:SetCountLimit(1)
        e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
        e1:SetLabelObject(oc)
        e1:SetCondition(s.tdcon)
        e1:SetOperation(s.tdop)
        Duel.RegisterEffect(e1,tp)
        tc:RegisterFlagEffect(id+1,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
        local e2=Effect.CreateEffect(e:GetHandler())
        e2:SetType(EFFECT_TYPE_FIELD)
        e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
        e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
        e2:SetTargetRange(1,0)
        e2:SetReset(RESET_PHASE+PHASE_END,1)
        Duel.RegisterEffect(e2,tp)
        end
        --镜屑重塑法
        function s.srtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
        local c=e:GetHandler()
        if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and s.cfilter2(chkc,e,tp) end
        if chk==0 then return Duel.IsExistingTarget(s.cfilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
        Duel.SelectTarget(tp,s.cfilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
        Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
        end
        function s.srop(e,tp,eg,ep,ev,re,r,rp)
        local tc=Duel.GetFirstTarget()
        if tc:IsRelateToEffect(e) then
        local no=tc.TC_number
        local oc=Duel.SelectMatchingCard(tp,s.ffilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
        Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
        local oc=Duel.SelectMatchingCard(tp,s.ffilter2,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp,no):GetFirst()
        Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
        Duel.Overlay(tc,oc)
        end
        local e1=Effect.CreateEffect(e:GetHandler())
        e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        e1:SetCode(EVENT_PHASE+PHASE_END)
        e1:SetCountLimit(1)
        e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
        e1:SetLabelObject(tc)
        e1:SetCondition(s.tdcon)
        e1:SetOperation(s.tdop)
        Duel.RegisterEffect(e1,tp)
        tc:RegisterFlagEffect(id+1,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
        local e2=Effect.CreateEffect(e:GetHandler())
        e2:SetType(EFFECT_TYPE_FIELD)
        e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
        e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
        e2:SetTargetRange(1,0)
        e2:SetReset(RESET_PHASE+PHASE_END,1)
        Duel.RegisterEffect(e2,tp)
        end
        function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
        local tc=e:GetLabelObject()
        if not tc or tc:GetFlagEffect(id+1)==0 then
        e:Reset()
        return false
        end
        return true
        end
        function s.tdop(e,tp,eg,ep,ev,re,r,rp)
        local tc=e:GetLabelObject()
        if tc then
        Duel.Destroy(tc,REASON_EFFECT)
        end
        end
        --镜世的永劫回归
        function s.entg(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.GetMatchingGroup(nil,tp,LOCATION_DECK,0,nil):GetCount()==0 end
        ......
        expansions/script/c5012628.lua
        View file @ 6a8a7362
        ......@@ -66,6 +66,14 @@ function s.initial_effect(c)
        ee:SetCondition(s.scon)
        ee:SetOperation(s.sop)
        c:RegisterEffect(ee)
        local se=Effect.CreateEffect(c)
        se:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        se:SetCode(EVENT_CHAIN_SOLVED)
        se:SetLabelObject(e1)
        se:SetRange(0xff)
        se:SetCondition(s.scon2)
        se:SetOperation(s.sop2)
        c:RegisterEffect(se)
        end
        function s.cfilter(c)
        ......@@ -93,13 +101,9 @@ function s.desop(e,tp,eg,ep,ev,re,r,rp)
        local g=Duel.SelectMatchingCard(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
        if #g>0 then
        local tc=g:GetFirst()
        if Duel.Destroy(tc,REASON_EFFECT)==0 then
        --没有破坏，触发②效果
        if Duel.Destroy(tc,REASON_EFFECT)>0 then
        c:RegisterFlagEffect(id+1,0,0,1)
        end
        else
        --没有选择，触发②效果
        c:RegisterFlagEffect(id+1,0,0,1)
        end
        end
        function s.remcon(e,tp,eg,ep,ev,re,r,rp)
        ......@@ -161,13 +165,6 @@ end
        function s.eqlimit(e,c)
        return c==e:GetLabelObject()
        end
        function s.con(e,tp,eg,ep,ev,re,r,rp)
        return re==e:GetLabelObject()
        end
        function s.op(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        Duel.RaiseEvent(c,EVENT_CUSTOM+id,e,0,tp,tp,0)
        end
        function s.scon(e,tp,eg,ep,ev,re,r,rp)
        return re==e:GetLabelObject() and e:GetHandler():GetFlagEffect(id+1)==0 and e:GetHandler():GetFlagEffect(id)>0
        end
        ......@@ -177,3 +174,11 @@ function s.sop(e,tp,eg,ep,ev,re,r,rp)
        c:ResetFlagEffect(id+1)
        Duel.RaiseEvent(c,EVENT_CUSTOM+id,e,0,tp,tp,0)
        end
        function s.scon2(e,tp,eg,ep,ev,re,r,rp)
        return re==e:GetLabelObject()and not(e:GetHandler():GetFlagEffect(id+1)==0 and e:GetHandler():GetFlagEffect(id)>0)
        end
        function s.sop2(e,tp,eg,ep,ev,re,r,rp)
        local c=e:GetHandler()
        c:ResetFlagEffect(id)
        c:ResetFlagEffect(id+1)
        end
        Markdown is supported
        0% or
        You are about to add 0 people to the discussion. Proceed with caution.
        Finish editing this message first!
        Please register or to comment