Skip to content

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

watele

parent 026d2c28
Pipeline #6585 passed with stages
      in 21 minutes and 23 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 22 additions and 53 deletions
      expansions/script/c66915001.lua
      View file @ 07698fba
      --璀璨的星辉 --璀璨的星辉
      if not StarLight_from_K then
      StarLight_from_K={}
      StarLight_from_K.Brightstarlight_Effect={}
      end
      function c66915001.initial_effect(c) function c66915001.initial_effect(c)
      local e3=Effect.CreateEffect(c) local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE) e3:SetType(EFFECT_TYPE_SINGLE)
      ...@@ -9,28 +13,24 @@ function c66915001.initial_effect(c) ...@@ -9,28 +13,24 @@ function c66915001.initial_effect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON) e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE) e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN) e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(2,66915001+EFFECT_COUNT_CODE_OATH) e1:SetCountLimit(2,66915001)
      e1:SetCondition(c66915001.spcon) e1:SetCondition(c66915001.spcon)
      e1:SetTarget(c66915001.target) e1:SetTarget(c66915001.target)
      e1:SetOperation(c66915001.spop) e1:SetOperation(c66915001.spop)
      c:RegisterEffect(e1) c:RegisterEffect(e1)
      --move StarLight_from_K.Brightstarlight_Effect[e1]=true
      local e11=Effect.CreateEffect(c) --spsummon limit
      e11:SetType(EFFECT_TYPE_IGNITION) local e2=Effect.CreateEffect(c)
      e11:SetRange(LOCATION_MZONE) e2:SetType(EFFECT_TYPE_FIELD)
      e11:SetCountLimit(1) e2:SetRange(LOCATION_SZONE)
      e11:SetCondition(c66915001.seqcon) e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e11:SetOperation(c66915001.seqop) e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
      local e5=Effect.CreateEffect(c) e2:SetTargetRange(1,0)
      e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT) e2:SetTarget(c66915001.sumlimit)
      e5:SetRange(LOCATION_SZONE) c:RegisterEffect(e2)
      e5:SetTargetRange(LOCATION_MZONE,0)
      e5:SetTarget(c66915001.eftg)
      e5:SetLabelObject(e11)
      c:RegisterEffect(e5)
      end end
      function c66915001.filter(c,e,tp) function c66915001.filter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,true,false) and c:IsSetCard(0x1374) and (c:IsLocation(LOCATION_DECK) and Duel.GetMZoneCount(tp)>0 or c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0) return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsSetCard(0x1374) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
      end end
      function c66915001.spcon(e,tp,eg,ep,ev,re,r,rp) function c66915001.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c66915001.filters,tp,LOCATION_SZONE,0,1,nil) return Duel.IsExistingMatchingCard(c66915001.filters,tp,LOCATION_SZONE,0,1,nil)
      ...@@ -39,49 +39,18 @@ function c66915001.filters(c,e) ...@@ -39,49 +39,18 @@ function c66915001.filters(c,e)
      return c:IsSetCard(0x374) and c:IsFaceup() return c:IsSetCard(0x374) and c:IsFaceup()
      end end
      function c66915001.target(e,tp,eg,ep,ev,re,r,rp,chk) function c66915001.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c66915001.filter,tp,LOCATION_EXTRA+LOCATION_DECK,0,1,nil,e,tp) end if chk==0 then return Duel.IsExistingMatchingCard(c66915001.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA+LOCATION_DECK) Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end end
      function c66915001.spop(e,tp,eg,ep,ev,re,r,rp) function c66915001.spop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON) Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c66915001.filter,tp,LOCATION_EXTRA+LOCATION_DECK,0,1,1,nil,e,tp) local g=Duel.SelectMatchingCard(tp,c66915001.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
      if g:GetCount()>0 then if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP) Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      g:GetFirst():CompleteProcedure()
      Duel.Hint(HINT_MUSIC,0,aux.Stringid(66915001,1))
      end end
      end end
      function c66915001.seqcon(e,tp,eg,ep,ev,re,r,rp)
      local seq=e:GetHandler():GetSequence()
      if seq>4 then return false end
      return (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
      or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1))
      end
      function c66915001.seqop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) or c:IsControler(1-tp) then return end
      local seq=c:GetSequence()
      if seq>4 then return end
      if (seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1))
      or (seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1)) then
      local flag=0
      if seq>0 and Duel.CheckLocation(tp,LOCATION_MZONE,seq-1) then flag=bit.replace(flag,0x1,seq-1) end
      if seq<4 and Duel.CheckLocation(tp,LOCATION_MZONE,seq+1) then flag=bit.replace(flag,0x1,seq+1) end
      flag=bit.bxor(flag,0xff)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
      local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,flag)
      local nseq=0
      if s==1 then nseq=0
      elseif s==2 then nseq=1
      elseif s==4 then nseq=2
      elseif s==8 then nseq=3
      else nseq=4 end
      Duel.MoveSequence(c,nseq)
      end
      end
      function c66915001.eftg(e,c)
      local seq=c:GetSequence()
      return c:IsType(TYPE_EFFECT) and c:IsSetCard(0x1374)
      and seq<5 and math.abs(e:GetHandler():GetSequence()-seq)==1
      end
      function c66915001.sumlimit(e,c,sump,sumtype,sumpos,targetp) function c66915001.sumlimit(e,c,sump,sumtype,sumpos,targetp)
      return c:IsLocation(LOCATION_EXTRA) and not c:IsSetCard(0x1374) return c:IsLocation(LOCATION_EXTRA) and not c:IsSetCard(0x1374)
      end 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