Fix 原質の炉心溶解

処理時に、『自分のデッキの上からカードを６枚めくり』の処理を行い、『その中から「原质炉」カード１枚を選んで手札に加える』処理を行うことができます。『残りを好きな順番でデッキの上に戻す』処理を行い、デッキの上に戻した場合、その後、『自分フィールドのランク３のXモンスターがX素材としているカード１枚を手札に加える』処理を行うことができます。

script/c101207059.lua

@@ -40,9 +40,12 @@ function s.xyzfilter(c)
 	return c:IsFaceup() and c:IsRank(3)
 end
 function s.thop(e,tp,eg,ep,ev,re,r,rp)
-	if Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)<6 then return end
-	Duel.ConfirmDecktop(tp,6)
-	local g=Duel.GetDecktopGroup(tp,6)
+	local dc=Duel.GetFieldGroupCount(tp,LOCATION_DECK,0)
+	if dc==0 then return end
+	if dc>6 then dc=6 end
+	Duel.ConfirmDecktop(tp,dc)
+	local g=Duel.GetDecktopGroup(tp,dc)
+	local sd=true
 	if g:IsExists(s.thfilter,1,nil) and Duel.SelectYesNo(tp,aux.Stringid(id,2)) then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
 		local sg=g:FilterSelect(tp,s.thfilter,1,1,nil)
@@ -50,8 +53,13 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
 		Duel.SendtoHand(sg,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,sg)
 		Duel.ShuffleHand(tp)
-		Duel.SortDecktop(tp,tp,5)
-	else Duel.SortDecktop(tp,tp,6) end
+		if dc>1 then
+			Duel.SortDecktop(tp,tp,dc-1)
+		else
+			sd=false
+		end
+	else Duel.SortDecktop(tp,tp,dc) end
+	if sd then
 		local rg=Group.CreateGroup()
 		local xg=Duel.GetMatchingGroup(s.xyzfilter,tp,LOCATION_MZONE,0,nil)
 		if xg:GetCount()<1 then return end
@@ -76,6 +84,7 @@ function s.thop(e,tp,eg,ep,ev,re,r,rp)
 				Duel.ShuffleHand(1-tp)
 			end
 		end
+	end
 end
 function s.ovcon(e,tp,eg,ep,ev,re,r,rp)
 	local rc=re:GetHandler()