adding sound when you pick up an item.
This commit is contained in:
BIN
desktop/resources/pickup.mp3
Normal file
BIN
desktop/resources/pickup.mp3
Normal file
Binary file not shown.
@@ -135,6 +135,8 @@
|
|||||||
(reify
|
(reify
|
||||||
IAction
|
IAction
|
||||||
(begin [this screen entities]
|
(begin [this screen entities]
|
||||||
|
(sound! (sound "pickup.mp3") :play)
|
||||||
|
|
||||||
(-> entities
|
(-> entities
|
||||||
(update-in [target-id :inventory] #(conj % item))
|
(update-in [target-id :inventory] #(conj % item))
|
||||||
(assoc-in [:cursor :current] item)))
|
(assoc-in [:cursor :current] item)))
|
||||||
|
|||||||
@@ -116,7 +116,7 @@
|
|||||||
house (texture "house.png")
|
house (texture "house.png")
|
||||||
overdirt (texture "overdirt.png")
|
overdirt (texture "overdirt.png")
|
||||||
music (sound "town-music.mp3")
|
music (sound "town-music.mp3")
|
||||||
;;_ (sound! music :loop)
|
_ (sound! music :loop)
|
||||||
]
|
]
|
||||||
{
|
{
|
||||||
:actions {:object nil
|
:actions {:object nil
|
||||||
|
|||||||
Reference in New Issue
Block a user