Skip to content

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

bug fix

parent e7bab01e
Pipeline #23834 passed with stages
      in 31 minutes and 10 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 205 additions and 212 deletions
      expansions/script/c33401683.lua
      View file @ e314060f
      --无法追回的过往
      local m=33401683
      local cm=_G["c"..m]
      function cm.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(cm.con)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      end
      function cm.cfilter(c)
      return c:IsFaceup() and c:IsSetCard(0x9344)
      end
      function cm.con(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_MZONE,0,1,nil)
      end
      function cm.refilter(c)
      return ((c:IsType(TYPE_EFFECT) and c:IsDisabled()) or c:IsType(TYPE_NORMAL) or c:IsType(TYPE_TOKEN)) and c:IsReleasable()
      end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x34f,2,REASON_COST) or Duel.IsExistingMatchingCard(cm.refilter,tp,LOCATION_MZONE,0,1,nil) end
      local b1=Duel.IsCanRemoveCounter(tp,1,0,0x34f,2,REASON_COST)
      local b2=Duel.IsExistingMatchingCard(cm.refilter,tp,LOCATION_MZONE,0,1,nil)
      if b2 and (not b1 or Duel.SelectYesNo(tp,aux.Stringid(m,2))) then
      local g=Duel.SelectMatchingCard(tp,cm.refilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.Release(g,REASON_COST)
      e:SetLabel(1)
      else
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.RemoveCounter(tp,1,0,0x34f,2,REASON_COST)
      end
      end
      function cm.refilter2(c)
      return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9344,0x3341) and c:IsAbleToRemove()
      end
      function cm.spfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9344,0x3341)
      end
      function cm.thfilter(c)
      return c:IsSetCard(0x3340,0x6340) and c:IsAbleToHand() and not c:IsCode(c)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:GetLocation()==LOCATION_GRAVE and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(cm.refilter2,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,cm.refilter2,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,LOCATION_GRAVE)
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      if e:GetLabel()==1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      Duel.RegisterFlagEffect(tp,33400101,RESET_EVENT+RESET_PHASE+PHASE_END,0,0)
      end
      --无法追回的过往
      local m=33401683
      local cm=_G["c"..m]
      function cm.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,m+EFFECT_COUNT_CODE_OATH)
      e1:SetCost(cm.cost)
      e1:SetTarget(cm.target)
      e1:SetOperation(cm.activate)
      c:RegisterEffect(e1)
      end
      function cm.refilter(c)
      return ((c:IsType(TYPE_EFFECT) and c:IsDisabled()) or c:IsType(TYPE_NORMAL) or c:IsType(TYPE_TOKEN)) and c:IsReleasable()
      end
      function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x34f,2,REASON_COST) or Duel.IsExistingMatchingCard(cm.refilter,tp,LOCATION_MZONE,0,1,nil) end
      local b1=Duel.IsCanRemoveCounter(tp,1,0,0x34f,2,REASON_COST)
      local b2=Duel.IsExistingMatchingCard(cm.refilter,tp,LOCATION_MZONE,0,1,nil)
      if b2 and (not b1 or Duel.SelectYesNo(tp,aux.Stringid(m,2))) then
      local g=Duel.SelectMatchingCard(tp,cm.refilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.Release(g,REASON_COST)
      e:SetLabel(1)
      else
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.RemoveCounter(tp,1,0,0x34f,2,REASON_COST)
      end
      end
      function cm.refilter2(c)
      return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9344,0x3341) and c:IsAbleToRemove()
      end
      function cm.spfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x9344,0x3341)
      end
      function cm.thfilter(c)
      return c:IsSetCard(0x3340,0x6340) and c:IsAbleToHand() and not c:IsCode(c)
      end
      function cm.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:GetLocation()==LOCATION_GRAVE and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(cm.refilter2,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,cm.refilter2,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,LOCATION_GRAVE)
      end
      function cm.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)~=0 and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) and Duel.SelectYesNo(tp,aux.Stringid(m,3)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      if e:GetLabel()==1 and Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_GRAVE,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(m,4)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      Duel.RegisterFlagEffect(tp,33400101,RESET_EVENT+RESET_PHASE+PHASE_END,0,0)
      end
      expansions/script/c47344577.lua
      View file @ e314060f
      --妖精骑士 巴格斯特
      local s,id=GetID()
      function s.initial_effect(c)
      c:EnableCounterPermit(0x43f)
      c:SetCounterLimit(0x43f,5)
      -- on special summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --bdmg
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_BE_MATERIAL)
      e3:SetCountLimit(1,id-1000)
      e3:SetCondition(s.atkcon)
      e3:SetOperation(s.atkop)
      c:RegisterEffect(e3)
      end
      function s.spfilter(c,e,tp)
      return c:IsSetCard(0x43f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function s.spop(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,s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      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:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_XYZ)) and c:IsLocation(LOCATION_EXTRA)
      end
      function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return r==REASON_SYNCHRO
      end
      function s.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local rc=c:GetReasonCard()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CHANGE_INVOLVING_BATTLE_DAMAGE)
      e1:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE))
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      rc:RegisterEffect(e1,true)
      --妖精骑士 巴格斯特
      local s,id=GetID()
      function s.initial_effect(c)
      c:EnableCounterPermit(0x43f)
      c:SetCounterLimit(0x43f,5)
      -- on special summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --bdmg
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_BE_MATERIAL)
      e3:SetCountLimit(1,id-1000)
      e3:SetCondition(s.atkcon)
      e3:SetOperation(s.atkop)
      c:RegisterEffect(e3)
      end
      function s.spfilter(c,e,tp)
      return c:IsSetCard(0x43f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function s.spop(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,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      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:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_XYZ)) and c:IsLocation(LOCATION_EXTRA)
      end
      function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return r==REASON_SYNCHRO
      end
      function s.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local rc=c:GetReasonCard()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CHANGE_INVOLVING_BATTLE_DAMAGE)
      e1:SetValue(aux.ChangeBattleDamage(1,DOUBLE_DAMAGE))
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      rc:RegisterEffect(e1,true)
      end
      \ No newline at end of file
      expansions/script/c47350512.lua
      View file @ e314060f
      --迷镜魇低语
      Duel.LoadScript("c47350500.lua")
      local s,id=GetID()
      function s.set(c)
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_POSITION)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetHintTiming(TIMING_BATTLE_PHASE,TIMINGS_CHECK_MONSTER+TIMING_BATTLE_PHASE)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      end
      function s.chainlm(re,rp,tp)
      return tp==rp or not re:GetHandler():IsType(TYPE_MONSTER)
      end
      function s.filter(c)
      return c:IsFaceup() and c:IsCanTurnSet()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
      Duel.SetChainLimit(s.chainlm)
      end
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsLocation(LOCATION_MZONE) and tc:IsFaceup() then
      Duel.ChangePosition(tc,POS_FACEDOWN_DEFENSE)
      end
      end
      function s.tograve(c)
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DECKDES+CATEGORY_TOGRAVE)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id-1000)
      e1:SetRange(LOCATION_GRAVE)
      e1:SetCost(aux.bfgcost)
      e1:SetTarget(s.tgtg)
      e1:SetOperation(s.tgop)
      c:RegisterEffect(e1)
      end
      function s.tgfilter(c,tp)
      if not (c:IsCode(0x43c) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()) then
      return false
      end
      local code=c:GetCode()
      return not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,code)
      end
      function s.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      end
      function s.tgop(e,tp,eg,ep,ev,re,r,rp)
      if not Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK,0,1,1,nil,tp)
      if #g>0 then
      Duel.SendtoGrave(g,REASON_EFFECT)
      end
      end
      function s.initial_effect(c)
      LIM.acinset(c)
      s.set(c)
      s.tograve(c)
      end
      --迷镜魇低语
      Duel.LoadScript("c47350500.lua")
      local s,id=GetID()
      function s.set(c)
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_POSITION)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetHintTiming(TIMING_BATTLE_PHASE,TIMINGS_CHECK_MONSTER+TIMING_BATTLE_PHASE)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      end
      function s.chainlm(re,rp,tp)
      return tp==rp or not re:GetHandler():IsType(TYPE_MONSTER)
      end
      function s.filter(c)
      return c:IsFaceup() and c:IsCanTurnSet()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
      Duel.SetChainLimit(s.chainlm)
      end
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsLocation(LOCATION_MZONE) and tc:IsFaceup() then
      Duel.ChangePosition(tc,POS_FACEDOWN_DEFENSE)
      end
      end
      function s.tograve(c)
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DECKDES+CATEGORY_TOGRAVE)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id-1000)
      e1:SetRange(LOCATION_GRAVE)
      e1:SetCost(aux.bfgcost)
      e1:SetTarget(s.tgtg)
      e1:SetOperation(s.tgop)
      c:RegisterEffect(e1)
      end
      function s.tgfilter(c,tp)
      if not (c:IsSetCard(0x43c) and c:IsType(TYPE_MONSTER) and c:IsAbleToGrave()) then
      return false
      end
      local code=c:GetCode()
      return not Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,code)
      end
      function s.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      end
      function s.tgop(e,tp,eg,ep,ev,re,r,rp)
      if not Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK,0,1,1,nil,tp)
      if #g>0 then
      Duel.SendtoGrave(g,REASON_EFFECT)
      end
      end
      function s.initial_effect(c)
      LIM.acinset(c)
      s.set(c)
      s.tograve(c)
      end
      expansions/script/c50218570.lua
      View file @ e314060f
      ......@@ -41,8 +41,7 @@ function c50218570.lcheck(g)
      return g:GetClassCount(Card.GetLevel)==1
      end
      function c50218570.filter(c,e,tp)
      return c:IsFaceup() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingMatchingCard(c50218570.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c)
      return c:IsFaceup() and Duel.IsExistingMatchingCard(c50218570.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp,c)
      end
      function c50218570.spfilter(c,e,tp,tc)
      return c:IsSetCard(0xcb5) and c:IsLevel(tc:GetLevel())
      ......@@ -50,9 +49,10 @@ function c50218570.spfilter(c,e,tp,tc)
      end
      function c50218570.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c50218570.filter(chkc,e,tp) and chkc~=c end
      if chk==0 then return Duel.IsExistingTarget(c50218570.filter,tp,LOCATION_MZONE,0,1,c,e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c50218570.filter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c50218570.filter,tp,LOCATION_MZONE,0,1,c,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,c50218570.filter,tp,LOCATION_MZONE,0,1,1,c,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      ......
      Markdown is supported
      0% or
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment