Stop overwriting depth buffer when combining cloud positions

2023-03-21 16:42:58 +00:00
parent 4519a6fbc7
commit c0579fae00
8 changed files with 22 additions and 27 deletions
@@ -107,7 +107,7 @@ doThrust pj w =
        & cWorld . lWorld . projectiles . ix i . prjVel %~ (\v -> accel +.+ frict *.* v)
        & soundContinue (ShellSound i) newPos missileLaunchS (Just 1)
        & makeFlamelet (oldPos -.- vel) 0 (vel +.+ rotateV (pi + sparkD) accel) 3 10
-        & shellTrailCloud' trailage trailfadetime 
+        & shellTrailCloud trailage trailfadetime 
            (addZ 20 (oldPos +.+ r1 +.+ 30 *.* normalizeV (oldPos -.- newPos)))
  where
    trailage = fst . randomR (300, 500) $ _randGen w