tdpeuter/2022FuncProg-project3-RPGEngine
tdpeuter/2022FuncProg-project3-RPGEngine
Archived
1
Fork 0
Code Issues Pull requests Releases Activity

Fix rendering issue

Browse source
This commit is contained in:
Tibo De Peuter 2022-12-22 23:06:59 +01:00
parent f3bce99120
commit ef784c2dbc
9 changed files with 28 additions and 25 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/RPGEngine/Render/Playing.hs
View file

@ -48,7 +48,7 @@ renderLevel Level{ layout = l, items = i, entities = e } = level
entities = renderEntities e
renderLayout :: Layout -> Picture
renderLayout strips = pictures [setRenderPos 0 y (renderStrip (strips !! y)) | y <- [0 .. count]]
renderLayout strips = pictures [setRenderPos 0 (count - y) (renderStrip (strips !! y)) | y <- [0 .. count]]
where count = length strips - 1
renderStrip :: [Physical] -> Picture