Improve shadows for static walls

This commit is contained in:
2021-03-05 13:40:34 +01:00
parent e4c51bc47a
commit 5f8b5881e5
8 changed files with 62 additions and 34 deletions
+1 -2
View File
@@ -34,7 +34,6 @@ data RenderData = RenderData
, _backVAO :: VAO
, _wallVAO :: VAO
, _fadeCircVAO :: VAO
, _texVBO :: BufferObject
, _wssLightPos :: UniformLocation
, _dummyVBO :: BufferObject
, _dummyPtr :: Ptr Float
@@ -150,7 +149,7 @@ preloadRender = do
circvao <- setupVAO [(0,3),(1,4),(2,1)]
arcvao <- setupVAO [(0,3),(1,4),(2,4)]
backgroundvao <- setupVAO [(0,4),(1,2)]
wallvao <- setupVAO [(0,4)]--,(colVBO,1,4)]
wallvao <- setupVAO [(0,4),(1,4)]
fadecircvao <- setupVAO [(0,4)]
return $ RenderData