okay, I figured out a good deal of it by myself, thanks to the Waveset example.
here is a tiny bit of code.
-- creating the default group
withSC3 (\fd -> send fd (g_new [(1, AddToTail, 0)]))
-- a sine oscillator UGen with a "freq" parameter
let sin = (out 0 (sinOsc AR f 0 * 0.25))
where f = Control KR "freq" 440
-- sending the synthdef to the server
withSC3 (\fd -> send fd (d_recv (synthdef "sin" sin)))
-- instanciating a new "sin" synth
withSC3 (\fd -> send fd (s_new "sin" (-1) AddToTail 1 [("freq",1000)]))
the only thing I'm missing here is how to send a message to the synth in order
to change the freq parameter.
_______________________________________________
haskell-art mailing list
[email protected]
http://lists.lurk.org/mailman/listinfo/haskell-art
