Skip to content

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

fix

parent 6915e2a8
Pipeline #35868 passed with stages
        in 40 minutes and 38 seconds
        Show whitespace changes
        Inline Side-by-side
        Showing with 134 additions and 127 deletions
        expansions/script/c60010042.lua
        View file @ b2ab8ff9
        ...@@ -2,20 +2,20 @@ ...@@ -2,20 +2,20 @@
        local m=60010042 local m=60010042
        local cm=_G["c"..m] local cm=_G["c"..m]
        function c60010042.initial_effect(c) function c60010042.initial_effect(c)
        local e2=Effect.CreateEffect(c)
        e2:SetType(EFFECT_TYPE_SINGLE)
        e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
        e2:SetCondition(cm.condition)
        e2:SetDescription(aux.Stringid(m,2))
        c:RegisterEffect(e2)
        local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
        e1:SetCategory(CATEGORY_DISABLE) e1:SetType(EFFECT_TYPE_SINGLE)
        e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetCode(EFFECT_TRAP_ACT_IN_HAND)
        e1:SetCode(EVENT_FREE_CHAIN) e1:SetCondition(cm.condition)
        e1:SetCost(cm.cost) e1:SetDescription(aux.Stringid(m,2))
        e1:SetTarget(cm.target)
        e1:SetOperation(cm.activate)
        c:RegisterEffect(e1) c:RegisterEffect(e1)
        local e2=Effect.CreateEffect(c)
        e2:SetCategory(CATEGORY_DISABLE)
        e2:SetType(EFFECT_TYPE_ACTIVATE)
        e2:SetCode(EVENT_FREE_CHAIN)
        e2:SetCost(cm.cost)
        e2:SetTarget(cm.target)
        e2:SetOperation(cm.activate)
        c:RegisterEffect(e2)
        local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
        e3:SetCategory(CATEGORY_POSITION+CATEGORY_ATKCHANGE) e3:SetCategory(CATEGORY_POSITION+CATEGORY_ATKCHANGE)
        e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O) e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
        ...@@ -26,55 +26,88 @@ function c60010042.initial_effect(c) ...@@ -26,55 +26,88 @@ function c60010042.initial_effect(c)
        e3:SetOperation(cm.posop) e3:SetOperation(cm.posop)
        c:RegisterEffect(e3) c:RegisterEffect(e3)
        end end
        function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk) function cm.condition(e)
        if chk==0 then return e:GetHandler():IsReleasable() end local tp=e:GetHandlerPlayer()
        Duel.Release(e:GetHandler(),REASON_COST) -- 检查是否是自己的回合，且对方场上的卡比自己多
        end return Duel.GetTurnPlayer()==tp
        function cm.postg(e,tp,eg,ep,ev,re,r,rp,chk) and Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0)
        if chk==0 then return Duel.IsExistingMatchingCard(cm.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
        end end
        function cm.posop(e,tp,eg,ep,ev,re,r,rp) function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
        local c=e:GetHandler() local c=e:GetHandler()
        local g=Duel.GetMatchingGroup(cm.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil) if chk==0 then return true end
        if g:GetCount()==0 then return end local g=Group.CreateGroup()
        if Duel.ChangePosition(g,POS_FACEUP_ATTACK)~=0 then -- 修改判断条件，确保对方场上卡片数量大于我方
        local sg=Duel.GetOperatedGroup() if Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)>Duel.GetFieldGroupCount(tp,LOCATION_ONFIELD,0) and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
        local tc=sg:GetFirst() g=Duel.GetFieldGroup(tp,0,LOCATION_HAND,nil)
        if Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
        local tc=Duel.SelectMatchingCard(tp,Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,1,nil):GetFirst()
        if tc then
        g:AddCard(tc)
        end
        end
        Duel.ConfirmCards(tp,g)
        local tc=g:GetFirst()
        while tc do while tc do
        local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_FIELD)
        e1:SetCode(EFFECT_SET_ATTACK_FINAL) e1:SetCode(EFFECT_DISABLE)
        e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e1:SetTargetRange(LOCATION_ONFIELD+LOCATION_HAND,LOCATION_ONFIELD+LOCATION_HAND)
        e1:SetValue(tc:GetAttack()*2) e1:SetTarget(cm.distg1)
        tc:RegisterEffect(e1) e1:SetLabelObject(tc)
        local e1=Effect.CreateEffect(c) e1:SetReset(RESET_CHAIN) -- 改为连锁结束时
        e1:SetType(EFFECT_TYPE_SINGLE) Duel.RegisterEffect(e1,tp)
        e1:SetCode(EFFECT_SET_DEFENSE_FINAL) local e2=Effect.CreateEffect(c)
        e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE) e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
        e1:SetValue(tc:GetDefense()*2) e2:SetCode(EVENT_CHAIN_SOLVING)
        tc:RegisterEffect(e1) e2:SetCondition(cm.discon)
        tc=sg:GetNext() e2:SetOperation(cm.disop)
        e2:SetLabelObject(tc)
        e2:SetReset(RESET_CHAIN) -- 改为连锁结束时
        Duel.RegisterEffect(e2,tp)
        tc=g:GetNext()
        end end
        end end
        end end
        function cm.distg1(e,c)
        local tc=e:GetLabelObject()
        if c==e:GetOwner() then return false end -- 使用GetOwner来获取原卡
        if c:IsType(TYPE_SPELL+TYPE_TRAP) then
        return c:IsOriginalCodeRule(tc:GetOriginalCodeRule())
        else
        return c:IsOriginalCodeRule(tc:GetOriginalCodeRule()) and (c:IsType(TYPE_EFFECT) or c:GetOriginalType()&TYPE_EFFECT~=0)
        end
        end
        function cm.discon(e,tp,eg,ep,ev,re,r,rp)
        local tc=e:GetLabelObject()
        if not tc or not re:GetHandler() then return false end
        if re:GetHandler()==e:GetOwner() then return false end -- 排除这张卡自身
        return re:GetHandler():IsOriginalCodeRule(tc:GetOriginalCodeRule())
        end
        function cm.disop(e,tp,eg,ep,ev,re,r,rp)
        Duel.NegateEffect(ev)
        end
        function cm.negfilter(c)
        return c:IsFaceup() and not c:IsDisabled()
        end
        function cm.target(e,tp,eg,ep,ev,re,r,rp,chk) function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
        if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end if chk==0 then return Duel.IsExistingMatchingCard(cm.negfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
        local g=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler()) local g=Duel.GetMatchingGroup(cm.negfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())
        Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,g:GetCount(),0,0) Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,g:GetCount(),0,0)
        end end
        function cm.activate(e,tp,eg,ep,ev,re,r,rp) function cm.activate(e,tp,eg,ep,ev,re,r,rp)
        local g=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler()) local c=e:GetHandler()
        if not c:IsRelateToEffect(e) then return end
        local g=Duel.GetMatchingGroup(cm.negfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,c)
        local tc=g:GetFirst() local tc=g:GetFirst()
        while tc do while tc do
        local e1=Effect.CreateEffect(e:GetHandler()) local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
        e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_DISABLE)
        e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
        tc:RegisterEffect(e1) tc:RegisterEffect(e1)
        local e2=Effect.CreateEffect(e:GetHandler()) local e2=Effect.CreateEffect(c)
        e2:SetType(EFFECT_TYPE_SINGLE) e2:SetType(EFFECT_TYPE_SINGLE)
        e2:SetCode(EFFECT_DISABLE_EFFECT) e2:SetCode(EFFECT_DISABLE_EFFECT)
        e2:SetValue(RESET_TURN_SET)
        e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
        tc:RegisterEffect(e2) tc:RegisterEffect(e2)
        tc=g:GetNext() tc=g:GetNext()
        ...@@ -94,65 +127,39 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp) ...@@ -94,65 +127,39 @@ function cm.activate(e,tp,eg,ep,ev,re,r,rp)
        Duel.RegisterEffect(e4,tp) Duel.RegisterEffect(e4,tp)
        end end
        end end
        function cm.condition(e) function cm.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
        return Duel.GetTurnPlayer()==e:GetHandlerPlayer() if chk==0 then return e:GetHandler():IsReleasable() end
        Duel.Release(e:GetHandler(),REASON_COST)
        end end
        function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk) function cm.posfilter(c)
        local c=e:GetHandler() return c:IsCanChangePosition()
        if chk==0 then return true end end
        local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_HAND,nil) function cm.postg(e,tp,eg,ep,ev,re,r,rp,chk)
        if Duel.GetMatchingGroupCount(aux.TRUE,tp,0,LOCATION_ONFIELD,nil)>=Duel.GetMatchingGroupCount(aux.TRUE,tp,LOCATION_ONFIELD,0,nil)and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then if chk==0 then return Duel.IsExistingMatchingCard(cm.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
        if Duel.IsExistingMatchingCard(Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then Duel.SetOperationInfo(0,CATEGORY_POSITION,nil,1,0,0)
        local tc=Duel.SelectMatchingCard(tp,Card.IsFacedown,tp,0,LOCATION_ONFIELD,1,1,nil):GetFirst() Duel.SetOperationInfo(0,CATEGORY_ATKCHANGE,nil,1,0,0)
        g:AddCard(tc) end
        end function cm.posop(e,tp,eg,ep,ev,re,r,rp)
        Duel.ConfirmCards(tp,g) local c=e:GetHandler()
        end local g=Duel.GetMatchingGroup(cm.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
        local tc=g:GetFirst() if g:GetCount()==0 then return end
        if Duel.ChangePosition(g,POS_FACEUP_ATTACK)~=0 then
        local sg=Duel.GetOperatedGroup()
        local tc=sg:GetFirst()
        while tc do while tc do
        local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
        e1:SetType(EFFECT_TYPE_FIELD) e1:SetType(EFFECT_TYPE_SINGLE)
        e1:SetCode(EFFECT_DISABLE) e1:SetCode(EFFECT_SET_ATTACK_FINAL)
        e1:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD) e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
        e1:SetTarget(cm.distg1) e1:SetValue(tc:GetAttack()*2)
        e1:SetLabelObject(tc) tc:RegisterEffect(e1)
        e1:SetReset(RESET_EVENT+EVENT_CHAIN_END)
        Duel.RegisterEffect(e1,tp)
        local e2=Effect.CreateEffect(c) local e2=Effect.CreateEffect(c)
        e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e2:SetType(EFFECT_TYPE_SINGLE)
        e2:SetCode(EVENT_CHAIN_SOLVING) e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
        e2:SetCondition(cm.discon) e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE)
        e2:SetOperation(cm.disop) e2:SetValue(tc:GetDefense()*2)
        e2:SetLabelObject(tc) tc:RegisterEffect(e2)
        e2:SetReset(RESET_EVENT+EVENT_CHAIN_END) tc=sg:GetNext()
        Duel.RegisterEffect(e2,tp)
        local e3=Effect.CreateEffect(c)
        e3:SetType(EFFECT_TYPE_FIELD)
        e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
        e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
        e3:SetTarget(cm.distg2)
        e3:SetLabelObject(tc)
        e3:SetReset(RESET_EVENT+EVENT_CHAIN_END)
        Duel.RegisterEffect(e3,tp)
        tc=g:GetNext()
        end end
        end
        function cm.distg1(e,c)
        local tc=e:GetLabelObject()
        if c:IsType(TYPE_SPELL+TYPE_TRAP) then
        return c:IsOriginalCodeRule(tc:GetOriginalCodeRule())
        else
        return c:IsOriginalCodeRule(tc:GetOriginalCodeRule()) and (c:IsType(TYPE_EFFECT) or c:GetOriginalType()&TYPE_EFFECT~=0)
        end end
        end end
        \ No newline at end of file
        function cm.distg2(e,c)
        local tc=e:GetLabelObject()
        return c:IsOriginalCodeRule(tc:GetOriginalCodeRule())
        end
        function cm.discon(e,tp,eg,ep,ev,re,r,rp)
        local tc=e:GetLabelObject()
        return re:GetHandler():IsOriginalCodeRule(tc:GetOriginalCodeRule())
        end
        function cm.disop(e,tp,eg,ep,ev,re,r,rp)
        Duel.NegateEffect(ev)
        end
        \ 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