Skip to content

Y
ygopro-pre-data
Commit 5433c8c6 authored by mercury233's avatar mercury233
Browse files
Options

rm

parent 0b70c895
Pipeline #10488 passed with stages
      in 1 minute and 7 seconds
      Show whitespace changes
      Inline Side-by-side
      Showing with 0 additions and 4526 deletions
      deck/22-02-19 HC01.ydk deleted 100644 → 0
      View file @ 0b70c895
      #created by ...
      #main
      100287004
      100287005
      100287006
      100287007
      100287011
      100287013
      100287014
      100287019
      100287020
      100287021
      100287027
      100287029
      100287030
      100287034
      100287035
      100287036
      100287037
      100287043
      100287045
      100287046
      #extra
      100287012
      100287022
      100287028
      100287044
      !side
      deck/22-02-19 new cards.ydk
      View file @ 5433c8c6
      ...@@ -19,7 +19,6 @@ ...@@ -19,7 +19,6 @@
      100418036 100418036
      100288001 100288001
      100288002 100288002
      100200215
      100418201 100418201
      100418202 100418202
      100418203 100418203
      ...@@ -40,15 +39,3 @@ ...@@ -40,15 +39,3 @@
      100418209 100418209
      100418210 100418210
      !side !side
      101107000
      101107081
      101107082
      101107083
      101107084
      101107085
      101107086
      101107087
      101107088
      101107089
      101107090
      101107091
      expansions/pre-strings.conf
      View file @ 5433c8c6
      #The first line is used for comment #The first line is used for comment
      !counter 0x15f 指示物（逐渐削减的生命） !counter 0x15f 指示物（逐渐削减的生命）
      !counter 0x161 指示物（命运的囚人）
      !setname 0x27c 群豪 ヴァリアンツ !setname 0x27c 群豪 ヴァリアンツ
      !setname 0x27d 漫读使灵 Libromancer
      !setname 0x27e 神碑 神碑 !setname 0x27e 神碑 神碑
      !setname 0x27f 翼侠 ウィングマン !setname 0x27f 翼侠 ウィングマン
      script/c100200215.lua deleted 100644 → 0
      View file @ 0b70c895
      --真紅眼の黒星竜
      --
      --Script by Trishula9
      function c100200215.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,100200215)
      e1:SetCost(c100200215.spcost)
      e1:SetTarget(c100200215.sptg)
      e1:SetOperation(c100200215.spop)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,100200215+100)
      e2:SetCondition(aux.exccon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c100200215.thtg)
      e2:SetOperation(c100200215.thop)
      c:RegisterEffect(e2)
      end
      function c100200215.filter(c)
      return c:IsType(TYPE_NORMAL) and c:IsLevelAbove(5) and c:IsAbleToGraveAsCost()
      end
      function c100200215.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100200215.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c100200215.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil)
      Duel.SendtoGrave(g,REASON_COST)
      end
      function c100200215.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      end
      function c100200215.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)>0 then
      Duel.BreakEffect()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_LEVEL)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      e1:SetValue(1)
      c:RegisterEffect(e1)
      end
      end
      function c100200215.thfilter(c)
      return c:IsCode(6172122) and c:IsAbleToHand()
      end
      function c100200215.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100200215.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
      end
      function c100200215.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100200215.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      script/c100287004.lua deleted 100644 → 0
      View file @ 0b70c895
      --伝説の剣闘士 カオス・ソルジャー
      --Script by JSY1728
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableReviveLimit()
      --Special Summon Condition
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.ritlimit)
      c:RegisterEffect(e1)
      --Deck Search
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PREDRAW)
      e2:SetRange(LOCATION_HAND)
      e2:SetCondition(s.thcon)
      e2:SetCost(s.thcost)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      --Activate Limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetCode(EFFECT_CANNOT_ACTIVATE)
      e3:SetRange(LOCATION_MZONE)
      e3:SetTargetRange(0,1)
      e3:SetCondition(s.actcon)
      e3:SetValue(1)
      c:RegisterEffect(e3)
      --Return to Hand
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,1))
      e4:SetCategory(CATEGORY_TODECK)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_BATTLE_DESTROYING)
      e4:SetCondition(s.rhcon)
      e4:SetTarget(s.rhtg)
      e4:SetOperation(s.rhop)
      c:RegisterEffect(e4)
      --material check
      local e5=Effect.CreateEffect(c)
      e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e5:SetCode(EVENT_SPSUMMON_SUCCESS)
      e5:SetCondition(s.matcon)
      e5:SetOperation(s.matop)
      c:RegisterEffect(e5)
      local e6=Effect.CreateEffect(c)
      e6:SetType(EFFECT_TYPE_SINGLE)
      e6:SetCode(EFFECT_MATERIAL_CHECK)
      e6:SetValue(s.valcheck)
      e6:SetLabelObject(e5)
      c:RegisterEffect(e6)
      end
      function s.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()==tp and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0
      and Duel.GetDrawCount(tp)>0 and Duel.GetTurnCount()>1 --not fully implemented
      end
      function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return not e:GetHandler():IsPublic() end
      end
      function s.thfilter(c)
      return bit.band(c:GetType(),0x82)==0x82 and c:IsAbleToHand()
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
      local dt=Duel.GetDrawCount(tp)
      if dt~=0 then
      aux.DrawReplaceCount=0
      aux.DrawReplaceMax=dt
      end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      aux.DrawReplaceCount=aux.DrawReplaceCount+1
      if aux.DrawReplaceCount<=aux.DrawReplaceMax then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_DRAW_COUNT)
      e1:SetTargetRange(1,0)
      e1:SetReset(RESET_PHASE+PHASE_DRAW)
      e1:SetValue(0)
      Duel.RegisterEffect(e1,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      end
      function s.actcon(e)
      local ph=Duel.GetCurrentPhase()
      return Duel.GetTurnPlayer()==e:GetHandler():GetControler() and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
      end
      function s.matcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_RITUAL) and e:GetLabel()==1
      end
      function s.matop(e,tp,eg,ep,ev,re,r,rp)
      e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1)
      end
      function s.valcheck(e,c)
      local mg=c:GetMaterial()
      if mg:IsExists(Card.IsType,1,nil,TYPE_NORMAL) then
      e:GetLabelObject():SetLabel(1)
      else
      e:GetLabelObject():SetLabel(0)
      end
      end
      function s.rhcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:GetFlagEffect(id)>0 and Duel.GetAttacker()==c
      end
      function s.rhtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,1,nil) end
      local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
      end
      function s.rhop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
      if g:GetCount()>0 then
      Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      end
      script/c100287005.lua deleted 100644 → 0
      View file @ 0b70c895
      --真紅き魂
      --
      --Script by Trishula9
      function c100287005.initial_effect(c)
      --change name
      aux.EnableChangeCode(c,74677422,LOCATION_MZONE+LOCATION_GRAVE)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetRange(LOCATION_MZONE+LOCATION_HAND)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,100287005)
      e1:SetCondition(c100287005.spcon)
      e1:SetCost(c100287005.spcost)
      e1:SetTarget(c100287005.sptg)
      e1:SetOperation(c100287005.spop)
      c:RegisterEffect(e1)
      --damage
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_DAMAGE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCountLimit(1,100287005+100+EFFECT_COUNT_CODE_DUEL)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e2:SetTarget(c100287005.damtg)
      e2:SetOperation(c100287005.damop)
      c:RegisterEffect(e2)
      end
      function c100287005.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(Card.IsSummonPlayer,1,nil,1-tp)
      end
      function c100287005.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
      Duel.SendtoGrave(e:GetHandler(),REASON_COST)
      end
      function c100287005.spfilter(c,e,tp)
      return not c:IsCode(100287005) and c:IsSetCard(0x3b) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287005.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetMZoneCount(tp,e:GetHandler())>0
      and Duel.IsExistingMatchingCard(c100287005.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c100287005.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,c100287005.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
      end
      function c100287005.damfilter(c)
      return c:IsFaceup() and c:IsCode(74677422) and c:GetBaseAttack()>0
      end
      function c100287005.damtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100287005.damfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c100287005.damfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,c100287005.damfilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetFirst():GetBaseAttack())
      end
      function c100287005.damop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsFaceup() and tc:IsRelateToEffect(e) then
      Duel.Damage(1-tp,tc:GetBaseAttack(),REASON_EFFECT)
      end
      end
      script/c100287006.lua deleted 100644 → 0
      View file @ 0b70c895
      --決闘塔アルカトラズ
      --
      --Script by Trishula9
      function c100287006.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --choose
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287006,0))
      e2:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e2:SetCode(EVENT_PHASE+PHASE_BATTLE_START)
      e2:SetRange(LOCATION_FZONE)
      e2:SetCountLimit(1)
      e2:SetOperation(c100287006.csop)
      c:RegisterEffect(e2)
      --destroy
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(100287006,1))
      e3:SetCategory(CATEGORY_DESTROY)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_END)
      e3:SetRange(LOCATION_FZONE)
      e3:SetCountLimit(1)
      e3:SetOperation(c100287006.dop)
      c:RegisterEffect(e3)
      end
      function c100287006.csfilter(c,tp)
      return c:IsType(TYPE_MONSTER) and c:GetTextAttack()>=0 and c:IsAbleToRemove(tp,POS_FACEDOWN)
      end
      function c100287006.csop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local sc1=Duel.SelectMatchingCard(tp,c100287006.csfilter,tp,LOCATION_DECK,0,0,1,nil,tp):GetFirst()
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_REMOVE)
      local sc2=Duel.SelectMatchingCard(1-tp,c100287006.csfilter,1-tp,LOCATION_DECK,0,0,1,nil,1-tp):GetFirst()
      if sc1 or sc2 then
      local p=0
      if (not sc2) or sc1 and sc1:GetTextAttack()>sc2:GetTextAttack() then p=tp
      elseif (not sc1) or sc1:GetTextAttack()<sc2:GetTextAttack() then p=1-tp
      else p=PLAYER_ALL end
      if sc1 then Duel.ConfirmCards(1-tp,sc1) end
      if sc2 then Duel.ConfirmCards(tp,sc2) end
      Duel.Remove(Group.FromCards(sc1,sc2),POS_FACEDOWN,REASON_EFFECT)
      if (p==tp or p==PLAYER_ALL) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(Card.IsCanBeSpecialSummoned,tp,LOCATION_HAND,0,1,nil,e,0,tp,false,false)
      and Duel.SelectYesNo(tp,aux.Stringid(100287006,2)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sc=Duel.SelectMatchingCard(tp,Card.IsCanBeSpecialSummoned,tp,LOCATION_HAND,0,1,1,nil,e,0,tp,false,false):GetFirst()
      if sc then
      Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_DIRECT_ATTACK)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      sc:RegisterEffect(e1)
      end
      end
      if (p==1-tp or p==PLAYER_ALL) and Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(Card.IsCanBeSpecialSummoned,1-tp,LOCATION_HAND,0,1,nil,e,0,1-tp,false,false)
      and Duel.SelectYesNo(1-tp,aux.Stringid(100287006,2)) then
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_SPSUMMON)
      local sc=Duel.SelectMatchingCard(1-tp,Card.IsCanBeSpecialSummoned,1-tp,LOCATION_HAND,0,1,1,nil,e,0,1-tp,false,false):GetFirst()
      if sc then
      Duel.SpecialSummon(sc,0,1-tp,1-tp,false,false,POS_FACEUP)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EFFECT_DIRECT_ATTACK)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      sc:RegisterEffect(e2)
      end
      end
      end
      end
      function c100287006.dop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ct=Duel.GetTurnPlayer()==tp and 2 or 1
      c:RegisterFlagEffect(100287006,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_SELF_TURN,0,ct)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetLabel(Duel.GetTurnCount()+ct)
      e1:SetCountLimit(1)
      e1:SetCondition(c100287006.descon)
      e1:SetOperation(c100287006.desop)
      Duel.RegisterEffect(e1,tp)
      end
      function c100287006.descon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return Duel.GetTurnCount()==e:GetLabel() and c:IsLocation(LOCATION_ONFIELD) and c:IsFaceup()
      and c:GetFlagEffect(100287006)>0
      end
      function c100287006.desop(e,tp,eg,ep,ev,re,r,rp)
      e:SetLabel(0)
      Duel.Hint(HINT_CARD,0,100287006)
      local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      Duel.Destroy(g,REASON_EFFECT)
      end
      script/c100287007.lua deleted 100644 → 0
      View file @ 0b70c895
      --ソウルエナジーMAX！！
      --
      --Script by Trishula9
      function c100287007.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287007)
      e1:SetCondition(c100287007.condition)
      e1:SetCost(c100287007.cost)
      e1:SetTarget(c100287007.target)
      e1:SetOperation(c100287007.activate)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(0,TIMING_MAIN_END+TIMING_BATTLE_START+TIMING_BATTLE_END)
      e2:SetCountLimit(1,100287007+100)
      e2:SetCondition(c100287007.thcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c100287007.thtg)
      e2:SetOperation(c100287007.thop)
      c:RegisterEffect(e2)
      end
      function c100287007.filter(c)
      return c:IsCode(10000000) and c:GetOriginalAttribute()==ATTRIBUTE_DIVINE and c:IsFaceup()
      end
      function c100287007.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287007.filter,tp,LOCATION_MZONE,0,1,nil)
      end
      function c100287007.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(c100287007.filter,tp,LOCATION_MZONE,0,nil)
      if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsFaceup,2,g) end
      local rg=Duel.SelectReleaseGroup(tp,Card.IsFaceup,2,2,g)
      Duel.Release(rg,REASON_COST)
      end
      function c100287007.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
      local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,4000)
      Duel.SetTargetPlayer(1-tp)
      Duel.SetTargetParam(4000)
      end
      function c100287007.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(aux.TRUE,tp,0,LOCATION_MZONE,nil)
      if Duel.Destroy(g,REASON_EFFECT)~=0 then
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Damage(p,d,REASON_EFFECT)
      end
      end
      function c100287007.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()>=PHASE_MAIN1 and Duel.GetCurrentPhase()<=PHASE_MAIN2
      end
      function c100287007.thfilter(c)
      return c:IsCode(10000000) and c:IsAbleToHand()
      end
      function c100287007.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100287007.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE)
      end
      function c100287007.sumfilter(c)
      return c:IsSummonable(true,nil) and c:IsCode(10000000)
      end
      function c100287007.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100287007.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
      if g:GetCount()>0 and Duel.SendtoHand(g,nil,REASON_EFFECT)>0 and g:GetFirst():IsLocation(LOCATION_HAND) then
      Duel.ConfirmCards(1-tp,g)
      if Duel.IsExistingMatchingCard(c100287007.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(100287007,0)) then
      Duel.BreakEffect()
      Duel.ShuffleHand(tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local sg=Duel.SelectMatchingCard(tp,c100287007.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil)
      if sg:GetCount()>0 then
      Duel.Summon(tp,sg:GetFirst(),true,nil)
      end
      end
      end
      end
      script/c100287011.lua deleted 100644 → 0
      View file @ 0b70c895
      --デュエル・アカデミア
      --
      --Script by Trishula9
      function c100287011.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --destroy
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287011,0))
      e2:SetCategory(CATEGORY_DESTROY)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_FZONE)
      e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e2:SetCountLimit(1)
      e2:SetCondition(c100287011.descon)
      e2:SetTarget(c100287011.destg)
      e2:SetOperation(c100287011.desop)
      c:RegisterEffect(e2)
      --damage
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(100287011,1))
      e3:SetCategory(CATEGORY_DAMAGE)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_CHAINING)
      e3:SetRange(LOCATION_FZONE)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCountLimit(1)
      e3:SetCondition(c100287011.damcon)
      e3:SetTarget(c100287011.damtg)
      e3:SetOperation(c100287011.damop)
      c:RegisterEffect(e3)
      --atk up
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(100287011,2))
      e4:SetCategory(CATEGORY_ATKCHANGE)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_CHAINING)
      e4:SetRange(LOCATION_FZONE)
      e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e4:SetCountLimit(1)
      e4:SetCondition(c100287011.atkcon)
      e4:SetTarget(c100287011.atktg)
      e4:SetOperation(c100287011.atkop)
      c:RegisterEffect(e4)
      end
      function c100287011.filter1(c)
      return c:IsRace(RACE_WARRIOR+RACE_BEAST+RACE_PYRO) and c:IsFaceup()
      end
      function c100287011.descon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287011.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_TRAP) and rp==tp
      end
      function c100287011.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) end
      if chk==0 then return Duel.IsExistingTarget(nil,tp,0,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,nil,tp,0,LOCATION_ONFIELD,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c100287011.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 c100287011.filter2(c)
      return c:IsRace(RACE_DINOSAUR+RACE_SEASERPENT+RACE_THUNDER) and c:IsFaceup()
      end
      function c100287011.damcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287011.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      and re:IsHasType(EFFECT_TYPE_ACTIVATE) and re:IsActiveType(TYPE_SPELL) and rp==tp
      end
      function c100287011.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.SetTargetPlayer(1-tp)
      Duel.SetTargetParam(1000)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,1000)
      end
      function c100287011.damop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Damage(p,d,REASON_EFFECT)
      end
      function c100287011.filter3(c)
      return c:IsRace(RACE_MACHINE+RACE_FAIRY+RACE_FIEND) and c:IsFaceup()
      end
      function c100287011.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287011.filter3,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      and re:IsActiveType(TYPE_MONSTER) and rp==tp
      end
      function c100287011.atktg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc:IsFaceup() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function c100287011.atkop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(1000)
      tc:RegisterEffect(e1)
      end
      end
      script/c100287012.lua deleted 100644 → 0
      View file @ 0b70c895
      --Wake Up Your E・HERO
      --script by Raye
      function c100287012.initial_effect(c)
      c:EnableReviveLimit()
      --fusion material
      aux.AddFusionProcFunFunRep(c,c100287012.mfilter1,aux.FilterBoolFunction(Card.IsRace,RACE_WARRIOR),1,63,true)
      --spsummon condition
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetCode(EFFECT_SPSUMMON_CONDITION)
      e0:SetValue(aux.fuslimit)
      c:RegisterEffect(e0)
      --m-atk & atk-up
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCondition(c100287012.mtcon)
      e1:SetOperation(c100287012.mtop)
      c:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_MATERIAL_CHECK)
      e2:SetValue(c100287012.valcheck)
      e2:SetLabelObject(e1)
      c:RegisterEffect(e2)
      --destroy burn
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(100287012,0))
      e3:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e3:SetCode(EVENT_BATTLED)
      e3:SetCondition(c100287012.descon)
      e3:SetTarget(c100287012.destg)
      e3:SetOperation(c100287012.desop)
      c:RegisterEffect(e3)
      --spsummon
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(100287012,1))
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_DESTROYED)
      e4:SetCondition(c100287012.spcon)
      e4:SetTarget(c100287012.sptg)
      e4:SetOperation(c100287012.spop)
      c:RegisterEffect(e4)
      end
      c100287012.material_setcode=0x8
      function c100287012.mfilter1(c)
      return c:IsFusionSetCard(0x3008) and c:IsFusionType(TYPE_FUSION)
      end
      function c100287012.valcheck(e,c)
      local ct1=c:GetMaterialCount()
      local ct2=c:GetMaterial():FilterCount(Card.IsFusionType,nil,TYPE_FUSION)
      e:GetLabelObject():SetLabel(ct1,ct2)
      end
      function c100287012.mtcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION) and e:GetLabel()>0
      end
      function c100287012.mtop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ct1,ct2=e:GetLabel()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      e1:SetValue(ct1*300)
      c:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      e2:SetValue(ct2-1)
      c:RegisterEffect(e2)
      end
      function c100287012.descon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local bc=c:GetBattleTarget()
      return bc and bc:IsRelateToBattle()
      end
      function c100287012.destg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      local bc=e:GetHandler():GetBattleTarget()
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,bc,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,bc:GetBaseAttack())
      end
      function c100287012.desop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local bc=c:GetBattleTarget()
      if bc:IsRelateToBattle() and Duel.Destroy(bc,REASON_EFFECT)>0 then
      local dam=bc:GetBaseAttack()
      if dam>0 then Duel.Damage(1-tp,dam,REASON_EFFECT) end
      end
      end
      function c100287012.spcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsPreviousLocation(LOCATION_MZONE) and c:IsSummonType(SUMMON_TYPE_FUSION)
      end
      function c100287012.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c100287012.spfilter(c,e,tp)
      return c:IsRace(RACE_WARRIOR) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287012.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,c100287012.spfilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c100287013.lua deleted 100644 → 0
      View file @ 0b70c895
      --エヴォリューション・レザルト・バースト
      --
      --Script by Trishula9
      function c100287013.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287013+EFFECT_COUNT_CODE_OATH)
      e1:SetTarget(c100287013.target)
      e1:SetOperation(c100287013.activate)
      c:RegisterEffect(e1)
      end
      function c100287013.thfilter(c)
      return c:IsCode(3659803) and c:IsAbleToHand()
      end
      function c100287013.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100287013.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c100287013.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c100287013.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      --extra attack
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCondition(c100287013.excon)
      e1:SetOperation(c100287013.exop)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      if not e:IsHasType(EFFECT_TYPE_ACTIVATE) then return end
      --sumlimit
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetTargetRange(1,0)
      e2:SetTarget(c100287013.splimit)
      e2:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e2,tp)
      end
      function c100287013.cfilter(c)
      return c:IsType(TYPE_FUSION) and c:IsSummonType(SUMMON_TYPE_FUSION) and c:GetMaterialCount()>=6
      end
      function c100287013.excon(e,tp,eg,ep,ev,re,r,rp)
      return re and re:GetHandler():IsCode(3659803) and eg:IsExists(c100287013.cfilter,1,nil)
      end
      function c100287013.exop(e,tp,eg,ep,ev,re,r,rp)
      local tc=eg:Filter(c100287013.cfilter,nil):GetFirst()
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EXTRA_ATTACK)
      e1:SetValue(tc:GetMaterialCount()-1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      function c100287013.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return not se:GetHandler():IsType(TYPE_SPELL)
      end
      script/c100287014.lua deleted 100644 → 0
      View file @ 0b70c895
      --救いの架け橋
      --
      --Script by Trishula9
      function c100287014.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCondition(c100287014.condition)
      e1:SetTarget(c100287014.target)
      e1:SetOperation(c100287014.activate)
      c:RegisterEffect(e1)
      --search
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(0,TIMING_END_PHASE)
      e2:SetCondition(c100287014.thcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c100287014.thtg)
      e2:SetOperation(c100287014.thop)
      c:RegisterEffect(e2)
      end
      function c100287014.filter(c)
      return c:IsFaceup() and c:IsLevelAbove(10)
      end
      function c100287014.condition(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c100287014.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      return Duel.GetFlagEffect(tp,100287014)==0 and g:GetClassCount(Card.GetRace)>=2
      end
      function c100287014.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      local g=Duel.GetMatchingGroup(aux.NOT(Card.IsStatus),tp,0x1e,0x1e,nil,STATUS_BATTLE_DESTROYED)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0x1e)
      end
      function c100287014.activate(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetFlagEffect(tp,100287014)~=0 then return end
      Duel.RegisterFlagEffect(tp,100287014,0,0,0)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(aux.NOT(Card.IsStatus),tp,0x1e,0x1e,aux.ExceptThisCard(e),STATUS_BATTLE_DESTROYED)
      if aux.NecroValleyNegateCheck(g) then return end
      if Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)==0 then return end
      local tg=Duel.GetOperatedGroup():Filter(Card.IsLocation,nil,LOCATION_DECK)
      if tg:IsExists(Card.IsControler,1,nil,tp) then Duel.ShuffleDeck(tp) end
      if tg:IsExists(Card.IsControler,1,nil,1-tp) then Duel.ShuffleDeck(1-tp) end
      Duel.BreakEffect()
      Duel.Draw(tp,5,REASON_EFFECT)
      Duel.Draw(1-tp,5,REASON_EFFECT)
      end
      function c100287014.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetFlagEffect(tp,100287014+100)==0
      end
      function c100287014.thfilter1(c)
      return c:IsSetCard(0x1034) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c100287014.thfilter2(c)
      return c:IsType(TYPE_FIELD) and c:IsAbleToHand()
      end
      function c100287014.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100287014.thfilter1,tp,LOCATION_DECK,0,1,nil)
      and Duel.IsExistingMatchingCard(c100287014.thfilter2,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
      end
      function c100287014.thop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetFlagEffect(tp,100287014+100)~=0 then return end
      Duel.RegisterFlagEffect(tp,100287014+100,0,0,0)
      local g1=Duel.GetMatchingGroup(c100287014.thfilter1,tp,LOCATION_DECK,0,nil)
      local g2=Duel.GetMatchingGroup(c100287014.thfilter2,tp,LOCATION_DECK,0,nil)
      if g1:GetCount()>0 and g2:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg1=g1:Select(tp,1,1,nil)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg2=g2:Select(tp,1,1,nil)
      sg1:Merge(sg2)
      Duel.SendtoHand(sg1,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg1)
      end
      end
      script/c100287019.lua deleted 100644 → 0
      View file @ 0b70c895
      --ライディング・デュエル!アクセラレーション!
      --
      --Script by Trishula9
      function c100287019.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287019+EFFECT_COUNT_CODE_OATH)
      e1:SetOperation(c100287019.activate)
      c:RegisterEffect(e1)
      --counter
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_COUNTER)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCountLimit(1)
      e2:SetCondition(c100287019.ctcon)
      e2:SetTarget(c100287019.cttg)
      e2:SetOperation(c100287019.ctop)
      c:RegisterEffect(e2)
      --draw
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_DRAW+CATEGORY_TOGRAVE)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCost(c100287019.drcost)
      e3:SetTarget(c100287019.drtg)
      e3:SetOperation(c100287019.drop)
      c:RegisterEffect(e3)
      end
      function c100287019.filter(c)
      return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x1017) and c:IsAbleToHand()
      end
      function c100287019.activate(e,tp,eg,ep,ev,re,r,rp)
      if Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,0,1,e:GetHandler()) then return end
      local g=Duel.GetMatchingGroup(c100287019.filter,tp,LOCATION_DECK,0,nil)
      if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(100287019,0)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=g:Select(tp,1,1,nil)
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg)
      end
      end
      function c100287019.ctcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()==tp
      end
      function c100287019.cttg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x104d)
      end
      function c100287019.ctop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      c:AddCounter(0x104d,1)
      end
      function c100287019.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsCanRemoveCounter(tp,1,0,0x104d,2,REASON_COST)
      and e:GetHandler():IsAbleToGraveAsCost() end
      Duel.RemoveCounter(tp,1,0,0x104d,2,REASON_COST)
      Duel.SendtoGrave(e:GetHandler(),REASON_COST)
      end
      function c100287019.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 c100287019.drop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      if Duel.Draw(p,d,REASON_EFFECT)==2 then
      Duel.ShuffleHand(p)
      Duel.BreakEffect()
      Duel.DiscardHand(p,nil,1,1,REASON_EFFECT)
      end
      end
      script/c100287020.lua deleted 100644 → 0
      View file @ 0b70c895
      --大いなる魂
      --
      --Script by Trishula9
      function c100287020.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMING_END_PHASE)
      e1:SetCountLimit(1,100287020)
      e1:SetCondition(c100287020.condition)
      e1:SetTarget(c100287020.target)
      e1:SetOperation(c100287020.activate)
      c:RegisterEffect(e1)
      --disable
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_DISABLE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,100287020+100)
      e2:SetCondition(c100287020.discon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c100287020.distg)
      e2:SetOperation(c100287020.disop)
      c:RegisterEffect(e2)
      end
      function c100287020.filter(c)
      return c:IsRace(RACE_DRAGON) and c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
      end
      function c100287020.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287020.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      end
      function c100287020.spfilter(c,e,tp)
      return (c:IsSetCard(0x57) or c:IsRace(RACE_DRAGON) and c:IsLevel(1)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287020.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287020.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function c100287020.activate(e,tp,eg,ep,ev,re,r,rp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft<=0 then return end
      if ft>=2 then ft=2 end
      if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c100287020.spfilter,tp,LOCATION_DECK,0,1,ft,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c100287020.disfilter(c)
      return c:IsRace(RACE_DRAGON) and c:IsAttribute(ATTRIBUTE_DARK) and c:IsType(TYPE_SYNCHRO) and c:IsLevelAbove(10) and c:IsFaceup()
      end
      function c100287020.discon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c100287020.disfilter,tp,LOCATION_MZONE,0,1,nil)
      and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev)
      end
      function c100287020.distg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
      end
      function c100287020.atkfilter(c)
      return c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
      end
      function c100287020.disop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c100287020.atkfilter,tp,LOCATION_MZONE,0,nil)
      if Duel.NegateEffect(ev) and g:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(100287020,2))
      local tg=g:Select(tp,1,1,nil)
      Duel.HintSelection(tg)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(2000)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
      tg:GetFirst():RegisterEffect(e1)
      end
      end
      script/c100287021.lua deleted 100644 → 0
      View file @ 0b70c895
      --舞い戻った死神
      --
      --Script by Trishula9
      function c100287021.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287021)
      e1:SetTarget(c100287021.target)
      e1:SetOperation(c100287021.activate)
      c:RegisterEffect(e1)
      --set
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_LEAVE_GRAVE)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_LEAVE_FIELD)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
      e2:SetCountLimit(1,100287021+100)
      e2:SetCondition(c100287021.setcon)
      e2:SetTarget(c100287021.settg)
      e2:SetOperation(c100287021.setop)
      c:RegisterEffect(e2)
      end
      function c100287021.filter(c,e,tp)
      return c:IsSetCard(0xb) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and (c:IsLocation(LOCATION_HAND+LOCATION_GRAVE) or c:IsFaceup())
      end
      function c100287021.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287021.filter,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_REMOVED)
      end
      function c100287021.activate(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(c100287021.filter),tp,LOCATION_HAND+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
      function c100287021.cfilter(c,tp,rp)
      return c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp) and bit.band(c:GetPreviousTypeOnField(),TYPE_MONSTER)~=0
      and c:IsPreviousSetCard(0xb) and (c:IsReason(REASON_BATTLE) or (rp==1-tp and c:IsReason(REASON_EFFECT)))
      end
      function c100287021.setcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c100287021.cfilter,1,nil,tp,rp) and not eg:IsContains(e:GetHandler())
      end
      function c100287021.settg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsSSetable() end
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
      end
      function c100287021.setop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.SSet(tp,c)
      end
      end
      \ No newline at end of file
      script/c100287022.lua deleted 100644 → 0
      View file @ 0b70c895
      --アクセルシンクロ・スターダスト・ドラゴン
      --Scripted by mallu11
      function c100287022.initial_effect(c)
      aux.AddCodeList(c,44508094)
      --synchro summon
      aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
      c:EnableReviveLimit()
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(100287022,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,100287022)
      e1:SetCondition(c100287022.spcon)
      e1:SetTarget(c100287022.sptg)
      e1:SetOperation(c100287022.spop)
      c:RegisterEffect(e1)
      --synchro effect
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287022,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,100287122)
      e2:SetCondition(c100287022.sccon)
      e2:SetCost(c100287022.sccost)
      e2:SetTarget(c100287022.sctg)
      e2:SetOperation(c100287022.scop)
      c:RegisterEffect(e2)
      end
      function c100287022.spcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
      end
      function c100287022.spfilter(c,e,tp)
      return c:IsLevelBelow(2) and c:IsType(TYPE_TUNER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287022.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287022.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
      end
      function c100287022.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,c100287022.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      function c100287022.sccon(e,tp,eg,ep,ev,re,r,rp)
      local ph=Duel.GetCurrentPhase()
      return ph==PHASE_MAIN1 or ph==PHASE_MAIN2
      end
      function c100287022.excostfilter(c,tp)
      return c:IsAbleToRemoveAsCost() and c:IsHasEffect(84012625,tp)
      end
      function c100287022.spcheck(c,tp,rc,mg,opchk)
      return Duel.GetLocationCountFromEx(tp,tp,rc,c)>0
      and (opchk or Duel.IsExistingMatchingCard(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,1,c,nil,mg))
      end
      function c100287022.scfilter(c,e,tp,rc,chkrel,chknotrel,tgchk,opchk)
      if not (c:IsCode(44508094) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)) then return false end
      local mg=Duel.GetMatchingGroup(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      if mg:IsExists(Card.GetHandSynchro,1,nil) then
      local mg2=Duel.GetMatchingGroup(nil,tp,LOCATION_HAND,0,nil)
      if mg2:GetCount()>0 then mg:Merge(mg2) end
      end
      mg:AddCard(c)
      if tgchk then
      return c100287022.spcheck(c,tp,nil,mg,opchk)
      else
      return (chkrel and c100287022.spcheck(c,tp,rc,mg-rc)) or (chknotrel and c100287022.spcheck(c,tp,nil,mg))
      end
      end
      function c100287022.sccost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      local c=e:GetHandler()
      local ect1=c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]
      local ect2=aux.ExtraDeckSummonCountLimit and Duel.IsPlayerAffectedByEffect(tp,92345028)
      and aux.ExtraDeckSummonCountLimit[tp]
      local g=Duel.GetMatchingGroup(c100287022.excostfilter,tp,LOCATION_GRAVE,0,nil,tp)
      local chkrel=c:IsReleasable()
      local chknotrel=g:GetCount()>0
      local b1=chkrel and Duel.IsExistingMatchingCard(c100287022.scfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,chkrel,nil)
      local b2=chknotrel and Duel.IsExistingMatchingCard(c100287022.scfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,nil,chknotrel)
      if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
      and (not ect1 or ect1>1) and (not ect2 or ect2>1) and (b1 or b2)
      and aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) end
      local rg=Group.CreateGroup()
      local rc=nil
      if b1 then rg:AddCard(c) end
      if b2 then rg:Merge(g) end
      if rg:GetCount()>1 then
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(84012625,0))
      rc=rg:Select(tp,1,1,nil):GetFirst()
      else
      rc=rg:GetFirst()
      end
      local te=rc:IsHasEffect(84012625,tp)
      if te then
      Duel.Remove(rc,POS_FACEUP,REASON_COST+REASON_REPLACE)
      else
      Duel.Release(rc,REASON_COST)
      end
      end
      function c100287022.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      if e:GetLabel()==100 then
      e:SetLabel(0)
      return true
      end
      local c=e:GetHandler()
      local ect1=c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]
      local ect2=aux.ExtraDeckSummonCountLimit and Duel.IsPlayerAffectedByEffect(tp,92345028)
      and aux.ExtraDeckSummonCountLimit[tp]
      return Duel.IsPlayerCanSpecialSummonCount(tp,2)
      and (not ect1 or ect1>1) and (not ect2 or ect2>1)
      and aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
      and Duel.IsExistingMatchingCard(c100287022.scfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c,nil,nil,true)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c100287022.scop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c100287022.scfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,c,nil,nil,true,true)
      local tc=g:GetFirst()
      local res=false
      if tc and Duel.SpecialSummonStep(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_IMMUNE_EFFECT)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetValue(c100287022.immval)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      e1:SetOwnerPlayer(tp)
      tc:RegisterEffect(e1,true)
      res=true
      end
      Duel.SpecialSummonComplete()
      tc:CompleteProcedure()
      Duel.RaiseEvent(c,EVENT_ADJUST,nil,0,PLAYER_NONE,PLAYER_NONE,0)
      local tg=Duel.GetMatchingGroup(Card.IsSynchroSummonable,tp,LOCATION_EXTRA,0,nil,nil)
      if res and tg:GetCount()>0 then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=tg:Select(tp,1,1,nil)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_IMMUNE_EFFECT)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetValue(c100287022.immval)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD+RESET_PHASE+PHASE_END)
      e1:SetOwnerPlayer(tp)
      sg:GetFirst():RegisterEffect(e1,true)
      Duel.SynchroSummon(tp,sg:GetFirst(),nil)
      end
      end
      function c100287022.immval(e,te)
      return te:GetOwnerPlayer()~=e:GetOwnerPlayer() and te:IsActivated()
      end
      script/c100287027.lua deleted 100644 → 0
      View file @ 0b70c895
      --オーバーレイ・ネットワーク
      --
      --Script by Trishula9
      function c100287027.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287027,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_SZONE)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCountLimit(1,100287027)
      e2:SetCost(c100287027.spcost)
      e2:SetTarget(c100287027.sptg)
      e2:SetOperation(c100287027.spop)
      c:RegisterEffect(e2)
      --to hand
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(100287027,1))
      e3:SetCategory(CATEGORY_TOHAND)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_SZONE)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCountLimit(1,100287027)
      e3:SetTarget(c100287027.thtg)
      e3:SetOperation(c100287027.thop)
      c:RegisterEffect(e3)
      Duel.AddCustomActivityCounter(100287027,ACTIVITY_SPSUMMON,c100287027.counterfilter)
      end
      function c100287027.counterfilter(c)
      return not c:IsSummonLocation(LOCATION_EXTRA) or c:IsType(TYPE_XYZ)
      end
      function c100287027.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(100287027,tp,ACTIVITY_SPSUMMON)==0 end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetTargetRange(1,0)
      e1:SetTarget(c100287027.splimit)
      Duel.RegisterEffect(e1,tp)
      end
      function c100287027.splimit(e,c)
      return not c:IsType(TYPE_XYZ) and c:IsLocation(LOCATION_EXTRA)
      end
      function c100287027.cfilter(c,e,tp)
      return c:IsFaceup() and c:IsLevelAbove(1)
      and Duel.IsExistingMatchingCard(c100287027.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp,c:GetLevel())
      end
      function c100287027.spfilter(c,e,tp,lv)
      return c:IsLevel(lv) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c100287027.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100287027.cfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c100287027.cfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c100287027.cfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
      end
      function c100287027.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sc=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100287027.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp,tc:GetLevel()):GetFirst()
      if sc and Duel.SpecialSummonStep(sc,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      sc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetValue(RESET_TURN_SET)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      sc:RegisterEffect(e2)
      end
      Duel.SpecialSummonComplete()
      end
      end
      function c100287027.thfilter(c)
      return c:IsType(TYPE_XYZ) and c:IsFaceup() and c:GetOverlayCount()>0
      end
      function c100287027.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100287027.thfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c100287027.thfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c100287027.thfilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_OVERLAY)
      end
      function c100287027.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      local og=tc:GetOverlayGroup()
      if og:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=og:Select(tp,1,1,nil)
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      end
      end
      end
      script/c100287028.lua deleted 100644 → 0
      View file @ 0b70c895
      --No.39 希望皇ホープ・ライジング
      --Script by mercury233
      local s,id,o=GetID()
      function s.initial_effect(c)
      --xyz summon
      aux.AddXyzProcedure(c,nil,4,2)
      c:EnableReviveLimit()
      --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:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.sptg1)
      e1:SetOperation(s.spop1)
      c:RegisterEffect(e1)
      --special summon self
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id+o)
      e2:SetCondition(s.spcon2)
      e2:SetTarget(s.sptg2)
      e2:SetOperation(s.spop2)
      c:RegisterEffect(e2)
      end
      s.xyz_number=39
      function s.spfilter(c,e,tp)
      return c:IsSetCard(0x48) and c:IsType(TYPE_XYZ) and not c:IsCode(id)
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function s.spop1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=c:GetOverlayGroup()
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)>0
      and c:IsRelateToEffect(e) and #g>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
      Duel.BreakEffect()
      Duel.Overlay(tc,g)
      end
      end
      function s.cfilter(c,tp)
      return c:IsSummonType(SUMMON_TYPE_XYZ) and c:IsSummonPlayer(tp)
      end
      function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(s.cfilter,1,nil,tp)
      end
      function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      end
      function s.spop2(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
      e1:SetValue(LOCATION_REMOVED)
      c:RegisterEffect(e1,true)
      end
      end
      script/c100287029.lua deleted 100644 → 0
      View file @ 0b70c895
      --冀望郷－バリアン－
      --Script by mercury233
      local s,id,o=GetID()
      function s.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --Untargetable
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e2:SetRange(LOCATION_FZONE)
      e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e2:SetTargetRange(LOCATION_MZONE,0)
      e2:SetTarget(s.immtg)
      e2:SetValue(aux.tgoval)
      c:RegisterEffect(e2)
      --Indes
      local e3=e2:Clone()
      e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      e3:SetValue(aux.indoval)
      c:RegisterEffect(e3)
      --Draw
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,0))
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_SPSUMMON_SUCCESS)
      e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e4:SetRange(LOCATION_FZONE)
      e4:SetCountLimit(1)
      e4:SetCondition(s.xyzcon)
      e4:SetTarget(s.xyztg)
      e4:SetOperation(s.xyzop)
      c:RegisterEffect(e4)
      end
      function s.immtg(e,c)
      if c:IsSetCard(0x1073,0x1048) then return true end
      local m=_G["c"..c:GetCode()]
      if not c:IsSetCard(0x48) or not m then return false end
      local no=m.xyz_number
      return no and no>=101 and no<=107
      end
      function s.cfilter(c,tp)
      return c:IsFaceup() and c:IsSummonPlayer(tp) and c:IsType(TYPE_XYZ)
      end
      function s.xyzcon(e,tp,eg,ep,ev,re,r,rp)
      return re and re:GetHandler():IsSetCard(0x95) and re:IsActiveType(TYPE_SPELL) and eg:IsExists(s.cfilter,1,nil,tp)
      end
      function s.tgfilter1(c,g,tp)
      return g:IsContains(c) and Duel.IsExistingTarget(s.tgfilter2,tp,0,LOCATION_MZONE,1,c)
      end
      function s.tgfilter2(c)
      return c:IsCanOverlay()
      end
      function s.xyztg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      local g=eg:Filter(s.cfilter,nil,tp)
      if chk==0 then return Duel.IsExistingTarget(s.tgfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,g,tp) end
      local tg1
      if g:GetCount()==1 then
      tg1=g
      Duel.SetTargetCard(g)
      else
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      tg1=Duel.SelectTarget(tp,s.tgfilter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,g,tp)
      end
      e:SetLabelObject(tg1:GetFirst())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
      Duel.SelectTarget(tp,s.tgfilter2,tp,0,LOCATION_MZONE,1,1,tg1)
      end
      function s.xyzop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      if #g~=2 then return end
      local tc1=e:GetLabelObject()
      local tc2=g:Filter(Card.IsControler,tc1,1-tp):GetFirst()
      if tc1:IsType(TYPE_XYZ) and not tc1:IsImmuneToEffect(e) and tc2 then
      Duel.Overlay(tc1,tc2)
      end
      end
      script/c100287030.lua deleted 100644 → 0
      View file @ 0b70c895
      --竜皇神話
      --
      --Script by Trishula9
      function c100287030.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetHintTiming(TIMING_DAMAGE_STEP)
      e1:SetCountLimit(1,100287030)
      e1:SetCondition(aux.dscon)
      e1:SetTarget(c100287030.target)
      e1:SetOperation(c100287030.activate)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,100287030)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c100287030.sptg)
      e2:SetOperation(c100287030.spop)
      c:RegisterEffect(e2)
      end
      function c100287030.filter(c)
      return c:IsFaceup() and c:IsRace(RACE_DRAGON)
      end
      function c100287030.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c100287030.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c100287030.filter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c100287030.filter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function c100287030.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsImmuneToEffect(e) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetValue(tc:GetAttack()*2)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      if Duel.IsExistingMatchingCard(c100287030.filter,tp,0,LOCATION_MZONE,1,nil) then
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CANNOT_INACTIVATE)
      e2:SetReset(RESET_PHASE+PHASE_END)
      e2:SetValue(c100287030.efilter)
      e2:SetLabelObject(tc)
      Duel.RegisterEffect(e2,tp)
      end
      end
      end
      function c100287030.efilter(e,ct)
      local te=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT)
      return te:GetHandler()==e:GetLabelObject()
      end
      function c100287030.spfilter(c,e,tp)
      return c:IsRace(RACE_DRAGON) and c:IsType(TYPE_XYZ) and (c:IsLocation(LOCATION_GRAVE) or c:IsFaceup())
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c100287030.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287030.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
      end
      function c100287030.spop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c100287030.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,nil,e,tp)
      if g:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
      end
      end
      \ No newline at end of file
      script/c100287034.lua deleted 100644 → 0
      View file @ 0b70c895
      --EMバラード
      --Script by mercury233
      local s,id,o=GetID()
      function s.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --atk
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_BATTLE_START)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCountLimit(1)
      e1:SetCondition(s.atkcon1)
      e1:SetTarget(s.atktg1)
      e1:SetOperation(s.atkop1)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_DAMAGE)
      e2:SetCondition(s.thcon)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      --remove
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,2))
      e3:SetCategory(CATEGORY_REMOVE+CATEGORY_DECKDES)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e3:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e3:SetRange(LOCATION_MZONE)
      e3:SetOperation(s.rmop)
      c:RegisterEffect(e3)
      --remove
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,3))
      e4:SetCategory(CATEGORY_TOHAND+CATEGORY_HANDES)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_ATTACK_ANNOUNCE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCountLimit(1)
      e4:SetTarget(s.atktg2)
      e4:SetOperation(s.atkop2)
      c:RegisterEffect(e4)
      end
      function s.atkcon1(e,tp,eg,ep,ev,re,r,rp)
      local a,d=Duel.GetBattleMonster(tp)
      return a and d
      end
      function s.rmfilter(c)
      return c:IsType(TYPE_SPELL) and c:IsAbleToRemove()
      end
      function s.atktg1(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToHand()
      and Duel.IsExistingMatchingCard(s.rmfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_DECK)
      end
      function s.atkop1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if Duel.SendtoHand(c,nil,REASON_EFFECT)>0 and c:IsLocation(LOCATION_HAND) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,s.rmfilter,tp,LOCATION_DECK,0,1,1,nil)
      if #g>0 then
      Duel.Remove(g,POS_FACEUP,REASON_EFFECT)
      end
      end
      local tc=Duel.GetBattleMonster(tp)
      if tc then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e1:SetValue(1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_DAMAGE)
      tc:RegisterEffect(e1)
      end
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetTargetRange(1,0)
      e2:SetValue(HALF_DAMAGE)
      e2:SetReset(RESET_PHASE+PHASE_DAMAGE)
      Duel.RegisterEffect(e2,tp)
      end
      function s.thcon(e,tp,eg,ep,ev,re,r,rp)
      return ep~=tp
      end
      function s.thfilter(c)
      return c:IsAbleToHand() and (c:IsSetCard(0x10f8,0x20f8) and c:IsType(TYPE_MONSTER) or c:IsCode(100287037))
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      function s.rmop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetTurnPlayer()
      for i=1,2 do
      local g=Duel.GetMatchingGroup(s.rmfilter,p,LOCATION_DECK,0,nil)
      if #g>0 and Duel.SelectYesNo(p,aux.Stringid(id,4)) then
      Duel.Hint(HINT_SELECTMSG,p,HINTMSG_REMOVE)
      local tg=g:Select(p,1,1,nil)
      Duel.Remove(tg,POS_FACEUP,REASON_EFFECT)
      end
      p=1-p
      end
      end
      function s.atktg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetTargetPlayer(1-Duel.GetAttacker():GetControler())
      end
      function s.disfilter(c)
      return c:IsType(TYPE_SPELL) and c:IsFaceup() and c:IsAbleToHand()
      end
      function s.atkop2(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      local g=Duel.GetMatchingGroup(s.disfilter,p,LOCATION_REMOVED,0,nil)
      if #g>0 and Duel.SelectYesNo(p,aux.Stringid(id,5)) then
      Duel.Hint(HINT_SELECTMSG,p,HINTMSG_ATOHAND)
      local tc=g:Select(p,1,1,nil):GetFirst()
      if Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_HAND) then
      Duel.ConfirmCards(1-p,tc)
      Duel.BreakEffect()
      if Duel.SendtoGrave(tc,REASON_EFFECT+REASON_DISCARD)>0 then
      Duel.NegateAttack()
      end
      end
      end
      end
      script/c100287035.lua deleted 100644 → 0
      View file @ 0b70c895
      --歌氷麗月
      --
      --Script by Trishula9
      function c100287035.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287035)
      e1:SetTarget(c100287035.target)
      e1:SetOperation(c100287035.activate)
      c:RegisterEffect(e1)
      --reg
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EVENT_TO_GRAVE)
      e2:SetCondition(c100287035.regcon)
      e2:SetOperation(c100287035.regop)
      c:RegisterEffect(e2)
      --to hand
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_END)
      e3:SetRange(LOCATION_GRAVE)
      e3:SetCountLimit(1,100287035+100)
      e3:SetCondition(c100287035.thcon)
      e3:SetTarget(c100287035.thtg)
      e3:SetOperation(c100287035.thop)
      c:RegisterEffect(e3)
      end
      function c100287035.spfilter(c,e,tp)
      return c:IsRace(RACE_FAIRY+RACE_SPELLCASTER+RACE_WINDBEAST+RACE_BEASTWARRIOR) and c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287035.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287035.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,tp,LOCATION_HAND)
      end
      function c100287035.eqlimit(e,c)
      return e:GetOwner()==c
      end
      function c100287035.drfilter(c)
      return c:IsRace(RACE_DRAGON) and c:IsFaceup() and c:IsAbleToHand()
      end
      function c100287035.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c100287035.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)~=0 then
      Duel.Equip(tp,c,tc)
      --Add Equip limit
      local e1=Effect.CreateEffect(tc)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EQUIP_LIMIT)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(c100287035.eqlimit)
      c:RegisterEffect(e1)
      local hg=Duel.GetMatchingGroup(c100287035.drfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      if hg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(100287035,2)) then
      Duel.BreakEffect()
      Duel.SendtoHand(hg,nil,REASON_EFFECT)
      end
      end
      end
      function c100287035.regcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsPreviousLocation(LOCATION_SZONE) and e:GetHandler():IsPreviousPosition(POS_FACEUP)
      end
      function c100287035.regop(e,tp,eg,ep,ev,re,r,rp)
      e:GetHandler():RegisterFlagEffect(100287035,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
      end
      function c100287035.thfilter(c)
      return (c:IsSetCard(0x46) and c:IsType(TYPE_SPELL) or c:IsCode(6205579)) and c:IsAbleToHand()
      end
      function c100287035.thcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetFlagEffect(100287035)>0
      end
      function c100287035.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100287035.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c100287035.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c100287035.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      script/c100287036.lua deleted 100644 → 0
      View file @ 0b70c895
      --Battle Royal Mode－Joining
      --
      --Script by Trishula9 & mercury233
      function c100287036.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c100287036.target)
      e1:SetOperation(c100287036.tgop)
      c:RegisterEffect(e1)
      --battle indes
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_TARGET)
      e2:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCountLimit(2)
      e2:SetValue(c100287036.indct)
      c:RegisterEffect(e2)
      --recover
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_LEAVE_FIELD)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCondition(c100287036.rccon)
      e3:SetOperation(c100287036.rcop)
      c:RegisterEffect(e3)
      --spsummon
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(100287036,0))
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_DAMAGE)
      e4:SetRange(LOCATION_SZONE)
      e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
      e4:SetCondition(c100287036.spcon)
      e4:SetOperation(c100287036.spop)
      c:RegisterEffect(e4)
      end
      function c100287036.filter(c)
      return c:IsType(TYPE_EFFECT) and c:IsFaceup()
      end
      function c100287036.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c100287036.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c100287036.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,c100287036.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      end
      function c100287036.tgop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if c:IsRelateToEffect(e) and tc:IsFaceup() and tc:IsRelateToEffect(e) then
      c:SetCardTarget(tc)
      end
      end
      function c100287036.indct(e,re,r,rp)
      return bit.band(r,REASON_BATTLE)~=0
      end
      function c100287036.rccon(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetHandler():GetFirstCardTarget()
      return tc and eg:IsContains(tc) and tc:IsReason(REASON_BATTLE)
      end
      function c100287036.rcop(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetHandler():GetFirstCardTarget()
      Duel.Recover(tc:GetReasonPlayer(),2000,REASON_EFFECT)
      end
      function c100287036.spcon(e,tp,eg,ep,ev,re,r,rp)
      return ep~=Duel.GetTurnPlayer()
      end
      function c100287036.spfilter(c,e,tp)
      return c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287036.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(ep,LOCATION_MZONE)<=0 then return end
      local g=Duel.GetMatchingGroup(c100287036.spfilter,ep,LOCATION_HAND+LOCATION_DECK,0,nil,e,ep)
      if g:GetCount()>0 and Duel.SelectYesNo(ep,aux.Stringid(100287036,1)) then
      Duel.Hint(HINT_SELECTMSG,ep,HINTMSG_SPSUMMON)
      local sc=g:Select(ep,1,1,nil)
      if Duel.SpecialSummon(sc,0,ep,ep,false,false,POS_FACEUP)>0 then
      Duel.SetLP(ep,Duel.GetLP(ep)-2000)
      end
      end
      end
      script/c100287037.lua deleted 100644 → 0
      View file @ 0b70c895
      --覇王龍の魂
      --Scripted by mallu11
      function c100287037.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(100287037,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCost(c100287037.cost)
      e1:SetTarget(c100287037.target)
      e1:SetOperation(c100287037.activate)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287037,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCondition(c100287037.spcon)
      e2:SetCost(c100287037.spcost)
      e2:SetTarget(c100287037.sptg)
      e2:SetOperation(c100287037.spop)
      c:RegisterEffect(e2)
      end
      function c100287037.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.PayLPCost(tp,math.floor(Duel.GetLP(tp)/2))
      end
      function c100287037.filter(c,e,tp)
      return c:IsCode(13331639) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0 and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
      end
      function c100287037.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100287037.filter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c100287037.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c100287037.filter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc and Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP) then
      tc:RegisterFlagEffect(100287037,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,2)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetValue(RESET_TURN_SET)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e2)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_PHASE+PHASE_END)
      e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e3:SetCountLimit(1)
      e3:SetLabel(Duel.GetTurnCount())
      e3:SetLabelObject(tc)
      e3:SetCondition(c100287037.tdcon)
      e3:SetOperation(c100287037.tdop)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,2)
      Duel.RegisterEffect(e3,tp)
      end
      Duel.SpecialSummonComplete()
      end
      function c100287037.tdcon(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetLabelObject()
      return Duel.GetTurnCount()~=e:GetLabel() and tc:GetFlagEffect(100287037)~=0
      end
      function c100287037.tdop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_CARD,0,100287037)
      local tc=e:GetLabelObject()
      Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      function c100287037.spcon(e,tp,eg,ep,ev,re,r,rp)
      return ep==1-tp and re:IsActiveType(TYPE_SPELL)
      end
      function c100287037.costfilter(c,e,tp)
      return c:IsFaceup() and c:IsCode(13331639) and c:IsAbleToRemoveAsCost()
      and Duel.IsExistingMatchingCard(c100287037.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE,0,1,nil,e,tp,c)
      end
      function c100287037.spfilter(c,e,tp,tc)
      if not (c:IsSetCard(0x10f2,0x2073,0x2017,0x1046) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)) then return false end
      if c:IsLocation(LOCATION_EXTRA) then
      return Duel.GetLocationCountFromEx(tp,tp,tc,c)>0
      else
      return Duel.GetMZoneCount(tp,tc)>0
      end
      end
      function c100287037.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(100)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToRemoveAsCost() and Duel.IsExistingMatchingCard(c100287037.costfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,c100287037.costfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
      g:AddCard(c)
      Duel.Remove(g,POS_FACEUP,REASON_COST)
      end
      function c100287037.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      if e:GetLabel()==100 then
      e:SetLabel(0)
      return true
      end
      return Duel.IsExistingMatchingCard(c100287037.spfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE,0,1,nil,e,tp)
      end
      e:SetLabel(0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE)
      end
      function c100287037.exfilter2(c)
      return c:IsLocation(LOCATION_EXTRA) and c:IsFacedown() and c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
      end
      function c100287037.exfilter3(c)
      return c:IsLocation(LOCATION_EXTRA) and (c:IsType(TYPE_LINK) or (c:IsFaceup() and c:IsType(TYPE_PENDULUM)))
      end
      function c100287037.gcheck(g,ft1,ft2,ft3,ect,ft)
      return #g<=ft
      and g:FilterCount(Card.IsLocation,nil,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)<=ft1
      and g:FilterCount(c100287037.exfilter2,nil)<=ft2
      and g:FilterCount(c100287037.exfilter3,nil)<=ft3
      and g:FilterCount(Card.IsLocation,nil,LOCATION_EXTRA)<=ect
      and g:FilterCount(Card.IsSetCard,nil,0x10f2)<=1
      and g:FilterCount(Card.IsSetCard,nil,0x2073)<=1
      and g:FilterCount(Card.IsSetCard,nil,0x2017)<=1
      and g:FilterCount(Card.IsSetCard,nil,0x1046)<=1
      end
      function c100287037.spop(e,tp,eg,ep,ev,re,r,rp)
      local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local ft2=Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
      local ft3=Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_PENDULUM+TYPE_LINK)
      local ft=Duel.GetUsableMZoneCount(tp)
      if Duel.IsPlayerAffectedByEffect(tp,59822133) then
      if ft1>0 then ft1=1 end
      if ft2>0 then ft2=1 end
      if ft3>0 then ft3=1 end
      ft=1
      end
      local ect=(c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]) or ft
      local loc=0
      if ft1>0 then loc=loc+LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE end
      if ect>0 and (ft2>0 or ft3>0) then loc=loc+LOCATION_EXTRA end
      if loc==0 then return end
      local sg=Duel.GetMatchingGroup(aux.NecroValleyFilter(c100287037.spfilter),tp,loc,0,nil,e,tp)
      if sg:GetCount()==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local rg=sg:SelectSubGroup(tp,c100287037.gcheck,false,1,4,ft1,ft2,ft3,ect,ft)
      Duel.SpecialSummon(rg,0,tp,tp,false,false,POS_FACEUP)
      end
      script/c100287043.lua deleted 100644 → 0
      View file @ 0b70c895
      --Into the VRAINS!
      --
      --Script by Trishula9
      function c100287043.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(100287043,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287043+EFFECT_COUNT_CODE_OATH)
      e1:SetTarget(c100287043.target)
      e1:SetOperation(c100287043.activate)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(100287043,1))
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_DESTROYED)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
      e2:SetCost(aux.bfgcost)
      e2:SetCondition(c100287043.thcon)
      e2:SetTarget(c100287043.thtg)
      e2:SetOperation(c100287043.thop)
      c:RegisterEffect(e2)
      end
      function c100287043.lkfilter(c,mc)
      return c:IsLinkSummonable(nil,mc)
      end
      function c100287043.spfilter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      and Duel.IsExistingMatchingCard(c100287043.lkfilter,tp,LOCATION_EXTRA,0,1,nil,c)
      end
      function c100287043.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c100287043.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_HAND+LOCATION_EXTRA)
      end
      function c100287043.activate(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,c100287043.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if not tc then return end
      if not Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
      Duel.SpecialSummonComplete()
      return
      end
      local c=e:GetHandler()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetValue(RESET_TURN_SET)
      tc:RegisterEffect(e2)
      Duel.SpecialSummonComplete()
      Duel.RaiseEvent(c,EVENT_ADJUST,nil,0,PLAYER_NONE,PLAYER_NONE,0)
      if not tc:IsLocation(LOCATION_MZONE) then return end
      local tg=Duel.GetMatchingGroup(c100287043.lkfilter,tp,LOCATION_EXTRA,0,nil,tc)
      if tg:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=tg:Select(tp,1,1,nil)
      local sc=sg:GetFirst()
      --effect gain
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_BE_PRE_MATERIAL)
      e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
      e3:SetCondition(c100287043.effcon)
      e3:SetOperation(c100287043.effop2)
      tc:RegisterEffect(e3,true)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e4:SetCode(EVENT_BE_MATERIAL)
      e4:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
      e4:SetCondition(c100287043.effcon)
      e4:SetOperation(c100287043.effop1)
      tc:RegisterEffect(e4,true)
      Duel.LinkSummon(tp,sc,nil,tc)
      end
      end
      function c100287043.effcon(e,tp,eg,ep,ev,re,r,rp)
      return r==REASON_LINK
      end
      function c100287043.effop1(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+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetOperation(c100287043.sumop)
      rc:RegisterEffect(e1,true)
      end
      function c100287043.sumop(e,tp,eg,ep,ev,re,r,rp)
      Duel.SetChainLimitTillChainEnd(c100287043.chainlm)
      end
      function c100287043.chainlm(e,rp,tp)
      return tp==rp
      end
      function c100287043.effop2(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_CANNOT_DISABLE_SPSUMMON)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      rc:RegisterEffect(e1,true)
      end
      function c100287043.cfilter(c,tp)
      return c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE) and c:IsType(TYPE_LINK)
      and c:IsReason(REASON_BATTLE+REASON_EFFECT)
      end
      function c100287043.thcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c100287043.cfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
      end
      function c100287043.thfilter(c,race)
      return c:GetOriginalRace()&race>0 and c:IsAbleToHand()
      end
      function c100287043.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local g=eg:Filter(c100287043.cfilter,nil,tp)
      local race=0
      local tc=g:GetFirst()
      while tc do
      race=bit.bor(race,tc:GetOriginalRace())
      tc=g:GetNext()
      end
      e:SetLabel(race)
      return Duel.IsExistingMatchingCard(c100287043.thfilter,tp,LOCATION_GRAVE,0,1,nil,race)
      end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
      end
      function c100287043.thop(e,tp,eg,ep,ev,re,r,rp)
      local race=e:GetLabel()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100287043.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,race)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      end
      script/c100287044.lua deleted 100644 → 0
      View file @ 0b70c895
      --ファイアウォール・ドラゴン・ダークフルード－ネオテンペスト
      --Script by mercury233
      local s,id,o=GetID()
      function s.initial_effect(c)
      --link summon
      c:EnableReviveLimit()
      aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkRace,RACE_CYBERSE),3)
      --disable
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCode(EVENT_CHAIN_SOLVING)
      e1:SetOperation(s.disop)
      c:RegisterEffect(e1)
      --to grave
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_TOGRAVE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(TIMING_DAMAGE_STEP,TIMING_DAMAGE_STEP+TIMING_END_PHASE)
      e2:SetCountLimit(1,id)
      e2:SetCondition(aux.dscon)
      e2:SetTarget(s.atktg)
      e2:SetOperation(s.atkop)
      c:RegisterEffect(e2)
      --multi attack
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
      e3:SetValue(s.eaval)
      c:RegisterEffect(e3)
      end
      function s.disop(e,tp,eg,ep,ev,re,r,rp)
      local ph=Duel.GetCurrentPhase()
      if re:IsActiveType(TYPE_MONSTER) and rp==1-tp and ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE then
      Duel.NegateEffect(ev)
      end
      end
      function s.tgfilter(c)
      return c:IsRace(RACE_CYBERSE) and c:IsAbleToGrave()
      end
      function s.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA)
      end
      function s.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
      local tc=g:GetFirst()
      if tc and Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE)
      and c:IsFaceup() and c:IsRelateToEffect(e) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_ADD_ATTRIBUTE)
      e1:SetValue(tc:GetAttribute())
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetValue(2500)
      c:RegisterEffect(e2)
      end
      end
      function s.eaval(e,c)
      local ct=0
      local attr=1
      for i=1,7 do
      if e:GetHandler():IsAttribute(attr) then ct=ct+1 end
      attr=attr<<1
      end
      return ct-1
      end
      script/c100287045.lua deleted 100644 → 0
      View file @ 0b70c895
      --青い涙の天使
      --Script by mercury233
      local s,id,o=GetID()
      function s.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_DAMAGE+CATEGORY_DISABLE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCode(EVENT_DAMAGE)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,id)
      e2:SetCondition(s.setcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.settg)
      e2:SetOperation(s.setop)
      c:RegisterEffect(e2)
      end
      function s.negfilter(c,ec)
      local p=c:GetControler()
      return aux.NegateMonsterFilter(c) and Duel.GetMatchingGroupCount(aux.TRUE,p,0,LOCATION_HAND,ec)>0
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.negfilter(chkc,c) end
      if chk==0 then return Duel.IsExistingTarget(s.negfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
      local g=Duel.SelectTarget(tp,aux.NegateMonsterFilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,nil)
      local p=g:GetFirst():GetControler()
      local dam=Duel.GetFieldGroupCount(p,0,LOCATION_HAND)*200
      Duel.SetTargetPlayer(1-p)
      Duel.SetTargetParam(dam)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-p,dam)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      local p=tc:GetControler()
      local dam=Duel.GetFieldGroupCount(p,0,LOCATION_HAND)*200
      if dam==0 or Duel.Damage(1-p,dam,REASON_EFFECT)==0 then return end
      Duel.BreakEffect()
      if tc:IsFaceup() and not tc:IsDisabled() and not tc:IsImmuneToEffect(e) then
      Duel.NegateRelatedChain(tc,RESET_TURN_SET)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetValue(RESET_TURN_SET)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e2)
      end
      end
      end
      function s.setcon(e,tp,eg,ep,ev,re,r,rp)
      return bit.band(r,REASON_EFFECT)~=0
      end
      function s.setfilter(c)
      return c:GetType()==TYPE_TRAP and c:IsSSetable()
      end
      function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil) end
      end
      function s.setop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil)
      if #g>0 then
      Duel.SSet(tp,g:GetFirst())
      local og=Duel.GetOperatedGroup()
      if og:IsExists(Card.IsPreviousLocation,1,nil,LOCATION_HAND) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
      e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      g:GetFirst():RegisterEffect(e1)
      end
      end
      end
      script/c100287046.lua deleted 100644 → 0
      View file @ 0b70c895
      --運命の囚人
      --
      --Script by Trishula9
      function c100287046.initial_effect(c)
      c:EnableCounterPermit(0x161)
      c:SetCounterLimit(0x161,3)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,100287046+EFFECT_COUNT_CODE_OATH)
      c:RegisterEffect(e1)
      --counter
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_COUNTER+CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetRange(LOCATION_SZONE)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCondition(c100287046.condition)
      e2:SetTarget(c100287046.target)
      e2:SetOperation(c100287046.operation)
      c:RegisterEffect(e2)
      end
      function c100287046.cfilter(c,tp)
      return c:IsLink(4) and c:IsSummonType(SUMMON_TYPE_LINK) and c:IsFaceup()
      end
      function c100287046.condition(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c100287046.cfilter,1,nil,tp)
      end
      function c100287046.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsCanAddCounter(tp,0x161,1,e:GetHandler()) end
      Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x161)
      end
      function c100287046.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      c:AddCounter(0x161,1)
      local ct=c:GetCounter(0x161)
      if ct==1 and Duel.SelectYesNo(tp,aux.Stringid(100287046,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CODE)
      local ac=Duel.AnnounceCard(tp)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetTargetRange(LOCATION_ONFIELD,LOCATION_ONFIELD)
      e1:SetTarget(c100287046.distg1)
      e1:SetLabel(ac)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetCode(EVENT_CHAIN_SOLVING)
      e2:SetCondition(c100287046.discon)
      e2:SetOperation(c100287046.disop)
      e2:SetLabel(ac)
      e2:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e2,tp)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
      e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      e3:SetTarget(c100287046.distg2)
      e3:SetLabel(ac)
      e3:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e3,tp)
      end
      local g1=Duel.GetMatchingGroup(aux.NecroValleyFilter(c100287046.spfilter1),tp,LOCATION_GRAVE,0,nil,e,tp)
      if ct==2 and g1:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(100287046,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg1=g1:Select(tp,1,1,nil)
      Duel.SpecialSummon(sg1,0,tp,tp,false,false,POS_FACEUP)
      end
      local g2=Duel.GetMatchingGroup(c100287046.spfilter2,tp,LOCATION_EXTRA,0,nil,e,tp)
      if ct==3 and g2:GetCount()>0 and c:IsAbleToGrave() and Duel.SelectYesNo(tp,aux.Stringid(100287046,2)) then
      Duel.BreakEffect()
      if Duel.SendtoGrave(c,REASON_EFFECT)>0 and c:IsLocation(LOCATION_GRAVE) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg2=g2:Select(tp,1,1,nil)
      Duel.SpecialSummon(sg2,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      end
      function c100287046.distg1(e,c)
      local ac=e:GetLabel()
      if c:IsType(TYPE_SPELL+TYPE_TRAP) then
      return c:IsOriginalCodeRule(ac)
      else
      return c:IsOriginalCodeRule(ac) and (c:IsType(TYPE_EFFECT) or c:GetOriginalType()&TYPE_EFFECT~=0)
      end
      end
      function c100287046.distg2(e,c)
      local ac=e:GetLabel()
      return c:IsOriginalCodeRule(ac)
      end
      function c100287046.discon(e,tp,eg,ep,ev,re,r,rp)
      local ac=e:GetLabel()
      return re:GetHandler():IsOriginalCodeRule(ac)
      end
      function c100287046.disop(e,tp,eg,ep,ev,re,r,rp)
      Duel.NegateEffect(ev)
      end
      function c100287046.spfilter1(c,e,tp)
      return c:IsLevelBelow(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100287046.spfilter2(c,e,tp)
      return c:IsLink(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      \ No newline at end of file
      script/c101107000.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Geek Boy
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --SP sum itself
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,id)
      e1:SetCost(s.spcost)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --Add from deck to hand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetCountLimit(1,id+o)
      e2:SetTarget(s.d2htg)
      e2:SetOperation(s.d2hop)
      c:RegisterEffect(e2)
      end
      function s.spcostfilter(c)
      return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
      end
      function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.IsExistingMatchingCard(s.spcostfilter,tp,LOCATION_HAND,0,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.spcostfilter,tp,LOCATION_HAND,0,1,1,c)
      Duel.ConfirmCards(1-tp,g)
      Duel.ShuffleHand(tp)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function s.d2hfilter(c)
      return c:IsSetCard(0x27d) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
      end
      function s.d2htg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.d2hfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function s.d2hop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,s.d2hfilter,tp,LOCATION_DECK,0,1,1,nil)
      if #g>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      script/c101107081.lua deleted 100644 → 0
      View file @ 0b70c895
      --Dragonbite
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --SP 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_SUMMON_SUCCESS)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target1)
      e1:SetOperation(s.activate1)
      c:RegisterEffect(e1)
      --Level Change (Increase)
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_LVCHANGE)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,id+o)
      e2:SetCost(s.cost2)
      e2:SetTarget(s.target2)
      e2:SetOperation(s.activate2)
      c:RegisterEffect(e2)
      end
      function s.filter1(c,e,tp)
      return c:IsLevelBelow(4) and c:IsRace(RACE_INSECT) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.target1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.filter1,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function s.activate1(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.filter1,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if #g>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function s.targetfilter2(c)
      return c:IsFaceup() and c:IsLevelAbove(1)
      end
      function s.filter2(c,tp)
      return c:IsLevelBelow(4) and c:IsRace(RACE_INSECT) and (not c:IsOnField() or c:IsFaceup()) and c:IsAbleToRemoveAsCost()
      and Duel.IsExistingTarget(s.targetfilter2,tp,LOCATION_MZONE,0,1,c)
      end
      function s.cost2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,1,nil,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,s.filter2,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_GRAVE,0,1,1,nil,tp)
      Duel.Remove(g,POS_FACEUP,REASON_COST)
      e:SetLabel(g:GetFirst():GetLevel())
      end
      function s.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.targetfilter2(chkc) end
      if chk==0 then return true end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,s.targetfilter2,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_LVCHANGE,g,1,0,0)
      end
      function s.activate2(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      local lv=e:GetLabel()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() and lv then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_LEVEL)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetValue(lv)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      end
      script/c101107082.lua deleted 100644 → 0
      View file @ 0b70c895
      --Flowerdino
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableReviveLimit()
      --Cannot SP Sum self
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --SP Sum self
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_CHAIN_SOLVED)
      e2:SetRange(LOCATION_HAND)
      e2:SetCountLimit(1,id)
      e2:SetCondition(s.condition1)
      e2:SetTarget(s.target1)
      e2:SetOperation(s.activate1)
      c:RegisterEffect(e2)
      --Going to grave returns banished to deck
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_TO_GRAVE)
      e3:SetCountLimit(1,id+o)
      e3:SetTarget(s.target2)
      e3:SetOperation(s.activate2)
      c:RegisterEffect(e3)
      end
      function s.condition1(e,tp,eg,ep,ev,re,r,rp)
      return (rp==1-tp and re:IsActiveType(TYPE_SPELL)) or (rp==tp and re:IsActiveType(TYPE_TRAP))
      end
      function s.target1(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and c:IsCanBeSpecialSummoned(e,0,tp,true,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      end
      function s.activate1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP)>0 then
      c:CompleteProcedure()
      end
      end
      function s.filter2(c)
      return c:IsFaceup() and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToDeck()
      end
      function s.target2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(s.filter2,tp,LOCATION_REMOVED,LOCATION_REMOVED,3,nil)
      and Duel.IsPlayerCanDraw(tp,1) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,s.filter2,tp,LOCATION_REMOVED,LOCATION_REMOVED,3,3,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,#g,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function s.dfilter(c,tp)
      return c:IsLocation(LOCATION_DECK) and c:IsControler(tp)
      end
      function s.activate2(e,tp,eg,ep,ev,re,r,rp)
      local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      if #tg>0 and Duel.SendtoDeck(tg,nil,SEQ_DECKTOP,REASON_EFFECT)>0 then
      local p=tp
      for i=1,2 do
      local dg=tg:Filter(s.dfilter,nil,p)
      if #dg>1 then
      Duel.SortDecktop(tp,p,#dg)
      end
      for i=1,#dg do
      local mg=Duel.GetDecktopGroup(p,1)
      Duel.MoveSequence(mg:GetFirst(),1)
      end
      p=1-tp
      end
      Duel.BreakEffect()
      Duel.Draw(tp,1,REASON_EFFECT)
      end
      end
      script/c101107083.lua deleted 100644 → 0
      View file @ 0b70c895
      --Rock Scales
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --Union equip monster
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target1)
      e1:SetOperation(s.activate1)
      c:RegisterEffect(e1)
      --Destroy at battle if equipped equals race and attribute
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_DESTROY)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BATTLE_START)
      e2:SetCountLimit(1,id+o)
      e2:SetTarget(s.target2)
      e2:SetOperation(s.activate2)
      c:RegisterEffect(e2)
      end
      function s.filter1(c,tp)
      return c:IsFaceup() and (c:IsControler(tp) or c:IsAbleToChangeControler())
      end
      function s.target1(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.filter1(chkc,tp) and chkc~=c end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
      and Duel.IsExistingTarget(s.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,c,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      local g=Duel.SelectTarget(tp,s.filter1,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,c,tp)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,g,1,0,0)
      end
      function s.activate1(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      local c=e:GetHandler()
      if tc:IsRelateToEffect(e) and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
      and s.filter1(tc,tp) and tc:IsType(TYPE_MONSTER) then
      if not Duel.Equip(tp,tc,c,false) then return end
      tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,0)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EQUIP_LIMIT)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetValue(s.eqlimit)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      end
      function s.eqlimit(e,c)
      return e:GetOwner()==c
      end
      function s.filter2(c)
      return c:IsFaceup() and c:GetOriginalType()&TYPE_MONSTER>0 and c:GetFlagEffect(id)>0
      end
      function s.target2(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      local tc=c:GetBattleTarget()
      if chk==0 then
      local ec=c:GetEquipGroup():Filter(s.filter2,nil):GetFirst()
      return ec and tc and tc:IsControler(1-tp) and tc:IsFaceup()
      and tc:IsAttribute(ec:GetOriginalAttribute()) and tc:IsRace(ec:GetOriginalRace())
      end
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,tc,1,0,0)
      end
      function s.activate2(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetHandler():GetBattleTarget()
      if tc:IsRelateToBattle() and tc:IsControler(1-tp) then
      Duel.Destroy(tc,REASON_EFFECT)
      end
      end
      script/c101107084.lua deleted 100644 → 0
      View file @ 0b70c895
      --The Great Double Casted Caster
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableReviveLimit()
      --fusion eff
      aux.AddFusionProcFunRep(c,s.noeff,2,true)
      --atk buff
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_MATERIAL_CHECK)
      e1:SetValue(s.atkcalc)
      c:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetCondition(s.atkcon)
      e2:SetOperation(s.atkop)
      e2:SetLabelObject(e1)
      c:RegisterEffect(e2)
      --direct atk
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_DIRECT_ATTACK)
      c:RegisterEffect(e3)
      --sp sum
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,1))
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e4:SetCode(EVENT_DESTROYED)
      e4:SetCountLimit(1,id)
      e4:SetCondition(s.spcon)
      e4:SetTarget(s.sptg)
      e4:SetOperation(s.spop)
      c:RegisterEffect(e4)
      end
      function s.noeff(c)
      return not c:IsType(TYPE_EFFECT)
      end
      function s.atkcalc(e,c)
      local g=c:GetMaterial()
      local atk=0
      for tc in aux.Next(g) do
      if tc:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK) then
      atk=atk+tc:GetBaseAttack()
      end
      end
      e:SetLabel(atk)
      end
      function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
      end
      function s.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local atk=e:GetLabelObject():GetLabel()
      if atk>0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(atk)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      end
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return r&(REASON_EFFECT+REASON_BATTLE)
      end
      function s.spfilter(c,e,tp)
      return s.noeff(c) and (c:IsFaceup() or c:IsLocation(LOCATION_GRAVE)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_REMOVED) and chkc:IsControler(tp) and s.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101107085.lua deleted 100644 → 0
      View file @ 0b70c895
      --Sol and Luna
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_POSITION)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      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.filter(c)
      return (c:IsFaceup() and c:IsCanTurnSet()) or c:IsFacedown()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) and Duel.IsExistingTarget(s.filter,tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g1=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g2=Duel.SelectTarget(tp,s.filter,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g1+g2,2,0,0)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local gs=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      for c in aux.Next(gs) do
      Duel.ChangePosition(c,c:IsFaceup() and POS_FACEDOWN_DEFENSE or POS_FACEUP_DEFENSE)
      end
      end
      script/c101107086.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Magigirl
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --SP sum itself
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,id)
      e1:SetCost(s.spcost)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --Ritual sum
      local e2=Auxiliary.AddRitualProcGreater2(c,s.ritfilter,LOCATION_HAND)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e2:SetCountLimit(1,id+o)
      e2:SetCondition(s.ritcond)
      end
      function s.ritcond(e,tp)
      return Duel.GetTurnPlayer()~=tp
      end
      function s.ritfilter(c)
      return c:IsSetCard(0x27d)
      end
      function s.spcostfilter(c)
      return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
      end
      function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.IsExistingMatchingCard(s.spcostfilter,tp,LOCATION_HAND,0,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.spcostfilter,tp,LOCATION_HAND,0,1,1,c)
      Duel.ConfirmCards(1-tp,g)
      Duel.ShuffleHand(tp)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101107087.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Agent
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --SP sum itself
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,id)
      e1:SetCost(s.spcost)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --grave to hand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_TODECK)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,id+o)
      e2:SetTarget(s.g2htg)
      e2:SetOperation(s.g2hop)
      c:RegisterEffect(e2)
      end
      function s.spcostfilter(c)
      return c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
      end
      function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.IsExistingMatchingCard(s.spcostfilter,tp,LOCATION_HAND,0,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.spcostfilter,tp,LOCATION_HAND,0,1,1,c)
      Duel.ConfirmCards(1-tp,g)
      Duel.ShuffleHand(tp)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function s.g2hfilter(c)
      return c:IsSetCard(0x27d) and not c:IsCode(id) and c:IsAbleToHand()
      end
      function s.g2htg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.g2hfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.g2hfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,s.g2hfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,LOCATION_GRAVE)
      if g:GetFirst():IsType(TYPE_SPELL+TYPE_TRAP) then
      Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,0,LOCATION_HAND)
      end
      end
      function s.g2hop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0
      and tc:IsLocation(LOCATION_HAND) and tc:IsType(TYPE_SPELL+TYPE_TRAP) then
      Duel.ShuffleHand(tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,Card.IsAbleToDeck,tp,LOCATION_HAND,0,1,1,nil)
      if #g>0 then
      Duel.BreakEffect()
      Duel.SendtoDeck(g,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
      end
      end
      end
      script/c101107088.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Firestarter
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableReviveLimit()
      --Ritual mats
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_MATERIAL_CHECK)
      e1:SetValue(s.matcheck)
      c:RegisterEffect(e1)
      --cant destroy by eff
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(s.matcon)
      e2:SetValue(1)
      c:RegisterEffect(e2)
      --cant banish by eff
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetCode(EFFECT_CANNOT_REMOVE)
      e3:SetRange(LOCATION_MZONE)
      e3:SetTargetRange(1,1)
      e3:SetTarget(function(e,c,tp,r) return c==e:GetHandler() and r==REASON_EFFECT end)
      e3:SetCondition(s.matcon)
      c:RegisterEffect(e3)
      --buff atk/def
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e4:SetCode(EVENT_CHAINING)
      e4:SetRange(LOCATION_MZONE)
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetOperation(s.regop)
      c:RegisterEffect(e4)
      local e5=Effect.CreateEffect(c)
      e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e5:SetCode(EVENT_CHAIN_SOLVED)
      e5:SetRange(LOCATION_MZONE)
      e5:SetCondition(s.atkcon)
      e5:SetOperation(s.atkop)
      c:RegisterEffect(e5)
      end
      function s.matcheck(e,c)
      if c:GetMaterial():IsExists(Card.IsLocation,1,nil,LOCATION_MZONE) then
      local reset=RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD
      c:RegisterFlagEffect(id,reset,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0))
      end
      end
      function s.matcon(e)
      local c=e:GetHandler()
      return c:IsSummonType(SUMMON_TYPE_RITUAL) and c:GetFlagEffect(id)>0
      end
      function s.regop(e,tp,eg,ep,ev,re,r,rp)
      e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET+RESET_CHAIN,0,1)
      end
      function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return ep~=tp and c:GetAttack()<3000 and c:GetFlagEffect(id)~=0
      end
      function s.atkop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_CARD,0,id)
      local c=e:GetHandler()
      --buff stats
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetProperty(EFFECT_FLAG_COPY_INHERIT)
      e1:SetValue(200)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_UPDATE_DEFENSE)
      c:RegisterEffect(e2)
      end
      script/c101107089.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Doombroker
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableReviveLimit()
      --Ritual mats
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_MATERIAL_CHECK)
      e1:SetValue(s.matcheck)
      c:RegisterEffect(e1)
      --direct atk
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DIRECT_ATTACK)
      e2:SetCondition(s.matcon)
      c:RegisterEffect(e2)
      --set trap from deck
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,id)
      e3:SetTarget(s.settg)
      e3:SetOperation(s.setop)
      c:RegisterEffect(e3)
      --shuffle face-up opp monster to deck
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,2))
      e4:SetCategory(CATEGORY_TODECK)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e4:SetCode(EVENT_BATTLE_DAMAGE)
      e4:SetCountLimit(1,id+o)
      e4:SetCondition(function(e,tp,eg,ep) return ep==1-tp end)
      e4:SetTarget(s.f2dtg)
      e4:SetOperation(s.f2dop)
      c:RegisterEffect(e4)
      end
      function s.matcheck(e,c)
      if c:GetMaterial():IsExists(Card.IsLocation,1,nil,LOCATION_MZONE) then
      local reset=RESET_EVENT+RESETS_STANDARD-RESET_TOFIELD
      c:RegisterFlagEffect(id,reset,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(id,0))
      end
      end
      function s.matcon(e)
      local c=e:GetHandler()
      return c:IsSummonType(SUMMON_TYPE_RITUAL) and c:GetFlagEffect(id)>0
      end
      function s.setfilter(c)
      return c:IsSetCard(0x27d) and c:IsType(TYPE_TRAP) and c:IsSSetable()
      end
      function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK,0,1,nil) end
      end
      function s.setop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectMatchingCard(tp,s.setfilter,tp,LOCATION_DECK,0,1,1,nil)
      if #g>0 then
      Duel.SSet(tp,g)
      end
      end
      function s.f2dtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() and chkc:IsAbleToDeck() end
      if chk==0 then return Duel.IsExistingTarget(aux.AND(Card.IsFaceup,Card.IsAbleToDeck),tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,aux.AND(Card.IsFaceup,Card.IsAbleToDeck),tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
      end
      function s.f2dop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      end
      script/c101107090.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer First Appearance
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --add from deck to hand
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetOperation(s.op)
      c:RegisterEffect(e1)
      --Ritual sum
      local e2=Auxiliary.AddRitualProcGreater2(c,s.ritfilter,LOCATION_HAND)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_FZONE)
      c:RegisterEffect(e2)
      end
      function s.ritfilter(c)
      return c:IsSetCard(0x27d)
      end
      function s.d2hmatchfilter(c,cd)
      return c:IsFaceup() and c:IsCode(cd)
      end
      function s.d2hfilter(c,tp)
      return c:IsType(TYPE_MONSTER) and c:IsSetCard(0x27d) and c:IsAbleToHand()
      and not Duel.IsExistingMatchingCard(s.d2hmatchfilter,tp,LOCATION_ONFIELD,0,1,nil,c:GetCode())
      end
      function s.op(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(s.d2hfilter,tp,LOCATION_DECK,0,nil,tp)
      if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=g:Select(tp,1,1,nil)
      if #sg>0 then
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg)
      end
      end
      end
      script/c101107091.lua deleted 100644 → 0
      View file @ 0b70c895
      --Libromancer Intervention
      --Script by HKunogi
      local s,id,o=GetID()
      function s.initial_effect(c)
      --return from field to hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_DISABLE+CATEGORY_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_CHAINING)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(s.f2hcon)
      e1:SetTarget(s.f2htg)
      e1:SetOperation(s.f2hop)
      c:RegisterEffect(e1)
      end
      function s.f2hcon(e,tp,eg,ep,ev,re,r,rp)
      return ep~=tp and Duel.IsChainDisablable(ev)
      end
      function s.f2hfilter(c)
      return c:IsFaceup() and c:IsSetCard(0x27d) and c:IsType(TYPE_RITUAL) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function s.f2htg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.f2hfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.f2hfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
      local g=Duel.SelectTarget(tp,s.f2hfilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,#g,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
      end
      function s.spfilter(c,e,tp)
      return c:IsSetCard(0x27d) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.f2hop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SendtoHand(tc,nil,REASON_EFFECT)>0
      and tc:IsLocation(LOCATION_HAND) and Duel.NegateEffect(ev)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(aux.NecroValleyFilter(s.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp)
      and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
      if #sg>0 then
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      script/c11913700.lua deleted 100644 → 0
      View file @ 0b70c895
      --インスタント・ネオスペース
      function c11913700.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c11913700.target)
      e1:SetOperation(c11913700.operation)
      c:RegisterEffect(e1)
      --Equip limit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_EQUIP_LIMIT)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetValue(c11913700.eqlimit)
      c:RegisterEffect(e2)
      --equip effect
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_EQUIP)
      e3:SetCode(42015635)
      c:RegisterEffect(e3)
      --spsummon
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(11913700,0))
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
      e4:SetCode(EVENT_LEAVE_FIELD)
      e4:SetCondition(c11913700.spcon)
      e4:SetTarget(c11913700.sptg)
      e4:SetOperation(c11913700.spop)
      c:RegisterEffect(e4)
      end
      function c11913700.eqlimit(e,c)
      return c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
      end
      function c11913700.filter(c)
      return c:IsFaceup() and c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
      end
      function c11913700.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c11913700.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c11913700.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c11913700.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c11913700.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.Equip(tp,e:GetHandler(),tc)
      end
      end
      function c11913700.spcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=e:GetHandler():GetPreviousEquipTarget()
      return e:GetHandler():IsReason(REASON_LOST_TARGET) and not ec:IsLocation(LOCATION_ONFIELD+LOCATION_OVERLAY)
      end
      function c11913700.spfilter(c,e,tp)
      return c:IsCode(89943723) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c11913700.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c11913700.spfilter,tp,0x13,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,0x13)
      end
      function c11913700.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,aux.NecroValleyFilter(c11913700.spfilter),tp,0x13,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c14088859.lua deleted 100644 → 0
      View file @ 0b70c895
      --ネオス・フュージョン
      function c14088859.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(14088859,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c14088859.target)
      e1:SetOperation(c14088859.activate)
      c:RegisterEffect(e1)
      --destroy replace
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetCode(EFFECT_DESTROY_REPLACE)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetTarget(c14088859.reptg)
      e2:SetValue(c14088859.repval)
      e2:SetOperation(c14088859.repop)
      c:RegisterEffect(e2)
      --return replace
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EFFECT_SEND_REPLACE)
      e3:SetRange(LOCATION_GRAVE)
      e3:SetTarget(c14088859.reptg2)
      e3:SetOperation(c14088859.repop2)
      e3:SetValue(c14088859.repval2)
      c:RegisterEffect(e3)
      end
      function c14088859.filter1(c,e)
      return c:IsAbleToGrave() and not c:IsImmuneToEffect(e)
      end
      function c14088859.filter2(c,e,tp,m,chkf)
      return c.neos_fusion and aux.IsMaterialListCode(c,89943723)
      and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and c:CheckFusionMaterial(m,nil,chkf,true)
      end
      function c14088859.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local chkf=tp|0x200
      local mg=Duel.GetMatchingGroup(c14088859.filter1,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_DECK,0,nil,e)
      return Duel.IsExistingMatchingCard(c14088859.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg,chkf)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c14088859.activate(e,tp,eg,ep,ev,re,r,rp)
      local chkf=tp|0x200
      local mg=Duel.GetMatchingGroup(c14088859.filter1,tp,LOCATION_HAND+LOCATION_MZONE+LOCATION_DECK,0,nil,e)
      local sg=Duel.GetMatchingGroup(c14088859.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg,chkf)
      if sg:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local tg=sg:Select(tp,1,1,nil)
      local tc=tg:GetFirst()
      local mat=Duel.SelectFusionMaterial(tp,tc,mg,nil,chkf,true)
      Duel.SendtoGrave(mat,REASON_EFFECT)
      Duel.BreakEffect()
      Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
      end
      if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetTargetRange(1,0)
      Duel.RegisterEffect(e1,tp)
      end
      end
      function c14088859.repfilter(c,tp)
      return c:IsFaceup() and c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and c:IsType(TYPE_FUSION)
      and aux.IsMaterialListCode(c,89943723) and c:IsReason(REASON_EFFECT+REASON_BATTLE) and not c:IsReason(REASON_REPLACE)
      end
      function c14088859.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(c14088859.repfilter,1,nil,tp) end
      return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
      end
      function c14088859.repval(e,c)
      return c14088859.repfilter(c,e:GetHandlerPlayer())
      end
      function c14088859.repop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
      end
      function c14088859.repfilter2(c,tp,re)
      return c:IsControler(tp) and c:IsLocation(LOCATION_MZONE) and aux.IsMaterialListCode(c,89943723) and c:IsType(TYPE_FUSION)
      and c:GetDestination()==LOCATION_DECK and re:GetOwner()==c
      end
      function c14088859.reptg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return bit.band(r,REASON_EFFECT)~=0 and re
      and e:GetHandler():IsAbleToRemove() and eg:IsExists(c14088859.repfilter2,1,nil,tp,re) end
      if Duel.SelectEffectYesNo(tp,e:GetHandler(),aux.Stringid(14088859,1)) then
      return true
      else return false end
      end
      function c14088859.repop2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT)
      end
      function c14088859.repval2(e,c)
      return c:IsControler(e:GetHandlerPlayer()) and c:IsLocation(LOCATION_MZONE) and aux.IsMaterialListCode(c,89943723) and c:IsType(TYPE_FUSION)
      end
      script/c18302224.lua deleted 100644 → 0
      View file @ 0b70c895
      --リバース・オブ・ネオス
      function c18302224.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_DESTROYED)
      e1:SetCondition(c18302224.condition)
      e1:SetTarget(c18302224.target)
      e1:SetOperation(c18302224.activate)
      c:RegisterEffect(e1)
      end
      function c18302224.cfilter(c,tp)
      return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousControler(tp)
      and c:IsPreviousPosition(POS_FACEUP) and c:IsSetCard(0x9) and c:IsType(TYPE_FUSION)
      end
      function c18302224.condition(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c18302224.cfilter,1,nil,tp)
      end
      function c18302224.filter(c,e,tp)
      return c:IsCode(89943723) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c18302224.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c18302224.filter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function c18302224.activate(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,c18302224.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_ATTACK) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(1000)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EVENT_PHASE+PHASE_END)
      e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e2:SetOperation(c18302224.desop)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      e2:SetCountLimit(1)
      tc:RegisterEffect(e2,true)
      end
      Duel.SpecialSummonComplete()
      end
      function c18302224.desop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Destroy(e:GetHandler(),REASON_EFFECT)
      end
      script/c19394153.lua deleted 100644 → 0
      View file @ 0b70c895
      --フェザー・ショット
      function c19394153.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --multi atk
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCondition(c19394153.condition)
      e1:SetTarget(c19394153.target)
      e1:SetOperation(c19394153.operation)
      c:RegisterEffect(e1)
      end
      function c19394153.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsAbleToEnterBP()
      end
      function c19394153.filter(c)
      return c:IsFaceup() and c:IsCode(21844576)
      end
      function c19394153.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c19394153.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c19394153.filter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      local g=Duel.SelectTarget(tp,c19394153.filter,tp,LOCATION_MZONE,0,1,1,nil)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_ATTACK)
      e1:SetProperty(EFFECT_FLAG_OATH)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c19394153.ftarget)
      e1:SetLabel(g:GetFirst():GetFieldID())
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c19394153.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      local ct=Duel.GetFieldGroupCount(tp,LOCATION_MZONE,0)
      if ct>1 then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EXTRA_ATTACK)
      e1:SetValue(ct-1)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_CANNOT_DIRECT_ATTACK)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e2)
      end
      end
      end
      function c19394153.ftarget(e,c)
      return e:GetLabel()~=c:GetFieldID()
      end
      script/c22479888.lua deleted 100644 → 0
      View file @ 0b70c895
      --クレイ・チャージ
      function c22479888.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_BE_BATTLE_TARGET)
      e1:SetCondition(c22479888.condition)
      e1:SetTarget(c22479888.target)
      e1:SetOperation(c22479888.activate)
      c:RegisterEffect(e1)
      end
      function c22479888.condition(e,tp,eg,ep,ev,re,r,rp)
      local at=Duel.GetAttackTarget()
      return at:IsControler(tp) and at:IsCode(84327329)
      end
      function c22479888.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local a=Duel.GetAttacker()
      local at=Duel.GetAttackTarget()
      if chkc then return false end
      if chk==0 then return a:IsOnField() and a:IsCanBeEffectTarget(e)
      and at:IsOnField() and at:IsCanBeEffectTarget(e) end
      if at:IsFacedown() then
      Duel.ConfirmCards(1-tp,at)
      end
      local g=Group.FromCards(a,at)
      Duel.SetTargetCard(g)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,2,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,800)
      end
      function c22479888.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      if g:GetCount()==2 then
      Duel.Destroy(g,REASON_EFFECT)
      Duel.Damage(1-tp,800,REASON_EFFECT)
      end
      end
      script/c25090294.lua deleted 100644 → 0
      View file @ 0b70c895
      --ブルーメンブラット
      function c25090294.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCost(c25090294.cost)
      e1:SetTarget(c25090294.target)
      e1:SetOperation(c25090294.activate)
      c:RegisterEffect(e1)
      end
      function c25090294.costfilter(c,tp)
      return c:IsCode(62107981)
      and Duel.GetMZoneCount(tp,c)>0 and (c:IsControler(tp) or c:IsFaceup())
      end
      function c25090294.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      e:SetLabel(1)
      if chk==0 then return Duel.CheckReleaseGroup(tp,c25090294.costfilter,1,nil,tp) end
      local g=Duel.SelectReleaseGroup(tp,c25090294.costfilter,1,1,nil,tp)
      Duel.Release(g,REASON_COST)
      end
      function c25090294.filter(c,e,tp)
      return c:IsCode(51085303) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
      end
      function c25090294.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local res=e:GetLabel()==1 or Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      if chk==0 then
      e:SetLabel(0)
      return res and Duel.IsExistingMatchingCard(c25090294.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c25090294.activate(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,c25090294.filter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
      g:GetFirst():CompleteProcedure()
      end
      end
      script/c26509612.lua deleted 100644 → 0
      View file @ 0b70c895
      --アース・グラビティ
      function c26509612.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMING_BATTLE_START)
      e1:SetCondition(c26509612.condition)
      e1:SetTarget(c26509612.target)
      e1:SetOperation(c26509612.activate)
      c:RegisterEffect(e1)
      end
      function c26509612.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()~=tp and (Duel.GetCurrentPhase()>=PHASE_BATTLE_START and Duel.GetCurrentPhase()<=PHASE_BATTLE)
      end
      function c26509612.filter1(c)
      return c:IsFaceup() and c:IsCode(74711057)
      end
      function c26509612.filter2(c)
      return c:IsFaceup() and c:IsLevelBelow(4)
      end
      function c26509612.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c26509612.filter1,tp,LOCATION_MZONE,0,1,nil)
      and Duel.IsExistingMatchingCard(c26509612.filter2,tp,0,LOCATION_MZONE,1,nil) end
      end
      function c26509612.activate(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_MUST_ATTACK)
      e1:SetTargetRange(0,LOCATION_MZONE)
      e1:SetTarget(c26509612.attg)
      e1:SetReset(RESET_PHASE+PHASE_BATTLE)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_MUST_ATTACK_MONSTER)
      e2:SetValue(c26509612.atklimit)
      Duel.RegisterEffect(e2,tp)
      end
      function c26509612.attg(e,c)
      return c:IsLevelBelow(4)
      end
      function c26509612.atklimit(e,c)
      return c:IsCode(74711057)
      end
      script/c27191436.lua deleted 100644 → 0
      View file @ 0b70c895
      --バースト・リターン
      function c27191436.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCondition(c27191436.condition)
      e1:SetTarget(c27191436.target)
      e1:SetOperation(c27191436.activate)
      c:RegisterEffect(e1)
      end
      function c27191436.cfilter(c)
      return c:IsFaceup() and c:IsCode(58932615)
      end
      function c27191436.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c27191436.cfilter,tp,LOCATION_ONFIELD,0,1,nil)
      end
      function c27191436.filter(c)
      return c:IsFaceup() and c:IsSetCard(0x3008) and not c:IsCode(58932615) and c:IsAbleToHand()
      end
      function c27191436.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c27191436.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      local g=Duel.GetMatchingGroup(c27191436.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,g:GetCount(),0,0)
      end
      function c27191436.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c27191436.filter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      script/c29612557.lua deleted 100644 → 0
      View file @ 0b70c895
      --サイクロン・ブーメラン
      function c29612557.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c29612557.target)
      e1:SetOperation(c29612557.operation)
      c:RegisterEffect(e1)
      --Equip limit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_EQUIP_LIMIT)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetValue(c29612557.eqlimit)
      c:RegisterEffect(e2)
      --equip effect
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_EQUIP)
      e3:SetCode(EFFECT_UPDATE_ATTACK)
      e3:SetValue(500)
      c:RegisterEffect(e3)
      --destroy
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(29612557,0))
      e4:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_LEAVE_FIELD)
      e4:SetCondition(c29612557.descon)
      e4:SetTarget(c29612557.destg)
      e4:SetOperation(c29612557.desop)
      c:RegisterEffect(e4)
      end
      function c29612557.eqlimit(e,c)
      return c:IsCode(86188410)
      end
      function c29612557.filter(c)
      return c:IsFaceup() and c:IsCode(86188410)
      end
      function c29612557.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c29612557.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c29612557.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c29612557.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c29612557.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.Equip(tp,e:GetHandler(),tc)
      end
      end
      function c29612557.descon(e,tp,eg,ep,ev,re,r,rp)
      local ec=e:GetHandler():GetPreviousEquipTarget()
      return e:GetHandler():IsReason(REASON_LOST_TARGET) and ec:IsLocation(LOCATION_GRAVE)
      and bit.band(ec:GetReason(),0x41)==0x41
      end
      function c29612557.dfilter(c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP)
      end
      function c29612557.destg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      local g=Duel.GetMatchingGroup(c29612557.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,g:GetCount(),0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,g:GetCount()*100)
      end
      function c29612557.desop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c29612557.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      local ct=Duel.Destroy(g,REASON_EFFECT)
      Duel.Damage(1-tp,ct*100,REASON_EFFECT)
      end
      script/c35255456.lua deleted 100644 → 0
      View file @ 0b70c895
      --ミラクル・コンタクト
      function c35255456.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c35255456.target)
      e1:SetOperation(c35255456.activate)
      c:RegisterEffect(e1)
      end
      function c35255456.filter1(c,e)
      return c:IsAbleToDeck() and not c:IsImmuneToEffect(e)
      end
      function c35255456.filter2(c,e,tp,m,chkf)
      return c:IsSetCard(0x3008) and c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
      and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and c:CheckFusionMaterial(m,nil,chkf,true)
      end
      function c35255456.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local chkf=tp|0x200
      local mg=Duel.GetMatchingGroup(c35255456.filter1,tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,nil,e)
      return Duel.IsExistingMatchingCard(c35255456.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg,chkf)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c35255456.cffilter(c)
      return c:IsLocation(LOCATION_HAND) or (c:IsLocation(LOCATION_MZONE) and c:IsFacedown())
      end
      function c35255456.activate(e,tp,eg,ep,ev,re,r,rp)
      local chkf=tp|0x200
      local mg=Duel.GetMatchingGroup(aux.NecroValleyFilter(c35255456.filter1),tp,LOCATION_HAND+LOCATION_GRAVE+LOCATION_MZONE,0,nil,e)
      local sg=Duel.GetMatchingGroup(c35255456.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg,chkf)
      if sg:GetCount()>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local tg=sg:Select(tp,1,1,nil)
      local tc=tg:GetFirst()
      local mat=Duel.SelectFusionMaterial(tp,tc,mg,nil,chkf,true)
      local cf=mat:Filter(c35255456.cffilter,nil)
      if cf:GetCount()>0 then
      Duel.ConfirmCards(1-tp,cf)
      end
      Duel.SendtoDeck(mat,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
      end
      end
      script/c41933425.lua deleted 100644 → 0
      View file @ 0b70c895
      --コンタクト・ゲート
      function c41933425.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,41933425+EFFECT_COUNT_CODE_OATH)
      e1:SetCost(c41933425.cost)
      e1:SetTarget(c41933425.target)
      e1:SetOperation(c41933425.activate)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(41933425,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_TO_DECK)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCondition(c41933425.spcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c41933425.sptg)
      e2:SetOperation(c41933425.spop)
      c:RegisterEffect(e2)
      end
      function c41933425.cfilter1(c,e,tp)
      return c:IsSetCard(0x1f) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
      and Duel.IsExistingMatchingCard(c41933425.cfilter2,tp,LOCATION_GRAVE,0,1,c,e,tp,c)
      end
      function c41933425.cfilter2(c,e,tp,tc)
      if c:IsCode(tc:GetCode()) then return false end
      local sg=Group.FromCards(tc,c)
      local g=Duel.GetMatchingGroup(c41933425.spfilter1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,sg,e,tp)
      return c:IsSetCard(0x1f) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost() and g:GetClassCount(Card.GetCode)>1
      end
      function c41933425.spfilter1(c,e,tp)
      return c:IsSetCard(0x1f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c41933425.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c41933425.cfilter1,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g1=Duel.SelectMatchingCard(tp,c41933425.cfilter1,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g2=Duel.SelectMatchingCard(tp,c41933425.cfilter2,tp,LOCATION_GRAVE,0,1,1,g1:GetFirst(),e,tp,g1:GetFirst())
      g1:Merge(g2)
      Duel.Remove(g1,POS_FACEUP,REASON_COST)
      end
      function c41933425.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(c41933425.spfilter1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,nil,e,tp)
      if chk==0 then return not Duel.IsPlayerAffectedByEffect(tp,59822133)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>1 and g:GetClassCount(Card.GetCode)>1 end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE)
      end
      function c41933425.activate(e,tp,eg,ep,ev,re,r,rp)
      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(c41933425.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      if Duel.IsPlayerAffectedByEffect(tp,59822133) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=1 then return end
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c41933425.spfilter1),tp,LOCATION_HAND+LOCATION_DECK+LOCATION_GRAVE,0,nil,e,tp)
      if g:GetClassCount(Card.GetCode)>1 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg1=g:SelectSubGroup(tp,aux.dncheck,false,2,2)
      Duel.SpecialSummon(sg1,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c41933425.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return not c:IsType(TYPE_FUSION) and c:IsLocation(LOCATION_EXTRA)
      end
      function c41933425.confilter(c,tp)
      return c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723) and c:IsPreviousLocation(LOCATION_MZONE)
      and c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp) and c:IsLocation(LOCATION_EXTRA)
      end
      function c41933425.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c41933425.confilter,1,nil,tp)
      end
      function c41933425.spfilter2(c,e,tp)
      return c:IsFaceup() and c:IsSetCard(0x1f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c41933425.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c41933425.spfilter2,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_REMOVED)
      end
      function c41933425.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,c41933425.spfilter2,tp,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
      script/c42015635.lua deleted 100644 → 0
      View file @ 0b70c895
      --ネオスペース
      function c42015635.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --Atk
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetRange(LOCATION_FZONE)
      e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      e2:SetTarget(c42015635.atktg)
      e2:SetValue(500)
      c:RegisterEffect(e2)
      --may not return
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetCode(42015635)
      e3:SetRange(LOCATION_FZONE)
      e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      c:RegisterEffect(e3)
      end
      function c42015635.atktg(e,c)
      return c:IsCode(89943723) or c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
      end
      script/c47274077.lua deleted 100644 → 0
      View file @ 0b70c895
      --ネオス・フォース
      function c47274077.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c47274077.target)
      e1:SetOperation(c47274077.operation)
      c:RegisterEffect(e1)
      --atk
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_EQUIP)
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetValue(800)
      c:RegisterEffect(e2)
      --Equip limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_EQUIP_LIMIT)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e3:SetValue(c47274077.eqlimit)
      c:RegisterEffect(e3)
      --damage
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(47274077,0))
      e4:SetCategory(CATEGORY_DAMAGE)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_BATTLE_DESTROYING)
      e4:SetRange(LOCATION_SZONE)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCondition(c47274077.damcon)
      e4:SetTarget(c47274077.damtg)
      e4:SetOperation(c47274077.damop)
      c:RegisterEffect(e4)
      --return
      local e5=Effect.CreateEffect(c)
      e5:SetDescription(aux.Stringid(47274077,1))
      e5:SetCategory(CATEGORY_TODECK)
      e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
      e5:SetCode(EVENT_PHASE+PHASE_END)
      e5:SetRange(LOCATION_SZONE)
      e5:SetCountLimit(1)
      e5:SetTarget(c47274077.rettg)
      e5:SetOperation(c47274077.retop)
      c:RegisterEffect(e5)
      end
      function c47274077.eqlimit(e,c)
      return c:IsCode(89943723)
      end
      function c47274077.filter(c)
      return c:IsFaceup() and c:IsCode(89943723)
      end
      function c47274077.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c47274077.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c47274077.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c47274077.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c47274077.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.Equip(tp,e:GetHandler(),tc)
      end
      end
      function c47274077.damcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=eg:GetFirst()
      local bc=ec:GetBattleTarget()
      return ec==e:GetHandler():GetEquipTarget() and bc:IsLocation(LOCATION_GRAVE) and bc:IsReason(REASON_BATTLE)
      end
      function c47274077.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      local ec=eg:GetFirst()
      local bc=ec:GetBattleTarget()
      local dam=bc:GetAttack()
      Duel.SetTargetPlayer(1-tp)
      Duel.SetTargetParam(dam)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
      end
      function c47274077.damop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Damage(p,d,REASON_EFFECT)
      end
      function c47274077.rettg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_TODECK,e:GetHandler(),1,0,0)
      end
      function c47274077.retop(e,tp,eg,ep,ev,re,r,rp)
      Duel.SendtoDeck(e:GetHandler(),nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      script/c52098461.lua deleted 100644 → 0
      View file @ 0b70c895
      --ラス・オブ・ネオス
      function c52098461.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_TODECK+CATEGORY_DESTROY)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c52098461.target)
      e1:SetOperation(c52098461.activate)
      c:RegisterEffect(e1)
      end
      function c52098461.filter(c)
      return c:IsFaceup() and c:IsCode(89943723) and c:IsAbleToDeck()
      end
      function c52098461.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c52098461.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c52098461.filter,tp,LOCATION_MZONE,0,1,nil)
      and Duel.IsExistingMatchingCard(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,2,e:GetHandler()) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,c52098461.filter,tp,LOCATION_MZONE,0,1,1,nil)
      local dg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,e:GetHandler())
      dg:RemoveCard(g:GetFirst())
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,dg,dg:GetCount(),0,0)
      end
      function c52098461.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and c52098461.filter(tc)
      and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_DECK) then
      local g=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e))
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      script/c53586134.lua deleted 100644 → 0
      View file @ 0b70c895
      --バブル・ショット
      function c53586134.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c53586134.target)
      e1:SetOperation(c53586134.operation)
      c:RegisterEffect(e1)
      --Equip limit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_EQUIP_LIMIT)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetValue(c53586134.eqlimit)
      c:RegisterEffect(e2)
      --equip effect
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_EQUIP)
      e3:SetCode(EFFECT_UPDATE_ATTACK)
      e3:SetValue(800)
      c:RegisterEffect(e3)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_EQUIP)
      e4:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e4:SetCode(EFFECT_DESTROY_SUBSTITUTE)
      e4:SetValue(c53586134.repval)
      c:RegisterEffect(e4)
      local e5=Effect.CreateEffect(c)
      e5:SetType(EFFECT_TYPE_EQUIP)
      e5:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
      e5:SetValue(1)
      c:RegisterEffect(e5)
      end
      function c53586134.eqlimit(e,c)
      return c:IsCode(79979666)
      end
      function c53586134.filter(c)
      return c:IsFaceup() and c:IsCode(79979666)
      end
      function c53586134.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c53586134.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c53586134.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c53586134.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c53586134.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.Equip(tp,e:GetHandler(),tc)
      end
      end
      function c53586134.repval(e,re,r,rp)
      return bit.band(r,REASON_BATTLE)~=0
      end
      script/c61968753.lua deleted 100644 → 0
      View file @ 0b70c895
      --バブル・シャッフル
      function c61968753.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --pos
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_POSITION+CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c61968753.postg)
      e1:SetOperation(c61968753.posop)
      c:RegisterEffect(e1)
      end
      function c61968753.filter1(c)
      return c:IsPosition(POS_FACEUP_ATTACK) and c:IsCanChangePosition() and c:IsCode(79979666) and c:IsReleasableByEffect()
      end
      function c61968753.filter2(c)
      return c:IsPosition(POS_FACEUP_ATTACK) and c:IsCanChangePosition()
      end
      function c61968753.spfilter(c,e,tp)
      return c:IsSetCard(0x3008) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c61968753.postg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(c61968753.filter1,tp,LOCATION_MZONE,0,1,nil)
      and Duel.IsExistingTarget(c61968753.filter2,tp,0,LOCATION_MZONE,1,nil)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>-1
      and Duel.IsExistingMatchingCard(c61968753.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g1=Duel.SelectTarget(tp,c61968753.filter1,tp,LOCATION_MZONE,0,1,1,nil)
      e:SetLabelObject(g1:GetFirst())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g2=Duel.SelectTarget(tp,c61968753.filter2,tp,0,LOCATION_MZONE,1,1,nil)
      g1:Merge(g2)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g1,2,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c61968753.pfilter(c,e)
      return c:IsPosition(POS_FACEUP_ATTACK) and c:IsRelateToEffect(e)
      end
      function c61968753.posop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(c61968753.pfilter,nil,e)
      if g:GetCount()==2 and Duel.ChangePosition(g,POS_FACEUP_DEFENSE)~=0 then
      local tc=e:GetLabelObject()
      if not tc:IsImmuneToEffect(e) and tc:IsReleasableByEffect() then
      Duel.BreakEffect()
      if Duel.Release(tc,REASON_EFFECT)==0 or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,c61968753.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if sg:GetCount()>0 then
      Duel.BreakEffect()
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      end
      script/c71060915.lua deleted 100644 → 0
      View file @ 0b70c895
      --フェザー・ウィンド
      function c71060915.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_CHAINING)
      e1:SetCondition(c71060915.condition)
      e1:SetTarget(c71060915.target)
      e1:SetOperation(c71060915.activate)
      c:RegisterEffect(e1)
      end
      function c71060915.filter(c)
      return c:IsFaceup() and c:IsCode(21844576)
      end
      function c71060915.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c71060915.filter,tp,LOCATION_ONFIELD,0,1,nil)
      and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
      end
      function c71060915.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
      if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
      end
      end
      function c71060915.activate(e,tp,eg,ep,ev,re,r,rp)
      if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
      Duel.Destroy(eg,REASON_EFFECT)
      end
      end
      script/c73239437.lua deleted 100644 → 0
      View file @ 0b70c895
      --ダブルヒーローアタック
      function c73239437.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,73239437+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c73239437.condition)
      e1:SetTarget(c73239437.target)
      e1:SetOperation(c73239437.activate)
      c:RegisterEffect(e1)
      end
      function c73239437.cfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,89943723)
      end
      function c73239437.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c73239437.cfilter,tp,LOCATION_MZONE,0,1,nil)
      end
      function c73239437.filter(c,e,tp)
      return c:IsSetCard(0x8) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
      end
      function c73239437.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c73239437.filter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c73239437.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c73239437.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c73239437.activate(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SpecialSummon(tc,0,tp,tp,true,false,POS_FACEUP)
      end
      end
      script/c74414885.lua deleted 100644 → 0
      View file @ 0b70c895
      --NEXT
      function c74414885.initial_effect(c)
      aux.AddCodeList(c,89943723)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,74414885+EFFECT_COUNT_CODE_OATH)
      e1:SetTarget(c74414885.target)
      e1:SetOperation(c74414885.activate)
      c:RegisterEffect(e1)
      --act in hand
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
      e2:SetCondition(c74414885.handcon)
      c:RegisterEffect(e2)
      end
      function c74414885.filter(c,e,tp)
      return (c:IsCode(89943723) or c:IsSetCard(0x1f)) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c74414885.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c74414885.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 c74414885.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft<=0 then return end
      if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c74414885.filter),tp,LOCATION_HAND+LOCATION_GRAVE,0,nil,e,tp)
      if g:GetCount()==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:SelectSubGroup(tp,aux.dncheck,false,1,ft)
      for tc in aux.Next(sg) do
      Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1,true)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e2,true)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e3:SetRange(LOCATION_MZONE)
      e3:SetAbsoluteRange(tp,1,0)
      e3:SetTarget(c74414885.splimit)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e3,true)
      end
      Duel.SpecialSummonComplete()
      end
      function c74414885.splimit(e,c)
      return not c:IsType(TYPE_FUSION) and c:IsLocation(LOCATION_EXTRA)
      end
      function c74414885.handcon(e)
      return Duel.GetFieldGroupCount(e:GetHandlerPlayer(),LOCATION_ONFIELD,0)==0
      end
      script/c80075749.lua deleted 100644 → 0
      View file @ 0b70c895
      --バブルイリュージョン
      function c80075749.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCondition(c80075749.condition)
      e1:SetOperation(c80075749.activate)
      c:RegisterEffect(e1)
      end
      function c80075749.filter(c)
      return c:IsFaceup() and c:IsCode(79979666)
      end
      function c80075749.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c80075749.filter,tp,LOCATION_MZONE,0,1,nil)
      end
      function c80075749.activate(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_TRAP_ACT_IN_HAND)
      e1:SetTargetRange(LOCATION_HAND,0)
      e1:SetCountLimit(1,80075749)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      script/c84361420.lua deleted 100644 → 0
      View file @ 0b70c895
      --エッジ・ハンマー
      function c84361420.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_DAMAGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCost(c84361420.cost)
      e1:SetTarget(c84361420.target)
      e1:SetOperation(c84361420.activate)
      c:RegisterEffect(e1)
      end
      function c84361420.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.CheckReleaseGroup(tp,Card.IsCode,1,nil,59793705) end
      local g=Duel.SelectReleaseGroup(tp,Card.IsCode,1,1,nil,59793705)
      Duel.Release(g,REASON_COST)
      end
      function c84361420.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(1-tp) end
      if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,0,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,aux.TRUE,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,0)
      end
      function c84361420.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      local atk=tc:GetAttack()
      if Duel.Destroy(tc,REASON_EFFECT)>0 then
      local dam=tc:GetBaseAttack()
      Duel.Damage(1-tp,dam,REASON_EFFECT)
      end
      end
      end
      script/c97362768.lua deleted 100644 → 0
      View file @ 0b70c895
      --スパークガン
      function c97362768.initial_effect(c)
      aux.AddSetNameMonsterList(c,0x3008)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_CONTINUOUS_TARGET)
      e1:SetTarget(c97362768.target)
      e1:SetOperation(c97362768.operation)
      c:RegisterEffect(e1)
      --Equip limit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_EQUIP_LIMIT)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetValue(c97362768.eqlimit)
      c:RegisterEffect(e2)
      --pos
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(97362768,0))
      e3:SetCategory(CATEGORY_POSITION)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_SZONE)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCost(c97362768.poscost)
      e3:SetTarget(c97362768.postg)
      e3:SetOperation(c97362768.posop)
      c:RegisterEffect(e3)
      --self destroy
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetCode(EVENT_CHAIN_SOLVED)
      e4:SetRange(LOCATION_SZONE)
      e4:SetOperation(c97362768.sdesop)
      c:RegisterEffect(e4)
      end
      function c97362768.eqlimit(e,c)
      return c:IsCode(20721928)
      end
      function c97362768.filter(c)
      return c:IsFaceup() and c:IsCode(20721928)
      end
      function c97362768.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c97362768.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c97362768.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c97362768.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c97362768.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.Equip(tp,e:GetHandler(),tc)
      end
      end
      function c97362768.poscost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      e:GetHandler():RegisterFlagEffect(97362768,RESET_EVENT+RESETS_STANDARD,0,0)
      end
      function c97362768.posfilter(c)
      return c:IsFaceup() and c:IsCanChangePosition()
      end
      function c97362768.postg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c97362768.posfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c97362768.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_POSCHANGE)
      local g=Duel.SelectTarget(tp,c97362768.posfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_POSITION,g,1,0,0)
      end
      function c97362768.posop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if e:GetHandler():IsRelateToEffect(e) and tc:IsRelateToEffect(e) and tc:IsFaceup() then
      Duel.ChangePosition(tc,POS_FACEUP_DEFENSE,0,POS_FACEUP_ATTACK,0)
      end
      end
      function c97362768.sdesop(e,tp,eg,ep,ev,re,r,rp)
      if e:GetHandler():GetFlagEffect(97362768)==3 then
      Duel.Destroy(e:GetHandler(),REASON_RULE)
      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