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