not all sounds shoud be subjeect to silence.

This commit is contained in:
Bryce Covert
2015-10-29 18:49:24 -07:00
parent 24d39ae78c
commit 78a4ddfce6
2 changed files with 4 additions and 3 deletions

View File

@@ -46,7 +46,9 @@
(actions/has-obtained? entities :sword)
0.0
:else
(* 0.2 (max 0.0 (- 1.0 (/ (utils/dist 45 97 (:x ego) (:y ego)) 50.0)))))))
(* 0.2
(max 0.0 (- 1.0 (/ (utils/dist 45 97 (:x ego) (:y ego)) 50.0)))
(get-in entities [:volume :value])))))
(defn bloodclot-appear [entities]
(actions/run-action entities

View File

@@ -430,8 +430,7 @@
(defn scale-vol-from-fade [entities vol]
(* vol
(- 1.0 (get-in entities [:fade :opacity]))
(get-in entities [:volume :value])))
(- 1.0 (get-in entities [:fade :opacity]))))
(defn play-sound!
([screen entities snd volume-fn]