Always-on computer music
Du kan inte välja fler än 25 ämnen Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.

audio.scd 580B

3 år sedan
3 år sedan
3 år sedan
12345678910111213141516171819
  1. s = Server.local;
  2. s.waitForBoot {
  3. var module, sound;
  4. // Connect to OSC
  5. thisProcess.openUDPPort(5005);
  6. n = NetAddr.new("0.0.0.0", 5005);
  7. o = OSCFunc({ arg msg, time, addr, recvPort; [msg, time, addr, recvPort].postln; }, '/radio', n);
  8. OSCFunc.trace(true);
  9. // Create the synth definition and load it
  10. module = SynthDef.new("module", { arg hue, saturation, value;
  11. Out.ar(0, SinOsc.ar(MouseX.kr(220, 1000)));
  12. });
  13. module.load(s);
  14. // Make a sound
  15. sound = Synth.new("module", [\hue, 440, \saturation, 100, \value, 500]);
  16. };