tried fixing running supercollider

This commit is contained in:
Mustafa 2014-05-29 10:03:53 -07:00
parent f180495225
commit bb6ac29aca
5 changed files with 14 additions and 11 deletions

View file

@ -4,9 +4,9 @@
(display "in example.rkt")
(sleep 0.1)
;(sleep 0.1)
(define my-sin (make-note "sin-inst" 880))
(define my-sin (make-note "saw-inst" 880))
(param-slider "change frequency" 300 1000 400

View file

@ -11,7 +11,7 @@
;; TODO - remove. using "signal-slider" for testing
(require "gui.rkt")
(run-super-collider)
;(run-super-collider)
(define current-node-id 1000)

View file

@ -1,16 +1,17 @@
#lang racket
(require "instrument.rkt"
(require "system.rkt"
"instrument.rkt"
"gui.rkt"
"sample.rkt"
"system.rkt")
"sample.rkt"
"routing.rkt")
;; setup
(require rsc3)
;; FIXME - not running
(display "Hello! from main.rkt\n")
(run-super-collider)
;(run-super-collider)
;; show osc messages on server
@ -21,6 +22,7 @@
(provide
(all-from-out "instrument.rkt"
"gui.rkt"
"sample.rkt"))
"sample.rkt"
"routing.rkt"))

View file

@ -15,9 +15,10 @@
(process "./start_server_linux.sh")
(sleep 0.5)
(if (system "ps -e | grep scsynth > /dev/null")
(display "OK")
(display "Error")))))
(display "OK\n")
(display "Error\n")))))
('macosx 1)
('windows 1)
(else 1)))
(run-super-collider)

View file

@ -26,7 +26,7 @@
|#
(with-sc3 reset)
(reset)
#|
(let* ((x (mouse-x kr 220 440 0 0.1))