feat: load synthef on startup
This commit is contained in:
15
synthdefs/tom_simple.scd
Normal file
15
synthdefs/tom_simple.scd
Normal file
@ -0,0 +1,15 @@
|
||||
SynthDef(\tom, {
|
||||
var freq, decay, mod, sig, base, noise, vibrato, pitchEnv, ampEnv, filterEnv;
|
||||
freq = \freq.kr(120);
|
||||
decay = \decay.kr(1.6);
|
||||
ampEnv = Env.perc(0, decay).ar(Done.freeSelf);
|
||||
filterEnv = Env.perc(0, 0.15).ar;
|
||||
pitchEnv = Env.perc(0, 0.035).ar;
|
||||
noise = WhiteNoise.ar;
|
||||
base = SinOsc.ar(freq + (freq * pitchEnv) * [0.5, 1]).sum;
|
||||
sig = Splay.ar([base, noise], 0.1) * ampEnv * -2.dbamp;
|
||||
sig = RLPF.ar(sig, 200 + (\ff.kr(900) * filterEnv), 0.45);
|
||||
// sig = Fold.ar(sig, -0.6, 0.8);
|
||||
sig = sig + GVerb.ar(sig, 22, 1, 0.8) * -16.dbamp;
|
||||
Out.ar(\out.kr(0), sig * \amp.kr(1));
|
||||
}).add;
|
||||
Reference in New Issue
Block a user