You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

19 lines
975 B
Plaintext

b = Buffer.read(s, "/Users/lcoogan/snd/releases/desolation.mountain/foot_disc.wav");
b = Buffer.read(s, "/Users/lcoogan/Music/SuperCollider Recordings/SC_250817_220452.wav");
(
SynthDef(\help_PlayBuf, { |out = 0, bufnum = 0|
var sig = PlayBuf.ar(1, bufnum, BufRateScale.kr(bufnum)*0.5 + Impulse.ar(20), loop: 1.0);
sig = AllpassN.ar(sig, 0.01, 0.5, 2.0);
sig = DoubleNestedAllpassN.ar(sig, 0.1, 0.1, 0.15, 0.1, 0.4, 0.25, 0.001, 0.01, 0.8);
sig = BPF.ar(sig, 800 + SinOsc.ar(20, 1.0 + SinOsc.ar(10)), 1.0);
sig = CombFormlet.ar(sig, 20 + SinOsc.ar(1, 2);, 0.1, 0.5, 1.0, 0.0, 20);
sig = DelayN.ar(sig, 0.5, 0.01);
// sig = GrainBuf.ar(1, Impulse.ar(2), 2, sig, 1, 0.03 + SinOsc.ar(0.1), 2, 0, -1, 512);
// sig = GrainBuf.ar(numChannels:1, trigger:Impulse.ar(1), dur:1, sndbuf:sig, rate:0.4, pos:0 + SinOsc.ar(0.1, 0.0 + SinOsc.ar(10)), interp:2, maxGrains:256);
// sig = Feedback.ar(sig, 0.01, 0.001, -1);
Out.ar(out, sig!2);
}).play(s, [\out, 0, \bufnum, b]);
)