 
 ;; }}}
 
-
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; =============================================================================
 ;; {{{ tiles
 (defn shit-line [tmap block {:keys [x y] :as pos} add len]
   (let [v2-len (vec2 len len) ]

        (shit-v-line wl (vec2 y1 x) h))))

(def tile-offsets
  (doall
    (let [mul 16
        mul-vec (vec2 mul mul) ]
    (->>
      (for [x [0 1] y [0 1]] (vec2 x y))
      (mapv #(v2/mul mul-vec %))
      (into []))) 
    )
  )

(defn mk-tile-printer [rend]
  (reify


;; }}}

;; =============================================================================
;; {{{ FPS Component

(defn fps-calc-chan
