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

Closes #7

Browse source
This commit is contained in:
Tibo De Peuter 2022-12-22 15:41:47 +01:00
parent 1dc8aac4c7
commit becd305e01
2 changed files with 12 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/RPGEngine/Render/Menu.hs
View file

@ -4,12 +4,14 @@ module RPGEngine.Render.Menu
import RPGEngine.Render.Core (Renderer)
import RPGEngine.Config ( uizoom, textColor )
import RPGEngine.Data (State)
import Graphics.Gloss (text)
import Graphics.Gloss (text, scale, color, white, translate)
------------------------------ Exported ------------------------------
-- TODO
renderMenu :: Renderer State
renderMenu _ = text "[Press any key to start]"
renderMenu _ = scaled $ center $ color textColor $ text "[Press any key to start]"
where scaled = scale uizoom uizoom
center = translate (-750) 0