 (ns infinitelives.pixi.sprite
   (:require [PIXI]
             [infinitelives.utils.vec2 :as vec2]
+            [infinitelives.pixi.texture :as texture]
             )
 )
 

   (set! (.-scale sprite) (make-point sx sy))))

(defn set-texture! [sprite tex]
  (.setTexture sprite tex))


(defn get-pos

                   xhandle 0.5 yhandle 0.5
                   scale 1
                   alpha 1}}]
  (let [s (PIXI/Sprite. (if (keyword? texture) (texture/get texture) texture))]
    (set! (.-anchor s) (make-point xhandle yhandle))
    (set! (.-x s) x)
    (set! (.-y s) y)
