Update "Nightmare Sonic Blast"

- Prevent script errors
- Updated checks to properly restrict Summoning as part of the activation requirement

Author: TheRazgriz

skill/c300203002.lua

@@ -2,60 +2,60 @@
 local s,id=GetID()
 function s.initial_effect(c)
 	aux.AddSkillProcedure(c,1,false,s.flipcon,s.flipop,1)
-	Duel.AddCustomActivityCounter(id,ACTIVITY_SUMMON,s.counterfilter)
-end
-s.listed_names={66516792}
-function s.counterfilter(c)
-	return not c:IsCode(66516792)
-end
-function s.cfilter(c)
-	return c:IsFaceup() and c:IsCode(66516792)
-end
-function s.thfilter(c)
-	return c:IsMonster() and c:IsAbleToHand()
+	Duel.AddCustomActivityCounter(id,ACTIVITY_SUMMON,function(c) return not c:IsCode(66516792) end)
+	Duel.AddCustomActivityCounter(id+100,ACTIVITY_NORMALSUMMON,function(c) return not c:IsCode(66516792) end)
 end
+s.listed_names={66516792} --"Serpent Night Dragon"
 function s.flipcon(e,tp,eg,ep,ev,re,r,rp)
 	--condition
 	local dg=Duel.GetFieldGroup(tp,LOCATION_DECK,0)
 	local fg=Duel.GetFieldGroup(tp,LOCATION_MZONE,0)
-	return aux.CanActivateSkill(tp) 
-	and Duel.IsExistingMatchingCard(s.cfilter,tp,LOCATION_MZONE,0,1,nil)
-	and #dg>3 and #fg==1
+	return aux.CanActivateSkill(tp) and Duel.IsExistingMatchingCard(aux.FaceupFilter(Card.IsCode,66516792),tp,LOCATION_MZONE,0,1,nil)
+		and #dg>3 and #fg==1 and Duel.GetCustomActivityCount(id,tp,ACTIVITY_SUMMON)==0 and Duel.GetCustomActivityCount(id+100,tp,ACTIVITY_NORMALSUMMON)==0
 end
 function s.flipop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SKILL_FLIP,tp,id|(1<<32))
 	Duel.Hint(HINT_CARD,tp,id)
 	Duel.ConfirmDecktop(tp,4)
 	local g=Duel.GetDecktopGroup(tp,4)
 	local ct=g:FilterCount(Card.IsMonster,nil)
+	if ct==0 then return end
 	if ct==1 then
 	--Add 1 of the revealed monsters to your hand
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local sg=g:FilterSelect(tp,s.thfilter,1,1,nil)
-		Duel.DisableShuffleCheck()
-		Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,sg)
-		g:RemoveCard(sg:GetFirst())
+		local sg=g:FilterSelect(tp,aux.AND(Card.IsMonster,Card.IsAbleToHand),1,1,nil)
+		local tc=sg:GetFirst()
+		if tc then 
+			Duel.DisableShuffleCheck()
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		end
+		g:RemoveCard(tc)
 		Duel.ShuffleHand(tp)
 		Duel.MoveToDeckBottom(g,tp)
 		Duel.SortDeckbottom(tp,tp,3)
 	--Destroy 1 face-up card your opponent controls
 	elseif ct==2 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
 		local dg=Duel.SelectMatchingCard(tp,Card.IsFaceup,tp,0,LOCATION_ONFIELD,1,1,nil)
-		Duel.HintSelection(dg)
-		Duel.Destroy(dg,REASON_EFFECT)
+		if #dg>0 then 
+			Duel.HintSelection(dg)
+			Duel.Destroy(dg,REASON_EFFECT)
+		end
 		Duel.MoveToDeckBottom(g,tp)
 		Duel.SortDeckbottom(tp,tp,4)
 	--Apply both effects in sequence
-	else
+	elseif ct>=3 then
 		--Add 1 revealed monster
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local sg=g:FilterSelect(tp,s.thfilter,1,1,nil)
-		Duel.DisableShuffleCheck()
-		Duel.SendtoHand(sg,nil,REASON_EFFECT)
-		Duel.ConfirmCards(1-tp,sg)
-		g:RemoveCard(sg:GetFirst())
+		local sg=g:FilterSelect(tp,aux.AND(Card.IsMonster,Card.IsAbleToHand),1,1,nil)
+		local tc=sg:GetFirst()
+		if tc then 
+			Duel.DisableShuffleCheck()
+			Duel.SendtoHand(tc,nil,REASON_EFFECT)
+			Duel.ConfirmCards(1-tp,tc)
+		end
+		g:RemoveCard(tc)
 		Duel.ShuffleHand(tp)
 		--Destroy 1 face-up card your controls
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_DESTROY)
@@ -84,4 +84,4 @@ function s.flipop(e,tp,eg,ep,ev,re,r,rp)
 	local e4=e1:Clone()
 	e4:SetCode(EFFECT_CANNOT_MSET)
 	Duel.RegisterEffect(e4,tp)
-end
+end