reset karaoke mode after the song, and initialize to not karaoke

mode
UltraStar-Deluxe · Jun 9, 2024 · bcf6164 · bcf6164
1 parent 3925ef2
commit bcf6164
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/src/media/UAudioPlaybackBase.pas b/src/media/UAudioPlaybackBase.pas
@@ -173,6 +173,11 @@ function TAudioPlaybackBase.Open(const Filename: IPath; const FilenameKaraoke: I
       KaraokeMusicStream.AddSoundFX(IReplayGain.Create());
   end;
 
+  KaraokeMode := false;
+  if assigned(KaraokeMusicStream) then begin
+    KaraokeMusicStream.Volume := 0;
+  end;
+
   Result := true;
 end;
 
@@ -296,6 +301,7 @@ procedure TAudioPlaybackBase.Stop;
     MusicStream.Stop();
   if assigned(KaraokeMusicStream) then
     KaraokeMusicStream.Stop();
+  KaraokeMode := false;
 end;
 
 function TAudioPlaybackBase.Length: real;