parent
de02c7113f
commit
fb4bc5bb36
12 changed files with 158 additions and 9 deletions
11
lib/RPGEngine/Render/Player.hs
Normal file
11
lib/RPGEngine/Render/Player.hs
Normal file
|
@ -0,0 +1,11 @@
|
|||
module RPGEngine.Render.Player
|
||||
( renderPlayer
|
||||
) where
|
||||
|
||||
import RPGEngine.Data (Player(..))
|
||||
|
||||
import Graphics.Gloss (Picture, text)
|
||||
import RPGEngine.Render.Core (getRender, setRenderPos)
|
||||
|
||||
renderPlayer :: Player -> Picture
|
||||
renderPlayer Player{ coord = (x, y) } = setRenderPos x y $ getRender "player"
|
Reference in a new issue