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/Enemy.elm | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 src/Enemy.elm (limited to 'src/Enemy.elm') diff --git a/src/Enemy.elm b/src/Enemy.elm new file mode 100644 index 0000000..2c80f0a --- /dev/null +++ b/src/Enemy.elm @@ -0,0 +1,27 @@ +module Enemy where + +import Vec2 (..) +import Board (boardDiagonal) + +type Enemy = + { initTime : Float + , initPos : Vec2 + , initDest : Vec2 + , move : Float -> Vec2 -> Vec2 -> Float -> Vec2 + } + +enemyMove : Enemy -> Float -> Vec2 +enemyMove enemy time = + enemy.move enemy.initTime enemy.initPos enemy.initDest time + +enemySize : Float +enemySize = 8 + +enemySpeed : Float -> Float +enemySpeed dt = dt / 25 + +enemySpawnDist : Float +enemySpawnDist = boardDiagonal * 3 / 5 + +enemyAwayDist : Float +enemyAwayDist = boardDiagonal -- cgit v1.2.3