From 6857c4c06206f80aee1855951b916a6526c87fc7 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Sun, 17 Oct 2010 11:35:26 +0000 Subject: added general fading (for fade-out) it must be tested on MacOS and Linux. a more general fading function would be better (with "fade to pause" and "fade to end"). git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@2672 b956fd51-792f-4845-bead-9b4dfca2ff2c --- medley_new/src/screens/UScreenSing.pas | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'medley_new/src/screens') diff --git a/medley_new/src/screens/UScreenSing.pas b/medley_new/src/screens/UScreenSing.pas index 4998ed02..6cadaf16 100644 --- a/medley_new/src/screens/UScreenSing.pas +++ b/medley_new/src/screens/UScreenSing.pas @@ -1424,9 +1424,8 @@ begin (PlaylistMedley.CurrentMedleySong<=PlaylistMedley.NumMedleySongs) then begin PlaylistMedley.ApplausePlayed:=true; - // TODO: add fade-out! + AudioPlayback.Fade(CurrentSong.Medley.FadeOut_time, 0.1); AudioPlayback.PlaySound(SoundLib.Applause); - //Music.Fade(MP3Volume, 10, CurrentSong.Medley.FadeOut_time); end; end; -- cgit v1.2.3