Add files via upload

expansions/script/c20100002.lua

---Cirn9 Personal Function    
-Cirn9=Cirn9 or {}      --Welcome my firend~
---Pack 01 Toji no Miko is on the line 5
---Pack 02 Shoujyo Kageki ReLive is on the line 460
-function Cirn9.TojiEquip(ec,code,e,tp,eg,ep,ev,re,r,rp)
-    local token=Duel.CreateToken(tp,code)
-    Duel.MoveToField(token,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-    token:CancelToGrave()
-    local e1_1=Effect.CreateEffect(token)
-    e1_1:SetType(EFFECT_TYPE_SINGLE)
-    e1_1:SetCode(EFFECT_CHANGE_TYPE)
-    e1_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-    e1_1:SetValue(TYPE_EQUIP+TYPE_SPELL)
-    e1_1:SetReset(RESET_EVENT+0x1fc0000)
-    token:RegisterEffect(e1_1,true)
-    local e1_2=Effect.CreateEffect(token)
-    e1_2:SetType(EFFECT_TYPE_SINGLE)
-    e1_2:SetCode(EFFECT_EQUIP_LIMIT)
-    e1_2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-    e1_2:SetValue(1)
-    token:RegisterEffect(e1_2,true)
-    token:CancelToGrave()   
-    if Duel.Equip(tp,token,ec,false) then 
-        if code==20100002 then  --御 刀 加 州 清 光
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(300)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetCategory(CATEGORY_ATKCHANGE)
-            e2_2:SetType(EFFECT_TYPE_IGNITION)
-            e2_2:SetCode(EVENT_FREE_CHAIN)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetCost(Cirn9.amcost)  --am means Asakura Mihono
-            e2_2:SetOperation(Cirn9.amop)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100004 then  --御 刀 骚 速 之 剑
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_DEFENSE)
-            e2_1:SetValue(500)
-            token:RegisterEffect(e2_1) 
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-            e2_2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetTargetRange(LOCATION_MZONE,0)
-            e2_2:SetTarget(Cirn9.sclimit) --sc means Setouchi Chie 
-            e2_2:SetValue(aux.tgoval)
-            token:RegisterEffect(e2_2)   
-        end
-        if code==20100006 then  --御 刀 北 谷 菜 切  二 王 清 纲
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(500)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)  --Shichinosato Kofuki
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_ADD_TYPE)
-            e2_2:SetValue(TYPE_TUNER)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100008 then  --御 刀 莲 华 不 动 辉 广
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(200)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_UPDATE_DEFENSE)
-            e2_2:SetValue(200)
-            token:RegisterEffect(e2_2)
-            local e2_3=Effect.CreateEffect(ec)
-            e2_3:SetCategory(CATEGORY_RECOVER)
-            e2_3:SetType(EFFECT_TYPE_IGNITION)
-            e2_3:SetRange(LOCATION_SZONE)
-            e2_3:SetCountLimit(1)
-            e2_3:SetTarget(Cirn9.mktg)  --mk means Musumi Kiyoka
-            e2_3:SetOperation(Cirn9.mkop)
-            token:RegisterEffect(e2_3)  
-        end
-        if code==20100011 then  --御 刀 实 休 光 忠 
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(400)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_UPDATE_DEFENSE)
-            e2_2:SetValue(400)
-            token:RegisterEffect(e2_2)  
-            local e2_3=Effect.CreateEffect(ec)
-            e2_3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
-            e2_3:SetType(EFFECT_TYPE_IGNITION)
-            e2_3:SetCode(EVENT_FREE_CHAIN)
-            e2_3:SetProperty(EFFECT_FLAG_CARD_TARGET)
-            e2_3:SetRange(LOCATION_SZONE)
-            e2_3:SetCost(Cirn9.amcost)
-            e2_3:SetTarget(Cirn9.kmtg)  --km means Kitora Mirja
-            e2_3:SetOperation(Cirn9.kmop)
-            token:RegisterEffect(e2_3)   
-        end
-        if code==20100013 then  --御 刀 千 鸟
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(500)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_QUICK_O)
-            e2_2:SetCode(EVENT_FREE_CHAIN)
-            e2_2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
-            e2_2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_ATTACK+TIMING_BATTLE_START)
-            e2_2:SetCost(Cirn9.amcost)
-            e2_2:SetCondition(Cirn9.ekcon)
-            e2_2:SetTarget(Cirn9.ektg)  --ek means Etou Kanami
-            e2_2:SetOperation(Cirn9.ekop)
-            token:RegisterEffect(e2_2)   
-        end
-        if code==20100015 then  --御 刀 孙 六 兼 元 
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(300)
-            token:RegisterEffect(e2_1)
-            --Activate
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetCategory(CATEGORY_DAMAGE+CATEGORY_DESTROY)
-            e2_2:SetType(EFFECT_TYPE_QUICK_O)
-            e2_2:SetCode(EVENT_ATTACK_ANNOUNCE)
-            e2_2:SetCost(Cirn9.amcost)
-            e2_2:SetCondition(Cirn9.ymcon)  --ym means Yanase Mai
-            e2_2:SetTarget(Cirn9.ymtg)
-            e2_2:SetOperation(Cirn9.ymop)
-            token:RegisterEffect(e2_2)
-        end  
-        if code==20100017 then  --御 刀 小 乌 丸 
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(400)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_DIRECT_ATTACK)
-            e2_2:SetCondition(Cirn9.jhcon)  --jh means Jujo Hiyori
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100019 then  --御 刀 妙 法 村 正
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(400)
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_QUICK_O)
-            e2_2:SetCode(EVENT_FREE_CHAIN)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetCost(Cirn9.amcost) 
-            e2_2:SetOperation(Cirn9.isop)   --is means Itomi Sayaka
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100021 then  --御 刀 弥 弥 切 丸
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(800)  --
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)  
-            e2_2:SetCode(EFFECT_PIERCE)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100024 then  --御 刀 越 前 康 继
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_DEFENSE)
-            e2_1:SetValue(800)  --
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_FIELD)
-            e2_2:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetTargetRange(0,LOCATION_MZONE)
-            e2_2:SetValue(Cirn9.kalimit1)   --ka means Kohagura Eren
-            token:RegisterEffect(e2_2)
-            local e2_3=Effect.CreateEffect(ec)
-            e2_3:SetType(EFFECT_TYPE_FIELD)
-            e2_3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-            e2_3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
-            e2_3:SetRange(LOCATION_SZONE)
-            e2_3:SetTargetRange(LOCATION_MZONE,0)
-            e2_3:SetTarget(Cirn9.kalimit2)
-            e2_3:SetValue(aux.tgoval)
-            token:RegisterEffect(e2_3)
-        end
-        if code==20100026 then  --御 刀 薄 绿
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(600)  --
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_FIELD)
-            e2_2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetCode(EFFECT_CANNOT_ACTIVATE)
-            e2_2:SetTargetRange(0,1)
-            e2_2:SetValue(Cirn9.smlimit)    --sm means Shidou Maki
-            e2_2:SetCondition(Cirn9.smcon)
-            token:RegisterEffect(e2_2) 
-        end
-        if code==20100028 then  --御 刀 九 字 兼 定
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(500)  --
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
-            e2_2:SetCode(EVENT_BATTLE_DAMAGE)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetCost(Cirn9.amcost)
-            e2_2:SetCondition(Cirn9.kscon)  --ks means konohana Suzuka
-            e2_2:SetOperation(Cirn9.ksop)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100030 then  --御 刀 水 神 切 兼 光
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(500)  --
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_FIELD)
-            e2_2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetTargetRange(LOCATION_SZONE,0)
-            e2_2:SetTarget(Cirn9.sytg)  --sy means Satsuki Yomi
-            e2_2:SetValue(1)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100032 then  --御 刀 笑 面 青 江
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(500)  --Tsubakuro Yume
-            token:RegisterEffect(e2_1)
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_EQUIP)
-            e2_2:SetCode(EFFECT_ATTACK_ALL)
-            e2_2:SetValue(1)
-            token:RegisterEffect(e2_2)
-        end
-        if code==20100035 then  --御 刀 童 子 切 安 纲
-            local e2_1=Effect.CreateEffect(ec)
-            e2_1:SetType(EFFECT_TYPE_EQUIP)
-            e2_1:SetCode(EFFECT_UPDATE_ATTACK)
-            e2_1:SetValue(700)  --Origami Yukari
-            token:RegisterEffect(e2_1)  
-            local e2_2=Effect.CreateEffect(ec)
-            e2_2:SetType(EFFECT_TYPE_SINGLE)
-            e2_2:SetRange(LOCATION_SZONE)
-            e2_2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
-            e2_2:SetCode(EFFECT_LINK_SPELL_KOISHI)
-            e2_2:SetValue(LINK_MARKER_TOP)
-            token:RegisterEffect(e2_2) 
-        end
-    return true
-    else Duel.SendtoGrave(token,REASON_RULE) return false
-    end
-end
-function Cirn9.amcost(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then return e:GetHandler():IsReleasable() end
-    local syk=e:GetHandler():GetEquipTarget()
-    e:SetLabelObject(syk)
-    Duel.Release(e:GetHandler(),REASON_COST)
-end
-
-function Cirn9.amfilter(c)
-    return c:IsFaceup() and c:IsSetCard(0xc90)
-end
-
-function Cirn9.amop(e,tp,eg,ep,ev,re,r,rp)
-    local sg=Duel.GetMatchingGroup(Cirn9.amfilter,tp,LOCATION_MZONE,0,nil)
-    local c=e:GetHandler()
-    local uc=sg:GetFirst()
-    while uc do
-        local e1=Effect.CreateEffect(c)
-        e1:SetType(EFFECT_TYPE_SINGLE)
-        e1:SetCode(EFFECT_UPDATE_ATTACK)
-        e1:SetValue(300)
-        e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-        uc:RegisterEffect(e1)
-        uc=sg:GetNext()
-    end
-end
-
-function Cirn9.sclimit(e,c)
-    return c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
-end
-function Cirn9.mkfilter(c)
-    return c:IsFaceup() and c:IsSetCard(0xc90)
-end
-function Cirn9.mktg(e,tp,eg,ep,ev,re,r,rp,chk)
-    local rec=Duel.GetMatchingGroupCount(Cirn9.mkfilter,tp,LOCATION_MZONE,0,nil)*400
-    if chk==0 then return rec>0 end
-    Duel.SetTargetPlayer(tp)
-    Duel.SetTargetParam(rec)
-    Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec)
-end
-function Cirn9.mkop(e,tp,eg,ep,ev,re,r,rp)
-    local rec=Duel.GetMatchingGroupCount(Cirn9.mkfilter,tp,LOCATION_MZONE,0,nil)*400
-    local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
-    Duel.Recover(p,rec,REASON_EFFECT)
-end
-function Cirn9.kmfilter(c)
-    return c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() and c:IsSetCard(0xc90)
-end
-function Cirn9.kmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and Cirn9.kmfilter(chkc) end
-    if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingTarget(Cirn9.kmfilter,tp,LOCATION_GRAVE,0,3,nil) end
-    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
-    local g=Duel.SelectTarget(tp,Cirn9.kmfilter,tp,LOCATION_GRAVE,0,3,3,nil)
-    Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
-    Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function Cirn9.kmop(e,tp,eg,ep,ev,re,r,rp)
-    local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-    if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=3 then return end
-    Duel.SendtoDeck(tg,nil,0,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==3 then
-        Duel.BreakEffect()
-        Duel.Draw(tp,1,REASON_EFFECT)
-    end
-end
-function Cirn9.ekcon(e,tp,eg,ep,ev,re,r,rp)
-    return Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated()
-end
-function Cirn9.ektg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
-    if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
-    Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
-    local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
-    Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
-end
-function Cirn9.ekop(e,tp,eg,ep,ev,re,r,rp)
-    local c=e:GetHandler()
-    local tc=Duel.GetFirstTarget()
-    if tc:IsRelateToEffect(e) and tc:IsFaceup() then
-        local e1=Effect.CreateEffect(c)
-        e1:SetType(EFFECT_TYPE_SINGLE)
-        e1:SetCode(EFFECT_SET_ATTACK)
-        e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-        e1:SetValue(0)
-        tc:RegisterEffect(e1)
-        if Duel.GetTurnPlayer()==tp then
-            Duel.NegateRelatedChain(tc,RESET_TURN_SET)
-            local e2=Effect.CreateEffect(c)
-            e2:SetType(EFFECT_TYPE_SINGLE)
-            e2:SetCode(EFFECT_DISABLE)
-            e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-            tc:RegisterEffect(e2)
-            local e3=Effect.CreateEffect(c)
-            e3:SetType(EFFECT_TYPE_SINGLE)
-            e3:SetCode(EFFECT_DISABLE_EFFECT)
-            e3:SetValue(RESET_TURN_SET)
-            e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-            tc:RegisterEffect(e3)
-        end
-    end
-end
-function Cirn9.ymcon(e,tp,eg,ep,ev,re,r,rp)
-    return tp~=Duel.GetTurnPlayer()
-end
-function Cirn9.ymtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    local tg=Duel.GetAttacker()
-    if chkc then return chkc==tg end
-    if chk==0 then return tg:IsOnField() and tg:IsCanBeEffectTarget(e) end
-    Duel.SetTargetCard(tg)
-    local dam=tg:GetAttack()
-    Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
-    Duel.SetChainLimit(Cirn9.ymchainlm)
-end
-function Cirn9.ymchainlm(e,rp,tp)
-    return tp==rp
-end
-function Cirn9.ymop(e,tp,eg,ep,ev,re,r,rp)
-    local tc=Duel.GetFirstTarget()
-    if tc:IsRelateToEffect(e) then
-        if Duel.Destroy(tc,REASON_EFFECT) then
-            Duel.Damage(1-tp,tc:GetAttack(),REASON_EFFECT)
-        end
-    end
-end
-function Cirn9.jhcon(e)
-    local cg=e:GetHandler():GetEquipTarget():GetColumnGroup():Filter(Card.IsControler,nil,1-e:GetHandlerPlayer())
-    return cg:FilterCount(Card.IsType,nil,TYPE_MONSTER)==0
-end
-
-
-function Cirn9.isop(e,tp,eg,ep,ev,re,r,rp)
-    local c=e:GetHandler()
-    local tc=e:GetLabelObject()
-    if tc then
-    local e4=Effect.CreateEffect(c)
-    e4:SetType(EFFECT_TYPE_SINGLE)
-    e4:SetCode(EFFECT_IMMUNE_EFFECT)
-    e4:SetValue(Cirn9.efilter)
-    e4:SetOwnerPlayer(tp)
-    e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-    tc:RegisterEffect(e4)
-    end
-end
-function Cirn9.efilter(e,re)
-    return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
-end
-function Cirn9.kalimit1(e,c)
-    return c:IsFaceup() and c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
-end
-function Cirn9.kalimit2(e,c)
-    return c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
-end
-function Cirn9.smlimit(e,re,tp)
-    return not re:GetHandler():IsImmuneToEffect(e)
-end
-function Cirn9.smcon(e)
-    local tc=e:GetHandler():GetEquipTarget()
-    return Duel.GetAttacker()==tc or Duel.GetAttackTarget()==tc
-end
-function Cirn9.kscon(e,tp,eg,ep,ev,re,r,rp,chk)
-    return ep~=tp and (Duel.GetAttacker()==e:GetHandler():GetEquipTarget() or Duel.GetAttackTarget()==e:GetHandler():GetEquipTarget())
-end
-function Cirn9.ksop(e,tp,eg,ep,ev,re,r,rp)
-    local lp=Duel.GetLP(1-tp)
-    if lp>=1500 then Duel.SetLP(1-tp,lp-1500) else Duel.SetLP(1-tp,0) end   
-end
-function Cirn9.sytg(e,c)
-    return c:IsType(TYPE_EQUIP) and c:IsSetCard(0xc91)
-end
-
-
-
-
-
-
-
---Add Butaishoujyo Property to ReLive Monster
-function Cirn9.ReLiveMonster(c)
-    c:EnableCounterPermit(0xc99)
-    --attack cost
-    local e1=Effect.CreateEffect(c)
-    e1:SetType(EFFECT_TYPE_SINGLE)
-    e1:SetCode(EFFECT_ATTACK_COST)
-    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-    e1:SetCost(Cirn9.rlcost)
-    e1:SetOperation(Cirn9.rlop)
-    c:RegisterEffect(e1)
-    --Play music <Hoshi No Dialogue> at the first turn
-    if not Cirn9.global_check1 then
-        Cirn9.global_check1=true
-        local ge1=Effect.GlobalEffect()
-        ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-        ge1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
-        ge1:SetCondition(Cirn9.opcon)
-        ge1:SetOperation(Cirn9.opop)
-        Duel.RegisterEffect(ge1,0)
-    end
-    --ac1
-    local e3=Effect.CreateEffect(c)
-    e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-    e3:SetCode(EVENT_ADD_COUNTER+0xc99)
-    e3:SetOperation(Cirn9.acop)
-    c:RegisterEffect(e3)
-end
-
---ReLive field magic can not be setted
-function Cirn9.ReLiveStage(c)
-    if not Cirn9.global_check2 then
-        Cirn9.global_check2=true
-        local ge=Effect.GlobalEffect()
-        ge:SetType(EFFECT_TYPE_FIELD)
-        ge:SetCode(EFFECT_CANNOT_SSET)
-        ge:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-        ge:SetTargetRange(1,1)
-        ge:SetTarget(Cirn9.stg)
-        Duel.RegisterEffect(ge,0)
-    end 
-    --Activate without operation
-    local e2=Effect.CreateEffect(c)
-    e2:SetDescription(aux.Stringid(20100108,1))
-    e2:SetType(EFFECT_TYPE_ACTIVATE)
-    e2:SetCode(EVENT_FREE_CHAIN)
-    e2:SetTarget(Cirn9.nanacon2)
-    e2:SetOperation(Cirn9.stageop)
-    c:RegisterEffect(e2)
-end
-
-function Cirn9.ReLink(c)
-    --link
-    local e1=Effect.CreateEffect(c)
-    e1:SetType(EFFECT_TYPE_FIELD)
-    e1:SetCode(20100098)
-    e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-    e1:SetRange(LOCATION_ONFIELD)
-    e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
-    e1:SetTarget(Cirn9.linktg)
-    c:RegisterEffect(e1)
-end
-function Cirn9.linktg(e,c)
-    return e:GetHandler():GetLinkedGroup():IsContains(c)
-end
-function Cirn9.ffilter(c,tp)
-    return c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true) and c:IsSetCard(0xc99)
-end
-
---Activate ReliveStage or Not
-function Cirn9.Climax(e,tp,eg,ep,ev,re,r,rp)
-    local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
-    if not fc and not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return 0 end
-    if not fc then
-        Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(20100060,4))
-        local tc=Duel.SelectMatchingCard(tp,Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,tp):GetFirst()
-        if tc then
-            Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-            local te=tc:GetActivateEffect()
-            te:UseCountLimit(tp,1,true)
-            local tep=tc:GetControler()
-            local cost=te:GetCost()
-            if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
-            Duel.RaiseEvent(tc,4179255,te,0,tp,tp,Duel.GetCurrentChain())
-            return 1
-        end
-    end
-    if fc then 
-        if not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return 2 end
-        if Duel.SelectYesNo(tp,aux.Stringid(20100060,5)) then
-            Duel.SendtoGrave(fc,REASON_RULE)
-            Duel.BreakEffect()
-            Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(20100060,4))
-            local tc=Duel.SelectMatchingCard(tp,Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,tp):GetFirst()
-            if tc then
-                Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
-                local te=tc:GetActivateEffect()
-                te:UseCountLimit(tp,1,true)
-                local tep=tc:GetControler()
-                local cost=te:GetCost()
-                if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
-                Duel.RaiseEvent(tc,4179255,te,0,tp,tp,Duel.GetCurrentChain())
-                return 1
-            end
-        end
-        return 2
-    end
-end
-
-function Cirn9.rlcost(e,c,tp)
-    local fa=Duel.GetFlagEffect(tp,20100050)    --Copy From THC Makai Deck
-    local fb=Duel.GetFlagEffect(tp,20100051)    --Thanks Hiragi Sama
-    local fc=fa-fb
-    return (fc<6) or (e:GetHandler():GetFlagEffect(20100070)~=0) or Duel.IsPlayerAffectedByEffect(tp,20100134)
-end
-function Cirn9.rlop(e,tp,eg,ep,ev,re,r,rp)
-    if Duel.IsPlayerAffectedByEffect(tp,20100134) then return end
-    if (e:GetHandler():GetFlagEffect(20100070)>0) then return end       
-    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local rd=6-fa+fb
-    if e:GetHandler():IsOriginalSetCard(0xc99) then
-        Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
-    end
-end
- 
-function Cirn9.opcon(e)
-    return Duel.GetTurnCount() == 1
-end
-function Cirn9.opop(e,tp,eg,ep,ev,re,r,rp)
-    Duel.Hint(11,0,aux.Stringid(20100060,3))
-end
-
-function Cirn9.ap1(e,tp,eg,ep,ev,re,r,rp,chk)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local fc=fa-fb
-    if chk==0 then return fc<6 end
-    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    local rd=5-fc
-    Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
-end
-function Cirn9.ap2(e,tp,eg,ep,ev,re,r,rp,chk)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local fc=fa-fb
-    if chk==0 then return fc<5 end
-    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    local rd=4-fc
-    Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
-end
-function Cirn9.fumiap2(e,tp,eg,ep,ev,re,r,rp,chk)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local fc=fa-fb
-    if chk==0 then return fc<5 or (e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE) and fc<6) end
-    if e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE) then
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    else
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    end
-    local ea=Duel.GetFlagEffect(tp,20100050)
-    local eb=Duel.GetFlagEffect(tp,20100051)
-    local ec=6-ea+eb
-    Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
-end
-function Cirn9.stg(e,c)
-    return c:IsSetCard(0xc99) and c:IsType(TYPE_FIELD)
-end
-function Cirn9.clcon(e,tp,eg,ep,ev,re,r,rp)
-    local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
-    if not fc and not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return false end
-    return true
-end
-function Cirn9.clcost(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0xc99,3,REASON_COST) end
-    e:GetHandler():RemoveCounter(tp,0xc99,3,REASON_COST)
-    Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
-    Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
-    Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
-end
-function Cirn9.RevueBgm(tp)
-    local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
-    local fcode=fc:GetOriginalCode()
-    Duel.Hint(11,0,aux.Stringid(fcode,0))
-end
-function Cirn9.GetLine(c)
-    if c:IsLocation(LOCATION_FZONE) then return 99  end
-    if c:IsLocation(LOCATION_SZONE) then return 1   end
-    if c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5 then return 2 end
-    if c:IsLocation(LOCATION_MZONE) and c:GetSequence()>4 then return 3 end
-end
-function Cirn9.fap1(e,tp,eg,ep,ev,re,r,rp,chk)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local f1=Duel.GetFlagEffect(tp,20100088)
-    local f2=Duel.GetFlagEffect(tp,20100089)
-    local fc=fa-fb
-    local f3=f1-f2
-    if chk==0 then return (fc<6 and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)) or (f3>0) end
-    if fc<6 then
-        if f3<1 then 
-            Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
-            e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
-        elseif f3>0 then
-            if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) then
-                if Duel.SelectYesNo(tp,aux.Stringid(20100088,3)) then
-                    Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                else
-                    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
-                    e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
-                end
-            else
-                Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)  
-            end
-        end
-    else
-        Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1) 
-    end
-    local ea=Duel.GetFlagEffect(tp,20100050)
-    local eb=Duel.GetFlagEffect(tp,20100051)
-    local ec=6-ea+eb
-    Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
-end
-                    
-function Cirn9.arrap1(e,tp,eg,ep,ev,re,r,rp,chk)
-    local og=e:GetHandler():GetOverlayGroup()
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local f1=Duel.GetFlagEffect(tp,20100088)
-    local f2=Duel.GetFlagEffect(tp,20100089)
-    local fc=fa-fb
-    local f3=f1-f2
-    if chk==0 then return (fc<6 and og:FilterCount(Card.IsAbleToRemoveAsCost,nil)>0) or (f3>0) end
-    if fc<6 then
-        if f3<1 then 
-            Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
-            local g=og:FilterSelect(tp,Card.IsAbleToRemoveAsCost,1,1,nil)
-            Duel.Remove(g,POS_FACEUP,REASON_COST)
-        elseif f3>0 then
-            if og:FilterCount(Card.IsAbleToRemoveAsCost,nil)>0 then
-                if Duel.SelectYesNo(tp,aux.Stringid(20100088,3)) then
-                    Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                    Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                else
-                    Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
-                    local g=og:FilterSelect(tp,Card.IsAbleToRemoveAsCost,1,1,nil)
-                    Duel.Remove(g,POS_FACEUP,REASON_COST)
-                end
-            else
-                Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-                Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)  
-            end
-        end
-    else
-        Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1) 
-    end
-    local ea=Duel.GetFlagEffect(tp,20100050)
-    local eb=Duel.GetFlagEffect(tp,20100051)
-    local ec=6-ea+eb
-    Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
-end
-
-function Cirn9.rlink(c)
-    return c:IsType(TYPE_LINK) or (c:IsType(TYPE_CONTINUOUS) and c:IsType(TYPE_SPELL)) and c:IsSetCard(0xc99) and c:IsFaceup()
-end
-
-function Cirn9.sap2(e,tp,eg,ep,ev,re,r,rp,chk)
-    local fa=Duel.GetFlagEffect(tp,20100050)
-    local fb=Duel.GetFlagEffect(tp,20100051)
-    local fc=fa-fb
-    local rls=0
-    local lg=e:GetHandler():GetLinkedGroup()
-    if lg:IsExists(Card.IsSetCard,1,nil,0xc99)  then rls=1 end
-    if e:GetHandler():IsHasEffect(20100098) then rls=1 end
-    if chk==0 then return (fc<5 or((rls==1) and (fc<6))) end
-    if (rls==1) then
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    else
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-        Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
-    end
-    local ea=Duel.GetFlagEffect(tp,20100050)
-    local eb=Duel.GetFlagEffect(tp,20100051)
-    local ec=6-ea+eb
-    Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
-end
-function Cirn9.IsReLinkState(c)
-    if c:IsHasEffect(20100098) then return true end
-    if c:GetLinkedGroup():IsExists(Card.IsSetCard,1,nil,0xc99) then return true end
-    return false
-end
-function Cirn9.nanacon1(e,tp,eg,ep,ev,re,r,rp)
-    return (Duel.GetFlagEffect(tp,20100068)==0)
-end
-function Cirn9.nanacon2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-    if chk==0 then return (Duel.GetFlagEffect(tp,20100068)~=0) end
-end
-function Cirn9.stageop(e,tp,eg,ep,ev,re,r,rp)
-    Cirn9.RevueBgm(tp)
-end
-function Cirn9.FinishAct(c)
-    local e1=Effect.CreateEffect(c)
-    e1:SetDescription(aux.Stringid(20100108,3))
-    e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
-    e1:SetCode(EVENT_PHASE+PHASE_END)
-    e1:SetRange(LOCATION_FZONE)
-    e1:SetCost(Cirn9.finalcost)
-    e1:SetCountLimit(1)
-    e1:SetCondition(Cirn9.finalcon)
-    return e1
-end
-function Cirn9.finalcost(e,tp,eg,ep,ev,re,r,rp,chk)
-    if chk==0 then return true end
-    Duel.SendtoGrave(e:GetHandler(),REASON_COST)
-end
-function Cirn9.finalcon(e,tp,eg,ep,ev,re,r,rp)
-    local tid=e:GetHandler():GetTurnID()
-    return (Duel.GetTurnCount()==tid+1)
-end
-function Cirn9.acop(e,tp,eg,ep,ev,re,r,rp)
-    for i=1,ev do
-        Duel.RegisterFlagEffect(tp,20100052,RESET_PHASE+PHASE_END,0,1)
-    end
+--Cirn9 Personal Function   
+Cirn9=Cirn9 or {}	 --Welcome my firend~
+--Pack 01 Toji no Miko is on the line 5
+--Pack 02 Shoujyo Kageki ReLive is on the line 460
+function Cirn9.TojiEquip(ec,code,e,tp,eg,ep,ev,re,r,rp)
+	local token=Duel.CreateToken(tp,code)
+	Duel.MoveToField(token,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+	token:CancelToGrave()
+	local e1_1=Effect.CreateEffect(token)
+	e1_1:SetType(EFFECT_TYPE_SINGLE)
+	e1_1:SetCode(EFFECT_CHANGE_TYPE)
+	e1_1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1_1:SetValue(TYPE_EQUIP+TYPE_SPELL)
+	e1_1:SetReset(RESET_EVENT+0x1fc0000)
+	token:RegisterEffect(e1_1,true)
+	local e1_2=Effect.CreateEffect(token)
+	e1_2:SetType(EFFECT_TYPE_SINGLE)
+	e1_2:SetCode(EFFECT_EQUIP_LIMIT)
+	e1_2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+	e1_2:SetValue(1)
+	token:RegisterEffect(e1_2,true)
+	token:CancelToGrave()   
+	if Duel.Equip(tp,token,ec,false) then 
+		if code==20100002 then  --御 刀 加 州 清 光
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(300)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetCategory(CATEGORY_ATKCHANGE)
+			e2_2:SetType(EFFECT_TYPE_IGNITION)
+			e2_2:SetCode(EVENT_FREE_CHAIN)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetCost(Cirn9.amcost)  --am means Asakura Mihono
+			e2_2:SetOperation(Cirn9.amop)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100004 then  --御 刀 骚 速 之 剑
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_DEFENSE)
+			e2_1:SetValue(500)
+			token:RegisterEffect(e2_1) 
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+			e2_2:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetTargetRange(LOCATION_MZONE,0)
+			e2_2:SetTarget(Cirn9.sclimit) --sc means Setouchi Chie 
+			e2_2:SetValue(aux.tgoval)
+			token:RegisterEffect(e2_2)   
+		end
+		if code==20100006 then  --御 刀 北 谷 菜 切  二 王 清 纲
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(500)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)  --Shichinosato Kofuki
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_ADD_TYPE)
+			e2_2:SetValue(TYPE_TUNER)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100008 then  --御 刀 莲 华 不 动 辉 广
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(200)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_UPDATE_DEFENSE)
+			e2_2:SetValue(200)
+			token:RegisterEffect(e2_2)
+			local e2_3=Effect.CreateEffect(ec)
+			e2_3:SetCategory(CATEGORY_RECOVER)
+			e2_3:SetType(EFFECT_TYPE_IGNITION)
+			e2_3:SetRange(LOCATION_SZONE)
+			e2_3:SetCountLimit(1)
+			e2_3:SetTarget(Cirn9.mktg)  --mk means Musumi Kiyoka
+			e2_3:SetOperation(Cirn9.mkop)
+			token:RegisterEffect(e2_3)  
+		end
+		if code==20100011 then  --御 刀 实 休 光 忠 
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(400)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_UPDATE_DEFENSE)
+			e2_2:SetValue(400)
+			token:RegisterEffect(e2_2)  
+			local e2_3=Effect.CreateEffect(ec)
+			e2_3:SetCategory(CATEGORY_TODECK+CATEGORY_DRAW)
+			e2_3:SetType(EFFECT_TYPE_IGNITION)
+			e2_3:SetCode(EVENT_FREE_CHAIN)
+			e2_3:SetProperty(EFFECT_FLAG_CARD_TARGET)
+			e2_3:SetRange(LOCATION_SZONE)
+			e2_3:SetCost(Cirn9.amcost)
+			e2_3:SetTarget(Cirn9.kmtg)  --km means Kitora Mirja
+			e2_3:SetOperation(Cirn9.kmop)
+			token:RegisterEffect(e2_3)   
+		end
+		if code==20100013 then  --御 刀 千 鸟
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(500)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_QUICK_O)
+			e2_2:SetCode(EVENT_FREE_CHAIN)
+			e2_2:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_DISABLE)
+			e2_2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_ATTACK+TIMING_BATTLE_START)
+			e2_2:SetCost(Cirn9.amcost)
+			e2_2:SetCondition(Cirn9.ekcon)
+			e2_2:SetTarget(Cirn9.ektg)  --ek means Etou Kanami
+			e2_2:SetOperation(Cirn9.ekop)
+			token:RegisterEffect(e2_2)   
+		end
+		if code==20100015 then  --御 刀 孙 六 兼 元 
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(300)
+			token:RegisterEffect(e2_1)
+			--Activate
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetCategory(CATEGORY_DAMAGE+CATEGORY_DESTROY)
+			e2_2:SetType(EFFECT_TYPE_QUICK_O)
+			e2_2:SetCode(EVENT_ATTACK_ANNOUNCE)
+			e2_2:SetCost(Cirn9.amcost)
+			e2_2:SetCondition(Cirn9.ymcon)  --ym means Yanase Mai
+			e2_2:SetTarget(Cirn9.ymtg)
+			e2_2:SetOperation(Cirn9.ymop)
+			token:RegisterEffect(e2_2)
+		end  
+		if code==20100017 then  --御 刀 小 乌 丸 
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(400)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_DIRECT_ATTACK)
+			e2_2:SetCondition(Cirn9.jhcon)  --jh means Jujo Hiyori
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100019 then  --御 刀 妙 法 村 正
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(400)
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_QUICK_O)
+			e2_2:SetCode(EVENT_FREE_CHAIN)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetCost(Cirn9.amcost) 
+			e2_2:SetOperation(Cirn9.isop)   --is means Itomi Sayaka
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100021 then  --御 刀 弥 弥 切 丸
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(800)  --
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)  
+			e2_2:SetCode(EFFECT_PIERCE)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100024 then  --御 刀 越 前 康 继
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_DEFENSE)
+			e2_1:SetValue(800)  --
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_FIELD)
+			e2_2:SetCode(EFFECT_CANNOT_SELECT_BATTLE_TARGET)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetTargetRange(0,LOCATION_MZONE)
+			e2_2:SetValue(Cirn9.kalimit1)   --ka means Kohagura Eren
+			token:RegisterEffect(e2_2)
+			local e2_3=Effect.CreateEffect(ec)
+			e2_3:SetType(EFFECT_TYPE_FIELD)
+			e2_3:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+			e2_3:SetProperty(EFFECT_FLAG_IGNORE_IMMUNE)
+			e2_3:SetRange(LOCATION_SZONE)
+			e2_3:SetTargetRange(LOCATION_MZONE,0)
+			e2_3:SetTarget(Cirn9.kalimit2)
+			e2_3:SetValue(aux.tgoval)
+			token:RegisterEffect(e2_3)
+		end
+		if code==20100026 then  --御 刀 薄 绿
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(600)  --
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_FIELD)
+			e2_2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetCode(EFFECT_CANNOT_ACTIVATE)
+			e2_2:SetTargetRange(0,1)
+			e2_2:SetValue(Cirn9.smlimit)	--sm means Shidou Maki
+			e2_2:SetCondition(Cirn9.smcon)
+			token:RegisterEffect(e2_2) 
+		end
+		if code==20100028 then  --御 刀 九 字 兼 定
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(500)  --
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_O)
+			e2_2:SetCode(EVENT_BATTLE_DAMAGE)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetCost(Cirn9.amcost)
+			e2_2:SetCondition(Cirn9.kscon)  --ks means konohana Suzuka
+			e2_2:SetOperation(Cirn9.ksop)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100030 then  --御 刀 水 神 切 兼 光
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(500)  --
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_FIELD)
+			e2_2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetTargetRange(LOCATION_SZONE,0)
+			e2_2:SetTarget(Cirn9.sytg)  --sy means Satsuki Yomi
+			e2_2:SetValue(1)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100032 then  --御 刀 笑 面 青 江
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(500)  --Tsubakuro Yume
+			token:RegisterEffect(e2_1)
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_EQUIP)
+			e2_2:SetCode(EFFECT_ATTACK_ALL)
+			e2_2:SetValue(1)
+			token:RegisterEffect(e2_2)
+		end
+		if code==20100035 then  --御 刀 童 子 切 安 纲
+			local e2_1=Effect.CreateEffect(ec)
+			e2_1:SetType(EFFECT_TYPE_EQUIP)
+			e2_1:SetCode(EFFECT_UPDATE_ATTACK)
+			e2_1:SetValue(700)  --Origami Yukari
+			token:RegisterEffect(e2_1)  
+			local e2_2=Effect.CreateEffect(ec)
+			e2_2:SetType(EFFECT_TYPE_SINGLE)
+			e2_2:SetRange(LOCATION_SZONE)
+			e2_2:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+			e2_2:SetCode(EFFECT_LINK_SPELL_KOISHI)
+			e2_2:SetValue(LINK_MARKER_TOP)
+			token:RegisterEffect(e2_2) 
+		end
+	return true
+	else Duel.SendtoGrave(token,REASON_RULE) return false
+	end
+end
+function Cirn9.amcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsReleasable() end
+	local syk=e:GetHandler():GetEquipTarget()
+	e:SetLabelObject(syk)
+	Duel.Release(e:GetHandler(),REASON_COST)
+end
+
+function Cirn9.amfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0xc90)
+end
+
+function Cirn9.amop(e,tp,eg,ep,ev,re,r,rp)
+	local sg=Duel.GetMatchingGroup(Cirn9.amfilter,tp,LOCATION_MZONE,0,nil)
+	local c=e:GetHandler()
+	local uc=sg:GetFirst()
+	while uc do
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetValue(300)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		uc:RegisterEffect(e1)
+		uc=sg:GetNext()
+	end
+end
+
+function Cirn9.sclimit(e,c)
+	return c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
+end
+function Cirn9.mkfilter(c)
+	return c:IsFaceup() and c:IsSetCard(0xc90)
+end
+function Cirn9.mktg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local rec=Duel.GetMatchingGroupCount(Cirn9.mkfilter,tp,LOCATION_MZONE,0,nil)*400
+	if chk==0 then return rec>0 end
+	Duel.SetTargetPlayer(tp)
+	Duel.SetTargetParam(rec)
+	Duel.SetOperationInfo(0,CATEGORY_RECOVER,nil,0,tp,rec)
+end
+function Cirn9.mkop(e,tp,eg,ep,ev,re,r,rp)
+	local rec=Duel.GetMatchingGroupCount(Cirn9.mkfilter,tp,LOCATION_MZONE,0,nil)*400
+	local p=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER)
+	Duel.Recover(p,rec,REASON_EFFECT)
+end
+function Cirn9.kmfilter(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAbleToDeck() and c:IsSetCard(0xc90)
+end
+function Cirn9.kmtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE) and chkc:IsControler(tp) and Cirn9.kmfilter(chkc) end
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) and Duel.IsExistingTarget(Cirn9.kmfilter,tp,LOCATION_GRAVE,0,3,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TODECK)
+	local g=Duel.SelectTarget(tp,Cirn9.kmfilter,tp,LOCATION_GRAVE,0,3,3,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,g:GetCount(),0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function Cirn9.kmop(e,tp,eg,ep,ev,re,r,rp)
+	local tg=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	if not tg or tg:FilterCount(Card.IsRelateToEffect,nil,e)~=3 then return end
+	Duel.SendtoDeck(tg,nil,0,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==3 then
+		Duel.BreakEffect()
+		Duel.Draw(tp,1,REASON_EFFECT)
+	end
+end
+function Cirn9.ekcon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetCurrentPhase()~=PHASE_DAMAGE or not Duel.IsDamageCalculated()
+end
+function Cirn9.ektg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsFaceup() end
+	if chk==0 then return Duel.IsExistingTarget(Card.IsFaceup,tp,0,LOCATION_MZONE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectTarget(tp,Card.IsFaceup,tp,0,LOCATION_MZONE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_DISABLE,g,1,0,0)
+end
+function Cirn9.ekop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_SET_ATTACK)
+		e1:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		e1:SetValue(0)
+		tc:RegisterEffect(e1)
+		if Duel.GetTurnPlayer()==tp then
+			Duel.NegateRelatedChain(tc,RESET_TURN_SET)
+			local e2=Effect.CreateEffect(c)
+			e2:SetType(EFFECT_TYPE_SINGLE)
+			e2:SetCode(EFFECT_DISABLE)
+			e2:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+			tc:RegisterEffect(e2)
+			local e3=Effect.CreateEffect(c)
+			e3:SetType(EFFECT_TYPE_SINGLE)
+			e3:SetCode(EFFECT_DISABLE_EFFECT)
+			e3:SetValue(RESET_TURN_SET)
+			e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+			tc:RegisterEffect(e3)
+		end
+	end
+end
+function Cirn9.ymcon(e,tp,eg,ep,ev,re,r,rp)
+	return tp~=Duel.GetTurnPlayer()
+end
+function Cirn9.ymtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	local tg=Duel.GetAttacker()
+	if chkc then return chkc==tg end
+	if chk==0 then return tg:IsOnField() and tg:IsCanBeEffectTarget(e) end
+	Duel.SetTargetCard(tg)
+	local dam=tg:GetAttack()
+	Duel.SetOperationInfo(0,CATEGORY_DAMAGE,nil,0,1-tp,dam)
+	Duel.SetChainLimit(Cirn9.ymchainlm)
+end
+function Cirn9.ymchainlm(e,rp,tp)
+	return tp==rp
+end
+function Cirn9.ymop(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetFirstTarget()
+	if tc:IsRelateToEffect(e) then
+		if Duel.Destroy(tc,REASON_EFFECT) then
+			Duel.Damage(1-tp,tc:GetAttack(),REASON_EFFECT)
+		end
+	end
+end
+function Cirn9.jhcon(e)
+	local cg=e:GetHandler():GetEquipTarget():GetColumnGroup():Filter(Card.IsControler,nil,1-e:GetHandlerPlayer())
+	return cg:FilterCount(Card.IsType,nil,TYPE_MONSTER)==0
+end
+
+
+function Cirn9.isop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=e:GetLabelObject()
+	if tc then
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetCode(EFFECT_IMMUNE_EFFECT)
+	e4:SetValue(Cirn9.efilter)
+	e4:SetOwnerPlayer(tp)
+	e4:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+	tc:RegisterEffect(e4)
+	end
+end
+function Cirn9.efilter(e,re)
+	return e:GetOwnerPlayer()~=re:GetOwnerPlayer()
+end
+function Cirn9.kalimit1(e,c)
+	return c:IsFaceup() and c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
+end
+function Cirn9.kalimit2(e,c)
+	return c:IsSetCard(0xc90) and c~=e:GetHandler():GetEquipTarget()
+end
+function Cirn9.smlimit(e,re,tp)
+	return not re:GetHandler():IsImmuneToEffect(e)
+end
+function Cirn9.smcon(e)
+	local tc=e:GetHandler():GetEquipTarget()
+	return Duel.GetAttacker()==tc or Duel.GetAttackTarget()==tc
+end
+function Cirn9.kscon(e,tp,eg,ep,ev,re,r,rp,chk)
+	return ep~=tp and (Duel.GetAttacker()==e:GetHandler():GetEquipTarget() or Duel.GetAttackTarget()==e:GetHandler():GetEquipTarget())
+end
+function Cirn9.ksop(e,tp,eg,ep,ev,re,r,rp)
+	local lp=Duel.GetLP(1-tp)
+	if lp>=1500 then Duel.SetLP(1-tp,lp-1500) else Duel.SetLP(1-tp,0) end   
+end
+function Cirn9.sytg(e,c)
+	return c:IsType(TYPE_EQUIP) and c:IsSetCard(0xc91)
+end
+
+
+
+
+
+
+
+--Add Butaishoujyo Property to ReLive Monster
+function Cirn9.ReLiveMonster(c)
+	c:EnableCounterPermit(0xc99)
+	--attack cost
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetCode(EFFECT_ATTACK_COST)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCost(Cirn9.rlcost)
+	e1:SetOperation(Cirn9.rlop)
+	c:RegisterEffect(e1)
+	--Play music <Hoshi No Dialogue> at the first turn
+	if not Cirn9.global_check1 then
+		Cirn9.global_check1=true
+		local ge1=Effect.GlobalEffect()
+		ge1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+		ge1:SetCode(EVENT_PHASE_START+PHASE_DRAW)
+		ge1:SetCondition(Cirn9.opcon)
+		ge1:SetOperation(Cirn9.opop)
+		Duel.RegisterEffect(ge1,0)
+	end
+	--ac1
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e3:SetCode(EVENT_ADD_COUNTER+0xc99)
+	e3:SetOperation(Cirn9.acop)
+	c:RegisterEffect(e3)
+end
+
+--ReLive field magic can not be setted
+function Cirn9.ReLiveStage(c)
+	if not Cirn9.global_check2 then
+		Cirn9.global_check2=true
+		local ge=Effect.GlobalEffect()
+		ge:SetType(EFFECT_TYPE_FIELD)
+		ge:SetCode(EFFECT_CANNOT_SSET)
+		ge:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+		ge:SetTargetRange(1,1)
+		ge:SetTarget(Cirn9.stg)
+		Duel.RegisterEffect(ge,0)
+	end 
+	--Activate without operation
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(20100108,1))
+	e2:SetType(EFFECT_TYPE_ACTIVATE)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetTarget(Cirn9.nanacon2)
+	e2:SetOperation(Cirn9.stageop)
+	c:RegisterEffect(e2)
+end
+
+function Cirn9.ReLink(c)
+	--link
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetCode(20100098)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetRange(LOCATION_ONFIELD)
+	e1:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e1:SetTarget(Cirn9.linktg)
+	c:RegisterEffect(e1)
+end
+function Cirn9.linktg(e,c)
+	return e:GetHandler():GetLinkedGroup():IsContains(c)
+end
+function Cirn9.ffilter(c,tp)
+	return c:IsType(TYPE_FIELD) and c:GetActivateEffect():IsActivatable(tp,true,true) and c:IsSetCard(0xc99)
+end
+
+--Activate ReliveStage or Not
+function Cirn9.Climax(e,tp,eg,ep,ev,re,r,rp)
+	local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
+	if not fc and not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return 0 end
+	if not fc then
+		Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(20100060,4))
+		local tc=Duel.SelectMatchingCard(tp,Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,tp):GetFirst()
+		if tc then
+			Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+			local te=tc:GetActivateEffect()
+			te:UseCountLimit(tp,1,true)
+			local tep=tc:GetControler()
+			local cost=te:GetCost()
+			if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+			Duel.RaiseEvent(tc,4179255,te,0,tp,tp,Duel.GetCurrentChain())
+			return 1
+		end
+	end
+	if fc then 
+		if not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return 2 end
+		if Duel.SelectYesNo(tp,aux.Stringid(20100060,5)) then
+			Duel.SendtoGrave(fc,REASON_RULE)
+			Duel.BreakEffect()
+			Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(20100060,4))
+			local tc=Duel.SelectMatchingCard(tp,Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,1,nil,tp):GetFirst()
+			if tc then
+				Duel.MoveToField(tc,tp,tp,LOCATION_SZONE,POS_FACEUP,true)
+				local te=tc:GetActivateEffect()
+				te:UseCountLimit(tp,1,true)
+				local tep=tc:GetControler()
+				local cost=te:GetCost()
+				if cost then cost(te,tep,eg,ep,ev,re,r,rp,1) end
+				Duel.RaiseEvent(tc,4179255,te,0,tp,tp,Duel.GetCurrentChain())
+				return 1
+			end
+		end
+		return 2
+	end
+end
+
+function Cirn9.rlcost(e,c,tp)
+	local fa=Duel.GetFlagEffect(tp,20100050)	--Copy From THC Makai Deck
+	local fb=Duel.GetFlagEffect(tp,20100051)	--Thanks Hiragi Sama
+	local fc=fa-fb
+	return (fc<6) or (e:GetHandler():GetFlagEffect(20100070)~=0) or Duel.IsPlayerAffectedByEffect(tp,20100134)
+end
+function Cirn9.rlop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.IsPlayerAffectedByEffect(tp,20100134) then return end
+	if (e:GetHandler():GetFlagEffect(20100070)>0) then return end	  
+	Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local rd=6-fa+fb
+	if e:GetHandler():IsOriginalSetCard(0xc99) then
+		Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
+	end
+end
+ 
+function Cirn9.opcon(e)
+	return Duel.GetTurnCount() == 1
+end
+function Cirn9.opop(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(11,0,aux.Stringid(20100060,3))
+end
+
+function Cirn9.ap1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local fc=fa-fb
+	if chk==0 then return fc<6 end
+	Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local rd=5-fc
+	Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
+end
+function Cirn9.ap2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local fc=fa-fb
+	if chk==0 then return fc<5 end
+	Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	Duel.Hint(HINT_OPSELECTED,1-tp,e:GetDescription())
+	local rd=4-fc
+	Debug.Message("ReLive卡行动次数剩余"..rd.."次  DA☆ZE")
+end
+function Cirn9.fumiap2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local fc=fa-fb
+	if chk==0 then return fc<5 or (e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE) and fc<6) end
+	if e:GetHandler():IsSummonType(SUMMON_TYPE_ADVANCE) then
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	else
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	end
+	local ea=Duel.GetFlagEffect(tp,20100050)
+	local eb=Duel.GetFlagEffect(tp,20100051)
+	local ec=6-ea+eb
+	Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
+end
+function Cirn9.stg(e,c)
+	return c:IsSetCard(0xc99) and c:IsType(TYPE_FIELD)
+end
+function Cirn9.clcon(e,tp,eg,ep,ev,re,r,rp)
+	local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
+	if not fc and not Duel.IsExistingMatchingCard(Cirn9.ffilter,tp,LOCATION_DECK+LOCATION_HAND,0,1,nil,tp) then return false end
+	return true
+end
+function Cirn9.clcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsCanRemoveCounter(tp,0xc99,3,REASON_COST) end
+	e:GetHandler():RemoveCounter(tp,0xc99,3,REASON_COST)
+	Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
+	Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
+	Duel.RegisterFlagEffect(tp,20100053,RESET_PHASE+PHASE_END,0,1)
+end
+function Cirn9.RevueBgm(tp)
+	local fc=Duel.GetFieldCard(tp,LOCATION_SZONE,5)
+	local fcode=fc:GetOriginalCode()
+	Duel.Hint(11,0,aux.Stringid(fcode,0))
+end
+function Cirn9.GetLine(c)
+	if c:IsLocation(LOCATION_FZONE) then return 99  end
+	if c:IsLocation(LOCATION_SZONE) then return 1   end
+	if c:IsLocation(LOCATION_MZONE) and c:GetSequence()<5 then return 2 end
+	if c:IsLocation(LOCATION_MZONE) and c:GetSequence()>4 then return 3 end
+end
+function Cirn9.fap1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local f1=Duel.GetFlagEffect(tp,20100088)
+	local f2=Duel.GetFlagEffect(tp,20100089)
+	local fc=fa-fb
+	local f3=f1-f2
+	if chk==0 then return (fc<6 and e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST)) or (f3>0) end
+	if fc<6 then
+		if f3<1 then 
+			Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
+			e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+		elseif f3>0 then
+			if e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) then
+				if Duel.SelectYesNo(tp,aux.Stringid(20100088,3)) then
+					Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				else
+					Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
+					e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+				end
+			else
+				Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)  
+			end
+		end
+	else
+		Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1) 
+	end
+	local ea=Duel.GetFlagEffect(tp,20100050)
+	local eb=Duel.GetFlagEffect(tp,20100051)
+	local ec=6-ea+eb
+	Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
+end
+					
+function Cirn9.arrap1(e,tp,eg,ep,ev,re,r,rp,chk)
+	local og=e:GetHandler():GetOverlayGroup()
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local f1=Duel.GetFlagEffect(tp,20100088)
+	local f2=Duel.GetFlagEffect(tp,20100089)
+	local fc=fa-fb
+	local f3=f1-f2
+	if chk==0 then return (fc<6 and og:FilterCount(Card.IsAbleToRemoveAsCost,nil)>0) or (f3>0) end
+	if fc<6 then
+		if f3<1 then 
+			Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
+			local g=og:FilterSelect(tp,Card.IsAbleToRemoveAsCost,1,1,nil)
+			Duel.Remove(g,POS_FACEUP,REASON_COST)
+		elseif f3>0 then
+			if og:FilterCount(Card.IsAbleToRemoveAsCost,nil)>0 then
+				if Duel.SelectYesNo(tp,aux.Stringid(20100088,3)) then
+					Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+					Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				else
+					Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1) 
+					local g=og:FilterSelect(tp,Card.IsAbleToRemoveAsCost,1,1,nil)
+					Duel.Remove(g,POS_FACEUP,REASON_COST)
+				end
+			else
+				Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+				Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)  
+			end
+		end
+	else
+		Duel.RegisterFlagEffect(tp,20100089,RESET_PHASE+PHASE_END,0,1) 
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100051,RESET_PHASE+PHASE_END,0,1) 
+	end
+	local ea=Duel.GetFlagEffect(tp,20100050)
+	local eb=Duel.GetFlagEffect(tp,20100051)
+	local ec=6-ea+eb
+	Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
+end
+
+function Cirn9.rlink(c)
+	return c:IsType(TYPE_LINK) or (c:IsType(TYPE_CONTINUOUS) and c:IsType(TYPE_SPELL)) and c:IsSetCard(0xc99) and c:IsFaceup()
+end
+
+function Cirn9.sap2(e,tp,eg,ep,ev,re,r,rp,chk)
+	local fa=Duel.GetFlagEffect(tp,20100050)
+	local fb=Duel.GetFlagEffect(tp,20100051)
+	local fc=fa-fb
+	local rls=0
+	local lg=e:GetHandler():GetLinkedGroup()
+	if lg:IsExists(Card.IsSetCard,1,nil,0xc99)  then rls=1 end
+	if e:GetHandler():IsHasEffect(20100098) then rls=1 end
+	if chk==0 then return (fc<5 or((rls==1) and (fc<6))) end
+	if (rls==1) then
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	else
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+		Duel.RegisterFlagEffect(tp,20100050,RESET_PHASE+PHASE_END,0,1)
+	end
+	local ea=Duel.GetFlagEffect(tp,20100050)
+	local eb=Duel.GetFlagEffect(tp,20100051)
+	local ec=6-ea+eb
+	Debug.Message("ReLive卡行动次数剩余"..ec.."次  DA☆ZE")
+end
+function Cirn9.IsReLinkState(c)
+	if c:IsHasEffect(20100098) then return true end
+	if c:GetLinkedGroup():IsExists(Card.IsSetCard,1,nil,0xc99) then return true end
+	return false
+end
+function Cirn9.nanacon1(e,tp,eg,ep,ev,re,r,rp)
+	return (Duel.GetFlagEffect(tp,20100068)==0)
+end
+function Cirn9.nanacon2(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chk==0 then return (Duel.GetFlagEffect(tp,20100068)~=0) end
+end
+function Cirn9.stageop(e,tp,eg,ep,ev,re,r,rp)
+	Cirn9.RevueBgm(tp)
+end
+function Cirn9.FinishAct(c)
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(20100108,3))
+	e1:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_TRIGGER_F)
+	e1:SetCode(EVENT_PHASE+PHASE_END)
+	e1:SetRange(LOCATION_FZONE)
+	e1:SetCost(Cirn9.finalcost)
+	e1:SetCountLimit(1)
+	e1:SetCondition(Cirn9.finalcon)
+	return e1
+end
+function Cirn9.finalcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SendtoGrave(e:GetHandler(),REASON_COST)
+end
+function Cirn9.finalcon(e,tp,eg,ep,ev,re,r,rp)
+	local tid=e:GetHandler():GetTurnID()
+	return (Duel.GetTurnCount()==tid+1)
+end
+function Cirn9.acop(e,tp,eg,ep,ev,re,r,rp)
+	for i=1,ev do
+		Duel.RegisterFlagEffect(tp,20100052,RESET_PHASE+PHASE_END,0,1)
+	end
 end
\ No newline at end of file

expansions/script/c21520180.lua

---镜面结合
-function c21520180.initial_effect(c)
-	--special summon
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(21520180,0))
-	e1:SetType(EFFECT_TYPE_ACTIVATE)
-	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
-	e1:SetCode(EVENT_FREE_CHAIN)
-	e1:SetCountLimit(1,21520180)
-	e1:SetTarget(c21520180.target)
-	e1:SetOperation(c21520180.activate)
-	c:RegisterEffect(e1)
-	--fusion summon
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(21520180,1))
-	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_REMOVE)
-	e2:SetType(EFFECT_TYPE_IGNITION)
-	e2:SetRange(LOCATION_GRAVE)
-	e2:SetCountLimit(1,21520180)
-	e2:SetCost(c21520180.fscost)
-	e2:SetTarget(c21520180.fstg)
-	e2:SetOperation(c21520180.fsop)
-	c:RegisterEffect(e2)
-	--silence
-	local e3=Effect.CreateEffect(c)
-	e3:SetDescription(aux.Stringid(21520180,2))
-	e3:SetProperty(EFFECT_FLAG_CLIENT_HINT)
-	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e3:SetRange(LOCATION_SZONE)
-	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
-	e3:SetCondition(c21520180.actcon)
-	e3:SetOperation(c21520180.actop)
-	c:RegisterEffect(e3)
-	local e3_2=e3:Clone()
-	e3_2:SetCode(EVENT_BE_BATTLE_TARGET)
-	c:RegisterEffect(e3_2)
-end
-function c21520180.tgfilter(c)
-	return c:IsSetCard(0x490) and c:IsCanBeEffectTarget() and c:IsFaceup() and c:IsType(TYPE_MONSTER)
-end
-function c21520180.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_MZONE) and chkc:IsFaceup() and chkc:IsSetCard(0x490) end
-
-	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and 
-		Duel.IsPlayerCanSpecialSummonMonster(tp,nil,0,0x11,0,0,nil,RACE_FIEND,ATTRIBUTE_DARK) and 
-		Duel.IsExistingMatchingCard(c21520180.tgfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,nil) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-	local sg=Duel.SelectTarget(tp,c21520180.tgfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,1,nil)
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,1,0,0)
-end
-function c21520180.activate(e,tp,eg,ep,ev,re,r,rp)
-	local ec=Duel.GetFirstTarget()
-	local c=e:GetHandler()
-	if c:IsRelateToEffect(e) and 
-		Duel.IsPlayerCanSpecialSummonMonster(tp,nil,0,0x11,ec:GetAttack(),ec:GetDefense(),ec:GetLevel(),RACE_FIEND,ATTRIBUTE_DARK) then
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_CHANGE_TYPE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetValue(TYPE_NORMAL+TYPE_MONSTER)
-		e1:SetReset(RESET_EVENT+0x47c0000)
-		c:RegisterEffect(e1,true)
---[[		local e2=e1:Clone()
-		e2:SetCode(EFFECT_CHANGE_RACE)
-		e2:SetValue(RACE_FIEND)
-		c:RegisterEffect(e2,true)
-		local e3=e1:Clone()
-		e3:SetCode(EFFECT_CHANGE_ATTRIBUTE)
-		e3:SetValue(ATTRIBUTE_DARK)
-		c:RegisterEffect(e3,true)
-		local e4=e1:Clone()
-		e4:SetCode(EFFECT_CHANGE_LEVEL)
-		e4:SetValue(ec:GetLevel())
-		c:RegisterEffect(e4,true)--]]
-		local e5=e1:Clone()
-		e5:SetCode(EFFECT_SET_BASE_ATTACK)
-		e5:SetValue(ec:GetAttack())
-		c:RegisterEffect(e5,true)
-		local e6=e1:Clone()
-		e6:SetCode(EFFECT_SET_BASE_DEFENSE)
-		e6:SetValue(ec:GetDefense())
-		c:RegisterEffect(e6,true)
-		local e7=e1:Clone()
-		e7:SetCode(EFFECT_CHANGE_CODE)
-		e7:SetValue(ec:GetOriginalCode())
-		c:RegisterEffect(e7,true)
-		local e8=Effect.CreateEffect(c)
-		e8:SetType(EFFECT_TYPE_SINGLE)
-		e8:SetCode(EFFECT_TO_GRAVE_REDIRECT_CB)
-		e8:SetProperty(EFFECT_FLAG_UNCOPYABLE)
-		e8:SetCondition(c21520180.repcon)
-		e8:SetOperation(c21520180.repop)
-		c:RegisterEffect(e8)
-		Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP)
-	end
-end
-function c21520180.repcon(e)
-	local c=e:GetHandler()
-	return c:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsReason(REASON_DESTROY)
-end
-function c21520180.repop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	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+0x1fc0000)
-	e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
-	c:RegisterEffect(e1)
-end
-function c21520180.fmfilter(c,e)
-	return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
-end
-function c21520180.fsfilter(c,e,tp,mg)
-	return c:IsSetCard(0x490) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) 
-		and c:CheckFusionMaterial(mg)
-end
-function c21520180.fscost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
-	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
-end
-function c21520180.fstg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then 
-		local mg=Duel.GetMatchingGroup(c21520180.fmfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,nil,e)
-		return Duel.GetLocationCountFromEx(tp)>0
-			and Duel.IsExistingMatchingCard(c21520180.fsfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg) end
-	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
-end
-function c21520180.fsop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetLocationCountFromEx(tp)<=0 then return end
-	local mg=Duel.GetMatchingGroup(c21520180.fmfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,nil,e)
-	local sg=Duel.GetMatchingGroup(c21520180.fsfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg)
-	if sg:GetCount()>0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-		local tg=sg:Select(tp,1,1,nil)
-		local tc=tg:GetFirst()
-		Duel.ConfirmCards(1-tp,tc)
-		local code=tc:GetCode()
-		local mat=Duel.SelectFusionMaterial(tp,tc,mg)
-		local fg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_EXTRA,0,nil,code)
-		local tc=fg:GetFirst()
-		while tc do
-			tc:SetMaterial(mat)
-			tc=fg:GetNext()
-		end
-		Duel.Remove(mat,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
-		local tc=Duel.GetFirstMatchingCard(c21520180.procfilter,tp,LOCATION_EXTRA,0,nil,code,e,tp)
-		if not tc then return end
-		if Duel.GetLocationCountFromEx(tp)<=0 then
-			Duel.SendtoGrave(tc,REASON_EFFECT)
-			tc:CompleteProcedure()
-		else
-			Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
-			tc:CompleteProcedure()
-		end
-	end
-end
-function c21520180.procfilter(c,code,e,tp)
-	return c:IsCode(code) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false)
-end
-function c21520180.actcon(e,tp,eg,ep,ev,re,r,rp)
-	local tc=Duel.GetAttacker()
-	if tc:IsControler(1-tp) then tc=Duel.GetAttackTarget() end
-	return tc and tc:IsControler(tp) and tc:IsSetCard(0x490)
-end
-function c21520180.actop(e,tp,eg,ep,ev,re,r,rp)
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
-	e1:SetCode(EFFECT_CANNOT_ACTIVATE)
-	e1:SetTargetRange(0,1)
-	e1:SetValue(c21520180.aclimit)
-	e1:SetReset(RESET_PHASE+PHASE_DAMAGE)
-	Duel.RegisterEffect(e1,tp)
-end
-function c21520180.aclimit(e,re,tp)
-	return not re:GetHandler():IsImmuneToEffect(e)
-end
+--镜面结合
+function c21520180.initial_effect(c)
+	--special summon
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(21520180,0))
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e1:SetCategory(CATEGORY_SPECIAL_SUMMON)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCountLimit(1,21520180)
+	e1:SetTarget(c21520180.target)
+	e1:SetOperation(c21520180.activate)
+	c:RegisterEffect(e1)
+	--fusion summon
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(21520180,1))
+	e2:SetCategory(CATEGORY_SPECIAL_SUMMON+CATEGORY_FUSION_SUMMON+CATEGORY_REMOVE)
+	e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetRange(LOCATION_GRAVE)
+	e2:SetCountLimit(1,21520180)
+	e2:SetCost(c21520180.fscost)
+	e2:SetTarget(c21520180.fstg)
+	e2:SetOperation(c21520180.fsop)
+	c:RegisterEffect(e2)
+	--silence
+	local e3=Effect.CreateEffect(c)
+	e3:SetDescription(aux.Stringid(21520180,2))
+	e3:SetProperty(EFFECT_FLAG_CLIENT_HINT)
+	e3:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e3:SetRange(LOCATION_SZONE)
+	e3:SetCode(EVENT_ATTACK_ANNOUNCE)
+	e3:SetCondition(c21520180.actcon)
+	e3:SetOperation(c21520180.actop)
+	c:RegisterEffect(e3)
+	local e3_2=e3:Clone()
+	e3_2:SetCode(EVENT_BE_BATTLE_TARGET)
+	c:RegisterEffect(e3_2)
+end
+function c21520180.tgfilter(c)
+	return c:IsSetCard(0x490) and c:IsCanBeEffectTarget() and c:IsFaceup() and c:IsType(TYPE_MONSTER)
+end
+function c21520180.target(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_GRAVE+LOCATION_MZONE) and chkc:IsFaceup() and chkc:IsSetCard(0x490) end
+
+	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and 
+		Duel.IsPlayerCanSpecialSummonMonster(tp,nil,0,0x11,0,0,nil,RACE_FIEND,ATTRIBUTE_DARK) and 
+		Duel.IsExistingMatchingCard(c21520180.tgfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,nil) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local sg=Duel.SelectTarget(tp,c21520180.tgfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,LOCATION_MZONE+LOCATION_GRAVE,1,1,nil)
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,sg,1,0,0)
+end
+function c21520180.activate(e,tp,eg,ep,ev,re,r,rp)
+	local ec=Duel.GetFirstTarget()
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and 
+		Duel.IsPlayerCanSpecialSummonMonster(tp,nil,0,0x11,ec:GetAttack(),ec:GetDefense(),1,RACE_FIEND,ATTRIBUTE_DARK) then
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_CHANGE_TYPE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetValue(TYPE_NORMAL+TYPE_MONSTER)
+		e1:SetReset(RESET_EVENT+0x47c0000)
+		c:RegisterEffect(e1,true)
+		local e2=e1:Clone()
+		e2:SetCode(EFFECT_CHANGE_RACE)
+		e2:SetValue(RACE_FIEND)
+		c:RegisterEffect(e2,true)
+		local e3=e1:Clone()
+		e3:SetCode(EFFECT_CHANGE_ATTRIBUTE)
+		e3:SetValue(ATTRIBUTE_DARK)
+		c:RegisterEffect(e3,true)
+--[[		local e4=e1:Clone()
+		e4:SetCode(EFFECT_CHANGE_LEVEL)
+		e4:SetValue(ec:GetLevel())
+		c:RegisterEffect(e4,true)--]]
+		local e5=e1:Clone()
+		e5:SetCode(EFFECT_SET_BASE_ATTACK)
+		e5:SetValue(ec:GetAttack())
+		c:RegisterEffect(e5,true)
+		local e6=e1:Clone()
+		e6:SetCode(EFFECT_SET_BASE_DEFENSE)
+		e6:SetValue(ec:GetDefense())
+		c:RegisterEffect(e6,true)
+		local e7=e1:Clone()
+		e7:SetCode(EFFECT_CHANGE_CODE)
+		e7:SetValue(ec:GetOriginalCode())
+		c:RegisterEffect(e7,true)
+		local e8=Effect.CreateEffect(c)
+		e8:SetType(EFFECT_TYPE_SINGLE)
+		e8:SetCode(EFFECT_TO_GRAVE_REDIRECT_CB)
+		e8:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+		e8:SetCondition(c21520180.repcon)
+		e8:SetOperation(c21520180.repop)
+		c:RegisterEffect(e8)
+		Duel.SpecialSummon(c,0,tp,tp,true,false,POS_FACEUP)
+	end
+end
+function c21520180.repcon(e)
+	local c=e:GetHandler()
+	return c:IsFaceup() and c:IsLocation(LOCATION_MZONE) and c:IsReason(REASON_DESTROY)
+end
+function c21520180.repop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	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+0x1fc0000)
+	e1:SetValue(TYPE_SPELL+TYPE_CONTINUOUS)
+	c:RegisterEffect(e1)
+end
+function c21520180.fmfilter(c,e)
+	return c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
+end
+function c21520180.fsfilter(c,e,tp,mg)
+	return c:IsSetCard(0x490) and c:IsType(TYPE_FUSION) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false) 
+		and c:CheckFusionMaterial(mg)
+end
+function c21520180.fscost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToRemoveAsCost() end
+	Duel.Remove(e:GetHandler(),POS_FACEUP,REASON_COST)
+end
+function c21520180.fstg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then 
+		local mg=Duel.GetMatchingGroup(c21520180.fmfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,nil,e)
+		return Duel.GetLocationCountFromEx(tp)>0
+			and Duel.IsExistingMatchingCard(c21520180.fsfilter,tp,LOCATION_EXTRA,0,1,nil,e,tp,mg) end
+	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_EXTRA)
+end
+function c21520180.fsop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.GetLocationCountFromEx(tp)<=0 then return end
+	local mg=Duel.GetMatchingGroup(c21520180.fmfilter,tp,LOCATION_HAND+LOCATION_ONFIELD+LOCATION_GRAVE,0,nil,e)
+	local sg=Duel.GetMatchingGroup(c21520180.fsfilter,tp,LOCATION_EXTRA,0,nil,e,tp,mg)
+	if sg:GetCount()>0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
+		local tg=sg:Select(tp,1,1,nil)
+		local tc=tg:GetFirst()
+		Duel.ConfirmCards(1-tp,tc)
+		local code=tc:GetCode()
+		local mat=Duel.SelectFusionMaterial(tp,tc,mg)
+		local fg=Duel.GetMatchingGroup(Card.IsCode,tp,LOCATION_EXTRA,0,nil,code)
+		local tc=fg:GetFirst()
+		while tc do
+			tc:SetMaterial(mat)
+			tc=fg:GetNext()
+		end
+		Duel.Remove(mat,POS_FACEUP,REASON_EFFECT+REASON_MATERIAL+REASON_FUSION)
+		local tc=Duel.GetFirstMatchingCard(c21520180.procfilter,tp,LOCATION_EXTRA,0,nil,code,e,tp)
+		if not tc then return end
+		if Duel.GetLocationCountFromEx(tp)<=0 then
+			Duel.SendtoGrave(tc,REASON_EFFECT)
+			tc:CompleteProcedure()
+		else
+			Duel.SpecialSummon(tc,SUMMON_TYPE_FUSION,tp,tp,false,false,POS_FACEUP)
+			tc:CompleteProcedure()
+		end
+	end
+end
+function c21520180.procfilter(c,code,e,tp)
+	return c:IsCode(code) and c:IsCanBeSpecialSummoned(e,SUMMON_TYPE_FUSION,tp,false,false)
+end
+function c21520180.actcon(e,tp,eg,ep,ev,re,r,rp)
+	local tc=Duel.GetAttacker()
+	if tc:IsControler(1-tp) then tc=Duel.GetAttackTarget() end
+	return tc and tc:IsControler(tp) and tc:IsSetCard(0x490)
+end
+function c21520180.actop(e,tp,eg,ep,ev,re,r,rp)
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_FIELD)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCode(EFFECT_CANNOT_ACTIVATE)
+	e1:SetTargetRange(0,1)
+	e1:SetValue(c21520180.aclimit)
+	e1:SetReset(RESET_PHASE+PHASE_DAMAGE)
+	Duel.RegisterEffect(e1,tp)
+end
+function c21520180.aclimit(e,re,tp)
+	return not re:GetHandler():IsImmuneToEffect(e)
+end

expansions/script/c21520182.lua

---幻形魔-昂千德
-function c21520182.initial_effect(c)
-	c:EnableReviveLimit()
-	--fusion material
-	aux.AddFusionProcMixRep(c,false,false,aux.FilterBoolFunction(Card.IsFusionSetCard,0x490),3,100)
-	--spsummon condition
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(c21520182.splimit)
-	c:RegisterEffect(e1)
-	--cost
-	local e00=Effect.CreateEffect(c)
-	e00:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e00:SetDescription(aux.Stringid(21520182,4))
-	e00:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
-	e00:SetCode(EVENT_PHASE+PHASE_END)
-	e00:SetCountLimit(1)
-	e00:SetRange(LOCATION_MZONE)
-	e00:SetCondition(c21520182.ccon)
-	e00:SetOperation(c21520182.ccost)
-	c:RegisterEffect(e00)
-	--attribute
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_SINGLE)
-	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCode(EFFECT_ADD_ATTRIBUTE)
-	e2:SetValue(ATTRIBUTE_DARK)
-	c:RegisterEffect(e2)
-	
-	--atk def
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_SINGLE)
-	e4:SetCode(EFFECT_MATERIAL_CHECK)
-	e4:SetValue(c21520182.matcheck)
-	c:RegisterEffect(e4)
---[[	local e5=Effect.CreateEffect(c)
-	e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
-	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
-	e5:SetCondition(c21520182.regcon)
-	e5:SetOperation(c21520182.regop)
-	e5:SetLabelObject(e4)
-	c:RegisterEffect(e5)--]]
-	--copy
-	local e6=Effect.CreateEffect(c)
-	e6:SetType(EFFECT_TYPE_QUICK_O)
-	e6:SetDescription(aux.Stringid(21520182,3))
-	e6:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e6:SetCode(EVENT_FREE_CHAIN)
-	e6:SetRange(LOCATION_MZONE)
-	e6:SetCountLimit(1,21520182)
-	e6:SetTarget(c21520182.cptg)
-	e6:SetOperation(c21520182.cpop)
-	c:RegisterEffect(e6)
-	--draw
-	local e7=Effect.CreateEffect(c)
-	e7:SetCategory(CATEGORY_DRAW)
-	e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
-	e7:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
-	e7:SetCode(EVENT_TO_GRAVE)
-	e7:SetCondition(c21520182.drcon)
-	e7:SetTarget(c21520182.drtg)
-	e7:SetOperation(c21520182.drop)
-	c:RegisterEffect(e7)
-end
-function c21520182.splimit(e,se,sp,st)
-	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
-end
-function c21520182.cfilter1(c)
-	return c:IsType(TYPE_MONSTER) and c:IsAttribute(ATTRIBUTE_LIGHT) and not c:IsPublic()
-end
-function c21520182.ccon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp
-end
-function c21520182.ccost(e,tp)
-	if tp~=Duel.GetTurnPlayer() then return end
-	local c=e:GetHandler()
-	local g1=Duel.GetMatchingGroup(c21520182.cfilter1,tp,LOCATION_HAND,0,nil)
-	local opselect=2
-	if g1:GetCount()>0 then
-		opselect=Duel.SelectOption(tp,aux.Stringid(21520182,0),aux.Stringid(21520182,1),aux.Stringid(21520182,2))
-	else 
-		opselect=Duel.SelectOption(tp,aux.Stringid(21520182,1),aux.Stringid(21520182,2))
-		opselect=opselect+1
-	end
-	if opselect==0 then
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
-		local g=g1:Select(tp,1,1,nil)
-		Duel.ConfirmCards(1-tp,g)
-		Duel.ShuffleHand(tp)
-	elseif opselect==1 then
-		local e1=Effect.CreateEffect(c)
-		e1:SetCategory(CATEGORY_ATKCHANGE)
-		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetCode(EFFECT_UPDATE_ATTACK)
-		e1:SetRange(LOCATION_MZONE)
-		e1:SetValue(-c:GetAttack())
-		e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
-		c:RegisterEffect(e1)
-		local e2=e1:Clone()
-		e2:SetCategory(CATEGORY_DEFCHANGE)
-		e2:SetCode(EFFECT_UPDATE_DEFENSE)
-		e2:SetValue(-c:GetDefense())
-		c:RegisterEffect(e2)
-	else
-		Duel.Destroy(e:GetHandler(),REASON_RULE)
-	end
-end
---[[
-function c21520182.ffilter(c,cat,fc,race)
-	if cat~=nil and race==nil then
-		return c:IsFusionSetCard(0x490) and c:IsCanBeFusionMaterial(fc)
-	elseif cat==nil and race~=nil then
-		return c:IsRace(RACE_FIEND) and c:IsCanBeFusionMaterial(fc)
-	end
-end
-function c21520182.fscondition(e,g,gc,chkf)
-	if g==nil then return true end
-	if gc then return false end
-	local g1=g:Filter(c21520182.ffilter,nil,0x490,e:GetHandler(),nil)
-	local c1=g1:GetCount()
-	local g2=g:Filter(c21520182.ffilter,nil,nil,e:GetHandler(),RACE_FIEND)
-	local c2=g2:GetCount()
-	local ag=g1:Clone()
-	ag:Merge(g2)
-	if chkf~=PLAYER_NONE and not ag:IsExists(aux.FConditionCheckF,1,nil,chkf) then return false end
-	return c1>0 and c2>1 and ag:GetCount()>=3
-end
-function c21520182.fsoperation(e,tp,eg,ep,ev,re,r,rp,gc)
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
-	local g1=g:Filter(c21520182.ffilter,nil,0x490,e:GetHandler(),nil)
-	local g2=g:Filter(c21520182.ffilter,nil,nil,e:GetHandler(),RACE_FIEND)
-	local ag=g1:Clone()
-	ag:Merge(g2)
-	local tc=nil
-	local f1=0
-	local f2=0
-	local mg=Group.CreateGroup()
-	Duel.SetFusionMaterial(eg:FilterSelect(tp,c21520182.ffilter,3,100,nil))
-end
-]]
-function c21520182.matcheck(e,c)
---	local g=c:GetMaterial()
---	e:SetLabel(g:GetClassCount(Card.GetOriginalCode))
-	local ct=c:GetMaterialCount()
-	local ae=Effect.CreateEffect(c)
-	ae:SetType(EFFECT_TYPE_SINGLE)
-	ae:SetCode(EFFECT_SET_BASE_ATTACK)
-	ae:SetValue(ct*450)
-	ae:SetReset(RESET_EVENT+0xff0000)
-	c:RegisterEffect(ae)
-	local de=ae:Clone()
-	de:SetCode(EFFECT_SET_BASE_DEFENSE)
-	c:RegisterEffect(de)
-end
-function c21520182.regcon(e,tp,eg,ep,ev,re,r,rp)
-	return bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
-end
-function c21520182.regop(e,tp,eg,ep,ev,re,r,rp)
-	local ct=e:GetLabelObject():GetLabel()
-	local c=e:GetHandler()
-	local ae=Effect.CreateEffect(c)
-	ae:SetType(EFFECT_TYPE_SINGLE)
-	ae:SetCode(EFFECT_UPDATE_ATTACK)
-	ae:SetValue(ct*900)
-	ae:SetReset(RESET_EVENT+0x1ff0000)
-	c:RegisterEffect(ae)
-	local de=ae:Clone()
-	de:SetCode(EFFECT_UPDATE_DEFENSE)
-	c:RegisterEffect(de)
-end
-function c21520182.cpfilter(c)
-	return c:IsType(TYPE_EFFECT) and c:IsFaceup()
-end
-function c21520182.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return c21520182.cpfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c21520182.cpfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,LOCATION_GRAVE+LOCATION_MZONE,1,e:GetHandler()) end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
-	local g1=Duel.SelectTarget(tp,c21520182.cpfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,LOCATION_GRAVE+LOCATION_MZONE,1,1,e:GetHandler())
---	local loc=g1:GetFirst():GetLocation()
---	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g1,1,tp,loc)
-end
-function c21520182.cpop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if not c:IsOnField() or c:IsFacedown() then return end
-	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
-	local tc=g:GetFirst()
-	if tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
---[[		local e2=Effect.CreateEffect(c)
-		e2:SetType(EFFECT_TYPE_SINGLE)
-		e2:SetCode(EFFECT_DISABLE)
-		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e2)
-		local e3=Effect.CreateEffect(c)
-		e3:SetType(EFFECT_TYPE_SINGLE)
-		e3:SetCode(EFFECT_DISABLE_EFFECT)
-		e3:SetValue(RESET_TURN_SET)
-		e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e3)--]]
-		local code=tc:GetOriginalCode()
-		local e1=Effect.CreateEffect(c)
-		e1:SetType(EFFECT_TYPE_SINGLE)
-		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
-		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-		e1:SetCode(EFFECT_CHANGE_CODE)
-		e1:SetValue(code)
-		c:RegisterEffect(e1)
-		c:CopyEffect(code,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,1)
---		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
-	end
-end
-function c21520182.drcon(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY)
-end
-function c21520182.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,1)
-end
-function c21520182.drop(e,tp,eg,ep,ev,re,r,rp)
-	local g=Duel.GetFieldGroup(tp,LOCATION_REMOVED,LOCATION_REMOVED)
-	if g:GetCount()==0 then return end
-	Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
-	Duel.BreakEffect()
-	local tg=Duel.GetOperatedGroup()
---	if tg:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then 
-		Duel.ShuffleDeck(tp) 
-		Duel.ShuffleDeck(1-tp) 
---	end
-	local ct=tg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
-	if ct>0 then 
-		Duel.Draw(tp,1,REASON_EFFECT)
-		Duel.Draw(1-tp,1,REASON_EFFECT)
-	end
-end
+--幻形魔-昂千德
+function c21520182.initial_effect(c)
+	c:EnableReviveLimit()
+	--fusion material
+	aux.AddFusionProcMixRep(c,false,false,c21520182.sefilter,3,100)
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(c21520182.splimit)
+	c:RegisterEffect(e1)
+	--cost
+	local e00=Effect.CreateEffect(c)
+	e00:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
+	e00:SetDescription(aux.Stringid(21520182,4))
+	e00:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
+	e00:SetCode(EVENT_PHASE+PHASE_END)
+	e00:SetCountLimit(1)
+	e00:SetRange(LOCATION_MZONE)
+	e00:SetCondition(c21520182.ccon)
+	e00:SetOperation(c21520182.ccost)
+	c:RegisterEffect(e00)
+	--attribute
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_SINGLE)
+	e2:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCode(EFFECT_ADD_ATTRIBUTE)
+	e2:SetValue(ATTRIBUTE_DARK)
+	c:RegisterEffect(e2)
+	
+	--atk def
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetCode(EFFECT_MATERIAL_CHECK)
+	e4:SetValue(c21520182.matcheck)
+	c:RegisterEffect(e4)
+--[[	local e5=Effect.CreateEffect(c)
+	e5:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e5:SetCode(EVENT_SPSUMMON_SUCCESS)
+	e5:SetCondition(c21520182.regcon)
+	e5:SetOperation(c21520182.regop)
+	e5:SetLabelObject(e4)
+	c:RegisterEffect(e5)--]]
+	--copy
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_QUICK_O)
+	e6:SetDescription(aux.Stringid(21520182,3))
+	e6:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e6:SetCode(EVENT_FREE_CHAIN)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCountLimit(1,21520182)
+	e6:SetTarget(c21520182.cptg)
+	e6:SetOperation(c21520182.cpop)
+	c:RegisterEffect(e6)
+	--draw
+	local e7=Effect.CreateEffect(c)
+	e7:SetCategory(CATEGORY_DRAW)
+	e7:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_TRIGGER_F)
+	e7:SetProperty(EFFECT_FLAG_DELAY+EFFECT_FLAG_DAMAGE_STEP)
+	e7:SetCode(EVENT_TO_GRAVE)
+	e7:SetCondition(c21520182.drcon)
+	e7:SetTarget(c21520182.drtg)
+	e7:SetOperation(c21520182.drop)
+	c:RegisterEffect(e7)
+end
+function c21520182.splimit(e,se,sp,st)
+	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
+end
+function c21520182.cfilter1(c)
+	return c:IsType(TYPE_MONSTER) and c:IsAttribute(ATTRIBUTE_LIGHT) and not c:IsPublic()
+end
+function c21520182.ccon(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetTurnPlayer()==tp
+end
+function c21520182.ccost(e,tp)
+	if tp~=Duel.GetTurnPlayer() then return end
+	local c=e:GetHandler()
+	local g1=Duel.GetMatchingGroup(c21520182.cfilter1,tp,LOCATION_HAND,0,nil)
+	local opselect=2
+	if g1:GetCount()>0 then
+		opselect=Duel.SelectOption(tp,aux.Stringid(21520182,0),aux.Stringid(21520182,1),aux.Stringid(21520182,2))
+	else 
+		opselect=Duel.SelectOption(tp,aux.Stringid(21520182,1),aux.Stringid(21520182,2))
+		opselect=opselect+1
+	end
+	if opselect==0 then
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_CONFIRM)
+		local g=g1:Select(tp,1,1,nil)
+		Duel.ConfirmCards(1-tp,g)
+		Duel.ShuffleHand(tp)
+	elseif opselect==1 then
+		local e1=Effect.CreateEffect(c)
+		e1:SetCategory(CATEGORY_ATKCHANGE)
+		e1:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_UPDATE_ATTACK)
+		e1:SetRange(LOCATION_MZONE)
+		e1:SetValue(-c:GetAttack())
+		e1:SetReset(RESET_PHASE+PHASE_STANDBY,2)
+		c:RegisterEffect(e1)
+		local e2=e1:Clone()
+		e2:SetCategory(CATEGORY_DEFCHANGE)
+		e2:SetCode(EFFECT_UPDATE_DEFENSE)
+		e2:SetValue(-c:GetDefense())
+		c:RegisterEffect(e2)
+	else
+		Duel.Destroy(e:GetHandler(),REASON_RULE)
+	end
+end
+--[[
+function c21520182.ffilter(c,cat,fc,race)
+	if cat~=nil and race==nil then
+		return c:IsFusionSetCard(0x490) and c:IsCanBeFusionMaterial(fc)
+	elseif cat==nil and race~=nil then
+		return c:IsRace(RACE_FIEND) and c:IsCanBeFusionMaterial(fc)
+	end
+end
+function c21520182.fscondition(e,g,gc,chkf)
+	if g==nil then return true end
+	if gc then return false end
+	local g1=g:Filter(c21520182.ffilter,nil,0x490,e:GetHandler(),nil)
+	local c1=g1:GetCount()
+	local g2=g:Filter(c21520182.ffilter,nil,nil,e:GetHandler(),RACE_FIEND)
+	local c2=g2:GetCount()
+	local ag=g1:Clone()
+	ag:Merge(g2)
+	if chkf~=PLAYER_NONE and not ag:IsExists(aux.FConditionCheckF,1,nil,chkf) then return false end
+	return c1>0 and c2>1 and ag:GetCount()>=3
+end
+function c21520182.fsoperation(e,tp,eg,ep,ev,re,r,rp,gc)
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FMATERIAL)
+	local g1=g:Filter(c21520182.ffilter,nil,0x490,e:GetHandler(),nil)
+	local g2=g:Filter(c21520182.ffilter,nil,nil,e:GetHandler(),RACE_FIEND)
+	local ag=g1:Clone()
+	ag:Merge(g2)
+	local tc=nil
+	local f1=0
+	local f2=0
+	local mg=Group.CreateGroup()
+	Duel.SetFusionMaterial(eg:FilterSelect(tp,c21520182.ffilter,3,100,nil))
+end
+]]
+function c21520182.matcheck(e,c)
+--	local g=c:GetMaterial()
+--	e:SetLabel(g:GetClassCount(Card.GetOriginalCode))
+	local ct=c:GetMaterialCount()
+	local ae=Effect.CreateEffect(c)
+	ae:SetType(EFFECT_TYPE_SINGLE)
+	ae:SetCode(EFFECT_SET_BASE_ATTACK)
+	ae:SetValue(ct*450)
+	ae:SetReset(RESET_EVENT+0xff0000)
+	c:RegisterEffect(ae)
+	local de=ae:Clone()
+	de:SetCode(EFFECT_SET_BASE_DEFENSE)
+	c:RegisterEffect(de)
+end
+function c21520182.regcon(e,tp,eg,ep,ev,re,r,rp)
+	return bit.band(e:GetHandler():GetSummonType(),SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
+end
+function c21520182.regop(e,tp,eg,ep,ev,re,r,rp)
+	local ct=e:GetLabelObject():GetLabel()
+	local c=e:GetHandler()
+	local ae=Effect.CreateEffect(c)
+	ae:SetType(EFFECT_TYPE_SINGLE)
+	ae:SetCode(EFFECT_UPDATE_ATTACK)
+	ae:SetValue(ct*900)
+	ae:SetReset(RESET_EVENT+0x1ff0000)
+	c:RegisterEffect(ae)
+	local de=ae:Clone()
+	de:SetCode(EFFECT_UPDATE_DEFENSE)
+	c:RegisterEffect(de)
+end
+function c21520182.cpfilter(c)
+	return c:IsType(TYPE_EFFECT) and c:IsFaceup()
+end
+function c21520182.cptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return c21520182.cpfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c21520182.cpfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,LOCATION_GRAVE+LOCATION_MZONE,1,e:GetHandler()) end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
+	local g1=Duel.SelectTarget(tp,c21520182.cpfilter,tp,LOCATION_GRAVE+LOCATION_MZONE,LOCATION_GRAVE+LOCATION_MZONE,1,1,e:GetHandler())
+--	local loc=g1:GetFirst():GetLocation()
+--	Duel.SetOperationInfo(0,CATEGORY_REMOVE,g1,1,tp,loc)
+end
+function c21520182.cpop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if not c:IsOnField() or c:IsFacedown() then return end
+	local g=Duel.GetChainInfo(0,CHAININFO_TARGET_CARDS)
+	local tc=g:GetFirst()
+	if tc:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
+--[[		local e2=Effect.CreateEffect(c)
+		e2:SetType(EFFECT_TYPE_SINGLE)
+		e2:SetCode(EFFECT_DISABLE)
+		e2:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e2)
+		local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_SINGLE)
+		e3:SetCode(EFFECT_DISABLE_EFFECT)
+		e3:SetValue(RESET_TURN_SET)
+		e3:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e3)--]]
+		local code=tc:GetOriginalCode()
+		local e1=Effect.CreateEffect(c)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+		e1:SetCode(EFFECT_CHANGE_CODE)
+		e1:SetValue(code)
+		c:RegisterEffect(e1)
+		c:CopyEffect(code,RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END,1)
+--		Duel.Remove(tc,POS_FACEUP,REASON_EFFECT)
+	end
+end
+function c21520182.drcon(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	return c:IsPreviousLocation(LOCATION_ONFIELD) and c:IsReason(REASON_DESTROY)
+end
+function c21520182.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,1)
+end
+function c21520182.drop(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetFieldGroup(tp,LOCATION_REMOVED,LOCATION_REMOVED)
+	if g:GetCount()==0 then return end
+	Duel.SendtoDeck(g,nil,0,REASON_EFFECT)
+	Duel.BreakEffect()
+	local tg=Duel.GetOperatedGroup()
+--	if tg:IsExists(Card.IsLocation,1,nil,LOCATION_DECK) then 
+		Duel.ShuffleDeck(tp) 
+		Duel.ShuffleDeck(1-tp) 
+--	end
+	local ct=tg:FilterCount(Card.IsLocation,nil,LOCATION_DECK+LOCATION_EXTRA)
+	if ct>0 then 
+		Duel.Draw(tp,1,REASON_EFFECT)
+		Duel.Draw(1-tp,1,REASON_EFFECT)
+	end
+end
+function c21520182.sefilter(c)
+	return c:IsFusionSetCard(0x490) and c:IsType(TYPE_MONSTER)
+end

expansions/script/c21520183.lua

---曲形魔-克莱因
-function c21520183.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_FIEND),10,3,nil,nil,99)
-	--spsummon condition
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(c21520183.splimit)
-	c:RegisterEffect(e1)
-	--special summon rule
-	local e2=Effect.CreateEffect(c)
-	e2:SetType(EFFECT_TYPE_FIELD)
-	e2:SetCode(EFFECT_SPSUMMON_PROC)
-	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
-	e2:SetRange(LOCATION_GRAVE+LOCATION_EXTRA)
-	e2:SetCondition(c21520183.spcon)
-	e2:SetOperation(c21520183.spop)
-	c:RegisterEffect(e2)
-	--draw
-	local e3=Effect.CreateEffect(c)
-	e3:SetCategory(CATEGORY_DRAW)
-	e3:SetDescription(aux.Stringid(21520183,0))
-	e3:SetType(EFFECT_TYPE_IGNITION)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetRange(LOCATION_MZONE)
-	e3:SetCost(c21520183.drcost)
-	e3:SetTarget(c21520183.drtg)
-	e3:SetOperation(c21520183.drop)
-	c:RegisterEffect(e3)
-	--atk & def
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_SINGLE)
-	e4:SetCode(EFFECT_SET_ATTACK)
-	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetValue(c21520183.adval)
-	c:RegisterEffect(e4)
-	local e5=e4:Clone()
-	e5:SetCode(EFFECT_SET_DEFENSE)
-	c:RegisterEffect(e5)
-	--imune
-	local e6=Effect.CreateEffect(c)
-	e6:SetType(EFFECT_TYPE_SINGLE)
-	e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e6:SetRange(LOCATION_MZONE)
-	e6:SetCode(EFFECT_IMMUNE_EFFECT)
-	e6:SetCondition(c21520183.econ)
-	e6:SetValue(c21520183.efilter)
-	c:RegisterEffect(e6)
-	--material
-	local e7=Effect.CreateEffect(c)
-	e7:SetDescription(aux.Stringid(21520183,1))
-	e7:SetType(EFFECT_TYPE_IGNITION)
-	e7:SetRange(LOCATION_MZONE)
-	e7:SetCountLimit(1,21520183)
-	e7:SetCost(c21520183.cost)
-	e7:SetTarget(c21520183.target)
-	e7:SetOperation(c21520183.operation)
-	c:RegisterEffect(e7)
-	--destroy replace
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
-	e8:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e8:SetCode(EFFECT_DESTROY_REPLACE)
-	e8:SetRange(LOCATION_MZONE)
-	e8:SetTarget(c21520183.reptg)
-	c:RegisterEffect(e8)
-end
-function c21520183.splimit(e,se,sp,st)
-	return bit.band(st,SUMMON_TYPE_XYZ)==SUMMON_TYPE_XYZ or se:GetHandler()==e:GetHandler()
-end
-function c21520183.spfilter(c)
-	return (c:IsSetCard(0x490) or c:IsRace(RACE_FIEND)) and c:IsAbleToRemoveAsCost() and c:IsType(TYPE_MONSTER)
-end
-function c21520183.spcheck(c,sg)
-	return c:IsSetCard(0x490) and c:IsType(TYPE_MONSTER) and sg:FilterCount(c21520183.spcheck2,c)+1==sg:GetCount()
-	and sg:FilterCount(Card.IsSetCard,c,0x490)>=2
-end
-function c21520183.spcheck2(c)
-	return c:IsRace(RACE_FIEND) and c:IsType(TYPE_MONSTER)
-end
-function c21520183.spgoal(c,tp,sg)
-	return sg:GetCount()>1 and Duel.GetLocationCountFromEx(tp,tp,sg)>0 and sg:IsExists(c21520183.spcheck,1,nil,sg)
-end
-function c21520183.spselect(c,tp,mg,sg)
-	sg:AddCard(c)
-	local res=c21520183.spgoal(c,tp,sg) or mg:IsExists(c21520183.spselect,1,sg,tp,mg,sg)
-	sg:RemoveCard(c)
-	return res
-end
-function c21520183.spcon(e,c)
-	if c==nil then return true end
-	local tp=c:GetControler()
-	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
-	local sg=Group.CreateGroup()
-	return mg:IsExists(c21520183.spselect,1,nil,tp,mg,sg)
-end
-function c21520183.spop(e,tp,eg,ep,ev,re,r,rp,c)
-	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
-	local sg=Group.CreateGroup()
-	while true do
-		local cg=mg:Filter(c21520183.spselect,sg,tp,mg,sg)
-		if cg:GetCount()==0
-			or (c21520183.spgoal(c,tp,sg) and not Duel.SelectYesNo(tp,210)) then break end
-		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-		local g=cg:Select(tp,1,1,nil)
-		sg:Merge(g)
-	end
-	c:SetMaterial(sg)
-	Duel.Remove(sg,POS_FACEUP,REASON_COST)
-end
-function c21520183.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
-	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
-end
-function c21520183.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
-	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
-end
-function c21520183.drop(e,tp,eg,ep,ev,re,r,rp,chk)
-	Duel.Draw(tp,1,REASON_EFFECT)
-end
-function c21520183.adval(e,c)
-	return Duel.GetMatchingGroupCount(Card.IsFaceup,c:GetControler(),LOCATION_REMOVED,LOCATION_REMOVED,nil)*361
-end
-function c21520183.econ(e)
-	return e:GetHandler():GetOverlayCount()>0
-end
-function c21520183.efilter(e,te)
-	return not te:IsActiveType(TYPE_COUNTER) and te:GetHandler()~=e:GetHandler()
-end
-function c21520183.filter(c)
-	return not c:IsType(TYPE_TOKEN) and c:IsAbleToChangeControler() and c:IsFaceup()
-end
-function c21520183.cost(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return e:GetHandler():GetAttackAnnouncedCount()==0 end
-	local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_OATH)
-	e1:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
-	e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
-	e:GetHandler():RegisterEffect(e1)
-end
-function c21520183.target(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return Duel.IsExistingMatchingCard(c21520183.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
-		and e:GetHandler():IsType(TYPE_XYZ) end
-end
-function c21520183.operation(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	if c:IsFacedown() then return end
-	local ct=c:GetOverlayCount()
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
-	local g=Duel.SelectMatchingCard(tp,c21520183.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct+1,e:GetHandler())
-	local tc=g:GetFirst()
-	while tc do
-		if c:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
-			local og=tc:GetOverlayGroup()
-			if og:GetCount()>0 then
-				Duel.SendtoGrave(og,REASON_RULE)
-			end
-			Duel.Overlay(c,Group.FromCards(tc))
-		end
-		tc=g:GetNext()
-	end
-end
-function c21520183.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then 
-		local ct=math.ceil(e:GetHandler():GetOverlayCount()/2)
-		return e:GetHandler():CheckRemoveOverlayCard(tp,ct,REASON_EFFECT) end
-	local c=e:GetHandler()
-	if c:GetOverlayCount()>0 then 
-		local ct=math.ceil(c:GetOverlayCount()/2)
-		c:RemoveOverlayCard(tp,ct,ct,REASON_EFFECT)
-		return true
-	else return false end
-end
+--曲形魔-克莱因
+function c21520183.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddXyzProcedure(c,aux.FilterBoolFunction(Card.IsRace,RACE_FIEND),10,3,nil,nil,99)
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(c21520183.splimit)
+	c:RegisterEffect(e1)
+	--special summon rule
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_SPSUMMON_PROC)
+	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	e2:SetRange(LOCATION_GRAVE+LOCATION_EXTRA)
+	e2:SetCondition(c21520183.spcon)
+	e2:SetOperation(c21520183.spop)
+	c:RegisterEffect(e2)
+	--draw
+	local e3=Effect.CreateEffect(c)
+	e3:SetCategory(CATEGORY_DRAW)
+	e3:SetDescription(aux.Stringid(21520183,0))
+	e3:SetType(EFFECT_TYPE_IGNITION)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetRange(LOCATION_MZONE)
+	e3:SetCost(c21520183.drcost)
+	e3:SetTarget(c21520183.drtg)
+	e3:SetOperation(c21520183.drop)
+	c:RegisterEffect(e3)
+	--atk & def
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetCode(EFFECT_SET_ATTACK)
+	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetValue(c21520183.adval)
+	c:RegisterEffect(e4)
+	local e5=e4:Clone()
+	e5:SetCode(EFFECT_SET_DEFENSE)
+	c:RegisterEffect(e5)
+	--imune
+	local e6=Effect.CreateEffect(c)
+	e6:SetType(EFFECT_TYPE_SINGLE)
+	e6:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e6:SetRange(LOCATION_MZONE)
+	e6:SetCode(EFFECT_IMMUNE_EFFECT)
+	e6:SetCondition(c21520183.econ)
+	e6:SetValue(c21520183.efilter)
+	c:RegisterEffect(e6)
+	--material
+	local e7=Effect.CreateEffect(c)
+	e7:SetDescription(aux.Stringid(21520183,1))
+	e7:SetType(EFFECT_TYPE_IGNITION)
+	e7:SetRange(LOCATION_MZONE)
+	e7:SetCountLimit(1,21520183)
+	e7:SetCost(c21520183.cost)
+	e7:SetTarget(c21520183.target)
+	e7:SetOperation(c21520183.operation)
+	c:RegisterEffect(e7)
+	--destroy replace
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
+	e8:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e8:SetCode(EFFECT_DESTROY_REPLACE)
+	e8:SetRange(LOCATION_MZONE)
+	e8:SetTarget(c21520183.reptg)
+	c:RegisterEffect(e8)
+end
+function c21520183.splimit(e,se,sp,st)
+	return bit.band(st,SUMMON_TYPE_XYZ)==SUMMON_TYPE_XYZ or se:GetHandler()==e:GetHandler()
+end
+function c21520183.spfilter(c)
+	return (c:IsSetCard(0x490) or c:IsRace(RACE_FIEND)) and c:IsAbleToRemoveAsCost() and c:IsType(TYPE_MONSTER)
+end
+function c21520183.spcheck(c,sg)
+	return c:IsSetCard(0x490) and c:IsType(TYPE_MONSTER) and sg:FilterCount(c21520183.spcheck2,c)+1==sg:GetCount()
+	and sg:FilterCount(Card.IsSetCard,c,0x490)>=2
+end
+function c21520183.spcheck2(c)
+	return c:IsRace(RACE_FIEND) and c:IsType(TYPE_MONSTER)
+end
+function c21520183.spgoal(sg,tp,loc)
+	if loc==LOCATION_EXTRA then 
+		return Duel.GetLocationCountFromEx(tp,tp,sg)>0 and sg:IsExists(c21520183.spcheck,1,nil,sg)
+	else 
+		return Duel.GetLocationCount(tp,LOCATION_MZONE)>0 and sg:IsExists(c21520183.spcheck,1,nil,sg)
+	end
+end
+function c21520183.spcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
+	local sg=Group.CreateGroup()
+	return mg:CheckSubGroup(c21520183.spgoal,1,nil,tp)
+end
+function c21520183.spop(e,tp,eg,ep,ev,re,r,rp,c)
+	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+	local cancel=Duel.GetCurrentChain()==0
+	local sg=mg:SelectSubGroup(tp,c21520183.spgoal,cancel,1,nil,tp,c:GetLocation())
+	c:SetMaterial(sg)
+	Duel.Remove(sg,POS_FACEUP,REASON_COST)
+end
+--[[nction c21520183.spcheck(c,sg)
+	return c:IsSetCard(0x490) and c:IsType(TYPE_MONSTER) and sg:FilterCount(c21520183.spcheck2,c)+1==sg:GetCount()
+	and sg:FilterCount(Card.IsSetCard,c,0x490)>=2
+end
+function c21520183.spcheck2(c)
+	return c:IsRace(RACE_FIEND) and c:IsType(TYPE_MONSTER)
+end
+function c21520183.spgoal(c,tp,sg)
+	return sg:GetCount()>1 and Duel.GetLocationCountFromEx(tp,tp,sg)>0 and sg:IsExists(c21520183.spcheck,1,nil,sg)
+end
+function c21520183.spselect(c,tp,mg,sg)
+	sg:AddCard(c)
+	local res=c21520183.spgoal(c,tp,sg) or mg:IsExists(c21520183.spselect,1,sg,tp,mg,sg)
+	sg:RemoveCard(c)
+	return res
+end
+function c21520183.spcon(e,c)
+	if c==nil then return true end
+	local tp=c:GetControler()
+	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
+	local sg=Group.CreateGroup()
+	return mg:IsExists(c21520183.spselect,1,nil,tp,mg,sg)
+end
+function c21520183.spop(e,tp,eg,ep,ev,re,r,rp,c)
+	local mg=Duel.GetMatchingGroup(c21520183.spfilter,tp,LOCATION_MZONE+LOCATION_GRAVE,0,e:GetHandler())
+	local sg=Group.CreateGroup()
+	while true do
+		local cg=mg:Filter(c21520183.spselect,sg,tp,mg,sg)
+		if cg:GetCount()==0
+			or (c21520183.spgoal(c,tp,sg) and not Duel.SelectYesNo(tp,210)) then break end
+		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
+		local g=cg:Select(tp,1,1,nil)
+		sg:Merge(g)
+	end
+	c:SetMaterial(sg)
+	Duel.Remove(sg,POS_FACEUP,REASON_COST)
+end--]]
+function c21520183.drcost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():CheckRemoveOverlayCard(tp,1,REASON_COST) end
+	e:GetHandler():RemoveOverlayCard(tp,1,1,REASON_COST)
+end
+function c21520183.drtg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,tp,1)
+end
+function c21520183.drop(e,tp,eg,ep,ev,re,r,rp,chk)
+	Duel.Draw(tp,1,REASON_EFFECT)
+end
+function c21520183.adval(e,c)
+	return Duel.GetMatchingGroupCount(Card.IsFaceup,c:GetControler(),LOCATION_REMOVED,LOCATION_REMOVED,nil)*361
+end
+function c21520183.econ(e)
+	return e:GetHandler():GetOverlayCount()>0
+end
+function c21520183.efilter(e,te)
+	return not te:IsActiveType(TYPE_COUNTER) and te:GetHandler()~=e:GetHandler()
+end
+function c21520183.filter(c)
+	return not c:IsType(TYPE_TOKEN) and c:IsAbleToChangeControler() and c:IsFaceup()
+end
+function c21520183.cost(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():GetAttackAnnouncedCount()==0 end
+	local e1=Effect.CreateEffect(e:GetHandler())
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_OATH)
+	e1:SetCode(EFFECT_CANNOT_ATTACK_ANNOUNCE)
+	e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+PHASE_END)
+	e:GetHandler():RegisterEffect(e1)
+end
+function c21520183.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(c21520183.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler())
+		and e:GetHandler():IsType(TYPE_XYZ) end
+end
+function c21520183.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsFacedown() then return end
+	local ct=c:GetOverlayCount()
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_FACEUP)
+	local g=Duel.SelectMatchingCard(tp,c21520183.filter,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,ct+1,e:GetHandler())
+	local tc=g:GetFirst()
+	while tc do
+		if c:IsRelateToEffect(e) and not tc:IsImmuneToEffect(e) then
+			local og=tc:GetOverlayGroup()
+			if og:GetCount()>0 then
+				Duel.SendtoGrave(og,REASON_RULE)
+			end
+			Duel.Overlay(c,Group.FromCards(tc))
+		end
+		tc=g:GetNext()
+	end
+end
+function c21520183.reptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then 
+		local ct=math.ceil(e:GetHandler():GetOverlayCount()/2)
+		return e:GetHandler():CheckRemoveOverlayCard(tp,ct,REASON_EFFECT) end
+	local c=e:GetHandler()
+	if c:GetOverlayCount()>0 then 
+		local ct=math.ceil(c:GetOverlayCount()/2)
+		c:RemoveOverlayCard(tp,ct,ct,REASON_EFFECT)
+		return true
+	else return false end
+end

expansions/script/c9980515.lua

---正义巨像·加里奥
-function c9980515.initial_effect(c)
-	c:EnableReviveLimit()
-	aux.AddFusionProcFunRep(c,c9980515.matfilter,2,true)
-	aux.AddContactFusionProcedure(c,Card.IsAbleToDeckOrExtraAsCost,LOCATION_MZONE,0,aux.tdcfop(c))
-	--spsummon condition
-	local e1=Effect.CreateEffect(c)
-	e1:SetType(EFFECT_TYPE_SINGLE)
-	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
-	e1:SetValue(c9980515.splimit)
-	c:RegisterEffect(e1)
-	--cannot be fusion material
-	local e3=Effect.CreateEffect(c)
-	e3:SetType(EFFECT_TYPE_SINGLE)
-	e3:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
-	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
-	e3:SetValue(1)
-	c:RegisterEffect(e3)
-	--move
-	local e2=Effect.CreateEffect(c)
-	e2:SetDescription(aux.Stringid(9980515,0))
-	e2:SetType(EFFECT_TYPE_QUICK_O)
-	e2:SetCode(EVENT_FREE_CHAIN)
-	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
-	e2:SetRange(LOCATION_MZONE)
-	e2:SetCountLimit(1)
-	e2:SetTarget(c9980515.seqtg)
-	e2:SetOperation(c9980515.seqop)
-	c:RegisterEffect(e2)
-	--negate
-	local e1=Effect.CreateEffect(c)
-	e1:SetDescription(aux.Stringid(9980515,2))
-	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
-	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
-	e1:SetType(EFFECT_TYPE_QUICK_O)
-	e1:SetRange(LOCATION_MZONE)
-	e1:SetCountLimit(1)
-	e1:SetCode(EVENT_CHAINING)
-	e1:SetCondition(c9980515.discon)
-	e1:SetTarget(c9980515.distg)
-	e1:SetOperation(c9980515.disop)
-	c:RegisterEffect(e1)
-	--spsummon bgm
-	local e8=Effect.CreateEffect(c)
-	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e8:SetCode(EVENT_SUMMON_SUCCESS)
-	e8:SetOperation(c9980515.sumsuc)
-	c:RegisterEffect(e8)
-	local e4=e8:Clone()
-	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
-	c:RegisterEffect(e4)
-	--atkup
-	local e4=Effect.CreateEffect(c)
-	e4:SetType(EFFECT_TYPE_SINGLE)
-	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
-	e4:SetCode(EFFECT_UPDATE_ATTACK)
-	e4:SetRange(LOCATION_MZONE)
-	e4:SetValue(c9980515.val)
-	c:RegisterEffect(e4)
-end
-function c9980515.sumsuc(e,tp,eg,ep,ev,re,r,rp)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
-end
-function c9980515.splimit(e,se,sp,st)
-	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
-end
-function c9980515.matfilter(c)
-	return c:IsLevelAbove(5) and c:IsRace(RACE_ROCK)
-end
-function c9980515.seqfilter(c)
-	return c:IsFaceup() and c:IsRace(RACE_ROCK)
-end
-function c9980515.seqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
-	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9980515.seqfilter(chkc) end
-	if chk==0 then return Duel.IsExistingTarget(c9980515.seqfilter,tp,LOCATION_MZONE,0,1,nil)
-		and Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_CONTROL)>0 end
-	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(9980515,1))
-	Duel.SelectTarget(tp,c9980515.seqfilter,tp,LOCATION_MZONE,0,1,1,nil)
-end
-function c9980515.seqop(e,tp,eg,ep,ev,re,r,rp)
-	local c=e:GetHandler()
-	local tc=Duel.GetFirstTarget()
-	if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
-	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
-	local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
-	local nseq=math.log(s,2)
-	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
-	Duel.MoveSequence(tc,nseq)
-	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
-	local e3=Effect.CreateEffect(c)
-		e3:SetType(EFFECT_TYPE_SINGLE)
-		e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
-		e3:SetRange(LOCATION_MZONE)
-		e3:SetCode(EFFECT_IMMUNE_EFFECT)
-		e3:SetValue(c9980515.efilter)
-		e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
-		tc:RegisterEffect(e3)
-   end
-end
-function c9980515.efilter(e,te)
-	return te:GetOwner()~=e:GetOwner()
-end
-function c9980515.discon(e,tp,eg,ep,ev,re,r,rp)
-	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
-		and ep~=tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
-end
-function c9980515.distg(e,tp,eg,ep,ev,re,r,rp,chk)
-	if chk==0 then return true end
-	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
-	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
-		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
-	end
-end
-function c9980515.disop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
-		Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
-		Duel.Destroy(eg,REASON_EFFECT)
-	end
-end
-function c9980515.val(e,c)
-	return Duel.GetMatchingGroupCount(Card.IsSetCard,c:GetControler(),LOCATION_GRAVE,0,nil,RACE_ROCK)*300
+--正义巨像·加里奥
+function c9980515.initial_effect(c)
+	c:EnableReviveLimit()
+	aux.AddFusionProcFunRep(c,c9980515.matfilter,2,true)
+	aux.AddContactFusionProcedure(c,Card.IsAbleToDeckOrExtraAsCost,LOCATION_MZONE,0,aux.tdcfop(c))
+	--spsummon condition
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_SINGLE)
+	e1:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e1:SetCode(EFFECT_SPSUMMON_CONDITION)
+	e1:SetValue(c9980515.splimit)
+	c:RegisterEffect(e1)
+	--cannot be fusion material
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_CANNOT_BE_FUSION_MATERIAL)
+	e3:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
+	e3:SetValue(1)
+	c:RegisterEffect(e3)
+	--move
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(9980515,0))
+	e2:SetType(EFFECT_TYPE_QUICK_O)
+	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetProperty(EFFECT_FLAG_CARD_TARGET)
+	e2:SetRange(LOCATION_MZONE)
+	e2:SetCountLimit(1)
+	e2:SetTarget(c9980515.seqtg)
+	e2:SetOperation(c9980515.seqop)
+	c:RegisterEffect(e2)
+	--negate
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(9980515,2))
+	e1:SetCategory(CATEGORY_NEGATE+CATEGORY_DESTROY)
+	e1:SetProperty(EFFECT_FLAG_DAMAGE_STEP+EFFECT_FLAG_DAMAGE_CAL)
+	e1:SetType(EFFECT_TYPE_QUICK_O)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCountLimit(1)
+	e1:SetCode(EVENT_CHAINING)
+	e1:SetCondition(c9980515.discon)
+	e1:SetTarget(c9980515.distg)
+	e1:SetOperation(c9980515.disop)
+	c:RegisterEffect(e1)
+	--spsummon bgm
+	local e8=Effect.CreateEffect(c)
+	e8:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e8:SetCode(EVENT_SUMMON_SUCCESS)
+	e8:SetOperation(c9980515.sumsuc)
+	c:RegisterEffect(e8)
+	local e4=e8:Clone()
+	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
+	c:RegisterEffect(e4)
+	--atkup
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_SINGLE)
+	e4:SetProperty(EFFECT_FLAG_SINGLE_RANGE)
+	e4:SetCode(EFFECT_UPDATE_ATTACK)
+	e4:SetRange(LOCATION_MZONE)
+	e4:SetValue(c9980515.val)
+	c:RegisterEffect(e4)
+end
+function c9980515.sumsuc(e,tp,eg,ep,ev,re,r,rp)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
+end
+function c9980515.splimit(e,se,sp,st)
+	return bit.band(st,SUMMON_TYPE_FUSION)==SUMMON_TYPE_FUSION
+end
+function c9980515.matfilter(c)
+	return c:IsLevelAbove(5) and c:IsRace(RACE_ROCK)
+end
+function c9980515.seqfilter(c)
+	return c:IsFaceup() and c:IsRace(RACE_ROCK)
+end
+function c9980515.seqtg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
+	if chkc then return chkc:IsLocation(LOCATION_MZONE) and chkc:IsControler(tp) and c9980515.seqfilter(chkc) end
+	if chk==0 then return Duel.IsExistingTarget(c9980515.seqfilter,tp,LOCATION_MZONE,0,1,nil)
+		and Duel.GetLocationCount(tp,LOCATION_MZONE,tp,LOCATION_REASON_CONTROL)>0 end
+	Duel.Hint(HINT_SELECTMSG,tp,aux.Stringid(9980515,1))
+	Duel.SelectTarget(tp,c9980515.seqfilter,tp,LOCATION_MZONE,0,1,1,nil)
+end
+function c9980515.seqop(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	local tc=Duel.GetFirstTarget()
+	if not tc:IsRelateToEffect(e) or tc:IsControler(1-tp) or Duel.GetLocationCount(tp,LOCATION_MZONE)<=0 then return end
+	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TOZONE)
+	local s=Duel.SelectDisableField(tp,1,LOCATION_MZONE,0,0)
+	local nseq=math.log(s,2)
+	if tc:IsFaceup() and tc:IsRelateToEffect(e) then
+	Duel.MoveSequence(tc,nseq)
+	Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
+	local e3=Effect.CreateEffect(c)
+		e3:SetType(EFFECT_TYPE_SINGLE)
+		e3:SetProperty(EFFECT_FLAG_SINGLE_RANGE+EFFECT_FLAG_CANNOT_DISABLE)
+		e3:SetRange(LOCATION_MZONE)
+		e3:SetCode(EFFECT_IMMUNE_EFFECT)
+		e3:SetValue(c9980515.efilter)
+		e3:SetReset(RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		tc:RegisterEffect(e3)
+   end
+end
+function c9980515.efilter(e,te)
+	return te:GetOwner()~=e:GetOwner()
+end
+function c9980515.discon(e,tp,eg,ep,ev,re,r,rp)
+	return not e:GetHandler():IsStatus(STATUS_BATTLE_DESTROYED)
+		and ep~=tp and re:IsHasType(EFFECT_TYPE_ACTIVATE) and Duel.IsChainNegatable(ev)
+end
+function c9980515.distg(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return true end
+	Duel.SetOperationInfo(0,CATEGORY_NEGATE,eg,1,0,0)
+	if re:GetHandler():IsDestructable() and re:GetHandler():IsRelateToEffect(re) then
+		Duel.SetOperationInfo(0,CATEGORY_DESTROY,eg,1,0,0)
+	end
+end
+function c9980515.disop(e,tp,eg,ep,ev,re,r,rp)
+	if Duel.NegateActivation(ev) and re:GetHandler():IsRelateToEffect(re) then
+		Duel.Hint(HINT_MUSIC,0,aux.Stringid(9980515,3))
+		Duel.Destroy(eg,REASON_EFFECT)
+	end
+end
+function c9980515.val(e,c)
+	return Duel.GetMatchingGroupCount(Card.IsSetCard,c:GetControler(),LOCATION_GRAVE,0,nil,RACE_ROCK)*300
 end
\ No newline at end of file