Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (
- SynthDef(\lead, {|out = 0, freq = 440, fFreq = 600, mul = 1, release = 0.4, panpos = 0, rMix = 0.5|
- var env, fEnv, sig;
- env = Env.perc(0.01, release, 1, -6);
- fEnv = Env.linen(0.01, 0, release, 1, \sine);
- sig = Mix.new([HPF.ar(RLPF.ar(LFPulse.ar([freq - (freq/360), freq + (freq/360)], mul: EnvGen.kr(env, doneAction: 2)),
- (fFreq * EnvGen.kr(fEnv)), 0.4, 12).distort * 0.04, 120),
- LFPulse.ar((freq), mul: 0.08 * EnvGen.kr(env, doneAction: 2))]
- );
- OffsetOut.ar(out, FreeVerb.ar(Pan2.ar(sig, panpos, mul), rMix));
- }).add;
- );
- // test
- Synth(\lead);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement