Hi, It’s been a while since I’ve contributed. Lots has happened in the interim, including a heart attack, but that hasn’t hampered my drive to create. As usual, I took a few liberties with the directions. I am pleased with the result. It’s a blurry mélange… sort of like me.
The tracks are:
- aisle27
- brexit
3.distorted steam engine
- identity crisis
- clavinet groove
- solstice 2018
- sufi
- turning stone
- last honey bee
- tin foil hat
- neck pain
- drone bed
I loaded these tracks into an array of buffers and then played them sequentially via a SynthDef. The Synth picks a random starting point for each buffer. Each time I run the code, I get a different mix.
Here is the code:
(
Buffer.freeAll;
b = PathName(PathName(thisProcess.nowExecutingPath).parentPath++ “samples/disquiet0365/mono/”).entries.collect({
arg path;
Buffer.readChannel(s, path.fullPath);
});
)
(
SynthDef.new(\play3, {
arg buf=0, out=0;
var sig, rate, amp, start;
rate = EnvGen.kr(Env([1.0,1.3,0.5], [(BufDur.ir(buf) * 0.3),(BufDur.ir(buf) * 0.7)], [1, -1]), doneAction:Done.freeSelf);
start = rrand(((BufFrames.kr(buf))/3), (BufFrames.kr(buf)/1.25));
amp = EnvGen.kr(Env([0,0.8,0.8,0], [(BufDur.ir(buf)* 0.4),(BufDur.ir(buf) * 0.5), (BufDur.ir(buf) * 0.1)], [1, -1, -1]), doneAction:Done.freeSelf);
sig = PlayBuf.ar(1, buf, rate, 1, start, doneAction:Done.freeSelf);
sig = PanAz.ar(4, sig, LFSaw.kr(1/BufDur.ir(buf),1), 1, 2, 0.5);
Out.ar(out, sig * amp);
}).add;
)
(
p = Pbind(
\instrument, \play3,
\dur, 10,
\buf, Pseq([0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12]),
).play;
)
