More hint for kitty.
This commit is contained in:
@@ -345,7 +345,7 @@
|
|||||||
:stand cat-stand
|
:stand cat-stand
|
||||||
:script (actions/get-script entities
|
:script (actions/get-script entities
|
||||||
(actions/talk entities :ego "Here kitty, kitty, kitty.")
|
(actions/talk entities :ego "Here kitty, kitty, kitty.")
|
||||||
(actions/talk entities :ego "Kitty's not so interested in me."))
|
(actions/talk entities :ego "Kitty's so bored, he doesn't even notice me."))
|
||||||
:scripts {:cat-toy (actions/get-script entities
|
:scripts {:cat-toy (actions/get-script entities
|
||||||
(actions/play-animation entities :ego :cat-toy)
|
(actions/play-animation entities :ego :cat-toy)
|
||||||
(if (get-in @entities [:room :entities :ladder])
|
(if (get-in @entities [:room :entities :ladder])
|
||||||
@@ -389,6 +389,7 @@
|
|||||||
(actions/walk-to entities :ego [210 58] :face :right)
|
(actions/walk-to entities :ego [210 58] :face :right)
|
||||||
(actions/play-animation entities :ego :poke)
|
(actions/play-animation entities :ego :poke)
|
||||||
(actions/talk entities :ego "I can't poke him from way down here."))))
|
(actions/talk entities :ego "I can't poke him from way down here."))))
|
||||||
|
:wool (actions/get-script entities (actions/talk entities :ego "I don't think the cat would notice the wool from all the way up there."))
|
||||||
:default (actions/get-script entities (actions/talk entities :ego "Kitty seems disinterested in it."))})
|
:default (actions/get-script entities (actions/talk entities :ego "Kitty seems disinterested in it."))})
|
||||||
cat-stand)
|
cat-stand)
|
||||||
:grandma (let [gma (assoc (animation->texture screen grandma-stand)
|
:grandma (let [gma (assoc (animation->texture screen grandma-stand)
|
||||||
|
|||||||
Reference in New Issue
Block a user