added applause sound

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2671 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 3 insertions, 0 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;