Skip to content

Y
ygopro-222DIY-cards
Commit 6459a04d authored by 聖園ミカ's avatar 聖園ミカ 🐟
Browse files
Options

54188

parent 930ce326
Pipeline #30748 passed with stage
    in 14 minutes and 10 seconds
    Expand all Hide whitespace changes
    Inline Side-by-side
    Showing with 25 additions and 6467 deletions
    expansions/FiNALE.cdb
    View file @ 6459a04d
    No preview for this file type
    expansions/lflist.conf
    View file @ 6459a04d
    ......@@ -2047,12 +2047,6 @@
    96071030 0 --侍神·森岭 不见岳
    96071066 0 --侍神·京都堺 座敷童子
    96071079 0 --侍神·京都堺 玉藻前
    96077000 1 --The world of AI
    96077005 1 --耀光翔龙
    96077021 1 --尽灭黑洞龙
    96077026 1 --净洁白龙
    96077028 1 --闪耀光龙
    96077033 1 --深渊海神秘龙
    #986
    98600002 0 --欧忒耳佩
    98600004 1 --情书
    ......
    expansions/script/c18700103.lua deleted 100644 → 0
    View file @ 930ce326
    --戏世游寰·雨都朋客-空
    local m=18700103
    local cm=_G["c"..m]
    xpcall(function() require("expansions/script/1") end,function() require("script/1") end)
    function cm.initial_effect(c)
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_HAND)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SUMMON_SUCCESS)
    e2:SetCountLimit(1,m+1)
    e2:SetTarget(cm.thtg)
    e2:SetOperation(cm.thop)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e3)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>0
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CARDTYPE)
    e:SetLabel(Duel.AnnounceType(tp))
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)==0 then return end
    Duel.ConfirmDecktop(tp,1)
    local g=Duel.GetDecktopGroup(tp,1)
    local tc=g:GetFirst()
    local opt=e:GetLabel()
    if (opt==0 and tc:IsType(TYPE_MONSTER)) or (opt==1 and tc:IsType(TYPE_SPELL)) or (opt==2 and tc:IsType(TYPE_TRAP)) then
    if not c:IsRelateToEffect(e) then return end
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function cm.thfilter(c)
    return c:IsSetCard(0x823) and c:IsAbleToHand()
    end
    function cm.thtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.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
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD)
    e2:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e2:Reset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    e2:SetTargetRange(1,0)
    e2:SetTarget(cm.splimit)
    Duel.RegisterEffect(e2,tp)
    end
    function cm.splimit(e,c)
    return not c:IsType(TYPE_LINK) and c:IsLocation(LOCATION_EXTRA)
    end
    expansions/script/c18700122.lua deleted 100644 → 0
    View file @ 930ce326
    --戏世游寰·巡风行者-倪克斯
    local m=18700122
    local cm=_G["c"..m]
    xpcall(function() require("expansions/script/1") end,function() require("script/1") end)
    function cm.initial_effect(c)
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_MOVE)
    e1:SetRange(LOCATION_HAND)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.condition)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_MOVE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCountLimit(1,m+1)
    e2:SetCondition(cm.condition)
    e2:SetTarget(cm.sdtg2)
    e2:SetOperation(cm.sdop2)
    c:RegisterEffect(e2)
    end
    function cm.cfilter(c)
    return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
    and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=c:GetControler())
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,nil)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.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 cm.cfilter(c)
    return c:IsPreviousLocation(LOCATION_MZONE) and c:IsLocation(LOCATION_MZONE)
    and (c:GetPreviousSequence()~=c:GetSequence() or c:GetPreviousControler()~=c:GetControler())
    end
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,nil)
    end
    function cm.sdtg2(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>1 end
    end
    function cm.sdop2(e,tp,eg,ep,ev,re,r,rp)
    Duel.SortDecktop(tp,tp,2)
    end
    expansions/script/c98622100.lua → expansions/script/c22100000.lua
    View file @ 6459a04d
    --终端意志·无名之人
    local m=98622100
    local m=22100000
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    c:EnableReviveLimit()
    ......
    expansions/script/c29930000.lua deleted 100644 → 0
    View file @ 930ce326
    --森森挚深 烈蹄挽马
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930010,29930040)
    c:EnableReviveLimit()
    --material
    aux.AddSynchroProcedure2(c,s.matfilter1,aux.NonTuner(s.matfilter2))
    --set
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,0))
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCondition(s.showcon)
    e1:SetCost(s.showcost)
    e1:SetTarget(s.target)
    e1:SetOperation(s.operation)
    c:RegisterEffect(e1)
    --battle
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    --special summon
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(id,1))
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e4:SetCode(EVENT_TO_GRAVE)
    e4:SetProperty(EFFECT_FLAG_DELAY)
    e4:SetTarget(s.sptg)
    e4:SetOperation(s.spop)
    c:RegisterEffect(e4)
    end
    function s.matfilter1(c)
    return c:GetBaseAttack()==300 and c:GetBaseDefense()==100
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_WATER)
    and c:IsLevel(2)
    end
    function s.matfilter2(c)
    return c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    end
    function s.showcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function s.showfilter(c)
    return c:GetBaseAttack()==400 and c:GetBaseDefense()==0
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function s.showcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.showfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,s.showfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function s.pfilter(c,tp)
    return c:IsCode(29930010)
    and not c:IsForbidden() and c:CheckUniqueOnField(tp)
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(s.pfilter,tp,LOCATION_DECK,0,1,nil,tp) end
    end
    function s.operation(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local tc=Duel.SelectMatchingCard(tp,s.pfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
    if tc then Duel.MoveToField(tc,tp,tp,LOCATION_MZONE,POS_FACEUP,true) end
    end
    function s.cfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.spfilter(c,e,tp)
    return c:IsCode(29930040) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
    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.cfilter,tp,LOCATION_MZONE,0,1,nil)
    and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
    end
    function s.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    local c=e:GetHandler()
    if tc then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    tc:RegisterFlagEffect(s,RESET_EVENT+RESETS_STANDARD,0,1)
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,2))
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetValue(s.efilter)
    e1:SetOwnerPlayer(tp)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCountLimit(1)
    e2:SetLabel(Duel.GetTurnCount()+1)
    e2:SetLabelObject(tc)
    e2:SetCondition(s.tdcon)
    e2:SetOperation(s.tdop)
    Duel.RegisterEffect(e2,tp)
    end
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_MONSTER) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    if tc:GetFlagEffect(s)~=0 then
    return Duel.GetTurnCount()==e:GetLabel()
    else
    e:Reset()
    return false
    end
    end
    function s.tdop(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    Duel.Hint(HINT_CARD,0,id)
    Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    \ No newline at end of file
    expansions/script/c29930001.lua deleted 100644 → 0
    View file @ 930ce326
    --森森挚深 恋翼兔狲
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930011,29930040)
    c:EnableReviveLimit()
    --material
    aux.AddSynchroProcedure2(c,s.matfilter1,aux.NonTuner(s.matfilter2))
    --set
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,0))
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCondition(s.showcon)
    e1:SetCost(s.showcost)
    e1:SetTarget(s.target)
    e1:SetOperation(s.operation)
    c:RegisterEffect(e1)
    --battle
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    --special summon
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(id,1))
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e4:SetCode(EVENT_TO_GRAVE)
    e4:SetProperty(EFFECT_FLAG_DELAY)
    e4:SetTarget(s.sptg)
    e4:SetOperation(s.spop)
    c:RegisterEffect(e4)
    end
    function s.matfilter1(c)
    return c:GetBaseAttack()==300 and c:GetBaseDefense()==100
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_WATER)
    and c:IsLevel(2)
    end
    function s.matfilter2(c)
    return c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    end
    function s.showcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function s.showfilter(c)
    return c:GetBaseAttack()==200 and c:GetBaseDefense()==200
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function s.showcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.showfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,s.showfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function s.pfilter(c,tp)
    return c:IsCode(29930011)
    and not c:IsForbidden() and c:CheckUniqueOnField(tp)
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(s.pfilter,tp,LOCATION_DECK,0,1,nil,tp) end
    end
    function s.operation(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local tc=Duel.SelectMatchingCard(tp,s.pfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
    if tc then Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) end
    end
    function s.cfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.spfilter(c,e,tp)
    return c:IsCode(29930040) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
    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.cfilter,tp,LOCATION_MZONE,0,1,nil)
    and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
    end
    function s.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    local c=e:GetHandler()
    if tc then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    tc:RegisterFlagEffect(s,RESET_EVENT+RESETS_STANDARD,0,1)
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,2))
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetValue(s.efilter)
    e1:SetOwnerPlayer(tp)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCountLimit(1)
    e2:SetLabel(Duel.GetTurnCount()+1)
    e2:SetLabelObject(tc)
    e2:SetCondition(s.tdcon)
    e2:SetOperation(s.tdop)
    Duel.RegisterEffect(e2,tp)
    end
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_SPELL) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    if tc:GetFlagEffect(s)~=0 then
    return Duel.GetTurnCount()==e:GetLabel()
    else
    e:Reset()
    return false
    end
    end
    function s.tdop(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    Duel.Hint(HINT_CARD,0,id)
    Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    \ No newline at end of file
    expansions/script/c29930002.lua deleted 100644 → 0
    View file @ 930ce326
    --森森挚深 凌甲野狼
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930012,29930040)
    c:EnableReviveLimit()
    --material
    aux.AddSynchroProcedure2(c,s.matfilter1,aux.NonTuner(s.matfilter2))
    --set
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,0))
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCondition(s.showcon)
    e1:SetCost(s.showcost)
    e1:SetTarget(s.target)
    e1:SetOperation(s.operation)
    c:RegisterEffect(e1)
    --battle
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    --special summon
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(id,1))
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_DECKDES)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e4:SetCode(EVENT_TO_GRAVE)
    e4:SetProperty(EFFECT_FLAG_DELAY)
    e4:SetTarget(s.sptg)
    e4:SetOperation(s.spop)
    c:RegisterEffect(e4)
    end
    function s.matfilter1(c)
    return c:GetBaseAttack()==300 and c:GetBaseDefense()==100
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_WATER)
    and c:IsLevel(2)
    end
    function s.matfilter2(c)
    return c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    end
    function s.showcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():IsSummonType(SUMMON_TYPE_SYNCHRO)
    end
    function s.showfilter(c)
    return c:GetBaseAttack()==300 and c:GetBaseDefense()==100
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function s.showcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.showfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,s.showfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function s.pfilter(c,tp)
    return c:IsCode(29930012)
    and not c:IsForbidden() and c:CheckUniqueOnField(tp)
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingMatchingCard(s.pfilter,tp,LOCATION_DECK,0,1,nil,tp) end
    end
    function s.operation(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local tc=Duel.SelectMatchingCard(tp,s.pfilter,tp,LOCATION_DECK,0,1,1,nil,tp):GetFirst()
    if tc then Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true) end
    end
    function s.cfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.spfilter(c,e,tp)
    return c:IsCode(29930040) and c:IsCanBeSpecialSummoned(e,0,tp,false,false,POS_FACEUP)
    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.cfilter,tp,LOCATION_MZONE,0,1,nil)
    and Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,LOCATION_DECK)
    end
    function s.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilter,tp,LOCATION_DECK,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    local c=e:GetHandler()
    if tc then
    Duel.SpecialSummon(tc,0,tp,tp,false,false,POS_FACEUP)
    tc:RegisterFlagEffect(s,RESET_EVENT+RESETS_STANDARD,0,1)
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(id,2))
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CLIENT_HINT)
    e1:SetCode(EFFECT_IMMUNE_EFFECT)
    e1:SetValue(s.efilter)
    e1:SetOwnerPlayer(tp)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCountLimit(1)
    e2:SetLabel(Duel.GetTurnCount()+1)
    e2:SetLabelObject(tc)
    e2:SetCondition(s.tdcon)
    e2:SetOperation(s.tdop)
    Duel.RegisterEffect(e2,tp)
    end
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    if tc:GetFlagEffect(s)~=0 then
    return Duel.GetTurnCount()==e:GetLabel()
    else
    e:Reset()
    return false
    end
    end
    function s.tdop(e,tp,eg,ep,ev,re,r,rp)
    local tc=e:GetLabelObject()
    Duel.Hint(HINT_CARD,0,id)
    Duel.SendtoDeck(tc,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    \ No newline at end of file
    expansions/script/c29930010.lua deleted 100644 → 0
    View file @ 930ce326
    --地隆啸天大终结
    function c29930010.initial_effect(c)
    aux.AddCodeList(c,29930000)
    c:SetUniqueOnField(1,0,29930010)
    --cannot be material
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e1:SetValue(c29930010.fuslimit)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e3)
    local e4=e2:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e4)
    --cannot summon or special summon
    local e5=Effect.CreateEffect(c)
    e5:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_SPSUMMON_CONDITION)
    c:RegisterEffect(e5)
    --cannot attack
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e6:SetCode(EFFECT_CANNOT_ATTACK)
    c:RegisterEffect(e6)
    --indes
    local e7=Effect.CreateEffect(c)
    e7:SetType(EFFECT_TYPE_FIELD)
    e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e7:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e7:SetRange(LOCATION_MZONE)
    e7:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
    e7:SetTarget(c29930010.indtg)
    e7:SetValue(1)
    c:RegisterEffect(e7)
    --no battle damage
    local e8=Effect.CreateEffect(c)
    e8:SetType(EFFECT_TYPE_SINGLE)
    e8:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e8:SetCode(EFFECT_NO_BATTLE_DAMAGE)
    c:RegisterEffect(e8)
    local e9=Effect.CreateEffect(c)
    e9:SetType(EFFECT_TYPE_SINGLE)
    e9:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e9:SetCode(EFFECT_AVOID_BATTLE_DAMAGE)
    e9:SetValue(1)
    c:RegisterEffect(e9)
    --horse token
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(29930010,0))
    e10:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
    e10:SetType(EFFECT_TYPE_IGNITION)
    e10:SetRange(LOCATION_HAND)
    e10:SetCountLimit(1,29930010)
    e10:SetCost(c29930010.tkcost)
    e10:SetTarget(c29930010.tktg)
    e10:SetOperation(c29930010.tkop)
    c:RegisterEffect(e10)
    --negated
    local e11=Effect.CreateEffect(c)
    e11:SetDescription(aux.Stringid(29930010,1))
    e11:SetCategory(CATEGORY_DISABLE)
    e11:SetType(EFFECT_TYPE_QUICK_O)
    e11:SetCode(EVENT_CHAINING)
    e11:SetRange(LOCATION_MZONE)
    e11:SetCountLimit(1)
    e11:SetCondition(c29930010.discon)
    e11:SetCost(c29930010.discost)
    e11:SetTarget(c29930010.distg)
    e11:SetOperation(c29930010.disop)
    local e12=Effect.CreateEffect(c)
    e12:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e12:SetRange(LOCATION_MZONE)
    e12:SetTargetRange(LOCATION_MZONE,0)
    e12:SetTarget(c29930010.eftg)
    e12:SetLabelObject(e11)
    c:RegisterEffect(e12)
    --level&atk&def
    local e13=Effect.CreateEffect(c)
    e13:SetType(EFFECT_TYPE_SINGLE)
    e13:SetCode(EFFECT_UPDATE_ATTACK)
    e13:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e13:SetRange(LOCATION_MZONE)
    e13:SetValue(2000)
    local e15=e13:Clone()
    e15:SetCode(EFFECT_CHANGE_LEVEL)
    e15:SetValue(10)
    local e16=Effect.CreateEffect(c)
    e16:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e16:SetRange(LOCATION_MZONE)
    e16:SetTargetRange(LOCATION_MZONE,0)
    e16:SetTarget(c29930010.eftg)
    e16:SetLabelObject(e13)
    c:RegisterEffect(e16)
    local e18=e16:Clone()
    e18:SetLabelObject(e15)
    c:RegisterEffect(e18)
    Duel.AddCustomActivityCounter(29930010,ACTIVITY_SPSUMMON,c29930010.counterfilter)
    end
    function c29930010.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function c29930010.counterfilter(c)
    return not c:IsSummonLocation(LOCATION_EXTRA)
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9)
    end
    function c29930010.indtg(e,c)
    local tc=e:GetHandler()
    return c==tc or c==tc:GetBattleTarget()
    end
    function c29930010.tkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(29930010,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetTargetRange(1,0)
    e1:SetTarget(c29930010.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToDeckAsCost() end
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function c29930010.splimit(e,c)
    return c:IsLocation(LOCATION_EXTRA) and
    not((c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9))
    end
    function c29930010.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,29930013,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) end
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    end
    function c29930010.tkop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    if Duel.IsPlayerCanSpecialSummonMonster(tp,29930013,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) then
    local token=Duel.CreateToken(tp,29930013)
    Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function c29930010.eftg(e,c)
    return c:IsFaceup() and c:IsOriginalCodeRule(29930000)
    end
    function c29930010.discon(e,tp,eg,ep,ev,re,r,rp)
    return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and re:IsActiveType(TYPE_MONSTER)
    end
    function c29930010.cfilter(c)
    return c:GetBaseAttack()==400 and c:GetBaseDefense()==0
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function c29930010.discost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(c29930010.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,c29930010.cfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function c29930010.distg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
    end
    function c29930010.setfilter(c)
    return c:IsCanTurnSet() and c:IsFaceup()
    end
    function c29930010.thfilter(c)
    return c:IsAbleToDeck() and c:IsFaceup() and c:IsType(TYPE_MONSTER)
    end
    function c29930010.disop(e,tp,eg,ep,ev,re,r,rp)
    local sg=Duel.GetMatchingGroup(c29930010.setfilter,tp,0,LOCATION_MZONE,nil)
    if Duel.NegateEffect(ev) and sg:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(29930010,2)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SET)
    local tg=sg:Select(tp,1,1,nil)
    Duel.BreakEffect()
    local sg2=Duel.GetMatchingGroup(c29930010.thfilter,tp,0,LOCATION_ONFIELD,tg)
    if Duel.ChangePosition(tg,POS_FACEDOWN_DEFENSE)~=0 and sg2:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(29930010,3)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local tg2=sg2:Select(tp,1,1,nil)
    Duel.BreakEffect()
    Duel.SendtoDeck(tg2,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
    end
    end
    end
    expansions/script/c29930011.lua deleted 100644 → 0
    View file @ 930ce326
    --唯意谨献散燎华
    function c29930011.initial_effect(c)
    aux.AddCodeList(c,29930001)
    c:SetUniqueOnField(1,0,29930011)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e1:SetValue(c29930011.fuslimit)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e3)
    local e4=e2:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e4)
    --cat token
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(29930011,0))
    e10:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
    e10:SetType(EFFECT_TYPE_IGNITION)
    e10:SetRange(LOCATION_HAND)
    e10:SetCountLimit(1,29930011)
    e10:SetCost(c29930011.tkcost)
    e10:SetTarget(c29930011.tktg)
    e10:SetOperation(c29930011.tkop)
    c:RegisterEffect(e10)
    --negated
    local e11=Effect.CreateEffect(c)
    e11:SetDescription(aux.Stringid(29930011,1))
    e11:SetCategory(CATEGORY_DISABLE)
    e11:SetType(EFFECT_TYPE_QUICK_O)
    e11:SetCode(EVENT_CHAINING)
    e11:SetRange(LOCATION_MZONE)
    e11:SetCountLimit(1)
    e11:SetCondition(c29930011.discon)
    e11:SetCost(c29930011.discost)
    e11:SetTarget(c29930011.distg)
    e11:SetOperation(c29930011.disop)
    local e12=Effect.CreateEffect(c)
    e12:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e12:SetRange(LOCATION_SZONE)
    e12:SetTargetRange(LOCATION_MZONE,0)
    e12:SetTarget(c29930011.eftg)
    e12:SetLabelObject(e11)
    c:RegisterEffect(e12)
    --level&atk&def
    local e13=Effect.CreateEffect(c)
    e13:SetType(EFFECT_TYPE_SINGLE)
    e13:SetCode(EFFECT_UPDATE_ATTACK)
    e13:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e13:SetRange(LOCATION_MZONE)
    e13:SetValue(1000)
    local e14=e13:Clone()
    e14:SetCode(EFFECT_UPDATE_DEFENSE)
    e14:SetValue(1000)
    local e15=e13:Clone()
    e15:SetCode(EFFECT_CHANGE_LEVEL)
    e15:SetValue(10)
    local e16=Effect.CreateEffect(c)
    e16:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e16:SetRange(LOCATION_SZONE)
    e16:SetTargetRange(LOCATION_MZONE,0)
    e16:SetTarget(c29930011.eftg)
    e16:SetLabelObject(e13)
    c:RegisterEffect(e16)
    local e17=e16:Clone()
    e17:SetLabelObject(e14)
    c:RegisterEffect(e17)
    local e18=e16:Clone()
    e18:SetLabelObject(e15)
    c:RegisterEffect(e18)
    Duel.AddCustomActivityCounter(29930011,ACTIVITY_SPSUMMON,c29930011.counterfilter)
    end
    function c29930011.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function c29930011.counterfilter(c)
    return not c:IsSummonLocation(LOCATION_EXTRA)
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9)
    end
    function c29930011.tkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(29930011,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetTargetRange(1,0)
    e1:SetTarget(c29930011.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToDeckAsCost() end
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function c29930011.splimit(e,c)
    return c:IsLocation(LOCATION_EXTRA) and
    not((c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9))
    end
    function c29930011.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,29930014,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) end
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    end
    function c29930011.tkop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    if Duel.IsPlayerCanSpecialSummonMonster(tp,29930014,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) then
    local token=Duel.CreateToken(tp,29930014)
    Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function c29930011.eftg(e,c)
    return c:IsFaceup() and c:IsOriginalCodeRule(29930001)
    end
    function c29930011.discon(e,tp,eg,ep,ev,re,r,rp)
    return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and re:IsActiveType(TYPE_SPELL)
    end
    function c29930011.cfilter(c)
    return c:GetBaseAttack()==200 and c:GetBaseDefense()==200
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function c29930011.discost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(c29930011.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,c29930011.cfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function c29930011.distg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
    end
    function c29930011.thfilter(c)
    return c:IsAbleToDeck() and c:IsFaceup() and c:IsType(TYPE_SPELL)
    end
    function c29930011.disop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.NegateEffect(ev) and Duel.SelectYesNo(tp,aux.Stringid(29930011,2)) then
    Duel.BreakEffect()
    local sg2=Duel.GetMatchingGroup(c29930011.thfilter,tp,0,LOCATION_ONFIELD,nil)
    if Duel.Recover(tp,1000,REASON_EFFECT)~=0 and sg2:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(29930011,3)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local tg2=sg2:Select(tp,1,1,nil)
    Duel.BreakEffect()
    Duel.SendtoDeck(tg2,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
    end
    end
    end
    expansions/script/c29930012.lua deleted 100644 → 0
    View file @ 930ce326
    --躁飞乱打猛群击
    function c29930012.initial_effect(c)
    aux.AddCodeList(c,29930002)
    c:SetUniqueOnField(1,0,29930012)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e1:SetValue(c29930012.fuslimit)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e2:SetValue(1)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e3)
    local e4=e2:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e4)
    --dog token
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(29930012,0))
    e10:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOKEN)
    e10:SetType(EFFECT_TYPE_IGNITION)
    e10:SetRange(LOCATION_HAND)
    e10:SetCountLimit(1,29930012)
    e10:SetCost(c29930012.tkcost)
    e10:SetTarget(c29930012.tktg)
    e10:SetOperation(c29930012.tkop)
    c:RegisterEffect(e10)
    --negated
    local e11=Effect.CreateEffect(c)
    e11:SetDescription(aux.Stringid(29930012,1))
    e11:SetCategory(CATEGORY_DISABLE)
    e11:SetType(EFFECT_TYPE_QUICK_O)
    e11:SetCode(EVENT_CHAINING)
    e11:SetRange(LOCATION_MZONE)
    e11:SetCountLimit(1)
    e11:SetCondition(c29930012.discon)
    e11:SetCost(c29930012.discost)
    e11:SetTarget(c29930012.distg)
    e11:SetOperation(c29930012.disop)
    local e12=Effect.CreateEffect(c)
    e12:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e12:SetRange(LOCATION_SZONE)
    e12:SetTargetRange(LOCATION_MZONE,0)
    e12:SetTarget(c29930012.eftg)
    e12:SetLabelObject(e11)
    c:RegisterEffect(e12)
    --level&atk&def
    local e13=Effect.CreateEffect(c)
    e13:SetType(EFFECT_TYPE_SINGLE)
    e13:SetCode(EFFECT_UPDATE_ATTACK)
    e13:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e13:SetRange(LOCATION_MZONE)
    e13:SetValue(1500)
    local e14=e13:Clone()
    e14:SetCode(EFFECT_UPDATE_DEFENSE)
    e14:SetValue(500)
    local e15=e13:Clone()
    e15:SetCode(EFFECT_CHANGE_LEVEL)
    e15:SetValue(10)
    local e16=Effect.CreateEffect(c)
    e16:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
    e16:SetRange(LOCATION_SZONE)
    e16:SetTargetRange(LOCATION_MZONE,0)
    e16:SetTarget(c29930012.eftg)
    e16:SetLabelObject(e13)
    c:RegisterEffect(e16)
    local e17=e16:Clone()
    e17:SetLabelObject(e14)
    c:RegisterEffect(e17)
    local e18=e16:Clone()
    e18:SetLabelObject(e15)
    c:RegisterEffect(e18)
    Duel.AddCustomActivityCounter(29930012,ACTIVITY_SPSUMMON,c29930012.counterfilter)
    end
    function c29930012.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function c29930012.counterfilter(c)
    return not c:IsSummonLocation(LOCATION_EXTRA)
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9)
    end
    function c29930012.tkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetCustomActivityCount(29930012,tp,ACTIVITY_SPSUMMON)==0 end
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_OATH)
    e1:SetCode(EFFECT_CANNOT_SPECIAL_SUMMON)
    e1:SetTargetRange(1,0)
    e1:SetTarget(c29930012.splimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToDeckAsCost() end
    Duel.SendtoDeck(c,nil,SEQ_DECKSHUFFLE,REASON_COST)
    end
    function c29930012.splimit(e,c)
    return c:IsLocation(LOCATION_EXTRA) and
    not((c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ))
    or (c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO))
    or (c:GetBaseAttack()==9))
    end
    function c29930012.tktg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsPlayerCanSpecialSummonMonster(tp,29930015,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) end
    Duel.SetOperationInfo(0,CATEGORY_TOKEN,nil,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,0,0)
    end
    function c29930012.tkop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    if Duel.IsPlayerCanSpecialSummonMonster(tp,29930015,0,TYPES_TOKEN_MONSTER+TYPE_TUNER,300,100,2,RACE_BEAST,ATTRIBUTE_WATER) then
    local token=Duel.CreateToken(tp,29930015)
    Duel.SpecialSummon(token,0,tp,tp,false,false,POS_FACEUP)
    end
    end
    function c29930012.eftg(e,c)
    return c:IsFaceup() and c:IsOriginalCodeRule(29930002)
    end
    function c29930012.discon(e,tp,eg,ep,ev,re,r,rp)
    return rp==1-tp and not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED) and Duel.IsChainNegatable(ev) and re:IsActiveType(TYPE_TRAP)
    end
    function c29930012.cfilter(c)
    return c:GetBaseAttack()==300 and c:GetBaseDefense()==100
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function c29930012.discost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(c29930012.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,c29930012.cfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function c29930012.distg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return true end
    Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,eg,1,0,0)
    end
    function c29930012.thfilter(c)
    return c:IsAbleToDeck() and c:IsFaceup() and c:IsType(TYPE_TRAP)
    end
    function c29930012.disop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.NegateEffect(ev) and Duel.SelectYesNo(tp,aux.Stringid(29930012,2)) then
    Duel.BreakEffect()
    local sg2=Duel.GetMatchingGroup(c29930012.thfilter,tp,0,LOCATION_ONFIELD,nil)
    if Duel.Damage(1-tp,1000,REASON_EFFECT)~=0 and sg2:GetCount()>0 and Duel.SelectYesNo(tp,aux.Stringid(29930012,3)) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local tg2=sg2:Select(tp,1,1,nil)
    Duel.BreakEffect()
    Duel.SendtoDeck(tg2,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930050.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV1
    local s,id,o=GetID()
    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:SetCost(s.spcost)
    e1:SetTarget(s.sptg)
    e1:SetOperation(s.spop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930051}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.cffilter(c)
    return c:GetBaseAttack()==100 and c:GetBaseDefense()==300
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.cffilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,s.cffilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    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
    if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(1111)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.spfilter(c,tp)
    return c:IsSummonPlayer(tp) and c:GetBaseAttack()==500 and c:GetBaseDefense()==2000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ) and c:IsFaceup()
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(s.spfilter,1,nil,tp)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930051) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_RITUAL,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930051.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV2
    local s,id,o=GetID()
    function s.initial_effect(c)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930050,29930052}
    s.lvdn={29930050}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930050 or code2==29930050)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(2222)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,2,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return tp==Duel.GetTurnPlayer()
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930052) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_LINK,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930052.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV3
    local s,id,o=GetID()
    function s.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,s.chk,9,9)
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930051,29930061}
    s.lvdn={29930050,29930051}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.chk(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930051 or code2==29930051)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(24,0,aux.Stringid(id,0))
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_HAND)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(3333)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,3,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c,tp)
    return c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE)
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsLevel(2)
    and c:GetAttack()<500
    and c:IsPreviousPosition(POS_FACEUP) and c:IsControler(tp)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(s.cfilter,1,nil,tp)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930061) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930061.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV6
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930000,29930001,29930002)
    --fusion material
    aux.AddFusionProcFunRep(c,s.ffilter,9,true)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930052,29930062}
    s.lvdn={29930050,29930051,29930052}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930052 or code2==29930052)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(6666)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,6,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c)
    local b1=c:GetBaseAttack()==1500 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO)
    local b2=c:IsOriginalCodeRule(29930000,299930001,29930002)
    return c:IsFaceup()
    and (b1 or b2)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()~=tp
    and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930062) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930062.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV7
    local s,id,o=GetID()
    function s.initial_effect(c)
    --fusion material
    aux.AddSynchroProcedure(c,nil,s.ffilter,9,9)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930061,29930063}
    s.lvdn={29930050,29930051,29930052,29930061}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930061 or code2==29930061)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(7777)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_IMMUNE_EFFECT)
    e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e6:SetRange(LOCATION_MZONE)
    e6:SetValue(s.efilter)
    c:RegisterEffect(e6)
    --revive
    local e7=Effect.CreateEffect(c)
    e7:SetDescription(aux.Stringid(id,2))
    e7:SetType(EFFECT_TYPE_QUICK_O)
    e7:SetCode(EVENT_FREE_CHAIN)
    e7:SetRange(LOCATION_MZONE)
    e7:SetCountLimit(1)
    e7:SetTarget(s.retarget)
    e7:SetOperation(s.reoperation)
    c:RegisterEffect(e7)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,7,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930063) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 and Duel.SpecialSummon(g,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)>0 then
    Duel.BreakEffect()
    end
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SKIP_BP)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetTargetRange(0,1)
    e1:SetLabel(Duel.GetTurnCount())
    e1:SetCondition(s.skipcon)
    e1:SetReset(RESET_PHASE+PHASE_BATTLE+RESET_SELF_TURN,1)
    Duel.RegisterEffect(e1,tp)
    end
    end
    function s.skipcon(e)
    return Duel.GetTurnCount()~=e:GetLabel()
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_SPELL) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    expansions/script/c29930063.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 RisingLV9/九玉 星兽魄主
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930090)
    --fusion material
    aux.AddXyzProcedureLevelFree(c,s.ffilter,nil,9,9,nil,nil,nil)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930062}
    s.lvdn={29930050,29930051,29930052,29930061,29930062}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930062 or code2==29930062)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(24,0,aux.Stringid(id,0))
    Duel.Hint(HINT_MUSIC,0,aux.Stringid(id,6))
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --Attribute&Race ALL
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e2:SetCode(EFFECT_ADD_ATTRIBUTE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(ATTRIBUTE_ALL)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_ADD_RACE)
    e3:SetValue(RACE_ALL)
    c:RegisterEffect(e3)
    --atk&def
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetCode(EFFECT_SET_BASE_ATTACK)
    e4:SetValue(9999)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e4)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e5)
    -- ultraavoid
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_FIELD)
    e6:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e6:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e6:SetRange(LOCATION_MZONE)
    e6:SetTargetRange(LOCATION_MZONE,0)
    e6:SetTarget(s.indtg)
    e6:SetValue(s.tgval)
    c:RegisterEffect(e6)
    local e7=Effect.CreateEffect(c)
    e7:SetType(EFFECT_TYPE_SINGLE)
    e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e7:SetCode(EFFECT_IMMUNE_EFFECT)
    e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e7:SetRange(LOCATION_MZONE)
    e7:SetValue(s.efilter)
    c:RegisterEffect(e7)
    --revive
    local e8=Effect.CreateEffect(c)
    e8:SetDescription(aux.Stringid(id,1))
    e8:SetType(EFFECT_TYPE_QUICK_O)
    e8:SetCode(EVENT_FREE_CHAIN)
    e8:SetRange(LOCATION_MZONE)
    e8:SetCountLimit(1)
    e8:SetTarget(s.retarget)
    e8:SetOperation(s.reoperation)
    c:RegisterEffect(e8)
    --9combo attack
    local e9=Effect.CreateEffect(c)
    e9:SetType(EFFECT_TYPE_SINGLE)
    e9:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e9:SetRange(LOCATION_MZONE)
    e9:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
    e9:SetValue(8)
    c:RegisterEffect(e9)
    --power gain
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(id,2))
    e10:SetCategory(CATEGORY_ATKCHANGE)
    e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e10:SetCode(EVENT_ATTACK_ANNOUNCE)
    e10:SetCondition(s.atkcon)
    e10:SetOperation(s.atkop)
    c:RegisterEffect(e10)
    --genesis remake
    local e11=Effect.CreateEffect(c)
    e11:SetDescription(aux.Stringid(id,3))
    e11:SetCategory(CATEGORY_TODECK)
    e11:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e11:SetCode(EVENT_PHASE+PHASE_BATTLE)
    e11:SetCountLimit(1)
    e11:SetRange(LOCATION_MZONE)
    e11:SetCondition(s.tdcon)
    e11:SetTarget(s.tdtg)
    e11:SetOperation(s.tdop)
    c:RegisterEffect(e11)
    --tohand
    local e12=Effect.CreateEffect(c)
    e12:SetDescription(aux.Stringid(id,4))
    e12:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e12:SetType(EFFECT_TYPE_IGNITION)
    e12:SetRange(LOCATION_MZONE)
    e12:SetTarget(s.thtg)
    e12:SetOperation(s.thop)
    c:RegisterEffect(e12)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_SPELL)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,9,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.indtg(e,c)
    return c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and (c:IsType(TYPE_XYZ) or c:IsType(TYPE_SYNCHRO))
    end
    function s.tgval(e,re,rp)
    return re:IsActiveType(TYPE_SPELL+TYPE_MONSTER) and rp==1-e:GetHandlerPlayer()
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_SPELL) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil or c==Duel.GetAttackTarget()
    end
    function s.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    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(1111)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetBattledGroupCount()>0
    end
    function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
    if chk==0 then return #g>0 end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,g,#g,0,LOCATION_ONFIELD)
    end
    function s.tdop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
    if #g>0 then
    Duel.Hint(24,0,aux.Stringid(id,5))
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_RULE)
    end
    end
    function s.thfilter(c)
    return c:IsCode(29930090) 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>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    \ No newline at end of file
    expansions/script/c29930090.lua deleted 100644 → 0
    View file @ 930ce326
    --结阴谧成一誓 贯心破
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930063)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetTarget(s.target)
    e1:SetOperation(s.activate)
    c:RegisterEffect(e1)
    --oru charge
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,id)
    e2:SetCondition(s.matcon)
    e2:SetTarget(s.mattg)
    e2:SetOperation(s.matop)
    c:RegisterEffect(e2)
    end
    function s.filter(c)
    return c:IsFaceup() and c:IsCode(29930063)
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function s.activate(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    tc:IsRelateToEffect(e)
    --disable&cannot activate
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetTargetRange(0,1)
    e1:SetCondition(s.actcon)
    e1:SetValue(s.actlimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetCode(EVENT_ATTACK_ANNOUNCE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetCondition(s.discon)
    e2:SetOperation(s.disop)
    e2:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e2,tp)
    local e3=e2:Clone()
    e3:SetCode(EVENT_BE_BATTLE_TARGET)
    Duel.RegisterEffect(e3,tp)
    local e4=Effect.CreateEffect(e:GetHandler())
    e4:SetType(EFFECT_TYPE_FIELD)
    e4:SetCode(EFFECT_DISABLE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e4:SetTargetRange(0,LOCATION_MZONE)
    e4:SetTarget(s.distg)
    e4:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e4,tp)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_DISABLE_EFFECT)
    Duel.RegisterEffect(e5,tp)
    end
    function s.actcon(e)
    local a=Duel.GetAttacker()
    local tp=e:GetHandlerPlayer()
    return a and a:IsControler(tp) and a:IsRace(RACE_BEAST) and
    (a:IsType(TYPE_SYNCHRO) or a:IsType(TYPE_XYZ))
    end
    function s.actlimit(e,re,tp)
    return re:IsActiveType(TYPE_SPELL+TYPE_MONSTER)
    end
    function s.cfilter(c,tp)
    return c:IsFaceup() and c:IsRace(RACE_BEAST) and
    (c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_XYZ)) and c:IsControler(tp)
    end
    function s.discon(e,tp,eg,ep,ev,re,r,rp)
    local c=Duel.GetAttackTarget()
    if not c then return false end
    if c:IsControler(1-tp) then c=Duel.GetAttacker() end
    return c and s.cfilter(c,tp)
    end
    function s.disop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetAttackTarget()
    if tc:IsControler(tp) then tc=Duel.GetAttacker() end
    tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE,0,1)
    Duel.AdjustInstantly(c)
    end
    function s.distg(e,c)
    return c:GetFlagEffect(id)~=0
    end
    function s.matfilter(c)
    return c:IsFaceup() and c:IsCode(29930063)
    end
    function s.matcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(s.matfilter,tp,LOCATION_ONFIELD,0,1,nil)
    end
    function s.xyzfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.mfilter(c)
    return c:IsType(TYPE_MONSTER) and c:IsRace(RACE_BEAST) and c:IsCanOverlay()
    end
    function s.mattg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsPosition(LOCATION_MZONE) and s.xyzfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.xyzfilter,tp,LOCATION_MZONE,0,1,nil)
    and Duel.IsExistingMatchingCard(s.mfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,s.xyzfilter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function s.matop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsFaceup() and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.mfilter),tp,LOCATION_GRAVE,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.Overlay(tc,g)
    end
    end
    end
    expansions/script/c29930091.lua deleted 100644 → 0
    View file @ 930ce326
    --十载一心 于此地定缘
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930050)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCost(s.cost)
    e1:SetTarget(s.target)
    e1:SetOperation(s.activate)
    c:RegisterEffect(e1)
    --overlay
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,id)
    e2:SetTarget(s.ovtg)
    e2:SetOperation(s.ovop)
    c:RegisterEffect(e2)
    end
    function s.costfilter(c,tp)
    return c:IsFaceup() and c:IsRace(RACE_BEAST) and c:IsType(TYPE_XYZ)
    and c:CheckRemoveOverlayCard(tp,1,REASON_COST)
    end
    function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_MZONE,0,1,nil,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DEATTACHFROM)
    local tc=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_MZONE,0,1,1,nil,tp):GetFirst()
    tc:RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function s.filter(c)
    return c:IsCode(29930050) and c:IsAbleToHand()
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function s.activate(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function s.ovfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.ovtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.ovfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.ovfilter,tp,LOCATION_MZONE,0,1,nil)
    and e:GetHandler():IsCanOverlay() end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,s.ovfilter,tp,LOCATION_MZONE,0,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function s.ovop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and c:IsCanOverlay() and tc:IsRelateToEffect(e) and not c:IsImmuneToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    expansions/script/c29930100.lua deleted 100644 → 0
    View file @ 930ce326
    --雪昼 符讴玹狐 LV1
    local s,id,o=GetID()
    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:SetCost(s.spcost)
    e1:SetTarget(s.sptg)
    e1:SetOperation(s.spop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930101}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.cffilter(c)
    return c:GetBaseAttack()==100 and c:GetBaseDefense()==300
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(2) and c:IsType(TYPE_MONSTER) and not c:IsPublic()
    end
    function s.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.cffilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,s.cffilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    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
    if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP) then
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(1111)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.spfilter(c,tp)
    return c:IsSummonPlayer(tp) and c:GetBaseAttack()==500 and c:GetBaseDefense()==2000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ) and c:IsFaceup()
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(s.spfilter,1,nil,tp)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930101) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_HAND+LOCATION_DECK,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND+LOCATION_DECK)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_HAND+LOCATION_DECK,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_RITUAL,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    \ No newline at end of file
    expansions/script/c29930101.lua deleted 100644 → 0
    View file @ 930ce326
    --雪昼 符讴玹狐 LV2
    local s,id,o=GetID()
    function s.initial_effect(c)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930100,29930102}
    s.lvdn={29930100}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930100 or code2==29930100)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCode(EVENT_PHASE+PHASE_END)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(2222)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,2,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return tp==Duel.GetTurnPlayer()
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930102) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.GetLocationCountFromEx(tp,tp,nil,c)>0
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_LINK,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    expansions/script/c29930102.lua deleted 100644 → 0
    View file @ 930ce326
    --雪昼 符讴玹狐 LV3
    local s,id,o=GetID()
    function s.initial_effect(c)
    --link summon
    c:EnableReviveLimit()
    aux.AddLinkProcedure(c,s.chk,9,9)
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930101,29930111}
    s.lvdn={29930100,29930101}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.chk(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930101 or code2==29930101)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(24,0,aux.Stringid(id,0))
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_TO_HAND)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(3333)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,3,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c,tp)
    return c:IsPreviousControler(tp) and c:IsPreviousLocation(LOCATION_MZONE)
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH) and c:IsLevel(2)
    and c:GetAttack()<500
    and c:IsPreviousPosition(POS_FACEUP) and c:IsControler(tp)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(s.cfilter,1,nil,tp)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930111) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    expansions/script/c29930111.lua deleted 100644 → 0
    View file @ 930ce326
    --雪昼 符讴玹狐 LV6
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930000,29930001,29930002)
    --fusion material
    aux.AddFusionProcFunRep(c,s.ffilter,9,true)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930102,29930112}
    s.lvdn={29930100,29930101,29930102}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930102 or code2==29930102)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(6666)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    --revive
    local e6=Effect.CreateEffect(c)
    e6:SetDescription(aux.Stringid(id,2))
    e6:SetType(EFFECT_TYPE_QUICK_O)
    e6:SetCode(EVENT_FREE_CHAIN)
    e6:SetRange(LOCATION_MZONE)
    e6:SetCountLimit(1)
    e6:SetTarget(s.retarget)
    e6:SetOperation(s.reoperation)
    c:RegisterEffect(e6)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,6,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c)
    local b1=c:GetBaseAttack()==1500 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsLevel(4) and c:IsType(TYPE_SYNCHRO)
    local b2=c:IsOriginalCodeRule(29930000,299930001,29930002)
    return c:IsFaceup()
    and (b1 or b2)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()~=tp
    and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930112) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 then
    Duel.SpecialSummon(g,SUMMON_TYPE_SYNCHRO,tp,tp,false,false,POS_FACEUP)
    end
    end
    end
    expansions/script/c29930112.lua deleted 100644 → 0
    View file @ 930ce326
    --墨夜 结抒谧狐 LV7
    local s,id,o=GetID()
    function s.initial_effect(c)
    --fusion material
    aux.AddSynchroProcedure(c,nil,s.ffilter,9,9)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930111,29930113}
    s.lvdn={29930100,29930101,29930102,29930111}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930111 or code2==29930111)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --level up
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetCategory(CATEGORY_TOGRAVE+CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_QUICK_O)
    e2:SetCode(EVENT_FREE_CHAIN)
    e2:SetRange(LOCATION_MZONE)
    e2:SetCondition(s.condition)
    e2:SetTarget(s.sptg1)
    e2:SetOperation(s.spop1)
    c:RegisterEffect(e2)
    --atk&def
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_SET_BASE_ATTACK)
    e3:SetValue(7777)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e4)
    --avoid
    local e5=Effect.CreateEffect(c)
    e5:SetType(EFFECT_TYPE_SINGLE)
    e5:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e5:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e5:SetRange(LOCATION_MZONE)
    e5:SetValue(s.ctval)
    c:RegisterEffect(e5)
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_SINGLE)
    e6:SetCode(EFFECT_IMMUNE_EFFECT)
    e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e6:SetRange(LOCATION_MZONE)
    e6:SetValue(s.efilter)
    c:RegisterEffect(e6)
    --revive
    local e7=Effect.CreateEffect(c)
    e7:SetDescription(aux.Stringid(id,2))
    e7:SetType(EFFECT_TYPE_QUICK_O)
    e7:SetCode(EVENT_FREE_CHAIN)
    e7:SetRange(LOCATION_MZONE)
    e7:SetCountLimit(1)
    e7:SetTarget(s.retarget)
    e7:SetOperation(s.reoperation)
    c:RegisterEffect(e7)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,7,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.cfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
    end
    function s.spfilterlv(c,e,tp)
    return c:IsCode(29930113) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function s.sptg1(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return c:IsAbleToGrave() and Duel.GetMZoneCount(tp,c)>0
    and Duel.IsExistingMatchingCard(s.spfilterlv,tp,LOCATION_EXTRA,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,c,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function s.spop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 and c:IsLocation(LOCATION_GRAVE) and Duel.GetMZoneCount(tp)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,s.spfilterlv,tp,LOCATION_EXTRA,0,1,1,nil,e,tp)
    if #g>0 and Duel.SpecialSummon(g,SUMMON_TYPE_XYZ,tp,tp,false,false,POS_FACEUP)>0 then
    Duel.BreakEffect()
    end
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_SKIP_BP)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e1:SetTargetRange(0,1)
    e1:SetLabel(Duel.GetTurnCount())
    e1:SetCondition(s.skipcon)
    e1:SetReset(RESET_PHASE+PHASE_BATTLE+RESET_SELF_TURN,1)
    Duel.RegisterEffect(e1,tp)
    end
    end
    function s.skipcon(e)
    return Duel.GetTurnCount()~=e:GetLabel()
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    expansions/script/c29930113.lua deleted 100644 → 0
    View file @ 930ce326
    --雪昼 符讴玹狐 RagingLV9/九玉 星兽魄主
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930140)
    --fusion material
    aux.AddXyzProcedureLevelFree(c,s.ffilter,nil,9,9,nil,nil,nil)
    c:EnableReviveLimit()
    --evo
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetCondition(s.gaincon)
    e1:SetOperation(s.gainop)
    c:RegisterEffect(e1)
    --cannot be material
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e2:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
    e2:SetValue(s.fuslimit)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_CANNOT_BE_SYNCHRO_MATERIAL)
    e3:SetValue(1)
    c:RegisterEffect(e3)
    local e4=e3:Clone()
    e4:SetCode(EFFECT_CANNOT_BE_XYZ_MATERIAL)
    c:RegisterEffect(e4)
    local e5=e3:Clone()
    e5:SetCode(EFFECT_CANNOT_BE_LINK_MATERIAL)
    c:RegisterEffect(e5)
    end
    s.lvup={29930112}
    s.lvdn={29930100,29930101,29930102,29930111,29930112}
    function s.fuslimit(e,c,sumtype)
    return sumtype&SUMMON_TYPE_FUSION==SUMMON_TYPE_FUSION
    end
    function s.ffilter(c)
    return c:GetOriginalLevel()==999 and c:GetRace()==RACE_BEAST and c:GetAttribute()==ATTRIBUTE_EARTH
    end
    function s.gaincon(e,tp,eg,ep,ev,re,r,rp)
    local code1,code2=Duel.GetChainInfo(ev,CHAININFO_TRIGGERING_CODE,CHAININFO_TRIGGERING_CODE2)
    return re and (code1==29930112 or code2==29930112)
    end
    function s.gainop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    Duel.Hint(24,0,aux.Stringid(id,0))
    Duel.Hint(HINT_MUSIC,0,aux.Stringid(id,6))
    --indes
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    c:RegisterEffect(e1)
    --Attribute&Race ALL
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e2:SetCode(EFFECT_ADD_ATTRIBUTE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetValue(ATTRIBUTE_ALL)
    c:RegisterEffect(e2)
    local e3=e2:Clone()
    e3:SetCode(EFFECT_ADD_RACE)
    e3:SetValue(RACE_ALL)
    c:RegisterEffect(e3)
    --atk&def
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetCode(EFFECT_SET_BASE_ATTACK)
    e4:SetValue(9999)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e4)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_SET_BASE_DEFENSE)
    c:RegisterEffect(e5)
    -- ultraavoid
    local e6=Effect.CreateEffect(c)
    e6:SetType(EFFECT_TYPE_FIELD)
    e6:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
    e6:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
    e6:SetRange(LOCATION_MZONE)
    e6:SetTargetRange(LOCATION_MZONE,0)
    e6:SetTarget(s.indtg)
    e6:SetValue(s.tgval)
    c:RegisterEffect(e6)
    local e7=Effect.CreateEffect(c)
    e7:SetType(EFFECT_TYPE_SINGLE)
    e7:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_CAN_FORBIDDEN)
    e7:SetCode(EFFECT_IMMUNE_EFFECT)
    e7:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e7:SetRange(LOCATION_MZONE)
    e7:SetValue(s.efilter)
    c:RegisterEffect(e7)
    --revive
    local e8=Effect.CreateEffect(c)
    e8:SetDescription(aux.Stringid(id,1))
    e8:SetType(EFFECT_TYPE_QUICK_O)
    e8:SetCode(EVENT_FREE_CHAIN)
    e8:SetRange(LOCATION_MZONE)
    e8:SetCountLimit(1)
    e8:SetTarget(s.retarget)
    e8:SetOperation(s.reoperation)
    c:RegisterEffect(e8)
    --9combo attack
    local e9=Effect.CreateEffect(c)
    e9:SetType(EFFECT_TYPE_SINGLE)
    e9:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
    e9:SetRange(LOCATION_MZONE)
    e9:SetCode(EFFECT_EXTRA_ATTACK_MONSTER)
    e9:SetValue(8)
    c:RegisterEffect(e9)
    --power gain
    local e10=Effect.CreateEffect(c)
    e10:SetDescription(aux.Stringid(id,2))
    e10:SetCategory(CATEGORY_ATKCHANGE)
    e10:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e10:SetCode(EVENT_ATTACK_ANNOUNCE)
    e10:SetCondition(s.atkcon)
    e10:SetOperation(s.atkop)
    c:RegisterEffect(e10)
    --genesis remake
    local e11=Effect.CreateEffect(c)
    e11:SetDescription(aux.Stringid(id,3))
    e11:SetCategory(CATEGORY_TODECK)
    e11:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e11:SetCode(EVENT_PHASE+PHASE_BATTLE)
    e11:SetCountLimit(1)
    e11:SetRange(LOCATION_MZONE)
    e11:SetCondition(s.tdcon)
    e11:SetTarget(s.tdtg)
    e11:SetOperation(s.tdop)
    c:RegisterEffect(e11)
    --tohand
    local e12=Effect.CreateEffect(c)
    e12:SetDescription(aux.Stringid(id,4))
    e12:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e12:SetType(EFFECT_TYPE_IGNITION)
    e12:SetRange(LOCATION_MZONE)
    e12:SetTarget(s.thtg)
    e12:SetOperation(s.thop)
    c:RegisterEffect(e12)
    end
    function s.ctval(e,re,rp)
    return aux.tgoval(e,re,rp) and re:IsActiveType(TYPE_TRAP)
    end
    function s.refilter(c)
    return (c:IsLocation(LOCATION_REMOVED) or c:IsLocation(LOCATION_GRAVE)) and c:IsAbleToDeck()
    end
    function s.retarget(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.refilter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,1,tp,LOCATION_GRAVE+LOCATION_REMOVED)
    end
    function s.reoperation(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.refilter),tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,9,nil)
    if g:GetCount()>0 then
    Duel.HintSelection(g)
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    end
    end
    function s.indtg(e,c)
    return c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and (c:IsType(TYPE_XYZ) or c:IsType(TYPE_SYNCHRO))
    end
    function s.tgval(e,re,rp)
    return re:IsActiveType(TYPE_TRAP+TYPE_MONSTER) and rp==1-e:GetHandlerPlayer()
    end
    function s.efilter(e,te)
    return te:IsActiveType(TYPE_TRAP) and te:GetOwnerPlayer()~=e:GetHandlerPlayer()
    end
    function s.atkcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c==Duel.GetAttacker() and Duel.GetAttackTarget()~=nil or c==Duel.GetAttackTarget()
    end
    function s.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    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(1111)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_UPDATE_DEFENSE)
    c:RegisterEffect(e2)
    end
    end
    function s.tdcon(e,tp,eg,ep,ev,re,r,rp)
    return e:GetHandler():GetBattledGroupCount()>0
    end
    function s.tdtg(e,tp,eg,ep,ev,re,r,rp,chk)
    local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
    if chk==0 then return #g>0 end
    Duel.SetOperationInfo(0,CATEGORY_TODECK,g,#g,0,LOCATION_ONFIELD)
    end
    function s.tdop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_ONFIELD,nil)
    if #g>0 then
    Duel.Hint(24,0,aux.Stringid(id,5))
    Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_RULE)
    end
    end
    function s.thfilter(c)
    return c:IsCode(29930140) 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>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    expansions/script/c29930140.lua deleted 100644 → 0
    View file @ 930ce326
    --寄阳弦以千愿 双影蹴
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930113)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetTarget(s.target)
    e1:SetOperation(s.activate)
    c:RegisterEffect(e1)
    --oru charge
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,id)
    e2:SetCondition(s.matcon)
    e2:SetTarget(s.mattg)
    e2:SetOperation(s.matop)
    c:RegisterEffect(e2)
    --act in hand
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_TRAP_ACT_IN_HAND)
    e3:SetCondition(s.con)
    c:RegisterEffect(e3)
    end
    function s.con(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
    end
    function s.filter(c)
    return c:IsFaceup() and c:IsCode(29930113)
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.filter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.filter,tp,LOCATION_MZONE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,s.filter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function s.activate(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    tc:IsRelateToEffect(e)
    --disable&cannot activate
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_FIELD)
    e1:SetCode(EFFECT_CANNOT_ACTIVATE)
    e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET+EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetRange(LOCATION_MZONE)
    e1:SetTargetRange(0,1)
    e1:SetCondition(s.actcon)
    e1:SetValue(s.actlimit)
    e1:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e1,tp)
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    e2:SetCode(EVENT_ATTACK_ANNOUNCE)
    e2:SetRange(LOCATION_MZONE)
    e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e2:SetCondition(s.discon)
    e2:SetOperation(s.disop)
    e2:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e2,tp)
    local e3=e2:Clone()
    e3:SetCode(EVENT_BE_BATTLE_TARGET)
    Duel.RegisterEffect(e3,tp)
    local e4=Effect.CreateEffect(e:GetHandler())
    e4:SetType(EFFECT_TYPE_FIELD)
    e4:SetCode(EFFECT_DISABLE)
    e4:SetRange(LOCATION_MZONE)
    e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e4:SetTargetRange(0,LOCATION_MZONE)
    e4:SetTarget(s.distg)
    e4:SetReset(RESET_PHASE+PHASE_END)
    Duel.RegisterEffect(e4,tp)
    local e5=e4:Clone()
    e5:SetCode(EFFECT_DISABLE_EFFECT)
    Duel.RegisterEffect(e5,tp)
    end
    function s.actcon(e)
    local a=Duel.GetAttacker()
    local tp=e:GetHandlerPlayer()
    return a and a:IsControler(tp) and a:IsRace(RACE_BEAST) and
    (a:IsType(TYPE_SYNCHRO) or a:IsType(TYPE_XYZ))
    end
    function s.actlimit(e,re,tp)
    return re:IsActiveType(TYPE_TRAP+TYPE_MONSTER)
    end
    function s.cfilter(c,tp)
    return c:IsFaceup() and c:IsRace(RACE_BEAST) and
    (c:IsType(TYPE_SYNCHRO) or c:IsType(TYPE_XYZ)) and c:IsControler(tp)
    end
    function s.discon(e,tp,eg,ep,ev,re,r,rp)
    local c=Duel.GetAttackTarget()
    if not c then return false end
    if c:IsControler(1-tp) then c=Duel.GetAttacker() end
    return c and s.cfilter(c,tp)
    end
    function s.disop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetAttackTarget()
    if tc:IsControler(tp) then tc=Duel.GetAttacker() end
    tc:RegisterFlagEffect(id,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_BATTLE,0,1)
    Duel.AdjustInstantly(c)
    end
    function s.distg(e,c)
    return c:GetFlagEffect(id)~=0
    end
    function s.matfilter(c)
    return c:IsFaceup() and c:IsCode(29930113)
    end
    function s.matcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.IsExistingMatchingCard(s.matfilter,tp,LOCATION_ONFIELD,0,1,nil)
    end
    function s.xyzfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.mfilter(c)
    return c:IsType(TYPE_MONSTER) and c:IsRace(RACE_BEAST) and c:IsCanOverlay()
    end
    function s.mattg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsPosition(LOCATION_MZONE) and s.xyzfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.xyzfilter,tp,LOCATION_MZONE,0,1,nil)
    and Duel.IsExistingMatchingCard(s.mfilter,tp,LOCATION_GRAVE,0,1,e:GetHandler()) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
    Duel.SelectTarget(tp,s.xyzfilter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function s.matop(e,tp,eg,ep,ev,re,r,rp)
    local tc=Duel.GetFirstTarget()
    if tc:IsFaceup() and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_XMATERIAL)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(s.mfilter),tp,LOCATION_GRAVE,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.Overlay(tc,g)
    end
    end
    end
    expansions/script/c29930141.lua deleted 100644 → 0
    View file @ 930ce326
    --千战百炼 于此时入局
    local s,id,o=GetID()
    function s.initial_effect(c)
    aux.AddCodeList(c,29930100)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCost(s.cost)
    e1:SetTarget(s.target)
    e1:SetOperation(s.activate)
    c:RegisterEffect(e1)
    --overlay
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(id,1))
    e2:SetType(EFFECT_TYPE_IGNITION)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,id)
    e2:SetTarget(s.ovtg)
    e2:SetOperation(s.ovop)
    c:RegisterEffect(e2)
    --act in hand
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_TRAP_ACT_IN_HAND)
    e3:SetCondition(s.con)
    c:RegisterEffect(e3)
    end
    function s.con(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetTurnPlayer()==e:GetHandlerPlayer()
    end
    function s.costfilter(c,tp)
    return c:IsFaceup() and c:IsRace(RACE_BEAST) and c:IsType(TYPE_XYZ)
    and c:CheckRemoveOverlayCard(tp,1,REASON_COST)
    end
    function s.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.costfilter,tp,LOCATION_MZONE,0,1,nil,tp) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DEATTACHFROM)
    local tc=Duel.SelectMatchingCard(tp,s.costfilter,tp,LOCATION_MZONE,0,1,1,nil,tp):GetFirst()
    tc:RemoveOverlayCard(tp,1,1,REASON_COST)
    end
    function s.filter(c)
    return c:IsCode(29930100) and c:IsAbleToHand()
    end
    function s.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(s.filter,tp,LOCATION_DECK,0,1,nil) end
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    end
    function s.activate(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,s.filter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function s.ovfilter(c)
    return c:IsFaceup() and not c:IsSetCard(0x48) and
    c:GetBaseAttack()==1000 and c:GetBaseDefense()==1000
    and c:IsRace(RACE_BEAST) and c:IsAttribute(ATTRIBUTE_EARTH)
    and c:IsRank(2) and c:IsType(TYPE_XYZ)
    end
    function s.ovtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and s.ovfilter(chkc) end
    if chk==0 then return Duel.IsExistingTarget(s.ovfilter,tp,LOCATION_MZONE,0,1,nil)
    and e:GetHandler():IsCanOverlay() end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,s.ovfilter,tp,LOCATION_MZONE,0,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function s.ovop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and c:IsCanOverlay() and tc:IsRelateToEffect(e) and not c:IsImmuneToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    expansions/script/c96077000.lua deleted 100644 → 0
    View file @ 930ce326
    --The world of AI
    local m=96077000
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    --Activate
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetCountLimit(3,m)
    e1:SetTarget(cm.target)
    c:RegisterEffect(e1)
    end
    function cm.thfilter(c)
    return aux.IsCodeListed(c,96077000) and c:IsAbleToHand() and c:IsType(TYPE_MONSTER)
    end
    function cm.spfilter(c,e,tp)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.mdfilter(c)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsAbleToHand()
    end
    function cm.cwfilter(c)
    return aux.IsCodeListed(c,96077000) and c:IsAbleToDeck()
    end
    --Activate
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local b1=Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK,0,1,nil,e,tp)
    local b2=Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp)
    local b3=Duel.IsExistingMatchingCard(cm.mdfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp)
    local b4=Duel.IsExistingMatchingCard(cm.cwfilter,tp,LOCATION_REMOVED,0,2,2,nil,e,tp)
    if chk==0 then return b1 or b2 or b3 or b4 end
    local off=1
    local ops={}
    local opval={}
    if b1 then
    ops[off]=aux.Stringid(m,0)
    opval[off-1]=1
    off=off+1
    end
    if b2 then
    ops[off]=aux.Stringid(m,1)
    opval[off-1]=2
    off=off+1
    end
    if b3 then
    ops[off]=aux.Stringid(m,2)
    opval[off-1]=3
    off=off+1
    end
    if b4 then
    ops[off]=aux.Stringid(m,3)
    opval[off-1]=4
    off=off+1
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
    local op=Duel.SelectOption(tp,table.unpack(ops))
    if opval[op]==1 then
    e:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e:SetOperation(cm.thop)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK)
    elseif opval[op]==2 then
    e:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e:SetOperation(cm.spop)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
    elseif opval[op]==3 then
    e:SetCategory(CATEGORY_TOHAND)
    e:SetOperation(cm.hthop)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_GRAVE)
    elseif opval[op]==4 then
    if chk==0 then return chkc:IsLocation(LOCATION_REMOVED) and chkc:IsControler(tp) and cm.cwfilter(chkc) end
    if chk==0 then return Duel.IsPlayerCanDraw(tp,1)
    and Duel.IsExistingTarget(cm.cwfilter,tp,LOCATION_REMOVED,0,2,nil) end
    local g=Duel.SelectTarget(tp,cm.cwfilter,tp,LOCATION_REMOVED,0,2,2,nil)
    e:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
    e:SetOperation(cm.tdop)
    Duel.SetOperationInfo(0,CATEGORY_TODECK,nil,2,tp,LOCATION_REMOVED)
    Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
    end
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    end
    end
    function cm.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,cm.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
    function cm.hthop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,aux.NecroValleyFilter(cm.mdfilter),tp,LOCATION_GRAVE,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    function cm.tdop(e,tp,eg,ep,ev,re,r,rp)
    local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
    if not e:GetHandler():IsRelateToEffect(e) or not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=2 then return end
    Duel.SendtoDeck(tg,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
    local g=Duel.GetOperatedGroup()
    if g:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then Duel.ShuffleDeck(tp) end
    local ct=g:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
    if ct==2 then
    Duel.BreakEffect()
    Duel.Draw(tp,1,REASON_EFFECT)
    end
    end
    \ No newline at end of file
    expansions/script/c96077001.lua deleted 100644 → 0
    View file @ 930ce326
    --赤魔导士
    local m=96077001
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --to field
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_IGNITION)
    e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e1:SetCountLimit(1,m)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    --spsummon from szone
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,1))
    e4:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e4:SetType(EFFECT_TYPE_QUICK_O)
    e4:SetRange(LOCATION_SZONE)
    e4:SetCode(EVENT_FREE_CHAIN)
    e4:SetCountLimit(1,96077002)
    e4:SetHintTiming(0,TIMING_MAIN_END)
    e4:SetCondition(cm.spcon)
    e4:SetTarget(cm.sptg)
    e4:SetOperation(cm.spop)
    c:RegisterEffect(e4)
    end
    --to field
    function cm.cfilter(c)
    return c:IsCode(96077000) and not c:IsPublic()
    end
    function cm.cost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
    local g=Duel.SelectMatchingCard(tp,cm.cfilter,tp,LOCATION_HAND,0,1,1,nil)
    Duel.ConfirmCards(1-tp,g)
    Duel.ShuffleHand(tp)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    if Duel.MoveToField(c,tp,tp,LOCATION_SZONE,POS_FACEUP,true) then
    local e1=Effect.CreateEffect(c)
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
    e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
    c:RegisterEffect(e1)
    end
    end
    --spsummon from szone
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    local ph=Duel.GetCurrentPhase()
    return (ph==PHASE_MAIN1 or ph==PHASE_MAIN2) and e:GetHandler():GetType()==TYPE_TRAP+TYPE_CONTINUOUS
    end
    function cm.sfilter(c,e,tp)
    return c:IsLocation(LOCATION_SZONE) and c:GetOriginalType()&TYPE_MONSTER>0
    and c:IsFaceup() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.sfilter,tp,LOCATION_SZONE,0,1,nil,e,tp) end
    local g=Duel.GetMatchingGroup(cm.sfilter,tp,LOCATION_SZONE,0,nil,e,tp)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,g,1,0,0)
    end
    function cm.filter(c)
    return (c:IsCode(96077000) or aux.IsCodeListed(c,96077000)) and c:IsAbleToHand()
    and c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.sfilter,tp,LOCATION_SZONE,0,1,1,nil,e,tp)
    Duel.SpecialSummon(g,0,tp,tp,false,false,POS_FACEUP)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.BreakEffect()
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    \ No newline at end of file
    expansions/script/c96077003.lua deleted 100644 → 0
    View file @ 930ce326
    --宇宙英雄
    local m=96077003
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --fusion summon
    local e1=Effect.CreateEffect(c)
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e1:SetProperty(EFFECT_FLAG_DELAY)
    e1:SetCode(EVENT_SUMMON_SUCCESS)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.condition)
    e1:SetCost(cm.cost)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.activate)
    c:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    c:RegisterEffect(e2)
    --Special Summon (from hand : itself)
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,1))
    e3:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e3:SetCode(EVENT_ATTACK_ANNOUNCE)
    e3:SetRange(LOCATION_HAND)
    e3:SetCountLimit(1,96077004)
    e3:SetCondition(cm.spcon)
    e3:SetTarget(cm.sptg)
    e3:SetOperation(cm.spop)
    c:RegisterEffect(e3)
    end
    --fusion summon
    function cm.condition(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)==0
    end
    function cm.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 cm.filter0(c)
    return c:IsFaceup() and c:IsCanBeFusionMaterial()
    end
    function cm.filter1(c,e)
    return not c:IsImmuneToEffect(e)
    end
    function cm.filter2(c,e,tp,m,f,gc,chkf)
    return c:IsType(TYPE_FUSION) and (not f or f(c))
    and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) and c:CheckFusionMaterial(m,gc,chkf)
    end
    function cm.chkfilter(c,tp)
    return c:IsOnField() and c:IsControler(tp)
    end
    function cm.fcheck(c)
    return function(tp,sg,fc)
    return not sg:IsExists(cm.chkfilter,1,c,tp)
    end
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then
    local chkf=tp
    local mg1=Duel.GetFusionMaterial(tp):Filter(Card.IsOnField,nil)
    local mg2=Duel.GetMatchingGroup(cm.filter0,tp,0,LOCATION_MZONE,nil)
    if mg2:GetCount()>0 then
    mg1:Merge(mg2)
    end
    local res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg1,nil,c,chkf)
    if not res then
    local ce=Duel.GetChainMaterial(tp)
    if ce~=nil then
    local fgroup=ce:GetTarget()
    local mg3=fgroup(ce,e,tp)
    local mf=ce:GetValue()
    res=Duel.IsExistingMatchingCard(cm.filter2,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg3,mf,c,chkf)
    end
    end
    return res
    end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
    end
    function cm.activate(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local chkf=tp
    if Duel.GetCurrentPhase()&(PHASE_DAMAGE+PHASE_DAMAGE_CAL)~=0 then return end
    if not c:IsRelateToEffect(e) or c:IsImmuneToEffect(e) then return end
    local mg1=Duel.GetFusionMaterial(tp):Filter(Card.IsOnField,nil):Filter(cm.filter1,nil,e)
    local mg2=Duel.GetMatchingGroup(cm.filter0,tp,0,LOCATION_MZONE,nil):Filter(cm.filter1,nil,e)
    if mg2:GetCount()>0 then
    mg1:Merge(mg2)
    end
    local sg1=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg1,nil,c,chkf)
    local mg3=nil
    local sg2=nil
    local ce=Duel.GetChainMaterial(tp)
    if ce~=nil then
    local fgroup=ce:GetTarget()
    mg3=fgroup(ce,e,tp)
    local mf=ce:GetValue()
    sg2=Duel.GetMatchingGroup(cm.filter2,tp,LOCATION_EXTRA,0,nil,e,tp,mg3,mf,c,chkf)
    end
    if sg1:GetCount()>0 or (sg2~=nil and sg2:GetCount()>0) then
    local sg=sg1:Clone()
    if sg2 then sg:Merge(sg2) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local tg=sg:Select(tp,1,1,nil)
    local tc=tg:GetFirst()
    if sg1:IsContains(tc) and (sg2==nil or not sg2:IsContains(tc) or not Duel.SelectYesNo(tp,ce:GetDescription())) then
    local mat1=Duel.SelectFusionMaterial(tp,tc,mg1,c,chkf)
    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)
    else
    local mat2=Duel.SelectFusionMaterial(tp,tc,mg3,c,chkf)
    local fop=ce:GetOperation()
    fop(ce,e,tp,tc,mat2)
    end
    tc:CompleteProcedure()
    end
    end
    --Special Summon (from hand : itself)
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetAttacker():IsControler(1-tp)
    end
    function cm.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 cm.filter(c)
    return (c:IsCode(96077000) or aux.IsCodeListed(c,96077000)) and c:IsAbleToHand()
    and c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    if Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP_DEFENSE) then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.BreakEffect()
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    end
    Duel.SpecialSummonComplete()
    end
    \ No newline at end of file
    expansions/script/c96077005.lua deleted 100644 → 0
    View file @ 930ce326
    --耀光翔龙
    local m=96077005
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --special summon other monsters
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetCondition(cm.spcon)
    e1:SetCost(cm.spcost)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --spsummon
    local e2=Effect.CreateEffect(c)
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCode(EVENT_RELEASE)
    e2:SetCountLimit(1,96077006)
    e2:SetTarget(cm.suptg)
    e2:SetOperation(cm.supop)
    c:RegisterEffect(e2)
    end
    --special summon other monsters
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
    end
    function cm.spcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsReleasable() end
    Duel.Release(e:GetHandler(),REASON_COST)
    end
    function cm.spfilter(c,e,tp)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    local c=e:GetHandler()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.spfilter,tp,LOCATION_DECK+LOCATION_EXTRA+LOCATION_GRAVE,0,1,1,nil,e,tp)
    if g:GetCount()>0 then
    local tc=g:GetFirst()
    if Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_INDESTRUCTABLE_BATTLE)
    e1:SetValue(1)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
    e2:SetValue(1)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e2)
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE)
    e3:SetCode(EFFECT_DISABLE)
    e3:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e3)
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE)
    e4:SetCode(EFFECT_DISABLE_EFFECT)
    e4:SetValue(RESET_TURN_SET)
    e4:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e4)
    end
    Duel.SpecialSummonComplete()
    end
    end
    --spsummon
    function cm.suptg(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.Hint(HINT_SELECTMSG,tp,HINGMSG_LVRANK)
    local lv=Duel.AnnounceLevel(tp,1,5)
    e:SetLabel(lv)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.filter(c)
    return (c:IsCode(96077000) or aux.IsCodeListed(c,96077000)) and c:IsAbleToHand()
    and c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.supop(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_CHANGE_LEVEL)
    e1:SetValue(e:GetLabel())
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e1)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.BreakEffect()
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    Duel.SpecialSummonComplete()
    end
    end
    \ No newline at end of file
    expansions/script/c96077007.lua deleted 100644 → 0
    View file @ 930ce326
    --胜利皇 维特利
    local m=96077007
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --disable attack
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_ATTACK_ANNOUNCE)
    e1:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e1:SetCountLimit(1)
    e1:SetCost(cm.atkcost)
    e1:SetTarget(cm.atktg)
    e1:SetOperation(cm.atkop)
    c:RegisterEffect(e1)
    --FUSION Summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_SPSUMMON_SUCCESS)
    e2:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e2:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e2:SetCountLimit(1,96077008)
    e2:SetCondition(cm.spcon)
    e2:SetTarget(cm.sptg)
    e2:SetOperation(cm.spop)
    c:RegisterEffect(e2)
    --SYNCHRO Summon
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,2))
    e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e3:SetCode(EVENT_SPSUMMON_SUCCESS)
    e3:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e3:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e3:SetCountLimit(1,96077008)
    e3:SetCondition(cm.eqcon)
    e3:SetTarget(cm.eqtg)
    e3:SetOperation(cm.eqop)
    c:RegisterEffect(e3)
    --XYZ Summon
    local e4=Effect.CreateEffect(c)
    e4:SetDescription(aux.Stringid(m,3))
    e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e4:SetCode(EVENT_SPSUMMON_SUCCESS)
    e4:SetProperty(EFFECT_FLAG_CARD_TARGET+EFFECT_FLAG_DELAY)
    e4:SetRange(LOCATION_HAND+LOCATION_GRAVE)
    e4:SetCountLimit(1,96077008)
    e4:SetCondition(cm.matcon)
    e4:SetTarget(cm.mattg)
    e4:SetOperation(cm.matop)
    c:RegisterEffect(e4)
    end
    --disable attack
    function cm.cosfilter(c)
    return c:IsCode(96077000) and c:IsDiscardable()
    end
    function cm.atkcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.cosfilter,tp,LOCATION_HAND,0,1,nil) end
    Duel.DiscardHand(tp,cm.cosfilter,1,1,REASON_COST+REASON_DISCARD)
    end
    function cm.atktg(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 cm.atkop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    if Duel.NegateAttack() then
    Duel.BreakEffect()
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_UPDATE_ATTACK)
    e1:SetValue(2500)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    c:RegisterEffect(e1)
    end
    Duel.SpecialSummonComplete()
    end
    --FUSION Summon
    function cm.cfilter(c,e,tp,se)
    return c:IsFaceup() and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_FUSION) and c:IsControler(tp) and c:IsCanBeEffectTarget(e)
    end
    function cm.spcon(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.cfilter,1,nil,e,tp,se)
    end
    function cm.tgfilter(c,tp,eg)
    return c:IsFaceup() and c:IsType(TYPE_MONSTER) and c:IsControler(tp)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.tgfilter(chkc,tp,eg) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and e:GetHandler():IsCanBeSpecialSummoned(e,0,tp,false,false) end
    Duel.Hint(HINT_SELECTMSG,tp,HINGMSG_LVRANK)
    local lv=Duel.AnnounceLevel(tp,1,5)
    e:SetLabel(lv)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,e:GetHandler(),1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SpecialSummonStep(c,0,tp,tp,false,false,POS_FACEUP) then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_ADD_TYPE)
    e1:SetValue(TYPE_TUNER)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_CHANGE_LEVEL)
    e2:SetValue(e:GetLabel())
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e2)
    end
    Duel.SpecialSummonComplete()
    end
    --SYNCHRO Summon
    function cm.eqfilter(c,e,tp,se)
    return c:IsFaceup() and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_SYNCHRO) and c:IsControler(tp) and c:IsCanBeEffectTarget(e)
    end
    function cm.eqcon(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.eqfilter,1,nil,e,tp,se)
    end
    function cm.zbfilter(c)
    return c:IsFaceup() and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_SYNCHRO)
    end
    function cm.eqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.zbfilter(chkc) end
    if chk==0 then return Duel.GetLocationCount(tp,LOCATION_SZONE)>0
    and Duel.IsExistingTarget(cm.zbfilter,tp,LOCATION_MZONE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EQUIP)
    Duel.SelectTarget(tp,cm.zbfilter,tp,LOCATION_MZONE,0,1,1,nil)
    end
    function cm.eqop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    if c:IsLocation(LOCATION_MZONE) and c:IsFacedown() then return end
    local tc=Duel.GetFirstTarget()
    if Duel.GetLocationCount(tp,LOCATION_SZONE)<=0 or tc:IsControler(1-tp) or tc:IsFacedown() or not tc:IsRelateToEffect(e) or not c:CheckUniqueOnField(tp) then
    Duel.SendtoGrave(c,REASON_EFFECT)
    return
    end
    cm.zw_equip_monster(c,tp,tc)
    end
    function cm.zw_equip_monster(c,tp,tc)
    if not Duel.Equip(tp,c,tc) then return end
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_EQUIP_LIMIT)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetValue(cm.eqlimit)
    e1:SetLabelObject(tc)
    c:RegisterEffect(e1)
    --atkup
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_EQUIP)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetValue(2000)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e2)
    end
    function cm.eqlimit(e,c)
    return c==e:GetLabelObject()
    end
    --XYZ Summon
    function cm.clfilter(c,e,tp,se)
    return c:IsFaceup() and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsType(TYPE_XYZ) and c:IsControler(tp) and c:IsCanBeEffectTarget(e)
    and (se==nil or c:GetReasonEffect()~=se)
    end
    function cm.matcon(e,tp,eg,ep,ev,re,r,rp)
    return eg:IsExists(cm.clfilter,1,nil,e,tp,se)
    end
    function cm.matfilter(c,tp,eg)
    return c:IsFaceup() and c:IsType(TYPE_XYZ) and c:IsControler(tp)
    end
    function cm.mattg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and cm.matfilter(chkc) end
    if chk==0 then return not e:GetHandler():IsStatus(STATUS_CHAINING)
    and Duel.IsExistingTarget(cm.matfilter,tp,LOCATION_MZONE,0,1,nil)
    and e:GetHandler():IsCanOverlay() end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
    Duel.SelectTarget(tp,cm.matfilter,tp,LOCATION_MZONE,0,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.matop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local tc=Duel.GetFirstTarget()
    if c:IsRelateToEffect(e) and tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
    Duel.Overlay(tc,Group.FromCards(c))
    end
    end
    \ No newline at end of file
    expansions/script/c96077009.lua deleted 100644 → 0
    View file @ 930ce326
    --数码访问龙
    local m=96077009
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --special summon
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_TOHAND)
    e1:SetType(EFFECT_TYPE_QUICK_O)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetRange(LOCATION_HAND)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.sptg)
    e1:SetOperation(cm.spop)
    c:RegisterEffect(e1)
    --Link special summon
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e2:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
    e2:SetCode(EVENT_CUSTOM+m)
    e2:SetRange(LOCATION_GRAVE)
    e2:SetCountLimit(1,96077010)
    e2:SetCondition(cm.lkcon)
    e2:SetTarget(cm.lktg)
    e2:SetOperation(cm.lkop)
    c:RegisterEffect(e2)
    if not cm.global_check then
    cm.global_check=true
    local ge1=Effect.CreateEffect(c)
    ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
    ge1:SetCode(EVENT_BATTLE_DESTROYED)
    ge1:SetCondition(cm.regcon)
    ge1:SetOperation(cm.regop)
    Duel.RegisterEffect(ge1,0)
    local ge2=ge1:Clone()
    ge2:SetCode(EVENT_TO_GRAVE)
    ge2:SetCondition(cm.regcon2)
    Duel.RegisterEffect(ge2,0)
    end
    end
    function cm.cfilter(c)
    return c:IsPreviousLocation(LOCATION_MZONE) and c:IsPreviousPosition(POS_FACEUP) and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER)
    end
    function cm.regcon(e,tp,eg,ep,ev,re,r,rp)
    if eg:IsExists(cm.cfilter,1,nil) then
    e:SetLabel(PLAYER_ALL)
    return true
    end
    e:SetLabel(PLAYER_NONE)
    return false
    end
    function cm.cfilter2(c,p)
    return not c:IsReason(REASON_BATTLE) and c:IsControler(p) and cm.cfilter(c)
    end
    function cm.regcon2(e,tp,eg,ep,ev,re,r,rp)
    local v=0
    if eg:IsExists(cm.cfilter2,1,nil,0) then v=v+1 end
    if eg:IsExists(cm.cfilter2,1,nil,1) then v=v+2 end
    if v==0 then return false end
    e:SetLabel(({0,1,PLAYER_ALL})[v])
    return true
    end
    function cm.regop(e,tp,eg,ep,ev,re,r,rp)
    Duel.RaiseEvent(eg,EVENT_CUSTOM+m,re,r,rp,ep,e:GetLabel())
    end
    --special summon
    function cm.spfilter(c)
    return aux.IsCodeListed(c,96077000) and c:IsFaceup() and c:IsAbleToHand() and not c:IsCode(m)
    end
    function cm.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
    if chkc then return chkc:IsControler(tp) and chkc:IsLocation(LOCATION_ONFIELD) and cm.spfilter(chkc) end
    local c=e:GetHandler()
    if chk==0 then return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and Duel.IsExistingTarget(cm.spfilter,tp,LOCATION_ONFIELD,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
    local g=Duel.SelectTarget(tp,cm.spfilter,tp,LOCATION_ONFIELD,0,1,1,nil)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,g,1,0,0)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
    end
    function cm.spop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if not c:IsRelateToEffect(e) then return end
    if Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)~=0 then
    local tc=Duel.GetFirstTarget()
    if tc:IsRelateToEffect(e) then
    Duel.SendtoHand(tc,nil,REASON_EFFECT)
    end
    end
    end
    --Link special summon
    function cm.lkcon(e,tp,eg,ep,ev,re,r,rp)
    return ev==tp or ev==PLAYER_ALL
    end
    function cm.lkfilter(c,mc)
    return c:IsLinkSummonable(nil,mc)
    end
    function cm.supfilter(c,e,tp)
    return c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    and Duel.IsExistingMatchingCard(cm.lkfilter,tp,LOCATION_EXTRA,0,1,nil,c)
    end
    function cm.lktg(e,tp,eg,ep,ev,re,r,rp,chk)
    local c=e:GetHandler()
    if chk==0 then return Duel.IsPlayerCanSpecialSummonCount(tp,2)
    and Duel.GetLocationCount(tp,LOCATION_MZONE)>0
    and c:IsCanBeSpecialSummoned(e,0,tp,false,false) and Duel.IsExistingMatchingCard(cm.supfilter,tp,LOCATION_HAND,0,1,nil,e,tp) end
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,c,1,0,0)
    end
    function cm.lkop(e,tp,eg,ep,ev,re,r,rp)
    if Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) then
    Duel.SpecialSummon(c,0,tp,tp,false,false,POS_FACEUP)
    Duel.BreakEffect()
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local g=Duel.SelectMatchingCard(tp,cm.supfilter,tp,LOCATION_HAND,0,1,1,nil,e,tp)
    local tc=g:GetFirst()
    if not tc then return end
    if not Duel.SpecialSummonStep(tc,0,tp,tp,false,false,POS_FACEUP) then
    Duel.SpecialSummonComplete()
    return
    end
    local c=e:GetHandler()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    tc:RegisterEffect(e1)
    local e2=e1:Clone()
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetValue(RESET_TURN_SET)
    tc:RegisterEffect(e2)
    Duel.SpecialSummonComplete()
    Duel.AdjustAll()
    if not tc:IsLocation(LOCATION_MZONE) then return end
    local tg=Duel.GetMatchingGroup(cm.lkfilter,tp,LOCATION_EXTRA,0,nil,tc)
    if tg:GetCount()>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
    local sg=tg:Select(tp,1,1,nil)
    local sc=sg:GetFirst()
    --effect gain
    local e3=Effect.CreateEffect(c)
    e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e3:SetCode(EVENT_BE_PRE_MATERIAL)
    e3:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
    e3:SetCondition(cm.effcon)
    e3:SetOperation(cm.effop2)
    tc:RegisterEffect(e3,true)
    local e4=Effect.CreateEffect(c)
    e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e4:SetCode(EVENT_BE_MATERIAL)
    e4:SetProperty(EFFECT_FLAG_EVENT_PLAYER)
    e4:SetCondition(cm.effcon)
    e4:SetOperation(cm.effop1)
    tc:RegisterEffect(e4,true)
    Duel.LinkSummon(tp,sc,nil,tc)
    end
    end
    end
    function cm.effcon(e,tp,eg,ep,ev,re,r,rp)
    return r==REASON_LINK
    end
    function cm.effop1(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
    e1:SetCode(EVENT_SPSUMMON_SUCCESS)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    e1:SetOperation(cm.sumop)
    rc:RegisterEffect(e1,true)
    e:Reset()
    end
    function cm.chainlm(e,rp,tp)
    return tp==rp
    end
    function cm.effop2(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    local rc=c:GetReasonCard()
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_CANNOT_DISABLE_SPSUMMON)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    rc:RegisterEffect(e1,true)
    e:Reset()
    end
    \ No newline at end of file
    expansions/script/c96077011.lua deleted 100644 → 0
    View file @ 930ce326
    --能量重构
    local m=96077011
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --select effect
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetType(EFFECT_TYPE_ACTIVATE)
    e1:SetCode(EVENT_FREE_CHAIN)
    e1:SetTarget(cm.target)
    c:RegisterEffect(e1)
    --act in hand
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_TRAP_ACT_IN_HAND)
    e2:SetCondition(cm.handcon)
    c:RegisterEffect(e2)
    --sset
    local e3=Effect.CreateEffect(c)
    e3:SetDescription(aux.Stringid(m,4))
    e3:SetType(EFFECT_TYPE_IGNITION)
    e3:SetRange(LOCATION_GRAVE)
    e3:SetCondition(aux.exccon)
    e3:SetCost(cm.setcost)
    e3:SetTarget(cm.settg)
    e3:SetOperation(cm.setop)
    c:RegisterEffect(e3)
    end
    --Activate
    function cm.thfilter(c)
    return c:IsCode(96077000) and c:IsAbleToHand()
    end
    function cm.spfilter(c,e,tp)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsCanBeSpecialSummoned(e,0,tp,false,false)
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    local b1=Duel.IsPlayerCanDraw(tp,1)
    local b2=Duel.IsExistingMatchingCard(cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil,e,tp)
    local g=Duel.GetFieldGroup(tp,LOCATION_ONFIELD,LOCATION_ONFIELD)
    local b3=g:GetCount()>0
    local b4=Duel.IsExistingMatchingCard(cm.spfilter,tp,LOCATION_HAND,0,1,nil,e,tp)
    if chk==0 then return b1 or b2 or b3 or b4 end
    local off=1
    local ops={}
    local opval={}
    if b1 then
    ops[off]=aux.Stringid(m,0)
    opval[off-1]=1
    off=off+1
    end
    if b2 then
    ops[off]=aux.Stringid(m,1)
    opval[off-1]=2
    off=off+1
    end
    if b3 then
    ops[off]=aux.Stringid(m,2)
    opval[off-1]=3
    off=off+1
    end
    if b4 then
    ops[off]=aux.Stringid(m,3)
    opval[off-1]=4
    off=off+1
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_EFFECT)
    local op=Duel.SelectOption(tp,table.unpack(ops))
    if opval[op]==1 then
    e:SetCategory(CATEGORY_DRAW)
    e:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
    e:SetOperation(cm.draw)
    Duel.SetTargetPlayer(tp)
    Duel.SetTargetParam(1)
    Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
    elseif opval[op]==2 then
    e:SetCategory(CATEGORY_TOHAND+CATEGORY_SEARCH)
    e:SetOperation(cm.thop)
    Duel.SetOperationInfo(0,CATEGORY_TOHAND,nil,1,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED)
    elseif opval[op]==3 then
    e:SetCategory(CATEGORY_DESTROY)
    e:SetOperation(cm.desop)
    Duel.SetOperationInfo(0,CATEGORY_DESTROY,g,1,0,0)
    elseif opval[op]==4 then
    e:SetCategory(CATEGORY_SPECIAL_SUMMON)
    e:SetOperation(cm.spop)
    Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_HAND)
    end
    end
    function cm.draw(e,tp,eg,ep,ev,re,r,rp)
    local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
    Duel.Draw(p,d,REASON_EFFECT)
    end
    function cm.thop(e,tp,eg,ep,ev,re,r,rp)
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.thfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    end
    end
    function cm.desop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.SelectMatchingCard(tp,nil,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,1,nil)
    if g:GetCount()>0 then
    Duel.Destroy(g,REASON_EFFECT)
    end
    end
    function cm.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,cm.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
    --act in hand
    function cm.hanfilter(c)
    return c:IsFaceup() and aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER)
    end
    function cm.handcon(e)
    return Duel.IsExistingMatchingCard(cm.hanfilter,e:GetHandlerPlayer(),LOCATION_MZONE,0,1,nil)
    end
    --sset
    function cm.ssetfilter(c)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and c:IsAbleToRemoveAsCost()
    end
    function cm.setcost(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.ssetfilter,tp,LOCATION_GRAVE,0,1,nil) end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
    local g=Duel.SelectMatchingCard(tp,cm.ssetfilter,tp,LOCATION_GRAVE,0,1,1,nil)
    Duel.Remove(g,POS_FACEUP,REASON_COST)
    end
    function cm.settg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return e:GetHandler():IsSSetable() end
    Duel.SetOperationInfo(0,CATEGORY_LEAVE_GRAVE,e:GetHandler(),1,0,0)
    end
    function cm.setop(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if c:IsRelateToEffect(e) and Duel.SSet(tp,c)~=0 then
    local e1=Effect.CreateEffect(c)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_TRAP_ACT_IN_SET_TURN)
    e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD)
    c:RegisterEffect(e1)
    end
    end
    \ No newline at end of file
    expansions/script/c96077012.lua deleted 100644 → 0
    View file @ 930ce326
    --宇宙骑士 胜光
    local m=96077012
    local cm=_G["c"..m]
    function cm.initial_effect(c)
    aux.AddCodeList(c,96077000)
    --fusion material
    c:EnableReviveLimit()
    aux.AddFusionProcCodeFun(c,96077003,aux.FilterBoolFunction(Card.IsAttackAbove,2500),1,true,true)
    --place
    local e1=Effect.CreateEffect(c)
    e1:SetDescription(aux.Stringid(m,0))
    e1:SetCategory(CATEGORY_ATKCHANGE)
    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
    e1:SetCode(EVENT_PHASE+PHASE_END)
    e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
    e1:SetRange(LOCATION_MZONE)
    e1:SetCountLimit(1,m)
    e1:SetTarget(cm.target)
    e1:SetOperation(cm.operation)
    c:RegisterEffect(e1)
    --wuxiao
    local e2=Effect.CreateEffect(c)
    e2:SetDescription(aux.Stringid(m,1))
    e2:SetCategory(CATEGORY_DISABLE)
    e2:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_O)
    e2:SetCode(EVENT_LEAVE_FIELD)
    e2:SetProperty(EFFECT_FLAG_DELAY)
    e2:SetCountLimit(1,96077013)
    e2:SetCondition(cm.wxcon)
    e2:SetTarget(cm.wxtg)
    e2:SetOperation(cm.wxop)
    c:RegisterEffect(e2)
    end
    --place
    function cm.filter(c)
    return aux.IsCodeListed(c,96077000) and c:IsType(TYPE_MONSTER) and not c:IsForbidden()
    end
    function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(cm.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,nil)
    and Duel.GetLocationCount(tp,LOCATION_SZONE)>0 end
    end
    function cm.mcfilter(c)
    return c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.operation(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    if Duel.GetLocationCount(tp,LOCATION_SZONE)>0 then
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOFIELD)
    local g=Duel.SelectMatchingCard(tp,cm.filter,tp,LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    local tc=g:GetFirst()
    if tc then
    Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
    local e1=Effect.CreateEffect(c)
    e1:SetCode(EFFECT_CHANGE_TYPE)
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD-RESET_TURN_SET)
    e1:SetValue(TYPE_TRAP+TYPE_CONTINUOUS)
    tc:RegisterEffect(e1)
    Duel.AdjustAll()
    Duel.BreakEffect()
    local ct=Duel.GetMatchingGroupCount(cm.mcfilter,tp,LOCATION_SZONE,0,nil)
    local e2=Effect.CreateEffect(c)
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_UPDATE_ATTACK)
    e2:SetValue(ct*500)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_DISABLE)
    c:RegisterEffect(e2)
    end
    end
    end
    --wuxiao
    function cm.wxcon(e,tp,eg,ep,ev,re,r,rp)
    local c=e:GetHandler()
    return c:IsSummonType(SUMMON_TYPE_FUSION) and c:IsPreviousLocation(LOCATION_MZONE)
    and c:IsPreviousControler(tp) and c:GetReasonPlayer()==1-tp
    end
    function cm.wxtg(e,tp,eg,ep,ev,re,r,rp,chk)
    if chk==0 then return Duel.IsExistingMatchingCard(aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,1,nil) end
    local g=Duel.GetMatchingGroup(aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,nil)
    Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,g:GetCount(),0,0)
    if e:IsHasType(EFFECT_TYPE_ACTIVATE) then
    Duel.SetChainLimit(cm.chainlm)
    end
    end
    function cm.chainlm(e,rp,tp)
    return not e:GetHandler():IsType(TYPE_MONSTER)
    end
    function cm.wxfilter(c)
    return (c:IsCode(96077000) or aux.IsCodeListed(c,96077000)) and c:IsAbleToHand()
    and c:IsType(TYPE_SPELL+TYPE_TRAP)
    end
    function cm.wxop(e,tp,eg,ep,ev,re,r,rp)
    local g=Duel.GetMatchingGroup(aux.NegateMonsterFilter,tp,0,LOCATION_MZONE,nil)
    local tc=g:GetFirst()
    while tc do
    local e1=Effect.CreateEffect(e:GetHandler())
    e1:SetType(EFFECT_TYPE_SINGLE)
    e1:SetCode(EFFECT_DISABLE)
    e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
    tc:RegisterEffect(e1)
    local e2=Effect.CreateEffect(e:GetHandler())
    e2:SetType(EFFECT_TYPE_SINGLE)
    e2:SetCode(EFFECT_DISABLE_EFFECT)
    e2:SetValue(RESET_TURN_SET)
    e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END+RESET_SELF_TURN)
    tc:RegisterEffect(e2)
    tc=g:GetNext()
    end
    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
    local g=Duel.SelectMatchingCard(tp,cm.wxfilter,tp,LOCATION_DECK+LOCATION_GRAVE+LOCATION_REMOVED,0,1,1,nil)
    if g:GetCount()>0 then
    Duel.BreakEffect()
    Duel.SendtoHand(g,nil,REASON_EFFECT)
    Duel.ConfirmCards(1-tp,g)
    end
    end
    \ No newline at end of file
    expansions/script/c96077014.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077016.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077018.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077021.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077022.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077024.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077026.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077028.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077030.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077033.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077036.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077039.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077042.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077043.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/script/c96077045.lua deleted 100644 → 0
    View file @ 930ce326
    This diff is collapsed.
    expansions/strings.conf
    View file @ 6459a04d
    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