diff --git a/desktop/src-common/advent/screens/rooms/dream.clj b/desktop/src-common/advent/screens/rooms/dream.clj index 1bc34b62..89933f21 100644 --- a/desktop/src-common/advent/screens/rooms/dream.clj +++ b/desktop/src-common/advent/screens/rooms/dream.clj @@ -145,17 +145,30 @@ (defn do-intro [entities] (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/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/do-dialogue entities :ego "Who turned out the lights?" - :ego "What's going on?") - (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 900) + (actions/talk entities :ego "Am I...") (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-") (sound! (sound "dream/appear.ogg") :play (utils/current-sound-volume)) (particle-effect! (get-in @entities [:room :entities :magic]) :reset) @@ -165,15 +178,14 @@ (Thread/sleep 100) (actions/talk entities :fairy-godfather "-daaaaaaaaaaaaa!") (Thread/sleep 2500) - (actions/do-dialogue entities :fairy-godfather "Welcome, young Tick, to the pit of fate!") - (actions/talk entities :ego "Pit of fate? I'm too young to die!" :anim :frustrated-talk) + (actions/talk entities :ego "Oh no! The grim reaper!" :anim :frustrated-talk) (actions/do-dialogue entities :fairy-godfather "Relax, Tick. You're dreaming!" - :ego "Who are you?" - :ego "And how do you know my name?" + :ego "I am?" + :ego "Then who are you?" :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 "Today you will choose your trade." + :fairy-godfather "I've brought you here, to the pit of destiny." + :fairy-godfather "Today you will choose your trade!" :fairy-godfather "Let us see what your fate could bring!" :fairy-godfather "Behold!") (particle-effect! (get-in @entities [:room :entities :magic]) :reset)