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

Allow setting actor values via the entity map

Browse Source
This commit is contained in:
oakes
2014-01-09 14:31:46 -05:00
parent 4442673daa
commit a895305e9a
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/play_clj/core_2d.clj
View File

@@ -17,7 +17,14 @@
(defn draw-actor! (defn draw-actor!
[^SpriteBatch batch {:keys [^Actor object] :as entity}] [^SpriteBatch batch {:keys [^Actor object] :as entity}]
(assert object) (assert object)
(.draw ^Actor object batch 1)) (doseq [[k v] entity]
(case k
:x (.setX object v)
:y (.setY object v)
:width (.setWidth object v)
:height (.setHeight object v)
nil))
(.draw object batch 1))
(defn draw-image! (defn draw-image!
[^SpriteBatch batch {:keys [^TextureRegion object x y width height]}] [^SpriteBatch batch {:keys [^TextureRegion object x y width height]}]