aboutsummaryrefslogtreecommitdiffstats
path: root/src/base
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--src/base/UMain.pas20
1 files changed, 0 insertions, 20 deletions
diff --git a/src/base/UMain.pas b/src/base/UMain.pas
index ededb6e5..7e935c70 100644
--- a/src/base/UMain.pas
+++ b/src/base/UMain.pas
@@ -134,7 +134,6 @@ procedure NewBeatDetect(Screen: TScreenSing); // executed when on then new beat
procedure NewNote(Screen: TScreenSing); // detect note
function GetMidBeat(Time: real): real;
function GetTimeFromBeat(Beat: integer): real;
-procedure ClearScores(PlayerNum: integer);
type
TMainThreadExecProc = procedure(Data: Pointer);
@@ -1053,25 +1052,6 @@ begin
end;
-procedure ClearScores(PlayerNum: integer);
-begin
- with Player[PlayerNum] do
- begin
- Score := 0;
- ScoreLine := 0;
- ScoreGolden := 0;
-
- ScoreInt := 0;
- ScoreLineInt := 0;
- ScoreGoldenInt := 0;
- ScoreTotalInt := 0;
-
- ScoreLast := 0;
-
- LastSentencePerfect := false;
- end;
-end;
-
procedure AddSpecialPath(var PathList: TStringList; const Path: string);
var
I: integer;