diff --git a/desktop/src-common/advent/screens/rooms/cat_tree.clj b/desktop/src-common/advent/screens/rooms/cat_tree.clj index 344c3908..d90acba9 100644 --- a/desktop/src-common/advent/screens/rooms/cat_tree.clj +++ b/desktop/src-common/advent/screens/rooms/cat_tree.clj @@ -30,19 +30,19 @@ (actions/walk-to entities :ego [195 140])) :cursor :down} :ladder-area {:box [46 40 265 190] - :scripts {:ladder (actions/get-script entities - (actions/talk entities :ego "I'll just set this up.") - (actions/walk-to entities :ego [151 50] :face :left) - (actions/play-animation entities :ego :reach) - (actions/remove-item entities :ladder) - (actions/add-entity entities :ladder ladder-entity) - (actions/walk-straight-to entities :ego [140 85] :face :right :update-baseline? false) - (actions/add-entity entities :blank (rooms/make-entity :blank - {:object nil :x 0 :y 0 :width 320 :height 240 :baseline 240 - :script (actions/get-script entities - (when (get-in @entities [:room :entities :ladder]) - (get-down entities)))})) - )}} + :scripts {:ladder (actions/get-unsaved-script entities + (actions/talk entities :ego "I'll just set this up.") + (actions/walk-to entities :ego [151 50] :face :left) + (actions/play-animation entities :ego :reach) + (actions/remove-item entities :ladder) + (actions/add-entity entities :ladder ladder-entity) + (actions/walk-straight-to entities :ego [140 85] :face :right :update-baseline? false) + (actions/add-entity entities :blank (rooms/make-entity :blank + {:object nil :x 0 :y 0 :width 320 :height 240 :baseline 240 + :script (actions/get-script entities + (when (get-in @entities [:room :entities :ladder]) + (get-down entities)))})) + )}} :grass {:box [26 105 60 160] :script (actions/get-script entities (if (not (actions/has-item? entities :grass))