1
0
Fork 0
SuperCollider-Workspace/2020-11-24_klickydisonance.scd

27 lines
592 B
Plaintext

Ndef(\akj).play
Ndef(\akj).fadeTime=20;
(
Ndef(\akj, {
var freq=300, snd;
freq = [freq,freq*1.01];
snd = LFPar.ar(freq) * 0.3
+ (LFTri.ar(freq*16/19, mul:0.3))
+ (Pulse.ar(freq*21/40, mul:0.1))
+ (SinOsc.ar(freq/8.01, mul:4).clip2(0.3))
+ (LFPulse.ar([2.2,4.4]*2, width: LFNoise1.ar(0.1).exprange(0.001,0.4)))
;
snd = Splay.ar(snd);
//snd = LeakDC.ar(snd);
snd = snd + (Greyhole.ar(snd) * 0.3);
snd = snd + (SinOsc.ar(freq/4, mul:0.7) * LFPulse.ar(0.275, width:0.25).range(0,1));
//snd = Limiter.ar(snd, 0.5) * 1.5;
(snd * 0.6 + (snd.wrap2 * 0.04)).softclip * 1;
})
)