2024/7/1 新增：幻龙新卡，融合术召唤调整

script/RDFusion.lua

@@ -254,71 +254,88 @@ end
 -- 融合效果 - 获取融合素材与融合怪兽
 function RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, except, effect)
     local chkf = tp
-    local mg1 = Duel.GetFusionMaterial(tp):Filter(RushDuel.FusionMaterialFilter, except, matfilter, effect)
+    local mg = Duel.GetFusionMaterial(tp):Filter(RushDuel.FusionMaterialFilter, except, matfilter, effect)
     if s_range ~= 0 or o_range ~= 0 then
         local ext = Duel.GetMatchingGroup(aux.NecroValleyFilter(exfilter), tp, s_range, o_range, except, effect)
-        mg1:Merge(ext)
+        mg:Merge(ext)
     end
     local gc = nil
     if including_self then
         gc = e:GetHandler()
     end
-    local sg1 = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg1, nil, gc, chkf, spfilter)
-    local mg2 = nil
-    local sg2 = nil
-    local ce = Duel.GetChainMaterial(tp)
-    if ce ~= nil then
-        local fgroup = ce:GetTarget()
-        mg2 = fgroup(ce, e, tp)
-        local mf = ce:GetValue()
-        sg2 = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg2, mf, gc, chkf, spfilter)
-    end
-    return ce, mg1, mg2, sg1, sg2, chkf, gc
+    local sg = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg, nil, gc, chkf, spfilter)
+    local list = {}
+    local fusionable = false
+    if #sg > 0 then
+        table.insert(list, {nil, mg, sg})
+        fusionable = true
+    end
+    local effects = {Duel.IsPlayerAffectedByEffect(tp, EFFECT_CHAIN_MATERIAL)}
+    for _, effect in ipairs(effects) do
+        local target = effect:GetTarget()
+        local mg2 = target(effect, e, tp)
+        if #mg2 > 0 then
+            local mf = effect:GetValue()
+            local sg2 = Duel.GetMatchingGroup(RushDuel.FusionSpecialSummonFilter, tp, LOCATION_EXTRA, 0, nil, e, tp, mg2, mf, gc, chkf, spfilter)
+            if #sg2 > 0 then
+                table.insert(list, {effect, mg2, sg2})
+                fusionable = true
+            end
+        end
+    end
+    return fusionable, list, chkf, gc
 end
 -- 融合效果 - 进行融合召唤
-function RushDuel.ExecuteFusionSummon(e, tp, ce, mg1, mg2, sg1, sg2, gc, chkf, mat_move)
-    local sg = sg1:Clone()
-    if sg2 then
-        sg:Merge(sg2)
+function RushDuel.ExecuteFusionSummon(e, tp, list, chkf, gc, mat_move)
+    local sg = Group.CreateGroup()
+    for _, data in ipairs(list) do
+        sg:Merge(data[3])
     end
     ::cancel::
     Duel.Hint(HINT_SELECTMSG, tp, HINTMSG_SPSUMMON)
     local fc = sg:Select(tp, 1, 1, nil):GetFirst()
-    local mat = nil
-    if sg1:IsContains(fc) and (sg2 == nil or not sg2:IsContains(fc) or not Duel.SelectYesNo(tp, ce:GetDescription())) then
-        mat = Duel.SelectFusionMaterial(tp, fc, mg1, gc, chkf)
-        if #mat < 2 then
-            goto cancel
-        end
-        local cg = mat:Filter(RushDuel.ConfirmCardFilter, nil)
-        if #cg > 0 then
-            Duel.ConfirmCards(1 - tp, cg)
-        end
-        fc:SetMaterial(mat)
-        mat_move(tp, mat)
-        Duel.BreakEffect()
-        Duel.SpecialSummon(fc, SUMMON_TYPE_FUSION, tp, tp, false, false, POS_FACEUP)
-    else
-        mat = Duel.SelectFusionMaterial(tp, fc, mg2, gc, chkf)
-        if #mat < 2 then
-            goto cancel
+    local options = {}
+    for _, data in ipairs(list) do
+        local ce, sg = data[1], data[3]
+        if sg:IsContains(fc) then
+            if ce then
+                table.insert(options, {true, ce:GetDescription(), data})
+            else
+                table.insert(options, {true, 1169, data})
+            end
         end
+    end
+    local data = options[1][3]
+    if #options > 1 then
+        data = aux.SelectFromOptions(tp, table.unpack(options))
+    end
+    local ce, mg = data[1], data[2]
+    local mat = Duel.SelectFusionMaterial(tp, fc, mg, gc, chkf)
+    if #mat < 2 then
+        goto cancel
+    end
+    local cg = mat:Filter(RushDuel.ConfirmCardFilter, nil)
+    if #cg > 0 then
+        Duel.ConfirmCards(1 - tp, cg)
+    end
+    fc:SetMaterial(mat)
+    if ce then
         local fop = ce:GetOperation()
         fop(ce, e, tp, fc, mat)
+    else
+        mat_move(tp, mat)
     end
+    Duel.BreakEffect()
+    Duel.SpecialSummon(fc, SUMMON_TYPE_FUSION, tp, tp, false, false, POS_FACEUP)
     fc:CompleteProcedure()
     return fc, mat
 end
 -- 判断条件: 是否可以进行融合召唤
 function RushDuel.IsCanFusionSummon(e, tp, matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, except)
     Auxiliary.FGoalCheckAdditional = mat_check
-    local ce, mg1, mg2, sg1, sg2 = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, except)
-    local res = #sg1 > 0
-    if not res and ce ~= nil then
-        res = #sg2 > 0
-    end
+    local fusionable = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, except)
     Auxiliary.FGoalCheckAdditional = nil
-    return res
+    return fusionable
 end
 -- 融合效果 - 目标
 function RushDuel.FusionTarget(matfilter, spfilter, exfilter, s_range, o_range, mat_check, including_self, action)
@@ -336,9 +353,9 @@ end
 function RushDuel.FusionOperation(matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, including_self, action)
     return function(e, tp, eg, ep, ev, re, r, rp)
         Auxiliary.FGoalCheckAdditional = mat_check
-        local ce, mg1, mg2, sg1, sg2, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, nil, e)
-        if sg1:GetCount() > 0 or (sg2 ~= nil and sg2:GetCount() > 0) then
-            local fc, mat = RushDuel.ExecuteFusionSummon(e, tp, ce, mg1, mg2, sg1, sg2, gc, chkf, mat_move)
+        local fusionable, list, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, nil, e)
+        if fusionable then
+            local fc, mat = RushDuel.ExecuteFusionSummon(e, tp, list, chkf, gc, mat_move)
             if action ~= nil then
                 action(e, tp, eg, ep, ev, re, r, rp, mat, fc)
             end
@@ -350,13 +367,13 @@ end
 -- 可以进行融合术召唤
 function RushDuel.CanFusionSummon(desc, matfilter, spfilter, exfilter, s_range, o_range, mat_check, mat_move, e, tp, break_effect, including_self)
     Auxiliary.FGoalCheckAdditional = mat_check
-    local ce, mg1, mg2, sg1, sg2, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, nil, e)
+    local fusionable, list, chkf, gc = RushDuel.GetFusionSummonData(e, tp, matfilter, spfilter, exfilter, s_range, o_range, including_self, nil, e)
     local fc = nil
-    if (sg1:GetCount() > 0 or (sg2 ~= nil and sg2:GetCount() > 0)) and Duel.SelectYesNo(tp, desc) then
+    if fusionable and Duel.SelectYesNo(tp, desc) then
         if break_effect then
             Duel.BreakEffect()
         end
-        fc = RushDuel.ExecuteFusionSummon(e, tp, ce, mg1, mg2, sg1, sg2, gc, chkf, mat_move)
+        fc = RushDuel.ExecuteFusionSummon(e, tp, list, chkf, gc, mat_move)
     end
     aux.FGoalCheckAdditional = nil
     return fc

script/c120253053.lua

@@ -34,7 +34,7 @@ function cm.costfilter(c)
 	return c:IsRace(RACE_WYRM) and c:IsAbleToDeckOrExtraAsCost()
 end
 cm.cost=RD.CostSendGraveToDeckTop(cm.costfilter,1,1)
---Atk & Def
+--Atk Up
 function cm.target(e,c)
 	return c:IsFaceup() and c:IsRace(RACE_WYRM)
 end
\ No newline at end of file

script/c120264012.lua

+local m=120264012
+local cm=_G["c"..m]
+cm.name="幻坏兵 派遣进击龙"
+function cm.initial_effect(c)
+	--Draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TOGRAVE+CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Draw
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,0,LOCATION_HAND)<=1
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return e:GetHandler():IsAbleToGrave()
+		and Duel.IsPlayerCanDraw(tp,2) and Duel.IsPlayerCanDraw(1-tp,2) end
+	Duel.SetOperationInfo(0,CATEGORY_TOGRAVE,e:GetHandler(),1,0,0)
+	Duel.SetOperationInfo(0,CATEGORY_DRAW,nil,0,PLAYER_ALL,2)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	local c=e:GetHandler()
+	if c:IsRelateToEffect(e) and c:IsControler(tp) and Duel.SendtoGrave(c,REASON_EFFECT)~=0 then
+		Duel.Draw(tp,2,REASON_EFFECT)
+		Duel.Draw(1-tp,2,REASON_EFFECT)
+	end
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateCannotSummonEffect(e,aux.Stringid(m,1),cm.sumlimit,tp,1,0,RESET_PHASE+PHASE_END)
+	RD.CreateCannotSpecialSummonEffect(e,aux.Stringid(m,2),cm.sumlimit,tp,1,0,RESET_PHASE+PHASE_END)
+	RD.CreateOnlySoleAttackEffect(e,20264012,tp,LOCATION_MZONE,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.sumlimit(e,c,sump,sumtype,sumpos,targetp,se)
+	return not c:IsRace(RACE_WYRM)
+end
\ No newline at end of file

script/c120264013.lua

+local m=120264013
+local list={120247043}
+local cm=_G["c"..m]
+cm.name="幻坏兵 冲击龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Atk Up
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_ATKCHANGE+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Atk Up
+function cm.costfilter(c)
+	return c:IsRace(RACE_WYRM) and c:IsAbleToDeckOrExtraAsCost()
+end
+function cm.thfilter(c)
+	return (c:IsCode(list[1]) or (c:IsType(TYPE_NORMAL) and c:IsRace(RACE_WYRM))) and c:IsAbleToHand()
+end
+cm.cost=RD.CostSendGraveToDeckTopOrBottom(cm.costfilter,1,1,aux.Stringid(m,1),aux.Stringid(m,2),nil,nil,function(g)
+	return g:GetFirst():GetCode()
+end)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsFaceup,tp,LOCATION_MZONE,0,1,nil) end
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(aux.Stringid(m,3),Card.IsFaceup,tp,LOCATION_MZONE,0,1,1,nil,function(g)
+		RD.AttachAtkDef(e,g:GetFirst(),100,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		RD.CanSelectAndDoAction(aux.Stringid(m,4),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(sg)
+			Duel.BreakEffect()
+			RD.SendToHandAndExists(sg,1-tp)
+		end)
+	end)
+end
\ No newline at end of file

script/c120264014.lua

+local m=120264014
+local list={120196050}
+local cm=_G["c"..m]
+cm.name="幻刃兵站 服务站龙"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Discard Deck
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_DECKDES+CATEGORY_TOHAND+CATEGORY_GRAVE_ACTION)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Discard Deck
+function cm.thfilter(c)
+	return (c:IsCode(list[1]) or c:IsType(TYPE_FIELD)) and c:IsAbleToHand()
+end
+cm.cost=RD.CostSendHandToGrave(Card.IsAbleToGraveAsCost,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDiscardDeck(tp,3) end
+	Duel.SetOperationInfo(0,CATEGORY_DECKDES,nil,0,tp,3)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if RD.SendDeckTopToGraveAndExists(tp,3) then
+		RD.CanSelectAndDoAction(aux.Stringid(m,1),HINTMSG_ATOHAND,aux.NecroValleyFilter(cm.thfilter),tp,LOCATION_GRAVE,0,1,1,nil,function(g)
+			Duel.BreakEffect()
+			RD.SendToHandAndExists(g,1-tp)
+		end)
+	end
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateRaceCannotAttackEffect(e,aux.Stringid(m,2),RACE_ALL-RACE_WYRM,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
\ No newline at end of file

script/c120264015.lua

+local m=120264015
+local cm=_G["c"..m]
+cm.name="梦幻重骑 建造拖龙"
+function cm.initial_effect(c)
+	--Summon Procedure
+	RD.AddSummonProcedureOne(c,aux.Stringid(m,0),nil,cm.sumfilter)
+	--Draw
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,1))
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCondition(cm.condition)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Summon Procedure
+function cm.sumfilter(c,e,tp)
+	return c:IsType(TYPE_MAXIMUM)
+end
+--Draw
+function cm.confilter1(c)
+	return c:IsRace(RACE_WYRM)
+end
+function cm.confilter2(c)
+	return c:IsType(TYPE_MONSTER) and not cm.confilter1(c)
+end
+function cm.matfilter(c)
+	return c:IsRace(RACE_WYRM)
+end
+function cm.condition(e,tp,eg,ep,ev,re,r,rp)
+	return Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)>9
+		and Duel.IsExistingMatchingCard(cm.confilter1,tp,LOCATION_GRAVE,0,1,nil)
+		and not Duel.IsExistingMatchingCard(cm.confilter2,tp,LOCATION_GRAVE,0,1,nil)
+end
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,1) end
+	RD.TargetDraw(tp,1)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	if RD.Draw() then
+		RD.CanFusionSummon(aux.Stringid(m,2),cm.matfilter,nil,nil,0,0,nil,RD.FusionToGrave,e,tp,true)
+	end
+end
\ No newline at end of file

script/c120264045.lua

+local m=120264045
+local list={120247043}
+local cm=_G["c"..m]
+cm.name="幻坏帝 爆发帝王"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Fusion Material
+	RD.AddFusionProcedure(c,list[1],cm.matfilter)
+	--To Deck
+	local e1=Effect.CreateEffect(c)
+	e1:SetDescription(aux.Stringid(m,0))
+	e1:SetCategory(CATEGORY_TODECK+CATEGORY_GRAVE_ACTION+CATEGORY_ATKCHANGE)
+	e1:SetType(EFFECT_TYPE_IGNITION)
+	e1:SetRange(LOCATION_MZONE)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.operation)
+	c:RegisterEffect(e1)
+end
+--Fusion Material
+cm.unspecified_funsion=true
+function cm.matfilter(c)
+	return c:IsRace(RACE_WYRM)
+end
+--To Deck
+function cm.costfilter(c)
+	return c:IsRace(RACE_WYRM) and c:IsAbleToGraveAsCost()
+end
+cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1,nil,nil,function(g)
+	return g:GetFirst():GetLevel()
+end)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsExistingMatchingCard(Card.IsAbleToDeck,tp,0,LOCATION_GRAVE,1,nil) end
+	local g=Duel.GetMatchingGroup(Card.IsAbleToDeck,tp,0,LOCATION_GRAVE,nil)
+	Duel.SetOperationInfo(0,CATEGORY_TODECK,g,1,0,0)
+end
+function cm.operation(e,tp,eg,ep,ev,re,r,rp)
+	RD.SelectAndDoAction(HINTMSG_TODECK,aux.NecroValleyFilter(Card.IsAbleToDeck),tp,0,LOCATION_GRAVE,1,3,nil,function(g)
+		local ct=Duel.SendtoDeck(g,nil,SEQ_DECKSHUFFLE,REASON_EFFECT)
+		local c=e:GetHandler()
+		if e:GetLabel()>=8 and c:IsFaceup() and c:IsRelateToEffect(e) then
+			RD.AttachAtkDef(e,c,ct*300,0,RESET_EVENT+RESETS_STANDARD+RESET_PHASE+PHASE_END)
+		end
+	end)
+end
\ No newline at end of file

script/c120264053.lua

+local m=120264053
+local list={120196050}
+local cm=_G["c"..m]
+cm.name="幻坏融门 废料之门"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetCost(cm.cost)
+	c:RegisterEffect(e1)
+	-- Fusion Expend
+	local e2=Effect.CreateEffect(c)
+	e2:SetDescription(aux.Stringid(m,1))
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_CHAIN_MATERIAL)
+	e2:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetTargetRange(1,1)
+	e2:SetTarget(cm.target)
+	e2:SetOperation(cm.operation)
+	e2:SetValue(aux.TRUE)
+	c:RegisterEffect(e2)
+end
+--Activate
+function cm.costfilter(c)
+	return c:IsFaceup() and c:IsLevelAbove(7) and c:IsRace(RACE_WYRM)
+end
+cm.cost=RD.CostSendMZoneToGrave(cm.costfilter,1,1,false)
+-- Fusion Expend
+function cm.filter(c,e)
+	return c:IsRace(RACE_WYRM) and c:IsAbleToDeck() and c:IsCanBeFusionMaterial() and not c:IsImmuneToEffect(e)
+end
+function cm.target(e,te,tp)
+	if te:GetHandler():IsCode(list[1]) then
+		return Duel.GetMatchingGroup(cm.filter,tp,LOCATION_GRAVE,0,nil,te)
+	else
+		return Group.CreateGroup()
+	end
+end
+function cm.operation(e,te,tp,tc,mat,sumtype)
+	RD.FusionToDeck(tp,mat)
+end
\ No newline at end of file

script/c120264054.lua

+local m=120264054
+local cm=_G["c"..m]
+cm.name="幻之三角直尺"
+function cm.initial_effect(c)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetCategory(CATEGORY_DRAW)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	e1:SetProperty(EFFECT_FLAG_PLAYER_TARGET)
+	e1:SetCost(cm.cost)
+	e1:SetTarget(cm.target)
+	e1:SetOperation(cm.activate)
+	c:RegisterEffect(e1)
+end
+--Activate
+function cm.costfilter(c)
+	return c:IsRace(RACE_WYRM) and c:IsAbleToGraveAsCost()
+end
+cm.cost=RD.CostSendHandToGrave(cm.costfilter,1,1)
+function cm.target(e,tp,eg,ep,ev,re,r,rp,chk)
+	if chk==0 then return Duel.IsPlayerCanDraw(tp,2) end
+	RD.TargetDraw(tp,2)
+end
+function cm.activate(e,tp,eg,ep,ev,re,r,rp)
+	RD.Draw()
+	if Duel.GetFlagEffect(tp,m)~=0 then return end
+	RD.CreateCannotActivateEffect(e,aux.Stringid(m,1),cm.aclimit,tp,1,0,RESET_PHASE+PHASE_END)
+	Duel.RegisterFlagEffect(tp,m,RESET_PHASE+PHASE_END,0,1)
+end
+function cm.aclimit(e,re,tp)
+	local tc=re:GetHandler()
+	return re:IsActiveType(TYPE_MONSTER) and not tc:IsRace(RACE_WYRM)
+end
\ No newline at end of file

script/c120264055.lua

+local m=120264055
+local list={120155024}
+local cm=_G["c"..m]
+cm.name="幻刃攻厂 鳞虫院"
+function cm.initial_effect(c)
+	RD.AddCodeList(c,list)
+	--Activate
+	local e1=Effect.CreateEffect(c)
+	e1:SetType(EFFECT_TYPE_ACTIVATE)
+	e1:SetCode(EVENT_FREE_CHAIN)
+	c:RegisterEffect(e1)
+	--Atk Up
+	local e2=Effect.CreateEffect(c)
+	e2:SetType(EFFECT_TYPE_FIELD)
+	e2:SetCode(EFFECT_UPDATE_ATTACK)
+	e2:SetRange(LOCATION_FZONE)
+	e2:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e2:SetTarget(cm.target)
+	e2:SetValue(600)
+	c:RegisterEffect(e2)
+	--Pierce
+	local e3=Effect.CreateEffect(c)
+	e3:SetType(EFFECT_TYPE_SINGLE)
+	e3:SetCode(EFFECT_PIERCE)
+	local e4=Effect.CreateEffect(c)
+	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_GRANT)
+	e4:SetRange(LOCATION_FZONE)
+	e4:SetTargetRange(LOCATION_MZONE,LOCATION_MZONE)
+	e4:SetTarget(cm.target)
+	e4:SetLabelObject(e3)
+	c:RegisterEffect(e4)
+end
+--Atk Up
+function cm.target(e,c)
+	return c:IsFaceup() and (c:IsCode(list[1]) or (c:IsLevel(10) and c:IsRace(RACE_WYRM)))
+end
\ No newline at end of file