54188

expansions/script/c60159907.lua

 --极夜的龙骑士
 function c60159907.initial_effect(c)
+	--fusion material
+	c:EnableReviveLimit()
+	aux.AddFusionProcFun2(c,aux.FilterBoolFunction(c60159907.spfilter1),aux.FilterBoolFunction(c60159907.spfilter2),false)
+	aux.AddContactFusionProcedure(c,aux.FilterBoolFunction(Card.IsReleasable,REASON_SPSUMMON),LOCATION_MZONE,0,Duel.Release,REASON_SPSUMMON+REASON_MATERIAL)
 	--fusion material
 	c:EnableReviveLimit()
 	--Attribute Dark
@@ -19,14 +23,14 @@ function c60159907.initial_effect(c)
 	e1:SetValue(c60159907.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_EXTRA)
-	e2:SetCondition(c60159907.spcon)
-	e2:SetOperation(c60159907.spop)
-	c:RegisterEffect(e2)
+	--local e2=Effect.CreateEffect(c)
+	--e2:SetType(EFFECT_TYPE_FIELD)
+	--e2:SetCode(EFFECT_SPSUMMON_PROC)
+	--e2:SetProperty(EFFECT_FLAG_UNCOPYABLE)
+	--e2:SetRange(LOCATION_EXTRA)
+	--e2:SetCondition(c60159907.spcon)
+	--e2:SetOperation(c60159907.spop)
+	--c:RegisterEffect(e2)
 	--to hand
 	local e3=Effect.CreateEffect(c)
 	e3:SetDescription(aux.Stringid(60159907,0))
@@ -44,11 +48,11 @@ function c60159907.splimit(e,se,sp,st)
 end
 function c60159907.spfilter1(c,tp,fc)
 	return (c:IsAttribute(ATTRIBUTE_LIGHT) or c:IsAttribute(ATTRIBUTE_DARK)) 
-		and c:IsRace(RACE_DRAGON) and c:IsCanBeFusionMaterial(fc) and Duel.CheckReleaseGroup(REASON_COST,tp,c60159907.spfilter2,1,c,fc)
+		and c:IsRace(RACE_DRAGON)
 end
 function c60159907.spfilter2(c,fc)
 	return (c:IsAttribute(ATTRIBUTE_LIGHT) or c:IsAttribute(ATTRIBUTE_DARK)) 
-		and c:IsRace(RACE_WARRIOR) and c:IsCanBeFusionMaterial(fc)
+		and c:IsRace(RACE_WARRIOR)
 end
 function c60159907.spcon(e,c)
 	if c==nil then return true end