#3 #2 Player render and movement

lib/RPGEngine/Render.hs

@@ -8,7 +8,15 @@ module RPGEngine.Render
 ) where
 
 import RPGEngine.Data
+    ( State(..),
+      Game(..) )
+import RPGEngine.Render.Level 
+    ( renderLevel )
+
 import Graphics.Gloss
+    ( white, pictures, text, Display(InWindow), Color, Picture )
+import RPGEngine.Render.Player (renderPlayer)
+import RPGEngine.Render.GUI (renderGUI)
 
 ----------------------------- Constants ------------------------------
 
@@ -36,9 +44,12 @@ render g@Game{ state = Lose    } = renderLose g
 renderMenu :: Game -> Picture
 renderMenu _ = text "[Press any key to start]"
 
--- TODO
 renderPlaying :: Game -> Picture
-renderPlaying _ = text "Playing"
+renderPlaying g@Game{ playing = lvl, player = player } = pictures [
+    renderLevel lvl,
+    renderPlayer player,
+    renderGUI g
+    ]
 
 -- TODO
 renderPause :: Game -> Picture