diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/base/UMusic.pas | 3 | ||||
-rw-r--r-- | src/screens/UScreenSing.pas | 1 |
2 files changed, 4 insertions, 0 deletions
diff --git a/src/base/UMusic.pas b/src/base/UMusic.pas index c85e3417..ca577db4 100644 --- a/src/base/UMusic.pas +++ b/src/base/UMusic.pas @@ -572,6 +572,7 @@ type Change: TAudioPlaybackStream; Option: TAudioPlaybackStream; Click: TAudioPlaybackStream; + Applause:TAudioPlaybackStream; BGMusic: TAudioPlaybackStream; constructor Create(); @@ -946,6 +947,7 @@ begin Change := AudioPlayback.OpenSound(SoundPath.Append('select music change music 50.mp3')); Option := AudioPlayback.OpenSound(SoundPath.Append('option change col.mp3')); Click := AudioPlayback.OpenSound(SoundPath.Append('rimshot022b.mp3')); + Applause:= AudioPlayback.OpenSound(SoundPath.Append('Applause.mp3')); BGMusic := AudioPlayback.OpenSound(SoundPath.Append('background track.mp3')); @@ -961,6 +963,7 @@ begin FreeAndNil(Change); FreeAndNil(Option); FreeAndNil(Click); + FreeAndNil(Applause); FreeAndNil(BGMusic); end; diff --git a/src/screens/UScreenSing.pas b/src/screens/UScreenSing.pas index ff4f33e6..f9770cb3 100644 --- a/src/screens/UScreenSing.pas +++ b/src/screens/UScreenSing.pas @@ -1437,6 +1437,7 @@ begin (PlaylistMedley.CurrentMedleySong <= PlaylistMedley.NumMedleySongs) then begin PlaylistMedley.ApplausePlayed := true; + AudioPlayback.PlaySound(SoundLib.Applause); end; end; |