Browse Source

* Show died status

michael 6 years ago
parent
commit
89e2527a02
1 changed files with 2 additions and 0 deletions
  1. 2 0
      demo/pacman/upacman.pp

+ 2 - 0
demo/pacman/upacman.pp

@@ -1147,6 +1147,7 @@ procedure TPacman.StartTimer;
 
 begin
   FDying:=False;
+  UpdateStatus('Playing');
   SpriteTimer:=window.setInterval(@DoSpriteTimer,TimerInterval);
 end;
 
@@ -1228,6 +1229,7 @@ begin
   dec(LivesLeft);
   UpdateScore();
   PacmanDir:='-';
+  UpdateStatus('You died');
   ShowText('YOU DIE !!!',@CheckGameOver);
 end;