diff options
Diffstat (limited to 'examples')
-rw-r--r-- | examples/demo.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/examples/demo.scm b/examples/demo.scm index de25680..57c8257 100644 --- a/examples/demo.scm +++ b/examples/demo.scm @@ -100,3 +100,10 @@ (register-state! pb) ;; Jump to zero (blackout) cue +(cut-to-cue-number! pb 0) + +;; Set up a "go" button +(register-midi-note-callback! + #:channel 14 + #:note-number #xc + #:func (lambda () (go! pb))) |