credits screen and stuff.

This commit is contained in:
Bryce Covert
2015-09-09 18:36:29 -07:00
parent e6de6660e5
commit 4d04431044
18 changed files with 126 additions and 32 deletions

View File

@@ -20,11 +20,12 @@
(get-in entities [:state :active?])
(not (get-in entities [:state :blergh-dead?]))
(not (actions/has-item? entities :magic-slingshot)))
((actions/get-script entities (actions/do-dialogue entities :bloodclot-head (rand-nth ["Come on, little man! Try and hit me!"
"What's the matter? Cold feet?"
((actions/get-script entities (actions/do-dialogue entities :bloodclot-head (rand-nth ["Come over here, so I can eat you!"
"The taste of children makes my tummy rumble!"
"Come here and fight me like man!"
"Your precious Georgia McGorgeous would be laughing if she saw you now."
"Pick up your weapon and fight!"]))) entities))
"Georgia McGorgeous will be so impressed with how quickly I eat you!"
"Come on, I'm hungry!"
"First I'll eat you, then I'll eat Georgia McGorgeous!"]))) entities))
nil)
(defn shock [screen entities]