Fix

script/c100245032.lua

@@ -44,8 +44,7 @@ function s.syncon(e)
 	return e:GetHandler():IsLocation(LOCATION_MZONE)
 end
 function s.spcon(e,tp,eg,ep,ev,re,r,rp)
-	local ph=Duel.GetCurrentPhase()
-	return (ph==PHASE_MAIN1 or ph==PHASE_MAIN2) and Duel.GetTurnPlayer()==1-tp
+	return Duel.IsMainPhase() and Duel.GetTurnPlayer()==1-tp
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return Duel.GetLocationCount(tp,LOCATION_MZONE)>0

script/c100245035.lua

@@ -70,6 +70,7 @@ function s.rthop(e,tp,eg,ep,ev,re,r,rp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_RTOHAND)
 	local g=Duel.SelectMatchingCard(tp,Card.IsAbleToHand,tp,0,LOCATION_ONFIELD,1,1,nil)
 	if g:GetCount()>0 then
+		Duel.HintSelection(g)
 		Duel.SendtoHand(g,nil,REASON_EFFECT)
 	end
 end
\ No newline at end of file

script/c100245036.lua

@@ -20,6 +20,7 @@ function s.initial_effect(c)
 	e2:SetCategory(CATEGORY_SPECIAL_SUMMON)
 	e2:SetType(EFFECT_TYPE_QUICK_O)
 	e2:SetCode(EVENT_FREE_CHAIN)
+	e2:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_END_PHASE)
 	e2:SetRange(LOCATION_MZONE)
 	e2:SetCountLimit(1,id)
 	e2:SetCondition(s.spcon)
@@ -52,6 +53,7 @@ function s.sporthGroup(g,e,tp)
 	return g:FilterCount(s.thfilter2,nil,g,e,tp)~=0
 end
 function s.sptg(e,tp,eg,ep,ev,re,r,rp,chk)
+	local c=e:GetHandler()
 	local g=Duel.GetMatchingGroup(s.thfilter,tp,LOCATION_GRAVE,0,nil,e,tp)
 	if chk==0 then return Duel.GetMZoneCount(tp,c)>0 and g:CheckSubGroup(s.sporthGroup,2,2,e,tp) end
 	Duel.SetOperationInfo(0,CATEGORY_SPECIAL_SUMMON,nil,1,tp,LOCATION_GRAVE)
@@ -60,13 +62,16 @@ end
 function s.spfilter(c)
 	return c:IsSynchroSummonable(nil) and c:IsType(TYPE_TUNER)
 end
+function s.rthfilter(c,tp,g)
+	return c:IsAbleToHand() and g:FilterCount(Card.IsCanBeSpecialSummoned,nil,0,tp,false,false)==1
+end
 function s.spop(e,tp,eg,ep,ev,re,r,rp)
 	local g=Duel.GetMatchingGroup(aux.NecroValleyFilter(s.thfilter),tp,LOCATION_GRAVE,0,nil,e,tp)
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_TARGET)
 	local sg=g:SelectSubGroup(tp,s.sporthGroup,false,2,2,e,tp)
 	if g:GetCount()>1 then
 		Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_ATOHAND)
-		local tc=sg:FilterSelect(tp,Card.IsAbleToHand,1,1,nil):GetFirst()
+		local tc=sg:FilterSelect(tp,s.rthfilter,1,1,nil,tp,sg):GetFirst()
 		Duel.SendtoHand(tc,nil,REASON_EFFECT)
 		Duel.ConfirmCards(1-tp,tc)
 		sg:RemoveCard(tc)
@@ -75,11 +80,11 @@ function s.spop(e,tp,eg,ep,ev,re,r,rp)
 			if Duel.IsExistingMatchingCard(s.spfilter,tp,LOCATION_EXTRA,0,1,nil)
 				and Duel.SelectYesNo(tp,aux.Stringid(id,1)) then
 				Duel.BreakEffect()
-				local g=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_EXTRA,0,nil)
-				if g:GetCount()>0 then
+				local exg=Duel.GetMatchingGroup(s.spfilter,tp,LOCATION_EXTRA,0,nil)
+				if exg:GetCount()>0 then
 					Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_SPSUMMON)
-					local sg=g:Select(tp,1,1,nil)
-					Duel.SynchroSummon(tp,sg:GetFirst(),nil)
+					local syg=exg:Select(tp,1,1,nil)
+					Duel.SynchroSummon(tp,syg:GetFirst(),nil)
 				end
 			end
 		end

script/c100245037.lua

@@ -30,7 +30,7 @@ function s.initial_effect(c)
 	e3:SetCode(EVENT_FREE_CHAIN)
 	e3:SetProperty(EFFECT_FLAG_CARD_TARGET)
 	e3:SetRange(LOCATION_MZONE)
-	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER)
+	e3:SetHintTiming(0,TIMINGS_CHECK_MONSTER+TIMING_MAIN_END)
 	e3:SetCountLimit(1,id)
 	e3:SetCondition(s.discon)
 	e3:SetCost(s.discost)
@@ -45,7 +45,7 @@ function s.lvtg(e,c)
 	return c:GetBaseAttack()<=1700
 end
 function s.discon(e,tp,eg,ep,ev,re,r,rp)
-	return Duel.GetCurrentPhase()==PHASE_MAIN1 or Duel.GetCurrentPhase()==PHASE_MAIN2
+	return Duel.IsMainPhase()
 end
 function s.cfilter(c)
 	return c:IsType(TYPE_TUNER) and c:IsAbleToRemoveAsCost()

script/c100245038.lua

@@ -37,7 +37,7 @@ end
 function s.cpcon(e,tp,eg,ep,ev,re,r,rp)
 	return rp==1-tp
 end
-function s.pfilter(c)
+function s.pfilter(c,e,tp,eg,ep,ev,re,r,rp)
 	if not (c:IsSetCard(0x2d6) and c:IsAbleToRemoveAsCost()) then return false end
 	local te=c.killer_tune_be_material_effect
 	if not te then return false end
@@ -46,9 +46,9 @@ function s.pfilter(c)
 end
 function s.cptg(e,tp,eg,ep,ev,re,r,rp,chk)
 	if chk==0 then return e:IsCostChecked()
-		and Duel.IsExistingMatchingCard(s.pfilter,tp,LOCATION_GRAVE,0,1,nil) end
+		and Duel.IsExistingMatchingCard(s.pfilter,tp,LOCATION_GRAVE,0,1,nil,e,tp,eg,ep,ev,re,r,rp) end
 	Duel.Hint(HINT_SELECTMSG,tp,HINTMSG_REMOVE)
-	local g=Duel.SelectMatchingCard(tp,s.pfilter,tp,LOCATION_GRAVE,0,1,1,nil)
+	local g=Duel.SelectMatchingCard(tp,s.pfilter,tp,LOCATION_GRAVE,0,1,1,nil,e,tp,eg,ep,ev,re,r,rp)
 	Duel.Remove(g,POS_FACEUP,REASON_COST)
 	local tc=g:GetFirst()
 	Duel.ClearTargetCard()

test-strings.conf

@@ -9,4 +9,5 @@
 !setname 0x2d2 奏悦机组
 !setname 0x2d3 终刻
 !setname 0x2d4 不可见
-!setname 0x2d5 纠罪巧
\ No newline at end of file
+!setname 0x2d5 纠罪巧
+!setname 0x2d6 杀手级调整曲
\ No newline at end of file