diff options
| author | David Thompson <dthompson2@worcester.edu> | 2016-01-11 08:37:42 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2016-01-12 08:38:44 -0500 |
| commit | d21b67eaad50c9389e1ad83cc595d2e77783942c (patch) | |
| tree | fb2642a4c14f63d01a6d1fe193676b7ea024d866 /sly/render.scm | |
| parent | 3c349c76e44ae4f5789a2f9e68f6ad260d212a30 (diff) | |
render: Add alpha value to render context.
Necessary for interpolating moving objects to avoid temporal aliasing.
* sly/render.scm (<graphics>)[alpha]: New field.
(graphics-alpha, set-graphics-alpha!): New procedure.
* sly/game.scm (run-game-loop): Set the frame's alpha value before each
render call.
Diffstat (limited to 'sly/render.scm')
| -rw-r--r-- | sly/render.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/sly/render.scm b/sly/render.scm index 6bc917b..deac23a 100644 --- a/sly/render.scm +++ b/sly/render.scm @@ -57,6 +57,8 @@ set-graphics-framebuffer! graphics-viewport set-graphics-viewport! + graphics-alpha + set-graphics-alpha! graphics-model-view-transform graphics-model-view-mul! graphics-model-view-identity! @@ -177,7 +179,8 @@ (viewport graphics-viewport %set-graphics-viewport!) (projection graphics-projection) (model-view graphics-model-view) - (uniforms graphics-uniforms set-graphics-uniforms!)) + (uniforms graphics-uniforms set-graphics-uniforms!) + (alpha graphics-alpha set-graphics-alpha!)) (define (graphics-uniform-ref gfx uniform) (hashq-ref (graphics-uniforms gfx) uniform)) |