stay scared while talking with bloodclot.
This commit is contained in:
@@ -306,7 +306,10 @@
|
|||||||
:bloodclot-head "The final test of my appetite."
|
:bloodclot-head "The final test of my appetite."
|
||||||
:bloodclot-head "Face it, kiddo, you're no match for me."
|
: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 "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]
|
(defn try-to-pull-sword [entities missing-items obtained-items]
|
||||||
(let [item->proof {:trophy "wisdom" :medal "strength" :kiss "courage"}]
|
(let [item->proof {:trophy "wisdom" :medal "strength" :kiss "courage"}]
|
||||||
|
|||||||
@@ -272,6 +272,8 @@
|
|||||||
(actions/walk-straight-to entities :ego [35 45] :override-dir :right :speed 3.0))
|
(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!"))
|
(actions/do-dialogue entities :ego "I don't want to get too close while he still has his lightning gem!"))
|
||||||
(do
|
(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 %)))
|
(actions/update-entity entities :ego #(assoc % :get-script (:original-get-script %)))
|
||||||
(swing-at-blergh entities)
|
(swing-at-blergh entities)
|
||||||
(actions/do-dialogue entities :bloodclot-head "Ha ha ha! Is that the best you can do?"
|
(actions/do-dialogue entities :bloodclot-head "Ha ha ha! Is that the best you can do?"
|
||||||
|
|||||||
Reference in New Issue
Block a user