Add sound queue when on chasm edge

2025-07-30 14:01:56 +01:00
parent d1346b855f
commit 7110ddb7a6
16 changed files with 401 additions and 341 deletions
@@ -880,7 +880,7 @@ dustSpringVel a v b
    radDist = 10

 simpleCrSprings :: World -> World
-simpleCrSprings w = IM.foldl' (flip crSpring) w $ w ^. cWorld . lWorld . creatures
+simpleCrSprings w = IM.foldl' (flip crSpring) w $ IM.filter (\cr -> _crZ cr >= 0) $ w ^. cWorld . lWorld . creatures

 -- note that this may in rare cases not push creatures away from each other
 crSpring :: Creature -> World -> World