aboutsummaryrefslogtreecommitdiffstats
path: root/medley_new/src
diff options
context:
space:
mode:
Diffstat (limited to 'medley_new/src')
-rw-r--r--medley_new/src/base/UMusic.pas3
-rw-r--r--medley_new/src/screens/UScreenSing.pas2
2 files changed, 4 insertions, 1 deletions
diff --git a/medley_new/src/base/UMusic.pas b/medley_new/src/base/UMusic.pas
index c775fd51..0fa625ee 100644
--- a/medley_new/src/base/UMusic.pas
+++ b/medley_new/src/base/UMusic.pas
@@ -569,6 +569,7 @@ type
Change: TAudioPlaybackStream;
Option: TAudioPlaybackStream;
Click: TAudioPlaybackStream;
+ Applause:TAudioPlaybackStream;
BGMusic: TAudioPlaybackStream;
constructor Create();
@@ -938,6 +939,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'));
@@ -953,6 +955,7 @@ begin
FreeAndNil(Change);
FreeAndNil(Option);
FreeAndNil(Click);
+ FreeAndNil(Applause);
FreeAndNil(BGMusic);
end;
diff --git a/medley_new/src/screens/UScreenSing.pas b/medley_new/src/screens/UScreenSing.pas
index cea1b2c3..4998ed02 100644
--- a/medley_new/src/screens/UScreenSing.pas
+++ b/medley_new/src/screens/UScreenSing.pas
@@ -1425,7 +1425,7 @@ begin
begin
PlaylistMedley.ApplausePlayed:=true;
// TODO: add fade-out!
- //Music.PlayApplause;
+ AudioPlayback.PlaySound(SoundLib.Applause);
//Music.Fade(MP3Volume, 10, CurrentSong.Medley.FadeOut_time);
end;
end;