From 2950872300a419344b39b9174f4b371a240272c6 Mon Sep 17 00:00:00 2001 From: Jed Barber Date: Sun, 30 Jul 2017 22:23:20 +1000 Subject: Basic game framework done, lacking any user input --- src/sokoban.ads | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 src/sokoban.ads (limited to 'src/sokoban.ads') diff --git a/src/sokoban.ads b/src/sokoban.ads new file mode 100644 index 0000000..ec88cc6 --- /dev/null +++ b/src/sokoban.ads @@ -0,0 +1,20 @@ + + +package Sokoban is + + + type LevelID is new Integer range 0 .. 50; + + + procedure Load_Level + (Number : in LevelID); + + + procedure Show; + + + procedure Hide; + + +end Sokoban; + -- cgit