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
      Expand all Hide 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 @@
      100418036
      100288001
      100288002
      100200215
      100418201
      100418202
      100418203
      ......@@ -40,15 +39,3 @@
      100418209
      100418210
      !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
      !counter 0x15f 指示物（逐渐削减的生命）
      !counter 0x161 指示物（命运的囚人）
      !setname 0x27c 群豪 ヴァリアンツ
      !setname 0x27d 漫读使灵 Libromancer
      !setname 0x27e 神碑 神碑
      !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
      This diff is collapsed.
      script/c80075749.lua deleted 100644 → 0
      View file @ 0b70c895
      This diff is collapsed.
      script/c84361420.lua deleted 100644 → 0
      View file @ 0b70c895
      This diff is collapsed.
      script/c97362768.lua deleted 100644 → 0
      View file @ 0b70c895
      This diff is collapsed.
      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