From d3b710957904ec42fa9492e0b19f30a84e0fb362 Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Fri, 18 Dec 2009 16:10:21 +0000
Subject: fixed infinite score raising bug

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2049 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/base/USingScores.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/base/USingScores.pas')

diff --git a/src/base/USingScores.pas b/src/base/USingScores.pas
index dc49e013..f280900e 100644
--- a/src/base/USingScores.pas
+++ b/src/base/USingScores.pas
@@ -749,7 +749,7 @@ procedure TSingScores.DoRaiseScore(const Index: integer);
   const
     RaisePerSecond = 500;
 begin
-  S := (Players[Index].Score - Players[Index].ScoreDisplayed) + GetPopUpPoints(Index);
+  S := (Players[Index].Score - (Players[Index].ScoreDisplayed + GetPopUpPoints(Index)));
 
   if (S <> 0) then
   begin
-- 
cgit v1.2.3