aboutsummaryrefslogtreecommitdiffstats
path: root/src/base/USingScores.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-12-18 16:10:21 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-12-18 16:10:21 +0000
commitd3b710957904ec42fa9492e0b19f30a84e0fb362 (patch)
treeb52207cb577b403ae88524b6af5cfcb14239a91d /src/base/USingScores.pas
parent2a029bfc9fd228ecfe517fa039ec07c70ce2be8c (diff)
downloadusdx-d3b710957904ec42fa9492e0b19f30a84e0fb362.tar.gz
usdx-d3b710957904ec42fa9492e0b19f30a84e0fb362.tar.xz
usdx-d3b710957904ec42fa9492e0b19f30a84e0fb362.zip
fixed infinite score raising bug
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2049 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/USingScores.pas')
-rw-r--r--src/base/USingScores.pas2
1 files changed, 1 insertions, 1 deletions
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