player position

src/cljs/topdown2d/demoscene.cljs

@@ -17,8 +17,8 @@
    {:map-def {:images {:pokelike (by-id "demoscene-tileset")}
               :def nil
               :zoom 3}
-    :player {:x (- (/ (get-in gamestate [:dimensions :w]) 2) 32)
+    :player {:x (/ (get-in gamestate [:dimensions :w]) 2)
-             :y (- (/ (get-in gamestate [:dimensions :h]) 2) 32)
+             :y (/ (get-in gamestate [:dimensions :h]) 2)
              :w 0 :h 0
              :d :s
              :animation {:ids {:s 778 :n 778
@@ -67,7 +67,9 @@
           (update-in [:viewport :x] * tw zoom)
           (update-in [:viewport :y] * th zoom)
           (assoc-in [:player :w] (- tw 2))
-          (assoc-in [:player :h] (- th 2))))
+          (assoc-in [:player :h] (- th 2))
+          (update-in [:player :w] - (/ tw 2))
+          (update-in [:player :h] - (/ th 2))))
     scenestate))
 
 (defn update-scene [gamestate scenestate]