SendReply : SendTrig : UGen : AbstractFunction : Object

(

{

    SendReply.kr(Impulse.kr(3), '/the_answer', [40, 41, 42, 43] + MouseX.kr, 1905);

}.play(s);

)

​

o = OSCFunc({ |msg| msg.postln }, '/the_answer');

​

​

// multichannel expansion

(

{

    SendReply.kr(Impulse.kr(3),

        '/the_answer',

        values: [[40, 80], [41, 56], 42, [43, 100, 200]],

        replyID: [1905, 1906, 1907, 1908]

    );

}.play(s);

)

​

o.free;

​

// Sending audio parameters over a network via OSC

// Since SendReply can only respond to the host, this shows how

// to send data to a separate target through sclang.

(

SynthDef(\amplitudeAnalysis, {|in=0, rate=60|

    var input = SoundIn.ar(in);

    var amp = Amplitude.kr(input);

    var freq = Pitch.kr(input);

    var trig = Impulse.kr(rate);

    SendReply.kr(trig, '/analysis', [amp, freq[0], freq[1]]);

}).add;

)

​

// example target address - insert your target host & port here

~testNetAddr = NetAddr("127.0.0.1", 5000);

~mySynth = Synth(\amplitudeAnalysis);

​

(

OSCdef(\listener, {|msg|

    var data = msg[3..];

    data.postln;

    ~testNetAddr.sendMsg("data", data);

}, '/analysis');

)

​

~mySynth.set(\rate, 10); // slow it down...

(

{ SendReply.ar(Impulse.ar(4), "/reply", [Sweep.ar, SinOsc.ar(0.3)]); 0 }.play;

OSCdef(\x, { |msg|

    var time, value;

    time = msg[3];

    value = msg[4];

    "value % occurred at time %".format(value, time).postln;

}, "/reply");

)