GOTO 106\r
\r
SUB DisplayGameStatistics\r
+'\r
+' Updates and displays the game's status information (coins collected, lives remaining)\r
+' Handles game over condition when lives reach zero.\r
+'\r
+' This subroutine is called whenever the game state changes that affects statistics:\r
+' - When a coin is collected\r
+' - When the player loses a life\r
+' - Periodically during gameplay\r
+\r
LOCATE 1, 1\r
-IF graphicsMode = 2 THEN GOTO 12\r
+IF GraphicsMode% = 2 THEN GOTO SkipTextDisplay\r
+\r
+' Clear previous stats display\r
PRINT " "\r
+\r
+' Award extra life every 10 coins collected\r
IF CoinsCollected% > 9 THEN CoinsCollected% = 0: LivesRemaining% = LivesRemaining% + 1\r
+\r
+' Display current game statistics\r
LOCATE 1, 1\r
PRINT "o "; CoinsCollected%; " Lives "; LivesRemaining%\r
-12\r
+\r
+SkipTextDisplay:\r
+' Check if player has run out of lives\r
IF LivesRemaining% < 0 THEN END\r
END SUB\r
\r