enhanced box.
This commit is contained in:
@@ -4,6 +4,7 @@
|
||||
[advent.screens.items :as items]
|
||||
[advent.utils :as utils]
|
||||
[advent.tween :as tween]
|
||||
[advent.zone :as zone]
|
||||
[clojure.zip :as zip]
|
||||
[play-clj.core :refer :all]
|
||||
[play-clj.ui :refer :all]
|
||||
@@ -230,7 +231,9 @@
|
||||
(actions/walk-straight-to entities :ego [320 -5])
|
||||
(actions/transition-background entities :inside-castle [182 90])
|
||||
(actions/walk-to entities :ego [187 75]))}
|
||||
:return-portrait {:box [103 70 206 116]
|
||||
:return-portrait {:mouse-in? (fn [_ x y]
|
||||
(or ((zone/box 103 70 206 116) x y)
|
||||
((zone/box 103 116 135 135) x y)))
|
||||
:script (actions/get-script entities (actions/talk entities :ego "It's the shopkeep's desk."))
|
||||
:scripts {:portrait (actions/get-script entities
|
||||
(return-portrait entities))
|
||||
|
||||
Reference in New Issue
Block a user