summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sly/sprite.scm6
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)