FreeSelfWhenDone : UGen : AbstractFunction : Object

s.boot;

​

// simple example

(

{ var env;

env = Line.kr(0, 1, 1);

FreeSelfWhenDone.kr(env); // free synth at end of line

SinOsc.ar(200, 0, 0.5) * env

}.play;

)

​

// the previous example works, because FreeSelfWhenDone operates on the Line

// this version won't work

(

{ var env, output;

env = Line.kr(0, 1, 1);

output = SinOsc.ar(200, 0, 0.5) * env;

output.postln; // output is a BinaryOpUGen, which has no 'done' flag

FreeSelfWhenDone.kr(output); // won't ever be done

output

}.play;

)

​

// record for four seconds

b = Buffer.alloc(s, 44100 * 4.0, 1);

(

SynthDef("help-RecordBuf",{ arg out=0,bufnum=0;

    var formant, recbuf;

    formant = Formant.ar(XLine.kr(400,1000, 4), 2000, 800, 0.125);

    recbuf = RecordBuf.ar(formant, bufnum, recLevel: Line.kr(1, 1), loop: 0);

    // The RecordBuf doesn't loop, so you can check it for 'done' status

    FreeSelfWhenDone.kr(recbuf);

}).play(s,[\out, 0, \bufnum, b]);

)

​

// play it back

(

SynthDef("help-RecordBuf play",{ arg out=0,bufnum=0;

    var playbuf;

    playbuf = PlayBuf.ar(1,bufnum);

    FreeSelfWhenDone.kr(playbuf); // frees the synth when the PlayBuf is finished

    Out.ar(out, playbuf);

}).play(s,[\out, 0, \bufnum, b]);

)