goon leaves.
This commit is contained in:
@@ -198,6 +198,7 @@
|
||||
(defn attempt-walking-through-gate [entities]
|
||||
(actions/walk-to entities :ego [157 83] :skip-type :end)
|
||||
(actions/transition-background entities :inside-castle [280 145])
|
||||
(actions/update-state entities #(assoc % :bubba-gone? false))
|
||||
(actions/walk-to entities :ego [245 90] :skip-type :end))
|
||||
|
||||
(defn flip-coin [screen entities]
|
||||
@@ -226,6 +227,7 @@
|
||||
(actions/walk-to entities :ego [301 46] :face :right :skip-type :end)
|
||||
(actions/walk-straight-to entities :ego [340 40])
|
||||
(actions/transition-background entities :outside-castle [82 180])
|
||||
(actions/update-state entities #(assoc % :bubba-gone? false))
|
||||
(actions/walk-to entities :ego [129 148] :skip-type :end))
|
||||
:cursor :right}
|
||||
:left-dir {:box [105 93 169 212]
|
||||
@@ -282,6 +284,7 @@
|
||||
(assoc-in entities [:room :entities :walkie-talkies]
|
||||
(get-in entities [:room :walkie-talkies]))
|
||||
entities)
|
||||
|
||||
(if (and (not (actions/has-obtained? entities :money))
|
||||
(get-in entities [:state :has-dropped-coin?]))
|
||||
(do
|
||||
@@ -289,5 +292,9 @@
|
||||
entities)
|
||||
(if (actions/has-obtained? entities :money)
|
||||
(update-in entities [:room :entities] dissoc :coin-flip)
|
||||
entities)))
|
||||
entities)
|
||||
(if (get-in entities [:state :bubba-gone?])
|
||||
(update-in entities [:room :entities] dissoc :coin-flip :goon-2)
|
||||
entities
|
||||
)))
|
||||
:start-pos [300 45])))
|
||||
|
||||
Reference in New Issue
Block a user