domingo, 11 de septiembre de 2016

SEMIMUTICAS #CadaDiaUnSinte Synth02


(
SynthDef(\synth02, {|gate 1, frec 1, frecFil 200, rq 0.01, frecPan 3, ampg 0|
var sen, env, pan;
sen = SoundIn.ar(0) * Pulse.kr(frec).range(0,1);
sen = RLPF.ar(sen, frecFil, rq);
env = EnvGen.kr(Env.asr(0.1, 1.0, 0.1), gate, doneAction:2);
pan = Pan2.ar((sen*env)*ampg, LFNoise2.kr(frecPan));
Out.ar(0, pan)
},
metadata: (specs: (
frec:[0.5, 100],
frecFil:[40,5000],
rq:[0.01, 1.0],
frecPan:[0.1,30],
ampg:[0, 1]
))
).store;
SynthDescLib.global[\synth02].makeWindow;
)

No hay comentarios:

Publicar un comentario