typos, and love is in the air.

This commit is contained in:
2015-04-20 08:14:36 -07:00
parent 634b87d541
commit e6bad70bfe
5 changed files with 8 additions and 6 deletions

View File

@@ -34,6 +34,9 @@
:frankie "Not a chance, Faceplant."
:frankie "Burglers like us gotta eat too, you know."
:ego "But it's a matter of life and death! Georgia McGorgeous is counting on me!"
)
(actions/in-love entities)
(actions/respond entities %
:frankie "Georgia's going steady with me now, Faceplant.")
(actions/play-animation entities :frankie :laugh)
(actions/do-dialogue entities :frankie "You'd be better off if you just packed your bags and left town."

View File

@@ -175,7 +175,7 @@
(actions/update-entities entities (fn [e] (update-in e [:room :entities :fairy-godfather] assoc :path (catmull-rom-spline (map #(apply vector-2* %) [[260 120] [260 124]]) true))))
(actions/do-dialogue entities :fairy-godfather "Next, we have the broom, representing the humble job of a janitor."
:ego "I'm not going to be a janitor!"
:ego "I'm going to take the sword and be a knight?"
:ego "I'm going to take the sword and be a knight!"
:fairy-godfather "Hmm? Sword?")
(actions/update-entities entities #(update-in % [:room :entities :fairy-godfather] dissoc :path))
(actions/walk-straight-to entities :fairy-godfather [192 120] :speed 3.0 :update-baseline? false)

View File

@@ -50,7 +50,7 @@
:warriors "We thinketh not, young esquire."
:warriors "Thou lacketh the strength and vigor required for such a task."
:warriors "To becometh a knight, thou wouldst have to best Captain McHulk in battle."
:warriors "And no one durst challeng him!")
:warriors "And no one durst challenge him!")
:choices ["But I'm on a quest to become a knight!"
{:run #(actions/respond entities %
:warriors "Young esquire, thou art valiant in heart. "
@@ -66,7 +66,7 @@
(play-battle entities :win)
(actions/do-dialogue entities
:warriors "Congratulations young master. Thou art worthy in might."
:warriors "Take my medal of strength.")
:warriors "Take thy servant's medal of strength.")
(actions/give entities :medal))
(do
(play-battle entities :lose)

View File

@@ -201,6 +201,7 @@
(actions/do-dialogue entities
:ego "I have to prove myself worthy in wisdom, courage, and might!"
:ego "Then I can become a knight and impress Georgia McGorgeous!")
(actions/in-love entities)
(actions/do-dialogue entities :ego (str "I've proven myself in "
(str/join " and " (map item->proof obtained-items))
", but still have to prove myself in "
@@ -300,7 +301,7 @@
(actions/do-dialogue entities
:ego "That's Georgia McGorgeous' house."
:ego "One day, when I'm a knight, I'll ask her to be my girlfriend.")
(actions/transition-music entities :love :duration 1.0))}}
(actions/in-love entities))}}
:layers {:day [(assoc (texture "inside-castle/background.png") :x 0 :y 0 :baseline 0)
(assoc (texture "inside-castle/roof.png") :x (- 320 57) :y 0 :baseline 240 :parallax 1.5)]
:night [(assoc (texture "inside-castle/background-dark.png") :x 0 :y 0 :baseline 0)]

View File

@@ -384,9 +384,7 @@
(leave-sheep entities))
(do
(actions/talk entities :ego "Come here mama sheep!")
(actions/play-animation entities :ego :throw)
(actions/play-animation entities :ego :sigh)
(actions/talk entities :ego "She's too far away for me to pet her.")))))
:scripts #(condp = %
:wool (actions/get-script entities