codesnippets
This is an old revision of the document!
2013-06-10 19:58:40
codinglog-entry
2013-06-10 19:58:52
;; standard callback
(define cairo-animation
(lambda (beat dur)
(gl_draw)
(gl:swap-buffers ctx)
(callback (*metro* (+ beat (* .5 dur))) 'cairo-animation (+ beat dur) dur)))
(cairo-animation (*metro* 'get-beat 4) 1/12)
codesnippets.1370861920.txt.gz · Last modified: 2018/07/18 14:09 (external edit)