#3 #2 Player render and movement

lib/RPGEngine/Data/Defaults.hs

@@ -18,9 +18,10 @@ defaultEntity = Entity {
 -- Initialize the game
 initGame :: Game
 initGame = Game { 
-    state = defaultState,
+    state   = defaultState,
     playing = defaultLevel,
-    levels = [defaultLevel]
+    levels  = [defaultLevel],
+    player  = defaultPlayer
 }
 
 defaultItem :: Item
@@ -51,8 +52,9 @@ defaultLevel = Level {
 
 defaultPlayer :: Player
 defaultPlayer = Player {
-    playerHp = Prelude.Nothing, -- Compares to infinity
-    inventory = []
+    playerHp  = Prelude.Nothing, -- Compares to infinity
+    inventory = [],
+    coord     = (0, 0)
 }
 
 -- Default state of the game, Menu