strength potion

This commit is contained in:
2015-02-18 20:04:34 -08:00
parent 4789df90f9
commit ffe112cfcb
3 changed files with 54 additions and 33 deletions

View File

@@ -451,7 +451,7 @@
:inventory (assoc (texture "inventory.png") :x 278 :y 0 :baseline 9000
:mouse-in? (zone/box 278 0 320 42))
:fps (assoc (label "0" (color :white) ) :x 5 :baseline 0)}]
(music! (utils/get-current-music entities) :set-volume 0.0 #_(get-in entities [:volume :value]))
(music! (utils/get-current-music entities) :set-volume (get-in entities [:volume :value]))
(utils/play-sound (get-in entities [:musics (actions/get-music (get-in entities [:room :music]) (get-in entities [:state :time]))]))
@@ -490,7 +490,7 @@
(play-key-sounds (get-in entities [:room :entities]))
(doseq [m (vals (get-in entities [:musics]))]
(when m
(music! m :set-volume 0.0 #_(get-in entities [:volume :value]) )))
(music! m :set-volume (get-in entities [:volume :value]) )))
(label! (:fps entities) :set-text (str (game :fps)))