Fix 聖秘なる竜騎士

pack/2025-04-26 DUAD.ydk

@@ -15,13 +15,16 @@
 101301025
 101301027
 101301034
+101301037
 101301038
 101301039
 101301040
 101301042
 101301043
 101301044
+101301048
 101301049
+101301051
 101301052
 101301059
 101301060

script/c101301037.lua

@@ -68,17 +68,15 @@ function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk,chkc)
 end
 function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetTargetsRelateToChain()
-	if #g~=2 then return end
-	local exg=nil
-	if Duel.GetLocationCount(tp,LOCATION_MZONE)>0 then
-		exg=g:Filter(aux.NOT(Card.IsCanBeSpecialSummoned),nil,e,0,tp,false,false)
-		if #exg==2 then exg=nil end
-	end
+	if #g==0 or Duel.GetLocationCount(tp,LOCATION_MZONE)==0 then return end
+	local sg=g:Filter(aux.NecroValleyFilter(Card.IsCanBeSpecialSummoned),nil,e,0,tp,false,false)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-	local dc=g:FilterSelect(tp,aux.NecroValleyFilter(s.spfilter),1,1,exg,g,e,tp):GetFirst()
-	if not dc then return end
-	if Duel.SpecialSummon(dc,0,tp,tp,false,false,POS_FACEUP)~=0 then
-		g:RemoveCard(dc)
+	local sc=sg:Select(tp,1,1):GetFirst()
+	if not sc then return end
+	if Duel.SpecialSummon(sc,0,tp,tp,false,false,POS_FACEUP)>0 then
+		g:RemoveCard(sc)
+		if #g>0 then
 			Duel.SendtoDeck(g,nil,SEQ_DECKBOTTOM,REASON_EFFECT)
 		end
+	end
 end
\ No newline at end of file