Skip to content

Y
ygopro-222DIY-cards
Commit b5fee1ff authored by Tachibana's avatar Tachibana
Browse files
Options

1145141919810

parent 6efad2e5
Pipeline #14320 passed with stages
      in 30 minutes and 47 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 104 additions and 71 deletions
      expansions/script/c10701021.lua
      View file @ b5fee1ff
      ...@@ -7,10 +7,11 @@ function cm.initial_effect(c) ...@@ -7,10 +7,11 @@ function cm.initial_effect(c)
      e2:SetDescription(aux.Stringid(m,1)) e2:SetDescription(aux.Stringid(m,1))
      e2:SetCategory(CATEGORY_DISABLE+CATEGORY_TOHAND+CATEGORY_REMOVE+CATEGORY_TOGRAVE+CATEGORY_DRAW) e2:SetCategory(CATEGORY_DISABLE+CATEGORY_TOHAND+CATEGORY_REMOVE+CATEGORY_TOGRAVE+CATEGORY_DRAW)
      e2:SetType(EFFECT_TYPE_ACTIVATE) e2:SetType(EFFECT_TYPE_ACTIVATE)
      e2:SetCode(EVENT_LEAVE_FIELD) e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetCondition(cm.scon1) e2:SetCondition(cm.scon1)
      e2:SetTarget(cm.stg) e2:SetTarget(cm.stg)
      e2:SetOperation(cm.sop) e2:SetOperation(cm.sop)
      c:RegisterEffect(e2)
      --Activate --Activate
      local e1=e2:Clone() local e1=e2:Clone()
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE) e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
      ...@@ -21,9 +22,12 @@ end ...@@ -21,9 +22,12 @@ end
      function cm.cfilter(c) function cm.cfilter(c)
      return c:IsFaceup() and c:IsCode(10701101) return c:IsFaceup() and c:IsCode(10701101)
      end end
      function cm.cfilter1(c)
      return c:IsFaceup() and not c:IsSetCard(0x3481)
      end
      function cm.scon1(e,tp,eg,ep,ev,re,r,rp) function cm.scon1(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsPreviousPosition(POS_FACEUP) return not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) and
      and Duel.GetTurnPlayer()~=tp and not Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) not Duel.IsExistingMatchingCard(cm.cfilter1,tp,LOCATION_MZONE,0,1,nil)
      end end
      function cm.stg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.stg(e,tp,eg,ep,ev,re,r,rp,chk)
      --self --self
      ...@@ -48,13 +52,13 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp) ...@@ -48,13 +52,13 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp)
      local b3=Duel.IsExistingMatchingCard(Card.IsAbleToGrave,1-tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,1,nil) and Duel.IsPlayerCanDraw(1-tp,1) local b3=Duel.IsExistingMatchingCard(Card.IsAbleToGrave,1-tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingMatchingCard(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,1,nil) and Duel.IsPlayerCanDraw(1-tp,1)
      --Select --Select
      local op1=0 local op1=0
      if a1 and a2 and a3 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,0),aux.Stringid(m,1),aux.Stringid(m,2)) if a1 and a2 and a3 then op1=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1),aux.Stringid(m,2))
      elseif a1 and a2 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,0),aux.Stringid(m,1)) elseif a1 and a2 then op1=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,1))
      elseif a2 and a3 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,1),aux.Stringid(m,2))+1 elseif a2 and a3 then op1=Duel.SelectOption(tp,aux.Stringid(m,1),aux.Stringid(m,2))+1
      elseif a1 and a3 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,0),aux.Stringid(m,2)+1) elseif a1 and a3 then op1=Duel.SelectOption(tp,aux.Stringid(m,0),aux.Stringid(m,2)+1)
      elseif a1 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,0)) elseif a1 then op1=Duel.SelectOption(tp,aux.Stringid(m,0))
      elseif a2 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,1))+1 elseif a2 then op1=Duel.SelectOption(tp,aux.Stringid(m,1))+1
      elseif a3 then op1=Duel.SelectOption(1-tp,aux.Stringid(m,2))+2 elseif a3 then op1=Duel.SelectOption(tp,aux.Stringid(m,2))+2
      else return end else return end
      local op2=0 local op2=0
      if b1 and b2 and b3 then op2=Duel.SelectOption(1-tp,aux.Stringid(m,0),aux.Stringid(m,1),aux.Stringid(m,2)) if b1 and b2 and b3 then op2=Duel.SelectOption(1-tp,aux.Stringid(m,0),aux.Stringid(m,1),aux.Stringid(m,2))
      ...@@ -68,7 +72,7 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp) ...@@ -68,7 +72,7 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp)
      --active --active
      if op1==op2 then if op1==op2 then
      if op1==0 then if op1==0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_OPERATECARD) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
      local tc=Duel.SelectMatchingCard(tp,aux.NegateMonsterFilter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst() local tc=Duel.SelectMatchingCard(tp,aux.NegateMonsterFilter,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      if tc and tc:IsLocation(LOCATION_MZONE) then if tc and tc:IsLocation(LOCATION_MZONE) then
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      ...@@ -96,6 +100,7 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp) ...@@ -96,6 +100,7 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp)
      e3:SetReset(RESET_PHASE+PHASE_END) e3:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e3,tp) Duel.RegisterEffect(e3,tp)
      end end
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_DISABLE)
      local tc1=Duel.SelectMatchingCard(1-tp,aux.NegateMonsterFilter,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst() local tc1=Duel.SelectMatchingCard(1-tp,aux.NegateMonsterFilter,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      if tc1 and tc1:IsLocation(LOCATION_MZONE) then if tc1 and tc1:IsLocation(LOCATION_MZONE) then
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      ...@@ -126,64 +131,83 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp) ...@@ -126,64 +131,83 @@ function cm.sop(e,tp,eg,ep,ev,re,r,rp)
      elseif op1==1 then elseif op1==1 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_MZONE,0,1,1,nil):GetFirst() local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      local tc1=Duel.SelectMatchingCard(1-tp,Card.IsAbleToHand,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst() if Duel.SendtoHand(tc,nil,REASON_EFFECT)~=0 then
      if Duel.SendtoHand(tc,REASON_EFFECT)~=0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local tc2=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,1,nil):GetFirst() local tc2=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,1,nil):GetFirst()
      Duel.Remove(tc2,POS_FACEDOWN,REASON_EFFECT) Duel.Remove(tc2,POS_FACEDOWN,REASON_EFFECT)
      end end
      if Duel.SendtoHand(tc1,REASON_EFFECT)~=0 then Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_ATOHAND)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE) local tc1=Duel.SelectMatchingCard(1-tp,Card.IsAbleToHand,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      if Duel.SendtoHand(tc1,nil,REASON_EFFECT)~=0 then
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
      local tc2=Duel.SelectMatchingCard(1-tp,Card.IsAbleToRemove,1-tp,LOCATION_EXTRA,0,1,1,nil):GetFirst() local tc2=Duel.SelectMatchingCard(1-tp,Card.IsAbleToRemove,1-tp,LOCATION_EXTRA,0,1,1,nil):GetFirst()
      Duel.Remove(tc2,POS_FACEDOWN,REASON_EFFECT) Duel.Remove(tc2,POS_FACEDOWN,REASON_EFFECT)
      end end
      elseif op1==2 then elseif op1==2 then
      local sg1=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_HAND,0,nil)
      local sg2=Duel.GetMatchingGroup(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,nil)
      local x1=0
      local x2=0
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_MZONE,0,1,1,nil):GetFirst() local tc=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      if Duel.SendtoGrave(tc,REASON_EFFECT)~=0 then if Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and Duel.Remove(sg1,POS_FACEDOWN,REASON_EFFECT)~=0 then
      local sg=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_HAND,LOCATION_HAND,nil) x1=1
      if Duel.Remove(sg,POS_FACEDOWN,REASON_EFFECT+REASON_TEMPORARY)~=0 then end
      local oc=sg:GetFirst() Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
      while sg do local tc1=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst()
      local e1=Effect.CreateEffect(cc) if Duel.SendtoGrave(tc1,REASON_EFFECT)~=0 and Duel.Remove(sg2,POS_FACEDOWN,REASON_EFFECT)~=0 then
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) x2=1
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetLabelObject(oc)
      e1:SetCountLimit(1)
      e1:SetOperation(cm.retop)
      Duel.RegisterEffect(e1,tp)
      oc=sg:GetNext()
      end
      Duel.Draw(tp,2,REASON_EFFECT)
      end
      end end
      local tc1=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_MZONE,0,1,1,nil):GetFirst() local fid=c:GetFieldID()
      if Duel.SendtoGrave(tc1,REASON_EFFECT)~=0 then local e1=Effect.CreateEffect(c)
      local sg=Duel.GetMatchingGroup(Card.IsAbleToRemove,1-tp,LOCATION_HAND,0,nil) e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      if Duel.Remove(sg,POS_FACEDOWN,REASON_EFFECT+REASON_TEMPORARY)~=0 then e1:SetCode(EVENT_PHASE+PHASE_END)
      local oc=sg:GetFirst() e1:SetCountLimit(1)
      while sg do e1:SetLabel(fid)
      local e1=Effect.CreateEffect(cc) e1:SetCondition(cm.retcon)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS) e1:SetOperation(cm.retop)
      e1:SetCode(EVENT_PHASE+PHASE_END) e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetReset(RESET_PHASE+PHASE_END) if x1==1 and x2==1 then
      e1:SetLabelObject(oc) local sg=Group.__add(sg1,sg2)
      e1:SetCountLimit(1) sg:KeepAlive()
      e1:SetOperation(cm.retop) e1:SetLabelObject(sg)
      Duel.RegisterEffect(e1,tp) Duel.RegisterEffect(e1,tp)
      oc=sg:GetNext() Duel.Draw(tp,2,REASON_EFFECT)
      end Duel.Draw(1-tp,2,REASON_EFFECT)
      Duel.Draw(1-tp,2,REASON_EFFECT) local sc=sg:GetFirst()
      while sc do
      sc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
      sc=sg:GetNext()
      end
      elseif x1==1 then
      sg1:KeepAlive()
      e1:SetLabelObject(sg1)
      Duel.RegisterEffect(e1,tp)
      Duel.Draw(tp,2,REASON_EFFECT)
      local sc=sg1:GetFirst()
      while sc do
      sc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
      sc=sg1:GetNext()
      end
      elseif x2==1 then
      sg2:KeepAlive()
      e1:SetLabelObject(sg2)
      Duel.RegisterEffect(e1,tp)
      Duel.Draw(1-tp,2,REASON_EFFECT)
      local sc=sg2:GetFirst()
      while sc do
      sc:RegisterFlagEffect(m,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1,fid)
      sc=sg2:GetNext()
      end end
      end end
      else return end else return end
      else else
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil) local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_HAND,0,1,1,nil)
      local g2=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_ONFIELD,0,1,1,nil) local g2=Duel.SelectMatchingCard(tp,Card.IsAbleToGrave,tp,LOCATION_ONFIELD,0,1,1,nil)
      local g3=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_HAND,0,1,1,nil) Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
      local g4=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_ONFIELD,0,1,1,nil) local g3=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_HAND,0,1,1,nil)
      local g4=Duel.SelectMatchingCard(1-tp,Card.IsAbleToGrave,1-tp,LOCATION_ONFIELD,0,1,1,nil)
      g1:Merge(g2,g3,g4) g1:Merge(g2,g3,g4)
      Duel.SendtoGrave(g1,REASON_EFFECT) Duel.SendtoGrave(g1,REASON_EFFECT)
      end end
      ...@@ -207,13 +231,27 @@ end ...@@ -207,13 +231,27 @@ end
      function cm.disop(e,tp,eg,ep,ev,re,r,rp) function cm.disop(e,tp,eg,ep,ev,re,r,rp)
      Duel.NegateEffect(ev) Duel.NegateEffect(ev)
      end end
      function cm.retfilter(c,label)
      return c:GetFlagEffectLabel(m)==label
      end
      function cm.retcon(e,tp,eg,ep,ev,re,r,rp)
      local g=e:GetLabelObject()
      local sg=g:Filter(cm.retfilter,nil,e:GetLabel())
      if sg:GetCount()>0 then
      return true
      else
      e:Reset()
      return false
      end
      end
      function cm.retop(e,tp,eg,ep,ev,re,r,rp) function cm.retop(e,tp,eg,ep,ev,re,r,rp)
      Duel.ReturnToField(e:GetLabelObject()) local g=e:GetLabelObject()
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end end
      -- --
      function cm.scon2(e,tp,eg,ep,ev,re,r,rp) function cm.scon2(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsPreviousLocation(LOCATION_ONFIELD) and e:GetHandler():IsPreviousPosition(POS_FACEUP) return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) and
      and Duel.GetTurnPlayer()~=tp and Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil) not Duel.IsExistingMatchingCard(cm.cfilter1,tp,LOCATION_MZONE,0,1,nil)
      end end
      ......
      expansions/script/c10701041.lua
      View file @ b5fee1ff
      ...@@ -37,7 +37,7 @@ function cm.initial_effect(c) ...@@ -37,7 +37,7 @@ function cm.initial_effect(c)
      e3:SetOperation(cm.desop) e3:SetOperation(cm.desop)
      c:RegisterEffect(e3) c:RegisterEffect(e3)
      end end
      function cm.tgfilter(c) function cm.tgfilter(c,e,tp)
      return c:IsSetCard(0x3481) or c:IsRace(RACE_ZOMBIE) and c:IsAbleToGrave() and return c:IsSetCard(0x3481) or c:IsRace(RACE_ZOMBIE) and c:IsAbleToGrave() and
      Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode()) Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c:GetCode())
      end end
      ...@@ -45,10 +45,10 @@ function cm.spfilter(c,e,tp,code) ...@@ -45,10 +45,10 @@ function cm.spfilter(c,e,tp,code)
      return c:IsSetCard(0x3481) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) return c:IsSetCard(0x3481) and not c:IsCode(code) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk) function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.tgfilter(chkc) end if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.tgfilter(chkc,e,tp) end
      if chk==0 then return Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_MZONE,0,1,nil) and (Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil) or Duel.GetTurnPlayer()~=1-tp) end if chk==0 then return Duel.IsExistingTarget(cm.tgfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) and (Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,nil) or Duel.GetTurnPlayer()~=tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_MZONE,0,1,1,nil) local g=Duel.SelectTarget(tp,cm.tgfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0) Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end end
      ...@@ -58,7 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -58,7 +58,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      if tc:IsRelateToEffect(e) and Duel.SendtoGrave(tc,0,REASON_EFFECT)>0 and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,code) then if tc:IsRelateToEffect(e) and Duel.SendtoGrave(tc,0,REASON_EFFECT)>0 and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,code) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,code) local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp,code)
      if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) and Duel.GetTurnPlayer()~=tp then if g:GetCount()>0 and Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP) and Duel.GetTurnPlayer()==tp then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil) local g1=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
      if g1:GetCount()>0 then if g1:GetCount()>0 then
      ......
      expansions/script/c10701061.lua
      View file @ b5fee1ff
      ...@@ -84,8 +84,9 @@ function cm.ntrop(e,tp,eg,ep,ev,re,r,rp) ...@@ -84,8 +84,9 @@ function cm.ntrop(e,tp,eg,ep,ev,re,r,rp)
      Duel.GetControl(tc,tp) Duel.GetControl(tc,tp)
      --cannot attack, trigger --cannot attack, trigger
      local e4=Effect.CreateEffect(c) local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_TARGET) e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_CANNOT_ATTACK) e4:SetCode(EFFECT_CANNOT_ATTACK)
      e4:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e4) tc:RegisterEffect(e4)
      local e5=e4:Clone() local e5=e4:Clone()
      e5:SetCode(EFFECT_CANNOT_TRIGGER) e5:SetCode(EFFECT_CANNOT_TRIGGER)
      ......
      expansions/script/c10701091.lua
      View file @ b5fee1ff
      ...@@ -88,10 +88,5 @@ end ...@@ -88,10 +88,5 @@ end
      function cm.excon(e,tp,eg,ep,ev,re,r,rp) function cm.excon(e,tp,eg,ep,ev,re,r,rp)
      return re and re:GetHandler():IsCode(10701101) return re and re:GetHandler():IsCode(10701101)
      end end
      --
      function cm.excon(e,tp,eg,ep,ev,re,r,rp)
      return re and re:GetHandler():IsCode(10701101)
      end
      expansions/script/c10701111.lua
      View file @ b5fee1ff
      ...@@ -32,6 +32,7 @@ function cm.initial_effect(c) ...@@ -32,6 +32,7 @@ function cm.initial_effect(c)
      c:RegisterEffect(e3) c:RegisterEffect(e3)
      --SpecialSummon others --SpecialSummon others
      local e4=e3:Clone() local e4=e3:Clone()
      e4:SetCondition(cm.ocon)
      e4:SetTarget(cm.otg) e4:SetTarget(cm.otg)
      e4:SetOperation(cm.oop) e4:SetOperation(cm.oop)
      c:RegisterEffect(e4) c:RegisterEffect(e4)
      ...@@ -76,7 +77,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp) ...@@ -76,7 +77,7 @@ function cm.spop(e,tp,eg,ep,ev,re,r,rp)
      end end
      end end
      function cm.tgtg(e,c) function cm.tgtg(e,c)
      return not e:GetLabelObject() return c~=e:GetLabelObject()
      end end
      --SpecialSummon self --SpecialSummon self
      function cm.scon(e,tp,eg,ep,ev,re,r,rp) function cm.scon(e,tp,eg,ep,ev,re,r,rp)
      ......
      expansions/script/c51300131.lua
      View file @ b5fee1ff
      ...@@ -5,7 +5,6 @@ function cm.initial_effect(c) ...@@ -5,7 +5,6 @@ function cm.initial_effect(c)
      --fusion material --fusion material
      c:EnableReviveLimit() c:EnableReviveLimit()
      aux.AddFusionProcFunRep(c,cm.ffilter,2,true) aux.AddFusionProcFunRep(c,cm.ffilter,2,true)
      --aux.AddFusionProcFun2(c,cm.ffilter1,cm.ffilter2,true)
      --atkup --atkup
      local e1=Effect.CreateEffect(c) local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE) e1:SetType(EFFECT_TYPE_SINGLE)
      ...@@ -16,7 +15,6 @@ function cm.initial_effect(c) ...@@ -16,7 +15,6 @@ function cm.initial_effect(c)
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_CONTROL) e3:SetCategory(CATEGORY_CONTROL)
      e3:SetType(EFFECT_TYPE_IGNITION) e3:SetType(EFFECT_TYPE_IGNITION)
      --e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetRange(LOCATION_MZONE) e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL) e3:SetCountLimit(1,m+EFFECT_COUNT_CODE_DUEL)
      e3:SetCondition(cm.condition) e3:SetCondition(cm.condition)
      ...@@ -31,8 +29,8 @@ function cm.initial_effect(c) ...@@ -31,8 +29,8 @@ function cm.initial_effect(c)
      c:RegisterEffect(e2) c:RegisterEffect(e2)
      end end
      function cm.ffilter(c,fc,sub,mg,sg) function cm.ffilter(c,fc,sub,mg,sg)
      return not sg or sg:FilterCount(aux.TRUE,c)==0 return c:IsFusionSetCard(0xa01) and c:IsLevelAbove(1) and (not sg or sg:FilterCount(aux.TRUE,c)==0
      or (c:IsSetCard(0xa01) and c:IsType(TYPE_MONSTER) and c:IsLevelAbove(1) and sg:IsExists(Card.IsLevelAbove,1,c,10-c:GetLevel())) or sg:IsExists(Card.IsLevelAbove,1,c,10-c:GetLevel()))
      end end
      function cm.ffilter2(c) function cm.ffilter2(c)
      return c:IsFusionSetCard(0xa01) return c:IsFusionSetCard(0xa01)
      ......
      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