Skip to content

Y
ygopro-pre-data
Commit 95057a19 authored by mercury233's avatar mercury233
Browse files
Options

rm & update

parent e38d2b74
Pipeline #20143 passed with stages
      in 36 seconds
      Show whitespace changes
      Inline Side-by-side
      Showing with 46 additions and 7664 deletions
      deck/23-01-14 CYAC(1112).ydk deleted 100644 → 0
      View file @ e38d2b74
      #created by ...
      #main
      101112001
      101112002
      101112003
      101112004
      101112005
      101112006
      101112007
      101112008
      101112009
      101112010
      101112011
      101112012
      101112013
      101112014
      101112015
      101112016
      101112017
      101112018
      101112019
      101112020
      101112021
      101112022
      101112023
      101112024
      101112025
      101112026
      101112027
      101112028
      101112029
      101112030
      101112031
      101112032
      101112033
      101112051
      101112052
      101112053
      101112054
      101112055
      101112056
      101112057
      101112058
      101112059
      101112060
      101112061
      101112062
      101112063
      101112064
      101112065
      101112066
      101112067
      101112068
      #extra
      101112034
      101112035
      101112036
      101112037
      101112038
      101112039
      101112040
      101112041
      101112042
      101112043
      101112044
      101112045
      101112046
      101112047
      101112048
      !side
      101112049
      101112050
      101112069
      101112070
      101112071
      101112072
      101112073
      101112074
      101112075
      101112076
      101112077
      101112078
      101112079
      101112080
      deck/22-01-24 new cards.ydk → deck/23-02-12 new cards.ydk
      View file @ 95057a19
      #created by ...
      #main
      100200229
      100200230
      #extra
      !side
      101111201
      expansions/pre-strings.conf
      View file @ 95057a19
      #The first line is used for comment
      !counter 0x1162 兔耳指示物
      !counter 0x163 指示物（推荐捏军贯）
      !setname 0x1162 大钢琴之七音服 グランドレミコード
      !setname 0x28f 防火 ファイアウォール
      !setname 0x290 黄金荣耀 Gold Pride
      !setname 0x291 末那愚子族 マナドゥム
      !setname 0x292 妮穆蕾莉娅 ネムレリア
      !setname 0x293 新式魔厨 ヌーベルズ
      !setname 0x294 食谱 レシピ
      !setname 0x295 至爱 フェイバリット
      script/c100200229.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重武者ドウC－N
      --Script by 奥克斯
      function c100200229.initial_effect(c)
      --to hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(100200229,0))
      e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,100200229)
      e1:SetTarget(c100200229.thtg)
      e1:SetOperation(c100200229.thop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(100200229,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,100200229+100)
      e3:SetCondition(c100200229.spcon)
      e3:SetCost(c100200229.spcost)
      e3:SetTarget(c100200229.sptg)
      e3:SetOperation(c100200229.spop)
      c:RegisterEffect(e3)
      end
      function c100200229.thfilter(c)
      return c:IsFaceup() and c:IsRace(RACE_MACHINE) and c:IsType(TYPE_PENDULUM) and c:IsAbleToHand()
      end
      function c100200229.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100200229.thfilter,tp,LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA)
      end
      function c100200229.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c100200229.thfilter,tp,LOCATION_EXTRA,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      end
      function c100200229.spcon(e,tp,eg,ep,ev,re,r,rp)
      return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c100200229.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsReleasable() and Duel.GetMZoneCount(tp,c)>0 end
      Duel.Release(c,REASON_COST)
      end
      function c100200229.spfilter(c,e,tp)
      return c:IsAttackBelow(1500) and c:IsRace(RACE_MACHINE) and c:IsAttribute(ATTRIBUTE_EARTH)
      and not c:IsCode(100200229) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c100200229.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c100200229.spfilter,tp,LOCATION_HAND+LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_GRAVE)
      end
      function c100200229.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetMZoneCount(tp)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c100200229.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      script/c100200230.lua 0 → 100644
      View file @ 95057a19
      --Saincred Magician
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --flip
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_FLIP+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      end
      function s.thfilter(c)
      return c:IsType(TYPE_SPELL) and c:IsAbleToHand()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.thfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function s.spfilter(c,e,tp)
      return c:IsCode(31560081,id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEDOWN_DEFENSE)
      end
      function s.operation(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) then
      local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and #g>0
      and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      Duel.BreakEffect()
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEDOWN_DEFENSE)
      Duel.ConfirmCards(1-tp,sg)
      end
      end
      end
      script/c101112001.lua deleted 100644 → 0
      View file @ e38d2b74
      --ファイアウォール・ディフェンサー
      --Script by 奥克斯
      function c101112001.initial_effect(c)
      --Special Summon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_BE_MATERIAL)
      e1:SetCountLimit(1,101112001)
      e1:SetCondition(c101112001.spcon)
      e1:SetCost(c101112001.spcost)
      e1:SetTarget(c101112001.sptg)
      e1:SetOperation(c101112001.spop)
      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:SetCountLimit(1,101112001+100)
      e2:SetTarget(c101112001.reptg)
      e2:SetValue(c101112001.repval)
      e2:SetOperation(c101112001.repop)
      c:RegisterEffect(e2)
      --
      Duel.AddCustomActivityCounter(101112001,ACTIVITY_SPSUMMON,c101112001.counterfilter)
      end
      function c101112001.counterfilter(c)
      return c:IsRace(RACE_CYBERSE)
      end
      function c101112001.spcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local rc=c:GetReasonCard()
      return c:IsLocation(LOCATION_GRAVE) and r==REASON_LINK and rc:IsRace(RACE_CYBERSE)
      end
      function c101112001.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(101112001,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(c101112001.splimit)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112001.splimit(e,c)
      return not c:IsRace(RACE_CYBERSE)
      end
      function c101112001.spfilter(c,e,tp)
      return not c:IsCode(101112001) and c:IsSetCard(0x28f) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112001.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112001.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function c101112001.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c101112001.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      if #g>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c101112001.repfilter(c,tp)
      return not c:IsReason(REASON_REPLACE) and c:IsFaceup() and c:IsSetCard(0x28f) and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsReason(REASON_EFFECT)
      end
      function c101112001.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(c101112001.repfilter,1,nil,tp) end
      return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
      end
      function c101112001.repval(e,c)
      return c101112001.repfilter(c,e:GetHandlerPlayer())
      end
      function c101112001.repop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
      end
      script/c101112002.lua deleted 100644 → 0
      View file @ e38d2b74
      --ファイアウォール・ファントム
      --Script by 奥克斯
      function c101112002.initial_effect(c)
      --Search
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_HANDES)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_BE_MATERIAL)
      e1:SetCountLimit(1,101112002)
      e1:SetCondition(c101112002.thcon)
      e1:SetTarget(c101112002.thtg)
      e1:SetOperation(c101112002.thop)
      c:RegisterEffect(e1)
      --to deck
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_GRAVE_ACTION)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,101112002+100)
      e2:SetCost(aux.bfgcost)
      e2:SetOperation(c101112002.op)
      c:RegisterEffect(e2)
      end
      function c101112002.thcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local rc=c:GetReasonCard()
      return c:IsLocation(LOCATION_GRAVE) and r==REASON_LINK and rc:IsRace(RACE_CYBERSE)
      end
      function c101112002.thfilter(c)
      return c:IsSetCard(0x118) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToHand()
      end
      function c101112002.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112002.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,1)
      end
      function c101112002.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112002.thfilter,tp,LOCATION_DECK,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)
      Duel.BreakEffect()
      Duel.ShuffleHand(tp)
      Duel.DiscardHand(tp,aux.TRUE,1,1,REASON_EFFECT+REASON_DISCARD,nil)
      end
      end
      function c101112002.op(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetCountLimit(1)
      e1:SetCondition(c101112002.tdcon)
      e1:SetOperation(c101112002.tdop)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112002.tdfilter(c)
      return c:IsRace(RACE_CYBERSE) and c:IsAbleToDeck()
      end
      function c101112002.tdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c101112002.tdfilter,tp,LOCATION_GRAVE,0,1,nil)
      end
      function c101112002.tdop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_CARD,0,101112002)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(c101112002.tdfilter),tp,LOCATION_GRAVE,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.HintSelection(g)
      Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      end
      script/c101112003.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重武者バイ－Q
      --Script by 奥克斯
      function c101112003.initial_effect(c)
      --search S/T
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112003,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112003)
      e1:SetCondition(c101112003.condition)
      e1:SetCost(c101112003.cost)
      e1:SetTarget(c101112003.target)
      e1:SetOperation(c101112003.operation)
      c:RegisterEffect(e1)
      --level up
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112003,1))
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1)
      e2:SetTarget(c101112003.lvtg)
      e2:SetOperation(c101112003.lvop)
      c:RegisterEffect(e2)
      end
      function c101112003.condition(e,tp,eg,ep,ev,re,r,rp)
      return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c101112003.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsDiscardable() end
      Duel.SendtoGrave(c,REASON_COST+REASON_DISCARD)
      end
      function c101112003.filter(c)
      return not c:IsCode(101112003) and c:IsSetCard(0x9a) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c101112003.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112003.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112003.operation(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local tg=Duel.SelectMatchingCard(tp,c101112003.filter,tp,LOCATION_DECK,0,1,1,nil)
      if tg:GetCount()>0 then
      Duel.SendtoHand(tg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,tg)
      end
      end
      function c101112003.lvfilter(c)
      return c:IsFaceup() and c:IsRace(RACE_MACHINE) and c:GetLevel()>0
      end
      function c101112003.lvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101112003.lvfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112003.lvfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c101112003.lvfilter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function c101112003.lvop(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:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_UPDATE_LEVEL)
      e1:SetValue(2)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      end
      \ No newline at end of file
      script/c101112004.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重武者オン－32
      --Script by 奥克斯
      function c101112004.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112004+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112004.spcon)
      c:RegisterEffect(e1)
      --set
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,101112004+100)
      e2:SetHintTiming(0,TIMING_END_PHASE)
      e2:SetCondition(c101112004.setcon)
      e2:SetCost(c101112004.setcost)
      e2:SetTarget(c101112004.settg)
      e2:SetOperation(c101112004.setop)
      c:RegisterEffect(e2)
      end
      function c101112004.setcon(e,tp,eg,ep,ev,re,r,rp)
      return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c101112004.spcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return c101112004.setcon(e,tp) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      end
      function c101112004.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsReleasable() end
      Duel.Release(c,REASON_COST)
      end
      function c101112004.setfilter(c)
      return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
      end
      function c101112004.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(1-tp) and chkc:IsLocation(LOCATION_GRAVE) and c101112004.setfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112004.setfilter,tp,0,LOCATION_GRAVE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectTarget(tp,c101112004.setfilter,tp,0,LOCATION_GRAVE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
      end
      function c101112004.setop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SSet(tp,tc)~=0 then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
      e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
      e1:SetValue(LOCATION_REMOVED)
      tc:RegisterEffect(e1,true)
      end
      end
      script/c101112005.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重武者装留ガイア・ブースター
      --Script by 奥克斯
      function c101112005.initial_effect(c)
      --equip
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112005,0))
      e1:SetCategory(CATEGORY_EQUIP)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetRange(LOCATION_HAND+LOCATION_MZONE)
      e1:SetTarget(c101112005.eqtg)
      e1:SetOperation(c101112005.eqop)
      c:RegisterEffect(e1)
      end
      function c101112005.filter(c)
      return c:IsFaceup() and c:IsSetCard(0x9a)
      end
      function c101112005.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and chkc~=c and c101112005.filter(chkc) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
      and Duel.IsExistingTarget(c101112005.filter,tp,LOCATION_MZONE,0,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,c101112005.filter,tp,LOCATION_MZONE,0,1,1,c)
      end
      function c101112005.eqop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) then return end
      local tc=Duel.GetFirstTarget()
      if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or tc:IsFacedown() or not tc:IsRelateToEffect(e) or not tc:IsControler(tp) then
      Duel.SendtoGrave(c,REASON_EFFECT)
      return
      end
      if not Duel.Equip(tp,c,tc) then return end
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EQUIP_LIMIT)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(c101112005.eqlimit)
      e1:SetLabelObject(tc)
      c:RegisterEffect(e1)
      --tuner
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_EQUIP)
      e2:SetCode(EFFECT_ADD_TYPE)
      e2:SetValue(TYPE_TUNER)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCountLimit(1,101112005)
      e3:SetCondition(c101112005.spcon)
      e3:SetTarget(c101112005.sptg)
      e3:SetOperation(c101112005.spop)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e3)
      end
      function c101112005.eqlimit(e,c)
      return c==e:GetLabelObject()
      end
      function c101112005.spcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=e:GetHandler():GetEquipTarget()
      return ec and not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c101112005.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 c101112005.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) then return end
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      \ No newline at end of file
      script/c101112006.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重神童ワカ－U4
      --Script by 奥克斯
      function c101112006.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --move pendulum
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112006,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCountLimit(1,101112006)
      e1:SetCondition(c101112006.spcon)
      e1:SetTarget(c101112006.pctg)
      e1:SetOperation(c101112006.pcop)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112006,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,101112006+100)
      e2:SetCondition(c101112006.spcon)
      e2:SetCost(c101112006.spcost)
      e2:SetTarget(c101112006.sptg)
      e2:SetOperation(c101112006.spop)
      c:RegisterEffect(e2)
      --move
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_BE_MATERIAL)
      e3:SetCountLimit(1,101112006+200)
      e3:SetCondition(c101112006.pencon)
      e3:SetTarget(c101112006.pentg)
      e3:SetOperation(c101112006.penop)
      c:RegisterEffect(e3)
      end
      function c101112006.spcon(e,tp,eg,ep,ev,re,r,rp)
      return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c101112006.pcfilter(c,tp)
      return not c:IsCode(101112006) and c:IsSetCard(0x9a) and c:IsType(TYPE_PENDULUM)
      and not c:IsForbidden() and c:CheckUniqueOnField(tp,LOCATION_SZONE)
      end
      function c101112006.pctg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
      and Duel.IsExistingMatchingCard(c101112006.pcfilter,tp,LOCATION_DECK,0,1,nil,tp)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and c:IsCanBeSpecialSummoned(e,0,tp,false,false) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
      end
      function c101112006.pcop(e,tp,eg,ep,ev,re,r,rp)
      if not Duel.CheckLocation(tp,LOCATION_PZONE,0) and not Duel.CheckLocation(tp,LOCATION_PZONE,1) then return end
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
      local g=Duel.SelectMatchingCard(tp,c101112006.pcfilter,tp,LOCATION_DECK,0,1,1,nil,tp)
      if #g==0 or not Duel.MoveToField(g:GetFirst(),tp,tp,LOCATION_PZONE,POS_FACEUP,true) then return end
      if not c:IsRelateToEffect(e) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.BreakEffect()
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      function c101112006.costfilter(c,e,tp)
      return c:IsType(TYPE_MONSTER) and c:IsDiscardable()
      and Duel.IsExistingMatchingCard(c101112006.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,c,e,tp)
      end
      function c101112006.spfilter(c,e,tp)
      return c:IsSetCard(0x9a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c101112006.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112006.costfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.DiscardHand(tp,c101112006.costfilter,1,1,REASON_COST+REASON_DISCARD,nil,e,tp)
      end
      function c101112006.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112006.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 c101112006.spop(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(c101112006.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.GetMatchingGroup(c101112006.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil,e,tp)
      if ft<=0 or #g==0 then return end
      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
      function c101112006.splimit(e,c)
      return not c:IsSetCard(0x9a)
      end
      function c101112006.pencon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsLocation(LOCATION_EXTRA) and c:IsFaceup() and r==REASON_SYNCHRO
      end
      function c101112006.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
      end
      function c101112006.penop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
      end
      end
      \ No newline at end of file
      script/c101112007.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重僧兵ビッグベン－K
      --Script by 奥克斯
      function c101112007.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --search
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112007,0))
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCountLimit(1,101112007)
      e1:SetCondition(c101112007.thcon)
      e1:SetTarget(c101112007.thtg)
      e1:SetOperation(c101112007.thop)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112007,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOGRAVE)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_HAND)
      e2:SetCountLimit(1,101112007+100)
      e2:SetCondition(c101112007.spcon)
      e2:SetTarget(c101112007.sptg)
      e2:SetOperation(c101112007.spop)
      c:RegisterEffect(e2)
      --move
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_BE_MATERIAL)
      e3:SetCountLimit(1,101112007+200)
      e3:SetCondition(c101112007.pencon)
      e3:SetTarget(c101112007.pentg)
      e3:SetOperation(c101112007.penop)
      c:RegisterEffect(e3)
      end
      function c101112007.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsSetCard),tp,LOCATION_MZONE,0,1,nil,0x9a)
      end
      function c101112007.thfilter(c)
      return c:IsSetCard(0x109a) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c101112007.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112007.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112007.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112007.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 c101112007.spcon(e,tp,eg,ep,ev,re,r,rp)
      return not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      end
      function c101112007.tgfilter(c)
      return c:IsCode(3117804) and c:IsAbleToGrave()
      end
      function c101112007.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)
      and Duel.IsExistingMatchingCard(c101112007.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
      end
      function c101112007.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(c101112007.tgfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil)
      if #g==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local tc=g:Select(tp,1,1,nil):GetFirst()
      if Duel.SendtoGrave(tc,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_GRAVE)
      and c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c101112007.pencon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsLocation(LOCATION_EXTRA) and c:IsFaceup() and r==REASON_SYNCHRO
      end
      function c101112007.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
      end
      function c101112007.penop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
      end
      end
      script/c101112008.lua deleted 100644 → 0
      View file @ e38d2b74
      --深淵の獣アルベル
      --Script by 奥克斯
      function c101112008.initial_effect(c)
      --change name
      aux.EnableChangeCode(c,68468459,LOCATION_MZONE+LOCATION_GRAVE)
      --control or special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,101112008)
      e1:SetCost(c101112008.cost)
      e1:SetTarget(c101112008.tg)
      e1:SetOperation(c101112008.op)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      end
      function c101112008.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil) end
      Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
      end
      function c101112008.filter1(c)
      return c:IsFaceup() and c:IsRace(RACE_DRAGON) and c:IsControlerCanBeChanged()
      end
      function c101112008.filter2(c,e,tp)
      return c:IsRace(RACE_DRAGON) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112008.tg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then
      if e:GetLabel()==0 then
      return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101112008.filter1(chkc)
      else
      return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112008.filter2(chkc,e,tp)
      end
      end
      local c=e:GetHandler()
      local b1=Duel.IsExistingTarget(c101112008.filter1,tp,0,LOCATION_MZONE,1,nil)
      local b2=Duel.IsExistingTarget(c101112008.filter2,tp,0,LOCATION_GRAVE,1,nil,e,tp) and Duel.GetMZoneCount(tp,c)>0
      if chk==0 then return c:IsAbleToGrave() and (b1 or b2) end
      local op=0
      if b1 and b2 then
      op=Duel.SelectOption(tp,aux.Stringid(101112008,0),aux.Stringid(101112008,1))
      elseif b1 then
      op=Duel.SelectOption(tp,aux.Stringid(101112008,0))
      else
      op=Duel.SelectOption(tp,aux.Stringid(101112008,1))+1
      end
      e:SetLabel(op)
      if op==0 then
      e:SetCategory(CATEGORY_CONTROL)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
      local g=Duel.SelectTarget(tp,c101112008.filter1,tp,0,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_CONTROL,g,1,0,0)
      else
      e:SetCategory(CATEGORY_SPECIAL_SUMMON)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112008.filter2,tp,0,LOCATION_GRAVE,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
      end
      function c101112008.op(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if not c:IsRelateToEffect(e) or Duel.SendtoGrave(c,REASON_EFFECT)==0 then return end
      if c:GetLocation()~=LOCATION_GRAVE or not tc:IsRelateToEffect(e) then return end
      if e:GetLabel()==0 then
      Duel.GetControl(tc,tp,PHASE_END,1)
      else
      Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101112009.lua deleted 100644 → 0
      View file @ e38d2b74
      --アルギロスの落胤
      --Script by 奥克斯
      function c101112009.initial_effect(c)
      --spsummon rule or self
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112009,0))
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112009+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112009.sprcon1)
      c:RegisterEffect(e1)
      --spsummon rule or your opponent
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112009,1))
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_SPSUMMON_PROC)
      e2:SetRange(LOCATION_HAND)
      e2:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_SPSUM_PARAM)
      e2:SetTargetRange(POS_FACEUP,1)
      e2:SetCountLimit(1,101112009+EFFECT_COUNT_CODE_OATH)
      e2:SetCondition(c101112009.sprcon2)
      c:RegisterEffect(e2)
      --act limit
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCode(EFFECT_CANNOT_TRIGGER)
      e3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e3:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      e3:SetTarget(c101112009.actfilter)
      c:RegisterEffect(e3)
      --xyz material detach
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(101112009,2))
      e4:SetType(EFFECT_TYPE_QUICK_O)
      e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e4:SetCode(EVENT_FREE_CHAIN)
      e4:SetRange(LOCATION_MZONE)
      e4:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e4:SetCountLimit(1,101112009+100)
      e4:SetCondition(c101112009.dhcon)
      e4:SetTarget(c101112009.dhtg)
      e4:SetOperation(c101112009.dhop)
      c:RegisterEffect(e4)
      end
      function c101112009.twofilter(c)
      return c:IsFaceup() and (c:IsLevel(2) or c:IsLink(2) or c:IsRank(2))
      end
      function c101112009.sprcon1(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112009.twofilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      end
      function c101112009.sprcon2(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(1-tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112009.twofilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      end
      function c101112009.actfilter(e,c)
      local g=c:GetLinkedGroup()
      return c:IsType(TYPE_LINK) and g:IsContains(e:GetHandler())
      end
      function c101112009.dhcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()==1-tp
      end
      function c101112009.xfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:GetOverlayCount()>0
      end
      function c101112009.dhtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c101112009.xfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112009.xfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c101112009.xfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      end
      function c101112009.dhop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:GetOverlayCount()>0 then
      tc:RemoveOverlayCard(tp,1,2,REASON_EFFECT)
      end
      end
      \ No newline at end of file
      script/c101112010.lua deleted 100644 → 0
      View file @ e38d2b74
      --氷水帝エジル・ラーン
      --Script by 奥克斯
      function c101112010.initial_effect(c)
      --special summon (self)
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112010,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112010)
      e1:SetCost(c101112010.spcost)
      e1:SetTarget(c101112010.sptg)
      e1:SetOperation(c101112010.spop)
      c:RegisterEffect(e1)
      --change name
      aux.EnableChangeCode(c,7142724,LOCATION_MZONE,c101112010.codecon)
      end
      function c101112010.costfilter(c)
      local b1=c:IsSetCard(0x16c)
      local b2=c:IsAttribute(ATTRIBUTE_WATER) and c:IsType(TYPE_MONSTER)
      return (b1 or b2) and c:IsDiscardable()
      end
      function c101112010.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112010.costfilter,tp,LOCATION_HAND,0,1,e:GetHandler()) end
      Duel.DiscardHand(tp,c101112010.costfilter,1,1,REASON_COST+REASON_DISCARD,e:GetHandler())
      end
      function c101112010.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 c101112010.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
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft>0 and Duel.IsPlayerCanSpecialSummonMonster(tp,101112110,0x16c,TYPES_TOKEN_MONSTER,0,0,3,RACE_AQUA,ATTRIBUTE_WATER)
      and Duel.SelectYesNo(tp,aux.Stringid(101112010,1)) then
      Duel.BreakEffect()
      local token=Duel.CreateToken(tp,101112110)
      Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetRange(LOCATION_MZONE)
      e1:SetAbsoluteRange(tp,1,0)
      e1:SetTarget(c101112010.splimit)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      token:RegisterEffect(e1,true)
      Duel.SpecialSummonComplete()
      end
      end
      end
      function c101112010.splimit(e,c)
      return not c:IsAttribute(ATTRIBUTE_WATER) and c:IsLocation(LOCATION_EXTRA)
      end
      function c101112010.codecon(e)
      return e:GetHandler():GetEquipCount()>0
      end
      \ No newline at end of file
      script/c101112011.lua deleted 100644 → 0
      View file @ e38d2b74
      --導きの聖女クエム
      --Guiding Quem, the Virtuous
      --Script by Chrono-Genex
      function c101112011.initial_effect(c)
      aux.AddCodeList(c,68468459)
      --to grave
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112011,0))
      e1:SetCategory(CATEGORY_TOGRAVE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,101112011)
      e1:SetTarget(c101112011.tgtg)
      e1:SetOperation(c101112011.tgop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112011,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e3:SetCode(EVENT_LEAVE_DECK)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,101112011+100)
      e3:SetCondition(c101112011.spcon)
      e3:SetTarget(c101112011.sptg)
      e3:SetOperation(c101112011.spop)
      c:RegisterEffect(e3)
      end
      function c101112011.tgfilter(c)
      return (c:IsCode(68468459) or aux.IsCodeListed(c,68468459)) and c:IsAbleToGrave()
      end
      function c101112011.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112011.tgfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      end
      function c101112011.tgop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c101112011.tgfilter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoGrave(g,REASON_EFFECT)
      end
      end
      function c101112011.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(Card.IsPreviousLocation,1,nil,LOCATION_EXTRA)
      end
      function c101112011.spfilter(c,e,tp)
      return (c:IsCode(68468459) or aux.IsCodeListed(c,68468459)) and not c:IsCode(101112011)
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112011.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112011.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c101112011.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112011.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c101112011.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/c101112012.lua deleted 100644 → 0
      View file @ e38d2b74
      --マナドゥム・リウムハート
      local s,id,o=GetID()
      function s.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetRange(LOCATION_HAND)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCountLimit(1,id)
      e1:SetCondition(s.spcon)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --search
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetCountLimit(1,id+o)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
      end
      function s.tfilter(c,tp)
      local b1=c:IsSetCard(0x291)
      local b2=c:IsAttack(1500) and c:IsDefense(2100)
      return c:IsFaceup() and Duel.GetMZoneCount(tp,c)>0 and (b1 or b2)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.tfilter(chkc,tp) end
      if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      and Duel.IsExistingTarget(s.tfilter,tp,LOCATION_MZONE,0,1,nil,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,s.tfilter,tp,LOCATION_MZONE,0,1,1,nil,tp)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)~=0 then
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      function s.thfilter(c)
      return not c:IsCode(id) and c:IsSetCard(0x291) 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
      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
      \ No newline at end of file
      script/c101112013.lua deleted 100644 → 0
      View file @ e38d2b74
      --マナドゥム・ヒアレス
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --special summon rule
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetRange(LOCATION_HAND)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(s.sprcon)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_DESTROYED)
      e2:SetCondition(s.spcon)
      e2:SetTarget(s.sptg)
      e2:SetOperation(s.spop)
      c:RegisterEffect(e2)
      end
      function s.filter(c)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100) and c:IsType(TYPE_MONSTER)
      return c:IsFaceup() and (b1 or b2)
      end
      function s.sprcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD,0,1,nil)
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
      end
      function s.spfilter(c,e,tp)
      return c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetReset(RESET_PHASE+PHASE_END)
      e1:SetCondition(s.atkcon)
      e1:SetTarget(s.atktg)
      e1:SetValue(500)
      Duel.RegisterEffect(e1,tp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function s.atkcon(e)
      local ph=Duel.GetCurrentPhase()
      return ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE
      end
      function s.atktg(e,c)
      return c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
      end
      \ No newline at end of file
      script/c101112014.lua deleted 100644 → 0
      View file @ e38d2b74
      --マナドゥム・ミーク
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --special summon rule
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetRange(LOCATION_HAND)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(s.sprcon)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_DESTROYED)
      e2:SetCondition(s.spcon)
      e2:SetTarget(s.sptg)
      e2:SetOperation(s.spop)
      c:RegisterEffect(e2)
      end
      function s.filter(c)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100) and c:IsType(TYPE_MONSTER)
      return c:IsFaceup() and (b1 or b2)
      end
      function s.sprcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD,0,1,nil)
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
      end
      function s.spfilter(c,e,tp)
      return c:IsCode(id) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      local tc=g:GetFirst()
      if tc and Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)>0 and tc:IsLevelAbove(1)
      and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
      Duel.BreakEffect()
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_UPDATE_LEVEL)
      e1:SetValue(2)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      end
      \ No newline at end of file
      script/c101112015.lua deleted 100644 → 0
      View file @ e38d2b74
      --夢見るネムレリア
      --Script by 奥克斯
      function c101112015.initial_effect(c)
      c:EnableReviveLimit()
      c:SetSPSummonOnce(101112015)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --special summon 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)
      c:RegisterEffect(e0)
      --special summon rule
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetRange(LOCATION_EXTRA)
      e1:SetCondition(c101112015.sprcon)
      c:RegisterEffect(e1)
      --deck move
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_PZONE)
      e2:SetCountLimit(1)
      e2:SetCost(c101112015.mvcost)
      e2:SetTarget(c101112015.mvtg)
      e2:SetOperation(c101112015.mvop)
      c:RegisterEffect(e2)
      Duel.AddCustomActivityCounter(101112015,ACTIVITY_SPSUMMON,c101112015.counterfilter)
      --fadown remove
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_REMOVE)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetTarget(c101112015.drmtg)
      e3:SetOperation(c101112015.drmop)
      c:RegisterEffect(e3)
      end
      function c101112015.sprcon(e,c)
      if c==nil then return true end
      if c:IsFacedown() then return false end
      local tp=c:GetControler()
      local exg=Duel.GetFieldGroup(tp,LOCATION_EXTRA,0)
      local ct=exg:FilterCount(aux.AND(Card.IsFaceup,Card.IsCode),nil,101112015)
      return #exg>0 and #exg==ct and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
      end
      function c101112015.counterfilter(c)
      return not c:IsCode(101112015)
      end
      function c101112015.mvcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetCustomActivityCount(101112015,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:SetTargetRange(1,0)
      e1:SetTarget(c101112015.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112015.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return c:IsCode(101112015)
      end
      function c101112015.mvfilter(c,tp)
      return not c:IsForbidden() and c:IsSetCard(0x292) and c:GetType()==TYPE_CONTINUOUS+TYPE_SPELL and c:CheckUniqueOnField(tp)
      end
      function c101112015.mvtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
      and Duel.IsExistingMatchingCard(c101112015.mvfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil,tp) end
      end
      function c101112015.mvop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c101112015.mvfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,nil,tp)
      if #g==0 or Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
      local tc=g:Select(tp,1,1,nil):GetFirst()
      if Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) and c:IsRelateToEffect(e) then
      Duel.SendtoExtraP(c,nil,REASON_EFFECT)
      end
      end
      function c101112015.rmfilter(c)
      return c:IsLocation(LOCATION_REMOVED) and not c:IsReason(REASON_REDIRECT)
      end
      function c101112015.drmtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_REMOVED,0,nil)
      local tg=g:Filter(Card.IsAbleToDeck,nil)
      local rg=Duel.GetMatchingGroup(Card.IsAbleToRemove,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil,tp,POS_FACEDOWN)
      local ct=math.floor(#g/3)
      if chk==0 then return ct>0 and #tg>0 and #rg>0 end
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,rg,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,tg,1,0,0)
      end
      function c101112015.drmop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(Card.IsFacedown,tp,LOCATION_REMOVED,0,nil)
      local tg=g:Filter(Card.IsAbleToDeck,nil)
      local rg=Duel.GetMatchingGroup(aux.NecroValleyFilter(Card.IsAbleToRemove),tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,nil,tp,POS_FACEDOWN)
      local ct=math.floor(#g/3)
      if ct==0 or #tg==0 or #rg==0 then return end
      if ct>#tg then ct=#tg end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local mg=rg:Select(tp,1,ct,nil)
      Duel.HintSelection(mg)
      Duel.Remove(mg,POS_FACEDOWN,REASON_EFFECT)
      local og=Duel.GetOperatedGroup():Filter(c101112015.rmfilter,nil)
      if #og==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local tg1=tg:Select(tp,#og,#og,nil)
      Duel.BreakEffect()
      Duel.HintSelection(tg1)
      Duel.SendtoDeck(tg1,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      script/c101112016.lua deleted 100644 → 0
      View file @ e38d2b74
      --ネムレリアの夢守り－オレイエ
      --Script by 奥克斯
      function c101112016.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112016+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112016.sprcon)
      c:RegisterEffect(e1)
      --atk up
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112016,0))
      e2:SetCategory(CATEGORY_ATKCHANGE)
      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,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE+TIMING_DAMAGE_STEP)
      e2:SetCountLimit(1,101112016+100)
      e2:SetCondition(c101112016.atkcon)
      e2:SetCost(c101112016.atkcost)
      e2:SetOperation(c101112016.atkop)
      c:RegisterEffect(e2)
      end
      function c101112016.sprcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsType),tp,LOCATION_EXTRA,0,1,nil,TYPE_PENDULUM)
      end
      function c101112016.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return aux.dscon(e,tp,eg,ep,ev,re,r,rp) and Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_EXTRA,0,1,nil,101112015)
      end
      function c101112016.rmfilter(c)
      return c:IsFacedown() and c:IsAbleToRemoveAsCost(POS_FACEDOWN)
      end
      function c101112016.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(c101112016.rmfilter,tp,LOCATION_EXTRA,0,nil)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local rg=g:Select(tp,1,1,nil)
      Duel.Remove(rg,POS_FACEDOWN,REASON_COST)
      end
      function c101112016.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_MZONE)
      if c:IsFaceup() and c:IsRelateToEffect(e) and ct>0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(ct*500)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
      c:RegisterEffect(e1)
      end
      end
      \ No newline at end of file
      script/c101112017.lua deleted 100644 → 0
      View file @ e38d2b74
      --ネムレリアの夢守り－クエット
      --Script by 奥克斯
      function c101112017.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SPSUMMON_PROC)
      e1:SetProperty(EFFECT_FLAG_UNCOPYABLE)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112017+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112017.sprcon)
      c:RegisterEffect(e1)
      --negate
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112017,0))
      e2:SetCategory(CATEGORY_NEGATE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_MZONE)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
      e2:SetCountLimit(1,101112017+100)
      e2:SetCondition(c101112017.discon)
      e2:SetCost(c101112017.discost)
      e2:SetTarget(c101112017.distg)
      e2:SetOperation(c101112017.disop)
      c:RegisterEffect(e2)
      end
      function c101112017.sprcon(e,c)
      if c==nil then return true end
      local tp=c:GetControler()
      return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsType),tp,LOCATION_EXTRA,0,1,nil,TYPE_PENDULUM)
      end
      function c101112017.tfilter(c,tp)
      return c:IsLocation(LOCATION_ONFIELD) and c:IsSetCard(0x292) and c:IsControler(tp) and c:IsFaceup()
      end
      function c101112017.discon(e,tp,eg,ep,ev,re,r,rp)
      if rp==tp or e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) then return false end
      if not re:IsHasProperty(EFFECT_FLAG_CARD_TARGET) then return false end
      if not Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_EXTRA,0,1,nil,101112015) then return false end
      local tg=Duel.GetChainInfo(ev,CHAININFO_TARGET_CARDS)
      return tg and tg:IsExists(c101112017.tfilter,1,nil,tp) and Duel.IsChainNegatable(ev)
      end
      function c101112017.rmfilter(c)
      return c:IsFacedown() and c:IsAbleToRemoveAsCost(POS_FACEDOWN)
      end
      function c101112017.discost(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(c101112017.rmfilter,tp,LOCATION_EXTRA,0,nil)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local rg=g:Select(tp,1,1,nil)
      Duel.Remove(rg,POS_FACEDOWN,REASON_COST)
      end
      function c101112017.distg(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)
      end
      function c101112017.disop(e,tp,eg,ep,ev,re,r,rp)
      Duel.NegateActivation(ev)
      end
      \ No newline at end of file
      script/c101112018.lua deleted 100644 → 0
      View file @ e38d2b74
      --ピュアリィ・リリィ
      --Script by blue1874
      local s,id,o=GetID()
      function s.initial_effect(c)
      --search
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.thtg)
      e1:SetOperation(s.thop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      --spsummon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_IGNITION)
      e3:SetRange(LOCATION_MZONE)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCountLimit(1,id+o)
      e3:SetTarget(s.sptg)
      e3:SetOperation(s.spop)
      c:RegisterEffect(e3)
      end
      function s.thfilter(c)
      return c:IsSetCard(0x18c) and c:IsAbleToHand() and not c:IsType(TYPE_QUICKPLAY)
      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,0,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.sptgexfilter(c,e,tp,code)
      local sc=e:GetHandler()
      return aux.IsCodeListed(c,code) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false)
      and c:IsType(TYPE_XYZ) and sc:IsCanBeXyzMaterial(c) and Duel.GetLocationCountFromEx(tp,tp,sc,c)>0
      end
      function s.sptgfilter(c,e,tp)
      return c:IsType(TYPE_QUICKPLAY) and c:IsSetCard(0x18c)
      and Duel.IsExistingMatchingCard(s.sptgexfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c:GetCode())
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and s.sptgfilter(chkc,e,tp) end
      if chk==0 then return aux.MustMaterialCheck(e:GetHandler(),tp,EFFECT_MUST_BE_XMATERIAL)
      and Duel.IsExistingTarget(s.sptgfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,s.sptgfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL) then return end
      local sc=Duel.GetFirstTarget()
      if not c:IsRelateToChain() or c:IsImmuneToEffect(e) or c:IsFacedown() or c:IsControler(1-tp) then return end
      if not sc:IsRelateToChain() then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,s.sptgexfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,sc:GetCode())
      local tc=sg:GetFirst()
      if not tc then return end
      tc:SetMaterial(Group.FromCards(c))
      Duel.Overlay(tc,c)
      Duel.SpecialSummon(tc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
      tc:CompleteProcedure()
      if not sc:IsImmuneToEffect(e) then Duel.Overlay(tc,sc) end
      end
      script/c101112019.lua deleted 100644 → 0
      View file @ e38d2b74
      --珠の御巫フゥリ
      --Script by 奥克斯
      function c101112019.initial_effect(c)
      --no damage
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(c101112019.ndcon)
      e1:SetValue(1)
      c:RegisterEffect(e1)
      --battle indestructable
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e2:SetValue(1)
      e2:SetCondition(c101112019.indcon)
      c:RegisterEffect(e2)
      --reflect battle damage
      local e3=e2:Clone()
      e3:SetCode(EFFECT_REFLECT_BATTLE_DAMAGE)
      c:RegisterEffect(e3)
      --cannot be target
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e4:SetRange(LOCATION_MZONE)
      e4:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e4:SetTargetRange(LOCATION_ONFIELD,0)
      e4:SetCondition(c101112019.tgcon)
      e4:SetTarget(aux.TargetBoolFunction(Card.IsSetCard,0x18d))
      e4:SetValue(aux.tgoval)
      c:RegisterEffect(e4)
      --to hand
      local e5=Effect.CreateEffect(c)
      e5:SetDescription(aux.Stringid(101112019,0))
      e5:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e5:SetCode(EVENT_EQUIP)
      e5:SetProperty(EFFECT_FLAG_DELAY)
      e5:SetCountLimit(1,101112019)
      e5:SetTarget(c101112019.thtg)
      e5:SetOperation(c101112019.thop)
      c:RegisterEffect(e5)
      end
      function c101112019.ndcon(e)
      return e:GetHandler():GetEquipCount()==0
      end
      function c101112019.indcon(e)
      return e:GetHandler():GetEquipCount()>0
      end
      function c101112019.indcfilter(c)
      return c:GetEquipTarget() or (c:IsFaceup() and c:IsType(TYPE_EQUIP))
      end
      function c101112019.tgcon(e)
      return Duel.IsExistingMatchingCard(c101112019.indcfilter,e:GetHandlerPlayer(),LOCATION_ONFIELD,0,1,nil)
      end
      function c101112019.thfilter(c)
      return c:IsSetCard(0x18d) and c:IsType(TYPE_TRAP) and c:IsAbleToHand()
      end
      function c101112019.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112019.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112019.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112019.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/c101112020.lua deleted 100644 → 0
      View file @ e38d2b74
      --星騎士 アルテア
      --Script by 奥克斯
      function c101112020.initial_effect(c)
      --Destroy
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,101112020)
      e1:SetTarget(c101112020.destg)
      e1:SetOperation(c101112020.desop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c101112020.star_knight_summon_effect=e1
      --special summon
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_DELAY)
      e4:SetCode(EVENT_SPSUMMON_SUCCESS)
      e4:SetRange(LOCATION_GRAVE)
      e4:SetCountLimit(1,101112020+100)
      e4:SetCondition(c101112020.spcon)
      e4:SetTarget(c101112020.sptg)
      e4:SetOperation(c101112020.spop)
      c:RegisterEffect(e4)
      end
      function c101112020.ckfilter(c)
      return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK) and c:IsType(TYPE_XYZ)
      end
      function c101112020.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local ct=Duel.GetMatchingGroupCount(c101112020.ckfilter,tp,LOCATION_MZONE,0,nil)
      if chkc then return chkc:IsOnField() end
      if chk==0 then return ct>0 and Duel.IsExistingTarget(nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,#g,0,0)
      end
      function c101112020.desop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetTargetsRelateToChain()
      if #g==0 then return end
      Duel.Destroy(g,REASON_EFFECT)
      end
      function c101112020.cfilter(c,tp)
      return not c:IsCode(101112020) and c:IsFaceup() and c:IsControler(tp)
      and c:IsSetCard(0x9c,0x53)
      end
      function c101112020.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112020.cfilter,1,nil,tp)
      end
      function c101112020.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 c101112020.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
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c101112020.atktg)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112020.atktg(e,c)
      return not c:IsType(TYPE_XYZ)
      end
      \ No newline at end of file
      script/c101112021.lua deleted 100644 → 0
      View file @ e38d2b74
      --星騎士 リュラ
      --Script by 奥克斯
      function c101112021.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112021)
      e1:SetCondition(c101112021.spcon)
      e1:SetTarget(c101112021.sptg)
      e1:SetOperation(c101112021.spop)
      c:RegisterEffect(e1)
      --Destroy
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,101112021+100)
      e2:SetTarget(c101112021.thtg)
      e2:SetOperation(c101112021.thop)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e3)
      local e4=e2:Clone()
      e4:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e4)
      c101112021.star_knight_summon_effect=e2
      end
      function c101112021.spcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=eg:GetFirst()
      return not ec:IsCode(101112021) and ec:IsControler(tp) and ec:IsSetCard(0x9c,0x53)
      end
      function c101112021.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 c101112021.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) then return end
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      function c101112021.thfilter(c)
      return c:IsSetCard(0x9c) and c:IsType(TYPE_SPELL) and c:IsAbleToHand()
      end
      function c101112021.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112021.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112021.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112021.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      if #g==0 then return end
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      \ No newline at end of file
      script/c101112022.lua deleted 100644 → 0
      View file @ e38d2b74
      --無限起動ロードローラー
      --scripted by Raye
      function c101112022.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112022,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_RELEASE)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
      e1:SetCountLimit(1,101112022)
      e1:SetCondition(c101112022.spcon)
      e1:SetTarget(c101112022.sptg)
      e1:SetOperation(c101112022.spop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_REMOVE)
      c:RegisterEffect(e2)
      --gain effect
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_FIELD)
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCode(EFFECT_SET_POSITION)
      e3:SetTargetRange(0,LOCATION_MZONE)
      e3:SetCondition(c101112022.matcheck)
      e3:SetTarget(c101112022.postg)
      e3:SetValue(POS_FACEUP_DEFENSE)
      c:RegisterEffect(e3)
      local e4=e3:Clone()
      e4:SetCode(EFFECT_UPDATE_DEFENSE)
      e4:SetValue(-1000)
      c:RegisterEffect(e4)
      end
      function c101112022.cfilter(c,tp)
      return c:GetPreviousAttributeOnField()&ATTRIBUTE_EARTH>0 and c:GetPreviousRaceOnField()&RACE_MACHINE>0
      and c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE)
      and (c:IsReason(REASON_RELEASE) or c:IsFaceup())
      end
      function c101112022.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112022.cfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
      end
      function c101112022.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 c101112022.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
      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
      function c101112022.matcheck(e)
      return e:GetHandler():GetOriginalRace()==RACE_MACHINE
      end
      function c101112022.postg(e,c)
      return c:IsFaceup()
      end
      script/c101112023.lua deleted 100644 → 0
      View file @ e38d2b74
      --恐楽園の死配人 ＜Arlechino＞
      --Script by 奥克斯
      function c101112023.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_ACTION+CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112023)
      e1:SetCondition(c101112023.spcon)
      e1:SetTarget(c101112023.sptg)
      e1:SetOperation(c101112023.spop)
      c:RegisterEffect(e1)
      --special summon and atk change 0
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112023,1))
      e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(TIMING_DAMAGE_STEP,0x21e0)
      e2:SetCountLimit(1,101112023+100)
      e2:SetCondition(c101112023.dhcon)
      e2:SetTarget(c101112023.dhtg)
      e2:SetOperation(c101112023.dhop)
      c:RegisterEffect(e2)
      end
      function c101112023.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsSetCard),tp,LOCATION_MZONE,0,1,nil,0x15b)
      end
      function c101112023.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 c101112023.thfilter(c)
      return c:IsCode(20989253) and c:IsAbleToHand()
      end
      function c101112023.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) then return end
      if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)==0 then return end
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c101112023.thfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,nil)
      if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(101112023,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local tag=g:Select(tp,1,1,nil)
      Duel.SendtoHand(tag,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,tag)
      end
      end
      function c101112023.dhcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()==1-tp and aux.dscon()
      end
      function c101112023.xfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_EFFECT) and c:GetAttack()>0
      end
      function c101112023.spfilter(c,e,tp)
      return c:IsCode(94821366) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112023.dhtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc~=c and c101112023.xfilter(chkc) end
      if chk==0 then return c:IsAbleToDeck() and Duel.GetMZoneCount(tp,c)>0
      and Duel.IsExistingTarget(c101112023.xfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,c)
      and Duel.IsExistingMatchingCard(c101112023.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c101112023.xfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,c)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,c,1,0,0)
      end
      function c101112023.dhop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if not c:IsRelateToEffect(e) or Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)==0 or c:GetLocation()~=LOCATION_DECK then return end
      local g=Duel.GetMatchingGroup(c101112023.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
      if #g==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)==0
      or not tc:IsRelateToEffect(e) or tc:IsFacedown() then return end
      Duel.BreakEffect()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetValue(0)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      script/c101112024.lua deleted 100644 → 0
      View file @ e38d2b74
      --刀皇－都牟羽沓薙
      --Script by 奥克斯
      function c101112024.initial_effect(c)
      --cannot special summon
      local e0=Effect.CreateEffect(c)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetCode(EFFECT_SPSUMMON_CONDITION)
      e0:SetValue(aux.FALSE)
      c:RegisterEffect(e0)
      --spirit return
      aux.EnableSpiritReturn(c,EVENT_SUMMON_SUCCESS,EVENT_FLIP)
      --summon with 1 tribute
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112024,0))
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SUMMON_PROC)
      e1:SetCondition(c101112024.otcon)
      e1:SetOperation(c101112024.otop)
      e1:SetValue(SUMMON_TYPE_ADVANCE)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_SET_PROC)
      c:RegisterEffect(e2)
      --return to deck
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112024,1))
      e2:SetCategory(CATEGORY_DRAW+CATEGORY_TODECK+CATEGORY_GRAVE_ACTION)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetTarget(c101112024.tg)
      e2:SetOperation(c101112024.op)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_FLIP)
      c:RegisterEffect(e3)
      end
      function c101112024.otfilter(c)
      return c:IsSummonType(SUMMON_TYPE_NORMAL) or c:IsSummonType(SUMMON_TYPE_ADVANCE) or c:IsSummonType(SUMMON_TYPE_DUAL)
      end
      function c101112024.otcon(e,c,minc)
      if c==nil then return true end
      local mg=Duel.GetMatchingGroup(c101112024.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
      return c:IsLevelAbove(7) and minc<=1 and Duel.CheckTribute(c,1,1,mg)
      end
      function c101112024.otop(e,tp,eg,ep,ev,re,r,rp,c)
      local mg=Duel.GetMatchingGroup(c101112024.otfilter,0,LOCATION_MZONE,LOCATION_MZONE,nil)
      local sg=Duel.SelectTribute(tp,c,1,1,mg)
      c:SetMaterial(sg)
      Duel.Release(sg,REASON_SUMMON+REASON_MATERIAL)
      end
      function c101112024.tg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      end
      function c101112024.op(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(Card.IsAbleToGrave,1-tp,LOCATION_ONFIELD,0,nil)
      if #g>0 and Duel.IsPlayerCanDraw(tp) and Duel.IsPlayerCanDraw(1-tp)
      and Duel.SelectYesNo(1-tp,aux.Stringid(101112024,2)) then
      Duel.Hint(HINT_SELECTMSG,1-tp,HINTMSG_TOGRAVE)
      local tg=g:Select(1-tp,1,#g,nil)
      if #tg>0 and Duel.SendtoGrave(tg,REASON_EFFECT) and tg:IsExists(Card.IsLocation,1,nil,LOCATION_GRAVE) then
      Duel.Draw(tp,#tg,REASON_EFFECT)
      Duel.Draw(1-tp,#tg,REASON_EFFECT)
      end
      end
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetCountLimit(1)
      e1:SetOperation(c101112024.todop)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112024.todop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(Card.IsAbleToDeck),tp,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,LOCATION_ONFIELD+LOCATION_GRAVE+LOCATION_REMOVED,nil)
      if #g==0 then return end
      Duel.Hint(HINT_CARD,0,101112024)
      Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      \ No newline at end of file
      script/c101112025.lua deleted 100644 → 0
      View file @ e38d2b74
      --フルアクティブ・デュプレックス
      --Full-Active Duprex
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --multi-attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(aux.TargetBoolFunction(Card.IsLinkState))
      e1:SetValue(1)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_HAND)
      e2:SetCountLimit(1,id)
      e2:SetCost(s.cost)
      e2:SetTarget(s.sptg)
      e2:SetOperation(s.spop)
      c:RegisterEffect(e2)
      --atkup
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetCategory(CATEGORY_ATKCHANGE)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e3:SetCode(EVENT_TO_GRAVE)
      e3:SetCountLimit(1,id+o)
      e3:SetTarget(s.target)
      e3:SetOperation(s.operation)
      c:RegisterEffect(e3)
      end
      function s.cfilter(c)
      return c:IsType(TYPE_LINK) and c:IsAbleToRemoveAsCost()
      end
      function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,2,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,2,2,nil)
      Duel.Remove(g,POS_FACEUP,REASON_COST)
      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.filter(c)
      return c:IsFaceup() and c:IsRace(RACE_CYBERSE)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function s.operation(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/c101112026.lua deleted 100644 → 0
      View file @ e38d2b74
      --死天使ハーヴェスト
      --Script by 奥克斯
      function c101112026.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --black horn of heaven search
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112026,0))
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCountLimit(1,101112026)
      e1:SetTarget(c101112026.thtg1)
      e1:SetOperation(c101112026.thop1)
      c:RegisterEffect(e1)
      --horn of heaven search
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetCountLimit(1,101112026+100)
      e2:SetTarget(c101112026.thtg2)
      e2:SetOperation(c101112026.thop2)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetCondition(c101112026.thcon)
      c:RegisterEffect(e3)
      --pzone move
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_DELAY)
      e4:SetCode(EVENT_RELEASE)
      e4:SetCountLimit(1,101112026+200)
      e4:SetTarget(c101112026.pentg)
      e4:SetOperation(c101112026.penop)
      c:RegisterEffect(e4)
      end
      function c101112026.thfilter(c,code)
      return c:IsCode(code) and c:IsAbleToHand()
      end
      function c101112026.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112026.thfilter,tp,LOCATION_DECK,0,1,nil,50323155) end
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112026.thop1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) or Duel.Destroy(c,REASON_EFFECT)==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112026.thfilter,tp,LOCATION_DECK,0,1,1,nil,50323155)
      if #g==0 then return end
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      function c101112026.thcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM)
      end
      function c101112026.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112026.thfilter,tp,LOCATION_DECK,0,1,nil,98069388) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112026.thop2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112026.thfilter,tp,LOCATION_DECK,0,1,1,nil,98069388)
      if #g==0 then return end
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      function c101112026.pentg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1) end
      end
      function c101112026.penop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then
      Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
      end
      end
      \ No newline at end of file
      script/c101112027.lua deleted 100644 → 0
      View file @ e38d2b74
      --幸魂
      --Script by 奥克斯
      function c101112027.initial_effect(c)
      --cannot special summon
      local e1=Effect.CreateEffect(c)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SPSUMMON_CONDITION)
      e1:SetValue(aux.FALSE)
      c:RegisterEffect(e1)
      --summon
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_HAND)
      e2:SetCountLimit(1,101112027)
      e2:SetCost(c101112027.sumcost)
      e2:SetTarget(c101112027.sumtg)
      e2:SetOperation(c101112027.sumop)
      c:RegisterEffect(e2)
      --spirit return
      aux.EnableSpiritReturn(c,EVENT_SUMMON_SUCCESS,EVENT_FLIP)
      --to hand
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_TOHAND)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCode(EVENT_RELEASE)
      e3:SetCountLimit(1,101112027+100)
      e3:SetTarget(c101112027.thtg)
      e3:SetOperation(c101112027.thop)
      c:RegisterEffect(e3)
      end
      function c101112027.sumcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return not e:GetHandler():IsPublic() end
      end
      function c101112027.sumfilter(c)
      return c:IsType(TYPE_SPIRIT) and c:IsSummonable(true,nil)
      end
      function c101112027.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112027.sumfilter,tp,LOCATION_HAND,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
      end
      function c101112027.sumop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
      local g=Duel.SelectMatchingCard(tp,c101112027.sumfilter,tp,LOCATION_HAND,0,1,1,nil)
      local tc=g:GetFirst()
      if tc then
      Duel.Summon(tp,tc,true,nil)
      end
      end
      function c101112027.thfilter(c)
      return c:IsType(TYPE_SPIRIT) and c:IsAbleToHand()
      end
      function c101112027.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112027.thfilter(chkc) end
      if chk==0 then return true end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,c101112027.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c101112027.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      script/c101112028.lua deleted 100644 → 0
      View file @ e38d2b74
      --愉怪な燐のきつねびゆらら
      --Yukai na Rin no Kitsunebi Yurara
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --attribute
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CHANGE_ATTRIBUTE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
      e1:SetValue(ATTRIBUTE_FIRE)
      c:RegisterEffect(e1)
      --spsummon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id)
      e2:SetCondition(s.condition)
      e2:SetTarget(s.target)
      e2:SetOperation(s.operation)
      c:RegisterEffect(e2)
      end
      function s.filter(c)
      return c:IsFaceupEx() and c:IsAttribute(ATTRIBUTE_FIRE)
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(s.filter,tp,0,LOCATION_MZONE+LOCATION_GRAVE,1,nil)
      end
      function s.target(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.operation(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/c101112029.lua deleted 100644 → 0
      View file @ e38d2b74
      --百檎龍－リンゴブルム
      --Script by 奥克斯
      --not fully implemented
      function c101112029.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_HAND)
      e1:SetCountLimit(1,101112029)
      e1:SetCondition(c101112029.spcon)
      e1:SetTarget(c101112029.sptg)
      e1:SetOperation(c101112029.spop)
      c:RegisterEffect(e1)
      --token
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,101112029+100)
      e2:SetCondition(c101112029.tkcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c101112029.tktg)
      e2:SetOperation(c101112029.tkop)
      c:RegisterEffect(e2)
      if not c101112029.global_check then
      c101112029.global_check=true
      local ge1=Effect.CreateEffect(c)
      ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
      ge1:SetOperation(c101112029.checkop)
      Duel.RegisterEffect(ge1,0)
      end
      end
      function c101112029.checkfilter(c)
      return c:IsType(TYPE_SYNCHRO) and c:IsSummonType(SUMMON_TYPE_SYNCHRO)
      end
      function c101112029.checkop(e,tp,eg,ep,ev,re,r,rp)
      local g=eg:Filter(c101112029.checkfilter,nil)
      local tc=g:GetFirst()
      while tc do
      Duel.RegisterFlagEffect(tc:GetSummonPlayer(),101112029,RESET_PHASE+PHASE_END,0,1)
      tc=g:GetNext()
      end
      end
      function c101112029.spcfilter(c)
      return not c:IsType(TYPE_EFFECT) and c:IsFaceup()
      end
      function c101112029.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c101112029.spcfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      end
      function c101112029.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 c101112029.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:IsRelateToEffect(e) then return end
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      function c101112029.tkcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetFlagEffect(tp,101112029)>0
      end
      function c101112029.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsPlayerCanSpecialSummonMonster(tp,101112129,0,TYPES_TOKEN_MONSTER,100,100,2,RACE_WYRM,ATTRIBUTE_LIGHT) end
      Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
      end
      function c101112029.tkop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      if Duel.IsPlayerCanSpecialSummonMonster(tp,101112129,0,TYPES_TOKEN_MONSTER,100,100,2,RACE_WYRM,ATTRIBUTE_LIGHT) then
      local token=Duel.CreateToken(tp,101112129)
      Duel.SpecialSummonStep(token,0,tp,tp,false,false,POS_FACEUP)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_ADD_TYPE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetValue(TYPE_TUNER)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      token:RegisterEffect(e1,true)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_NONTUNER)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetValue(c101112029.tnval)
      token:RegisterEffect(e2,true)
      Duel.SpecialSummonComplete()
      end
      end
      function c101112029.tnval(e,c)
      return e:GetHandler():IsControler(c:GetControler())
      end
      \ No newline at end of file
      script/c101112030.lua deleted 100644 → 0
      View file @ e38d2b74
      --ペンデュラムーン
      --Script by 奥克斯
      function c101112030.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --extra to hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112030,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCountLimit(1,101112030)
      e1:SetTarget(c101112030.thtg1)
      e1:SetOperation(c101112030.thop1)
      c:RegisterEffect(e1)
      --to hand 2
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112030,1))
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,101112030+100)
      e2:SetTarget(c101112030.thtg2)
      e2:SetOperation(c101112030.thop2)
      c:RegisterEffect(e2)
      if not c101112030.global_check then
      c101112030.global_check=true
      local ge1=Effect.CreateEffect(c)
      ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      ge1:SetCode(EVENT_SPSUMMON_SUCCESS)
      ge1:SetOperation(c101112030.checkop)
      Duel.RegisterEffect(ge1,0)
      end
      end
      function c101112030.checkop(e,tp,eg,ep,ev,re,r,rp)
      if eg:IsExists(Card.IsSummonType,1,nil,SUMMON_TYPE_PENDULUM) then
      Duel.RegisterFlagEffect(rp,101112030,RESET_PHASE+PHASE_END,0,1)
      end
      end
      function c101112030.thfilter1(c)
      return c:IsFaceup() and c:IsType(TYPE_PENDULUM) and c:IsSetCard(0xf2) and c:IsAbleToHand()
      end
      function c101112030.thtg1(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112030.thfilter1,tp,LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,e:GetHandler(),1,0,0)
      end
      function c101112030.thop1(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112030.thfilter1,tp,LOCATION_EXTRA,0,1,1,nil)
      if #g==0 then return end
      local tc=g:GetFirst()
      if Duel.SendtoHand(tc,nil,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_HAND) then
      Duel.ConfirmCards(1-tp,tc)
      if not c:IsRelateToEffect(e) then return end
      Duel.BreakEffect()
      Duel.Destroy(c,REASON_EFFECT)
      end
      end
      function c101112030.thfilter2(c,lsc,rsc)
      if c:IsFacedown() or not c:IsType(TYPE_PENDULUM) then return false end
      local lv=c:GetLevel()
      return lv>lsc and lv<rsc and c:IsAbleToHand()
      end
      function c101112030.thtg2(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local lc=Duel.GetFieldCard(tp,LOCATION_PZONE,0)
      local rc=Duel.GetFieldCard(tp,LOCATION_PZONE,1)
      if not lc or not rc then return false end
      local lsc=lc:GetLeftScale()
      local rsc=rc:GetRightScale()
      if lsc>rsc then lsc,rsc=rsc,lsc end
      return Duel.IsExistingMatchingCard(c101112030.thfilter2,tp,LOCATION_EXTRA,0,1,nil,lsc,rsc)
      end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_EXTRA)
      end
      function c101112030.thop2(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local lc=Duel.GetFieldCard(tp,LOCATION_PZONE,0)
      local rc=Duel.GetFieldCard(tp,LOCATION_PZONE,1)
      if lc and rc then
      local lsc=lc:GetLeftScale()
      local rsc=rc:GetRightScale()
      if lsc>rsc then lsc,rsc=rsc,lsc end
      if Duel.IsExistingMatchingCard(c101112030.thfilter2,tp,LOCATION_EXTRA,0,1,nil,lsc,rsc) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112030.thfilter2,tp,LOCATION_EXTRA,0,1,2,nil,lsc,rsc)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      Duel.ResetFlagEffect(tp,101112030)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetTargetRange(1,0)
      e1:SetCondition(c101112030.discon)
      e1:SetValue(c101112030.actlimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_DISABLE)
      e2:SetTargetRange(LOCATION_PZONE,0)
      e2:SetCondition(c101112030.discon)
      e2:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e2,tp)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_CHAIN_SOLVING)
      e3:SetCondition(c101112030.discon)
      e3:SetOperation(c101112030.disop)
      e3:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e3,tp)
      end
      function c101112030.actlimit(e,re,tp)
      return re:IsActiveType(TYPE_MONSTER)
      end
      function c101112030.discon(e)
      local tp=e:GetHandlerPlayer()
      return Duel.GetFlagEffect(tp,101112030)==0
      end
      function c101112030.disop(e,tp,eg,ep,ev,re,r,rp)
      local p,loc=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CONTROLER,CHAININFO_TRIGGERING_LOCATION)
      if re:GetActiveType()==TYPE_PENDULUM+TYPE_SPELL and p==tp and bit.band(loc,LOCATION_PZONE)~=0 then
      Duel.NegateEffect(ev)
      end
      end
      \ No newline at end of file
      script/c101112031.lua deleted 100644 → 0
      View file @ e38d2b74
      --ワナビー！
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --sset
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetRange(LOCATION_HAND+LOCATION_MZONE)
      e1:SetCountLimit(1,id)
      e1:SetCost(s.cost)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      end
      function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToGraveAsCost() end
      Duel.SendtoGrave(c,REASON_COST)
      end
      function s.xfilter(c)
      return c:GetSequence()<5
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>=5-Duel.GetMatchingGroupCount(s.xfilter,tp,0,LOCATION_SZONE,nil) end
      end
      function s.filter(c)
      return c:IsType(TYPE_TRAP) and c:IsSSetable()
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      local ct=5-Duel.GetMatchingGroupCount(s.xfilter,tp,0,LOCATION_SZONE,nil)
      if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<ct then return end
      Duel.ConfirmDecktop(tp,ct)
      local g=Duel.GetDecktopGroup(tp,ct)
      if g:FilterCount(s.filter,nil)>0 and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
      Duel.DisableShuffleCheck()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local sg=g:FilterSelect(tp,s.filter,1,1,nil)
      local tc=sg:GetFirst()
      Duel.SSet(tp,tc)
      local c=e:GetHandler()
      local fid=c:GetFieldID()
      local turn=Duel.GetTurnCount()
      tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1,fid)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_PHASE+PHASE_END)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetCountLimit(1)
      e1:SetLabel(fid,turn)
      e1:SetLabelObject(tc)
      e1:SetCondition(s.tgcon)
      e1:SetOperation(s.tgop)
      e1:SetReset(RESET_PHASE+PHASE_END,2)
      Duel.RegisterEffect(e1,tp)
      g:Sub(sg)
      end
      if #g>0 then
      Duel.SortDecktop(tp,tp,#g)
      for i=1,#g do
      local mg=Duel.GetDecktopGroup(tp,1)
      Duel.MoveSequence(mg:GetFirst(),SEQ_DECKBOTTOM)
      end
      end
      end
      function s.tgcon(e,tp,eg,ep,ev,re,r,rp)
      local fid,turn=e:GetLabel()
      local tc=e:GetLabelObject()
      return tc:GetFlagEffectLabel(id)==fid and turn~=Duel.GetTurnCount()
      end
      function s.tgop(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetLabelObject()
      Duel.SendtoGrave(tc,REASON_EFFECT)
      end
      script/c101112032.lua deleted 100644 → 0
      View file @ e38d2b74
      --ウサミミ導師
      --Bunny Instruct-ear
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --counter
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_COUNTER)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_CHAINING)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCondition(s.condition)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      --remove
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_REMOVE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
      e2:SetCountLimit(1)
      e2:SetTarget(s.rmtg)
      e2:SetOperation(s.rmop)
      c:RegisterEffect(e2)
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      local rc=re:GetHandler()
      return rc:IsOnField() and rc:IsRelateToEffect(re) and re:IsActiveType(TYPE_MONSTER) and not rc:IsCode(id)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return re:GetHandler():IsCanAddCounter(0x1162,1)
      and c:GetFlagEffect(id)==0 end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      c:RegisterFlagEffect(id,RESET_CHAIN,0,1)
      Duel.SetOperationInfo(0,CATEGORY_COUNTER,nil,1,0,0x1162)
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      local rc=re:GetHandler()
      if rc:IsFaceup() and rc:IsRelateToEffect(re) and rc:AddCounter(0x1162,1) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e1:SetCondition(s.indes)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(1)
      rc:RegisterEffect(e1)
      end
      end
      function s.indes(e)
      return e:GetHandler():GetCounter(0x1162)>0
      end
      function s.filter(c)
      return c:GetCounter(0x1162)>0 and c:IsAbleToRemove()
      end
      function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) and chkc~=c end
      if chk==0 then return c:IsAbleToRemove()
      and Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,c)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g+c,2,0,0)
      end
      function s.rmop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if not tc:IsRelateToEffect(e) or not c:IsRelateToEffect(e) then return end
      local g=Group.FromCards(c,tc)
      if Duel.Remove(g,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
      local fid=c:GetFieldID()
      local ct=Duel.GetCurrentPhase()<=PHASE_STANDBY and 2 or 1
      local og=Duel.GetOperatedGroup()
      for oc in aux.Next(og) do
      oc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_STANDBY,0,ct,fid)
      end
      og:KeepAlive()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e1:SetCountLimit(1)
      e1:SetLabel(fid,Duel.GetTurnCount()+1)
      e1:SetLabelObject(og)
      e1:SetCondition(s.retcon)
      e1:SetOperation(s.retop)
      e1:SetReset(RESET_PHASE+PHASE_STANDBY,ct)
      Duel.RegisterEffect(e1,tp)
      end
      end
      function s.retfilter(c,fid)
      return c:GetFlagEffectLabel(id)==fid
      end
      function s.retcon(e,tp,eg,ep,ev,re,r,rp)
      local fid,ct=e:GetLabel()
      if Duel.GetTurnCount()<ct then return false end
      local g=e:GetLabelObject()
      if not g:IsExists(s.retfilter,1,nil,fid) then
      g:DeleteGroup()
      e:Reset()
      return false
      else return true end
      end
      function s.retop(e,tp,eg,ep,ev,re,r,rp)
      local fid,ct=e:GetLabel()
      local g=e:GetLabelObject()
      local sg=g:Filter(s.retfilter,nil,fid)
      g:DeleteGroup()
      for tc in aux.Next(sg) do Duel.ReturnToField(tc) end
      end
      script/c101112033.lua deleted 100644 → 0
      View file @ e38d2b74
      --サイバース・セイジ
      --Script by 奥克斯
      function c101112033.initial_effect(c)
      c:EnableReviveLimit()
      --fusion summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112033,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1,101112033)
      e1:SetTarget(c101112033.fsptg)
      e1:SetOperation(c101112033.fspop)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_BE_MATERIAL)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,101112033+100)
      e2:SetCondition(c101112033.thcon)
      e2:SetTarget(c101112033.thtg)
      e2:SetOperation(c101112033.thop)
      c:RegisterEffect(e2)
      end
      function c101112033.filter1(c,e)
      return c:IsOnField() and c:IsAbleToRemove() and not c:IsImmuneToEffect(e)
      end
      function c101112033.filter2(c,e,tp,m,f,chkf)
      return c:IsType(TYPE_FUSION) and (not f or f(c))
      and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
      end
      function c101112033.filter3(c)
      return c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToRemove()
      end
      function c101112033.fcheck(tp,sg,fc)
      return sg:IsExists(Card.IsRace,1,nil,RACE_CYBERSE)
      end
      function c101112033.fsptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local chkf=tp
      local mg1=Duel.GetFusionMaterial(tp):Filter(c101112033.filter1,nil,e)
      local mg2=Duel.GetMatchingGroup(c101112033.filter3,tp,LOCATION_GRAVE,0,nil)
      mg1:Merge(mg2)
      aux.FCheckAdditional=c101112033.fcheck
      local res=Duel.IsExistingMatchingCard(c101112033.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
      if not res then
      local ce=Duel.GetChainMaterial(tp)
      if ce~=nil then
      local fgroup=ce:GetTarget()
      local mg3=fgroup(ce,e,tp)
      local mf=ce:GetValue()
      res=Duel.IsExistingMatchingCard(c101112033.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,chkf)
      end
      end
      aux.FCheckAdditional=nil
      return res
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_ONFIELD+LOCATION_GRAVE)
      end
      function c101112033.fspop(e,tp,eg,ep,ev,re,r,rp)
      local chkf=tp
      local mg1=Duel.GetFusionMaterial(tp):Filter(c101112033.filter1,nil,e)
      local mg2=Duel.GetMatchingGroup(c101112033.filter3,tp,LOCATION_GRAVE,0,nil)
      mg1:Merge(mg2)
      aux.FCheckAdditional=c101112033.fcheck
      local sg1=Duel.GetMatchingGroup(c101112033.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
      local mg3=nil
      local sg2=nil
      local ce=Duel.GetChainMaterial(tp)
      if ce~=nil then
      local fgroup=ce:GetTarget()
      mg3=fgroup(ce,e,tp)
      local mf=ce:GetValue()
      sg2=Duel.GetMatchingGroup(c101112033.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,chkf)
      end
      if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
      local sg=sg1:Clone()
      if sg2 then sg:Merge(sg2) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local tg=sg:Select(tp,1,1,nil)
      local tc=tg:GetFirst()
      if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
      local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
      tc:SetMaterial(mat1)
      Duel.Remove(mat1,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
      Duel.BreakEffect()
      Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
      else
      local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,nil,chkf)
      local fop=ce:GetOperation()
      fop(ce,e,tp,tc,mat2)
      end
      tc:CompleteProcedure()
      end
      aux.FCheckAdditional=nil
      end
      function c101112033.thcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsLocation(LOCATION_GRAVE) and r==REASON_SYNCHRO
      end
      function c101112033.thfilter(c)
      local b1=c:IsRace(RACE_CYBERSE)
      local b2=c:GetType()==TYPE_SPELL+TYPE_RITUAL
      return (b1 or b2) and c:IsAbleToHand()
      end
      function c101112033.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112033.thfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112033.thfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,c101112033.thfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c101112033.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      script/c101112034.lua deleted 100644 → 0
      View file @ e38d2b74
      --サイバース・ディセーブルム
      --Script by 奥克斯
      function c101112034.initial_effect(c)
      --fusion material
      c:EnableReviveLimit()
      aux.AddFusionProcFun2(c,c101112034.matfilter,aux.FilterBoolFunction(Card.IsRace,RACE_CYBERSE),true)
      --Special Summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112034,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1,101112034)
      e1:SetTarget(c101112034.sptg)
      e1:SetOperation(c101112034.spop)
      c:RegisterEffect(e1)
      --negate
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112034,1))
      e2:SetCategory(CATEGORY_NEGATE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
      e2:SetCode(EVENT_CHAINING)
      e2:SetRange(LOCATION_MZONE+LOCATION_GRAVE)
      e2:SetCountLimit(1,101112034+100)
      e2:SetCondition(c101112034.negcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c101112034.negtg)
      e2:SetOperation(c101112034.negop)
      c:RegisterEffect(e2)
      end
      function c101112034.matfilter(c)
      return c:IsFusionType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK) and c:IsRace(RACE_CYBERSE)
      end
      function c101112034.spfilter(c,e,tp)
      return c:IsRace(RACE_CYBERSE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112034.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112034.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c101112034.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<1 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c101112034.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      local c=e:GetHandler()
      if #g>0 then
      local tc=g:GetFirst()
      if Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)>0
      and c:IsFaceup() and c:IsRelateToChain()
      and c:GetLevel()>0 and c:GetLevel()~=tc:GetLevel()
      and Duel.SelectYesNo(tp,aux.Stringid(101112034,2)) then
      Duel.BreakEffect()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CHANGE_LEVEL)
      e1:SetValue(tc:GetLevel())
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      end
      end
      end
      function c101112034.cfilter(c)
      return c:IsRace(RACE_CYBERSE) and c:IsType(TYPE_LINK) and c:IsLinkAbove(4)
      end
      function c101112034.negcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not Duel.IsExistingMatchingCard(c101112034.cfilter,tp,LOCATION_MZONE,0,1,nil) then return false end
      return not c:IsStatus(STATUS_BATTLE_DESTROYED) and ep~=tp and re:IsActiveType(TYPE_SPELL+TYPE_TRAP) and Duel.IsChainNegatable(ev)
      end
      function c101112034.negtg(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)
      end
      function c101112034.negop(e,tp,eg,ep,ev,re,r,rp)
      Duel.NegateActivation(ev)
      end
      script/c101112035.lua deleted 100644 → 0
      View file @ e38d2b74
      --真炎竜アルビオン
      --Script by 奥克斯
      function c101112035.initial_effect(c)
      --fusion material
      c:EnableReviveLimit()
      aux.AddFusionProcCodeFun(c,68468459,c101112035.matfilter,1,true,true)
      --cannot fusion material
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
      e0:SetValue(1)
      c:RegisterEffect(e0)
      --cannot be target
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetValue(aux.tgoval)
      c:RegisterEffect(e1)
      --special summon grave 2
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112035,0))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e3:SetCountLimit(1,101112035)
      e3:SetCondition(c101112035.spcon)
      e3:SetTarget(c101112035.sptg)
      e3:SetOperation(c101112035.spop)
      c:RegisterEffect(e3)
      --Special Summon itself
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_IGNITION)
      e4:SetRange(LOCATION_GRAVE)
      e4:SetCountLimit(1,101112035+100)
      e4:SetTarget(c101112035.spittg)
      e4:SetOperation(c101112035.spitop)
      c:RegisterEffect(e4)
      end
      function c101112035.branded_fusion_check(tp,sg,fc)
      return aux.gffcheck(sg,Card.IsFusionCode,68468459,c101112035.matfilter)
      end
      function c101112035.matfilter(c)
      return c:IsFusionAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER)
      end
      function c101112035.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()~=tp
      end
      function c101112035.spfilter(c,e,tp)
      return c:IsCanBeEffectTarget(e) and c:IsType(TYPE_MONSTER)
      end
      function c101112035.spsumfilter1(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp)
      end
      function c101112035.spsumfilter2(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,1-tp)
      end
      function c101112035.gcheck(g,e,tp)
      if #g~=2 then return false end
      local ac=g:GetFirst()
      local bc=g:GetNext()
      return c101112035.spsumfilter1(ac,e,tp) and c101112035.spsumfilter2(bc,e,tp)
      or c101112035.spsumfilter1(bc,e,tp) and c101112035.spsumfilter2(ac,e,tp)
      end
      function c101112035.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      local g=Duel.GetMatchingGroup(c101112035.spfilter,tp,LOCATION_GRAVE,LOCATION_GRAVE,nil,e,tp)
      if chk==0 then
      local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local ft2=Duel.GetLocationCount(1-tp,LOCATION_MZONE,tp)
      return not Duel.IsPlayerAffectedByEffect(tp,59822133) and ft1>0 and ft2>0
      and g:CheckSubGroup(c101112035.gcheck,2,2,e,tp)
      end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:SelectSubGroup(tp,c101112035.gcheck,false,2,2,e,tp)
      Duel.SetTargetCard(sg)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,PLAYER_ALL,LOCATION_GRAVE)
      end
      function c101112035.spop(e,tp,eg,ep,ev,re,r,rp)
      local ft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local ft2=Duel.GetLocationCount(1-tp,LOCATION_MZONE,tp)
      if Duel.IsPlayerAffectedByEffect(tp,59822133) or ft1<=0 or ft2<=0 then return end
      local g=Duel.GetTargetsRelateToChain()
      if not g:CheckSubGroup(c101112035.gcheck,2,2,e,tp) then return end
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(101112035,1))
      local sg=g:FilterSelect(tp,c101112035.spsumfilter1,1,1,nil,e,tp)
      Duel.SpecialSummonStep(sg:GetFirst(),0,tp,tp,false,false,POS_FACEUP)
      Duel.SpecialSummonStep((g-sg):GetFirst(),0,tp,1-tp,false,false,POS_FACEUP)
      Duel.SpecialSummonComplete()
      end
      function c101112035.rfilter(c)
      return c:IsReleasableByEffect() and (c:GetSequence()>4 or c:GetSequence()==2)
      end
      function c101112035.spittg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      local rg=Duel.GetMatchingGroup(c101112035.rfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil,e,tp)
      if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false) and #rg>=4 and Duel.GetMZoneCount(tp,rg)>0 end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_RELEASE,rg,4,0,0)
      end
      function c101112035.spitop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local rg=Duel.GetMatchingGroup(c101112035.rfilter,tp,LOCATION_MZONE,LOCATION_MZONE,nil)
      if #rg==4 and Duel.Release(rg,REASON_EFFECT)==4 and c:IsRelateToEffect(e) then
      Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101112036.lua deleted 100644 → 0
      View file @ e38d2b74
      --ヴィシャス＝アストラウド
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      --fusion material
      c:EnableReviveLimit()
      aux.AddFusionProcCodeFun(c,56099748,s.matfilter,1,true,true)
      aux.AddContactFusionProcedure(c,Card.IsAbleToRemoveAsCost,LOCATION_ONFIELD+LOCATION_GRAVE,0,Duel.Remove,POS_FACEUP,REASON_COST)
      --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)
      c:RegisterEffect(e0)
      --Destroy
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetTarget(s.destg)
      e1:SetOperation(s.desop)
      c:RegisterEffect(e1)
      --indes
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e2:SetValue(1)
      c:RegisterEffect(e2)
      end
      function s.matfilter(c)
      return c:IsAttack(1500) and c:IsDefense(2100)
      end
      function s.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local c=e:GetHandler()
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc~=c end
      if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,c)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function s.desop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)>0
      and c:IsRelateToEffect(e) and c:IsFaceup() then
      local upval=tc:GetBaseAttack()
      if tc:GetBaseAttack()<tc:GetBaseDefense() then
      upval=tc:GetBaseDefense()
      end
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(upval/2)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      end
      end
      script/c101112037.lua deleted 100644 → 0
      View file @ e38d2b74
      --騎甲虫クルーエル・サターン
      --Script by 奥克斯
      function c101112037.initial_effect(c)
      --fusion material
      c:EnableReviveLimit()
      aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x170),aux.FilterBoolFunction(Card.IsRace,RACE_INSECT),true)
      --to hand
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCountLimit(1,101112037)
      e1:SetTarget(c101112037.thtg)
      e1:SetOperation(c101112037.thop)
      c:RegisterEffect(e1)
      --splimit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetTargetRange(1,0)
      e2:SetTarget(c101112037.splimit)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112037,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_REMOVE)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,101112037+100)
      e3:SetCondition(c101112037.spcon)
      e3:SetTarget(c101112037.sptg)
      e3:SetOperation(c101112037.spop)
      c:RegisterEffect(e3)
      end
      function c101112037.thfilter(c)
      return c:IsSetCard(0x170) and c:IsAbleToHand()
      end
      function c101112037.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112037.thfilter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112037.thop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112037.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 c101112037.splimit(e,c,sump,sumtype,sumpos,targetp,se)
      return not c:IsRace(RACE_INSECT)
      end
      function c101112037.ctfilter(c)
      local chk1=c:IsRace(RACE_INSECT) or c:GetPreviousRaceOnField()&RACE_INSECT~=0
      local chk2=c:IsType(TYPE_MONSTER) or c:GetPreviousTypeOnField()&TYPE_MONSTER~=0
      return not c:IsType(TYPE_TOKEN) and c:IsFaceup() and chk1 and chk2
      end
      function c101112037.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112037.ctfilter,1,nil)
      end
      function c101112037.spfilter(c,e,tp)
      if c:IsFacedown() then return false end
      return c:IsSetCard(0x170) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112037.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and c101112037.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c101112037.spfilter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112037.spfilter,tp,LOCATION_REMOVED,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c101112037.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
      \ No newline at end of file
      script/c101112038.lua deleted 100644 → 0
      View file @ e38d2b74
      --双天の獅使－阿吽
      --Script by 奥克斯
      function c101112038.initial_effect(c)
      --fusion summon
      c:EnableReviveLimit()
      aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsSetCard,0x14f),2,true)
      --effect gain
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
      e0:SetCode(EVENT_SPSUMMON_SUCCESS)
      e0:SetCondition(c101112038.regcon)
      e0:SetOperation(c101112038.regop)
      c:RegisterEffect(e0)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_DESTROYED)
      e3:SetCondition(c101112038.spcon)
      e3:SetTarget(c101112038.sptg)
      e3:SetOperation(c101112038.spop)
      c:RegisterEffect(e3)
      end
      function c101112038.regcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_FUSION)
      end
      function c101112038.regop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=c:GetMaterial()
      if #g==0 then return end
      if g:IsExists(Card.IsType,1,nil,TYPE_EFFECT) then
      c:RegisterFlagEffect(85360035,RESET_EVENT+RESETS_STANDARD,0,1)
      end
      if g:IsExists(Card.IsOriginalCodeRule,1,nil,33026283) then
      --atk down
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetCondition(c101112038.atkcon)
      e1:SetTarget(c101112038.atktg)
      e1:SetValue(3000)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101112038,0))
      end
      if g:IsExists(Card.IsOriginalCodeRule,1,nil,284224) then
      --remove
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112038,2))
      e2:SetCategory(CATEGORY_REMOVE)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e2:SetCountLimit(1)
      e2:SetCondition(c101112038.rmcon)
      e2:SetTarget(c101112038.rmtg)
      e2:SetOperation(c101112038.rmop)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e2)
      c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101112038,1))
      end
      end
      function c101112038.atkcon(e)
      local tp=e:GetHandlerPlayer()
      local a=Duel.GetBattleMonster(tp)
      return Duel.GetCurrentPhase()==PHASE_DAMAGE_CAL and a and a:IsSetCard(0x14f)
      end
      function c101112038.atktg(e,c)
      local tp=e:GetHandlerPlayer()
      local a=Duel.GetBattleMonster(tp)
      return c==a
      end
      function c101112038.rmcon(e)
      return Duel.GetTurnPlayer()~=e:GetHandlerPlayer()
      end
      function c101112038.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c101112038.rmop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
      end
      end
      function c101112038.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 c101112038.spfilter(c,e,tp)
      return c:IsCode(85360035,11759079) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112038.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft<2 or Duel.IsPlayerAffectedByEffect(tp,59822133) then return false end
      local g=Duel.GetMatchingGroup(c101112038.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
      return g:CheckSubGroup(aux.dncheck,2,2)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,2,tp,LOCATION_DECK)
      end
      function c101112038.spop(e,tp,eg,ep,ev,re,r,rp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft<2 or Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
      local g=Duel.GetMatchingGroup(c101112038.spfilter,tp,LOCATION_DECK,0,nil,e,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:SelectSubGroup(tp,aux.dncheck,false,2,2)
      if not sg then return end
      local tc=sg:GetFirst()
      for tc in aux.Next(sg) do
      if Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e1:SetValue(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_INDESTRUCTABLE_EFFECT)
      e2:SetValue(1)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e2)
      tc:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101112038,3))
      end
      end
      Duel.SpecialSummonComplete()
      end
      script/c101112039.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重天神マスラ－O
      --Script by 奥克斯
      function c101112039.initial_effect(c)
      --synchro summon
      aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
      c:EnableReviveLimit()
      --defense attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DEFENSE_ATTACK)
      e1:SetValue(1)
      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_MZONE)
      e2:SetTarget(c101112039.reptg)
      e2:SetValue(c101112039.repval)
      e2:SetOperation(c101112039.repop)
      c:RegisterEffect(e2)
      --draw
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112039,0))
      e3:SetCategory(CATEGORY_DRAW)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_CHAINING)
      e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_PLAYER_TARGET)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1)
      e3:SetCondition(c101112039.drcon)
      e3:SetTarget(c101112039.drtg)
      e3:SetOperation(c101112039.drop)
      c:RegisterEffect(e3)
      end
      function c101112039.filter1(c,tp)
      return not c:IsReason(REASON_REPLACE) and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp)
      and c:IsFaceup() and c:IsSetCard(0x9a) and c:IsReason(REASON_EFFECT+REASON_BATTLE)
      end
      function c101112039.filter2(c,e)
      return c:IsSetCard(0x9a) and c:IsFaceup() and c:IsDestructable(e) and not c:IsStatus(STATUS_DESTROY_CONFIRMED)
      end
      function c101112039.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=eg:Filter(c101112039.filter1,nil,tp)
      local tg=Duel.GetMatchingGroup(c101112039.filter2,tp,LOCATION_ONFIELD,0,nil,e)
      if chk==0 then return #g>0 and #tg>0 end
      if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESREPLACE)
      local xg=tg:Select(tp,1,1,nil)
      Duel.SetTargetCard(xg)
      xg:GetFirst():SetStatus(STATUS_DESTROY_CONFIRMED,true)
      return true
      else return false end
      end
      function c101112039.repval(e,c)
      return c101112039.filter1(c,e:GetHandlerPlayer())
      end
      function c101112039.repop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_CARD,0,101112039)
      local tc=Duel.GetFirstTarget()
      tc:SetStatus(STATUS_DESTROY_CONFIRMED,false)
      Duel.Destroy(tc,REASON_EFFECT+REASON_REPLACE)
      end
      function c101112039.drcon(e,tp,eg,ep,ev,re,r,rp)
      return rp==1-tp and re:IsActiveType(TYPE_SPELL+TYPE_TRAP)
      end
      function c101112039.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local h=Duel.GetFieldGroupCount(tp,LOCATION_HAND,0)
      if chk==0 then return h<3 and Duel.IsPlayerCanDraw(tp,3-h) end
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(3-h)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,3-h)
      end
      function c101112039.drop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      local h=Duel.GetFieldGroupCount(p,LOCATION_HAND,0)
      if h>=3 then return end
      Duel.Draw(p,3-h,REASON_EFFECT)
      end
      script/c101112040.lua deleted 100644 → 0
      View file @ e38d2b74
      --超重神将シャナ－O
      --Script by 奥克斯
      function c101112040.initial_effect(c)
      --synchro summon
      aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
      c:EnableReviveLimit()
      --pendulum summon
      aux.EnablePendulumAttribute(c,false)
      --spsummon (self)
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112040,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetRange(LOCATION_PZONE)
      e1:SetCode(EVENT_ATTACK_ANNOUNCE)
      e1:SetCountLimit(1,101112040)
      e1:SetCondition(c101112040.spdcon)
      e1:SetTarget(c101112040.spdtg)
      e1:SetOperation(c101112040.spdop)
      c:RegisterEffect(e1)
      --defence attack
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_DEFENSE_ATTACK)
      e2:SetValue(1)
      c:RegisterEffect(e2)
      --spsummon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112040,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetHintTiming(TIMING_BATTLE_START+TIMING_BATTLE_END)
      e3:SetCountLimit(1)
      e3:SetCondition(c101112040.spcon)
      e3:SetTarget(c101112040.sptg)
      e3:SetOperation(c101112040.spop)
      c:RegisterEffect(e3)
      end
      function c101112040.spdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetTurnPlayer()==1-tp
      end
      function c101112040.spdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      local tc=Duel.GetAttacker()
      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,e:GetHandler(),1,0,0)
      if not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP) then
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,tc,1,0,0)
      end
      end
      function c101112040.spdop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetAttacker()
      if not c:IsRelateToEffect(e) or Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)==0 then return end
      if tc and tc:IsRelateToBattle()
      and not Duel.IsExistingMatchingCard(Card.IsType,tp,LOCATION_GRAVE,0,1,nil,TYPE_SPELL+TYPE_TRAP)
      and tc:IsControler(1-tp) and tc:IsFaceup()
      and (tc:GetAttack()>0 or aux.NegateMonsterFilter(tc)) then
      Duel.BreakEffect()
      Duel.NegateRelatedChain(tc,RESET_TURN_SET)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      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:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_SET_ATTACK_FINAL)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      e3:SetValue(0)
      tc:RegisterEffect(e3)
      end
      end
      function c101112040.spcon(e,tp,eg,ep,ev,re,r,rp)
      local ph=Duel.GetCurrentPhase()
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO) and (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE)
      end
      function c101112040.spfilter(c,e,tp)
      return c:IsSetCard(0x9a) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and c:IsFaceupEx()
      end
      function c101112040.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.GetMatchingGroup(c101112040.spfilter,tp,LOCATION_SZONE+LOCATION_GRAVE,0,nil,e,tp)
      if chk==0 then return ft>0 and #g>0 end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_SZONE+LOCATION_GRAVE)
      end
      function c101112040.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(c101112040.spfilter),tp,LOCATION_SZONE+LOCATION_GRAVE,0,nil,e,tp)
      if ft<=0 or #g==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      if Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)>0
      and c:IsRelateToEffect(e) and (Duel.CheckLocation(tp,LOCATION_PZONE,0) or Duel.CheckLocation(tp,LOCATION_PZONE,1))
      and Duel.SelectYesNo(tp,aux.Stringid(101112040,2)) then
      Duel.BreakEffect()
      Duel.MoveToField(c,tp,tp,LOCATION_PZONE,POS_FACEUP,true)
      end
      end
      script/c101112041.lua deleted 100644 → 0
      View file @ e38d2b74
      --深淵の神獣ディス・パテル
      --Script by Ruby
      function c101112041.initial_effect(c)
      --synchro summon
      aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_DRAGON),1)
      c:EnableReviveLimit()
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_MZONE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCountLimit(1,101112041)
      e1:SetTarget(c101112041.sptg)
      e1:SetOperation(c101112041.spop)
      c:RegisterEffect(e1)
      --negative
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112041,0))
      e2:SetCategory(CATEGORY_DISABLE+CATEGORY_TODECK)
      e2:SetCode(EVENT_CHAINING)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,101112141)
      e2:SetCondition(c101112041.discon)
      e2:SetTarget(c101112041.distg)
      e2:SetOperation(c101112041.disop)
      c:RegisterEffect(e2)
      --destroy
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112041,1))
      e3:SetCategory(CATEGORY_DESTROY)
      e3:SetCode(EVENT_CHAINING)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetRange(LOCATION_MZONE)
      e3:SetCountLimit(1,101112141)
      e3:SetCondition(c101112041.descon)
      e3:SetTarget(c101112041.destg)
      e3:SetOperation(c101112041.desop)
      c:RegisterEffect(e3)
      end
      function c101112041.spfilter(c,e,tp)
      return c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK) and c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
      end
      function c101112041.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and c101112041.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c101112041.spfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112041.spfilter,tp,LOCATION_REMOVED,LOCATION_REMOVED,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c101112041.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
      function c101112041.discon(e,tp,eg,ep,ev,re,r,rp)
      return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp==1-tp and re:IsActiveType(TYPE_MONSTER) and Duel.IsChainDisablable(ev)
      end
      function c101112041.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsAbleToDeck() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,0,LOCATION_REMOVED,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,0,LOCATION_REMOVED,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
      end
      function c101112041.disop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      local rc=re:GetHandler()
      if tc and tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 then
      Duel.NegateEffect(ev)
      end
      end
      function c101112041.descon(e,tp,eg,ep,ev,re,r,rp)
      return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and rp==1-tp and re:IsActiveType(TYPE_MONSTER)
      end
      function c101112041.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsAbleToDeck() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToDeck,tp,LOCATION_REMOVED,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,Card.IsAbleToDeck,tp,LOCATION_REMOVED,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
      end
      function c101112041.desop(e,tp,eg,ep,ev,re,r,rp)
      local rc=re:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0 and rc:IsRelateToEffect(re) then
      Duel.Destroy(rc,REASON_EFFECT)
      end
      end
      script/c101112042.lua deleted 100644 → 0
      View file @ e38d2b74
      --赫聖の妖騎士
      --Despian Luluwalilith
      --Script by Chrono-Genex
      function c101112042.initial_effect(c)
      --synchro summon
      aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsLevel,4),aux.NonTuner(nil),1)
      c:EnableReviveLimit()
      --atkup
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112042,0))
      e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_LEAVE_DECK)
      e1:SetRange(LOCATION_MZONE)
      e1:SetCountLimit(1)
      e1:SetCondition(c101112042.atkcon)
      e1:SetTarget(c101112042.atktg)
      e1:SetOperation(c101112042.atkop)
      c:RegisterEffect(e1)
      --special summon
      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:SetOperation(c101112042.regop)
      c:RegisterEffect(e2)
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112042,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_PHASE+PHASE_END)
      e3:SetRange(LOCATION_GRAVE)
      e3:SetCountLimit(1,101112042)
      e3:SetCondition(c101112042.spcon)
      e3:SetTarget(c101112042.sptg)
      e3:SetOperation(c101112042.spop)
      c:RegisterEffect(e3)
      end
      function c101112042.atkcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(Card.IsPreviousLocation,1,nil,LOCATION_EXTRA)
      end
      function c101112042.atktg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end
      end
      function c101112042.atkfilter(c,e)
      return c:IsFaceup() and not c:IsImmuneToEffect(e)
      end
      function c101112042.atkop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(c101112042.atkfilter,tp,LOCATION_MZONE,0,nil,e)
      if g:GetCount()>0 then
      for tc in aux.Next(g) do
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(500)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      local sg=Duel.GetMatchingGroup(aux.NegateAnyFilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,nil)
      if sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(101112042,2)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
      local tg=sg:Select(tp,1,1,nil)
      Duel.HintSelection(tg)
      local sc=tg:GetFirst()
      Duel.NegateRelatedChain(sc,RESET_TURN_SET)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EFFECT_DISABLE)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      sc:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EFFECT_DISABLE_EFFECT)
      e3:SetValue(RESET_TURN_SET)
      sc:RegisterEffect(e3)
      if sc:IsType(TYPE_TRAPMONSTER) then
      local e4=e2:Clone()
      e4:SetCode(EFFECT_DISABLE_TRAPMONSTER)
      sc:RegisterEffect(e4)
      end
      end
      end
      end
      function c101112042.regop(e,tp,eg,ep,ev,re,r,rp)
      e:GetHandler():RegisterFlagEffect(101112042,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END,0,1)
      end
      function c101112042.spcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():GetFlagEffect(101112042)>0
      end
      function c101112042.spfilter(c,e,tp)
      return c:IsAttribute(ATTRIBUTE_LIGHT) and c:IsRace(RACE_SPELLCASTER) and aux.AtkEqualsDef(c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112042.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c101112042.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 c101112042.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,c101112042.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
      script/c101112043.lua deleted 100644 → 0
      View file @ e38d2b74
      --マナドゥム・プライムハート
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --synchro summon
      aux.AddSynchroMixProcedure(c,aux.FilterBoolFunction(Card.IsAttribute,ATTRIBUTE_LIGHT),nil,nil,aux.Tuner(nil),1,99)
      c:EnableReviveLimit()
      --mat check
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_MATERIAL_CHECK)
      e1:SetValue(s.matcheck)
      c:RegisterEffect(e1)
      --synchro summon success
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetCondition(s.regcon)
      e2:SetOperation(s.regop)
      e2:SetLabelObject(e1)
      c:RegisterEffect(e2)
      --special summon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_LEAVE_FIELD)
      e3:SetCondition(s.spcon)
      e3:SetTarget(s.sptg)
      e3:SetOperation(s.spop)
      c:RegisterEffect(e3)
      end
      function s.matcheck(e,c)
      local c=e:GetHandler()
      local g=c:GetMaterial()
      local ct=g:FilterCount(Card.IsType,nil,TYPE_TUNER)
      local check=0
      if g:IsExists(s.filter,1,nil) then
      check=1
      end
      e:SetLabel(ct,check)
      end
      function s.filter(c)
      return c:IsType(TYPE_TUNER) and c:IsSetCard(0x291)
      end
      function s.regcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
      end
      function s.regop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local ct,check=e:GetLabelObject():GetLabel()
      if ct>1 then
      --multi attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_EXTRA_ATTACK)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(ct-1)
      c:RegisterEffect(e1)
      end
      if check>0 then
      --cannot target
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CLIENT_HINT)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      e2:SetValue(aux.tgoval)
      c:RegisterEffect(e2)
      end
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsPreviousPosition(POS_FACEUP) and c:IsSummonType(SUMMON_TYPE_SYNCHRO) and c:IsPreviousLocation(LOCATION_MZONE)
      and c:IsPreviousControler(tp) and c:GetReasonPlayer()==1-tp
      end
      function s.spfilter(c,e,tp)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100)
      return c:IsFaceupEx() and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and (b1 or b2)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil,e,tp)
      if #g>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101112044.lua deleted 100644 → 0
      View file @ e38d2b74
      --カオス・アンヘル-混沌の双翼-
      --Script by Ruby
      function c101112044.initial_effect(c)
      --synchro summon
      c:EnableReviveLimit()
      aux.AddSynchroMixProcedure(c,c101112044.matfilter1,nil,nil,c101112044.matfilter2,1,99)
      --remove
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112044,2))
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetTarget(c101112044.rmtg)
      e1:SetOperation(c101112044.rmop)
      c:RegisterEffect(e1)
      --mat check
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_MATERIAL_CHECK)
      e2:SetValue(c101112044.valcheck)
      c:RegisterEffect(e2)
      --synchro success
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetCondition(c101112044.regcon)
      e3:SetOperation(c101112044.regop)
      c:RegisterEffect(e3)
      e3:SetLabelObject(e2)
      end
      function c101112044.matfilter1(c)
      return c:IsSynchroType(TYPE_TUNER) or c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)
      end
      function c101112044.matfilter2(c,syncard)
      return c:IsNotTuner(syncard) and c:IsAttribute(ATTRIBUTE_LIGHT+ATTRIBUTE_DARK)
      end
      function c101112044.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsAbleToRemove() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function c101112044.rmop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
      end
      end
      function c101112044.valcheck(e,c)
      local g=c:GetMaterial()
      local att=0
      local tc=g:GetFirst()
      while tc do
      att=bit.bor(att,tc:GetOriginalAttribute())
      tc=g:GetNext()
      end
      e:SetLabel(att)
      end
      function c101112044.regcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
      and e:GetLabelObject():GetLabel()~=0
      end
      function c101112044.regop(e,tp,eg,ep,ev,re,r,rp)
      local att=e:GetLabelObject():GetLabel()
      local c=e:GetHandler()
      if bit.band(att,ATTRIBUTE_LIGHT)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_IMMUNE_EFFECT)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(aux.TargetBoolFunction(Card.IsType,TYPE_SYNCHRO))
      e1:SetValue(c101112044.efilter)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e1)
      Duel.AdjustInstantly(c)
      c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101112044,0))
      end
      if bit.band(att,ATTRIBUTE_DARK)~=0 then
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetTargetRange(LOCATION_MZONE,0)
      e2:SetValue(1)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      c:RegisterEffect(e2)
      Duel.AdjustInstantly(c)
      c:RegisterFlagEffect(0,RESET_EVENT+RESETS_STANDARD,EFFECT_FLAG_CLIENT_HINT,1,0,aux.Stringid(101112044,1))
      end
      end
      function c101112044.efilter(e,re)
      return re:GetOwnerPlayer()~=e:GetOwnerPlayer() and re:IsActivated()
      and re:IsActiveType(TYPE_MONSTER)
      end
      script/c101112045.lua deleted 100644 → 0
      View file @ e38d2b74
      --星騎士 セイクリッド・カドケウス
      --Script by 奥克斯
      function c101112045.initial_effect(c)
      c:EnableReviveLimit()
      aux.AddXyzProcedure(c,nil,4,2,nil,nil,99)
      Duel.EnableGlobalFlag(GLOBALFLAG_XMAT_COUNT_LIMIT)
      --to hand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112045,0))
      e1:SetCategory(CATEGORY_TOHAND)
      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,101112045)
      e1:SetCondition(c101112045.thcon)
      e1:SetTarget(c101112045.thtg)
      e1:SetOperation(c101112045.thop)
      c:RegisterEffect(e1)
      --star_knight_summon_effect_copy
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112045,1))
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCountLimit(1,101112045+100)
      e2:SetTarget(c101112045.copytg)
      e2:SetOperation(c101112045.copyop)
      c:RegisterEffect(e2)
      end
      function c101112045.thcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsSummonType(SUMMON_TYPE_XYZ)
      end
      function c101112045.thfilter(c,e)
      return c:IsSetCard(0x9c,0x53) and c:IsCanBeEffectTarget(e) and c:IsAbleToHand()
      end
      function c101112045.fselect(g)
      if #g==1 then return true end
      return aux.gfcheck(g,Card.IsSetCard,0x9c,0x53)
      end
      function c101112045.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112045.thfilter(chkc,e) end
      local g=Duel.GetMatchingGroup(c101112045.thfilter,tp,LOCATION_GRAVE,0,nil,e)
      if chk==0 then return #g>0 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=g:SelectSubGroup(tp,c101112045.fselect,false,1,2)
      Duel.SetTargetCard(sg)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c101112045.thop(e,tp,eg,ep,ev,re,r,rp)
      local tg=Duel.GetTargetsRelateToChain()
      if #tg==0 then return end
      Duel.SendtoHand(tg,nil,REASON_EFFECT)
      end
      function c101112045.efffilter(c,e,tp,eg,ep,ev,re,r,rp)
      if not (c:IsSetCard(0x9c,0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()) then return false end
      local te=c.star_knight_summon_effect
      if not te then return false end
      local tg=te:GetTarget()
      return not tg or tg(e,tp,eg,ep,ev,re,r,rp,0,nil,c)
      end
      function c101112045.copytg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then
      return e:IsCostChecked() and c:CheckRemoveOverlayCard(tp,1,REASON_COST)
      and Duel.IsExistingMatchingCard(c101112045.efffilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp,eg,ep,ev,re,r,rp)
      end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,c101112045.efffilter,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
      c:RemoveOverlayCard(tp,1,1,REASON_COST)
      Duel.Remove(g,POS_FACEUP,REASON_COST)
      local tc=g:GetFirst()
      Duel.ClearTargetCard()
      e:SetLabelObject(tc)
      local te=tc.star_knight_summon_effect
      local tg=te:GetTarget()
      if tg then tg(e,tp,eg,ep,ev,re,r,rp,1) end
      Duel.ClearOperationInfo(0)
      end
      function c101112045.copyop(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetLabelObject()
      local te=tc.star_knight_summon_effect
      local op=te:GetOperation()
      if op then op(e,tp,eg,ep,ev,re,r,rp) end
      end
      script/c101112046.lua deleted 100644 → 0
      View file @ e38d2b74
      --電脳堺虎－虎々
      --Script by 奥克斯
      function c101112046.initial_effect(c)
      --xyz summon
      aux.AddXyzProcedure(c,nil,9,2,nil,nil,99)
      c:EnableReviveLimit()
      --direct attack
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_DIRECT_ATTACK)
      e1:SetCondition(c101112046.efcon1)
      c:RegisterEffect(e1)
      --immune
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetCode(EFFECT_IMMUNE_EFFECT)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(c101112046.efcon2)
      e2:SetValue(c101112046.immval)
      c:RegisterEffect(e2)
      --Effect 3
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112046,0))
      e3:SetCategory(CATEGORY_DISABLE)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_MZONE)
      e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e3:SetCountLimit(1)
      e3:SetCost(c101112046.discost)
      e3:SetTarget(c101112046.distg)
      e3:SetOperation(c101112046.disop)
      c:RegisterEffect(e3)
      end
      function c101112046.efcon1(e)
      local ct=Duel.GetMatchingGroupCount(aux.AND(Card.IsFaceup,Card.IsSetCard),e:GetHandlerPlayer(),LOCATION_ONFIELD,0,nil,0x114e)
      return ct>=2
      end
      function c101112046.efcon2(e)
      local ct=Duel.GetMatchingGroupCount(aux.AND(Card.IsFaceup,Card.IsSetCard),e:GetHandlerPlayer(),LOCATION_ONFIELD,0,nil,0x114e)
      return ct==4
      end
      function c101112046.immval(e,re)
      local rc=re:GetHandler()
      return re:IsActivated() and not rc:IsSetCard(0x14e)
      end
      function c101112046.discost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
      e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
      end
      function c101112046.filter1(c,tp)
      return c:IsType(TYPE_EFFECT) and aux.NegateEffectMonsterFilter(c)
      and Duel.IsExistingTarget(c101112046.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,c,c)
      end
      function c101112046.filter2(c,tc)
      return c:IsType(TYPE_EFFECT) and aux.NegateEffectMonsterFilter(c)
      and not c:IsRace(tc:GetRace()) and not c:IsAttribute(tc:GetAttribute())
      end
      function c101112046.distg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(c101112046.filter1,tp,LOCATION_MZONE,0,1,nil,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
      local g1=Duel.SelectTarget(tp,c101112046.filter1,tp,LOCATION_MZONE,0,1,1,nil,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISABLE)
      local g2=Duel.SelectTarget(tp,c101112046.filter2,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,g1:GetFirst(),g1:GetFirst())
      g1:Merge(g2)
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,g1,#g1,0,0)
      end
      function c101112046.disop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetTargetsRelateToChain():Filter(Card.IsFaceup,nil)
      if #g==0 then return end
      for tc in aux.Next(g) do
      if tc:IsCanBeDisabledByEffect(e) then
      Duel.NegateRelatedChain(tc,RESET_TURN_SET)
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      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:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      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
      \ No newline at end of file
      script/c101112047.lua deleted 100644 → 0
      View file @ e38d2b74
      --ファイアウォール・ドラゴン・シンギュラリティ
      --Script by 奥克斯
      function c101112047.initial_effect(c)
      --link summon
      aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),3)
      c:EnableReviveLimit()
      --return tohand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112047,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetRange(LOCATION_MZONE)
      e1:SetHintTiming(TIMING_DAMAGE_STEP,TIMING_DAMAGE_STEP+TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e1:SetCountLimit(1,101112047)
      e1:SetCondition(aux.dscon)
      e1:SetTarget(c101112047.thtg)
      e1:SetOperation(c101112047.thop)
      c:RegisterEffect(e1)
      --Special Summon
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCode(EVENT_BATTLE_DESTROYED)
      e2:SetCondition(c101112047.regcon)
      e2:SetOperation(c101112047.regop)
      c:RegisterEffect(e2)
      local e3=e2:Clone()
      e3:SetCode(EVENT_TO_GRAVE)
      e3:SetCondition(c101112047.regcon2)
      c:RegisterEffect(e3)
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(101112047,1))
      e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e4:SetCode(EVENT_CUSTOM+101112047)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCountLimit(1,101112047+100)
      e4:SetTarget(c101112047.sptg)
      e4:SetOperation(c101112047.spop)
      c:RegisterEffect(e4)
      end
      function c101112047.filter(c)
      return c:IsType(TYPE_MONSTER) and c:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ) and c:IsFaceupEx()
      end
      function c101112047.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_ONFIELD+LOCATION_GRAVE) and chkc:IsControler(1-tp) and chkc:IsAbleToHand() end
      local g=Duel.GetMatchingGroup(c101112047.filter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,nil)
      if chk==0 then return #g>0 and Duel.IsExistingTarget(Card.IsAbleToHand,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,nil) end
      local ct=0
      for i,type in ipairs({TYPE_RITUAL,TYPE_FUSION,TYPE_SYNCHRO,TYPE_XYZ}) do
      if g:IsExists(Card.IsType,1,nil,type) then
      ct=ct+1
      end
      end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
      local g=Duel.SelectTarget(tp,Card.IsAbleToHand,tp,0,LOCATION_ONFIELD+LOCATION_GRAVE,1,ct,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,#g,0,0)
      end
      function c101112047.thop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local g=Duel.GetTargetsRelateToChain()
      if #g==0 then return end
      local ct=Duel.SendtoHand(g,nil,REASON_EFFECT)
      if ct>0 and c:IsFaceup() and c:IsRelateToEffect(e) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(ct*500)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      end
      end
      function c101112047.cfilter(c,tp,zone)
      local seq=c:GetPreviousSequence()
      if c:IsPreviousControler(1-tp) then seq=seq+16 end
      return c:IsPreviousLocation(LOCATION_MZONE) and bit.extract(zone,seq)~=0
      end
      function c101112047.regcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112047.cfilter,1,nil,tp,e:GetHandler():GetLinkedZone())
      end
      function c101112047.cfilter2(c,tp,zone)
      return not c:IsReason(REASON_BATTLE) and c101112047.cfilter(c,tp,zone)
      end
      function c101112047.regcon2(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112047.cfilter2,1,nil,tp,e:GetHandler():GetLinkedZone())
      end
      function c101112047.regop(e,tp,eg,ep,ev,re,r,rp)
      Duel.RaiseSingleEvent(e:GetHandler(),EVENT_CUSTOM+101112047,e,0,tp,0,0)
      end
      function c101112047.spfilter(c,e,tp)
      return c:IsRace(RACE_CYBERSE) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112047.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112047.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c101112047.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112047.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c101112047.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/c101112048.lua deleted 100644 → 0
      View file @ e38d2b74
      --プロテクトコード・トーカー
      --Script by 奥克斯
      function c101112048.initial_effect(c)
      --link summon
      aux.AddLinkProcedure(c,aux.FilterBoolFunction(Card.IsLinkType,TYPE_EFFECT),2)
      c:EnableReviveLimit()
      --cannot be target
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c101112048.imetg)
      e1:SetValue(aux.tgoval)
      c:RegisterEffect(e1)
      --indes
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetTargetRange(LOCATION_MZONE,0)
      e2:SetTarget(c101112048.imetg)
      e2:SetValue(1)
      c:RegisterEffect(e2)
      --Special Summon
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112048,0))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_QUICK_O)
      e3:SetCode(EVENT_FREE_CHAIN)
      e3:SetRange(LOCATION_GRAVE)
      e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e3:SetCountLimit(1,101112048)
      e3:SetCondition(c101112048.spcon)
      e3:SetCost(c101112048.spcost)
      e3:SetTarget(c101112048.sptg)
      e3:SetOperation(c101112048.spop)
      c:RegisterEffect(e3)
      end
      function c101112048.imetg(e,c)
      return c:IsType(TYPE_LINK) and c:IsLinkAbove(4)
      end
      function c101112048.filter(c)
      return c:IsType(TYPE_LINK) and c:IsSetCard(0x28f)
      end
      function c101112048.spcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c101112048.filter,tp,LOCATION_MZONE,0,1,nil)
      end
      function c101112048.rmfilter(c)
      return c:IsType(TYPE_LINK) and c:IsLinkBelow(3) and c:IsAbleToRemoveAsCost()
      end
      function c101112048.fselect(g)
      return g:GetSum(Card.GetLink)==3
      end
      function c101112048.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      local g=Duel.GetMatchingGroup(c101112048.rmfilter,tp,LOCATION_GRAVE,0,c)
      if chk==0 then return g:CheckSubGroup(c101112048.fselect,1,#g) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local sg=g:SelectSubGroup(tp,c101112048.fselect,false,1,#g)
      Duel.Remove(sg,POS_FACEUP,REASON_COST)
      end
      function c101112048.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 c101112048.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) 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)
      end
      Duel.SpecialSummonComplete()
      end
      script/c101112049.lua deleted 100644 → 0
      View file @ e38d2b74
      --グランドレミコード・クーリア
      --Script by 奥克斯
      function c101112049.initial_effect(c)
      --link summon
      c:EnableReviveLimit()
      aux.AddLinkProcedure(c,nil,2,3,c101112049.lcheck)
      --atk up
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetRange(LOCATION_MZONE)
      e1:SetValue(c101112049.atkval)
      c:RegisterEffect(e1)
      --inactivatable
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CANNOT_DISEFFECT)
      e2:SetRange(LOCATION_MZONE)
      e2:SetValue(c101112049.effectfilter)
      c:RegisterEffect(e2)
      --Effect 3
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(101112049,0))
      e4:SetCategory(CATEGORY_NEGATE+CATEGORY_SPECIAL_SUMMON)
      e4:SetType(EFFECT_TYPE_QUICK_O)
      e4:SetCode(EVENT_CHAINING)
      e4:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCountLimit(1)
      e4:SetCondition(c101112049.spcon)
      e4:SetTarget(c101112049.sptg)
      e4:SetOperation(c101112049.spop)
      c:RegisterEffect(e4)
      end
      function c101112049.lcheck(g,lc)
      return g:IsExists(Card.IsLinkType,1,nil,TYPE_PENDULUM)
      end
      function c101112049.atkval(e,c)
      local ct=Duel.GetMatchingGroupCount(aux.AND(Card.IsFaceup,Card.IsType),e:GetHandlerPlayer(),LOCATION_EXTRA,0,nil,TYPE_PENDULUM)
      return ct*100
      end
      function c101112049.effectfilter(e,ct)
      local lg=e:GetHandler():GetLinkedGroup()
      local te,loc,seq=Duel.GetChainInfo(ct,CHAININFO_TRIGGERING_EFFECT,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_SEQUENCE,CHAININFO_TYPE)
      local tc=te:GetHandler()
      return te:IsActiveType(TYPE_PENDULUM) and bit.band(loc,LOCATION_MZONE)~=0 and bit.extract(e:GetHandler():GetLinkedZone(),seq)~=0
      end
      function c101112049.spcon(e,tp,eg,ep,ev,re,r,rp)
      return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and rp==1-tp
      end
      function c101112049.spfilter(c,e,tp,zone)
      return c:IsSetCard(0x162) and c:GetCurrentScale()%2==1
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,tp,zone)
      end
      function c101112049.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local zone=e:GetHandler():GetLinkedZone(tp)
      return Duel.IsExistingMatchingCard(c101112049.spfilter,tp,LOCATION_PZONE,0,1,nil,e,tp,zone)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_PZONE)
      Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
      end
      function c101112049.tefilter(c)
      return c:IsSetCard(0x162) and c:IsType(TYPE_PENDULUM) and c:GetCurrentScale()%2==0
      end
      function c101112049.spop(e,tp,eg,ep,ev,re,r,rp)
      local zone=e:GetHandler():GetLinkedZone(tp)
      local g=Duel.GetMatchingGroup(c101112049.spfilter,tp,LOCATION_PZONE,0,nil,e,tp,zone)
      if Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone)<=0 or #g==0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      if #sg==0 or Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP,zone)==0 then return end
      if Duel.NegateActivation(ev) and Duel.IsExistingMatchingCard(c101112049.tefilter,tp,LOCATION_DECK,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(101112049,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(101112049,1))
      local exg=Duel.SelectMatchingCard(tp,c101112049.tefilter,tp,LOCATION_DECK,0,1,1,nil)
      Duel.SendtoExtraP(exg,nil,REASON_EFFECT)
      end
      end
      script/c101112050.lua deleted 100644 → 0
      View file @ e38d2b74
      --S－Force ナイトチェイサー
      --Script by 奥克斯
      function c101112050.initial_effect(c)
      --link summon
      aux.AddLinkProcedure(c,c101112050.mat,1,1)
      c:EnableReviveLimit()
      --attack limit
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
      e1:SetRange(LOCATION_MZONE)
      e1:SetTargetRange(0,LOCATION_MZONE)
      e1:SetTarget(c101112050.attg)
      e1:SetValue(c101112050.atlimit)
      c:RegisterEffect(e1)
      --special summon
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112050,0))
      e2:SetCategory(CATEGORY_TODECK+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_MZONE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
      e2:SetCountLimit(1,101112050)
      e2:SetCondition(c101112050.tdcon)
      e2:SetTarget(c101112050.tdtg)
      e2:SetOperation(c101112050.tdop)
      c:RegisterEffect(e2)
      end
      function c101112050.mat(c)
      return c:IsLinkSetCard(0x156) and not c:IsLinkType(TYPE_LINK)
      end
      function c101112050.atfilter(c,tp)
      return c:IsFaceup() and c:IsSetCard(0x156) and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp)
      end
      function c101112050.attg(e,c)
      local cg=c:GetColumnGroup()
      e:SetLabelObject(c)
      return cg:IsExists(c101112050.atfilter,1,nil,e:GetHandlerPlayer())
      end
      function c101112050.atlimit(e,c)
      local lc=e:GetLabelObject()
      return lc:GetColumnGroup():IsContains(c)
      end
      function c101112050.tdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
      end
      function c101112050.tdfilter(c)
      return c:IsFaceup() and c:IsSetCard(0x156) and c:IsAbleToDeck()
      end
      function c101112050.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101112050.tdfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112050.tdfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,c101112050.tdfilter,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
      end
      function c101112050.spfilter(c,e,tp)
      return c:IsSetCard(0x156) and c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112050.tdop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)>0 and tc:IsLocation(LOCATION_DECK+LOCATION_EXTRA) then
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local g=Duel.GetMatchingGroup(c101112050.spfilter,tp,LOCATION_REMOVED,0,nil,e,tp)
      if ft>0 and #g>0 and Duel.SelectYesNo(tp,aux.Stringid(101112050,1)) then
      Duel.BreakEffect()
      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)
      end
      end
      end
      \ No newline at end of file
      script/c101112051.lua deleted 100644 → 0
      View file @ e38d2b74
      --サイバネット・ロールバック
      --Cynet Rollback
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --tohand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id+o)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCondition(s.thcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      end
      function s.filter(c,e,tp)
      return c:IsFaceup() and c:IsRace(RACE_CYBERSE) 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_REMOVED) and chkc:IsControler(tp) and s.filter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(s.filter,tp,LOCATION_REMOVED,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,s.filter,tp,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 and tc:IsRelateToEffect(e) then Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP) end
      end
      function s.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetLP(tp)<=2000
      end
      function s.hfilter(c)
      return c:IsFaceup() and c:IsRace(RACE_CYBERSE) and c:IsAbleToHand()
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(s.hfilter,tp,LOCATION_REMOVED,0,2,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,s.hfilter,tp,LOCATION_REMOVED,0,2,2,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,2,0,0)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetTargetsRelateToChain()
      if #g>0 then
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      end
      end
      script/c101112052.lua deleted 100644 → 0
      View file @ e38d2b74
      --赫聖の相剣
      --Swordsoul of Blazing Awakening
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --remove
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetCondition(s.condition)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      --tohand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id+o)
      e2:SetCondition(s.thcon)
      e2:SetCost(s.thcost)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      end
      function s.filter(c)
      return c:IsFaceup() and c:IsType(TYPE_SYNCHRO)
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_MZONE,0,1,nil)
      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_ONFIELD+LOCATION_GRAVE) and chkc:IsAbleToRemove() and chkc~=c end
      if chk==0 then return Duel.IsExistingTarget(Card.IsAbleToRemove,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,c) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,Card.IsAbleToRemove,tp,LOCATION_ONFIELD+LOCATION_GRAVE,LOCATION_ONFIELD+LOCATION_GRAVE,1,1,c)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) then Duel.Remove(tc,POS_FACEUP,REASON_EFFECT) end
      end
      function s.cfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK)
      end
      function s.thcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(s.cfilter,tp,0,LOCATION_MZONE,1,nil)
      end
      function s.rfilter(c)
      return c:IsType(TYPE_SYNCHRO) and c:IsAbleToRemoveAsCost()
      end
      function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.rfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,s.rfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.Remove(g,POS_FACEUP,REASON_COST)
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToHand() end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,c,1,0,0)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then Duel.SendtoHand(c,nil,REASON_EFFECT) end
      end
      script/c101112053.lua deleted 100644 → 0
      View file @ e38d2b74
      --鉄獣の咆哮
      --Script by 奥克斯 & mercury233
      function c101112053.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_DAMAGE_STEP)
      e1:SetHintTiming(TIMING_DAMAGE_STEP,TIMING_DAMAGE_STEP+TIMING_END_PHASE)
      e1:SetCountLimit(1,101112053+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112053.condition)
      e1:SetTarget(c101112053.target)
      e1:SetOperation(c101112053.activate)
      c:RegisterEffect(e1)
      end
      function c101112053.cfilter(c)
      return c:IsFaceup() and c:IsType(TYPE_LINK)
      end
      function c101112053.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(c101112053.cfilter,tp,LOCATION_MZONE,0,1,nil)
      end
      function c101112053.costfilter(c,tp)
      return c:IsAbleToGraveAsCost() and c:IsSetCard(0x14d)
      and Duel.IsExistingTarget(c101112053.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil,c:GetType())
      end
      function c101112053.tgfilter(c,type)
      if type==nil then return false end
      if not (c:IsFaceup() and c:IsType(TYPE_EFFECT)) then return false end
      if type&TYPE_MONSTER~=0 then
      return c:GetAttack()>0
      elseif type&TYPE_SPELL~=0 then
      return aux.NegateMonsterFilter(c) and Duel.GetCurrentPhase()~=PHASE_DAMAGE
      elseif type&TYPE_TRAP~=0 then
      return c:IsAbleToHand() and Duel.GetCurrentPhase()~=PHASE_DAMAGE
      end
      return false
      end
      function c101112053.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c101112053.tgfilter(chkc,e:GetLabel()) end
      if chk==0 then return e:IsCostChecked()
      and Duel.IsExistingMatchingCard(c101112053.costfilter,tp,LOCATION_EXTRA+LOCATION_DECK,0,1,nil,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c101112053.costfilter,tp,LOCATION_EXTRA+LOCATION_DECK,0,1,1,nil,tp)
      Duel.SendtoGrave(g,REASON_COST)
      local type=g:GetFirst():GetType()
      e:SetLabel(type)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local tag=Duel.SelectTarget(tp,c101112053.tgfilter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil,type)
      if type&TYPE_MONSTER~=0 then
      e:SetCategory(CATEGORY_ATKCHANGE)
      elseif type&TYPE_SPELL~=0 then
      e:SetCategory(CATEGORY_DISABLE)
      Duel.SetOperationInfo(0,CATEGORY_DISABLE,tag,1,0,0)
      elseif type&TYPE_TRAP~=0 then
      e:SetCategory(CATEGORY_TOHAND)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,tag,1,0,0)
      end
      end
      function c101112053.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      local type=e:GetLabel()
      if type==nil then return end
      if tc:IsRelateToEffect(e) then
      if type&TYPE_MONSTER~=0 and tc:IsFaceup() then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetValue(0)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      if type&TYPE_SPELL~=0 and tc:IsFaceup() and tc:IsCanBeDisabledByEffect(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
      if type&TYPE_TRAP~=0 then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      end
      script/c101112054.lua deleted 100644 → 0
      View file @ e38d2b74
      --開かれし大地
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,68468459)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --search
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetRange(LOCATION_FZONE)
      e2:SetProperty(EFFECT_FLAG_DELAY)
      e2:SetCondition(s.condition)
      e2:SetTarget(s.target)
      c:RegisterEffect(e2)
      end
      function s.cfilter(c,sp)
      return c:IsFaceup() and c:IsSummonPlayer(sp)
      and c:IsType(TYPE_RITUAL+TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ+TYPE_LINK)
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(s.cfilter,1,nil,1-tp)
      end
      function s.thfilter(c)
      return (c:IsCode(68468459) or aux.IsCodeListed(c,68468459) and c:IsType(TYPE_MONSTER))
      and c:IsAbleToHand()
      end
      function s.spfilter(c,e,tp)
      return (c:IsCode(68468459) or aux.IsCodeListed(c,68468459) and c:IsType(TYPE_MONSTER))
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local l=Duel.GetFlagEffectLabel(tp,id)
      local b1=(not l or l&1==0) and Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil)
      local b2=(not l or l&2==0) and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp)
      if chk==0 then return b1 or b2 end
      local op=0
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
      if b1 and b2 then
      op=Duel.SelectOption(tp,aux.Stringid(id,1),aux.Stringid(id,2))
      elseif b1 then
      op=Duel.SelectOption(tp,aux.Stringid(id,1))
      else
      op=Duel.SelectOption(tp,aux.Stringid(id,2))+1
      end
      if op==0 then
      e:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e:SetOperation(s.thop)
      if l then Duel.SetFlagEffectLabel(tp,id,l|1)
      else Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1,1) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      else
      e:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e:SetOperation(s.spop)
      if l then Duel.SetFlagEffectLabel(tp,id,l|2)
      else Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1,2) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
      end
      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)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if #g>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      script/c101112055.lua deleted 100644 → 0
      View file @ e38d2b74
      --クシャトリラ・アクストラ
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_REMOVE+CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_DESTROYED)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,id)
      e1:SetCondition(s.spcon)
      e1:SetTarget(s.sptg)
      e1:SetOperation(s.spop)
      c:RegisterEffect(e1)
      --to hand
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_REMOVE)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e2:SetCountLimit(1,id+o)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      end
      function s.cfilter(c,tp)
      return c:IsReason(REASON_BATTLE+REASON_EFFECT)
      and c:IsPreviousLocation(LOCATION_MZONE)
      and c:IsPreviousControler(tp)
      and c:IsPreviousPosition(POS_FACEUP)
      and c:GetPreviousTypeOnField()&TYPE_XYZ~=0
      and c:IsPreviousSetCard(0x189)
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(s.cfilter,1,nil,tp)
      end
      function s.rmfilter(c,e,tp)
      return c:IsCode(56099748) and c:IsAbleToRemove()
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,c)
      end
      function s.spfilter(c,e,tp,rc)
      return c:IsCode(101112036) and c:IsCanBeSpecialSummoned(e,0,tp,true,false) and Duel.GetLocationCountFromEx(tp,tp,rc,c)>0
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.rmfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_ONFIELD,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,nil,1,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_ONFIELD)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local rg=Duel.SelectMatchingCard(tp,s.rmfilter,tp,LOCATION_HAND+LOCATION_DECK+LOCATION_ONFIELD,0,1,1,nil,e,tp)
      if #rg>0 and Duel.Remove(rg,POS_FACEUP,REASON_EFFECT)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,nil)
      if #sg>0 then
      Duel.SpecialSummon(sg,0,tp,tp,true,false,POS_FACEUP)
      end
      end
      end
      function s.thfilter(c)
      return c:IsCode(56099748) and c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsAbleToHand()
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_REMOVED) and s.thfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.thfilter,tp,LOCATION_REMOVED,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_REMOVED,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      script/c101112056.lua deleted 100644 → 0
      View file @ e38d2b74
      --伍世壊心像
      --Script by 奥克斯.
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_DRAW+CATEGORY_TODECK)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCountLimit(1,id)
      e1:SetCost(s.cost)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      --tuner
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id+o)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.tuntg)
      e2:SetOperation(s.tunop)
      c:RegisterEffect(e2)
      end
      function s.cfilter(c)
      local b1=c:IsCode(56099748)
      local b2=c:IsSetCard(0x291) and c:IsType(TYPE_MONSTER)
      return not c:IsPublic() and (b1 or b2)
      end
      function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_HAND,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_HAND,0,1,1,nil)
      Duel.ConfirmCards(1-tp,g)
      Duel.ShuffleHand(tp)
      end
      function s.target(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_TODECK,nil,1,tp,LOCATION_HAND)
      end
      function s.operation(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.Hint(HINT_SELECTMSG,p,HINTMSG_TODECK)
      local sg=Duel.SelectMatchingCard(p,Card.IsAbleToDeck,p,LOCATION_HAND,0,1,1,nil)
      if #sg>0 then
      Duel.BreakEffect()
      Duel.SendtoDeck(sg,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
      end
      end
      end
      function s.tfilter(c)
      return not c:IsType(TYPE_TUNER) and c:IsFaceup() and c:IsAttack(1500) and c:IsDefense(2100)
      end
      function s.tuntg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.tfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.tfilter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,s.tfilter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function s.tunop(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_ADD_TYPE)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetValue(TYPE_TUNER)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e1)
      end
      end
      \ No newline at end of file
      script/c101112057.lua deleted 100644 → 0
      View file @ e38d2b74
      --伍世壊摘心
      --Script by 奥克斯
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SEARCH+CATEGORY_TOHAND)
      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:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id+o)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.sptg)
      e2:SetOperation(s.spop)
      c:RegisterEffect(e2)
      end
      function s.filter1(c)
      return c:IsFaceup() and c:IsCode(101112058)
      end
      function s.thfilter(c,check)
      local b1=c:IsCode(101112058)
      local b2=check and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSetCard(0x291)
      return not c:IsCode(id) and (b1 or b2) and c:IsAbleToHand()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
      local check=Duel.IsExistingMatchingCard(s.filter1,tp,LOCATION_ONFIELD,0,1,nil)
      if chk==0 then return Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,0,1,nil)
      and Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK,0,1,nil,check) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if not tc:IsRelateToEffect(e) or Duel.Destroy(tc,REASON_EFFECT)==0 then return end
      local check=Duel.IsExistingMatchingCard(s.filter1,tp,LOCATION_ONFIELD,0,1,nil)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK,0,1,1,nil,check)
      if #g==0 then return end
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      function s.spfilter(c,e,tp)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100)
      return (b1 or b2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function s.spop(e,tp,eg,ep,ev,re,r,rp)
      if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if #g>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      \ No newline at end of file
      script/c101112058.lua deleted 100644 → 0
      View file @ e38d2b74
      --伍世壊＝カラリウム
      --Script by 奥克斯.
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      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.activate)
      c:RegisterEffect(e1)
      --atk up
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetRange(LOCATION_FZONE)
      e2:SetTargetRange(LOCATION_MZONE,0)
      e2:SetTarget(s.atktg)
      e2:SetValue(s.atkval)
      c:RegisterEffect(e2)
      --Effect 3
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(id,1))
      e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e3:SetCode(EVENT_DESTROYED)
      e3:SetRange(LOCATION_FZONE)
      e3:SetCountLimit(1,id+o)
      e3:SetCondition(s.spcon)
      e3:SetTarget(s.sptg)
      e3:SetOperation(s.spop)
      c:RegisterEffect(e3)
      end
      function s.filter(c)
      local b1=c:IsSetCard(0x291) and c:IsType(TYPE_MONSTER)
      local b2=c:IsCode(56099748)
      return (b1 or b2) and c:IsAbleToHand()
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(s.filter,tp,LOCATION_DECK,0,nil)
      if g:GetCount()>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)
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg)
      end
      end
      function s.atktg(e,c)
      return c:IsFaceup() and c:IsAttribute(ATTRIBUTE_LIGHT)
      end
      function s.ckfilter(c)
      return c:IsType(TYPE_TUNER) and c:IsFaceupEx()
      end
      function s.atkval(e,c)
      local ct=Duel.GetMatchingGroupCount(s.ckfilter,e:GetHandlerPlayer(),LOCATION_MZONE+LOCATION_GRAVE,0,nil)
      return ct*100
      end
      function s.cfilter(c,tp)
      return c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp)
      and bit.band(c:GetPreviousTypeOnField(),TYPE_TUNER)~=0 and not c:IsType(TYPE_TOKEN)
      and c:IsReason(REASON_BATTLE+REASON_EFFECT)
      end
      function s.tgfilter(c,e,tp)
      return c:IsCanBeEffectTarget(e) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.spcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(s.cfilter,1,nil,tp)
      end
      function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      local mg=eg:Filter(s.cfilter,nil,tp):Filter(s.tgfilter,nil,e,tp)
      if chkc then return mg:IsContains(chkc) end
      if chk==0 then return #mg>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 end
      local g=mg
      if #mg>1 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      g=mg:Select(tp,1,1,nil)
      end
      Duel.SetTargetCard(g)
      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 not tc:IsRelateToEffect(e) then return end
      Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
      end
      script/c101112059.lua deleted 100644 → 0
      View file @ e38d2b74
      --ネムレリアの寝姫楼
      --Script by 奥克斯
      function c101112059.initial_effect(c)
      --activate
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_ACTIVATE)
      e0:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e0)
      --search
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SEARCH+CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_IGNITION)
      e1:SetRange(LOCATION_SZONE)
      e1:SetCountLimit(1,101112059)
      e1:SetCost(c101112059.cost)
      e1:SetTarget(c101112059.target)
      e1:SetOperation(c101112059.activate)
      c:RegisterEffect(e1)
      Duel.AddCustomActivityCounter(101112059,ACTIVITY_SPSUMMON,c101112059.counterfilter)
      --destroy replace
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetCode(EFFECT_DESTROY_REPLACE)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCondition(c101112059.repcon)
      e2:SetTarget(c101112059.reptg)
      e2:SetValue(c101112059.repval)
      e2:SetOperation(c101112059.repop)
      c:RegisterEffect(e2)
      end
      function c101112059.counterfilter(c)
      return not c:IsSummonLocation(LOCATION_EXTRA) or c:IsType(TYPE_PENDULUM)
      end
      function c101112059.rmfilter(c)
      return c:IsFacedown() and c:IsAbleToRemoveAsCost(POS_FACEDOWN)
      end
      function c101112059.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      local check=Duel.GetCustomActivityCount(101112059,tp,ACTIVITY_SPSUMMON)==0
      local g=Duel.GetMatchingGroup(c101112059.rmfilter,tp,LOCATION_EXTRA,0,nil)
      if chk==0 then return #g>=2 and check 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:SetTargetRange(1,0)
      e1:SetTarget(c101112059.splimit)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local rg=g:Select(tp,2,2,nil)
      Duel.Remove(rg,POS_FACEDOWN,REASON_COST)
      end
      function c101112059.splimit(e,c)
      return c:IsLocation(LOCATION_EXTRA) and not c:IsType(TYPE_PENDULUM)
      end
      function c101112059.filter(c)
      return c:IsLevel(10) and c:IsRace(RACE_BEAST) and c:IsAbleToHand()
      end
      function c101112059.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetMatchingGroup(c101112059.filter,tp,LOCATION_DECK,0,nil)
      if chk==0 then return g:GetClassCount(Card.GetCode)>=2 end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,2,tp,LOCATION_DECK)
      end
      function c101112059.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c101112059.filter,tp,LOCATION_DECK,0,nil)
      if g:GetClassCount(Card.GetCode)<2 then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local sg=g:SelectSubGroup(tp,aux.dncheck,false,2,2)
      if not sg then return end
      Duel.SendtoHand(sg,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,sg)
      end
      function c101112059.splimit(e,c)
      return c:IsLocation(LOCATION_EXTRA) and not c:IsType(TYPE_PENDULUM)
      end
      function c101112059.reprmfilter(c,tp)
      return c:IsFacedown() and c:IsAbleToRemove(tp,POS_FACEDOWN,REASON_EFFECT)
      end
      function c101112059.repcon(e)
      local tp=e:GetHandlerPlayer()
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_EXTRA,0,1,nil,101112015)
      end
      function c101112059.repfilter(c,tp)
      return not c:IsReason(REASON_REPLACE) and c:IsFaceup()
      and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and c:IsSetCard(0x292)
      and (c:IsReason(REASON_BATTLE) or (c:IsReason(REASON_EFFECT) and c:GetReasonPlayer()==1-tp))
      end
      function c101112059.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return eg:IsExists(c101112059.repfilter,1,nil,tp)
      and Duel.IsExistingMatchingCard(c101112059.reprmfilter,tp,LOCATION_EXTRA,0,1,nil,tp) end
      return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
      end
      function c101112059.repval(e,c)
      return c101112059.repfilter(c,e:GetHandlerPlayer())
      end
      function c101112059.repop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_CARD,0,101112059)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectMatchingCard(tp,c101112059.reprmfilter,tp,LOCATION_EXTRA,0,1,1,nil,tp)
      Duel.Remove(g,POS_FACEDOWN,REASON_EFFECT+REASON_REPLACE)
      end
      script/c101112060.lua deleted 100644 → 0
      View file @ e38d2b74
      --寝姫の甘い夢
      --Script by 奥克斯
      function c101112060.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112060,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,101112060+EFFECT_COUNT_CODE_OATH)
      e1:SetTarget(c101112060.target)
      e1:SetOperation(c101112060.activate)
      c:RegisterEffect(e1)
      --Effect 2
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112060,1))
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCost(c101112060.mvcost)
      e2:SetTarget(c101112060.mvtg)
      e2:SetOperation(c101112060.mvop)
      c:RegisterEffect(e2)
      end
      function c101112060.filter(c)
      return c:IsSetCard(0x292) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c101112060.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(c101112060.filter,tp,LOCATION_DECK,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c101112060.activate(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c101112060.filter,tp,LOCATION_DECK,0,1,1,nil)
      if #g==0 then return end
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      if g:GetFirst():IsLocation(LOCATION_HAND)
      and Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_EXTRA,0,1,nil,101112015) then
      Duel.BreakEffect()
      Duel.Hint(HINT_CARD,0,101112015)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCondition(c101112060.sumcon)
      e1:SetOperation(c101112060.sumsuc)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      Duel.RegisterEffect(e2,tp)
      end
      end
      function c101112060.sumfilter(c)
      return c:IsFaceup() and c:IsSetCard(0x292)
      end
      function c101112060.sumcon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112060.sumfilter,1,nil)
      end
      function c101112060.sumsuc(e,tp,eg,ep,ev,re,r,rp)
      Duel.SetChainLimitTillChainEnd(c101112060.efun)
      end
      function c101112060.efun(e,ep,tp)
      return ep==tp
      end
      function c101112060.mvcost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToDeckAsCost() end
      Duel.SendtoDeck(c,nil,SEQ_DECKBOTTOM,REASON_COST)
      end
      function c101112060.mvfilter(c)
      return c:IsFaceup() and c:IsCode(101112015) and c:IsType(TYPE_PENDULUM) and c:IsAbleToExtra()
      end
      function c101112060.mvtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112060.mvfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112060.mvfilter,tp,LOCATION_ONFIELD,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c101112060.mvfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,g,1,0,0)
      end
      function c101112060.mvop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoExtraP(tc,nil,REASON_EFFECT)
      end
      end
      script/c101112061.lua deleted 100644 → 0
      View file @ e38d2b74
      --ピュアリィ・スリーピィメモリー
      --Script by blue1874
      local s,id,o=GetID()
      function s.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES+CATEGORY_HANDES)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetOperation(s.op)
      c:RegisterEffect(e1)
      --get effect
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_DRAW)
      e2:SetType(EFFECT_TYPE_XMATERIAL+EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetRange(LOCATION_MZONE)
      e2:SetCondition(s.drcon)
      e2:SetTarget(s.drtg)
      e2:SetOperation(s.drop)
      c:RegisterEffect(e2)
      end
      function s.filter(c,e,tp)
      return c:IsLevel(1) and c:IsSetCard(0x18c) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.op(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CHANGE_DAMAGE)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetTargetRange(1,0)
      e1:SetCondition(s.damcon)
      e1:SetValue(s.damval)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_NO_EFFECT_DAMAGE)
      e2:SetValue(1)
      Duel.RegisterEffect(e2,tp)
      if Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,nil)
      and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil,e,tp)
      and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
      Duel.BreakEffect()
      if Duel.DiscardHand(tp,nil,1,1,REASON_EFFECT+REASON_DISCARD)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      end
      function s.damcon(e)
      local tp=e:GetHandlerPlayer()
      return Duel.GetFlagEffect(tp,id)==0
      end
      function s.damval(e,re,val,r,rp,rc)
      local tp=e:GetHandlerPlayer()
      if bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0 then
      Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1)
      return 0
      end
      return val
      end
      function s.drcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsSetCard(0x18c) and Duel.GetTurnPlayer()==1-tp
      end
      function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
      Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
      Duel.SetTargetPlayer(tp)
      Duel.SetTargetParam(1)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function s.drop(e,tp,eg,ep,ev,re,r,rp)
      local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
      Duel.Draw(p,d,REASON_EFFECT)
      end
      script/c101112062.lua deleted 100644 → 0
      View file @ e38d2b74
      --御巫舞踊－迷わし鳥
      --Script by 奥克斯
      function c101112062.initial_effect(c)
      --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(c101112062.target)
      e1:SetOperation(c101112062.activate)
      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(1)
      c:RegisterEffect(e2)
      --effect indestructable
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_EQUIP)
      e3:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
      e3:SetValue(1)
      c:RegisterEffect(e3)
      --return to hand
      local e4=Effect.CreateEffect(c)
      e4:SetCategory(CATEGORY_TOHAND)
      e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e4:SetCode(EVENT_DAMAGE_STEP_END)
      e4:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e4:SetRange(LOCATION_SZONE)
      e4:SetCountLimit(1,101112062)
      e4:SetCondition(c101112062.thcon)
      e4:SetTarget(c101112062.thtg)
      e4:SetOperation(c101112062.thop)
      c:RegisterEffect(e4)
      --special summon
      local e5=Effect.CreateEffect(c)
      e5:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e5:SetType(EFFECT_TYPE_IGNITION)
      e5:SetRange(LOCATION_GRAVE)
      e5:SetCountLimit(1,101112062+100)
      e5:SetTarget(c101112062.sptg)
      e5:SetOperation(c101112062.spop)
      c:RegisterEffect(e5)
      end
      function c101112062.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
      if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
      Duel.SelectTarget(tp,Card.IsFaceup,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_EQUIP,e:GetHandler(),1,0,0)
      end
      function c101112062.activate(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 c101112062.thcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=e:GetHandler():GetEquipTarget()
      local a=Duel.GetBattleMonster(tp)
      return a and ec and a:IsSetCard(0x18d)
      end
      function c101112062.thfilter(c)
      return c:IsAbleToHand()
      end
      function c101112062.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and c101112062.thfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112062.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
      local g=Duel.SelectTarget(tp,c101112062.thfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c101112062.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      function c101112062.spfilter(c,e,tp)
      return c:IsSetCard(0x18d) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112062.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c101112062.spfilter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.GetLocationCount(tp,LOCATION_SZONE)>0
      and Duel.IsExistingTarget(c101112062.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c101112062.spfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c101112062.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_LEAVE_FIELD_REDIRECT)
      e1:SetReset(RESET_EVENT+RESETS_REDIRECT)
      e1:SetValue(LOCATION_REMOVED)
      tc:RegisterEffect(e1)
      if c:IsRelateToEffect(e) then
      Duel.Equip(tp,c,tc)
      end
      end
      Duel.SpecialSummonComplete()
      end
      script/c101112063.lua deleted 100644 → 0
      View file @ e38d2b74
      --リブロマンサー・オリジン
      --Script by 奥克斯
      function c101112063.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,101112063+EFFECT_COUNT_CODE_OATH)
      e1:SetOperation(c101112063.activate)
      c:RegisterEffect(e1)
      --atk up
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetRange(LOCATION_SZONE)
      e2:SetTargetRange(LOCATION_MZONE,0)
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetTarget(c101112063.atktg)
      e2:SetValue(c101112063.atkval)
      c:RegisterEffect(e2)
      --destroy
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(101112063,1))
      e3:SetCategory(CATEGORY_DESTROY)
      e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      e3:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_CARD_TARGET)
      e3:SetRange(LOCATION_SZONE)
      e3:SetCountLimit(1,101112063+100)
      e3:SetCondition(c101112063.descon)
      e3:SetTarget(c101112063.destg)
      e3:SetOperation(c101112063.desop)
      c:RegisterEffect(e3)
      end
      function c101112063.setfilter(c)
      return not c:IsCode(101112063) and c:IsSetCard(0x17c) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
      end
      function c101112063.activate(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c101112063.setfilter,tp,LOCATION_DECK,0,nil)
      if #g>0 and Duel.SelectYesNo(tp,aux.Stringid(101112063,0)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local sc=g:Select(tp,1,1,nil):GetFirst()
      Duel.SSet(tp,sc)
      end
      end
      function c101112063.atktg(e,c)
      return c:IsSetCard(0x17c) and c:IsType(TYPE_RITUAL)
      end
      function c101112063.atkval(e,c)
      return c:GetLevel()*100
      end
      function c101112063.spfilter(c,tp)
      return c:IsFaceup() and c:IsType(TYPE_RITUAL) and c:IsSummonType(SUMMON_TYPE_RITUAL) and c:IsControler(tp)
      end
      function c101112063.descon(e,tp,eg,ep,ev,re,r,rp)
      return eg:IsExists(c101112063.spfilter,1,nil,tp)
      end
      function c101112063.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc:IsControler(1-tp) and chkc:IsType(TYPE_SPELL+TYPE_TRAP) end
      if chk==0 then return Duel.IsExistingTarget(Card.IsType,tp,0,LOCATION_ONFIELD,1,nil,TYPE_SPELL+TYPE_TRAP) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,Card.IsType,tp,0,LOCATION_ONFIELD,1,1,nil,TYPE_SPELL+TYPE_TRAP)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c101112063.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
      script/c101112064.lua deleted 100644 → 0
      View file @ e38d2b74
      --星守の騎士団
      --Script by 奥克斯
      function c101112064.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_GRAVE_SPSUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,101112064+EFFECT_COUNT_CODE_OATH)
      e1:SetOperation(c101112064.activate)
      c:RegisterEffect(e1)
      --Effect 2
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCountLimit(1,101112064+100)
      e2:SetTarget(c101112064.sptg)
      e2:SetOperation(c101112064.spop)
      c:RegisterEffect(e2)
      end
      function c101112064.setcardfilter(c)
      return c:IsSetCard(0x9c,0x53)
      end
      function c101112064.spfilter(c,e,sp)
      return c101112064.setcardfilter(c) and c:IsCanBeSpecialSummoned(e,0,sp,false,false)
      end
      function c101112064.activate(e,tp,eg,ep,ev,re,r,rp)
      local cg=Duel.GetMatchingGroup(aux.NecroValleyFilter(c101112064.spfilter),tp,LOCATION_HAND+LOCATION_GRAVE,0,nil,e,tp)
      if #cg>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.SelectYesNo(tp,aux.Stringid(101112064,0)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=cg:Select(tp,1,1,nil)
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c101112064.filter1(c,e,tp)
      return c:IsFaceup() and c101112064.setcardfilter(c) and c:IsType(TYPE_XYZ)
      and Duel.IsExistingMatchingCard(c101112064.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,c)
      and aux.MustMaterialCheck(c,tp,EFFECT_MUST_BE_XMATERIAL)
      end
      function c101112064.filter2(c,e,tp,mc)
      return not c:IsRank(mc:GetRank()) and c101112064.setcardfilter(c) and c:IsType(TYPE_XYZ) and mc:IsCanBeXyzMaterial(c) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_XYZ,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,mc,c)>0
      end
      function c101112064.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_MZONE) and c101112064.filter1(chkc,e,tp) end
      if chk==0 then return Duel.IsExistingTarget(c101112064.filter1,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      Duel.SelectTarget(tp,c101112064.filter1,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c101112064.spop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if not aux.MustMaterialCheck(tc,tp,EFFECT_MUST_BE_XMATERIAL) then return end
      if tc:IsFacedown() or not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or tc:IsImmuneToEffect(e) then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectMatchingCard(tp,c101112064.filter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,tc)
      local sc=g:GetFirst()
      if sc then
      local mg=tc:GetOverlayGroup()
      if mg:GetCount()~=0 then
      Duel.Overlay(sc,mg)
      end
      sc:SetMaterial(Group.FromCards(tc))
      Duel.Overlay(sc,Group.FromCards(tc))
      Duel.SpecialSummon(sc,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)
      sc:CompleteProcedure()
      end
      end
      \ No newline at end of file
      script/c101112065.lua deleted 100644 → 0
      View file @ e38d2b74
      --ドレミコード・シンフォニア
      --Script by 奥克斯
      function c101112065.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      e1:SetHintTiming(TIMING_DAMAGE_STEP)
      e1:SetCountLimit(1,101112065+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(aux.dscon)
      e1:SetTarget(c101112065.target)
      e1:SetOperation(c101112065.operation)
      c:RegisterEffect(e1)
      end
      function c101112065.cfilter(c)
      return c:IsSetCard(0x162) and c:IsType(TYPE_PENDULUM) and c:IsFaceup()
      end
      function c101112065.slfilter(c)
      local scal=c:GetCurrentScale()
      return scal>0 and scal%2==1
      end
      function c101112065.spfilter(c,e,tp)
      return c:IsSetCard(0x1162) and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
      end
      function c101112065.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local g=Duel.GetMatchingGroup(c101112065.cfilter,tp,LOCATION_EXTRA,0,nil)
      local ct=g:GetClassCount(Card.GetCode)
      return ct>=3
      end
      end
      function c101112065.operation(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c101112065.cfilter,tp,LOCATION_EXTRA,0,nil)
      local ct=g:GetClassCount(Card.GetCode)
      local draw=Duel.IsExistingMatchingCard(c101112065.slfilter,tp,LOCATION_PZONE,0,1,nil) and Duel.IsPlayerCanDraw(tp,1)
      local b1=ct>=3
      local b2=ct>=5 and Duel.IsExistingMatchingCard(nil,tp,0,LOCATION_ONFIELD,1,nil)
      local b3=ct>=7 and Duel.IsExistingMatchingCard(c101112065.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp)
      if b1 then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c101112065.atktg)
      e1:SetValue(c101112065.atkval)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      if b2 and Duel.SelectYesNo(tp,aux.Stringid(101112065,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local dg=Duel.SelectMatchingCard(tp,aux.TRUE,tp,0,LOCATION_ONFIELD,1,1,nil)
      Duel.HintSelection(dg)
      if #dg>0 and Duel.Destroy(dg,REASON_EFFECT)>0 and draw then
      Duel.BreakEffect()
      Duel.Draw(tp,1,REASON_EFFECT)
      end
      end
      if b3 and Duel.SelectYesNo(tp,aux.Stringid(101112065,2)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=Duel.SelectMatchingCard(tp,c101112065.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
      if #sg==0 then return end
      Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      function c101112065.atktg(e,c)
      return c:IsType(TYPE_PENDULUM) and c:IsSetCard(0x162)
      end
      function c101112065.atkval(e,c)
      return c:GetCurrentScale()*300
      end
      \ No newline at end of file
      script/c101112066.lua deleted 100644 → 0
      View file @ e38d2b74
      --おすすめ軍貫握り
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      c:EnableCounterPermit(0x163)
      aux.SushipMentionsTable=aux.SushipMentionsTable or {61027400,78362751,42377643}
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e1)
      --add
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,0))
      e2:SetCategory(CATEGORY_COUNTER+CATEGORY_SEARCH+CATEGORY_TOHAND+CATEGORY_TODECK)
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCountLimit(1)
      e2:SetCost(s.cost)
      e2:SetTarget(s.target)
      e2:SetOperation(s.operation)
      c:RegisterEffect(e2)
      --pay lp
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
      e3:SetCode(EVENT_LEAVE_FIELD_P)
      e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e3:SetOperation(s.regop)
      c:RegisterEffect(e3)
      local e4=Effect.CreateEffect(c)
      e4:SetDescription(aux.Stringid(id,0))
      e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e4:SetCode(EVENT_DESTROYED)
      e4:SetCondition(s.plpcon)
      e4:SetOperation(s.plpop)
      c:RegisterEffect(e4)
      e3:SetLabelObject(e4)
      end
      function s.cfilter(c)
      return c:IsCode(24639891) and not c:IsPublic()
      end
      function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_HAND,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_HAND,0,1,1,nil)
      Duel.ConfirmCards(1-tp,g)
      Duel.ShuffleHand(tp)
      end
      function s.rfilter(c)
      return c:IsSetCard(0x166) and c:IsType(TYPE_XYZ) and not c:IsPublic()
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.rfilter,tp,LOCATION_EXTRA,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_COUNTER,e:GetHandler(),1,tp,0x163)
      end
      function s.filter(c,code)
      return c:IsCode(code) and c:IsAbleToHand()
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if not c:AddCounter(0x163,1) then return end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
      local g=Duel.SelectMatchingCard(tp,s.rfilter,tp,LOCATION_EXTRA,0,1,1,nil)
      if #g==0 then return end
      Duel.ConfirmCards(1-tp,g)
      local nt={}
      for i,n in ipairs(aux.SushipMentionsTable) do
      table.insert(nt,n)
      table.insert(nt,OPCODE_ISCODE)
      if i>1 then table.insert(nt,OPCODE_OR) end
      end
      local code=Duel.AnnounceCard(1-tp,table.unpack(nt))
      Duel.Hint(HINT_CARD,tp,code)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local tc=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil,code):GetFirst()
      if tc then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,tc)
      elseif c:IsRelateToEffect(e) then
      Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      end
      function s.regop(e,tp,eg,ep,ev,re,r,rp)
      local ct=e:GetHandler():GetCounter(0x163)
      e:GetLabelObject():SetLabel(ct)
      end
      function s.plpcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsPreviousControler(tp) and c:IsReason(REASON_DESTROY) and c:GetReasonPlayer()==1-tp
      end
      function s.plpop(e,tp,eg,ep,ev,re,r,rp)
      local val=e:GetLabel()*500
      if val>0 and Duel.GetLP(1-tp)>=val then Duel.PayLPCost(1-tp,val) end
      end
      script/c101112067.lua deleted 100644 → 0
      View file @ e38d2b74
      --時を裂く魔瞳
      --Script by 奥克斯
      function c101112067.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112067,0))
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c101112067.target)
      e1:SetOperation(c101112067.activate)
      e1:SetLabel(101112067)
      c:RegisterEffect(e1)
      --act limit
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(101112067,1))
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCost(c101112067.cost)
      e2:SetTarget(c101112067.target)
      e2:SetOperation(c101112067.operation)
      e2:SetLabel(101112067+100)
      c:RegisterEffect(e2)
      end
      function c101112067.target(e,tp,eg,ep,ev,re,r,rp,chk)
      local ct=e:GetLabel()
      if chk==0 then return Duel.GetFlagEffect(tp,ct)==0 end
      end
      function c101112067.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetCode(EFFECT_CANNOT_ACTIVATE)
      e1:SetTargetRange(1,0)
      e1:SetValue(c101112067.aclimit)
      Duel.RegisterEffect(e1,tp)
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e2:SetCode(EFFECT_DRAW_COUNT)
      e2:SetTargetRange(1,0)
      e2:SetValue(2)
      Duel.RegisterEffect(e2,tp)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_FIELD)
      e3:SetCode(EFFECT_SET_SUMMON_COUNT_LIMIT)
      e3:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e3:SetTargetRange(1,0)
      e3:SetValue(2)
      Duel.RegisterEffect(e3,tp)
      Duel.RegisterFlagEffect(tp,101112067,0,0,1)
      end
      function c101112067.aclimit(e,re,tp)
      return re:GetActivateLocation()==LOCATION_HAND and re:IsActiveType(TYPE_MONSTER)
      end
      function c101112067.filter(c)
      return c:IsCode(101112067) and c:IsDiscardable()
      end
      function c101112067.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToRemoveAsCost()
      and Duel.IsExistingMatchingCard(c101112067.filter,tp,LOCATION_HAND,0,1,nil) end
      Duel.Remove(c,POS_FACEUP,REASON_COST)
      Duel.DiscardHand(tp,c101112067.filter,1,1,REASON_COST+REASON_DISCARD,nil)
      end
      function c101112067.operation(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetCondition(c101112067.nsumcon)
      e1:SetOperation(c101112067.nsumsuc)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      Duel.RegisterFlagEffect(tp,101112067+100,RESET_PHASE+PHASE_END,0,1)
      end
      function c101112067.nsumcon(e,tp,eg,ep,ev,re,r,rp)
      local ec=eg:GetFirst()
      return ec and ec:IsControler(tp)
      end
      function c101112067.nsumsuc(e,tp,eg,ep,ev,re,r,rp)
      Duel.SetChainLimitTillChainEnd(c101112067.efun)
      end
      function c101112067.efun(e,ep,tp)
      return ep==tp or not e:IsActiveType(TYPE_MONSTER)
      end
      \ No newline at end of file
      script/c101112068.lua deleted 100644 → 0
      View file @ e38d2b74
      --トン＝トン
      --Ton-Ton
      --coded by Lyris
      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_ATKCHANGE+CATEGORY_DEFCHANGE)
      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:SetCondition(aux.dscon)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      --set
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetType(EFFECT_TYPE_IGNITION)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCountLimit(1,id)
      e2:SetCondition(s.setcon)
      e2:SetTarget(s.settg)
      e2:SetOperation(s.setop)
      c:RegisterEffect(e2)
      end
      function s.filter(c)
      return c:IsFaceup() and (c:IsLevelAbove(c:GetOriginalLevel()+1) or c:IsAttackAbove(c:GetBaseAttack()+1) or c:IsDefenseAbove(c:GetBaseDefense()+1))
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and s.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil)
      and Duel.CheckLPCost(tp,100,true) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() and not tc:IsImmuneToEffect(e) then
      local ct=0
      local ba,bd,bl=tc:GetBaseAttack(),tc:GetBaseDefense(),tc:GetOriginalLevel()
      if tc:IsAttackAbove(ba) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_SET_ATTACK_FINAL)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(ba)
      tc:RegisterEffect(e1)
      ct=ct+1
      end
      if tc:IsDefenseAbove(bd) then
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_SET_DEFENSE_FINAL)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      e2:SetValue(bd)
      tc:RegisterEffect(e2)
      ct=ct+1
      end
      if tc:IsLevelAbove(bl) then
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_CHANGE_LEVEL)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD)
      e3:SetValue(bl)
      tc:RegisterEffect(e3)
      ct=ct+1
      end
      if ct==0 then return end
      local lp=Duel.GetLP(tp)
      local m=math.min(lp,1000)//100
      local t={}
      for i=1,m do
      t[i]=i*100
      end
      local ac=Duel.AnnounceNumber(tp,table.unpack(t))
      Duel.BreakEffect()
      Duel.PayLPCost(tp,ac,true)
      end
      end
      function s.setcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetLP(0)==Duel.GetLP(1)
      end
      function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsSSetable() end
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,c,1,0,0)
      end
      function s.setop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then Duel.SSet(tp,c) end
      end
      script/c101112069.lua deleted 100644 → 0
      View file @ e38d2b74
      --サイバネット・サーキット
      --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_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      --to extra
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,2))
      e2:SetCategory(CATEGORY_TOEXTRA+CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e2:SetCountLimit(1,id+o)
      e2:SetCondition(s.tdcon)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.tdtg)
      e2:SetOperation(s.tdop)
      c:RegisterEffect(e2)
      end
      function s.get_zone(c,seq)
      local zone=0
      if seq<4 and c:IsLinkMarker(LINK_MARKER_LEFT) then zone=bit.replace(zone,0x1,seq+1) end
      if seq>0 and seq<5 and c:IsLinkMarker(LINK_MARKER_RIGHT) then zone=bit.replace(zone,0x1,seq-1) end
      if seq==5 and c:IsLinkMarker(LINK_MARKER_TOP_LEFT) then zone=bit.replace(zone,0x1,2) end
      if seq==5 and c:IsLinkMarker(LINK_MARKER_TOP) then zone=bit.replace(zone,0x1,1) end
      if seq==5 and c:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then zone=bit.replace(zone,0x1,0) end
      if seq==6 and c:IsLinkMarker(LINK_MARKER_TOP_LEFT) then zone=bit.replace(zone,0x1,4) end
      if seq==6 and c:IsLinkMarker(LINK_MARKER_TOP) then zone=bit.replace(zone,0x1,3) end
      if seq==6 and c:IsLinkMarker(LINK_MARKER_TOP_RIGHT) then zone=bit.replace(zone,0x1,2) end
      return zone
      end
      function s.cfilter(c,e,tp)
      return c:IsFaceup() and c:IsType(TYPE_LINK) and c:IsSetCard(0x28f)
      and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,c)
      end
      function s.spfilter(c,e,tp,tc)
      for p=0,1 do
      local zone=tc:GetLinkedZone(p)&0xff
      local seq=tc:GetSequence()
      if tc:IsControler(p) then zone=zone|s.get_zone(c,seq) end
      if tc:IsControler(1-p) and seq>=5 then
      seq=11-seq
      zone=zone|s.get_zone(c,seq)
      end
      if Duel.GetLocationCount(p,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone)>0
      and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,p,zone) then
      return true
      end
      end
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c:IsControler(tp) and s.cfilter(chkc,e,tp) end
      if chk==0 then return Duel.IsExistingTarget(s.cfilter,tp,LOCATION_MZONE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
      local g=Duel.SelectTarget(tp,s.cfilter,tp,LOCATION_MZONE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if not tc:IsFaceup() or not tc:IsRelateToEffect(e) then return end
      local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE,0,nil,e,tp,tc)
      while #g>0 do
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sc=g:Select(tp,1,1,nil):GetFirst()
      local avail_zone=0
      for p=0,1 do
      local zone=tc:GetLinkedZone(p)&0xff
      local seq=tc:GetSequence()
      if tc:IsControler(p) then zone=zone|s.get_zone(sc,seq) end
      if tc:IsControler(1-p) and seq>=5 then
      seq=11-seq
      zone=zone|s.get_zone(sc,seq)
      end
      local _,flag_tmp=Duel.GetLocationCount(p,LOCATION_MZONE,tp,LOCATION_REASON_TOFIELD,zone)
      flag=(~flag_tmp)&0x7f
      if sc:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP,p,flag) then
      avail_zone=avail_zone|(flag<<(p==tp and 0 or 16))
      end
      end
      local sel_zone=Duel.SelectField(tp,1,LOCATION_MZONE,LOCATION_MZONE,0x00ff00ff&(~avail_zone),sc:GetCode())
      local sump=0
      if sel_zone&0xff>0 then
      sump=tp
      else
      sump=1-tp
      sel_zone=sel_zone>>16
      end
      Duel.SpecialSummonStep(sc,0,tp,sump,false,false,POS_FACEUP,sel_zone)
      g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.spfilter),tp,LOCATION_GRAVE,0,nil,e,tp,tc)
      if Duel.IsPlayerAffectedByEffect(tp,59822133) or #g==0
      or not Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
      break
      end
      end
      Duel.SpecialSummonComplete()
      end
      function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetLP(tp)<=2000
      end
      function s.tdfilter(c)
      return c:IsSetCard(0x28f) and c:IsType(TYPE_LINK) and c:IsAbleToExtra()
      end
      function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.tdfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,nil,1,tp,LOCATION_GRAVE)
      end
      function s.tdop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectMatchingCard(tp,s.tdfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      if #g>0 and Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)>0 then
      local tc=g:GetFirst()
      if tc:IsLocation(LOCATION_EXTRA)
      and tc:IsCanBeSpecialSummoned(e,0,tp,false,false)
      and Duel.GetLocationCountFromEx(tp,tp,nil,tc)>0
      and Duel.SelectYesNo(tp,aux.Stringid(id,3)) then
      Duel.BreakEffect()
      Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
      end
      end
      end
      script/c101112070.lua deleted 100644 → 0
      View file @ e38d2b74
      --赫ける王の烙印
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,68468459)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_DISABLE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      --tohand
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(id,1))
      e2:SetCategory(CATEGORY_TOHAND)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(TIMING_END_PHASE)
      e2:SetCountLimit(1,id)
      e2:SetCondition(s.condition)
      e2:SetTarget(s.thtg)
      e2:SetOperation(s.thop)
      c:RegisterEffect(e2)
      if not s.global_check then
      s.global_check=true
      local ge1=Effect.CreateEffect(c)
      ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      ge1:SetCode(EVENT_TO_GRAVE)
      ge1:SetOperation(s.checkop)
      Duel.RegisterEffect(ge1,0)
      end
      end
      function s.checkfilter(c,tp)
      return c:IsType(TYPE_FUSION) and c:IsControler(tp)
      end
      function s.checkop(e,tp,eg,ep,ev,re,r,rp)
      for p=0,1 do
      if eg:IsExists(s.checkfilter,1,nil,p) then Duel.RegisterFlagEffect(p,id,RESET_PHASE+PHASE_END,0,1) end
      end
      end
      function s.filter(c)
      return c:IsFaceup() and c:IsType(TYPE_FUSION) and aux.IsMaterialListCode(c,68468459)
      and Duel.IsExistingMatchingCard(s.dfilter,0,LOCATION_ONFIELD,LOCATION_ONFIELD,1,c)
      end
      function s.dfilter(c)
      return c:IsFaceup() and aux.NegateAnyFilter(c)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_MZONE,0,1,nil) end
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil)
      if #g==0 then return end
      Duel.HintSelection(g)
      local ng=Duel.GetMatchingGroup(s.dfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,g)
      for nc in aux.Next(ng) do
      Duel.NegateRelatedChain(nc,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)
      nc:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EFFECT_DISABLE_EFFECT)
      e2:SetValue(RESET_TURN_SET)
      nc:RegisterEffect(e2)
      if nc:IsType(TYPE_TRAPMONSTER) then
      local e3=e1:Clone()
      e3:SetCode(EFFECT_DISABLE_TRAPMONSTER)
      nc:RegisterEffect(e3)
      end
      end
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetFlagEffect(tp,id)>0 and Duel.GetCurrentPhase()==PHASE_END
      end
      function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local c=e:GetHandler()
      if chk==0 then return c:IsAbleToHand() end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,c,1,0,0)
      end
      function s.thop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) then Duel.SendtoHand(c,nil,REASON_EFFECT) end
      end
      script/c101112071.lua deleted 100644 → 0
      View file @ e38d2b74
      --烙印の即凶劇
      --Script by 奥克斯
      function c101112071.initial_effect(c)
      --activate
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_ACTIVATE)
      e0:SetCode(EVENT_FREE_CHAIN)
      c:RegisterEffect(e0)
      --Effect 1
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(101112071,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_QUICK_O)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetRange(LOCATION_SZONE)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCountLimit(1,101112071)
      e1:SetTarget(c101112071.sctg)
      e1:SetOperation(c101112071.scop)
      c:RegisterEffect(e1)
      --macro cosmos
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetProperty(EFFECT_FLAG_SET_AVAILABLE+EFFECT_FLAG_IGNORE_RANGE+EFFECT_FLAG_IGNORE_IMMUNE)
      e2:SetRange(LOCATION_SZONE)
      e2:SetCode(EFFECT_TO_GRAVE_REDIRECT)
      e2:SetTargetRange(0xfe,0xff)
      e2:SetValue(LOCATION_REMOVED)
      e2:SetCondition(c101112071.rmcon)
      e2:SetTarget(c101112071.rmtg)
      c:RegisterEffect(e2)
      end
      function c101112071.mfilter(c)
      return c:IsRace(RACE_DRAGON)
      end
      function c101112071.mfilter2(c)
      return c:IsHasEffect(EFFECT_HAND_SYNCHRO) and c:IsType(TYPE_MONSTER)
      end
      function c101112071.cfilter(c,syn)
      local b1=true
      if c:IsHasEffect(EFFECT_HAND_SYNCHRO) then
      b1=Duel.CheckTunerMaterial(syn,c,nil,c101112071.mfilter,1,99)
      end
      return b1 and syn:IsSynchroSummonable(c)
      end
      function c101112071.spfilter(c,mg)
      return mg:IsExists(c101112071.cfilter,1,nil,c)
      end
      function c101112071.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then
      local mg=Duel.GetMatchingGroup(c101112071.mfilter,tp,LOCATION_MZONE,0,nil)
      local exg=Duel.GetMatchingGroup(c101112071.mfilter2,tp,LOCATION_MZONE,0,nil)
      mg:Merge(exg)
      return Duel.IsExistingMatchingCard(c101112071.spfilter,tp,LOCATION_EXTRA,0,1,nil,mg)
      end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
      end
      function c101112071.scop(e,tp,eg,ep,ev,re,r,rp)
      local mg=Duel.GetMatchingGroup(c101112071.mfilter,tp,LOCATION_MZONE,0,nil)
      local exg=Duel.GetMatchingGroup(c101112071.mfilter2,tp,LOCATION_MZONE,0,nil)
      mg:Merge(exg)
      local g=Duel.GetMatchingGroup(c101112071.spfilter,tp,LOCATION_EXTRA,0,nil,mg)
      if #g>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg=g:Select(tp,1,1,nil)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SMATERIAL)
      local tg=mg:FilterSelect(tp,c101112071.cfilter,1,1,nil,sg:GetFirst())
      Duel.SynchroSummon(tp,sg:GetFirst(),tg:GetFirst())
      end
      end
      function c101112071.rmcon(e)
      local tp=e:GetHandlerPlayer()
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsSetCard),tp,LOCATION_MZONE,0,1,nil,0x188)
      end
      function c101112071.rmtg(e,c)
      local tp=e:GetHandlerPlayer()
      local b1=c:IsReason(REASON_RITUAL) and c:IsReason(REASON_RELEASE)
      local b2=c:IsReason(REASON_FUSION+REASON_SYNCHRO+REASON_LINK)
      return c:GetOwner()==1-tp and c:GetReasonPlayer()==1-tp and (b1 or b2)
      end
      script/c101112072.lua deleted 100644 → 0
      View file @ e38d2b74
      --伍世壊砕心
      --Script by 奥克斯.
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DESTROY)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(0,TIMING_END_PHASE)
      e1:SetCountLimit(1,id)
      e1:SetTarget(s.target)
      e1:SetOperation(s.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:SetCountLimit(1,id+o)
      e2:SetTarget(s.reptg)
      e2:SetValue(s.repval)
      e2:SetOperation(s.repop)
      c:RegisterEffect(e2)
      end
      function s.spfilter(c,e,tp)
      local b1=c:IsType(TYPE_TUNER)
      local b2=c:IsType(TYPE_SYNCHRO)
      return (b1 or b2) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.atkfilter(c,atk)
      return c:IsFaceup() and c:IsAttackBelow(atk)
      end
      function s.target(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.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if not tc:IsRelateToEffect(e) or Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)==0 then return end
      if tc:IsAttribute(ATTRIBUTE_LIGHT) and Duel.IsExistingMatchingCard(s.atkfilter,tp,0,LOCATION_MZONE,1,nil,tc:GetAttack())
      and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectMatchingCard(tp,s.atkfilter,tp,0,LOCATION_MZONE,1,1,nil,tc:GetAttack())
      Duel.BreakEffect()
      Duel.HintSelection(g)
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      function s.repfilter(c,tp)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100)
      return not c:IsReason(REASON_REPLACE) and c:IsFaceup()
      and c:IsLocation(LOCATION_MZONE) and c:IsControler(tp)
      and c:IsReason(REASON_EFFECT+REASON_BATTLE) and (b1 or b2)
      end
      function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return e:GetHandler():IsAbleToRemove() and eg:IsExists(s.repfilter,1,nil,tp) end
      return Duel.SelectEffectYesNo(tp,e:GetHandler(),96)
      end
      function s.repval(e,c)
      return s.repfilter(c,e:GetHandlerPlayer())
      end
      function s.repop(e,tp,eg,ep,ev,re,r,rp)
      Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
      end
      \ No newline at end of file
      script/c101112073.lua deleted 100644 → 0
      View file @ e38d2b74
      --伍世壊浄心
      --Script by 奥克斯.
      local s,id,o=GetID()
      function s.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_NEGATE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_CHAINING)
      e1:SetCountLimit(1,id)
      e1:SetCondition(s.condition)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      --to deck
      local e2=Effect.CreateEffect(c)
      e2:SetCategory(CATEGORY_TODECK)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(0,TIMING_END_PHASE)
      e2:SetCountLimit(1,id+o)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(s.tdtg)
      e2:SetOperation(s.tdop)
      c:RegisterEffect(e2)
      end
      function s.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsType),tp,LOCATION_MZONE,0,1,nil,TYPE_SYNCHRO)
      and (re:IsActiveType(TYPE_MONSTER) or re:IsHasType(EFFECT_TYPE_ACTIVATE)) and Duel.IsChainNegatable(ev)
      end
      function s.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)
      end
      function s.filter(c)
      local b1=c:IsCode(56099748)
      local b2=c:IsAttack(1500) and c:IsDefense(2100)
      return c:IsFaceup() and (b1 or b2)
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      if not Duel.NegateActivation(ev) then return end
      if Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_ONFIELD+LOCATION_GRAVE,0,1,nil)
      and re:GetHandler():IsRelateToEffect(re)
      and Duel.SelectYesNo(tp,aux.Stringid(id,0)) then
      Duel.BreakEffect()
      Duel.Destroy(eg,REASON_EFFECT)
      end
      end
      function s.tdfilter(c)
      return c:IsSetCard(0x291) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
      end
      function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.tdfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.tdfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,s.tdfilter,tp,LOCATION_GRAVE,0,1,3,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
      end
      function s.tdop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetTargetsRelateToChain()
      if g:GetCount()>0 then
      Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      end
      end
      \ No newline at end of file
      script/c101112074.lua deleted 100644 → 0
      View file @ e38d2b74
      --識無辺世壊
      --Script by 奥克斯
      function c101112074.initial_effect(c)
      aux.AddCodeList(c,56099748)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY+CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCondition(c101112074.condition)
      e1:SetTarget(c101112074.target)
      e1:SetOperation(c101112074.activate)
      c:RegisterEffect(e1)
      end
      function c101112074.condition(e,tp,eg,ep,ev,re,r,rp)
      return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil,101112036)
      end
      function c101112074.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsOnField() and chkc~=e:GetHandler() end
      if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,e:GetHandler())
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function c101112074.spfilter(c,e,tp)
      return c:IsFaceup() and c:IsCode(56099748) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c101112074.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)>0 then
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      local sg=Duel.GetMatchingGroup(c101112074.spfilter,tp,LOCATION_REMOVED,0,nil,e,tp)
      local ag=Duel.GetMatchingGroup(aux.AND(Card.IsFaceup,Card.IsCode),tp,LOCATION_MZONE,0,nil,101112036)
      if tc:IsOriginalCodeRule(101112036) and ft>0 and #sg>0
      and Duel.SelectYesNo(tp,aux.Stringid(101112074,0)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local sg1=sg:Select(tp,1,1,nil)
      Duel.SpecialSummon(sg1,0,tp,tp,false,false,POS_FACEUP)
      elseif not tc:IsOriginalCodeRule(101112036) and #ag>0
      and Duel.SelectYesNo(tp,aux.Stringid(101112074,1)) then
      Duel.BreakEffect()
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      local ag1=ag:Select(tp,1,1,nil)
      Duel.HintSelection(ag1)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(1500)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      ag1:GetFirst():RegisterEffect(e1)
      end
      end
      end
      script/c101112075.lua deleted 100644 → 0
      View file @ e38d2b74
      --REINFORCE！
      --Script by 奥克斯
      function c101112075.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetHintTiming(TIMING_DAMAGE_STEP)
      e1:SetCondition(aux.dscon)
      e1:SetTarget(c101112075.target)
      e1:SetOperation(c101112075.activate)
      c:RegisterEffect(e1)
      --set
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e2:SetCode(EVENT_FREE_CHAIN)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e2:SetCountLimit(1,101112075)
      e2:SetCost(aux.bfgcost)
      e2:SetTarget(c101112075.settg)
      e2:SetOperation(c101112075.setop)
      c:RegisterEffect(e2)
      end
      function c101112075.filter(c)
      return c:IsFaceup() and c:IsSetCard(0x18b)
      end
      function c101112075.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c101112075.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112075.filter,tp,LOCATION_MZONE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      Duel.SelectTarget(tp,c101112075.filter,tp,LOCATION_MZONE,0,1,1,nil)
      end
      function c101112075.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) and tc:IsFaceup() and tc:IsControler(tp) then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      e1:SetValue(1500)
      tc:RegisterEffect(e1)
      local e2=e1:Clone()
      e1:SetCode(EFFECT_UPDATE_DEFENSE)
      tc:RegisterEffect(e2)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_SINGLE)
      e3:SetCode(EFFECT_IMMUNE_EFFECT)
      e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e3:SetRange(LOCATION_MZONE)
      e3:SetValue(c101112075.efilter)
      e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      e3:SetOwnerPlayer(tp)
      tc:RegisterEffect(e3)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_SINGLE)
      e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
      e4:SetRange(LOCATION_MZONE)
      e4:SetCode(EFFECT_INDESTRUCTABLE_COUNT)
      e4:SetCountLimit(1)
      e4:SetValue(c101112075.valcon)
      e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
      tc:RegisterEffect(e4)
      end
      end
      function c101112075.efilter(e,te)
      return te:IsActiveType(TYPE_MONSTER) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
      end
      function c101112075.valcon(e,re,r,rp)
      return bit.band(r,REASON_BATTLE)~=0
      end
      function c101112075.setfilter(c)
      return c:IsSetCard(0x18b) and c:IsType(TYPE_SPELL) and c:IsSSetable()
      end
      function c101112075.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_GRAVE) and c101112075.setfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c101112075.setfilter,tp,LOCATION_GRAVE,0,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectTarget(tp,c101112075.setfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
      end
      function c101112075.setop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SSet(tp,tc)
      end
      end
      \ No newline at end of file
      script/c101112076.lua deleted 100644 → 0
      View file @ e38d2b74
      --ダイノルフィア・インタクト
      --Script by 奥克斯
      function c101112076.initial_effect(c)
      --activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_CHAINING)
      e1:SetCountLimit(1,101112076+EFFECT_COUNT_CODE_OATH)
      e1:SetCondition(c101112076.condition)
      e1:SetCost(c101112076.cost)
      e1:SetTarget(c101112076.target)
      e1:SetOperation(c101112076.activate)
      c:RegisterEffect(e1)
      --negate damage
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_QUICK_O)
      e2:SetCode(EVENT_PRE_DAMAGE_CALCULATE)
      e2:SetRange(LOCATION_GRAVE)
      e2:SetCondition(c101112076.damcon)
      e2:SetCost(aux.bfgcost)
      e2:SetOperation(c101112076.damop)
      c:RegisterEffect(e2)
      end
      function c101112076.condition(e,tp,eg,ep,ev,re,r,rp)
      return re:IsActiveType(TYPE_MONSTER) and Duel.IsChainNegatable(ev)
      and Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsSetCard),tp,LOCATION_ONFIELD,0,1,nil,0x173)
      end
      function c101112076.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 c101112076.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 c101112076.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
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CHANGE_BATTLE_DAMAGE)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetTargetRange(1,0)
      e1:SetValue(c101112076.val)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c101112076.val(e,re,val,r,rp,rc)
      local lp=Duel.GetLP(e:GetHandlerPlayer())
      return math.ceil(lp/2)
      end
      function c101112076.damcon(e,tp,eg,ep,ev,re,r,rp)
      return Duel.GetLP(tp)<=2000 and Duel.GetBattleDamage(tp)>0
      end
      function c101112076.damop(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
      e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e1:SetTargetRange(1,0)
      e1:SetReset(RESET_PHASE+PHASE_DAMAGE)
      Duel.RegisterEffect(e1,tp)
      end
      \ No newline at end of file
      script/c101112077.lua deleted 100644 → 0
      View file @ e38d2b74
      --融合複製
      --Fusion Reproduction
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --copy
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(id,0))
      e1:SetCategory(CATEGORY_REMOVE)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      end
      function s.filter(c)
      return (c:GetType()==TYPE_SPELL or c:IsType(TYPE_QUICKPLAY)) and c:IsSetCard(0x46) and c:IsAbleToRemove()
      and c:CheckActivateEffect(true,true,false)~=nil
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and s.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
      local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,LOCATION_GRAVE,1,1,nil)
      local te,ceg,cep,cev,cre,cr,crp=g:GetFirst():CheckActivateEffect(false,true,true)
      e:SetProperty(te:GetProperty())
      local tg=te:GetTarget()
      if tg then tg(e,tp,ceg,cep,cev,cre,cr,crp,1) end
      te:SetLabelObject(e:GetLabelObject())
      e:SetLabelObject(te)
      Duel.ClearOperationInfo(0)
      Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      local te=e:GetLabelObject()
      if tc and tc:IsRelateToEffect(e) and Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)>0
      and tc:IsLocation(LOCATION_REMOVED) and te then
      e:SetLabelObject(te:GetLabelObject())
      local op=te:GetOperation()
      if op then op(e,tp,eg,ep,ev,re,r,rp) end
      end
      end
      script/c101112078.lua deleted 100644 → 0
      View file @ e38d2b74
      --トラップトラック
      --Trap Track
      --coded by Lyris
      local s,id,o=GetID()
      function s.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_DESTROY)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
      e1:SetTarget(s.target)
      e1:SetOperation(s.activate)
      c:RegisterEffect(e1)
      end
      function s.filter(c)
      return c:GetType()==TYPE_TRAP and not c:IsCode(id) and c:IsSSetable(true)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) end
      if chk==0 then
      local ft=Duel.GetLocationCount(tp,LOCATION_SZONE)
      if e:IsHasType(EFFECT_TYPE_ACTIVATE) and not e:GetHandler():IsLocation(LOCATION_SZONE) then ft=ft-1 end
      return ft>0 and Duel.IsExistingTarget(nil,tp,LOCATION_MZONE,0,1,nil)
      and Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil)
      end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g=Duel.SelectTarget(tp,nil,tp,LOCATION_MZONE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
      end
      function s.activate(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      local tc=Duel.GetFirstTarget()
      if tc and tc:IsRelateToEffect(e) and Duel.Destroy(tc,REASON_EFFECT)>0 then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
      local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil)
      local tc=g:GetFirst()
      if tc and Duel.SSet(tp,tc)~=0 then
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
      e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      end
      end
      if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
      e2:SetCode(EVENT_CHAINING)
      e2:SetOperation(s.aclimit1)
      e2:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e2,tp)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
      e3:SetCode(EVENT_CHAIN_NEGATED)
      e3:SetOperation(s.aclimit2)
      e3:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e3,tp)
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_FIELD)
      e4:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
      e4:SetCode(EFFECT_CANNOT_ACTIVATE)
      e4:SetTargetRange(1,0)
      e4:SetCondition(s.actcon)
      e4:SetValue(s.aclimit3)
      e4:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e4,tp)
      end
      end
      function s.aclimit1(e,tp,eg,ep,ev,re,r,rp)
      if ep==1-tp or not re:IsHasType(EFFECT_TYPE_ACTIVATE) or not re:IsActiveType(TYPE_TRAP) then return end
      Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1)
      end
      function s.aclimit2(e,tp,eg,ep,ev,re,r,rp)
      if ep==1-tp or not re:IsHasType(EFFECT_TYPE_ACTIVATE) or not re:IsActiveType(TYPE_TRAP) then return end
      Duel.ResetFlagEffect(tp,id)
      end
      function s.actcon(e)
      return Duel.GetFlagEffect(e:GetHandlerPlayer(),id)~=0
      end
      function s.aclimit3(e,re,tp)
      return re:IsActiveType(TYPE_TRAP) and re:IsHasType(EFFECT_TYPE_ACTIVATE)
      end
      script/c101112079.lua deleted 100644 → 0
      View file @ e38d2b74
      --ダブル・フッキング
      --Double Hooking
      --coded by Lyris
      local s,id,o=GetID()
      function s.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:SetProperty(EFFECT_FLAG_CARD_TARGET)
      e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
      e1:SetCountLimit(1,id+EFFECT_COUNT_CODE_OATH)
      e1:SetCost(s.cost)
      e1:SetTarget(s.target)
      e1:SetOperation(s.operation)
      c:RegisterEffect(e1)
      --Destroy
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
      e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e2:SetCode(EVENT_LEAVE_FIELD_P)
      e2:SetOperation(s.checkop)
      c:RegisterEffect(e2)
      local e3=Effect.CreateEffect(c)
      e3:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
      e3:SetCode(EVENT_LEAVE_FIELD)
      e3:SetOperation(s.desop)
      e3:SetLabelObject(e2)
      c:RegisterEffect(e3)
      --Destroy2
      local e4=Effect.CreateEffect(c)
      e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
      e4:SetRange(LOCATION_SZONE)
      e4:SetCode(EVENT_LEAVE_FIELD)
      e4:SetCondition(s.descon2)
      e4:SetOperation(s.desop2)
      c:RegisterEffect(e4)
      end
      function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return Duel.IsExistingMatchingCard(Card.IsDiscardable,tp,LOCATION_HAND,0,1,e:GetHandler()) end
      Duel.DiscardHand(tp,Card.IsDiscardable,1,1,REASON_COST+REASON_DISCARD)
      end
      function s.filter(c,e,tp)
      return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and s.filter(chkc,e,tp) end
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if chk==0 then return ft>0 and Duel.IsExistingTarget(s.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      ft=math.min(ft,2)
      if Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,s.filter,tp,LOCATION_GRAVE,0,1,2,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function s.operation(e,tp,eg,ep,ev,re,r,rp)
      local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
      if ft<=0 then return end
      local sg=Duel.GetTargetsRelateToChain()
      if #sg==0 then return end
      if #sg>1 and Duel.IsPlayerAffectedByEffect(tp,59822133) then return end
      if #sg>ft then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      sg=sg:Select(tp,ft,ft,nil)
      end
      local c=e:GetHandler()
      for tc in aux.Next(sg) do
      if Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
      c:SetCardTarget(tc)
      end
      end
      Duel.SpecialSummonComplete()
      end
      function s.checkop(e,tp,eg,ep,ev,re,r,rp)
      if e:GetHandler():IsDisabled() then
      e:SetLabel(1)
      else e:SetLabel(0) end
      end
      function s.desop(e,tp,eg,ep,ev,re,r,rp)
      if e:GetLabelObject():GetLabel()~=0 then return end
      local tg=e:GetHandler():GetCardTarget()
      for tc in aux.Next(tg) do if tc:IsLocation(LOCATION_MZONE) then
      Duel.Destroy(tc,REASON_EFFECT)
      end end
      end
      function s.descon2(e,tp,eg,ep,ev,re,r,rp)
      local tc=e:GetHandler():GetFirstCardTarget()
      return tc and eg:IsContains(tc)
      end
      function s.desop2(e,tp,eg,ep,ev,re,r,rp)
      Duel.Destroy(e:GetHandler(),REASON_EFFECT)
      end
      script/c101112080.lua deleted 100644 → 0
      View file @ e38d2b74
      --初買い
      --Script by 奥克斯
      function c101112080.initial_effect(c)
      --Activate
      local e1=Effect.CreateEffect(c)
      e1:SetCategory(CATEGORY_RECOVER+CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_ACTIVATE)
      e1:SetCode(EVENT_FREE_CHAIN)
      e1:SetTarget(c101112080.cftg)
      e1:SetOperation(c101112080.cfop)
      c:RegisterEffect(e1)
      end
      function c101112080.cftg(e,tp,eg,ep,ev,re,r,rp,chk)
      local g=Duel.GetDecktopGroup(1-tp,5)
      if chk==0 then return g:FilterCount(Card.IsAbleToHand,nil,tp)>0 end
      Duel.SetTargetPlayer(tp)
      end
      function c101112080.cfop(e,tp,eg,ep,ev,re,r,rp)
      local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
      local g=Duel.GetDecktopGroup(1-p,5)
      if g:FilterCount(Card.IsAbleToHand,nil,tp)==0 then return end
      Duel.ConfirmDecktop(1-p,5)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local tc=g:FilterSelect(tp,Card.IsAbleToHand,1,1,nil,tp):GetFirst()
      local num=math.floor(3000/100)
      local t={}
      for i=1,num do
      t[i]=i*100
      end
      local val=Duel.AnnounceNumber(tp,table.unpack(t))
      if Duel.SelectYesNo(1-p,aux.Stringid(101112080,0)) then
      if Duel.Recover(1-p,val,REASON_EFFECT)>0 then
      Duel.SetLP(tp,Duel.GetLP(tp)-val)
      Duel.DisableShuffleCheck(true)
      Duel.SendtoHand(tc,p,REASON_EFFECT)
      Duel.ConfirmCards(1-p,tc)
      end
      end
      end
      \ No newline at end of file
      script/c1050186.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 ウヌク
      function c1050186.initial_effect(c)
      --tograve
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(1050186,0))
      e1:SetCategory(CATEGORY_TOGRAVE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,1050186)
      e1:SetTarget(c1050186.target)
      e1:SetOperation(c1050186.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c1050186.star_knight_summon_effect=e1
      end
      function c1050186.filter(c)
      return c:IsSetCard(0x9c) and not c:IsCode(1050186) and c:IsAbleToGrave()
      end
      function c1050186.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.IsExistingMatchingCard(c1050186.filter,tp,LOCATION_DECK,0,1,exc) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
      end
      function c1050186.operation(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
      local g=Duel.SelectMatchingCard(tp,c1050186.filter,tp,LOCATION_DECK,0,1,1,nil)
      if g:GetCount()>0 then
      Duel.SendtoGrave(g,REASON_EFFECT)
      end
      end
      script/c13851202.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 リゲル
      function c13851202.initial_effect(c)
      --atk up
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,13851202)
      e1:SetTarget(c13851202.target)
      e1:SetOperation(c13851202.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c13851202.star_knight_summon_effect=e1
      end
      function c13851202.filter(c)
      return c:IsFaceup() and c:IsSetCard(0x9c)
      end
      function c13851202.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_MZONE) and c13851202.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c13851202.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
      Duel.SelectTarget(tp,c13851202.filter,tp,LOCATION_MZONE,LOCATION_MZONE,1,1,nil)
      end
      function c13851202.operation(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsFaceup() and tc:IsRelateToEffect(e) then
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetValue(500)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e1)
      local e2=Effect.CreateEffect(e:GetHandler())
      e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
      e2:SetCode(EVENT_PHASE+PHASE_END)
      e2:SetRange(LOCATION_MZONE)
      e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e2:SetCountLimit(1)
      e2:SetOperation(c13851202.tgop)
      e2:SetReset(RESET_EVENT+RESETS_STANDARD)
      tc:RegisterEffect(e2)
      end
      end
      function c13851202.tgop(e,tp,eg,ep,ev,re,r,rp)
      Duel.SendtoGrave(e:GetHandler(),REASON_EFFECT)
      end
      script/c14759024.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・エスカ
      function c14759024.initial_effect(c)
      --search
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(14759024,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetTarget(c14759024.tg)
      e1:SetOperation(c14759024.op)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP)
      c:RegisterEffect(e2)
      c14759024.star_knight_summon_effect=e1
      end
      function c14759024.filter(c)
      return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c14759024.tg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.IsExistingMatchingCard(c14759024.filter,tp,LOCATION_DECK,0,1,exc) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c14759024.op(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c14759024.filter,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/c15871676.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・ダバラン
      function c15871676.initial_effect(c)
      --summon success
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(15871676,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetTarget(c15871676.sptg)
      e2:SetOperation(c15871676.spop)
      c:RegisterEffect(e2)
      c15871676.star_knight_summon_effect=e2
      end
      function c15871676.filter(c,e,tp)
      return c:IsSetCard(0x53) and c:IsLevel(3) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c15871676.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c15871676.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c15871676.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,c15871676.filter,tp,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/c16906241.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・レスカ
      function c16906241.initial_effect(c)
      --summon success
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(16906241,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetTarget(c16906241.sptg)
      e2:SetOperation(c16906241.spop)
      c:RegisterEffect(e2)
      c16906241.star_knight_summon_effect=e2
      end
      function c16906241.filter(c,e,tp)
      return c:IsSetCard(0x53) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c16906241.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c16906241.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c16906241.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,c16906241.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
      end
      end
      script/c21915012.lua deleted 100644 → 0
      View file @ e38d2b74
      --ルイ・キューピット
      function c21915012.initial_effect(c)
      --synchro summon
      aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
      c:EnableReviveLimit()
      --lv up/down
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(21915012,4))
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e1:SetCode(EVENT_SPSUMMON_SUCCESS)
      e1:SetCondition(c21915012.lvcon)
      e1:SetOperation(c21915012.lvop)
      c:RegisterEffect(e1)
      local e0=Effect.CreateEffect(c)
      e0:SetType(EFFECT_TYPE_SINGLE)
      e0:SetCode(EFFECT_MATERIAL_CHECK)
      e0:SetValue(c21915012.valcheck)
      e0:SetLabelObject(e1)
      c:RegisterEffect(e0)
      --atk up
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_SINGLE)
      e2:SetCode(EFFECT_UPDATE_ATTACK)
      e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
      e2:SetRange(LOCATION_MZONE)
      e2:SetValue(c21915012.atkval)
      c:RegisterEffect(e2)
      --search
      local e3=Effect.CreateEffect(c)
      e3:SetDescription(aux.Stringid(21915012,0))
      e3:SetCategory(CATEGORY_DAMAGE+CATEGORY_SEARCH+CATEGORY_TOHAND)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e3:SetCode(EVENT_BE_MATERIAL)
      e3:SetCountLimit(1,21915012)
      e3:SetCondition(c21915012.thcon)
      e3:SetTarget(c21915012.thtg)
      e3:SetOperation(c21915012.thop)
      c:RegisterEffect(e3)
      end
      function c21915012.matfilter(c)
      return c:IsType(TYPE_TUNER)
      end
      function c21915012.valcheck(e,c)
      local g=c:GetMaterial()
      local mg=g:Filter(Card.IsType,nil,TYPE_TUNER)
      local tc=mg:GetFirst()
      if not tc then
      e:GetLabelObject():SetLabel(0)
      return
      end
      if #mg>1 then
      local tg=g-(g:Filter(Card.IsNotTuner,nil,c))
      if #tg>0 then
      tc=tg:GetFirst()
      end
      end
      local lv=tc:GetSynchroLevel(c)
      local lv2=lv>>16
      lv=lv&0xffff
      if lv2>0 and not g:CheckWithSumEqual(Card.GetLevel,c:GetLevel(),#g,#g,c) then
      lv=lv2
      end
      if tc:IsHasEffect(89818984) and not g:CheckWithSumEqual(Card.GetSynchroLevel,c:GetLevel(),#g,#g,c) then
      lv=2
      end
      e:GetLabelObject():SetLabel(lv)
      end
      function c21915012.lvcon(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
      end
      function c21915012.lvop(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsFacedown() or not c:IsRelateToEffect(e) then return end
      local ct=e:GetLabel()
      if ct==0 then return end
      local sel=nil
      if c:IsLevel(1) then
      sel=Duel.SelectOption(tp,aux.Stringid(21915012,1))
      else
      sel=Duel.SelectOption(tp,aux.Stringid(21915012,1),aux.Stringid(21915012,2))
      end
      if sel==1 then
      ct=ct*-1
      end
      local e1=Effect.CreateEffect(c)
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_LEVEL)
      e1:SetValue(ct)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
      c:RegisterEffect(e1)
      end
      function c21915012.atkval(e,c)
      return c:GetLevel()*400
      end
      function c21915012.thcon(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      return c:IsSummonType(SUMMON_TYPE_SYNCHRO) and c:IsLocation(LOCATION_GRAVE) and r==REASON_SYNCHRO
      end
      function c21915012.thfilter(c)
      return c:IsType(TYPE_MONSTER) and c:IsLevelBelow(8) and c:IsDefense(600) and c:IsAbleToHand()
      end
      function c21915012.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
      local rc=e:GetHandler():GetReasonCard()
      local lv=rc:GetLevel()
      if chk==0 then return true end
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,lv*100)
      end
      function c21915012.thop(e,tp,eg,ep,ev,re,r,rp)
      local rc=e:GetHandler():GetReasonCard()
      local lv=rc:GetLevel()
      if Duel.Damage(1-tp,lv*100,REASON_EFFECT)~=0 and Duel.IsExistingMatchingCard(c21915012.thfilter,tp,LOCATION_DECK,0,1,nil)
      and Duel.SelectYesNo(tp,aux.Stringid(21915012,3)) then
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c21915012.thfilter,tp,LOCATION_DECK,0,1,1,nil)
      Duel.SendtoHand(g,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,g)
      end
      end
      script/c22617205.lua deleted 100644 → 0
      View file @ e38d2b74
      --覚星輝士－セフィラビュート
      function c22617205.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --splimit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetRange(LOCATION_PZONE)
      e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
      e2:SetTargetRange(1,0)
      e2:SetTarget(c22617205.splimit)
      c:RegisterEffect(e2)
      --destroy
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_DESTROY)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_SUMMON_SUCCESS)
      e3:SetCountLimit(1,22617205)
      e3:SetTarget(c22617205.target)
      e3:SetOperation(c22617205.operation)
      c:RegisterEffect(e3)
      local e4=e3:Clone()
      e4:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e4)
      local e5=e3:Clone()
      e5:SetCode(EVENT_SPSUMMON_SUCCESS)
      e5:SetCondition(c22617205.condition)
      c:RegisterEffect(e5)
      c22617205.star_knight_summon_effect=e3
      end
      function c22617205.splimit(e,c,sump,sumtype,sumpos,targetp)
      if c:IsSetCard(0x9c,0xc4) then return false end
      return bit.band(sumtype,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
      end
      function c22617205.condition(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM)
      end
      function c22617205.filter1(c)
      return c:IsFaceup() and c:IsSetCard(0x9c,0xc4)
      end
      function c22617205.filter2(c)
      return c:IsFacedown()
      end
      function c22617205.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(c22617205.filter1,tp,LOCATION_MZONE+LOCATION_PZONE,0,1,e:GetHandler())
      and Duel.IsExistingTarget(c22617205.filter2,tp,0,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g1=Duel.SelectTarget(tp,c22617205.filter1,tp,LOCATION_MZONE+LOCATION_PZONE,0,1,1,e:GetHandler())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g2=Duel.SelectTarget(tp,c22617205.filter2,tp,0,LOCATION_ONFIELD,1,1,nil)
      g1:Merge(g2)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,2,0,0)
      end
      function c22617205.operation(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      script/c2273734.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 アルタイル
      function c2273734.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(2273734,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,2273734)
      e1:SetTarget(c2273734.sptg)
      e1:SetOperation(c2273734.spop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c2273734.star_knight_summon_effect=e1
      end
      function c2273734.filter(c,e,tp)
      return c:IsSetCard(0x9c) and not c:IsCode(2273734) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c2273734.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c2273734.filter(chkc,e,tp) end
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingTarget(c2273734.filter,tp,LOCATION_GRAVE,0,1,nil,e,tp) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
      local g=Duel.SelectTarget(tp,c2273734.filter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp)
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
      end
      function c2273734.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_DEFENSE)
      end
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_CANNOT_ATTACK)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c2273734.atktg)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c2273734.atktg(e,c)
      return not c:IsSetCard(0x9c)
      end
      script/c26057276.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 ベテルギウス
      function c26057276.initial_effect(c)
      --tohand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(26057276,0))
      e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,26057276)
      e1:SetTarget(c26057276.target)
      e1:SetOperation(c26057276.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c26057276.star_knight_summon_effect=e1
      end
      function c26057276.filter(c)
      return c:IsSetCard(0x9c) and not c:IsCode(26057276) and c:IsAbleToHand()
      end
      function c26057276.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c26057276.filter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c26057276.filter,tp,LOCATION_GRAVE,0,1,exc) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,c26057276.filter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c26057276.operation(e,tp,eg,ep,ev,re,r,rp)
      local c=e:GetHandler()
      if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) then
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      end
      end
      end
      script/c38667773.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 ベガ
      function c38667773.initial_effect(c)
      --spsummon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(38667773,0))
      e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,38667773)
      e1:SetTarget(c38667773.sptg)
      e1:SetOperation(c38667773.spop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c38667773.star_knight_summon_effect=e1
      end
      function c38667773.filter(c,e,tp)
      return c:IsSetCard(0x9c) and not c:IsCode(38667773) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c38667773.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c38667773.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c38667773.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,c38667773.filter,tp,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/c40143123.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・スピカ
      function c40143123.initial_effect(c)
      --summon success
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(40143123,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetTarget(c40143123.sptg)
      e2:SetOperation(c40143123.spop)
      c:RegisterEffect(e2)
      c40143123.star_knight_summon_effect=e2
      end
      function c40143123.filter(c,e,tp)
      return c:IsSetCard(0x53) and c:IsLevel(5) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE)
      end
      function c40143123.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c40143123.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c40143123.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,c40143123.filter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
      if g:GetCount()>0 then
      Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP_DEFENSE)
      end
      end
      script/c41269771.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・グレディ
      function c41269771.initial_effect(c)
      --summon success
      local e2=Effect.CreateEffect(c)
      e2:SetDescription(aux.Stringid(41269771,0))
      e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
      e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e2:SetCode(EVENT_SUMMON_SUCCESS)
      e2:SetTarget(c41269771.sptg)
      e2:SetOperation(c41269771.spop)
      c:RegisterEffect(e2)
      c41269771.star_knight_summon_effect=e2
      end
      function c41269771.filter(c,e,tp)
      return c:IsSetCard(0x53) and c:IsLevel(4) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
      end
      function c41269771.sptg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
      and Duel.IsExistingMatchingCard(c41269771.filter,tp,LOCATION_HAND,0,1,exc,e,tp) end
      Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
      end
      function c41269771.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,c41269771.filter,tp,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/c42391240.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・アンタレス
      function c42391240.initial_effect(c)
      --summon success
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(42391240,0))
      e1:SetCategory(CATEGORY_TOHAND)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetTarget(c42391240.thtg)
      e1:SetOperation(c42391240.thop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      c42391240.star_knight_summon_effect=e1
      end
      function c42391240.tgfilter(c)
      return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c42391240.thtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c42391240.tgfilter(chkc) end
      if chk==0 then return Duel.IsExistingTarget(c42391240.tgfilter,tp,LOCATION_GRAVE,0,1,exc) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectTarget(tp,c42391240.tgfilter,tp,LOCATION_GRAVE,0,1,1,nil)
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
      end
      function c42391240.thop(e,tp,eg,ep,ev,re,r,rp)
      local tc=Duel.GetFirstTarget()
      if tc:IsRelateToEffect(e) then
      Duel.SendtoHand(tc,nil,REASON_EFFECT)
      Duel.ConfirmCards(1-tp,tc)
      end
      end
      script/c43513897.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・アクベス
      function c43513897.initial_effect(c)
      --special summon
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(43513897,0))
      e1:SetCategory(CATEGORY_ATKCHANGE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetOperation(c43513897.atkop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e2)
      c43513897.star_knight_summon_effect=e1
      end
      function c43513897.filter(c)
      return c:IsFaceup() and c:IsSetCard(0x53)
      end
      function c43513897.atkop(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetMatchingGroup(c43513897.filter,tp,LOCATION_MZONE,0,nil)
      local tc=g:GetFirst()
      while tc do
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_SINGLE)
      e1:SetCode(EFFECT_UPDATE_ATTACK)
      e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
      e1:SetReset(RESET_EVENT+RESETS_STANDARD)
      e1:SetValue(500)
      tc:RegisterEffect(e1)
      tc=g:GetNext()
      end
      end
      script/c63274863.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 シリウス
      function c63274863.initial_effect(c)
      --todeck
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(63274863,0))
      e1:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,63274863)
      e1:SetTarget(c63274863.target)
      e1:SetOperation(c63274863.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c63274863.star_knight_summon_effect=e1
      end
      function c63274863.filter(c)
      return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER) and c:IsAbleToDeck()
      end
      function c63274863.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc,exc)
      if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c63274863.filter(chkc) end
      if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
      and Duel.IsExistingTarget(c63274863.filter,tp,LOCATION_GRAVE,0,5,exc) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
      local g=Duel.SelectTarget(tp,c63274863.filter,tp,LOCATION_GRAVE,0,5,5,nil)
      Duel.SetOperationInfo(0,CATEGORY_TODECK,g,5,0,0)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function c63274863.operation(e,tp,eg,ep,ev,re,r,rp)
      local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
      if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=5 then return end
      Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
      local g=Duel.GetOperatedGroup()
      if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
      local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
      if ct==5 then
      Duel.BreakEffect()
      Duel.Draw(tp,1,REASON_EFFECT)
      end
      end
      script/c65056481.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 シャム
      function c65056481.initial_effect(c)
      --damage
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(65056481,0))
      e1:SetCategory(CATEGORY_DAMAGE)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,65056481)
      e1:SetTarget(c65056481.damtg)
      e1:SetOperation(c65056481.damop)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c65056481.star_knight_summon_effect=e1
      end
      function c65056481.damtg(e,tp,eg,ep,ev,re,r,rp,chk)
      if chk==0 then return true end
      Duel.SetTargetPlayer(1-tp)
      Duel.SetTargetParam(1000)
      Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,1000)
      end
      function c65056481.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
      script/c75878039.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 デネブ
      function c75878039.initial_effect(c)
      --tohand
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(75878039,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,75878039)
      e1:SetTarget(c75878039.target)
      e1:SetOperation(c75878039.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c75878039.star_knight_summon_effect=e1
      end
      function c75878039.filter(c)
      return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER) and not c:IsCode(75878039) and c:IsAbleToHand()
      end
      function c75878039.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.IsExistingMatchingCard(c75878039.filter,tp,LOCATION_DECK,0,1,exc) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c75878039.operation(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c75878039.filter,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/c78486968.lua deleted 100644 → 0
      View file @ e38d2b74
      --セイクリッド・シェラタン
      function c78486968.initial_effect(c)
      --search
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(78486968,0))
      e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
      e1:SetType(EFFECT_TYPE_TRIGGER_O+EFFECT_TYPE_SINGLE)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetTarget(c78486968.tg)
      e1:SetOperation(c78486968.op)
      c:RegisterEffect(e1)
      c78486968.star_knight_summon_effect=e1
      end
      function c78486968.filter(c)
      return c:IsSetCard(0x53) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
      end
      function c78486968.tg(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.IsExistingMatchingCard(c78486968.filter,tp,LOCATION_DECK,0,1,exc) end
      Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
      end
      function c78486968.op(e,tp,eg,ep,ev,re,r,rp)
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
      local g=Duel.SelectMatchingCard(tp,c78486968.filter,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/c86466163.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 カペラ
      function c86466163.initial_effect(c)
      Duel.EnableGlobalFlag(GLOBALFLAG_XMAT_COUNT_LIMIT)
      --xyzlv
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(86466163,0))
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,86466163)
      e1:SetOperation(c86466163.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c86466163.star_knight_summon_effect=e1
      end
      function c86466163.operation(e,tp,eg,ep,ev,re,r,rp)
      local e1=Effect.CreateEffect(e:GetHandler())
      e1:SetType(EFFECT_TYPE_FIELD)
      e1:SetCode(EFFECT_XYZ_LEVEL)
      e1:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
      e1:SetTargetRange(LOCATION_MZONE,0)
      e1:SetTarget(c86466163.xyztg)
      e1:SetValue(c86466163.xyzlv)
      e1:SetReset(RESET_PHASE+PHASE_END)
      Duel.RegisterEffect(e1,tp)
      end
      function c86466163.xyztg(e,c)
      return c:IsLevelBelow(4) and c:IsSetCard(0x9c)
      end
      function c86466163.xyzlv(e,c,rc)
      return 0x30050000+c:GetLevel()
      end
      script/c96223501.lua deleted 100644 → 0
      View file @ e38d2b74
      --竜星因士－セフィラツバーン
      function c96223501.initial_effect(c)
      --pendulum summon
      aux.EnablePendulumAttribute(c)
      --splimit
      local e2=Effect.CreateEffect(c)
      e2:SetType(EFFECT_TYPE_FIELD)
      e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
      e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CANNOT_NEGATE)
      e2:SetRange(LOCATION_PZONE)
      e2:SetTargetRange(1,0)
      e2:SetTarget(c96223501.splimit)
      c:RegisterEffect(e2)
      --destroy
      local e3=Effect.CreateEffect(c)
      e3:SetCategory(CATEGORY_DESTROY)
      e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e3:SetCode(EVENT_SUMMON_SUCCESS)
      e3:SetCountLimit(1,96223501)
      e3:SetTarget(c96223501.target)
      e3:SetOperation(c96223501.operation)
      c:RegisterEffect(e3)
      local e4=e3:Clone()
      e4:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e4)
      local e5=e3:Clone()
      e5:SetCode(EVENT_SPSUMMON_SUCCESS)
      e5:SetCondition(c96223501.condition)
      c:RegisterEffect(e5)
      c96223501.star_knight_summon_effect=e3
      end
      function c96223501.splimit(e,c,sump,sumtype,sumpos,targetp)
      if c:IsSetCard(0x9c,0xc4) then return false end
      return bit.band(sumtype,SUMMON_TYPE_PENDULUM)==SUMMON_TYPE_PENDULUM
      end
      function c96223501.condition(e,tp,eg,ep,ev,re,r,rp)
      return e:GetHandler():IsSummonType(SUMMON_TYPE_PENDULUM)
      end
      function c96223501.filter1(c)
      return c:IsFaceup() and c:IsSetCard(0x9c,0xc4)
      end
      function c96223501.filter2(c)
      return c:IsFaceup()
      end
      function c96223501.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
      if chkc then return false end
      if chk==0 then return Duel.IsExistingTarget(c96223501.filter1,tp,LOCATION_MZONE+LOCATION_PZONE,0,1,e:GetHandler())
      and Duel.IsExistingTarget(c96223501.filter2,tp,0,LOCATION_ONFIELD,1,nil) end
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g1=Duel.SelectTarget(tp,c96223501.filter1,tp,LOCATION_MZONE+LOCATION_PZONE,0,1,1,e:GetHandler())
      Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
      local g2=Duel.SelectTarget(tp,c96223501.filter2,tp,0,LOCATION_ONFIELD,1,1,nil)
      g1:Merge(g2)
      Duel.SetOperationInfo(0,CATEGORY_DESTROY,g1,2,0,0)
      end
      function c96223501.operation(e,tp,eg,ep,ev,re,r,rp)
      local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS):Filter(Card.IsRelateToEffect,nil,e)
      if g:GetCount()>0 then
      Duel.Destroy(g,REASON_EFFECT)
      end
      end
      script/c99668578.lua deleted 100644 → 0
      View file @ e38d2b74
      --星因士 プロキオン
      function c99668578.initial_effect(c)
      --handes
      local e1=Effect.CreateEffect(c)
      e1:SetDescription(aux.Stringid(99668578,0))
      e1:SetCategory(CATEGORY_HANDES+CATEGORY_DRAW)
      e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
      e1:SetCode(EVENT_SUMMON_SUCCESS)
      e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
      e1:SetCountLimit(1,99668578)
      e1:SetTarget(c99668578.target)
      e1:SetOperation(c99668578.operation)
      c:RegisterEffect(e1)
      local e2=e1:Clone()
      e2:SetCode(EVENT_FLIP_SUMMON_SUCCESS)
      c:RegisterEffect(e2)
      local e3=e1:Clone()
      e3:SetCode(EVENT_SPSUMMON_SUCCESS)
      c:RegisterEffect(e3)
      c99668578.star_knight_summon_effect=e3
      end
      function c99668578.filter(c)
      return c:IsSetCard(0x9c) and c:IsType(TYPE_MONSTER)
      end
      function c99668578.target(e,tp,eg,ep,ev,re,r,rp,chk,_,exc)
      if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
      and Duel.IsExistingMatchingCard(c99668578.filter,tp,LOCATION_HAND,0,1,exc) end
      Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
      Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
      end
      function c99668578.operation(e,tp,eg,ep,ev,re,r,rp)
      if Duel.DiscardHand(tp,c99668578.filter,1,1,REASON_EFFECT)~=0 then
      Duel.Draw(tp,1,REASON_EFFECT)
      end
      end
      Markdown is supported
      0% or
      You are about to add 0 people to the discussion. Proceed with caution.
      Finish editing this message first!
      Please register or to comment