fix affecting cards played after activation

script/c50527144.lua

@@ -19,19 +19,21 @@ function c50527144.cost(e,tp,eg,ep,ev,re,r,rp,chk)
 	Duel.ShuffleHand(tp)
 end
 function c50527144.activate(e,tp,eg,ep,ev,re,r,rp)
+	local g=Duel.GetMatchingGroup(c50527144.tgfilter,tp,LOCATION_ONFIELD,0,nil)
+	local tc=g:GetFirst()
+	while tc do
 		local e1=Effect.CreateEffect(e:GetHandler())
-	e1:SetType(EFFECT_TYPE_FIELD)
-	e1:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
-	e1:SetProperty(EFFECT_FLAG_SET_AVAILABLE)
-	e1:SetTargetRange(LOCATION_ONFIELD,0)
-	e1:SetTarget(c50527144.tgfilter)
+		e1:SetType(EFFECT_TYPE_SINGLE)
+		e1:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
+		e1:SetReset(RESET_EVENT+0x1fe0000+RESET_PHASE+RESET_END)
 		e1:SetValue(1)
-	e1:SetReset(RESET_PHASE+PHASE_END)
-	Duel.RegisterEffect(e1,tp)
+		tc:RegisterEffect(e1)
 		local e2=e1:Clone()
-	e2:SetCode(EFFECT_INDESTRUCTABLE_EFFECT)
-	Duel.RegisterEffect(e2,tp)
+		e2:SetCode(EFFECT_CANNOT_BE_EFFECT_TARGET)
+		tc:RegisterEffect(e2)
+		tc=g:GetNext()
+	end
 end
-function c50527144.tgfilter(e,c)
+function c50527144.tgfilter(c)
 	return (c:IsFaceup() and c:IsSetCard(0x8d)) or (c:IsFacedown() and c:IsLocation(LOCATION_MZONE))
 end
\ No newline at end of file