From 00e48e00a17d0387ffbf4043af593423b07e6aa0 Mon Sep 17 00:00:00 2001 From: rexim Date: Fri, 22 Mar 2024 05:28:03 +0700 Subject: Touching father start NG+ --- game.adb | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'game.adb') diff --git a/game.adb b/game.adb index 3d7e953..a3e2b91 100644 --- a/game.adb +++ b/game.adb @@ -943,7 +943,10 @@ procedure Game is Game.Eepers(Me).Prev_Position := Game.Eepers(Me).Position; Game.Eepers(Me).Prev_Eyes := Game.Eepers(Me).Eyes; case Game.Eepers(Me).Kind is - when Eeper_Father => null; + when Eeper_Father => + if Inside_Of_Rect(Game.Eepers(Me).Position, Game.Eepers(Me).Size, Game.Player.Position) then + Load_Game_From_Image("map.png", Game, True); + end if; when Eeper_Guard | Eeper_Mother => Recompute_Path_For_Eeper(Game, Me, GUARD_STEPS_LIMIT, GUARD_STEP_LENGTH_LIMIT); if Game.Eepers(Me).Path(Game.Eepers(Me).Position.Y, Game.Eepers(Me).Position.X) = 0 then @@ -1412,7 +1415,6 @@ end; -- So it will search the resources there. -- TODO: Eyes for the Player. -- The denote last direction of the step. --- TODO: Touch father starts NG+ -- TODO: Eeper should attack on zero just like a bomb. -- TODO: Desaturate the colors -- TODO: Properly disablable DEV features -- cgit v1.2.3