Start implementing ceiling stencil shader

2025-11-01 11:24:08 +00:00
parent 71006e24fd
commit d35a41944c
4 changed files with 60 additions and 35 deletions
@@ -73,6 +73,8 @@ preloadRender = do
        makeShaderUsingVAO "lighting/cap" [vert, geom] pmTriangles shPosVAO
    lightingLineShadowShad <-
        makeShaderUsingVAO "lighting/lineShadow" [vert, geom] pmLinesAdjacency shedgevao
+    ceilingstencilshader <-
+        makeShaderUsingVBO "ceiling/stencil" [vert, geom] (toFloatVAs [4]) pmPoints wallvbo

    putStrLn "Setup 2D shaders"
    bslist <- makeShaderVBO "dualTwoD/basic" [vert, frag] (toFloatVAs [3, 4]) pmTriangles
@@ -161,6 +163,7 @@ preloadRender = do
            , _lightingCapShader = lightingCapShad
            , _lightingLineShadowShader = lightingLineShadowShad
            , _lightingWallShadShader = lightingWallShadShad
+            , _ceilingStencilShader = ceilingstencilshader
            , _windowShader = windowshader
            , _fullscreenShader = fsShad
            , _alphaDivideShader = alphadivideshader