diff options
| -rw-r--r-- | src/base/UMain.pas | 17 | ||||
| -rw-r--r-- | src/screens/UScreenSing.pas | 3 |
2 files changed, 14 insertions, 6 deletions
diff --git a/src/base/UMain.pas b/src/base/UMain.pas index 0c86563d..f9ac4ebe 100644 --- a/src/base/UMain.pas +++ b/src/base/UMain.pas @@ -1013,13 +1013,18 @@ procedure ClearScores(PlayerNum: integer); begin with Player[PlayerNum] do begin - Score := 0; - ScoreInt := 0; - ScoreLine := 0; - ScoreLineInt := 0; - ScoreGolden := 0; - ScoreGoldenInt := 0; + Score := 0; + ScoreLine := 0; + ScoreGolden := 0; + + ScoreInt := 0; + ScoreLineInt := 0; + ScoreGoldenInt:= 0; ScoreTotalInt := 0; + + ScoreLast := 0; + + LastSentencePerfect := False; end; end; diff --git a/src/screens/UScreenSing.pas b/src/screens/UScreenSing.pas index 1aa9dcde..3eb3742d 100644 --- a/src/screens/UScreenSing.pas +++ b/src/screens/UScreenSing.pas @@ -844,6 +844,9 @@ begin // to prevent drawing closed video VideoLoaded := False; + + //Kill all Stars and Effects + GoldenRec.KillAll; if (Ini.SavePlayback = 1) then begin |