Skip to content

Y
ygopro-222DIY-cards
Commit 31c502b0 authored by 聖園ミカ's avatar 聖園ミカ 🐟
Browse files
Options

wdnmd

parent e18159bd
Pipeline #25930 passed with stages
      in 30 minutes and 34 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 99 additions and 55 deletions
      expansions/script/c33501206.lua
      View file @ 31c502b0
      ......@@ -23,25 +23,32 @@ function cm.initial_effect(c)
      e3:SetOperation(cm.atkop)
      c:RegisterEffect(e3)
      end
      function cm.rfilter(c,tp)
      return Duel.GetMZoneCount(tp,c)>0 and c:IsType(TYPE_MONSTER)
      function cm.costfilter(c,tp)
      return Duel.GetMZoneCount(tp,c)>0
      and (c:IsControler(tp) or c:IsFaceup())
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.rfilter,1,REASON_COST,true,nil,tp) end
      e:SetLabel(100)
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.rfilter,1,1,REASON_COST,true,nil,tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      end
      function cm.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
      if not c:IsRelateToEffect(e) then return end
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      -------
      function cm.atkcon(e,tp,eg,ep,ev,re,r,rp)
      ......
      expansions/script/c81004300.lua
      View file @ 31c502b0
      ......@@ -30,16 +30,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -49,8 +51,11 @@ function cm.thfilter(c)
      end
      function cm.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(cm.thfilter,tp,LOCATION_EXTRA,0,1,nil)
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_EXTRA,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      ......
      expansions/script/c81004301.lua
      View file @ 31c502b0
      ......@@ -30,16 +30,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -49,8 +51,11 @@ function cm.sfilter(c,e,tp)
      end
      function cm.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(cm.sfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(cm.sfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
      and Duel.SelectYesNo(tp,aux.Stringid(m,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      ......
      expansions/script/c81004302.lua
      View file @ 31c502b0
      ......@@ -30,16 +30,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -47,10 +49,14 @@ end
      function cm.thfilter(c)
      return c:IsAttack(1550) and c:IsDefense(1050) and not c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
      end
      function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      function cm.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(cm.thfilter),tp,LOCATION_GRAVE,0,1,nil)
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,2)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      ......
      expansions/script/c81004303.lua
      View file @ 31c502b0
      ......@@ -30,16 +30,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -49,8 +51,11 @@ function cm.tefilter(c)
      end
      function cm.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(cm.tefilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(cm.tefilter,tp,LOCATION_DECK,0,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(m,0))
      local g=Duel.SelectMatchingCard(tp,cm.tefilter,tp, LOCATION_DECK,0,1,1,nil)
      ......
      expansions/script/c81004304.lua
      View file @ 31c502b0
      ......@@ -31,16 +31,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -50,12 +52,16 @@ function cm.thfilter(c)
      end
      function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)
      if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 and g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      local sg=Duel.GetMatchingGroup(cm.thfilter,tp,LOCATION_DECK,0,nil)
      if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=g:Select(tp,1,1,nil)
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      local vg=sg:Select(tp,1,1,nil)
      Duel.SendtoHand(vg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg)
      end
      local e1=Effect.CreateEffect(e:GetHandler())
      ......
      expansions/script/c81004305.lua
      View file @ 31c502b0
      ......@@ -30,16 +30,18 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      ......@@ -49,8 +51,11 @@ function cm.tgfilter(c)
      end
      function cm.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(cm.tgfilter,tp,LOCATION_REMOVED,0,1,nil)
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_REMOVED,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      ......
      expansions/script/c81004306.lua
      View file @ 31c502b0
      ......@@ -30,24 +30,29 @@ function cm.costfilter(c,tp)
      end
      function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      if chk==0 then return Duel.CheckReleaseGroupEx(tp,cm.costfilter,1,e:GetHandler(),tp) end
      local g=Duel.GetReleaseGroup(tp,true):Filter(cm.costfilter,e:GetHandler(),tp)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
      local g=Duel.SelectReleaseGroupEx(tp,cm.costfilter,1,1,e:GetHandler(),tp)
      Duel.Release(g,REASON_COST)
      local rg=g:Select(tp,1,1,nil)
      local tc=rg:GetFirst()
      Duel.Release(tc,REASON_COST)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==100 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      return res and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,true,POS_FACEUP)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      end
      function cm.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(Card.IsAbleToHand,tp,LOCATION_PZONE,0,1,nil)
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,true,POS_FACEUP)~=0 then
      c:CompleteProcedure()
      end
      if Duel.IsExistingMatchingCard(Card.IsAbleToHand,tp,LOCATION_PZONE,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      ......
      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