     (nine-patch \"image.png\" :set-color (color :blue))
     (nine-patch {:image \"image.png\" :left 10 :right 10 :top 10 :bottom 10})"
   [arg & options]
-  `(let [entity# (texture* ~arg)]
+  `(let [entity# (nine-patch* ~arg)]
      (u/calls! ^NinePatch (u/get-obj entity# :object) ~@options)
      entity#))
 

                     (files! :internal \"fire.p\")
                     (files! :internal \"fire-images\"))"
  [& options]
  `(let [entity# (texture*)]
     (u/calls! ^ParticleEffect (u/get-obj entity# :object) ~@options)
     entity#))


    (particle-effect! entity :set-position 10 10)"
  [entity k & options]
  `(u/call! ^ParticleEffect (u/get-obj ~entity :object) ~k ~@options))

; texture-atlas

(defn texture-atlas*
  "The function version of `texture-atlas`"
  [^String path]
  (TextureAtlas. path))

(defmacro texture-atlas
  "Returns a [TextureAtlas](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/graphics/g2d/TextureAtlas.html)

    (texture-atlas \"packed.txt\")"
  [path & options]
  `(let [^TextureAtlas object# (texture-atlas* path)]
     (u/calls! object# ~@options)
     object#))

(defmacro texture-atlas!
  "Calls a single method on a `texture-atlas`

    (texture-atlas! object :create-patch \"test\")"
  [object k & options]
  `(u/call! ^TextureAtlas ~object ~k ~@options))

; animation

