victory effect

https://www.db.yugioh-card.com/yugiohdb/faq_search.action?ope=5&fid=20527&keyword=&tag=-1

c10000040.lua

@@ -25,7 +25,7 @@ function c10000040.initial_effect(c)
 	--win
 	local e4=Effect.CreateEffect(c)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
-	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_DELAY)
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e4:SetCode(EVENT_SPSUMMON_SUCCESS)
 	e4:SetOperation(c10000040.winop)
 	c:RegisterEffect(e4)

c48995978.lua

@@ -19,9 +19,9 @@ function c48995978.initial_effect(c)
 	--win
 	local e2=Effect.CreateEffect(c)
 	e2:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
-	e2:SetCode(EVENT_CHAIN_SOLVING)
+	e2:SetCode(EVENT_ADJUST)
 	e2:SetRange(LOCATION_MZONE)
-	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_DELAY)
+	e2:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
 	e2:SetOperation(c48995978.winop)
 	c:RegisterEffect(e2)
 end

c5008836.lua

@@ -33,6 +33,7 @@ function c5008836.initial_effect(c)
 	e4:SetDescription(aux.Stringid(5008836,1))
 	e4:SetCode(EVENT_BATTLE_DESTROYING)
 	e4:SetType(EFFECT_TYPE_SINGLE+EFFECT_TYPE_CONTINUOUS)
+	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e4:SetCondition(c5008836.wincon)
 	e4:SetOperation(c5008836.winop)
 	c:RegisterEffect(e4)

c6165656.lua

@@ -34,9 +34,7 @@ function c6165656.initial_effect(c)
 	e4:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e4:SetProperty(EFFECT_FLAG_CANNOT_DISABLE+EFFECT_FLAG_UNCOPYABLE)
 	e4:SetRange(LOCATION_MZONE)
-	e4:SetCode(EVENT_PHASE+PHASE_END)
-	e4:SetCountLimit(1)
-	e4:SetCondition(c6165656.wincon)
+	e4:SetCode(EVENT_ADJUST)
 	e4:SetOperation(c6165656.winop)
 	c:RegisterEffect(e4)
 end
@@ -60,10 +58,9 @@ function c6165656.operation(e,tp,eg,ep,ev,re,r,rp)
 	local p,d=Duel.GetChainInfo(0,CHAININFO_TARGET_PLAYER,CHAININFO_TARGET_PARAM)
 	Duel.Damage(p,d,REASON_EFFECT)
 end
-function c6165656.wincon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetTurnPlayer()==tp and Duel.GetLP(1-tp)<=2000 and e:GetHandler():GetOverlayCount()==0
-end
 function c6165656.winop(e,tp,eg,ep,ev,re,r,rp)
 	local WIN_REASON_DISASTER_LEO=0x18
-	Duel.Win(tp,WIN_REASON_DISASTER_LEO)
+	if Duel.GetTurnPlayer()==tp and Duel.GetLP(1-tp)<=2000 and e:GetHandler():GetOverlayCount()==0 then
+		Duel.Win(tp,WIN_REASON_DISASTER_LEO)
+	end
 end

c94212438.lua

@@ -34,7 +34,7 @@ function c94212438.initial_effect(c)
 	local e5=Effect.CreateEffect(c)
 	e5:SetType(EFFECT_TYPE_FIELD+EFFECT_TYPE_CONTINUOUS)
 	e5:SetCode(EVENT_ADJUST)
-	e5:SetRange(LOCATION_SZONE)
+	e5:SetRange(LOCATION_ONFIELD)
 	e5:SetProperty(EFFECT_FLAG_UNCOPYABLE+EFFECT_FLAG_CANNOT_DISABLE)
 	e5:SetOperation(c94212438.winop)
 	c:RegisterEffect(e5)
@@ -96,7 +96,7 @@ function c94212438.cfilter3(c)
 end
 function c94212438.winop(e,tp,eg,ep,ev,re,r,rp)
 	local WIN_REASON_DESTINY_BOARD=0x15
-	local g=Duel.GetMatchingGroup(c94212438.cfilter3,tp,LOCATION_ONFIELD,0,aux.ExceptThisCard(e))
+	local g=Duel.GetMatchingGroup(c94212438.cfilter3,tp,LOCATION_ONFIELD,0,e:GetHandler())
 	if g:GetClassCount(Card.GetCode)==4 then
 		Duel.Win(tp,WIN_REASON_DESTINY_BOARD)
 	end

c97795930.lua

@@ -36,8 +36,8 @@ end
 function c97795930.activate(e,tp,eg,ep,ev,re,r,rp)
 	local tc=Duel.GetFirstTarget()
 	if tc:GetFlagEffect(97795931)>0 then return end
-	tc:RegisterFlagEffect(97795931,RESET_EVENT+RESETS_STANDARD,0,0)
 	if tc:IsRelateToEffect(e) and tc:IsFaceup() then
+		tc:RegisterFlagEffect(97795931,RESET_EVENT+RESETS_STANDARD,0,0)
 		local e1=Effect.CreateEffect(e:GetHandler())
 		e1:SetType(EFFECT_TYPE_CONTINUOUS+EFFECT_TYPE_SINGLE)
 		e1:SetCode(EVENT_BATTLE_DESTROYING)