2014-05-20 19:07:04 +00:00
|
|
|
#lang racket
|
|
|
|
|
|
2014-05-29 17:03:53 +00:00
|
|
|
(require "system.rkt"
|
|
|
|
|
"instrument.rkt"
|
2014-05-20 19:07:04 +00:00
|
|
|
"gui.rkt"
|
2014-05-29 17:03:53 +00:00
|
|
|
"sample.rkt"
|
|
|
|
|
"routing.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
|
2014-05-29 18:35:36 +00:00
|
|
|
;(display "Hello! from main.rkt\n")
|
2014-05-29 17:03:53 +00:00
|
|
|
;(run-super-collider)
|
2014-05-27 23:39:51 +00:00
|
|
|
|
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"
|
2014-05-29 17:03:53 +00:00
|
|
|
"sample.rkt"
|
|
|
|
|
"routing.rkt"))
|
2014-05-20 19:07:04 +00:00
|
|
|
|
|
|
|
|
|
