SEMIMUTICAS #CadaDiaUnSinte Synth01

(

SynthDef(\synth01, {|gate 1, frecPor 220, frecMod 5, ampg 0|

var mod, sen, env, pan;

mod = SinOsc.kr(frecMod).range(-20, 20);

sen = Mix(SinOsc.ar( (1,2..10)*(frecPor+mod), 0, 1/(1,3..30)));

env = EnvGen.kr(Env.asr(0.1, 1, 0.1), gate, doneAction:2);

pan = Pan2.ar(sen*env*ampg, 0);

Out.ar(0, pan)

},

metadata: (specs: (

frecPor:[20, 10000],

frecMod:[0,100],

ampg:[0, 1]

))

).store;

SynthDescLib.global[\synth01].makeWindow;

)

http://semimuticas.org/

https://www.facebook.com/semimuticas

https://twitter.com/semimuticas