From 5d167eca50e5d63b88c21f09651b17088841095a Mon Sep 17 00:00:00 2001 From: tobigun Date: Wed, 5 Mar 2008 11:08:35 +0000 Subject: Equalizer (Analyser) is displayed again with BASS git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@907 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenSong.pas | 21 ++------------------- 1 file changed, 2 insertions(+), 19 deletions(-) (limited to 'Game/Code/Screens') diff --git a/Game/Code/Screens/UScreenSong.pas b/Game/Code/Screens/UScreenSong.pas index fbfeeb65..a1dc0680 100644 --- a/Game/Code/Screens/UScreenSong.pas +++ b/Game/Code/Screens/UScreenSong.pas @@ -1861,25 +1861,8 @@ begin if (EqualizerData[i] >= 1) then EqualizerData[i] := 0.9999999999999; - try - if ( assigned( Theme ) ) AND - ( assigned( Theme.Song ) ) AND - ( i < length( EqualizerData ) ) THEN - begin - if single( EqualizerData[i] ) > 1 then - begin - lTmp := Single(EqualizerData[i]) * Theme.Song.Equalizer.Length; - if lTmp > Pos then - Pos := lTmp; - end; - end; - except - {$IFDEF FPC} - on E:EInvalidOp do - writeln( 'UScreenSong - DOH !!!! ('+inttostr(i)+' '+ inttostr( integer( EqualizerData[i] ) )+' * '+ ')' ); - {$ENDIF} - end - + if (EqualizerData[i] * Theme.Song.Equalizer.Length > Pos) then + Pos := EqualizerData[i] * Theme.Song.Equalizer.Length; end; //Change Last Band -- cgit v1.2.3