From 4b367c25b0365be8fe38381136353a659d5ce545 Mon Sep 17 00:00:00 2001
From: Charles <sircharlesaze@gmail.com>
Date: Sun, 8 Dec 2019 11:06:26 +0100
Subject: Added direction change with arrow key, food spawn

---
 graphics.ads | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'graphics.ads')

diff --git a/graphics.ads b/graphics.ads
index 1f58de3..601c3e9 100644
--- a/graphics.ads
+++ b/graphics.ads
@@ -1,4 +1,5 @@
 with SDL;
+with SDL.Timers;
 with SDL.Video.Windows;
 with SDL.Video.Renderers;
 with SDL.Video.Palettes;
@@ -14,6 +15,8 @@ package Graphics is
 	WINDOW_WIDTH:  constant SDL.Positive_Dimension := 400;
 	WINDOW_HEIGHT: constant SDL.Positive_Dimension := 400;
 
+	TIME_STEP:     constant SDL.Timers.Milliseconds := 400;
+
 	COLOR_WHITE:   constant SDL.Video.Palettes.Colour := (255, 255, 255, 255);
 	COLOR_BLACK:   constant SDL.Video.Palettes.Colour := (0, 0, 0, 255);
 	COLOR_RED:     constant SDL.Video.Palettes.Colour := (255, 0, 0, 255);
-- 
cgit