aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-06-17 13:58:55 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2010-06-17 13:58:55 +0000
commit588095fb82564c2abf34278e8d0767d92ccb463e (patch)
treeb29fa4edeb93af112f65c15624f07ac324f374f9
parent2ae66ee4c84f1160b644244fb7486e6cf8d67bde (diff)
downloadusdx-588095fb82564c2abf34278e8d0767d92ccb463e.tar.gz
usdx-588095fb82564c2abf34278e8d0767d92ccb463e.tar.xz
usdx-588095fb82564c2abf34278e8d0767d92ccb463e.zip
pause bg music during credits
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2535 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--src/screens/UScreenCredits.pas5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/screens/UScreenCredits.pas b/src/screens/UScreenCredits.pas
index b1333b4a..a428cb15 100644
--- a/src/screens/UScreenCredits.pas
+++ b/src/screens/UScreenCredits.pas
@@ -251,6 +251,9 @@ procedure TScreenCredits.OnShow;
begin
inherited;
+ // pause background music
+ SoundLib.PauseBgMusic;
+
CRDTS_Stage := InitialDelay;
Credits_X := 580;
deluxe_slidein := 0;
@@ -265,6 +268,8 @@ end;
procedure TScreenCredits.OnHide;
begin
AudioPlayback.Stop;
+
+ SoundLib.StartBgMusic;
end;
Procedure TScreenCredits.Draw_FunkyText;