diff options
-rw-r--r-- | sly/sprite.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/sly/sprite.scm b/sly/sprite.scm index b1f57bb..e717133 100644 --- a/sly/sprite.scm +++ b/sly/sprite.scm @@ -77,10 +77,12 @@ custom SHADER can be specified." (vector s2 t2) (vector s1 t2))))))) -(define* (load-sprite file-name #:optional #:key (shader (load-default-shader))) +(define* (load-sprite file-name #:optional #:key (shader (load-default-shader)) + (anchor 'center) (color white)) "Return a sprite mesh for the texture loaded from FILE-NAME. Optionally, a custom SHADER can be specified." - (make-sprite (load-texture file-name) #:shader shader)) + (make-sprite (load-texture file-name) #:shader shader + #:anchor anchor #:color color)) (define* (make-animated-sprite textures frame-duration #:optional #:key (loop? #t) |