Pwrap
superclass: FilterPattern
Pwrap(pattern,lo,hi)
(
SynthDef("help-sinegrain",
{ arg out=0, freq=440, sustain=0.05;
var env;
env = EnvGen.kr(Env.perc(0.01, sustain, 0.2), doneAction:2);
Out.ar(out, SinOsc.ar(freq, 0, env))
}).send(s);
)
(
a = Pn(
Pwrap(
Pgeom(200,1.07,96),
200,
1000.0
),
inf
);
x = a.asStream;
Routine({
loop({
Synth("help-sinegrain", [\freq, x.next.debug,\dur,0.3]);
0.12.wait;
})
}).play;
)
-felix