minor tweaks for humor.
This commit is contained in:
@@ -170,10 +170,14 @@
|
|||||||
(actions/talk entities :grandma "For your impressive display of courage and bravery, I give you this. ")
|
(actions/talk entities :grandma "For your impressive display of courage and bravery, I give you this. ")
|
||||||
(sound! (sound "cat-tree/kiss.ogg") :play)
|
(sound! (sound "cat-tree/kiss.ogg") :play)
|
||||||
(actions/play-animation entities :grandma :kiss)
|
(actions/play-animation entities :grandma :kiss)
|
||||||
(actions/give entities :kiss)
|
|
||||||
(actions/play-animation entities :ego :get-sick :stop? false)
|
(actions/play-animation entities :ego :get-sick :stop? false)
|
||||||
(actions/walk-straight-to entities :ego [165 45])
|
(actions/walk-straight-to entities :ego [165 45])
|
||||||
(actions/talk entities :ego "Ugh! Gross!"))
|
(actions/do-dialogue entities :ego
|
||||||
|
"Ugh! Gross!"
|
||||||
|
:ego "What's this?")
|
||||||
|
(actions/give entities :kiss)
|
||||||
|
(actions/do-dialogue entities :ego "A kiss for an inventory item?"
|
||||||
|
:ego "Sounds like the game designer was running out of good ideas."))
|
||||||
(actions/talk entities :ego "I guess I'm too far away.")))})
|
(actions/talk entities :ego "I guess I'm too far away.")))})
|
||||||
cat-stand)
|
cat-stand)
|
||||||
:grandma (assoc (animation->texture screen grandma-stand)
|
:grandma (assoc (animation->texture screen grandma-stand)
|
||||||
|
|||||||
Reference in New Issue
Block a user