#4 Added player and object data types
This commit is contained in:
parent
0257bb8220
commit
4c1f25e49d
3 changed files with 80 additions and 1 deletions
15
lib/data/Player.hs
Normal file
15
lib/data/Player.hs
Normal file
|
@ -0,0 +1,15 @@
|
|||
-- Represents a player in the game. This player can move around, pick
|
||||
-- up items and interact with the world.
|
||||
|
||||
module Player
|
||||
( Player(..)
|
||||
) where
|
||||
|
||||
import Internals
|
||||
|
||||
----------------------------- Constants ------------------------------
|
||||
|
||||
data Player = Player {
|
||||
hp :: Int,
|
||||
inventory :: [Object]
|
||||
}
|
Reference in a new issue