better intro dialogue.

This commit is contained in:
Bryce Covert
2015-07-28 18:18:00 -07:00
parent 361a59b5d3
commit 3a8950dad9

View File

@@ -145,17 +145,30 @@
(defn do-intro [entities] (defn do-intro [entities]
(Thread/sleep 2000) (Thread/sleep 2000)
(actions/talk entities :fairy-godfather "... Tick ...") (actions/talk entities :ego "What's going on?")
(actions/walk-straight-to entities :ego [160 60]) (actions/walk-straight-to entities :ego [160 60])
(actions/do-dialogue entities :ego "What the?") (actions/do-dialogue entities :ego "Who turned out the lights?")
(actions/walk-straight-to entities :ego [120 50]) (actions/walk-straight-to entities :ego [120 50])
(actions/do-dialogue entities :ego "Who turned out the lights?" (Thread/sleep 900)
:ego "What's going on?") (actions/talk entities :ego "Am I...")
(actions/talk entities :fairy-godfather "... Tiiiiiiccckkkk ...")
(actions/do-dialogue entities :ego "Who is that?")
(actions/walk-straight-to entities :ego [140 55] :face :right)
(actions/do-dialogue entities :ego "Show yourself!")
(Thread/sleep 500) (Thread/sleep 500)
(actions/talk entities :ego "... dead?")
(Thread/sleep 900)
(actions/talk entities :ego "... But I'm too young to die!" :anim :frustrated-talk :stop? false)
(Thread/sleep 200)
(actions/talk entities :ego "I promise I'll be a better boy!" :anim :frustrated-talk :stop? false)
(Thread/sleep 200)
(actions/talk entities :ego "I'll never steal another one of Gandarf's potions!" :anim :frustrated-talk :stop? false)
(Thread/sleep 200)
(actions/talk entities :ego "I swear!" :anim :frustrated-talk :stop? false)
(actions/talk entities :fairy-godfather "... Tick ...")
(Thread/sleep 500)
(actions/walk-straight-to entities :ego [140 55] :face :right)
(Thread/sleep 500)
(actions/do-dialogue entities :ego "Huh?")
(actions/talk entities :fairy-godfather "... Tiiiiccckk ...")
(Thread/sleep 500)
(actions/do-dialogue entities :ego "Who is that?")
(actions/talk entities :fairy-godfather "Taaaaaaaaaaaaaaaaaa-") (actions/talk entities :fairy-godfather "Taaaaaaaaaaaaaaaaaa-")
(sound! (sound "dream/appear.ogg") :play (utils/current-sound-volume)) (sound! (sound "dream/appear.ogg") :play (utils/current-sound-volume))
(particle-effect! (get-in @entities [:room :entities :magic]) :reset) (particle-effect! (get-in @entities [:room :entities :magic]) :reset)
@@ -165,15 +178,14 @@
(Thread/sleep 100) (Thread/sleep 100)
(actions/talk entities :fairy-godfather "-daaaaaaaaaaaaa!") (actions/talk entities :fairy-godfather "-daaaaaaaaaaaaa!")
(Thread/sleep 2500) (Thread/sleep 2500)
(actions/do-dialogue entities :fairy-godfather "Welcome, young Tick, to the pit of fate!") (actions/talk entities :ego "Oh no! The grim reaper!" :anim :frustrated-talk)
(actions/talk entities :ego "Pit of fate? I'm too young to die!" :anim :frustrated-talk)
(actions/do-dialogue entities (actions/do-dialogue entities
:fairy-godfather "Relax, Tick. You're dreaming!" :fairy-godfather "Relax, Tick. You're dreaming!"
:ego "Who are you?" :ego "I am?"
:ego "And how do you know my name?" :ego "Then who are you?"
:fairy-godfather "Why, I'm your fairy godfather of course!" :fairy-godfather "Why, I'm your fairy godfather of course!"
:fairy-godfather "I've brought you here, Tick, to help choose your destiny." :fairy-godfather "I've brought you here, to the pit of destiny."
:fairy-godfather "Today you will choose your trade." :fairy-godfather "Today you will choose your trade!"
:fairy-godfather "Let us see what your fate could bring!" :fairy-godfather "Let us see what your fate could bring!"
:fairy-godfather "Behold!") :fairy-godfather "Behold!")
(particle-effect! (get-in @entities [:room :entities :magic]) :reset) (particle-effect! (get-in @entities [:room :entities :magic]) :reset)