stay scared while talking with bloodclot.

This commit is contained in:
Bryce Covert
2016-02-18 08:44:44 -08:00
parent 0b69e6825f
commit d1fcbc5301
2 changed files with 6 additions and 1 deletions

View File

@@ -306,7 +306,10 @@
:bloodclot-head "The final test of my appetite."
:bloodclot-head "Face it, kiddo, you're no match for me."
:bloodclot-head "And Georgia McGorgeous would never go for such a cowardly knight anyhow."
:bloodclot-head "Let the feast begin."))
:bloodclot-head "Let the feast begin.")
(actions/update-entity entities :ego (fn [e]
(assoc e :stand-override :scared
:talk-override :scared-talk))))
(defn try-to-pull-sword [entities missing-items obtained-items]
(let [item->proof {:trophy "wisdom" :medal "strength" :kiss "courage"}]

View File

@@ -272,6 +272,8 @@
(actions/walk-straight-to entities :ego [35 45] :override-dir :right :speed 3.0))
(actions/do-dialogue entities :ego "I don't want to get too close while he still has his lightning gem!"))
(do
(actions/update-entity entities :ego (fn [e]
(dissoc e :stand-override :talk-override)))
(actions/update-entity entities :ego #(assoc % :get-script (:original-get-script %)))
(swing-at-blergh entities)
(actions/do-dialogue entities :bloodclot-head "Ha ha ha! Is that the best you can do?"