diff options
author | Alexey Kutepov <reximkut@gmail.com> | 2024-03-31 03:26:14 +0700 |
---|---|---|
committer | GitHub <noreply@github.com> | 2024-03-31 03:26:14 +0700 |
commit | 128fc515181870ee9072af766c2a29ae1e4ef30e (patch) | |
tree | 279916ea1f28feb7f515c10902b678b5d47461ee /eepers.adb | |
parent | d52ce905c79c3162e82925d180480aa0455da688 (diff) | |
parent | d587f91e684e2140ca74d62446011b2520257164 (diff) |
Merge pull request #24 from ProgKea/main
fix #9 by first calling `Game_Bombs_Turn`
Diffstat (limited to 'eepers.adb')
-rw-r--r-- | eepers.adb | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -1428,8 +1428,8 @@ procedure Eepers is Game_Explosions_Turn(Game); Game_Items_Turn(Game); Game_Player_Turn(Game, C.Dir); - Game_Eepers_Turn(Game); Game_Bombs_Turn(Game); + Game_Eepers_Turn(Game); Game.Duration_Of_Last_Turn := Get_Time - Start_Of_Turn; end; when Command_Plant => @@ -1447,8 +1447,8 @@ procedure Eepers is Game.Player.Prev_Eyes := Game.Player.Eyes; Game.Player.Prev_Position := Game.Player.Position; - Game_Eepers_Turn(Game); Game_Bombs_Turn(Game); + Game_Eepers_Turn(Game); if Game.Player.Bombs > 0 then for Bomb of Game.Bombs loop |