initial framework added

[fp1415-soccerfun.git] / src / Game / GamePicture.dcl

diff --git a/src/Game/GamePicture.dcl b/src/Game/GamePicture.dcl
new file mode 100644 (file)
index 0000000..e08511d
--- /dev/null
+++ b/src/Game/GamePicture.dcl
@@ -0,0 +1,13 @@
+definition module GamePicture\r
+\r
+/**    Type definitions for handling bitmaps for referees (and footballers in the future).\r
+*/\r
+\r
+import StdBitmap\r
+\r
+::     Path                    :== String\r
+::     GamePicture             =       { img                   :: !Bitmap\r
+                                               , path                  :: !Path\r
+                                               }\r
+::     ActionPics              =       { refereePics   :: ![GamePicture]\r
+                                               }\r