background script pt 1
This commit is contained in:
@@ -17,7 +17,7 @@
|
||||
[play-clj.g2d :refer :all]))
|
||||
|
||||
(defn taunt [screen entities]
|
||||
(when (and (not (get-in entities [:actions :script-running?]))
|
||||
(when (and (not (get-in entities [:fg-actions :script-running?]))
|
||||
(get-in entities [:state :active?])
|
||||
(not (get-in entities [:state :blergh-dead?]))
|
||||
(not (actions/has-item? entities :magic-slingshot)))
|
||||
@@ -30,7 +30,7 @@
|
||||
nil)
|
||||
|
||||
(defn shock [screen entities]
|
||||
(when (and (not (get-in entities [:actions :script-running?]))
|
||||
(when (and (not (get-in entities [:fg-actions :script-running?]))
|
||||
(get-in entities [:state :active?])
|
||||
(not (get-in entities [:state :blergh-dead?]))
|
||||
(actions/has-item? entities :magic-slingshot))
|
||||
|
||||
Reference in New Issue
Block a user