2014-05-20 19:07:04 +00:00
|
|
|
#lang racket
|
|
|
|
|
|
|
|
(require "instrument.rkt"
|
|
|
|
"gui.rkt"
|
2014-05-27 23:39:51 +00:00
|
|
|
"sample.rkt"
|
|
|
|
"system.rkt")
|
2014-05-20 19:07:04 +00:00
|
|
|
|
2014-05-22 17:39:35 +00:00
|
|
|
;; setup
|
|
|
|
(require rsc3)
|
|
|
|
|
2014-05-29 05:41:53 +00:00
|
|
|
;; FIXME - not running
|
|
|
|
(display "Hello! from main.rkt\n")
|
2014-05-27 23:39:51 +00:00
|
|
|
(run-super-collider)
|
|
|
|
|
2014-05-22 17:39:35 +00:00
|
|
|
|
|
|
|
;; show osc messages on server
|
|
|
|
(send-msg (dump-osc 1))
|
2014-05-27 23:39:51 +00:00
|
|
|
(reset)
|
2014-05-22 17:39:35 +00:00
|
|
|
(sleep 0.1)
|
|
|
|
|
2014-05-20 19:07:04 +00:00
|
|
|
(provide
|
|
|
|
(all-from-out "instrument.rkt"
|
|
|
|
"gui.rkt"
|
|
|
|
"sample.rkt"))
|
|
|
|
|
|
|
|
|