byd

expansions/script/c5012611.lua

 --魔禁 神裂火炽
 local s,id,o=GetID()
-c5012611.MoJin=true
+s.MoJin=true
 function s.initial_effect(c)
 	aux.AddCodeList(c,5012604)
 	--link summon
@@ -16,8 +16,11 @@ function s.initial_effect(c)
 	e1:SetOperation(s.ctop)
 	c:RegisterEffect(e1)
 end
+function s.sfliter(c)
+	return c.MoJin==true 
+end
 function s.lcheck(g,lc)
-	return g:IsExists(Card.IsLinkSetCard,1,nil,MoJin==true)
+	return g:IsExists(s.sfliter,1,nil)
 end
 function s.atkfilter(c,atk)
 	return c:IsFaceup() and c:GetAttack()<atk

expansions/script/c5012614.lua

 --右方之火
 local s,id,o=GetID()
-c5012614.MoJin=true
+s.MoJin=true
 function s.initial_effect(c)
 	aux.AddCodeList(c,5012604)
 	--fusion
 	c:EnableReviveLimit()
-	aux.AddFusionProcCodeFun(c,5012604,aux.FilterBoolFunction(Card.IsFusionSetCard,MoJin==true),2,true,true)
+	aux.AddFusionProcCodeFun(c,5012604,s.sfliter,2,true,true)
 	--special summon rule
 	local e10=Effect.CreateEffect(c)
 	e10:SetType(EFFECT_TYPE_FIELD)
@@ -43,6 +43,9 @@ function s.initial_effect(c)
 	e3:SetOperation(s.adop)
 	c:RegisterEffect(e3)
 end
+function s.sfliter(c)
+	return c.MoJin==true 
+end
 function s.cfilter(c,mc)
 	return ((c.MoJin==true and c:IsLocation(LOCATION_MZONE)) or c:IsFusionCode(5012604)) 
 		and c:IsAbleToRemoveAsCost() and c:IsCanBeFusionMaterial(mc)

expansions/script/c5012623.lua

 --冥土追魂
 local s,id,o=GetID()
-c5012623.MoJin=true
+s.MoJin=true
 function s.initial_effect(c)
-	aux.AddCodeList(c,5012604)
 	c:SetSPSummonOnce(id)
 	--link summon
 	aux.AddLinkProcedure(c,nil,2,2,s.lcheck)
@@ -18,8 +17,11 @@ function s.initial_effect(c)
 	e2:SetOperation(s.spop)
 	c:RegisterEffect(e2)
 end
+function s.sfliter(c)
+	return c.MoJin==true 
+end
 function s.lcheck(g,lc)
-	return g:IsExists(Card.IsLinkSetCard,1,nil,MoJin==true)
+	return g:IsExists(s.sfliter,1,nil)
 end
 function s.filter(c,e,tp)
 	return c:IsType(TYPE_MONSTER) and c.MoJin==true and c:IsFaceupEx() and c:IsCanBeSpecialSummoned(e,0,tp,false,false)

expansions/script/c5012628.lua

 --科隆尊
 local s,id,o=GetID()
-c5012628.MoJin=true
+s.MoJin=true
 function s.initial_effect(c)
 	aux.AddCodeList(c,5012604)
 	c:EnableReviveLimit()
 	--material
-	aux.AddFusionProcMix(c,false,true,s.matfilter,aux.FilterBoolFunction(Card.IsFusionSetCard,MoJin==true),aux.FilterBoolFunction(Card.IsFusionType,TYPE_MONSTER),nil)
+	aux.AddFusionProcMix(c,false,true,s.matfilter,s.filter,aux.FilterBoolFunction(Card.IsFusionType,TYPE_MONSTER),nil)
 	s.AddContactFusionProcedure(c,Card.IsAbleToDeckOrExtraAsCost,LOCATION_MZONE,0,aux.tdcfop(c))
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
@@ -31,7 +31,7 @@ function s.initial_effect(c)
 	--banish
 	local e2=Effect.CreateEffect(c)
 	e2:SetDescription(aux.Stringid(id,1))
-	--e2:SetType(EFFECT_TYPE_IGNITION)
+	e2:SetType(EFFECT_TYPE_IGNITION)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetProperty(EFFECT_FLAG_CANNOT_DISABLE)
 	e2:SetCost(s.rmcost)
@@ -101,6 +101,9 @@ end
 function s.matfilter(c)
 	return c.MoJin==true and c:IsLevel(10)
 end
+function s.filter(c)
+	return c.MoJin==true 
+end
 function s.destg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 	if chkc then return chkc:IsOnField() and chkc:IsFaceup() end
 	if chk==0 then return Duel.IsExistingTarget(aux.TRUE,tp,LOCATION_ONFIELD,LOCATION_ONFIELD,1,e:GetHandler()) end

expansions/script/c5012629.lua

 --魔禁 五和
 local s,id,o=GetID()
-c5012629.MoJin=true
+s.MoJin=true
 function s.initial_effect(c)
 	aux.AddCodeList(c,5012604)
 	--pendulum summon
 	aux.EnablePendulumAttribute(c,false)
 	--fusion material
 	c:EnableReviveLimit()
-	aux.AddFusionProcFun2(c,aux.FilterBoolFunction(Card.IsFusionSetCard,MoJin==true),aux.FilterBoolFunction(Card.IsFusionSetCard,MoJin==true),true)
+	aux.AddFusionProcFun2(c,s.sfliter,s.sfliter,true)
 	--special summon rule
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
@@ -33,6 +33,9 @@ function s.initial_effect(c)
 	e2:SetOperation(s.operation)
 	c:RegisterEffect(e2)
 end
+function s.sfliter(c)
+	return c.MoJin==true 
+end
 function s.cfilter(c,mc)
 	return c:IsAbleToDeckOrExtraAsCost() and c:IsCanBeFusionMaterial(mc)
 		and c:IsType(TYPE_MONSTER) and (c:IsFaceup() or not c:IsLocation(LOCATION_REMOVED)) and c.MoJin==true

expansions/script/c5012637.lua

@@ -3,9 +3,10 @@ local s,id,o=GetID()
 s.MoJin=true
 function s.initial_effect(c)
 	c:SetUniqueOnField(1,1,id)
+	c:SetSPSummonOnce(id)
 	--fusion material
 	c:EnableReviveLimit()
-	aux.AddFusionProcCodeFun(c,5012604,aux.FilterBoolFunction(Card.IsFusionSetCard,MoJin==true),1,true,true)
+	aux.AddFusionProcCodeFun(c,5012604,s.sfliter,1,true,true)
 	--special summon rule
 	local e1=Effect.CreateEffect(c)
 	e1:SetType(EFFECT_TYPE_FIELD)
@@ -43,6 +44,9 @@ function s.initial_effect(c)
 		Duel.RegisterEffect(ge1,0)
 	end
 end
+function s.sfliter(c)
+	return c.MoJin==true 
+end
 function s.regop(e,tp,eg,ep,ev,re,r,rp)
 	for tc in aux.Next(eg) do
 		if tc:IsCode(5012604) then