fix

expansions/script/c11451672.lua

@@ -5,7 +5,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451673.lua

@@ -5,7 +5,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451674.lua

@@ -5,7 +5,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451675.lua

@@ -5,7 +5,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451676.lua

@@ -5,7 +5,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451677.lua

@@ -6,7 +6,19 @@ function cm.initial_effect(c)
 	--fusion material
 	c:EnableReviveLimit()
 	aux.AddFusionProcCodeFun(c,m-40,aux.FilterBoolFunction(Card.IsType,TYPE_SPELL+TYPE_TRAP),1,true,true)
-	aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c)):SetCountLimit(1,11451631+EFFECT_COUNT_CODE_OATH)
+	local e10=aux.AddContactFusionProcedure(c,cm.cfilter,LOCATION_REMOVED,0,cm.tdcfop(c))
+	local con=e10:GetCondition()
+	local op=e10:GetOperation()
+	e10:SetCondition(function(e,...)
+		local tp=e:GetHandlerPlayer()
+		return Duel.GetFlagEffect(tp,11451631)==0 and con(e,...)
+	end)
+	e10:SetOperation(function(e,tp,...) 
+		local ph=Duel.GetCurrentPhase()
+		if ph>PHASE_MAIN1 and ph<PHASE_MAIN2 then ph=PHASE_BATTLE end
+		Duel.RegisterFlagEffect(tp,11451631,RESET_PHASE+ph,0,1)	
+		op(e,tp,...)
+	end)
 	--spsummon condition
 	local e0=Effect.CreateEffect(c)
 	e0:SetType(EFFECT_TYPE_SINGLE)

expansions/script/c11451859.lua

@@ -160,10 +160,13 @@ function cm.chkval(e,te)
 		--Duel.Readjust()
 		e:SetValue(aux.FALSE)
 		e:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-		if SetCardData then
-			Duel.Hint(24,0,aux.Stringid(m,15))
-		else
-			Debug.Message("「接引」任务进度更新！")
+		if Duel.GetFlagEffect(tp,0xffff+m)==0 then
+			Duel.RegisterFlagEffect(tp,0xffff+m,RESET_CHAIN,0,1)
+			if SetCardData then
+				Duel.Hint(24,0,aux.Stringid(m,15))
+			else
+				Debug.Message("「接引」任务进度更新！")
+			end
 		end
 		return true
 	end

expansions/script/c11451863.lua

@@ -270,10 +270,13 @@ function cm.chkval(e,te)
 	if e:GetHandler():GetFlagEffect(m-10)>0 and te and te:GetHandler() and not te:IsHasProperty(EFFECT_FLAG_UNCOPYABLE) and (te:GetCode()<0x10000 or te:IsHasType(EFFECT_TYPE_ACTIONS)) then
 		local g=e:GetLabelObject()
 		g:ForEach(Card.ResetFlagEffect,m-10)
-		if SetCardData then
-			Duel.Hint(24,0,aux.Stringid(m,2))
-		else
-			Debug.Message("「强击」任务进度更新！")
+		if Duel.GetFlagEffect(tp,0xffff+m)==0 then
+			Duel.RegisterFlagEffect(tp,0xffff+m,RESET_CHAIN,0,1)
+			if SetCardData then
+				Duel.Hint(24,0,aux.Stringid(m,2))
+			else
+				Debug.Message("「强击」任务进度更新！")
+			end
 		end
 		local tc=te:GetHandler()
 		local e3=Effect.CreateEffect(tc)