From e5b70a52b5fc4a572136a3a07ee2f5e443c5e52b Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Fri, 28 Sep 2007 13:57:52 +0000
Subject: Reremoved old TPlayer attributes and removed some code fragments that
 still links to these attributes

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@444 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Screens/UScreenSing.pas     | 7 -------
 Game/Code/Screens/UScreenSingModi.pas | 8 ++++----
 2 files changed, 4 insertions(+), 11 deletions(-)

(limited to 'Game/Code/Screens')

diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas
index 4e60a78b..391fdccf 100644
--- a/Game/Code/Screens/UScreenSing.pas
+++ b/Game/Code/Screens/UScreenSing.pas
@@ -1252,13 +1252,6 @@ begin
 
     If (Ini.LineBonus > 0) then
     begin
-
-      //Generate Text
-      if A >= 8 then
-        Player[I].LineBonus_Text := Theme.Sing.LineBonusText[8]
-      else
-        Player[I].LineBonus_Text := Theme.Sing.LineBonusText[Floor(A)];
-
       //PhrasenBonus give Points
       Player[I].ScoreLine := Player[I].ScoreLine + (1000 / (Length(Czesci[0].Czesc) - NumEmptySentences) * A / 8);
       Player[I].ScoreLineI := Round(Player[I].ScoreLine / 10) * 10;
diff --git a/Game/Code/Screens/UScreenSingModi.pas b/Game/Code/Screens/UScreenSingModi.pas
index 44615662..d18dd5bc 100644
--- a/Game/Code/Screens/UScreenSingModi.pas
+++ b/Game/Code/Screens/UScreenSingModi.pas
@@ -282,7 +282,7 @@ begin
     begin
       if (Player[I].ScoreTotalI<=10000) then
         PlayerInfo.Playerinfo[I].Score:=  Player[I].ScoreTotalI;
-      PlayerInfo.Playerinfo[I].Bar :=  Player[I].ScorePercent;
+      PlayerInfo.Playerinfo[I].Bar :=  Round(Scores.Players[I].RBPos * 100);
     end;
   end;
 
@@ -557,7 +557,7 @@ end;
   begin
     if PlayerInfo.Playerinfo[I].Enabled then
     begin
-      PlayerInfo.Playerinfo[I].Bar :=  Player[I].ScorePercent;
+      //PlayerInfo.Playerinfo[I].Bar :=  Player[I].ScorePercent;
       PlayerInfo.Playerinfo[I].Score := Player[I].ScoreTotalI;
     end;
   end;
@@ -582,8 +582,8 @@ end;
       //Player[I].ScoreTotal   := Player[I].ScoreTotal + (PlayerInfo.Playerinfo[I].Score - Player[I].ScoreTotalI);
       Player[I].ScoreTotalI := PlayerInfo.Playerinfo[I].Score;
     end;
-    if (PlayerInfo.Playerinfo[I].Bar <> Player[I].ScorePercent) then
-      Player[I].ScorePercentTarget := PlayerInfo.Playerinfo[I].Bar;
+    {if (PlayerInfo.Playerinfo[I].Bar <> Player[I].ScorePercent) then
+      Player[I].ScorePercentTarget := PlayerInfo.Playerinfo[I].Bar; }
   end;
 
   // back stereo
-- 
cgit v1.2.3