diff options
| author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-03-06 23:45:10 +0000 |
|---|---|---|
| committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-03-06 23:45:10 +0000 |
| commit | 9be9439fce30028c619a401523793ec101dccaed (patch) | |
| tree | da8f2db13433f42692b4924bb4dedbd8f6b4c037 /src/base/UMain.pas | |
| parent | 91ff7f5775354c20bc5bc86672d8e4c22d0d47f5 (diff) | |
| download | usdx-9be9439fce30028c619a401523793ec101dccaed.tar.gz usdx-9be9439fce30028c619a401523793ec101dccaed.tar.xz usdx-9be9439fce30028c619a401523793ec101dccaed.zip | |
Clear Scores moved to UScreenSing and inlined. Reduce clutter in UMain
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1624 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/base/UMain.pas')
| -rw-r--r-- | src/base/UMain.pas | 20 |
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; |