notid/gitea-docker
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adding love.

Browse Source
This commit is contained in:
Bryce Covert
2015-04-21 07:52:57 -07:00
parent e7e9f75b23
commit 1b71d12d0a
2 changed files with 9 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
desktop/src-common/advent/actions.clj
View File

@@ -731,3 +731,9 @@
entities) entities)
(can-skip? [this screen entities] (can-skip? [this screen entities]
false))) false)))
(defn in-love [entities]
(transition-music entities :love :duration 1.0)
(play-animation entities :ego :love)
(transition-music entities nil :duration 1.0))

8
desktop/src-common/advent/screens/rooms/dream.clj
View File

@@ -81,6 +81,7 @@
:ego "'Because maidens love guys with might.'" :ego "'Because maidens love guys with might.'"
:ego "Awesome!" :ego "Awesome!"
:ego "If I become a knight, maybe Georgia McGorgeous will love me!") :ego "If I become a knight, maybe Georgia McGorgeous will love me!")
(actions/in-love entities)
(actions/stop-walking entities :ego :face :right) (actions/stop-walking entities :ego :face :right)
(actions/do-dialogue entities (actions/do-dialogue entities
:fairy-godfather "Tick, I told you that you can't be a knight." :fairy-godfather "Tick, I told you that you can't be a knight."
@@ -276,10 +277,6 @@
:interactions {:pit {:box [54 0 219 36] :interactions {:pit {:box [54 0 219 36]
:script (actions/get-script entities :script (actions/get-script entities
(actions/walk-to entities :ego [154 41]) (actions/walk-to entities :ego [154 41])
(actions/transition-music entities :love :duration 1.0)
(actions/play-animation entities :ego :love)
(actions/transition-music entities nil :duration 1.0)
(actions/talk entities :ego "Wow! That's a long way down.")) (actions/talk entities :ego "Wow! That's a long way down."))
:scripts {:shovel (actions/get-script entities :scripts {:shovel (actions/get-script entities
(actions/walk-to entities :ego [154 41]) (actions/walk-to entities :ego [154 41])
@@ -336,7 +333,8 @@
(actions/do-dialogue entities (actions/do-dialogue entities
:ego "Man! What a dream!" :ego "Man! What a dream!"
:ego "If I only really could be a knight." :ego "If I only really could be a knight."
:ego "Then I'd be able to win Georgia McGorgeous' heart.")) :ego "Then I'd be able to win Georgia McGorgeous' heart.")
(actions/in-love entities))
(do (actions/walk-to entities :ego [148 76] :face :right) (do (actions/walk-to entities :ego [148 76] :face :right)
(actions/do-dialogue entities (actions/do-dialogue entities
:fairy-godfather "What are you doing?" :ego "Erm... Nothing.")))) :fairy-godfather "What are you doing?" :ego "Erm... Nothing."))))