Skip to content

Y
ygopro-222DIY-cards
Commit a1cb9d4e authored by songtongtong's avatar songtongtong
Browse files
Options

bug fix

parent 39a9e8f2
Pipeline #22731 passed with stages
      in 24 minutes and 40 seconds
      Expand all Hide whitespace changes
      Inline Side-by-side
      Showing with 1727 additions and 1722 deletions
      expansions/pics/11900074.jpg
      View replaced file @ 39a9e8f2 View file @ a1cb9d4e
      expansions/pics/11900074.jpg

      18.4 KB | W: | H:

      expansions/pics/11900074.jpg

      96 KB | W: | H:

      expansions/pics/11900074.jpg
      expansions/pics/11900074.jpg
      expansions/pics/11900074.jpg
      expansions/pics/11900074.jpg
      • 2-up
      • Swipe
      • Onion skin
      expansions/pics/50218149.jpg
      View replaced file @ 39a9e8f2 View file @ a1cb9d4e
      expansions/pics/50218149.jpg

      79 KB | W: | H:

      expansions/pics/50218149.jpg

      71.8 KB | W: | H:

      expansions/pics/50218149.jpg
      expansions/pics/50218149.jpg
      expansions/pics/50218149.jpg
      expansions/pics/50218149.jpg
      • 2-up
      • Swipe
      • Onion skin
      expansions/pics/50221220.jpg
      View replaced file @ 39a9e8f2 View file @ a1cb9d4e
      expansions/pics/50221220.jpg

      60.2 KB | W: | H:

      expansions/pics/50221220.jpg

      66.6 KB | W: | H:

      expansions/pics/50221220.jpg
      expansions/pics/50221220.jpg
      expansions/pics/50221220.jpg
      expansions/pics/50221220.jpg
      • 2-up
      • Swipe
      • Onion skin
      expansions/pics/50221225.jpg
      View replaced file @ 39a9e8f2 View file @ a1cb9d4e
      expansions/pics/50221225.jpg

      68.9 KB | W: | H:

      expansions/pics/50221225.jpg

      61.1 KB | W: | H:

      expansions/pics/50221225.jpg
      expansions/pics/50221225.jpg
      expansions/pics/50221225.jpg
      expansions/pics/50221225.jpg
      • 2-up
      • Swipe
      • Onion skin
      expansions/script/c16114200.lua
      View file @ a1cb9d4e
      ......@@ -18,6 +18,7 @@ function cm.initial_effect(c)
      e2:SetCode(EVENT_RECOVER)
      e2:SetRange(LOCATION_SZONE)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1)
      e2:SetCost(cm.spcost)
      e2:SetCondition(cm.thcon)
      e2:SetTarget(cm.thtg)
      ......
      expansions/script/c16150020.lua
      View file @ a1cb9d4e
      ......@@ -112,7 +112,7 @@ function cm.tkop(e,tp,eg,ep,ev,re,r,rp)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      function cm.condition(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetFlagEffect(m)==0
      return e:GetHandler():GetFlagEffect(m)==0 and rp~=tp
      end
      function cm.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      ......
      expansions/script/c16150035.lua
      View file @ a1cb9d4e
      ......@@ -11,7 +11,7 @@ function cm.initial_effect(c)
      e1:SetOperation(cm.spop)
      c:RegisterEffect(e1)
      end
      function cm.spfilter1(c,tp)
      function cm.spfilter(c,tp)
      return rk.check(c,"DAIOUJYUU") and c:IsType(TYPE_MONSTER) and not c:IsForbidden() and c:CheckUniqueOnField(tp)
      end
      function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      ......
      expansions/script/c17033270.lua
      View file @ a1cb9d4e
      This diff is collapsed.
      expansions/script/c33400903.lua
      View file @ a1cb9d4e
      --甜蜜礼物 诱宵美九
      local m=33400903
      local cm=_G["c"..m]
      function cm.initial_effect(c)
      --draw
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,m)
      e1:SetTarget(cm.thtg1)
      e1:SetOperation(cm.tgop1)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --search
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW+CATEGORY_HANDES)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,m+10000)
      e3:SetCondition(cm.con)
      e3:SetCost(cm.drcost)
      e3:SetTarget(cm.drtg)
      e3:SetOperation(cm.drop)
      c:RegisterEffect(e3)
      end
      function cm.tgfilter(c)
      return c:IsSetCard(0x341,0x340) and c:IsType(TYPE_CONTINUOUS+TYPE_FIELD) and c:IsAbleToGrave()
      end
      function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,nil)
      Duel.SendtoGrave(g,REASON_COST)
      end
      function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(2)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
      Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,1)
      end
      function cm.drop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      if Duel.Draw(p,2,REASON_EFFECT)==2 then
      Duel.ShuffleHand(tp)
      Duel.BreakEffect()
      Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD)
      end
      end
      function cm.cfilter(c,tp)
      return c:IsPreviousLocation(LOCATION_HAND) and c:GetPreviousControler()==tp
      end
      function cm.con(e,tp,eg,ep,ev,re,r,rp)
      return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.cfilter,1,nil,tp)
      end
      function cm.setfilter(c)
      return c:IsSetCard(0xc341,0x5340) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
      end
      function cm.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end
      end
      function cm.tgop1(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SSet(tp,g:GetFirst())
      Duel.ConfirmCards(1-tp,g)
      end
      end
      --甜蜜礼物 诱宵美九
      local m=33400903
      local cm=_G["c"..m]
      function cm.initial_effect(c)
      --draw
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(m,0))
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,m)
      e1:SetTarget(cm.thtg1)
      e1:SetOperation(cm.tgop1)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --search
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW+CATEGORY_HANDES)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,m+10000)
      e3:SetCondition(cm.con)
      e3:SetCost(cm.drcost)
      e3:SetTarget(cm.drtg)
      e3:SetOperation(cm.drop)
      c:RegisterEffect(e3)
      end
      function cm.tgfilter(c)
      return c:IsSetCard(0x341,0x340) and c:IsType(TYPE_CONTINUOUS+TYPE_FIELD) and c:IsAbleToGrave()
      end
      function cm.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.tgfilter,tp,LOCATION_HAND+LOCATION_ONFIELD,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,cm.tgfilter,tp,LOCATION_ONFIELD+LOCATION_HAND,0,1,1,nil)
      Duel.SendtoGrave(g,REASON_COST)
      end
      function cm.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(2)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
      Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,1)
      end
      function cm.drop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      Duel.Draw(p,2,REASON_EFFECT)
      end
      function cm.cfilter(c,tp)
      return c:IsPreviousLocation(LOCATION_HAND) and c:GetPreviousControler()==tp
      end
      function cm.con(e,tp,eg,ep,ev,re,r,rp)
      return not eg:IsContains(e:GetHandler()) and eg:IsExists(cm.cfilter,1,nil,tp)
      end
      function cm.setfilter(c)
      return c:IsSetCard(0xc341,0x5340) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
      end
      function cm.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(cm.setfilter,tp,LOCATION_DECK,0,1,nil) end
      end
      function cm.tgop1(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectMatchingCard(tp,cm.setfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SSet(tp,g:GetFirst())
      Duel.ConfirmCards(1-tp,g)
      end
      end
      expansions/script/c50218102.lua
      View file @ a1cb9d4e
      --圣之数码兽LV6 暴龙兽
      function c50218102.initial_effect(c)
      --destroy
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218102)
      e1:SetTarget(c50218102.destg)
      e1:SetOperation(c50218102.desop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181021)
      e3:SetTarget(c50218102.sptg)
      e3:SetOperation(c50218102.spop)
      c:RegisterEffect(e3)
      end
      c50218102.lvup={50218103}
      c50218102.lvdn={50218101}
      function c50218102.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) end
      if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c50218102.desop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.Destroy(tc,REASON_EFFECT)
      end
      end
      function c50218102.spfilter(c,e,tp)
      return c:IsCode(50218103) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218102.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218102.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218102.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218102.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --圣之数码兽LV6 暴龙兽
      function c50218102.initial_effect(c)
      --destroy
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218102)
      e1:SetTarget(c50218102.destg)
      e1:SetOperation(c50218102.desop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218002)
      e3:SetTarget(c50218102.sptg)
      e3:SetOperation(c50218102.spop)
      c:RegisterEffect(e3)
      end
      c50218102.lvup={50218103}
      c50218102.lvdn={50218101}
      function c50218102.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) end
      if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c50218102.desop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.Destroy(tc,REASON_EFFECT)
      end
      end
      function c50218102.spfilter(c,e,tp)
      return c:IsCode(50218103) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218102.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218102.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218102.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218102.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218105.lua
      View file @ a1cb9d4e
      --幻之数码兽LV6 加鲁鲁兽
      function c50218105.initial_effect(c)
      --destroy
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218105)
      e1:SetTarget(c50218105.destg)
      e1:SetOperation(c50218105.desop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181051)
      e3:SetTarget(c50218105.sptg)
      e3:SetOperation(c50218105.spop)
      c:RegisterEffect(e3)
      end
      c50218105.lvup={50218106}
      c50218105.lvdn={50218104}
      function c50218105.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsType(TYPE_SPELL+TYPE_TRAP) end
      if chk==0 then return Duel.IsExistingTarget(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c50218105.desop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) then
      Duel.Destroy(tc,REASON_EFFECT)
      end
      end
      function c50218105.spfilter(c,e,tp)
      return c:IsCode(50218106) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218105.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218105.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218105.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218105.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --幻之数码兽LV6 加鲁鲁兽
      function c50218105.initial_effect(c)
      --destroy
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218105)
      e1:SetTarget(c50218105.destg)
      e1:SetOperation(c50218105.desop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218005)
      e3:SetTarget(c50218105.sptg)
      e3:SetOperation(c50218105.spop)
      c:RegisterEffect(e3)
      end
      c50218105.lvup={50218106}
      c50218105.lvdn={50218104}
      function c50218105.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsType(TYPE_SPELL+TYPE_TRAP) end
      if chk==0 then return Duel.IsExistingTarget(Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,Card.IsType,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c50218105.desop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) then
      Duel.Destroy(tc,REASON_EFFECT)
      end
      end
      function c50218105.spfilter(c,e,tp)
      return c:IsCode(50218106) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218105.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218105.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218105.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218105.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218107.lua
      View file @ a1cb9d4e
      --水之数码兽LV3 哥玛兽
      function c50218107.initial_effect(c)
      --indes
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c50218107.indtg)
      e1:SetCountLimit(1)
      e1:SetValue(c50218107.valcon)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e2:SetTarget(c50218107.sptg)
      e2:SetOperation(c50218107.spop)
      c:RegisterEffect(e2)
      end
      c50218107.lvup={50218108}
      function c50218107.indtg(e,c)
      return c:IsSetCard(0xcb1) and c:IsFaceup()
      end
      function c50218107.valcon(e,re,r,rp)
      return bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0
      end
      function c50218107.spfilter(c,e,tp)
      return c:IsCode(50218108) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218107.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218107.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218107.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218107.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      --水之数码兽LV3 哥玛兽
      function c50218107.initial_effect(c)
      --indes
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c50218107.indtg)
      e1:SetValue(c50218107.valcon)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e2:SetTarget(c50218107.sptg)
      e2:SetOperation(c50218107.spop)
      c:RegisterEffect(e2)
      end
      c50218107.lvup={50218108}
      function c50218107.indtg(e,c)
      return c:IsSetCard(0xcb1) and c:IsFaceup()
      end
      function c50218107.valcon(e,re,r,rp)
      if bit.band(r,REASON_BATTLE+REASON_EFFECT)~=0 then
      return 1
      else return 0 end
      end
      function c50218107.spfilter(c,e,tp)
      return c:IsCode(50218108) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218107.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218107.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218107.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218107.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218108.lua
      View file @ a1cb9d4e
      --水之数码兽LV5 海狮兽
      function c50218108.initial_effect(c)
      --cannot target
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_FIELD)
      e0:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e0:SetRange(LOCATION_MZONE)
      e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e0:SetTargetRange(LOCATION_MZONE,0)
      e0:SetTarget(c50218108.tgtg)
      e0:SetValue(aux.tgoval)
      c:RegisterEffect(e0)
      --indes
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e1:SetValue(1)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181081)
      e3:SetTarget(c50218108.sptg)
      e3:SetOperation(c50218108.spop)
      c:RegisterEffect(e3)
      end
      c50218108.lvup={50218109}
      c50218108.lvdn={50218107}
      function c50218108.tgtg(e,c)
      return c:IsSetCard(0xcb1) and c:IsFaceup()
      end
      function c50218108.spfilter(c,e,tp)
      return c:IsCode(50218109) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218108.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218108.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218108.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218108.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --水之数码兽LV5 海狮兽
      function c50218108.initial_effect(c)
      --cannot target
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_FIELD)
      e0:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e0:SetRange(LOCATION_MZONE)
      e0:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e0:SetTargetRange(LOCATION_MZONE,0)
      e0:SetTarget(c50218108.tgtg)
      e0:SetValue(aux.tgoval)
      c:RegisterEffect(e0)
      --indes
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e1:SetValue(1)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218008)
      e3:SetTarget(c50218108.sptg)
      e3:SetOperation(c50218108.spop)
      c:RegisterEffect(e3)
      end
      c50218108.lvup={50218109}
      c50218108.lvdn={50218107}
      function c50218108.tgtg(e,c)
      return c:IsSetCard(0xcb1) and c:IsFaceup()
      end
      function c50218108.spfilter(c,e,tp)
      return c:IsCode(50218109) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218108.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218108.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218108.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218108.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218111.lua
      View file @ a1cb9d4e
      --炎之数码兽LV5 巴多拉兽
      function c50218111.initial_effect(c)
      --direct attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DIRECT_ATTACK)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,502181111)
      e2:SetTarget(c50218111.sptg)
      e2:SetOperation(c50218111.spop)
      c:RegisterEffect(e2)
      end
      c50218111.lvup={50218112}
      c50218111.lvdn={50218110}
      function c50218111.spfilter(c,e,tp)
      return c:IsCode(50218112) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218111.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218111.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218111.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218111.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --炎之数码兽LV5 巴多拉兽
      function c50218111.initial_effect(c)
      --direct attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DIRECT_ATTACK)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,50218011)
      e2:SetTarget(c50218111.sptg)
      e2:SetOperation(c50218111.spop)
      c:RegisterEffect(e2)
      end
      c50218111.lvup={50218112}
      c50218111.lvdn={50218110}
      function c50218111.spfilter(c,e,tp)
      return c:IsCode(50218112) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218111.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218111.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218111.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218111.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218114.lua
      View file @ a1cb9d4e
      --地之数码兽LV5 仙人掌兽
      function c50218114.initial_effect(c)
      --control
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_CONTROL)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetTarget(c50218114.cotg)
      e1:SetOperation(c50218114.coop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181141)
      e3:SetTarget(c50218114.sptg)
      e3:SetOperation(c50218114.spop)
      c:RegisterEffect(e3)
      end
      c50218114.lvup={50218115}
      c50218114.lvdn={50218113}
      function c50218114.filter(c)
      return c:IsControlerCanBeChanged()
      end
      function c50218114.cotg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c50218114.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c50218114.filter,tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
      local g=Duel.SelectTarget(tp,c50218114.filter,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
      end
      function c50218114.coop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.GetControl(tc,tp,PHASE_END,1)
      end
      end
      function c50218114.spfilter(c,e,tp)
      return c:IsCode(50218115) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218114.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218114.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218114.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218114.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --地之数码兽LV5 仙人掌兽
      function c50218114.initial_effect(c)
      --control
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_CONTROL)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetTarget(c50218114.cotg)
      e1:SetOperation(c50218114.coop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218014)
      e3:SetTarget(c50218114.sptg)
      e3:SetOperation(c50218114.spop)
      c:RegisterEffect(e3)
      end
      c50218114.lvup={50218115}
      c50218114.lvdn={50218113}
      function c50218114.filter(c)
      return c:IsControlerCanBeChanged()
      end
      function c50218114.cotg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) and c50218114.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c50218114.filter,tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
      local g=Duel.SelectTarget(tp,c50218114.filter,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
      end
      function c50218114.coop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.GetControl(tc,tp,PHASE_END,1)
      end
      end
      function c50218114.spfilter(c,e,tp)
      return c:IsCode(50218115) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218114.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218114.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218114.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218114.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218117.lua
      View file @ a1cb9d4e
      --风之数码兽LV5 比多兽
      function c50218117.initial_effect(c)
      --handes
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_HANDES)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1,50218117)
      e1:SetTarget(c50218117.hdtg)
      e1:SetOperation(c50218117.hdop)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,502181171)
      e2:SetTarget(c50218117.sptg)
      e2:SetOperation(c50218117.spop)
      c:RegisterEffect(e2)
      end
      c50218117.lvup={50218118}
      c50218117.lvdn={50218116}
      function c50218117.hdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,LOCATION_HAND,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
      getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT}
      local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))
      Duel.SetTargetParam(ac)
      Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,0)
      end
      function c50218117.hdop(e,tp,eg,ep,ev,re,r,rp)
      local ac=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
      local hg=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
      if hg:GetCount()==0 then return end
      Duel.ConfirmCards(tp,hg)
      local g=Duel.GetMatchingGroup(Card.IsCode,tp,0,LOCATION_HAND,nil,ac)
      if g:GetCount()>0 then
      local sg=g:Select(tp,1,1,nil)
      Duel.HintSelection(sg)
      Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
      end
      Duel.ShuffleHand(1-tp)
      end
      function c50218117.spfilter(c,e,tp)
      return c:IsCode(50218118) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218117.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218117.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218117.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218117.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --风之数码兽LV5 比多兽
      function c50218117.initial_effect(c)
      --handes
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_HANDES)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1,50218117)
      e1:SetTarget(c50218117.hdtg)
      e1:SetOperation(c50218117.hdop)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,50218017)
      e2:SetTarget(c50218117.sptg)
      e2:SetOperation(c50218117.spop)
      c:RegisterEffect(e2)
      end
      c50218117.lvup={50218118}
      c50218117.lvdn={50218116}
      function c50218117.hdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_HAND,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
      getmetatable(e:GetHandler()).announce_filter={TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK,OPCODE_ISTYPE,OPCODE_NOT}
      local ac=Duel.AnnounceCard(tp,table.unpack(getmetatable(e:GetHandler()).announce_filter))
      Duel.SetTargetParam(ac)
      Duel.SetOperationInfo(0,CATEGORY_ANNOUNCE,nil,0,tp,0)
      end
      function c50218117.hdop(e,tp,eg,ep,ev,re,r,rp)
      local ac=Duel.GetChainInfo(0,CHAININFO_TARGET_PARAM)
      local hg=Duel.GetFieldGroup(tp,0,LOCATION_HAND)
      if hg:GetCount()==0 then return end
      Duel.ConfirmCards(tp,hg)
      local g=Duel.GetMatchingGroup(Card.IsCode,tp,0,LOCATION_HAND,nil,ac)
      if g:GetCount()>0 then
      local sg=g:Select(tp,1,1,nil)
      Duel.HintSelection(sg)
      Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
      end
      Duel.ShuffleHand(1-tp)
      end
      function c50218117.spfilter(c,e,tp)
      return c:IsCode(50218118) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218117.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218117.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218117.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218117.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218119.lua
      View file @ a1cb9d4e
      --暗之数码兽LV3 小狗兽
      function c50218119.initial_effect(c)
      --extra summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetOperation(c50218119.sumop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --spsummon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e3:SetTarget(c50218119.sptg)
      e3:SetOperation(c50218119.spop)
      c:RegisterEffect(e3)
      end
      c50218119.lvup={50218120}
      function c50218119.sumop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetFlagEffect(tp,50218119)~=0 then return end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
      e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
      e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xcb1))
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      Duel.RegisterFlagEffect(tp,50218119,RESET_PHASE+PHASE_END,0,1)
      end
      function c50218119.spfilter(c,e,tp)
      return c:IsCode(50218120) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218119.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218119.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218119.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218119.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      --暗之数码兽LV3 小狗兽
      function c50218119.initial_effect(c)
      --extra summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetOperation(c50218119.sumop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --spsummon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e3:SetTarget(c50218119.sptg)
      e3:SetOperation(c50218119.spop)
      c:RegisterEffect(e3)
      end
      c50218119.lvup={50218120}
      function c50218119.sumop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetFlagEffect(tp,50218119)~=0 then return end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetDescription(aux.Stringid(50218119,0))
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetTargetRange(LOCATION_HAND+LOCATION_MZONE,0)
      e1:SetCode(EFFECT_EXTRA_SUMMON_COUNT)
      e1:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0xcb1))
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      Duel.RegisterFlagEffect(tp,50218119,RESET_PHASE+PHASE_END,0,1)
      end
      function c50218119.spfilter(c,e,tp)
      return c:IsCode(50218120) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218119.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218119.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218119.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218119.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218120.lua
      View file @ a1cb9d4e
      --暗之数码兽LV5 迪路兽
      function c50218120.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218120)
      e1:SetTarget(c50218120.stg)
      e1:SetOperation(c50218120.sop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181201)
      e3:SetTarget(c50218120.sptg)
      e3:SetOperation(c50218120.spop)
      c:RegisterEffect(e3)
      end
      c50218120.lvup={50218121}
      c50218120.lvdn={50218119}
      function c50218120.filter(c,e,tp)
      return c:IsLevelBelow(6) and c:IsSetCard(0xcb1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218120.stg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c50218120.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
      end
      function c50218120.sop(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,aux.NecroValleyFilter(c50218120.filter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218120.spfilter(c,e,tp)
      return c:IsCode(50218121) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218120.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218120.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218120.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218120.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --暗之数码兽LV5 迪路兽
      function c50218120.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218120)
      e1:SetTarget(c50218120.stg)
      e1:SetOperation(c50218120.sop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218020)
      e3:SetTarget(c50218120.sptg)
      e3:SetOperation(c50218120.spop)
      c:RegisterEffect(e3)
      end
      c50218120.lvup={50218121}
      c50218120.lvdn={50218119}
      function c50218120.filter(c,e,tp)
      return c:IsLevelBelow(6) and c:IsSetCard(0xcb1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218120.stg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c50218120.filter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
      end
      function c50218120.sop(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,aux.NecroValleyFilter(c50218120.filter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218120.spfilter(c,e,tp)
      return c:IsCode(50218121) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218120.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218120.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218120.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218120.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218123.lua
      View file @ a1cb9d4e
      --光之数码兽LV5 天使兽
      function c50218123.initial_effect(c)
      --remove
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218123)
      e1:SetTarget(c50218123.rmtg)
      e1:SetOperation(c50218123.rmop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,502181231)
      e3:SetTarget(c50218123.sptg)
      e3:SetOperation(c50218123.spop)
      c:RegisterEffect(e3)
      end
      c50218123.lvup={50218124}
      c50218123.lvdn={50218122}
      function c50218123.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c50218123.rmop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Remove(tc,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
      tc:RegisterFlagEffect(502181231,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetLabelObject(tc)
      e1:SetCountLimit(1)
      e1:SetCondition(c50218123.retcon)
      e1:SetOperation(c50218123.retop)
      Duel.RegisterEffect(e1,tp)
      end
      end
      function c50218123.retcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetLabelObject():GetFlagEffect(502181231)~=0
      end
      function c50218123.retop(e,tp,eg,ep,ev,re,r,rp)
      Duel.ReturnToField(e:GetLabelObject())
      end
      function c50218123.spfilter(c,e,tp)
      return c:IsCode(50218124) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218123.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218123.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218123.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218123.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      --光之数码兽LV5 天使兽
      function c50218123.initial_effect(c)
      --remove
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,50218123)
      e1:SetTarget(c50218123.rmtg)
      e1:SetOperation(c50218123.rmop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,50218023)
      e3:SetTarget(c50218123.sptg)
      e3:SetOperation(c50218123.spop)
      c:RegisterEffect(e3)
      end
      c50218123.lvup={50218124}
      c50218123.lvdn={50218122}
      function c50218123.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c50218123.rmop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Remove(tc,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
      tc:RegisterFlagEffect(502181231,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetLabelObject(tc)
      e1:SetCountLimit(1)
      e1:SetCondition(c50218123.retcon)
      e1:SetOperation(c50218123.retop)
      Duel.RegisterEffect(e1,tp)
      end
      end
      function c50218123.retcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetLabelObject():GetFlagEffect(502181231)~=0
      end
      function c50218123.retop(e,tp,eg,ep,ev,re,r,rp)
      Duel.ReturnToField(e:GetLabelObject())
      end
      function c50218123.spfilter(c,e,tp)
      return c:IsCode(50218124) and c:IsCanBeSpecialSummoned(e,0,tp,true,true)
      end
      function c50218123.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGrave()
      and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218123.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c50218123.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,nil,REASON_EFFECT)~=0
      and c:IsLocation(LOCATION_GRAVE) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c50218123.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc then
      Duel.SpecialSummon(g,0,tp,tp,true,true,POS_FACEUP)
      tc:CompleteProcedure()
      end
      end
      end
      \ No newline at end of file
      expansions/script/c50218133.lua
      View file @ a1cb9d4e
      --水之数码兽LV9 维京兽
      function c50218133.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218133.scon)
      e2:SetOperation(c50218133.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218133)
      e3:SetCost(c50218133.spcost)
      e3:SetTarget(c50218133.sptg)
      e3:SetOperation(c50218133.spop)
      c:RegisterEffect(e3)
      --immune
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_IMMUNE_EFFECT)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetValue(c50218133.efilter)
      c:RegisterEffect(e4)
      --imdes
      local e5=Effect.CreateEffect(c)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetRange(LOCATION_MZONE)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetCountLimit(1,502181331)
      e5:SetTarget(c50218133.imtg)
      e5:SetOperation(c50218133.imop)
      c:RegisterEffect(e5)
      end
      c50218133.lvup={50218109}
      c50218133.lvdn={50218107,50218108,50218109}
      function c50218133.efilter(e,te)
      return te:GetOwner()~=e:GetOwner()
      end
      function c50218133.spfilter(c,ft,tp)
      return c:IsCode(50218109)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218133.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218133.spfilter,1,nil,ft,tp)
      end
      function c50218133.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218133.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218133.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218133.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218143,0xcb1,0x4011,0,1000,1,RACE_AQUA,ATTRIBUTE_WATER) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218133.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218143,0xcb1,0x4011,0,1000,1,RACE_AQUA,ATTRIBUTE_WATER) then
      local token=Duel.CreateToken(tp,50218143)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218133.imtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      e:SetCategory(0)
      local ch=Duel.GetCurrentChain()
      if ch>1 and Duel.GetChainInfo(ch-1,CHAININFO_TRIGGERING_PLAYER)==1-tp then
      e:SetCategory(CATEGORY_DESTROY)
      end
      end
      function c50218133.imop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
      local tc=g:GetFirst()
      local c=e:GetHandler()
      if g:GetCount()>0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_IMMUNE_EFFECT)
      e1:SetValue(c50218133.imfilter)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      local ch=Duel.GetCurrentChain()
      if ch>1 then
      local p=Duel.GetChainInfo(ch-1,CHAININFO_TRIGGERING_PLAYER)
      if p==1-tp then
      local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD+LOCATION_ONFIELD,nil)
      if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(50218133,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      end
      end
      end
      function c50218133.imfilter(e,re)
      return re:GetOwner()~=e:GetOwner()
      --水之数码兽LV9 维京兽
      function c50218133.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218133.scon)
      e2:SetOperation(c50218133.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218133)
      e3:SetCost(c50218133.spcost)
      e3:SetTarget(c50218133.sptg)
      e3:SetOperation(c50218133.spop)
      c:RegisterEffect(e3)
      --immune
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_IMMUNE_EFFECT)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetValue(c50218133.efilter)
      c:RegisterEffect(e4)
      --imdes
      local e5=Effect.CreateEffect(c)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetRange(LOCATION_MZONE)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetCountLimit(1,50218033)
      e5:SetTarget(c50218133.imtg)
      e5:SetOperation(c50218133.imop)
      c:RegisterEffect(e5)
      end
      c50218133.lvup={50218109}
      c50218133.lvdn={50218107,50218108,50218109}
      function c50218133.efilter(e,te)
      return te:GetOwner()~=e:GetOwner()
      end
      function c50218133.spfilter(c,ft,tp)
      return c:IsCode(50218109)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218133.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218133.spfilter,1,nil,ft,tp)
      end
      function c50218133.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218133.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218133.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218133.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218143,0xcb1,0x4011,0,1000,1,RACE_AQUA,ATTRIBUTE_WATER) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218133.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218143,0xcb1,0x4011,0,1000,1,RACE_AQUA,ATTRIBUTE_WATER) then
      local token=Duel.CreateToken(tp,50218143)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218133.imtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      e:SetCategory(0)
      local ch=Duel.GetCurrentChain()
      if ch>1 and Duel.GetChainInfo(ch-1,CHAININFO_TRIGGERING_PLAYER)==1-tp then
      e:SetCategory(CATEGORY_DESTROY)
      end
      end
      function c50218133.imop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
      local tc=g:GetFirst()
      local c=e:GetHandler()
      if g:GetCount()>0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_IMMUNE_EFFECT)
      e1:SetValue(c50218133.imfilter)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      local ch=Duel.GetCurrentChain()
      if ch>1 then
      local p=Duel.GetChainInfo(ch-1,CHAININFO_TRIGGERING_PLAYER)
      if p==1-tp then
      local g=Duel.GetMatchingGroup(nil,tp,0,LOCATION_ONFIELD+LOCATION_ONFIELD,nil)
      if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(50218133,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      end
      end
      end
      function c50218133.imfilter(e,re)
      return re:GetOwner()~=e:GetOwner()
      end
      \ No newline at end of file
      expansions/script/c50218134.lua
      View file @ a1cb9d4e
      --炎之数码兽LV9 凤凰兽
      function c50218134.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218134.scon)
      e2:SetOperation(c50218134.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218134)
      e3:SetCost(c50218134.spcost)
      e3:SetTarget(c50218134.sptg)
      e3:SetOperation(c50218134.spop)
      c:RegisterEffect(e3)
      --atkup
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCode(EFFECT_UPDATE_ATTACK)
      e4:SetValue(c50218134.atkup)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EFFECT_UPDATE_DEFENSE)
      c:RegisterEffect(e5)
      --attack all
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetCode(EFFECT_ATTACK_ALL)
      e6:SetValue(1)
      c:RegisterEffect(e6)
      --pierce
      local e7=Effect.CreateEffect(c)
      e7:SetType(EFFECT_TYPE_SINGLE)
      e7:SetCode(EFFECT_PIERCE)
      c:RegisterEffect(e7)
      end
      c50218134.lvup={50218112}
      c50218134.lvdn={50218110,50218111,50218112}
      function c50218134.spfilter(c,ft,tp)
      return c:IsCode(50218112)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218134.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218134.spfilter,1,nil,ft,tp)
      end
      function c50218134.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218134.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218134.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218134.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218144,0xcb1,0x4011,800,200,1,RACE_WINDBEAST,ATTRIBUTE_FIRE) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218134.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218144,0xcb1,0x4011,800,200,1,RACE_WINDBEAST,ATTRIBUTE_FIRE) then
      local token=Duel.CreateToken(tp,50218144)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218134.atkfilter(c)
      return c:IsFaceup() and c:IsSetCard(0xcb1)
      end
      function c50218134.atkup(e,c)
      return Duel.GetMatchingGroupCount(c50218134.atkfilter,c:GetControler(),LOCATION_GRAVE,0,nil)*300
      --炎之数码兽LV9 凤凰兽
      function c50218134.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218134.scon)
      e2:SetOperation(c50218134.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218134)
      e3:SetCost(c50218134.spcost)
      e3:SetTarget(c50218134.sptg)
      e3:SetOperation(c50218134.spop)
      c:RegisterEffect(e3)
      --atkup
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCode(EFFECT_UPDATE_ATTACK)
      e4:SetValue(c50218134.atkup)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EFFECT_UPDATE_DEFENSE)
      c:RegisterEffect(e5)
      --attack all
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetCode(EFFECT_ATTACK_ALL)
      e6:SetValue(1)
      c:RegisterEffect(e6)
      --pierce
      local e7=Effect.CreateEffect(c)
      e7:SetType(EFFECT_TYPE_SINGLE)
      e7:SetCode(EFFECT_PIERCE)
      c:RegisterEffect(e7)
      end
      c50218134.lvup={50218112}
      c50218134.lvdn={50218110,50218111,50218112}
      function c50218134.spfilter(c,ft,tp)
      return c:IsCode(50218112)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218134.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218134.spfilter,1,nil,ft,tp)
      end
      function c50218134.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218134.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218134.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218134.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218144,0xcb1,0x4011,800,200,1,RACE_WINDBEAST,ATTRIBUTE_FIRE) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218134.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218144,0xcb1,0x4011,800,200,1,RACE_WINDBEAST,ATTRIBUTE_FIRE) then
      local token=Duel.CreateToken(tp,50218144)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218134.atkfilter(c)
      return c:IsFaceup() and c:IsSetCard(0xcb1)
      end
      function c50218134.atkup(e,c)
      return Duel.GetMatchingGroupCount(c50218134.atkfilter,c:GetControler(),LOCATION_GRAVE,0,nil)*300
      end
      \ No newline at end of file
      expansions/script/c50218135.lua
      View file @ a1cb9d4e
      --地之数码兽LV9 蔷薇兽
      function c50218135.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218135.scon)
      e2:SetOperation(c50218135.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218135)
      e3:SetCost(c50218135.spcost)
      e3:SetTarget(c50218135.sptg)
      e3:SetOperation(c50218135.spop)
      c:RegisterEffect(e3)
      --can not be attack
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
      e4:SetCondition(c50218135.atcon)
      e4:SetValue(1)
      c:RegisterEffect(e4)
      --can not be target
      local e5=e4:Clone()
      e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      c:RegisterEffect(e5)
      --control
      local e6=Effect.CreateEffect(c)
      e6:SetCategory(CATEGORY_CONTROL)
      e6:SetType(EFFECT_TYPE_IGNITION)
      e6:SetRange(LOCATION_MZONE)
      e6:SetCountLimit(1,502181351)
      e6:SetTarget(c50218135.cttg)
      e6:SetOperation(c50218135.ctop)
      c:RegisterEffect(e6)
      end
      c50218135.lvup={50218115}
      c50218135.lvdn={50218113,50218114,50218115}
      function c50218135.spfilter(c,ft,tp)
      return c:IsCode(50218115)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218135.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218135.spfilter,1,nil,ft,tp)
      end
      function c50218135.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218135.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218135.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218135.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218145,0xcb1,0x4011,400,600,1,RACE_PLANT,ATTRIBUTE_EARTH) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218135.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218145,0xcb1,0x4011,400,600,1,RACE_PLANT,ATTRIBUTE_EARTH) then
      local token=Duel.CreateToken(tp,50218145)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218135.atcon(e)
      return Duel.IsExistingMatchingCard(nil,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler())
      end
      function c50218135.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
      end
      function c50218135.ctop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
      local g=Duel.SelectMatchingCard(tp,Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,1,nil)
      if #g>0 then
      Duel.HintSelection(g)
      Duel.GetControl(g:GetFirst(),tp)
      end
      --地之数码兽LV9 蔷薇兽
      function c50218135.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218135.scon)
      e2:SetOperation(c50218135.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218135)
      e3:SetCost(c50218135.spcost)
      e3:SetTarget(c50218135.sptg)
      e3:SetOperation(c50218135.spop)
      c:RegisterEffect(e3)
      --can not be attack
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetCode(EFFECT_CANNOT_BE_BATTLE_TARGET)
      e4:SetCondition(c50218135.atcon)
      e4:SetValue(1)
      c:RegisterEffect(e4)
      --can not be target
      local e5=e4:Clone()
      e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      c:RegisterEffect(e5)
      --control
      local e6=Effect.CreateEffect(c)
      e6:SetCategory(CATEGORY_CONTROL)
      e6:SetType(EFFECT_TYPE_IGNITION)
      e6:SetRange(LOCATION_MZONE)
      e6:SetCountLimit(1,50218035)
      e6:SetTarget(c50218135.cttg)
      e6:SetOperation(c50218135.ctop)
      c:RegisterEffect(e6)
      end
      c50218135.lvup={50218115}
      c50218135.lvdn={50218113,50218114,50218115}
      function c50218135.spfilter(c,ft,tp)
      return c:IsCode(50218115)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218135.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218135.spfilter,1,nil,ft,tp)
      end
      function c50218135.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218135.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218135.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218135.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218145,0xcb1,0x4011,400,600,1,RACE_PLANT,ATTRIBUTE_EARTH) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218135.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218145,0xcb1,0x4011,400,600,1,RACE_PLANT,ATTRIBUTE_EARTH) then
      local token=Duel.CreateToken(tp,50218145)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218135.atcon(e)
      return Duel.IsExistingMatchingCard(nil,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,e:GetHandler())
      end
      function c50218135.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
      end
      function c50218135.ctop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
      local g=Duel.SelectMatchingCard(tp,Card.IsControlerCanBeChanged,tp,0,LOCATION_MZONE,1,1,nil)
      if #g>0 then
      Duel.HintSelection(g)
      Duel.GetControl(g:GetFirst(),tp)
      end
      end
      \ No newline at end of file
      expansions/script/c50218136.lua
      View file @ a1cb9d4e
      --风之数码兽LV9 力神比多兽
      function c50218136.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218136.scon)
      e2:SetOperation(c50218136.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218136)
      e3:SetCost(c50218136.spcost)
      e3:SetTarget(c50218136.sptg)
      e3:SetOperation(c50218136.spop)
      c:RegisterEffect(e3)
      --aclimit
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCode(EFFECT_CANNOT_ACTIVATE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetTargetRange(0,1)
      e4:SetValue(c50218136.aclimit)
      c:RegisterEffect(e4)
      --handes
      local e5=Effect.CreateEffect(c)
      e5:SetCategory(CATEGORY_REMOVE)
      e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e5:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
      e5:SetCode(EVENT_TO_HAND)
      e5:SetRange(LOCATION_MZONE)
      e5:SetCountLimit(1,502181361)
      e5:SetCondition(c50218136.hdcon)
      e5:SetTarget(c50218136.hdtg)
      e5:SetOperation(c50218136.hdop)
      c:RegisterEffect(e5)
      end
      c50218136.lvup={50218118}
      c50218136.lvdn={50218116,50218117,50218118}
      function c50218136.spfilter(c,ft,tp)
      return c:IsCode(50218118)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218136.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218136.spfilter,1,nil,ft,tp)
      end
      function c50218136.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218136.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218136.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218136.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218146,0xcb1,0x4011,600,400,1,RACE_INSECT,ATTRIBUTE_WIND) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218136.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218146,0xcb1,0x4011,600,400,1,RACE_INSECT,ATTRIBUTE_WIND) then
      local token=Duel.CreateToken(tp,50218146)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218136.aclimit(e,re,tp)
      local loc=re:GetActivateLocation()
      return (loc==LOCATION_GRAVE or loc==LOCATION_REMOVED) and not re:GetHandler():IsImmuneToEffect(e)
      end
      function c50218136.cfilter(c,tp)
      return c:IsControler(tp) and c:IsPreviousLocation(LOCATION_DECK)
      end
      function c50218136.hdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()~=PHASE_DRAW and eg:IsExists(c50218136.cfilter,1,nil,1-tp)
      end
      function c50218136.hdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end
      Duel.SetTargetPlayer(tp)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,1-tp,LOCATION_HAND)
      end
      function c50218136.hdop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      local g=Duel.GetFieldGroup(p,0,LOCATION_HAND)
      if g:GetCount()>0 then
      Duel.ConfirmCards(p,g)
      Duel.Hint(HINT_SELECTMSG,p,HINTMSG_REMOVE)
      local sg=g:Select(p,1,1,nil)
      Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
      Duel.ShuffleHand(1-p)
      end
      --风之数码兽LV9 力神比多兽
      function c50218136.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218136.scon)
      e2:SetOperation(c50218136.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218136)
      e3:SetCost(c50218136.spcost)
      e3:SetTarget(c50218136.sptg)
      e3:SetOperation(c50218136.spop)
      c:RegisterEffect(e3)
      --aclimit
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCode(EFFECT_CANNOT_ACTIVATE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetTargetRange(0,1)
      e4:SetValue(c50218136.aclimit)
      c:RegisterEffect(e4)
      --handes
      local e5=Effect.CreateEffect(c)
      e5:SetCategory(CATEGORY_REMOVE)
      e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e5:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
      e5:SetCode(EVENT_TO_HAND)
      e5:SetRange(LOCATION_MZONE)
      e5:SetCountLimit(1,50218036)
      e5:SetCondition(c50218136.hdcon)
      e5:SetTarget(c50218136.hdtg)
      e5:SetOperation(c50218136.hdop)
      c:RegisterEffect(e5)
      end
      c50218136.lvup={50218118}
      c50218136.lvdn={50218116,50218117,50218118}
      function c50218136.spfilter(c,ft,tp)
      return c:IsCode(50218118)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218136.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218136.spfilter,1,nil,ft,tp)
      end
      function c50218136.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218136.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218136.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218136.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218146,0xcb1,0x4011,600,400,1,RACE_INSECT,ATTRIBUTE_WIND) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218136.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218146,0xcb1,0x4011,600,400,1,RACE_INSECT,ATTRIBUTE_WIND) then
      local token=Duel.CreateToken(tp,50218146)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218136.aclimit(e,re,tp)
      local loc=re:GetActivateLocation()
      return (loc==LOCATION_GRAVE or loc==LOCATION_REMOVED) and not re:GetHandler():IsImmuneToEffect(e)
      end
      function c50218136.cfilter(c,tp)
      return c:IsControler(tp) and c:IsPreviousLocation(LOCATION_DECK)
      end
      function c50218136.hdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()~=PHASE_DRAW and eg:IsExists(c50218136.cfilter,1,nil,1-tp)
      end
      function c50218136.hdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)>0 end
      Duel.SetTargetPlayer(tp)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,0,1-tp,LOCATION_HAND)
      end
      function c50218136.hdop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      local g=Duel.GetFieldGroup(p,0,LOCATION_HAND)
      if g:GetCount()>0 then
      Duel.ConfirmCards(p,g)
      Duel.Hint(HINT_SELECTMSG,p,HINTMSG_REMOVE)
      local sg=g:Select(p,1,1,nil)
      Duel.Remove(sg,POS_FACEUP,REASON_EFFECT)
      Duel.ShuffleHand(1-p)
      end
      end
      \ No newline at end of file
      expansions/script/c50218137.lua
      View file @ a1cb9d4e
      --暗之数码兽LV9 圣龙兽
      function c50218137.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218137.scon)
      e2:SetOperation(c50218137.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218137)
      e3:SetCost(c50218137.spcost)
      e3:SetTarget(c50218137.sptg)
      e3:SetOperation(c50218137.spop)
      c:RegisterEffect(e3)
      --draw
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_DRAW)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCode(EVENT_ATTACK_ANNOUNCE)
      e4:SetTarget(c50218137.drtg)
      e4:SetOperation(c50218137.drop)
      c:RegisterEffect(e4)
      --spsummon
      local e5=Effect.CreateEffect(c)
      e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetRange(LOCATION_MZONE)
      e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e5:SetCountLimit(1,502181371)
      e5:SetCondition(c50218137.condition)
      e5:SetTarget(c50218137.target)
      e5:SetOperation(c50218137.operation)
      c:RegisterEffect(e5)
      end
      c50218137.lvup={50218121}
      c50218137.lvdn={50218119,50218120,50218121}
      function c50218137.spfilter(c,ft,tp)
      return c:IsCode(50218121)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218137.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218137.spfilter,1,nil,ft,tp)
      end
      function c50218137.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218137.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218137.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218137.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218147,0xcb1,0x4011,500,500,1,RACE_SPELLCASTER,ATTRIBUTE_DARK) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218137.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218147,0xcb1,0x4011,500,500,1,RACE_SPELLCASTER,ATTRIBUTE_DARK) then
      local token=Duel.CreateToken(tp,50218147)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218137.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(1)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function c50218137.drop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Draw(p,d,REASON_EFFECT)
      end
      function c50218137.filter(c,e,tp)
      return c:IsSetCard(0xcb1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218137.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
      end
      function c50218137.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c50218137.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
      end
      function c50218137.operation(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,aux.NecroValleyFilter(c50218137.filter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      --暗之数码兽LV9 圣龙兽
      function c50218137.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218137.scon)
      e2:SetOperation(c50218137.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218137)
      e3:SetCost(c50218137.spcost)
      e3:SetTarget(c50218137.sptg)
      e3:SetOperation(c50218137.spop)
      c:RegisterEffect(e3)
      --draw
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_DRAW)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCode(EVENT_ATTACK_ANNOUNCE)
      e4:SetTarget(c50218137.drtg)
      e4:SetOperation(c50218137.drop)
      c:RegisterEffect(e4)
      --spsummon
      local e5=Effect.CreateEffect(c)
      e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetRange(LOCATION_MZONE)
      e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e5:SetCountLimit(1,50218037)
      e5:SetCondition(c50218137.condition)
      e5:SetTarget(c50218137.target)
      e5:SetOperation(c50218137.operation)
      c:RegisterEffect(e5)
      end
      c50218137.lvup={50218121}
      c50218137.lvdn={50218119,50218120,50218121}
      function c50218137.spfilter(c,ft,tp)
      return c:IsCode(50218121)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218137.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218137.spfilter,1,nil,ft,tp)
      end
      function c50218137.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218137.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218137.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218137.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218147,0xcb1,0x4011,500,500,1,RACE_SPELLCASTER,ATTRIBUTE_DARK) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218137.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218147,0xcb1,0x4011,500,500,1,RACE_SPELLCASTER,ATTRIBUTE_DARK) then
      local token=Duel.CreateToken(tp,50218147)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218137.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(1)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function c50218137.drop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Draw(p,d,REASON_EFFECT)
      end
      function c50218137.filter(c,e,tp)
      return c:IsSetCard(0xcb1) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c50218137.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
      end
      function c50218137.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c50218137.filter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
      end
      function c50218137.operation(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,aux.NecroValleyFilter(c50218137.filter),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      \ No newline at end of file
      expansions/script/c50218138.lua
      View file @ a1cb9d4e
      --光之数码兽LV9 炽天使兽
      function c50218138.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218138.scon)
      e2:SetOperation(c50218138.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218138)
      e3:SetCost(c50218138.spcost)
      e3:SetTarget(c50218138.sptg)
      e3:SetOperation(c50218138.spop)
      c:RegisterEffect(e3)
      --atk down
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(50218138,0))
      e4:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_SPSUMMON_SUCCESS)
      e4:SetCondition(c50218138.atkcon)
      e4:SetTarget(c50218138.atktg)
      e4:SetOperation(c50218138.atkop)
      c:RegisterEffect(e4)
      --remove
      local e5=Effect.CreateEffect(c)
      e5:SetDescription(aux.Stringid(50218138,1))
      e5:SetCategory(CATEGORY_REMOVE)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetRange(LOCATION_MZONE)
      e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e5:SetCountLimit(1,502181381)
      e5:SetTarget(c50218138.rmtg)
      e5:SetOperation(c50218138.rmop)
      c:RegisterEffect(e5)
      end
      c50218138.lvup={50218138}
      c50218138.lvdn={50218122,50218123,50218138}
      function c50218138.spfilter(c,ft,tp)
      return c:IsCode(50218138)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218138.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218138.spfilter,1,nil,ft,tp)
      end
      function c50218138.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218138.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218138.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218138.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218148,0xcb1,0x4011,700,300,1,RACE_FAIRY,ATTRIBUTE_LIGHT) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218138.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218148,0xcb1,0x4011,700,300,1,RACE_FAIRY,ATTRIBUTE_LIGHT) then
      local token=Duel.CreateToken(tp,50218148)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218138.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
      end
      function c50218138.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
      end
      function c50218138.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
      local tc=tg:GetFirst()
      while tc do
      local atk=tc:GetAttack()
      local def=tc:GetDefense()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetValue(0)
      e1:SetReset(RESET_EVENT+0x1fe0000)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
      e2:SetValue(0)
      e2:SetReset(RESET_EVENT+0x1fe0000)
      tc:RegisterEffect(e2)
      tc=tg:GetNext()
      end
      end
      function c50218138.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      if chk==0 then return g:GetCount()>0 end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c50218138.rmop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
      if g:GetCount()>0 then
      Duel.HintSelection(g)
      Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
      end
      --光之数码兽LV9 炽天使兽
      function c50218138.initial_effect(c)
      c:EnableReviveLimit()
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(c50218138.scon)
      e2:SetOperation(c50218138.sop)
      c:RegisterEffect(e2)
      --token
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_HAND)
      e3:SetCountLimit(1,50218138)
      e3:SetCost(c50218138.spcost)
      e3:SetTarget(c50218138.sptg)
      e3:SetOperation(c50218138.spop)
      c:RegisterEffect(e3)
      --atk down
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(50218138,0))
      e4:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DEFCHANGE)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_SPSUMMON_SUCCESS)
      e4:SetCondition(c50218138.atkcon)
      e4:SetTarget(c50218138.atktg)
      e4:SetOperation(c50218138.atkop)
      c:RegisterEffect(e4)
      --remove
      local e5=Effect.CreateEffect(c)
      e5:SetDescription(aux.Stringid(50218138,1))
      e5:SetCategory(CATEGORY_REMOVE)
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetRange(LOCATION_MZONE)
      e5:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e5:SetCountLimit(1,50218038)
      e5:SetTarget(c50218138.rmtg)
      e5:SetOperation(c50218138.rmop)
      c:RegisterEffect(e5)
      end
      c50218138.lvup={50218124}
      c50218138.lvdn={50218122,50218123,50218124}
      function c50218138.spfilter(c,ft,tp)
      return c:IsCode(50218124)
      and (ft>0 or (c:IsControler(tp) and c:GetSequence()<5)) and (c:IsControler(tp) or c:IsFaceup())
      end
      function c50218138.scon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.CheckReleaseGroup(tp,c50218138.spfilter,1,nil,ft,tp)
      end
      function c50218138.sop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.SelectReleaseGroup(tp,c50218138.spfilter,1,1,nil,ft,tp)
      Duel.Release(g,REASON_COST)
      end
      function c50218138.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c50218138.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,50218148,0xcb1,0x4011,700,300,1,RACE_FAIRY,ATTRIBUTE_LIGHT) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c50218138.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,50218148,0xcb1,0x4011,700,300,1,RACE_FAIRY,ATTRIBUTE_LIGHT) then
      local token=Duel.CreateToken(tp,50218148)
      Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c50218138.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SPECIAL)
      end
      function c50218138.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
      end
      function c50218138.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tg=Duel.GetMatchingGroup(Card.IsFaceup,tp,0,LOCATION_MZONE,nil)
      local tc=tg:GetFirst()
      while tc do
      local atk=tc:GetAttack()
      local def=tc:GetDefense()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetValue(0)
      e1:SetReset(RESET_EVENT+0x1fe0000)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
      e2:SetValue(0)
      e2:SetReset(RESET_EVENT+0x1fe0000)
      tc:RegisterEffect(e2)
      tc=tg:GetNext()
      end
      end
      function c50218138.rmtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      if chk==0 then return g:GetCount()>0 end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c50218138.rmop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
      if g:GetCount()>0 then
      Duel.HintSelection(g)
      Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
      end
      end
      \ No newline at end of file
      expansions/script/c96030203.lua
      View file @ a1cb9d4e
      --高性能机动Ⅲ型
      local s,id=GetID()
      function s.initial_effect(c)
      c:SetUniqueOnField(1,0,id)
      c:EnableReviveLimit()
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND+LOCATION_DECK)
      e1:SetCondition(s.spcon)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --spsummon cost
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SPSUMMON_COST)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCost(s.spcost)
      e2:SetOperation(s.spcop)
      c:RegisterEffect(e2)
      Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
      --
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_REMOVE)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetTarget(s.thtg)
      e3:SetOperation(s.thop)
      c:RegisterEffect(e3)
      end
      function s.counterfilter(c)
      return c:IsSetCard(0x3285)
      end
      function s.spfilter(c,ft,tp)
      return (ft>0 or (c:IsControler(tp) and c:GetSequence()<5))
      and (c:IsAbleToDeckAsCost() or c:IsAbleToExtraAsCost())
      end
      function s.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil,ft,tp)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),ft,tp)
      Duel.SendtoDeck(g,nil,2,REASON_COST)
      end
      function s.spcost(e,c,tp)
      return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0
      end
      function s.spcop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      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(s.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function s.splimit(e,c)
      return not c:IsSetCard(0x3285)
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_EXTRA)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
      end
      end
      --高性能机动Ⅲ型
      local s,id=GetID()
      function s.initial_effect(c)
      c:SetUniqueOnField(1,0,id)
      c:EnableReviveLimit()
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND+LOCATION_DECK)
      e1:SetCondition(s.spcon)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --spsummon cost
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SPSUMMON_COST)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCost(s.spcost)
      e2:SetOperation(s.spcop)
      c:RegisterEffect(e2)
      Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
      --
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_REMOVE)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetTarget(s.thtg)
      e3:SetOperation(s.thop)
      c:RegisterEffect(e3)
      end
      function s.counterfilter(c)
      return c:IsSetCard(0x3285)
      end
      function s.spfilter(c,ft,tp)
      return (ft>0 or (c:IsControler(tp) and c:GetSequence()<5))
      and (c:IsAbleToDeckAsCost() or c:IsAbleToExtraAsCost())
      end
      function s.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil,ft,tp)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),ft,tp)
      Duel.SendtoDeck(g,nil,2,REASON_COST)
      end
      function s.spcost(e,c,tp)
      return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0
      end
      function s.spcop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      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(s.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function s.splimit(e,c)
      return not c:IsSetCard(0x3285)
      end
      function s.refilter(c)
      return c:IsAbleToRemove() and c:IsSetCard(0x3285)
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_EXTRA)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToRemove,tp,LOCATION_EXTRA,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
      end
      end
      expansions/script/c96030205.lua
      View file @ a1cb9d4e
      --高性能机动Ⅴ型
      local s,id=GetID()
      function s.initial_effect(c)
      c:SetUniqueOnField(1,0,id)
      c:EnableReviveLimit()
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND+LOCATION_DECK)
      e1:SetCondition(s.spcon)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --spsummon cost
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_SPSUMMON_COST)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e3:SetCost(s.spcost)
      e3:SetOperation(s.spcop)
      c:RegisterEffect(e3)
      Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
      --spsummon
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_IGNITION)
      e4:SetRange(LOCATION_SZONE)
      e4:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
      e4:SetCondition(s.spcon2)
      e4:SetTarget(s.sptg2)
      e4:SetOperation(s.spop2)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetHintTiming(0,TIMING_END_PHASE)
      e5:SetCondition(s.spcon3)
      c:RegisterEffect(e5)
      end
      function s.counterfilter(c)
      return c:IsSetCard(0x3285)
      end
      function s.spfilter(c,ft,tp)
      return (ft>0 or (c:IsControler(tp) and c:GetSequence()<5))
      and (c:IsAbleToDeckAsCost() or c:IsAbleToExtraAsCost())
      end
      function s.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil,ft,tp)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),ft,tp)
      Duel.SendtoDeck(g,nil,2,REASON_COST)
      end
      function s.spcost(e,c,tp)
      return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0
      end
      function s.spcop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      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(s.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function s.splimit(e,c)
      return not c:IsSetCard(0x3285)
      end
      function s.sdfilter(c)
      return c:IsFacedown() or not c:IsSetCard(0x3285)
      end
      function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetEquipTarget() and not Duel.IsExistingMatchingCard(s.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil) and not Duel.IsPlayerAffectedByEffect(tp,96030200)
      end
      function s.filter(c)
      return c:IsSummonable(true,nil)
      end
      function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
      end
      function s.exrtg(e,c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP)
      end
      function s.spop2(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      --extra material
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e3:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      e3:SetTargetRange(LOCATION_ONFIELD,0)
      e3:SetTarget(s.exrtg)
      e3:SetValue(POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
      e4:SetTargetRange(LOCATION_HAND,0)
      e4:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_MONSTER))
      e4:SetLabelObject(e3)
      e4:SetReset(RESET_CHAIN)
      Duel.RegisterEffect(e4,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.Summon(tp,tc,true,nil)
      end
      end
      function s.spcon3(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsPlayerAffectedByEffect(tp,96030200)
      --高性能机动Ⅴ型
      local s,id=GetID()
      function s.initial_effect(c)
      c:SetUniqueOnField(1,0,id)
      c:EnableReviveLimit()
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND+LOCATION_DECK)
      e1:SetCondition(s.spcon)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --spsummon cost
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_SPSUMMON_COST)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e3:SetCost(s.spcost)
      e3:SetOperation(s.spcop)
      c:RegisterEffect(e3)
      Duel.AddCustomActivityCounter(id,ACTIVITY_SPSUMMON,s.counterfilter)
      --spsummon
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_IGNITION)
      e4:SetRange(LOCATION_SZONE)
      e4:SetCountLimit(1,EFFECT_COUNT_CODE_SINGLE)
      e4:SetCondition(s.spcon2)
      e4:SetTarget(s.sptg2)
      e4:SetOperation(s.spop2)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetType(EFFECT_TYPE_QUICK_O)
      e5:SetCode(EVENT_FREE_CHAIN)
      e5:SetHintTiming(0,TIMING_END_PHASE)
      e5:SetCondition(s.spcon3)
      c:RegisterEffect(e5)
      end
      function s.counterfilter(c)
      return c:IsSetCard(0x3285)
      end
      function s.spfilter(c,ft,tp)
      return (ft>0 or (c:IsControler(tp) and c:GetSequence()<5))
      and (c:IsAbleToDeckAsCost() or c:IsAbleToExtraAsCost())
      end
      function s.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      return ft>-1 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_MZONE,0,1,nil,ft,tp)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp,c)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_MZONE,0,1,1,e:GetHandler(),ft,tp)
      Duel.SendtoDeck(g,nil,2,REASON_COST)
      end
      function s.spcost(e,c,tp)
      return Duel.GetCustomActivityCount(id,tp,ACTIVITY_SPSUMMON)==0
      end
      function s.spcop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      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(s.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function s.splimit(e,c)
      return not c:IsSetCard(0x3285)
      end
      function s.sdfilter(c)
      return c:IsFacedown() or not c:IsSetCard(0x3285)
      end
      function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetEquipTarget() and (not Duel.IsExistingMatchingCard(s.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)) and (not Duel.IsPlayerAffectedByEffect(tp,96030200))
      end
      function s.filter(c)
      return c:IsSummonable(true,nil)
      end
      function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_HAND,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
      end
      function s.exrtg(e,c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP)
      end
      function s.spop2(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      --extra material
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e3:SetCode(EFFECT_ADD_EXTRA_TRIBUTE)
      e3:SetTargetRange(LOCATION_ONFIELD,0)
      e3:SetTarget(s.exrtg)
      e3:SetValue(POS_FACEUP_ATTACK+POS_FACEDOWN_DEFENSE)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
      e4:SetTargetRange(LOCATION_HAND,0)
      e4:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_MONSTER))
      e4:SetLabelObject(e3)
      e4:SetReset(RESET_CHAIN)
      Duel.RegisterEffect(e4,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_HAND,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.Summon(tp,tc,true,nil)
      end
      end
      function s.spcon3(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsPlayerAffectedByEffect(tp,96030200)and e:GetHandler():GetEquipTarget() and (not Duel.IsExistingMatchingCard(s.sdfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil))
      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