Skip to content

Y
ygopro-222DIY-cards
Commit 64f2ea51 authored by TanakaKotoha's avatar TanakaKotoha
Browse files
Options

mopemope

parent c641eb25
Pipeline #755 passed with stages
      in 42 minutes and 34 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 79 additions and 79 deletions
      expansions/script/c47579901.lua
      View file @ 64f2ea51
      ......@@ -2,106 +2,106 @@
      local m=47579901
      local cm=_G["c"..m]
      function c47579901.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_TO_GRAVE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,47579902)
      e1:SetTarget(c47579901.sptg)
      e1:SetOperation(c47579901.spop)
      c:RegisterEffect(e1)
      --spsum
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_PZONE)
      e2:SetCountLimit(1,47579901)
      e2:SetTarget(c47579901.xstg)
      e2:SetOperation(c47579901.xsop)
      c:RegisterEffect(e2)
      --synchro limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e3:SetValue(c47579901.synlimit)
      c:RegisterEffect(e3)
      --serch
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_SUMMON_SUCCESS)
      e4:SetProperty(EFFECT_FLAG_DELAY)
      e4:SetCountLimit(1,47579902)
      e4:SetTarget(c47579901.tgtg)
      e4:SetOperation(c47579901.tgop)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e5)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_TO_GRAVE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,47579902)
      e1:SetTarget(c47579901.sptg)
      e1:SetOperation(c47579901.spop)
      c:RegisterEffect(e1)
      --spsum
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_PZONE)
      e2:SetCountLimit(1,47579901)
      e2:SetTarget(c47579901.xstg)
      e2:SetOperation(c47579901.xsop)
      c:RegisterEffect(e2)
      --synchro limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e3:SetValue(c47579901.synlimit)
      c:RegisterEffect(e3)
      --serch
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_SUMMON_SUCCESS)
      e4:SetProperty(EFFECT_FLAG_DELAY)
      e4:SetCountLimit(1,47579903)
      e4:SetTarget(c47579901.tgtg)
      e4:SetOperation(c47579901.tgop)
      c:RegisterEffect(e4)
      local e5=e4:Clone()
      e5:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e5)
      end
      c47579901.pendulum_level=8
      function c47579901.synlimit(e,c)
      if not c then return false end
      return not (c:IsAttribute(ATTRIBUTE_DARK) or c:IsAttribute(ATTRIBUTE_LIGHT))
      if not c then return false end
      return not (c:IsAttribute(ATTRIBUTE_DARK) or c:IsAttribute(ATTRIBUTE_LIGHT))
      end
      function c47579901.xsfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_XYZ)
      return c:IsFaceup() and c:IsType(TYPE_XYZ)
      end
      function c47579901.xstg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c47579901.xsfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c47579901.xsfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c47579901.xsfilter,tp,LOCATION_MZONE,0,1,1,nil)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c47579901.xsfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c47579901.xsfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c47579901.xsfilter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function c47579901.xsop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not e:GetHandler():IsRelateToEffect(e) then return end
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() then
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e2:SetCode(EFFECT_ALLOW_SYNCHRO_KOISHI)
      e2:SetValue(c47579901.xyzlv)
      c:RegisterEffect(e2)
      end
      local c=e:GetHandler()
      if not e:GetHandler():IsRelateToEffect(e) then return end
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() then
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e2:SetCode(EFFECT_ALLOW_SYNCHRO_KOISHI)
      e2:SetValue(c47579901.xyzlv)
      c:RegisterEffect(e2)
      end
      end
      function c47579901.xyzlv(e,c,rc)
      return c:GetRank()
      return c:GetRank()
      end
      function c47579901.tgfilter(c)
      return c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsLevelAbove(4) and c:IsAbleToGrave()
      return c:IsRace(RACE_SPELLCASTER) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsAbleToGrave()
      end
      function c47579901.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c47579901.filter,tp,LOCATION_DECK,0,1,nil,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_DECK)
      if chk==0 then return Duel.IsExistingMatchingCard(c47579901.tgfilter,tp,LOCATION_DECK,0,1,nil,tp) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,nil,1,tp,LOCATION_DECK)
      end
      function c47579901.tgop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c47579901.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT,LOCATION_GRAVE)
      end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c47579901.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT,LOCATION_GRAVE)
      end
      end
      function c47579901.spfilter(c,e,tp)
      return c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_SPELLCASTER) and c:IsLevelAbove(4) and c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER)
      return c:IsAttribute(ATTRIBUTE_DARK) and c:IsRace(RACE_SPELLCASTER) and c:IsLevelAbove(4) and c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsType(TYPE_MONSTER)
      end
      function c47579901.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c47579901.spfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_EXTRA)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c47579901.spfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_EXTRA)
      end
      function c47579901.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,c47579901.spfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c47579901.spfilter,tp,LOCATION_GRAVE+LOCATION_EXTRA,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
      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