From c4ae3b0ee4bd338995cfecf34e0aeb49f05fa70e Mon Sep 17 00:00:00 2001 From: Joris Guyonvarch Date: Tue, 2 Sep 2014 21:35:58 +0200 Subject: Initial commit --- src/Game.elm | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100644 src/Game.elm (limited to 'src/Game.elm') diff --git a/src/Game.elm b/src/Game.elm new file mode 100644 index 0000000..c86af26 --- /dev/null +++ b/src/Game.elm @@ -0,0 +1,25 @@ +module Game where + +import Player (..) +import Enemy (..) +import EnemyState (..) +import Vec2 (Vec2) + +type Game = + { time : Float + , player : Player + , enemyState : EnemyState + , bestTime : Float + } + +initialGame : Vec2 -> Float -> Game +initialGame playerPos bestTime = + let initPlayer = + { pos = playerPos + , speed = { x = 0, y = 0 } + } + in { time = 0 + , player = initPlayer + , enemyState = initEnemyState + , bestTime = bestTime + } -- cgit v1.2.3