add dev level and get info pads working
This commit is contained in:
parent
7e75b665f5
commit
276c7c562b
10 changed files with 246 additions and 13 deletions
|
|
@ -46,6 +46,7 @@
|
|||
|
||||
(def tutorial-map-tmx (load-tiled-xml-file "./tiled/tutorial.tmx"))
|
||||
(def level-001-map-tmx (load-tiled-xml-file "./tiled/level_001.tmx"))
|
||||
(def dev-map-tmx (load-tiled-xml-file "./tiled/dev.tmx"))
|
||||
|
||||
(defn parse-gid [gid]
|
||||
(let [gid-long (Long/parseLong (str gid))
|
||||
|
|
@ -91,7 +92,9 @@
|
|||
{:player-1 (extract-pos player-1)
|
||||
:player-2 (extract-pos player-2)})}))
|
||||
(def levels {:levels {:level-001 (parse-map level-001-map-tmx)
|
||||
:tutorial (parse-map tutorial-map-tmx)}
|
||||
:tutorial (parse-map tutorial-map-tmx)
|
||||
:dev (parse-map dev-map-tmx)}
|
||||
|
||||
:colliders colliders})
|
||||
|
||||
(pprint (get-in levels [:levels :tutorial :objects]))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue