SEMIMUTICAS #CadaDiaUnSinte Synth04

(

SynthDef(\synth04, {|gate 1, frec1 100, frec2 250, frecFil 0.2, frecAmp 10, ampg 0|

var mod1, mod2, sen, env;

mod1 = SinOsc.kr(frecFil).range(400, 8000);

mod2 = SinOsc.kr(frecAmp).range(0, 1);

sen = Saw.ar([frec1,frec2],0.1);

sen = RLPF.ar(sen, mod1, 0.05) * mod2;

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

Out.ar(0, (sen*env)*ampg)

},

metadata: (specs: (

frec1:[40,5000],

frec2:[40,5000],

frecFil:[0.1,100],

frecAmp:[0.1, 100],

ampg:[0, 1]

))

).store;

SynthDescLib.global[\synth04].makeWindow;

)

http://semimuticas.org/

https://www.facebook.com/semimuticas

https://twitter.com/semimuticas