gl-draw   xtlang


Defined in:  https://github.com/digego/extempore/tree/v0.8.9/examples/contrib/kinect.xtm

Implementation

(bind-func gl-draw
  (lambda ()
    (glClearColor 0.0 0.0 0.0 1.0)
    (glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT))
    (glLoadIdentity)
    (glTranslated 0.0 0.0 -10.0)
    (ping-skel)))


Back to Index