should allow steam achievements.
This commit is contained in:
@@ -4,11 +4,13 @@
|
||||
[advent.screens.items :as items]
|
||||
[advent.actions :as actions]
|
||||
[advent.utils :as utils]
|
||||
[advent.steam :as steam]
|
||||
[clojure.zip :as zip]
|
||||
[play-clj.core :refer :all]
|
||||
[play-clj.ui :refer :all]
|
||||
[play-clj.utils :refer :all]
|
||||
[play-clj.g2d :refer :all]))
|
||||
[play-clj.g2d :refer :all])
|
||||
)
|
||||
|
||||
(defn make-night [entities]
|
||||
(assoc-in entities [:room :entities :peeling :opacity] 0))
|
||||
@@ -86,7 +88,9 @@
|
||||
(actions/play-sound entities "safe-sound.ogg" 0.1)
|
||||
(actions/talk entities :ego "So that's the code to his safe..." :animate? false :stop? false)
|
||||
(actions/play-animation entities :ego :end-squat)
|
||||
(actions/talk entities :ego "A lot of good it'll do me to know his password while he's still there."))
|
||||
(actions/talk entities :ego "A lot of good it'll do me to know his password while he's still there.")
|
||||
(steam/set-achievement "MASTER_SLEUTH")
|
||||
)
|
||||
|
||||
:else
|
||||
(do (actions/walk-to entities :ego [80 80] :face :left)
|
||||
|
||||
Reference in New Issue
Block a user