diff options
| author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-06-17 13:58:55 +0000 |
|---|---|---|
| committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-06-17 13:58:55 +0000 |
| commit | 588095fb82564c2abf34278e8d0767d92ccb463e (patch) | |
| tree | b29fa4edeb93af112f65c15624f07ac324f374f9 | |
| parent | 2ae66ee4c84f1160b644244fb7486e6cf8d67bde (diff) | |
| download | usdx-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
| -rw-r--r-- | src/screens/UScreenCredits.pas | 5 |
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; |