Skip to content

P
pre-release-database-cdb
Commit 714efaa5 authored by wind2009's avatar wind2009
Browse files
Options

Remove released cards

parent 47278166
Pipeline #31673 passed with stages
          in 5 minutes and 51 seconds
          Expand all Hide whitespace changes
          Inline Side-by-side
          Showing with 1 addition and 4065 deletions
          .gitlab-ci.yml
          View file @ 714efaa5
          ......@@ -53,7 +53,7 @@ merge_databases:
          FIELDS: 'name,desc,overallString,picUrl'
          GIT_DEPTH: '1000'
          OUTPUT_FILENAME: test-release.json
          REF_COMMIT: '9.11' # 更新的时候改这里，修改成上一个tag的版本号
          REF_COMMIT: '9.12' # 更新的时候改这里，修改成上一个tag的版本号
          script:
          - apt update;apt -y install wget
          - currentPath=$PWD
          ......
          TW02.cdb deleted 100644 → 0
          View file @ 47278166
          File deleted
          etc.cdb
          View file @ 714efaa5
          No preview for this file type
          pack/2024-11-23 TW02.ydk deleted 100644 → 0
          View file @ 47278166
          #created by ygomobile
          100227001
          100227002
          100227003
          100227004
          100227027
          100227028
          100227029
          100227030
          100227042
          100227043
          100227044
          100227045
          100227072
          100227073
          100227074
          100227075
          pack/etc.ydk
          View file @ 714efaa5
          #created by ygomobile
          100231002
          100200263
          100200264
          \ No newline at end of file
          script-fix.cdb
          View file @ 714efaa5
          No preview for this file type
          script/c100200263.lua deleted 100644 → 0
          View file @ 47278166
          --葬角のカルノヴルス
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --Synchro summon
          aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
          c:EnableReviveLimit()
          --synchro summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_QUICK_O)
          e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetHintTiming(0,TIMING_MAIN_END+TIMING_BATTLE_START+TIMING_BATTLE_END)
          e1:SetRange(LOCATION_MZONE)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.sccon)
          e1:SetTarget(s.sctg)
          e1:SetOperation(s.scop)
          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_FIELD+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_ATTACK_ANNOUNCE)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCountLimit(1,id+o)
          e2:SetTarget(s.sptg)
          e2:SetOperation(s.spop)
          c:RegisterEffect(e2)
          end
          function s.sccon(e,tp,eg,ep,ev,re,r,rp)
          local ph=Duel.GetCurrentPhase()
          return ph==PHASE_MAIN1 or (ph>=PHASE_BATTLE_START and ph<=PHASE_BATTLE) or ph==PHASE_MAIN2
          end
          function s.scfilter(c,mc)
          return c:IsSynchroSummonable(mc) and c:IsRace(RACE_DINOSAUR)
          end
          function s.sctg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.scfilter,tp,LOCATION_EXTRA,0,1,nil,e:GetHandler()) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
          end
          function s.scop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          if c:IsControler(1-tp) or not c:IsRelateToEffect(e) or c:IsFacedown() then return end
          local g=Duel.GetMatchingGroup(s.scfilter,tp,LOCATION_EXTRA,0,nil,c)
          if g:GetCount()>0 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local sg=g:Select(tp,1,1,nil)
          Duel.SynchroSummon(tp,sg:GetFirst(),c)
          end
          end
          function s.spfilter(c,e,tp)
          return c:IsRace(RACE_DINOSAUR) and c:IsCanBeSpecialSummoned(e,0,tp,true,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)
          Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
          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:GetCount()>0 then
          Duel.SpecialSummon(g,0,tp,tp,true,false,POS_FACEUP)
          end
          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(s.splimit)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          function s.splimit(e,c,sump,sumtype,sumpos,targetp,se)
          return not c:IsRace(RACE_DINOSAUR)
          end
          script/c100227001.lua deleted 100644 → 0
          View file @ 47278166
          --魔轟神獣ベヒルモス
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --synchro summon
          local e1=Effect.CreateEffect(c)
          e1:SetCategory(CATEGORY_HANDES|CATEGORY_SPECIAL_SUMMON)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_HAND)
          e1:SetCountLimit(1,id)
          e1:SetTarget(s.syntg)
          e1:SetOperation(s.synop)
          c:RegisterEffect(e1)
          --special summon
          local e2=Effect.CreateEffect(c)
          e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_TO_GRAVE)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetProperty(EFFECT_FLAG_DELAY)
          e2:SetCountLimit(1,id+o)
          e2:SetCost(aux.bfgcost)
          e2:SetCondition(s.spcon)
          e2:SetTarget(s.sptg)
          e2:SetOperation(s.spop)
          c:RegisterEffect(e2)
          end
          function s.dfilter(c,g,e,tp)
          return c:IsSetCard(0x35) and c:IsType(TYPE_MONSTER) and c:IsDiscardable(REASON_EFFECT+REASON_DISCARD)
          end
          function s.fselect(g,e,tp)
          local lv=g:GetSum(Card.GetOriginalLevel)
          return g:IsContains(e:GetHandler()) and Duel.IsExistingMatchingCard(s.synfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,lv)
          end
          function s.synfilter(c,e,tp,lv)
          return c:IsSetCard(0x35) and c:IsLevel(lv) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false) and c:IsType(TYPE_SYNCHRO)
          and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
          end
          function s.syntg(e,tp,eg,ep,ev,re,r,rp,chk)
          local g=Duel.GetMatchingGroup(s.dfilter,tp,LOCATION_HAND,0,nil)
          if chk==0 then return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) and g:CheckSubGroup(s.fselect,2,99,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,0,tp,LOCATION_HAND)
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          end
          function s.synop(e,tp,eg,ep,ev,re,r,rp)
          local g=Duel.GetMatchingGroup(s.dfilter,tp,LOCATION_HAND,0,nil)
          if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) or not g:CheckSubGroup(s.fselect,2,99,e,tp) then return end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DISCARD)
          Duel.SetSelectedCard(e:GetHandler())
          local sg=g:SelectSubGroup(tp,s.fselect,false,2,99,e,tp)
          if sg and sg:GetCount()>=2 then
          local lv=sg:GetSum(Card.GetOriginalLevel)
          Duel.SendtoGrave(sg,REASON_EFFECT+REASON_DISCARD)
          local sc=Duel.SelectMatchingCard(tp,s.synfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp,lv):GetFirst()
          if not sc then return end
          sc:SetMaterial(nil)
          Duel.SpecialSummon(sc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
          sc:CompleteProcedure()
          end
          end
          function s.cfilter(c,tp)
          return c:IsPreviousLocation(LOCATION_HAND) and c:IsPreviousControler(tp)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(s.cfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
          end
          function s.spfilter(c,e,tp)
          return c:IsSetCard(0x35) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          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,0,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:GetCount()>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          script/c100227002.lua deleted 100644 → 0
          View file @ 47278166
          --魔轟神ガミュジン
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --synchro summon
          aux.AddSynchroProcedure(c,aux.FilterBoolFunction(Card.IsSetCard,0x35),aux.NonTuner(nil),1)
          c:EnableReviveLimit()
          --spsummon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetCode(EVENT_SPSUMMON_SUCCESS)
          e1:SetProperty(EFFECT_FLAG_DELAY)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.spcon)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --target
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_FIELD)
          e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
          e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
          e2:SetRange(LOCATION_MZONE)
          e2:SetTargetRange(LOCATION_MZONE,0)
          e2:SetTarget(s.tglimit)
          e2:SetValue(aux.tgoval)
          c:RegisterEffect(e2)
          --draw
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,2))
          e3:SetCategory(CATEGORY_DRAW|CATEGORY_HANDES)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetCode(EVENT_TO_GRAVE)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetCountLimit(1,id+o)
          e3:SetTarget(s.drtg)
          e3:SetOperation(s.drop)
          c:RegisterEffect(e3)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
          end
          function s.spfilter(c,e,tp)
          return c:IsSetCard(0x35) 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+LOCATION_HAND,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+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_DECK+LOCATION_HAND,0,1,1,nil,e,tp)
          if g:GetCount()>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          function s.tglimit(e,c)
          return c~=e:GetHandler() and c:IsSetCard(0x35) and c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
          end
          function s.drfilter(c)
          return c:IsSetCard(0x35) and c:IsType(TYPE_SYNCHRO) and c:IsFaceup()
          end
          function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
          local ct=Duel.GetMatchingGroupCount(s.drfilter,tp,LOCATION_MZONE,0,nil)
          if chk==0 then return ct>0 and Duel.IsPlayerCanDraw(tp,ct) end
          Duel.SetTargetPlayer(tp)
          Duel.SetOperationInfo(0,CATEGORY_HANDES,nil,1,tp,LOCATION_HAND)
          Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,ct,tp,1)
          end
          function s.drop(e,tp,eg,ep,ev,re,r,rp)
          local ct=Duel.GetMatchingGroupCount(s.drfilter,tp,LOCATION_MZONE,0,nil)
          if ct==0 then return end
          local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
          if Duel.Draw(p,ct,REASON_EFFECT)>0 then
          Duel.BreakEffect()
          Duel.DiscardHand(p,nil,1,1,REASON_EFFECT+REASON_DISCARD)
          end
          end
          script/c100227003.lua deleted 100644 → 0
          View file @ 47278166
          --魔轟神レヴェルゼブル
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddSynchroProcedure(c,nil,aux.NonTuner(nil),1)
          c:EnableReviveLimit()
          --get
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_RELEASE|CATEGORY_CONTROL)
          e1:SetType(EFFECT_TYPE_QUICK_O)
          e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER|TIMING_MAIN_END)
          e1:SetRange(LOCATION_MZONE)
          e1:SetCountLimit(1)
          e1:SetCondition(s.ctcon)
          e1:SetTarget(s.cttg)
          e1:SetOperation(s.ctop)
          c:RegisterEffect(e1)
          --to hand
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_TOEXTRA|CATEGORY_TOHAND)
          e2:SetType(EFFECT_TYPE_IGNITION)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
          e2:SetCountLimit(1,id+o)
          e2:SetTarget(s.thtg)
          e2:SetOperation(s.thop)
          c:RegisterEffect(e2)
          end
          function s.ctcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsMainPhase()
          end
          function s.rfilter(c,tp)
          return c:IsSetCard(0x35) and c:IsType(TYPE_MONSTER) and Duel.GetMZoneCount(tp,c,tp,LOCATION_REASON_CONTROL)>0
          and Duel.IsExistingMatchingCard(s.ctfilter,tp,0,LOCATION_MZONE,1,c)
          end
          function s.ctfilter(c)
          return c:IsFaceup() and c:IsControlerCanBeChanged(true)
          end
          function s.cttg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          if chk==0 then return Duel.CheckReleaseGroupEx(tp,s.rfilter,1,REASON_EFFECT,false,nil,tp) end
          Duel.SetOperationInfo(0,CATEGORY_RELEASE,nil,1,0,0)
          Duel.SetOperationInfo(0,CATEGORY_CONTROL,nil,1,0,0)
          end
          function s.ctop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local og=Duel.GetMatchingGroup(s.ctfilter,tp,0,LOCATION_MZONE,nil)
          if og:GetCount()==0 then return end
          local rg=Duel.GetReleaseGroup(tp,false,REASON_EFFECT):Filter(s.rfilter,nil,tp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
          local sg=rg:Select(tp,1,og:GetCount(),nil)
          local ct=Duel.Release(sg,REASON_EFFECT)
          if ct>0 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONTROL)
          local tg=Duel.SelectMatchingCard(tp,s.ctfilter,tp,0,LOCATION_MZONE,ct,ct,nil)
          Duel.HintSelection(tg)
          if not Duel.GetControl(tg,tp) then return end
          local cg=tg:Filter(Card.IsControler,nil,tp)
          for tc in aux.Next(cg) do
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetCode(EFFECT_DISABLE)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD)
          tc:RegisterEffect(e1)
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_SINGLE)
          e2:SetCode(EFFECT_DISABLE_EFFECT)
          e2:SetValue(RESET_TURN_SET)
          e2:SetReset(RESET_EVENT+RESETS_STANDARD)
          tc:RegisterEffect(e2)
          end
          end
          end
          function s.thfilter(c)
          return c:IsSetCard(0x35) and c:IsAbleToHand()
          end
          function s.thtg(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) and chkc~=e:GetHandler() end
          if chk==0 then return e:GetHandler():IsAbleToExtra()
          and Duel.IsExistingTarget(s.thfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
          local g=Duel.SelectTarget(tp,s.thfilter,tp,LOCATION_GRAVE,0,1,1,e:GetHandler())
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
          Duel.SetOperationInfo(0,CATEGORY_TOEXTRA,e:GetHandler(),1,0,0)
          end
          function s.thop(e,tp,eg,ep,ev,re,r,rp)
          local tc=Duel.GetFirstTarget()
          local c=e:GetHandler()
          if c:IsRelateToEffect(e) and aux.NecroValleyFilter()(c) and Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)~=0
          and c:IsLocation(LOCATION_EXTRA) and tc:IsRelateToEffect(e) and aux.NecroValleyFilter()(tc) then
          Duel.SendtoHand(tc,nil,REASON_EFFECT)
          end
          end
          script/c100227004.lua deleted 100644 → 0
          View file @ 47278166
          --魔轟神界の復活
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --Activate
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          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)
          --chain limit
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
          e2:SetCode(EVENT_SPSUMMON_SUCCESS)
          e2:SetRange(LOCATION_SZONE)
          e2:SetCondition(s.limcon)
          e2:SetOperation(s.limop)
          c:RegisterEffect(e2)
          local e3=Effect.CreateEffect(c)
          e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
          e3:SetRange(LOCATION_SZONE)
          e3:SetCode(EVENT_CHAIN_END)
          e3:SetOperation(s.limop2)
          c:RegisterEffect(e3)
          --activate
          local e4=Effect.CreateEffect(c)
          e4:SetDescription(aux.Stringid(id,1))
          e4:SetType(EFFECT_TYPE_IGNITION)
          e4:SetRange(LOCATION_SZONE)
          e4:SetCountLimit(1)
          e4:SetCost(s.cost)
          e4:SetTarget(s.target)
          e4:SetOperation(s.operation)
          c:RegisterEffect(e4)
          end
          function s.ssfilter(c,tp)
          return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSetCard(0x35) and not c:IsCode(id) and not c:IsForbidden() and c:IsSSetable()
          end
          function s.activate(e,tp,eg,ep,ev,re,r,rp)
          local g=Duel.GetMatchingGroup(s.ssfilter,tp,LOCATION_DECK,0,nil,tp)
          if g:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
          local sg=g:Select(tp,1,1,nil)
          Duel.SSet(tp,sg:GetFirst())
          end
          end
          function s.limfilter(c,tp)
          return c:IsSummonPlayer(tp) and c:IsSetCard(0x35) and c:IsType(TYPE_SYNCHRO) and c:IsSummonType(SUMMON_TYPE_SYNCHRO)
          end
          function s.limcon(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(s.limfilter,1,nil,tp)
          end
          function s.limop(e,tp,eg,ep,ev,re,r,rp)
          if Duel.GetCurrentChain()==0 then
          Duel.SetChainLimitTillChainEnd(s.chainlm)
          elseif Duel.GetCurrentChain()==1 then
          e:GetHandler():RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD,0,1)
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
          e1:SetCode(EVENT_CHAINING)
          e1:SetOperation(s.resetop)
          Duel.RegisterEffect(e1,tp)
          local e2=e1:Clone()
          e2:SetCode(EVENT_BREAK_EFFECT)
          e2:SetReset(RESET_CHAIN)
          Duel.RegisterEffect(e2,tp)
          end
          end
          function s.resetop(e,tp,eg,ep,ev,re,r,rp)
          e:GetHandler():ResetFlagEffect(id)
          e:Reset()
          end
          function s.limop2(e,tp,eg,ep,ev,re,r,rp)
          if e:GetHandler():GetFlagEffect(id)~=0 then
          Duel.SetChainLimitTillChainEnd(s.chainlm)
          end
          e:GetHandler():ResetFlagEffect(id)
          end
          function s.chainlm(e,rp,tp)
          return tp==rp
          end
          function s.costfilter(c)
          return c:IsSetCard(0x35) and c:IsDiscardable()
          end
          function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_HAND,0,1,nil) end
          Duel.DiscardHand(tp,s.costfilter,1,1,REASON_COST+REASON_DISCARD)
          end
          function s.spfilter(c,e,tp)
          return c:IsFaceupEx() and c:IsSetCard(0x35) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
          end
          function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          local b1=Duel.IsPlayerCanDraw(tp,1)
          local b2=Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp)
          if chk==0 then return b1 or b2 end
          local op=0
          if b1 and not b2 then
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,3))
          op=1
          end
          if b2 and not b1 then
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,4))
          op=2
          end
          if b1 and b2 then
          op=aux.SelectFromOptions(tp,
          {b1,aux.Stringid(id,3)},
          {b2,aux.Stringid(id,4)})
          end
          e:SetLabel(op)
          if op==1 then
          e:SetCategory(CATEGORY_DRAW)
          Duel.SetTargetPlayer(tp)
          Duel.SetTargetParam(1)
          Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
          elseif op==2 then
          e:SetCategory(CATEGORY_SPECIAL_SUMMON)
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_GRAVE+LOCATION_REMOVED)
          end
          end
          function s.operation(e,tp,eg,ep,ev,re,r,rp)
          if e:GetLabel()==1 then
          local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
          Duel.Draw(p,d,REASON_EFFECT)
          elseif e:GetLabel()==2 then
          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:GetCount()>0 then
          Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          end
          script/c100227027.lua deleted 100644 → 0
          View file @ 47278166
          --ジュラック・メガロ
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,id)
          --spsummon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_HAND)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.spcon)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --draw
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_DRAW|CATEGORY_HANDES)
          e2:SetType(EFFECT_TYPE_IGNITION)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCountLimit(1,id+o)
          e2:SetTarget(s.drtg)
          e2:SetOperation(s.drop)
          c:RegisterEffect(e2)
          --to grave
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,2))
          e3:SetCategory(CATEGORY_TOGRAVE)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetCode(EVENT_DESTROYED)
          e3:SetCountLimit(1,id+o*2)
          e3:SetCondition(s.tgcon)
          e3:SetTarget(s.tgtg)
          e3:SetOperation(s.tgop)
          c:RegisterEffect(e3)
          end
          function s.cfilter(c)
          return c:IsFaceup() and c:IsRace(RACE_DINOSAUR)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
          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 e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
          end
          function s.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 s.dhfilter(c)
          return c:IsSetCard(0x22) and c:IsDiscardable()
          end
          function s.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then
          local g=Duel.GetFieldGroup(tp,LOCATION_HAND,0)
          return Duel.IsPlayerCanDraw(tp,2) and g:CheckSubGroup(s.gselect,2,2)
          end
          Duel.SetTargetPlayer(tp)
          Duel.SetTargetParam(2)
          Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,2)
          end
          function s.gselect(g)
          return g:IsExists(Card.IsSetCard,1,nil,0x22) and g:FilterCount(Card.IsDiscardable,nil,REASON_EFFECT)==2
          end
          function s.drop(e,tp,eg,ep,ev,re,r,rp)
          local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
          local g=Duel.GetFieldGroup(p,LOCATION_HAND,0)
          if #g>=2 and g:CheckSubGroup(s.gselect,2,2) then
          Duel.Hint(HINT_SELECTMSG,p,HINTMSG_DISCARD)
          local g1=g:SelectSubGroup(tp,s.gselect,false,2,2)
          if g1 and g1:GetCount()==2 and Duel.SendtoGrave(g1,REASON_DISCARD+REASON_EFFECT)~=0 then
          Duel.BreakEffect()
          Duel.Draw(p,d,REASON_EFFECT)
          end
          end
          end
          function s.tgcon(e,tp,eg,ep,ev,re,r,rp)
          return bit.band(r,REASON_EFFECT+REASON_BATTLE)~=0
          end
          function s.tgfilter(c)
          return not c:IsCode(id) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x22) and c:IsAbleToGrave()
          end
          function s.tgtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA)
          end
          function s.tgop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
          local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK+LOCATION_EXTRA,0,1,1,nil)
          if g:GetCount()>0 then
          Duel.SendtoGrave(g,REASON_EFFECT)
          end
          end
          script/c100227028.lua deleted 100644 → 0
          View file @ 47278166
          --ジュラック・メガロ
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,id)
          --special summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_DESTROY|CATEGORY_TOGRAVE|CATEGORY_SPECIAL_SUMMON|CATEGORY_DECKDES)
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_MZONE)
          e1:SetCountLimit(1,id)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --to hand
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_TOHAND)
          e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_BATTLE_DESTROYED)
          e2:SetTarget(s.thtg)
          e2:SetOperation(s.thop)
          c:RegisterEffect(e2)
          end
          function s.tgfilter(c,e,tp)
          return c:IsLevelAbove(1) and c:IsRace(RACE_DINOSAUR) and c:IsAbleToGrave()
          end
          function s.spfilter(c,e,tp)
          return not c:IsCode(id) and c:IsSetCard(0x22) and c:IsLevelAbove(1) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
          end
          function s.gcheck(g,lv)
          return g:GetSum(Card.GetLevel)==lv
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          local g=Duel.GetMatchingGroup(nil,tp,LOCATION_ONFIELD,0,nil,e,tp)
          if chk==0 then return #g>0 and Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_DECK)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
          local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,0,1,1,nil,e,tp)
          Duel.HintSelection(g)
          if Duel.Destroy(g,REASON_EFFECT)>0 then
          local ft=Duel.GetLocationCount(tp,LOCATION_MZONE)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
          local sg=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
          local gc=sg:GetFirst()
          if gc and Duel.SendtoGrave(gc,REASON_EFFECT)~=0 and gc:IsLocation(LOCATION_GRAVE) and ft>0 then
          local lv=gc:GetLevel()
          if ft>1 and Duel.IsPlayerAffectedByEffect(tp,59822133) then ft=1 end
          local tg=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_HAND+LOCATION_DECK,0,nil,e,tp)
          if tg:CheckSubGroup(s.gcheck,1,ft,lv) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local ssg=tg:SelectSubGroup(tp,s.gcheck,false,1,ft,lv)
          if ssg:GetCount()>0 then
          Duel.BreakEffect()
          Duel.SpecialSummon(ssg,0,tp,tp,true,false,POS_FACEUP)
          end
          end
          end
          end
          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(s.splimit)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          function s.splimit(e,c)
          return not c:IsRace(RACE_DINOSAUR)
          end
          function s.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(aux.AND(Card.IsFaceup,Card.IsAbleToHand),tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_ONFIELD)
          end
          function s.thop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
          local g=Duel.SelectMatchingCard(tp,aux.AND(Card.IsFaceup,Card.IsAbleToHand),tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
          if g:GetCount()>0 then
          Duel.HintSelection(g)
          Duel.SendtoHand(g,nil,REASON_EFFECT)
          end
          end
          script/c100227029.lua deleted 100644 → 0
          View file @ 47278166
          --ジュラック・アステロ
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,17548456)
          --synchro summon
          aux.AddSynchroProcedure(c,nil,aux.NonTuner(Card.IsRace,RACE_DINOSAUR),1)
          c:EnableReviveLimit()
          --set
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetProperty(EFFECT_FLAG_DELAY)
          e1:SetCode(EVENT_SPSUMMON_SUCCESS)
          e1:SetCondition(s.setcon)
          e1:SetTarget(s.settg)
          e1:SetOperation(s.setop)
          c:RegisterEffect(e1)
          --disable special summon
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_DISABLE_SUMMON|CATEGORY_DESTROY)
          e2:SetType(EFFECT_TYPE_QUICK_O)
          e2:SetCode(EVENT_SPSUMMON)
          e2:SetRange(LOCATION_MZONE)
          e2:SetCountLimit(1)
          e2:SetCondition(s.discon)
          e2:SetCost(s.discost)
          e2:SetTarget(s.distg)
          e2:SetOperation(s.disop)
          c:RegisterEffect(e2)
          --special summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,2))
          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:SetCondition(s.spcon)
          e3:SetCost(s.spcost)
          e3:SetTarget(s.sptg)
          e3:SetOperation(s.spop)
          c:RegisterEffect(e3)
          end
          function s.setcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
          end
          function s.setfilter(c)
          return c:IsSetCard(0x22) and c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsSSetable()
          end
          function s.settg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.setfilter,tp,LOCATION_DECK+LOCATION_GRAVE,0,1,nil) end
          end
          function s.setop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
          local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.setfilter),tp,LOCATION_DECK+LOCATION_GRAVE,0,1,1,nil)
          local tc=g:GetFirst()
          if tc then
          Duel.SSet(tp,tc)
          end
          end
          function s.discon(e,tp,eg,ep,ev,re,r,rp)
          return tp~=ep and Duel.GetCurrentChain()==0
          end
          function s.discfilter(c)
          return c:IsRace(RACE_DINOSAUR) and c:IsAbleToRemoveAsCost()
          end
          function s.discost(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.discfilter,tp,LOCATION_GRAVE,0,2,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.SelectMatchingCard(tp,s.discfilter,tp,LOCATION_GRAVE,0,2,2,nil)
          Duel.Remove(g,POS_FACEUP,REASON_COST)
          end
          function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          Duel.SetOperationInfo(0,CATEGORY_DISABLE_SUMMON,eg,eg:GetCount(),0,0)
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,eg:GetCount(),0,0)
          end
          function s.disop(e,tp,eg,ep,ev,re,r,rp)
          Duel.NegateSummon(eg)
          Duel.Destroy(eg,REASON_EFFECT)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.GetTurnPlayer()~=tp
          end
          function s.cfilter(c)
          return c:IsSetCard(0x22) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
          end
          function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
          local c=e:GetHandler()
          if chk==0 then return s.cfilter(c) and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,c) end
          local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,c)
          g:AddCard(c)
          Duel.Remove(g,POS_FACEUP,REASON_COST)
          end
          function s.spfilter(c,e,tp)
          return c:IsCode(17548456) and c:IsType(TYPE_SYNCHRO) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
          and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
          and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
          local tc=g:GetFirst()
          if tc then
          tc:SetMaterial(nil)
          if Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
          tc:CompleteProcedure()
          end
          end
          end
          script/c100227030.lua deleted 100644 → 0
          View file @ 47278166
          --ジュラック・ヴォルケーノ
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,17548456)
          --Activate
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_ACTIVATE)
          e1:SetCode(EVENT_FREE_CHAIN)
          c:RegisterEffect(e1)
          --special summon
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_DESTROY|CATEGORY_SPECIAL_SUMMON)
          e2:SetType(EFFECT_TYPE_IGNITION)
          e2:SetRange(LOCATION_FZONE)
          e2:SetCountLimit(1,id)
          e2:SetTarget(s.sptg)
          e2:SetOperation(s.spop)
          c:RegisterEffect(e2)
          --special summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,2))
          e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e3:SetCode(EVENT_SPSUMMON_SUCCESS)
          e3:SetProperty(EFFECT_FLAG_DELAY)
          e3:SetRange(LOCATION_FZONE)
          e3:SetCountLimit(1,id+o)
          e3:SetCondition(s.spcon2)
          e3:SetTarget(s.sptg2)
          e3:SetOperation(s.spop2)
          c:RegisterEffect(e3)
          --destroy replace
          local e4=Effect.CreateEffect(c)
          e4:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_FIELD)
          e4:SetCode(EFFECT_DESTROY_REPLACE)
          e4:SetRange(LOCATION_FZONE)
          e4:SetCountLimit(1,id+o*2)
          e4:SetTarget(s.reptg)
          e4:SetValue(s.repval)
          c:RegisterEffect(e4)
          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_CHAINING)
          ge1:SetOperation(s.checkop1)
          Duel.RegisterEffect(ge1,0)
          local ge2=ge1:Clone()
          ge2:SetCode(EVENT_CHAIN_NEGATED)
          ge2:SetOperation(s.checkop2)
          Duel.RegisterEffect(ge2,0)
          end
          end
          function s.checkop1(e,tp,eg,ep,ev,re,r,rp)
          if re and re:GetHandlerPlayer() and re:IsActiveType(TYPE_MONSTER) then
          Duel.RegisterFlagEffect(re:GetHandlerPlayer(),id,RESET_PHASE+PHASE_END,0,1)
          end
          end
          function s.checkop2(e,tp,eg,ep,ev,re,r,rp)
          if re and re:GetHandlerPlayer() and re:IsActiveType(TYPE_MONSTER) then
          local ct=Duel.GetFlagEffect(re:GetHandlerPlayer(),id)
          Duel.ResetFlagEffect(re:GetHandlerPlayer(),id)
          if ct>1 then
          local ra=0
          while ra<ct do
          Duel.RegisterFlagEffect(re:GetHandlerPlayer(),id,RESET_PHASE+PHASE_END,0,1)
          ra=ra+1
          end
          end
          end
          end
          function s.dfilter(c,tp)
          return c:IsFaceup() and c:IsRace(RACE_DINOSAUR) and Duel.GetMZoneCount(tp,c)>0
          end
          function s.spfilter(c,e,tp)
          return c:IsSetCard(0x22) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          local g=Duel.GetMatchingGroup(s.dfilter,tp,LOCATION_MZONE,0,nil,tp)
          if chk==0 then return #g>0 and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK)
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
          local g=Duel.SelectMatchingCard(tp,s.dfilter,tp,LOCATION_MZONE,0,1,1,nil,tp)
          Duel.HintSelection(g)
          if Duel.Destroy(g,REASON_EFFECT)>0 and Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local sg=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
          if #sg>0 then
          Duel.SpecialSummon(sg,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          end
          function s.cfilter(c,tp)
          return c:IsSummonPlayer(1-tp)
          end
          function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(s.cfilter,1,nil,tp) and Duel.GetFlagEffect(1-tp,id)>=4
          end
          function s.spfilter2(c,e,tp)
          return c:IsCode(17548456) and c:IsType(TYPE_SYNCHRO) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_SYNCHRO,tp,false,false)
          and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
          end
          function s.sptg2(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL)
          and Duel.IsExistingMatchingCard(s.spfilter2,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          end
          function s.spop2(e,tp,eg,ep,ev,re,r,rp)
          if not aux.MustMaterialCheck(nil,tp,EFFECT_MUST_BE_SMATERIAL) then return end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,s.spfilter2,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
          local tc=g:GetFirst()
          if tc then
          tc:SetMaterial(nil)
          if Duel.SpecialSummon(tc,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)>0 then
          tc:CompleteProcedure()
          end
          end
          end
          function s.repfilter(c,tp)
          return c:IsLocation(LOCATION_MZONE) and c:IsFaceup() and c:IsControler(tp) and c:IsType(TYPE_MONSTER) and c:IsSetCard(0x22) and c:IsReason(REASON_EFFECT) and not c:IsReason(REASON_REPLACE)
          end
          function s.rmfilter(c)
          return c:IsRace(RACE_DINOSAUR) and c:IsAbleToRemove()
          end
          function s.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return eg:IsExists(s.repfilter,1,nil,tp)
          and Duel.IsExistingMatchingCard(s.rmfilter,tp,LOCATION_GRAVE,0,1,nil) end
          if Duel.SelectEffectYesNo(tp,e:GetHandler(),96) then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.SelectMatchingCard(tp,s.rmfilter,tp,LOCATION_GRAVE,0,1,1,nil)
          Duel.Remove(g,POS_FACEUP,REASON_EFFECT+REASON_REPLACE)
          return true
          end
          return false
          end
          function s.repval(e,c)
          return s.repfilter(c,e:GetHandlerPlayer())
          end
          script/c100227042.lua deleted 100644 → 0
          View file @ 47278166
          --ジェムナイトマスター・ダイヤ－ディスパージョン
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --fusion material
          aux.AddFusionProcFunRep(c,aux.FilterBoolFunction(Card.IsFusionSetCard,0x47),3,true)
          c:EnableReviveLimit()
          --special summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_QUICK_O)
          e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetRange(LOCATION_MZONE)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.spcon)
          e1:SetCost(s.spcost)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --spsummon from grave
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_BATTLE_DESTROYED)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetCountLimit(1,id+o)
          e2:SetCondition(s.spcon2)
          e2:SetTarget(s.sptg2)
          e2:SetOperation(s.spop2)
          c:RegisterEffect(e2)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsMainPhase()
          end
          function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return e:GetHandler():IsAbleToGraveAsCost() end
          Duel.SendtoGrave(e:GetHandler(),REASON_COST)
          end
          function s.spfilter1(c,e,tp,ec)
          return c:IsSetCard(0x47) and not c:IsRace(RACE_ROCK) and c:IsType(TYPE_MONSTER)
          and c:IsCanBeSpecialSummoned(e,0,tp,true,false)
          and (c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp,c)>0
          or c:IsLocation(LOCATION_EXTRA) and Duel.GetLocationCountFromEx(tp,tp,ec,c)>0)
          end
          function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
          local ect=c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]
          if chk==0 then return (not ect or ect>0) and Duel.IsExistingMatchingCard(s.spfilter1,tp,LOCATION_GRAVE+LOCATION_EXTRA,0,1,nil,e,tp,e:GetHandler()) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE+LOCATION_EXTRA)
          end
          function s.spfilter2(c,e,tp)
          if not (c:IsSetCard(0x47) and not c:IsRace(RACE_ROCK) and c:IsType(TYPE_MONSTER)
          and c:IsCanBeSpecialSummoned(e,0,tp,true,false)) then return false end
          if c:IsLocation(LOCATION_EXTRA) then
          return Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
          else
          return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
          end
          end
          function s.exfilter1(c)
          return c:IsLocation(LOCATION_EXTRA) and c:IsFacedown() and c:IsType(TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
          end
          function s.exfilter2(c)
          return c:IsLocation(LOCATION_EXTRA) and (c:IsType(TYPE_LINK) or (c:IsFaceup() and c:IsType(TYPE_PENDULUM)))
          end
          function s.gcheck(g,ft1,ft2,ft3,ect,ft)
          return aux.dncheck(g) and #g<=ft
          and g:FilterCount(Card.IsLocation,nil,LOCATION_GRAVE)<=ft1
          and g:FilterCount(s.exfilter1,nil)<=ft2
          and g:FilterCount(s.exfilter2,nil)<=ft3
          and g:FilterCount(Card.IsLocation,nil,LOCATION_EXTRA)<=ect
          end
          function s.spop(e,tp,eg,ep,ev,re,r,rp)
          local eft1=Duel.GetLocationCount(tp,LOCATION_MZONE)
          local eft2=Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_FUSION+TYPE_SYNCHRO+TYPE_XYZ)
          local eft3=Duel.GetLocationCountFromEx(tp,tp,nil,TYPE_PENDULUM+TYPE_LINK)
          local ft=Duel.GetUsableMZoneCount(tp)
          if Duel.IsPlayerAffectedByEffect(tp,59822133) then
          if eft1>0 then eft1=1 end
          if eft2>0 then eft2=1 end
          if eft3>0 then eft3=1 end
          ft=1
          end
          local ect=(c29724053 and Duel.IsPlayerAffectedByEffect(tp,29724053) and c29724053[tp]) or ft
          local loc=0
          if eft1>0 then loc=loc+LOCATION_GRAVE end
          if ect>0 and (eft2>0 or eft3>0) then loc=loc+LOCATION_EXTRA end
          if loc~=0 then
          local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.spfilter2),tp,loc,0,nil,e,tp)
          if g:GetCount()>0 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local sg=g:SelectSubGroup(tp,s.gcheck,false,1,3,eft1,eft2,eft3,ect,ft)
          if sg:GetCount()>0 then
          local exg1=sg:Filter(s.exfilter2,nil)
          sg:Sub(exg1)
          if exg1:GetCount()>0 then
          for tc in aux.Next(exg1) do
          Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP)
          end
          end
          local exg2=sg:Filter(s.exfilter1,nil)
          sg:Sub(exg2)
          if exg2:GetCount()>0 then
          for tc in aux.Next(exg2) do
          Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP)
          end
          end
          if sg:GetCount()>0 then
          for tc in aux.Next(sg) do
          Duel.SpecialSummonStep(tc,0,tp,tp,true,false,POS_FACEUP)
          end
          end
          Duel.SpecialSummonComplete()
          end
          end
          end
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_FIELD)
          e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
          e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
          e1:SetTargetRange(1,0)
          e1:SetTarget(s.splimit)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          function s.splimit(e,c)
          return not c:IsType(TYPE_FUSION) and c:IsLocation(LOCATION_EXTRA)
          end
          function s.cfilter(c,tp)
          return c:IsType(TYPE_FUSION) and c:IsPreviousControler(tp)
          and c:IsPreviousSetCard(0x1047)
          and c:IsSetCard(0x1047)
          end
          function s.spcon2(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(s.cfilter,1,e:GetHandler(),tp)
          end
          function s.sptg2(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.spop2(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          if c:IsRelateToEffect(e) and aux.NecroValleyFilter()(c) then
          Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          script/c100227043.lua deleted 100644 → 0
          View file @ 47278166
          --ジェムナイト・ネピリム
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --search
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SEARCH|CATEGORY_TOHAND)
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetCode(EVENT_SUMMON_SUCCESS)
          e1:SetProperty(EFFECT_FLAG_DELAY)
          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)
          --summon
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,1))
          e3:SetCategory(CATEGORY_SUMMON)
          e3:SetType(EFFECT_TYPE_IGNITION)
          e3:SetRange(LOCATION_MZONE)
          e3:SetCountLimit(1,id+o)
          e3:SetTarget(s.sumtg)
          e3:SetOperation(s.sumop)
          c:RegisterEffect(e3)
          --spsummon
          local e4=Effect.CreateEffect(c)
          e4:SetDescription(aux.Stringid(id,2))
          e4:SetCategory(CATEGORY_SPECIAL_SUMMON|CATEGORY_TOGRAVE)
          e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e4:SetProperty(EFFECT_FLAG_DELAY)
          e4:SetCode(EVENT_TO_GRAVE)
          e4:SetCountLimit(1,id+o*2)
          e4:SetCondition(s.spcon)
          e4:SetTarget(s.sptg)
          e4:SetOperation(s.spop)
          c:RegisterEffect(e4)
          end
          function s.thfilter(c)
          return not c:IsCode(id) and c:IsSetCard(0x1047) 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)
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,0))
          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>0 then
          Duel.SendtoHand(g,nil,REASON_EFFECT)
          Duel.ConfirmCards(1-tp,g)
          end
          if Duel.GetFlagEffect(tp,100227043)==0 then
          Duel.RegisterFlagEffect(tp,100227043,RESET_PHASE+PHASE_END,0,1)
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_FIELD)
          e1:SetCode(EFFECT_CHANGE_DAMAGE)
          e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
          e1:SetTargetRange(0,1)
          e1:SetCondition(s.damcon)
          e1:SetValue(s.damval)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          end
          function s.damcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsMainPhase()
          end
          function s.damval(e,re,val,r,rp,rc)
          if r&REASON_EFFECT==REASON_EFFECT then
          return math.ceil(val/2)
          else return val end
          end
          function s.sumfilter(c)
          return c:IsSetCard(0x47) and c:IsSummonable(true,nil)
          end
          function s.sumtg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsPlayerCanSummon(tp) and Duel.IsExistingMatchingCard(s.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_SUMMON,nil,1,0,0)
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,1))
          end
          function s.sumop(e,tp,eg,ep,ev,re,r,rp)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SUMMON)
          local tc=Duel.SelectMatchingCard(tp,s.sumfilter,tp,LOCATION_HAND+LOCATION_MZONE,0,1,1,nil):GetFirst()
          if tc then
          Duel.Summon(tp,tc,true,nil)
          end
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():IsPreviousLocation(LOCATION_DECK+LOCATION_HAND)
          end
          function s.tgfilter(c)
          return c:IsAbleToGrave()
          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)
          and Duel.IsExistingMatchingCard(s.tgfilter,tp,LOCATION_HAND,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,1,tp,LOCATION_HAND)
          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()
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
          local g=Duel.SelectMatchingCard(tp,s.tgfilter,tp,LOCATION_HAND,0,1,1,nil)
          local tc=g:GetFirst()
          if tc and Duel.SendtoGrave(g,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE)
          and c:IsRelateToChain() and aux.NecroValleyFilter()(c) then
          Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
          end
          end
          script/c100227044.lua deleted 100644 → 0
          View file @ 47278166
          --ジェムナイト・ヴォイドルーツ
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,1264319)
          --special summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_HAND)
          e1:SetCountLimit(1,id)
          e1:SetCost(s.spcost)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --negate
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_DISABLE)
          e2:SetType(EFFECT_TYPE_QUICK_O)
          e2:SetCode(EVENT_CHAINING)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetCountLimit(1,id+o)
          e2:SetCondition(s.discon)
          e2:SetCost(s.discost)
          e2:SetTarget(s.distg)
          e2:SetOperation(s.disop)
          c:RegisterEffect(e2)
          end
          function s.costfilter(c)
          return (c:IsSetCard(0x1047) and c:IsType(TYPE_NORMAL) or c:IsCode(1264319)) and c:IsAbleToGraveAsCost()
          end
          function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_DECK,0,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOGRAVE)
          local g=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_DECK,0,1,1,nil)
          Duel.SendtoGrave(g,REASON_COST)
          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 e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP_DEFENSE) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),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_DEFENSE)
          end
          end
          function s.tfilter(c,tp)
          return c:IsSetCard(0x1047) and c:IsType(TYPE_FUSION) and c:IsFaceup()
          end
          function s.discon(e,tp,eg,ep,ev,re,r,rp)
          return rp==1-tp and Duel.IsChainDisablable(ev)
          and Duel.IsExistingMatchingCard(s.tfilter,tp,LOCATION_MZONE,0,1,nil)
          end
          function s.costfilter2(c)
          return c:IsSetCard(0x1047) and c:IsAbleToRemoveAsCost()
          end
          function s.discost(e,tp,eg,ep,ev,re,r,rp,chk)
          local c=e:GetHandler()
          local g=Duel.GetMatchingGroup(s.costfilter2,tp,LOCATION_GRAVE,0,c)
          if chk==0 then return c:IsAbleToRemoveAsCost() and c:IsSetCard(0x1047) and g:GetCount()>=2 end
          local sg
          if #g==2 then
          sg=g
          else
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          sg=g:Select(tp,2,2,nil)
          end
          sg:AddCard(c)
          Duel.Remove(sg,POS_FACEUP,REASON_COST)
          end
          function s.atkfilter(c,e)
          return c:IsSetCard(0x1047) and c:IsFaceup() and (not e or not c:IsImmuneToEffect(e))
          end
          function s.distg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(s.atkfilter,tp,LOCATION_MZONE,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
          end
          function s.disop(e,tp,eg,ep,ev,re,r,rp)
          if Duel.NegateEffect(ev) then
          local g=Duel.GetMatchingGroup(s.atkfilter,tp,LOCATION_MZONE,0,nil,e)
          if g:GetCount()>0 then
          for tc in aux.Next(g) do
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
          e1:SetCode(EFFECT_UPDATE_ATTACK)
          e1:SetValue(1000)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD)
          tc:RegisterEffect(e1)
          end
          end
          end
          end
          script/c100227045.lua deleted 100644 → 0
          View file @ 47278166
          --ジェムナイト・ディスパージョン
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          aux.AddCodeList(c,1264319)
          --Activate 1
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON|CATEGORY_FUSION_SUMMON|CATEGORY_SEARCH|CATEGORY_TOHAND|CATEGORY_DECKDES)
          e1:SetType(EFFECT_TYPE_ACTIVATE)
          e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetTarget(s.target)
          e1:SetOperation(s.activate)
          c:RegisterEffect(e1)
          end
          function s.filter0(c)
          return c:IsSetCard(0x1047) and not c:IsRace(RACE_ROCK)
          and c:IsType(TYPE_MONSTER) and c:IsCanBeFusionMaterial() and c:IsAbleToGrave()
          end
          function s.filter1(c,e)
          return not c:IsImmuneToEffect(e)
          end
          function s.filter2(c,e,tp,m,f,chkf)
          return c:IsType(TYPE_FUSION) and c:IsSetCard(0x1047) and (not f or f(c))
          and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,nil,chkf)
          end
          function s.thfilter(c)
          return c:IsFaceupEx() and c:IsSetCard(0x47) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
          end
          function s.fcheck(tp,sg,fc)
          return sg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)<=2
          end
          function s.gcheck(sg)
          return sg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)<=2
          end
          function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
          local chkf=tp
          local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e)
          if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,1264319) then
          local sg=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_DECK+LOCATION_EXTRA,0,nil)
          mg1:Merge(sg)
          aux.FCheckAdditional=s.fcheck
          aux.GCheckAdditional=s.gcheck
          end
          local res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,chkf)
          aux.FCheckAdditional=nil
          aux.GCheckAdditional=nil
          if not res then
          local ce=Duel.GetChainMaterial(tp)
          if ce~=nil then
          local fgroup=ce:GetTarget()
          local mg2=fgroup(ce,e,tp)
          local mf=ce:GetValue()
          res=Duel.IsExistingMatchingCard(s.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg2,mf,chkf)
          end
          end
          local b1=res and (Duel.GetFlagEffect(tp,id)==0 or not e:IsCostChecked())
          local b2=Duel.IsExistingMatchingCard(s.thfilter,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,nil)
          and (Duel.GetFlagEffect(tp,id+o)==0 or not e:IsCostChecked())
          if chk==0 then return b1 or b2 end
          local op=0
          if b1 and not b2 then
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,1))
          op=1
          end
          if b2 and not b1 then
          Duel.Hint(HINT_OPSELECTED,1-tp,aux.Stringid(id,2))
          op=2
          end
          if b1 and b2 then
          op=aux.SelectFromOptions(tp,
          {b1,aux.Stringid(id,1)},
          {b2,aux.Stringid(id,2)})
          end
          e:SetLabel(op)
          if op==1 then
          if e:IsCostChecked() then
          e:SetCategory(CATEGORY_SPECIAL_SUMMON|CATEGORY_FUSION_SUMMON|CATEGORY_DECKDES)
          Duel.RegisterFlagEffect(tp,id,RESET_PHASE+PHASE_END,0,1)
          end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
          elseif op==2 then
          if e:IsCostChecked() then
          e:SetCategory(CATEGORY_SEARCH|CATEGORY_TOHAND)
          Duel.RegisterFlagEffect(tp,id+o,RESET_PHASE+PHASE_END,0,1)
          end
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_REMOVED)
          end
          end
          function s.activate(e,tp,eg,ep,ev,re,r,rp)
          if e:GetLabel()==1 then
          local chkf=tp
          local mg1=Duel.GetFusionMaterial(tp):Filter(s.filter1,nil,e)
          local exmat=false
          if Duel.IsExistingMatchingCard(Card.IsCode,tp,LOCATION_GRAVE,0,1,nil,1264319) then
          local sg=Duel.GetMatchingGroup(s.filter0,tp,LOCATION_DECK+LOCATION_EXTRA,0,nil,e)
          if sg:GetCount()>0 then
          mg1:Merge(sg)
          exmat=true
          end
          end
          if exmat then
          aux.FCheckAdditional=s.fcheck
          aux.GCheckAdditional=s.gcheck
          end
          local sg1=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,chkf)
          aux.FCheckAdditional=nil
          aux.GCheckAdditional=nil
          local mg2=nil
          local sg2=nil
          local ce=Duel.GetChainMaterial(tp)
          if ce~=nil then
          local fgroup=ce:GetTarget()
          mg2=fgroup(ce,e,tp)
          local mf=ce:GetValue()
          sg2=Duel.GetMatchingGroup(s.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg2,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()
          mg1:RemoveCard(tc)
          if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or ce and not Duel.SelectYesNo(tp,ce:GetDescription())) then
          if exmat then
          aux.FCheckAdditional=s.fcheck
          aux.GCheckAdditional=s.gcheck
          end
          local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,nil,chkf)
          aux.FCheckAdditional=nil
          aux.GCheckAdditional=nil
          tc:SetMaterial(mat1)
          Duel.SendtoGrave(mat1,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
          Duel.BreakEffect()
          Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
          elseif ce~=nil then
          local mat2=Duel.SelectFusionMaterial(tp,tc,mg2,nil,chkf)
          local fop=ce:GetOperation()
          fop(ce,e,tp,tc,mat2)
          end
          tc:CompleteProcedure()
          end
          elseif e:GetLabel()==2 then
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
          local g=Duel.SelectMatchingCard(tp,s.thfilter,tp,LOCATION_DECK+LOCATION_REMOVED,0,1,1,nil)
          if g:GetCount()>0 then
          Duel.SendtoHand(g,nil,REASON_EFFECT)
          Duel.ConfirmCards(1-tp,g)
          end
          if Duel.GetFlagEffect(tp,100227043)==0 then
          Duel.RegisterFlagEffect(tp,100227043,RESET_PHASE+PHASE_END,0,1)
          local e1=Effect.CreateEffect(e:GetHandler())
          e1:SetType(EFFECT_TYPE_FIELD)
          e1:SetCode(EFFECT_CHANGE_DAMAGE)
          e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
          e1:SetTargetRange(0,1)
          e1:SetCondition(s.damcon)
          e1:SetValue(s.damval)
          e1:SetReset(RESET_PHASE+PHASE_END)
          Duel.RegisterEffect(e1,tp)
          end
          end
          end
          function s.damcon(e,tp,eg,ep,ev,re,r,rp)
          local ph=Duel.GetCurrentPhase()
          return ph==PHASE_MAIN1 or ph==PHASE_MAIN2
          end
          function s.damval(e,re,val,r,rp,rc)
          if r&REASON_EFFECT==REASON_EFFECT then
          return math.ceil(val/2)
          else return val end
          end
          script/c100227072.lua deleted 100644 → 0
          View file @ 47278166
          --影霊衣の魔剣士 アバンス
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --special summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e1:SetCode(EVENT_SUMMON_SUCCESS)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --ritual level
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_SINGLE)
          e2:SetCode(EFFECT_RITUAL_LEVEL)
          e2:SetValue(s.rlevel)
          c:RegisterEffect(e2)
          --tohand
          local e3=Effect.CreateEffect(c)
          e3:SetDescription(aux.Stringid(id,1))
          e3:SetCategory(CATEGORY_TOHAND)
          e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e3:SetCode(EVENT_RELEASE)
          e3:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
          e3:SetCountLimit(1,id+EFFECT_COUNT_CODE_DUEL)
          e3:SetCondition(s.thcon)
          e3:SetTarget(s.thtg)
          e3:SetOperation(s.thop)
          c:RegisterEffect(e3)
          end
          function s.spfilter(c,e,tp)
          return not c:IsCode(id) and c:IsSetCard(0xb4)
          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)<1 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.rlevel(e,c)
          local ec=e:GetHandler()
          local lv=aux.GetCappedLevel(ec)
          if not ec:IsLocation(LOCATION_MZONE) then return lv end
          if c:IsSetCard(0xb4) then
          local clv=c:GetLevel()
          return (lv<<16)+clv
          else return lv end
          end
          function s.thcon(e,tp,eg,ep,ev,re,r,rp)
          return r&REASON_EFFECT~=0
          end
          function s.thfilter(c)
          return c:IsFaceupEx() and c:IsSetCard(0xb4) 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_REMOVED,0,1,nil) end
          Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_REMOVED)
          end
          function s.thop(e,tp,eg,ep,ev,re,r,rp)
          local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_REMOVED,0,nil)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
          local tg=g:SelectSubGroup(tp,aux.dncheck,false,1,g:GetCount())
          if tg and tg:GetCount()>0 then
          Duel.SendtoHand(tg,nil,REASON_EFFECT)
          Duel.ConfirmCards(1-tp,tg)
          end
          end
          script/c100227073.lua deleted 100644 → 0
          View file @ 47278166
          --影霊衣の舞巫女 エミリア
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          --special summon
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_HAND)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.spcon)
          e1:SetTarget(s.sptg)
          e1:SetOperation(s.spop)
          c:RegisterEffect(e1)
          --to hand
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_SEARCH|CATEGORY_TOHAND)
          e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_SUMMON_SUCCESS)
          e2:SetCountLimit(1,id+o)
          e2:SetProperty(EFFECT_FLAG_DELAY)
          e2:SetTarget(s.thtg)
          e2:SetOperation(s.thop)
          c:RegisterEffect(e2)
          local e3=e2:Clone()
          e3:SetCode(EVENT_SPSUMMON_SUCCESS)
          c:RegisterEffect(e3)
          --ritual level
          local e4=Effect.CreateEffect(c)
          e4:SetType(EFFECT_TYPE_SINGLE)
          e4:SetCode(EFFECT_RITUAL_LEVEL)
          e4:SetValue(s.rlevel)
          c:RegisterEffect(e4)
          end
          function s.cfilter(c)
          return c:IsFaceupEx() and c:IsSetCard(0xb4) and c:IsRace(RACE_WARRIOR)
          end
          function s.spcon(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,1,nil)
          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 e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),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.thfilter(c)
          return c:IsSetCard(0xb4) and c:IsAbleToHand()
          and (c:IsAllTypes(TYPE_MONSTER+TYPE_RITUAL) or c:IsType(TYPE_SPELL))
          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>0 then
          Duel.SendtoHand(g,nil,REASON_EFFECT)
          Duel.ConfirmCards(1-tp,g)
          end
          end
          function s.rlevel(e,c)
          local ec=e:GetHandler()
          local lv=aux.GetCappedLevel(ec)
          if not ec:IsLocation(LOCATION_MZONE) then return lv end
          if c:IsSetCard(0xb4) then
          local clv=c:GetLevel()
          return (lv<<16)+clv
          else return lv end
          end
          script/c100227074.lua deleted 100644 → 0
          View file @ 47278166
          --メタトロンの影霊衣
          local s,id,o=GetID()
          ---@param c Card
          function s.initial_effect(c)
          c:EnableReviveLimit()
          aux.EnablePendulumAttribute(c)
          --Cannot Special Summon
          local e0=Effect.CreateEffect(c)
          e0:SetType(EFFECT_TYPE_SINGLE)
          e0:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e0:SetCode(EFFECT_SPSUMMON_CONDITION)
          e0:SetValue(aux.ritlimit)
          c:RegisterEffect(e0)
          --remove
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(id,0))
          e1:SetCategory(CATEGORY_REMOVE)
          e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e1:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
          e1:SetCode(EVENT_REMOVE)
          e1:SetRange(LOCATION_PZONE)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.rmcon)
          e1:SetTarget(s.rmtg)
          e1:SetOperation(s.rmop)
          c:RegisterEffect(e1)
          --remove 2
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_REMOVE)
          e2:SetType(EFFECT_TYPE_QUICK_O)
          e2:SetCode(EVENT_FREE_CHAIN)
          e2:SetRange(LOCATION_MZONE)
          e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
          e2:SetCountLimit(1,id+o)
          e2:SetHintTiming(0,TIMING_MAIN_END+TIMINGS_CHECK_MONSTER)
          e2:SetCondition(s.rmcon2)
          e2:SetTarget(s.rmtg2)
          e2:SetOperation(s.rmop2)
          c:RegisterEffect(e2)
          --bp remove
          local e3=Effect.CreateEffect(c)
          e3:SetType(EFFECT_TYPE_FIELD)
          e3:SetCode(EFFECT_BATTLE_DESTROY_REDIRECT)
          e3:SetValue(LOCATION_REMOVED)
          e3:SetRange(LOCATION_MZONE)
          e3:SetTargetRange(LOCATION_MZONE,0)
          e3:SetTarget(s.immtg)
          c:RegisterEffect(e3)
          end
          function s.mat_filter(c)
          return not c:IsLevel(9)
          end
          function s.cfilter(c,tp)
          return c:IsFaceupEx() and c:IsPreviousControler(tp) and c:IsControler(tp) and c:IsSetCard(0xb4)
          end
          function s.rmcon(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(s.cfilter,1,nil,tp) and e:GetHandler():IsStatus(STATUS_EFFECT_ENABLED)
          end
          function s.rmfilter(c)
          return c:IsType(TYPE_SPELL+TYPE_TRAP) and c:IsAbleToRemove()
          end
          function s.rmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          if chkc then return chkc:IsOnField() and s.rmfilter(chkc) end
          if chk==0 then return Duel.IsExistingTarget(s.rmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.SelectTarget(tp,s.rmfilter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
          Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
          end
          function s.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 s.rmcon2(e,tp,eg,ep,ev,re,r,rp)
          return Duel.IsMainPhase()
          end
          function s.rmfilter2(c)
          return c:IsType(TYPE_MONSTER) and c:IsFaceup() and c:IsAbleToRemove()
          end
          function s.rmtg2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          local c=e:GetHandler()
          if chkc then return c:IsAbleToRemove() and chkc:IsOnField() and chkc:IsControler(1-tp) and s.rmfilter2(chkc) end
          if chk==0 then return c:IsAbleToRemove() and Duel.IsExistingTarget(s.rmfilter2,tp,0,LOCATION_MZONE,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.SelectTarget(tp,s.rmfilter2,tp,0,LOCATION_MZONE,1,1,nil)
          g:AddCard(e:GetHandler())
          Duel.SetOperationInfo(0,CATEGORY_REMOVE,g,1,0,0)
          end
          function s.rmop2(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local tc=Duel.GetFirstTarget()
          if c:IsRelateToEffect(e) and c:IsAbleToRemove() and Duel.Remove(c,0,REASON_EFFECT+REASON_TEMPORARY)~=0 then
          if c:GetOriginalCode()==id then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
          e1:SetCode(EVENT_PHASE+PHASE_END)
          e1:SetReset(RESET_PHASE+PHASE_END)
          e1:SetLabelObject(tc)
          e1:SetCountLimit(1)
          e1:SetOperation(s.retop)
          Duel.RegisterEffect(e1,tp)
          end
          if tc:IsRelateToEffect(e) and tc:IsType(TYPE_MONSTER) then
          Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
          end
          end
          end
          function s.retop(e,tp,eg,ep,ev,re,r,rp)
          Duel.ReturnToField(e:GetHandler())
          end
          function s.immtg(e,c)
          return c:IsFaceup() and c:IsSetCard(0xb4)
          end
          script/c100227075.lua deleted 100644 → 0
          View file @ 47278166
          --影霊衣の神魔鏡
          local s,id,o=GetID()
          ---@param c Card
          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:SetHintTiming(0,TIMING_MAIN_END)
          e1:SetCountLimit(1,id)
          e1:SetCondition(s.condition)
          e1:SetTarget(s.target)
          e1:SetOperation(s.activate)
          c:RegisterEffect(e1)
          --search
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(id,1))
          e2:SetCategory(CATEGORY_SEARCH|CATEGORY_TOHAND)
          e2:SetType(EFFECT_TYPE_IGNITION)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetCountLimit(1,id+o)
          e2:SetCost(s.thcost)
          e2:SetTarget(s.thtg)
          e2:SetOperation(s.thop)
          c:RegisterEffect(e2)
          end
          function s.condition(e,tp,eg,ep,ev,re,r,rp)
          local ph=Duel.GetCurrentPhase()
          return ph==PHASE_MAIN1 or ph==PHASE_MAIN2
          end
          function s.rfilter(c)
          return c:IsFaceupEx() and c:IsSetCard(0xb4)
          end
          function s.mfilter(c)
          return c:GetLevel()>0 and c:IsSetCard(0xb4) and c:IsAbleToGrave()
          end
          function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then
          local mg1=Duel.GetRitualMaterial(tp)
          local mg2=Duel.GetMatchingGroup(s.mfilter,tp,LOCATION_EXTRA,0,nil)
          return Duel.IsExistingMatchingCard(aux.RitualUltimateFilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,nil,s.rfilter,e,tp,mg1,mg2,Card.GetLevel,"Greater")
          end
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_REMOVED)
          Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,nil,0,tp,LOCATION_EXTRA)
          end
          function s.activate(e,tp,eg,ep,ev,re,r,rp)
          ::cancel::
          local mg1=Duel.GetRitualMaterial(tp)
          local mg2=Duel.GetMatchingGroup(s.mfilter,tp,LOCATION_EXTRA,0,nil)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
          local g=Duel.SelectMatchingCard(tp,aux.RitualUltimateFilter,tp,LOCATION_HAND+LOCATION_REMOVED,0,1,1,nil,s.rfilter,e,tp,mg1,mg2,Card.GetLevel,"Greater")
          local tc=g:GetFirst()
          if tc then
          local mg=mg1:Filter(Card.IsCanBeRitualMaterial,tc,tc)
          mg:Merge(mg2)
          if tc.mat_filter then
          mg=mg:Filter(tc.mat_filter,tc,tp)
          else
          mg:RemoveCard(tc)
          end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
          aux.GCheckAdditional=aux.RitualCheckAdditional(tc,tc:GetLevel(),"Greater")
          local mat=mg:SelectSubGroup(tp,aux.RitualCheck,true,1,tc:GetLevel(),tp,tc,tc:GetLevel(),"Greater")
          aux.GCheckAdditional=nil
          if not mat then goto cancel end
          tc:SetMaterial(mat)
          local mat2=mat:Filter(Card.IsLocation,nil,LOCATION_EXTRA):Filter(s.mfilter,nil)
          mat:Sub(mat2)
          Duel.ReleaseRitualMaterial(mat)
          Duel.SendtoGrave(mat2,REASON_EFFECT+REASON_MATERIAL+REASON_RITUAL)
          Duel.BreakEffect()
          Duel.SpecialSummon(tc,SUMMON_TYPE_RITUAL,tp,tp,false,true,POS_FACEUP)
          tc:CompleteProcedure()
          end
          end
          function s.cfilter(c)
          return c:IsSetCard(0xb4) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
          end
          function s.thcost(e,tp,eg,ep,ev,re,r,rp,chk)
          local c=e:GetHandler()
          if chk==0 then return c:IsAbleToRemoveAsCost()
          and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_GRAVE,0,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.SelectMatchingCard(tp,s.cfilter,tp,LOCATION_GRAVE,0,1,1,nil)
          g:AddCard(c)
          Duel.Remove(g,POS_FACEUP,REASON_COST)
          end
          function s.thfilter(c)
          return c:IsSetCard(0xb4) and c:IsType(TYPE_SPELL) 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
          script/c11443677.lua deleted 100644 → 0
          View file @ 47278166
          --ブルーアイズ・タイラント・ドラゴン
          ---@param c Card
          function c11443677.initial_effect(c)
          --fusion material
          c:EnableReviveLimit()
          aux.AddFusionProcCodeFun(c,89631139,aux.FilterBoolFunction(Card.IsRace,RACE_DRAGON),1,true,true)
          --special summon condition
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e1:SetCode(EFFECT_SPSUMMON_CONDITION)
          e1:SetRange(LOCATION_EXTRA)
          e1:SetValue(aux.fuslimit)
          c:RegisterEffect(e1)
          --special summon rule
          local e2=Effect.CreateEffect(c)
          e2:SetType(EFFECT_TYPE_FIELD)
          e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
          e2:SetCode(EFFECT_SPSUMMON_PROC)
          e2:SetRange(LOCATION_EXTRA)
          e2:SetCondition(c11443677.sprcon)
          e2:SetTarget(c11443677.sprtg)
          e2:SetOperation(c11443677.sprop)
          c:RegisterEffect(e2)
          --immune
          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(c11443677.efilter)
          c:RegisterEffect(e3)
          --attack all
          local e4=Effect.CreateEffect(c)
          e4:SetType(EFFECT_TYPE_SINGLE)
          e4:SetCode(EFFECT_ATTACK_ALL)
          e4:SetValue(1)
          c:RegisterEffect(e4)
          --set trap
          local e5=Effect.CreateEffect(c)
          e5:SetDescription(aux.Stringid(11443677,0))
          e5:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
          e5:SetCode(EVENT_DAMAGE_STEP_END)
          e5:SetProperty(EFFECT_FLAG_CARD_TARGET)
          e5:SetCondition(c11443677.setcon)
          e5:SetTarget(c11443677.settg)
          e5:SetOperation(c11443677.setop)
          c:RegisterEffect(e5)
          end
          function c11443677.ultimate_fusion_check(tp,sg,fc)
          return aux.gffcheck(sg,Card.IsFusionCode,89631139,Card.IsRace,RACE_DRAGON)
          end
          function c11443677.cfilter(c)
          return c:IsFaceup() and c:GetOriginalType()&TYPE_FUSION~=0
          end
          function c11443677.sprfilter(c,tp,sc)
          local eqc=c:GetEquipGroup():FilterCount(c11443677.cfilter,nil)
          return c:IsFusionCode(89631139) and eqc>0 and Duel.GetLocationCountFromEx(tp,tp,c,sc)>0 and c:IsCanBeFusionMaterial(sc,SUMMON_TYPE_SPECIAL)
          end
          function c11443677.sprcon(e,c)
          if c==nil then return true end
          local tp=c:GetControler()
          return Duel.CheckReleaseGroupEx(tp,c11443677.sprfilter,1,REASON_SPSUMMON,false,nil,tp,c)
          end
          function c11443677.sprtg(e,tp,eg,ep,ev,re,r,rp,chk,c)
          local g=Duel.GetReleaseGroup(tp,false,REASON_SPSUMMON):Filter(c11443677.sprfilter,nil,tp,c)
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RELEASE)
          local tc=g:SelectUnselect(nil,tp,false,true,1,1)
          if tc then
          e:SetLabelObject(tc)
          return true
          else return false end
          end
          function c11443677.sprop(e,tp,eg,ep,ev,re,r,rp,c)
          local tc=e:GetLabelObject()
          c:SetMaterial(Group.FromCards(tc))
          Duel.Release(tc,REASON_SPSUMMON)
          end
          function c11443677.efilter(e,te)
          return te:IsActiveType(TYPE_TRAP)
          end
          function c11443677.setcon(e,tp,eg,ep,ev,re,r,rp)
          return e:GetHandler():GetFlagEffect(11443677)==0 and aux.dsercon(e,tp,eg,ep,ev,re,r,rp)
          end
          function c11443677.setfilter(c)
          return c:IsType(TYPE_TRAP) and c:IsSSetable()
          end
          function c11443677.settg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
          if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and c11443677.setfilter(chkc) end
          if chk==0 then return Duel.IsExistingTarget(c11443677.setfilter,tp,LOCATION_GRAVE,0,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
          local g=Duel.SelectTarget(tp,c11443677.setfilter,tp,LOCATION_GRAVE,0,1,1,nil)
          Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,g,1,0,0)
          if e:IsCostChecked() then
          e:GetHandler():RegisterFlagEffect(11443677,RESET_EVENT|RESET_TOFIELD|RESET_TURN_SET|RESET_PHASE|PHASE_END,0,0,1)
          end
          end
          function c11443677.setop(e,tp,eg,ep,ev,re,r,rp)
          local tc=Duel.GetFirstTarget()
          if tc:IsRelateToEffect(e) then
          Duel.SSet(tp,tc)
          end
          end
          script/c50951254.lua deleted 100644 → 0
          View file @ 47278166
          --マグマッチョ・ドラゴン
          function c50951254.initial_effect(c)
          --
          local e1=Effect.CreateEffect(c)
          e1:SetDescription(aux.Stringid(50951254,0))
          e1:SetCategory(CATEGORY_ATKCHANGE)
          e1:SetType(EFFECT_TYPE_IGNITION)
          e1:SetRange(LOCATION_MZONE)
          e1:SetCountLimit(1,50951254)
          e1:SetCost(c50951254.atkcost)
          e1:SetOperation(c50951254.atkop)
          c:RegisterEffect(e1)
          --
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(50951254,1))
          e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DRAW)
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
          e2:SetCode(EVENT_DESTROYED)
          e2:SetProperty(EFFECT_FLAG_DELAY)
          e2:SetRange(LOCATION_GRAVE)
          e2:SetCountLimit(1,86346363)
          e2:SetCondition(c50951254.spcon)
          e2:SetTarget(c50951254.sptg)
          e2:SetOperation(c50951254.spop)
          c:RegisterEffect(e2)
          end
          function c50951254.costfilter(c,tp)
          return c:IsAttribute(ATTRIBUTE_FIRE) and c:IsAbleToRemoveAsCost()
          end
          function c50951254.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return Duel.IsExistingMatchingCard(c50951254.costfilter,tp,LOCATION_GRAVE,0,1,nil) end
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
          local g=Duel.GetMatchingGroup(c50951254.costfilter,tp,LOCATION_GRAVE,0,nil)
          local sg=g:Select(tp,1,3,nil)
          e:SetLabel(Duel.Remove(sg,POS_FACEUP,REASON_COST))
          end
          function c50951254.atkop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local ct=e:GetLabel()
          if 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*400)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE+RESET_PHASE+PHASE_END)
          c:RegisterEffect(e1)
          end
          end
          function c50951254.sfilter(c,tp)
          return c:IsPreviousPosition(POS_FACEUP) and c:IsPreviousControler(tp)
          and bit.band(c:GetPreviousAttributeOnField(),ATTRIBUTE_FIRE)~=0
          and c:IsReason(REASON_EFFECT) and c:IsPreviousLocation(LOCATION_MZONE)
          end
          function c50951254.spcon(e,tp,eg,ep,ev,re,r,rp)
          return eg:IsExists(c50951254.sfilter,1,nil,tp) and not eg:IsContains(e:GetHandler())
          end
          function c50951254.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_DRAW,nil,0,tp,1)
          Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
          end
          function c50951254.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)
          Duel.Draw(tp,1,REASON_EFFECT)
          end
          end
          script/c71344451.lua deleted 100644 → 0
          View file @ 47278166
          --一撃必殺！居合いドロー
          ---@param c Card
          function c71344451.initial_effect(c)
          --Activate
          local e1=Effect.CreateEffect(c)
          e1:SetCategory(CATEGORY_DECKDES+CATEGORY_DRAW+CATEGORY_DESTROY+CATEGORY_DAMAGE+CATEGORY_TODECK)
          e1:SetType(EFFECT_TYPE_ACTIVATE)
          e1:SetCode(EVENT_FREE_CHAIN)
          e1:SetCountLimit(1,71344451+EFFECT_COUNT_CODE_OATH)
          e1:SetCost(c71344451.cost)
          e1:SetTarget(c71344451.target)
          e1:SetOperation(c71344451.activate)
          c:RegisterEffect(e1)
          end
          function c71344451.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 c71344451.target(e,tp,eg,ep,ev,re,r,rp,chk)
          local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)
          if chk==0 then return ct>0 and Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>ct and Duel.IsPlayerCanDiscardDeck(tp,ct)
          and Duel.IsPlayerCanDraw(tp,1) end
          Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,ct)
          Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
          Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE)
          end
          function c71344451.activate(e,tp,eg,ep,ev,re,r,rp)
          local ct=Duel.GetFieldGroupCount(tp,0,LOCATION_ONFIELD)
          if ct>0 and Duel.DiscardDeck(tp,ct,REASON_EFFECT)~=0 then
          local ct2=Duel.GetOperatedGroup():Filter(Card.IsLocation,nil,LOCATION_GRAVE):GetCount()
          if ct2==0 then return end
          Duel.BreakEffect()
          if Duel.Draw(tp,1,REASON_EFFECT)~=0 then
          local tc=Duel.GetOperatedGroup():GetFirst()
          Duel.ConfirmCards(1-tp,tc)
          Duel.ShuffleHand(tp)
          if tc:IsCode(71344451) then
          if Duel.SendtoGrave(tc,REASON_EFFECT)~=0 and tc:IsLocation(LOCATION_GRAVE) then
          local sg=Duel.GetMatchingGroup(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,aux.ExceptThisCard(e))
          Duel.Destroy(sg,REASON_EFFECT)
          local tg=Duel.GetOperatedGroup():Filter(Card.IsLocation,nil,LOCATION_GRAVE)
          if tg:GetCount()>0 then
          local dam=tg:GetCount()*2000
          if dam>0 then
          Duel.BreakEffect()
          Duel.Damage(1-tp,dam,REASON_EFFECT)
          end
          end
          end
          else
          Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
          local dg=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(Card.IsAbleToDeck),tp,LOCATION_GRAVE,0,ct2,ct2,nil)
          if dg:GetCount()>0 then
          Duel.HintSelection(dg)
          Duel.SendtoDeck(dg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
          end
          end
          end
          end
          end
          script/c73206827.lua deleted 100644 → 0
          View file @ 47278166
          --光の結界
          function c73206827.initial_effect(c)
          --Activate
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_ACTIVATE)
          e1:SetCode(EVENT_FREE_CHAIN)
          c:RegisterEffect(e1)
          --coin
          local e2=Effect.CreateEffect(c)
          e2:SetDescription(aux.Stringid(73206827,0))
          e2:SetCategory(CATEGORY_COIN)
          e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
          e2:SetRange(LOCATION_FZONE)
          e2:SetCountLimit(1)
          e2:SetCode(EVENT_PHASE+PHASE_STANDBY)
          e2:SetCondition(c73206827.coincon)
          e2:SetTarget(c73206827.cointg)
          e2:SetOperation(c73206827.coinop)
          c:RegisterEffect(e2)
          --
          local e3=Effect.CreateEffect(c)
          e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
          e3:SetCode(EVENT_CHAIN_SOLVING)
          e3:SetRange(LOCATION_FZONE)
          e3:SetCondition(c73206827.effectcon)
          e3:SetOperation(c73206827.effectop)
          c:RegisterEffect(e3)
          --
          local e4=Effect.CreateEffect(c)
          e4:SetDescription(aux.Stringid(73206827,1))
          e4:SetCategory(CATEGORY_RECOVER)
          e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
          e4:SetRange(LOCATION_FZONE)
          e4:SetCode(EVENT_BATTLE_DESTROYING)
          e4:SetCondition(c73206827.reccon)
          e4:SetTarget(c73206827.rectg)
          e4:SetOperation(c73206827.recop)
          c:RegisterEffect(e4)
          end
          c73206827.toss_coin=true
          function c73206827.coincon(e,tp,eg,ep,ev,re,r,rp)
          return tp==Duel.GetTurnPlayer()
          end
          function c73206827.cointg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          Duel.SetOperationInfo(0,CATEGORY_COIN,nil,0,tp,1)
          end
          function c73206827.coinop(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local res=Duel.TossCoin(tp,1)
          if res==0 then
          c:RegisterFlagEffect(73206828,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_STANDBY+RESET_SELF_TURN,0,2)
          end
          end
          function c73206827.effectcon(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local loc,p=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_LOCATION,CHAININFO_TRIGGERING_PLAYER)
          return (c:GetFlagEffect(73206828)==0 or c:IsHasEffect(EFFECT_CANNOT_DISABLE))
          and p==tp and re:IsActiveType(TYPE_MONSTER) and loc==LOCATION_MZONE and re:GetHandler():IsSetCard(0x5)
          end
          function c73206827.effectop(e,tp,eg,ep,ev,re,r,rp)
          local tc=re:GetHandler()
          local c=e:GetHandler()
          if tc:IsSetCard(0x5) then
          local e1=Effect.CreateEffect(c)
          e1:SetType(EFFECT_TYPE_SINGLE)
          e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
          e1:SetCode(73206827)
          e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_CHAIN)
          tc:RegisterEffect(e1)
          end
          end
          function c73206827.reccon(e,tp,eg,ep,ev,re,r,rp)
          local c=e:GetHandler()
          local rc=eg:GetFirst()
          return rc:IsRelateToBattle() and rc:IsSetCard(0x5) and rc:IsFaceup() and rc:IsControler(tp)
          and (c:GetFlagEffect(73206828)==0 or c:IsHasEffect(EFFECT_CANNOT_DISABLE))
          end
          function c73206827.rectg(e,tp,eg,ep,ev,re,r,rp,chk)
          if chk==0 then return true end
          local tc=eg:GetFirst():GetBattleTarget()
          local atk=tc:GetBaseAttack()
          if atk<0 then atk=0 end
          Duel.SetTargetPlayer(tp)
          Duel.SetTargetParam(atk)
          Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,atk)
          end
          function c73206827.recop(e,tp,eg,ep,ev,re,r,rp)
          local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
          Duel.Recover(p,d,REASON_EFFECT)
          end
          script/utility.lua deleted 100644 → 0
          View file @ 47278166
          This diff is collapsed.
          Markdown is supported
          0% or
          You are about to add 0 people to the discussion. Proceed with caution.
          Finish editing this message first!
          Please register or to comment