diff -r 0f396d0c429d -r 3afe33c1cf06 hedgewars/uWorld.pas --- a/hedgewars/uWorld.pas Thu Jan 12 22:07:36 2006 +0000 +++ b/hedgewars/uWorld.pas Sun Jan 15 14:14:12 2006 +0000 @@ -201,20 +201,21 @@ // Teams Healths team:= TeamsList; -i:= cSCreenHeight - 32; while team <> nil do begin - DrawFromStoreRect(cScreenWidth div 2 - team.NameRect.w - 3, i, + DrawFromStoreRect(cScreenWidth div 2 - team.NameRect.w - 3, + Team.DrawHealthY, @team.NameRect, Surface); r:= team.HealthRect; r.w:= 3 + team.TeamHealth; - DrawFromStoreRect(cScreenWidth div 2, i, + DrawFromStoreRect(cScreenWidth div 2, + Team.DrawHealthY, @r, Surface); inc(r.x, cTeamHealthWidth + 3); r.w:= 2; - DrawFromStoreRect(cScreenWidth div 2 + team.TeamHealth + 3, i, + DrawFromStoreRect(cScreenWidth div 2 + team.TeamHealth + 3, + Team.DrawHealthY, @r, Surface); - dec(i, team.HealthRect.h + 2); team:= team.Next end;