Implement low res shadows

2021-04-28 20:50:53 +02:00
parent 5a8555d5a0
commit 8cb177a21c
11 changed files with 147 additions and 77 deletions
@@ -42,7 +42,7 @@ menuScreen cfig hw hh mLays = case mLays of
        ,"n - MUSIC  VOLUME + m : " ++ muvol
        ]
    (GraphicsOptionMenu : _) -> optionsList hw hh "OPTIONS:GRAPHICS" 
-        ["w - WALL TEXTURES"
+        ["w - WALL TEXTURES:" ++ show (_wall_textured cfig)
        ]
    (ControlList : _) -> pictures 
        [color (withAlpha 0.5 black) $ polygon $ screenBox hw hh