end of first pass. many more smaller changes and preparations for later additions

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

1 files changed, 4 insertions, 6 deletions

diff --git a/src/screens/UScreenScore.pas b/src/screens/UScreenScore.pas
index 4fdaf0f1..6ecc7181 100644
--- a/src/screens/UScreenScore.pas
+++ b/src/screens/UScreenScore.pas
@@ -92,7 +92,7 @@ type
 
   { textures for playerstatics of seconds screen players }
   TPlayerStaticTexture = record
-    Tex: TTexture;    
+    Tex: TTexture;
   end;
 
   TScreenScore = class(TMenu)
@@ -291,7 +291,7 @@ end;
 procedure TScreenScore.RefreshTexts;
 var
   P: integer;
-  
+
 begin
   if ActualRound < Length(PlaylistMedley.Stats) - 1 then
   begin
@@ -537,8 +537,6 @@ begin
     for Counter := 0 to High(Theme.Score.PlayerStatic[Player]) do
       PlayerStatic[Player, Counter]      := AddStatic(Theme.Score.PlayerStatic[Player, Counter]);
 
-    
-
     for Counter := 0 to High(Theme.Score.PlayerTexts[Player]) do
       PlayerTexts[Player, Counter]       := AddText(Theme.Score.PlayerTexts[Player, Counter]);
 
@@ -658,7 +656,7 @@ procedure TScreenScore.DrawPlayerBars;
   var
     I: integer;
 begin
-  for I := 0 to PlayersPlay-1 do
+  for I := 0 to PlayersPlay - 1 do
   begin
     if (PlayerPositionMap[I].Position > 0) and ((ScreenAct = PlayerPositionMap[I].Screen) or (PlayerPositionMap[I].BothScreens)) then
     begin
@@ -699,7 +697,7 @@ begin
   inherited;
 
   ActualRound := 0;
-  if ScreenSong.Mode = smMedley then
+  if (ScreenSong.Mode = smMedley) then
   begin
     for P := 0 to PlayersPlay - 1 do
       Player[P] := PlaylistMedley.Stats[ActualRound].Player[P];