more tweakns.
This commit is contained in:
@@ -373,32 +373,38 @@
|
||||
:wool (actions/get-script entities
|
||||
(walk-to-player entities)
|
||||
(if (= :wool (get-in @entities [:state :current-riddle]))
|
||||
(do (actions/update-state entities (fn [s] (assoc s :current-riddle :balloon)))
|
||||
(do (actions/play-animation entities :ego :idea)
|
||||
(actions/update-state entities (fn [s] (assoc s :current-riddle :balloon)))
|
||||
(actions/remove-item entities :wool)
|
||||
(actions/do-dialogue entities
|
||||
:game-player "That's right! Now for your second riddle:"
|
||||
:ego "Wool is white as snow, but it keeps you warm."
|
||||
:game-player "Good job, Tick! Now for your second riddle:"
|
||||
:game-player "'Filled with air, light as a feather,\nIf you want to keep it, best have a tether.'"
|
||||
:ego "Okay. Be back soon."))
|
||||
(actions/do-dialogue entities :ego "What about this?" :game-player "No, that's not the solution. Keep looking.")))
|
||||
:balloon (actions/get-script entities
|
||||
(walk-to-player entities)
|
||||
(if (= :balloon (get-in @entities [:state :current-riddle]))
|
||||
(do (actions/update-state entities (fn [s] (assoc s :current-riddle :frog-legs)))
|
||||
(do (actions/play-animation entities :ego :idea)
|
||||
(actions/update-state entities (fn [s] (assoc s :current-riddle :frog-legs)))
|
||||
(actions/remove-item entities :balloon)
|
||||
(actions/do-dialogue entities
|
||||
:game-player "That's right! Now for your third riddle:"
|
||||
:ego "A balloon is light as a feather."
|
||||
:game-player "That's right, Tick! Now for your third riddle:"
|
||||
:game-player "'Hippity-hop, I'd jump so high,\nWithout these springs, can't harm a fly.'"
|
||||
:ego "Okay. Be back soon."))
|
||||
(actions/do-dialogue entities :ego "What about this?" :game-player "No, that's not the solution. Keep looking.")))
|
||||
:frog-legs (actions/get-script entities
|
||||
(walk-to-player entities)
|
||||
(if (= :frog-legs (get-in @entities [:state :current-riddle]))
|
||||
(do (actions/update-state entities (fn [s] (assoc s :current-riddle :done)))
|
||||
(do (actions/play-animation entities :ego :idea)
|
||||
(actions/update-state entities (fn [s] (assoc s :current-riddle :done)))
|
||||
|
||||
(actions/remove-item entities :frog-legs)
|
||||
(actions/do-dialogue entities
|
||||
:ego "What about these frog legs? They jump pretty far."
|
||||
:game-player "Wow! That's right!"
|
||||
:game-player "You, sir, have proven yourself worthy of my trophy."
|
||||
:game-player "You, Tick, have proven yourself worthy of my trophy."
|
||||
:game-player "Even I, Brian O'Brainy, am impressed with your wisdom."
|
||||
:game-player "Take it, and go in wisdom.")
|
||||
(actions/give entities :trophy)
|
||||
|
||||
Reference in New Issue
Block a user