Add z level to energy balls

2025-08-04 22:49:36 +01:00
parent bde0fa2a5c
commit 09428f2707
14 changed files with 125 additions and 110 deletions
@@ -659,7 +659,7 @@ updatePulseLaser pz = case pz ^. pzTimer of
        ((_, OPulseBall pb):xs) -> dodam xs
            .
            (cWorld . lWorld . pulseBalls . ix (_pbID pb) . pbTimer .~ 0)
-            . makeExplosionAt (_pbPos pb) 0
+            . makeExplosionAt (_pbPos pb `v2z` 20) 0
        _ -> id
    phasev = _pzPhaseV pz
    sp = _pzPos pz