Add sound for distributer

This commit is contained in:
2025-12-31 13:06:46 +00:00
parent 6db7efece1
commit fa07f989c2
5 changed files with 462 additions and 425 deletions
+1 -1
View File
@@ -161,7 +161,7 @@ mcBackgroundSound mc = case mc ^. mcType of
McDamSensor{} -> Just (fridgeHumS,1)
McProxSensor{} -> Just (throbC4S,0.5)
McStorage{} -> Nothing
McDistributer{} -> Just (whirS,0.5)
McDistributer{} -> Just (lowWhirS,1)
McTrigger{} -> Just (throb1S,0.5)
mcApplyDamage :: [Damage] -> Machine -> World -> World