#5 Render inventory when pressing i

2022-12-22 14:35:58 +01:00 · 2022-12-22 14:35:58 +01:00 · d0302c3156
commit d0302c3156
parent f529fc5237
9 changed files with 76 additions and 52 deletions
--- a/lib/RPGEngine/Data.hs
+++ b/lib/RPGEngine/Data.hs
@ -99,9 +99,11 @@ data Direction = North
               deriving (Eq, Show)

 data Player = Player {
-    playerHp  :: HP,
-    inventory :: [Item],
-    position  :: (X, Y)
+    playerHp      :: HP,
+    inventory     :: [Item],
+    position      :: (X, Y),
+    showHp        :: Bool,
+    showInventory :: Bool
 } deriving (Eq, Show)

 ------------------------------ Condition -----------------------------