diff options
| -rw-r--r-- | Game/Code/Screens/UScreenSong.pas | 21 |
1 files changed, 2 insertions, 19 deletions
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
|