First implementation of creatures detecting sounds

2021-09-08 21:56:58 +01:00
parent c3d567353c
commit a2288110ae
8 changed files with 22 additions and 20 deletions
@@ -54,7 +54,7 @@ initialWorld = defaultWorld
    }
 testStringInit :: World -> [String]
 --testStringInit _ = []
-testStringInit w = [show $ newSounds w]
+testStringInit w = [show . length $ newSounds w]
 --testStringInit w = (show . _crPos $ _creatures w IM.! 0) 
 --    : (map show . _grBound . last $ sortOn _grName grs) 
 --    ++ closeRooms