here's the secret magical formula that autechre used to destroy my
favorite song by skinny puppy. no, this doesn't have much relevance to
anything, but since they fucked up a perfectly good song (in a BAD way)
i believe it's my civil duty to disclose the secrets...
quoted 39 lines var filename, sound, signal;
> var filename, sound, signal;
> filename = ":Sounds:killing_game";
> sound = SoundFile.new;
> if (sound.read(filename), {
> signal = sound.data.at(0);
> Synth.scope({
> var looplen = 0.1, xfadelen = 0.01, mx, my;
> var stream;
>
> // create a stream
> stream = Pseq([ Pgeom(0.75, 1.04427, 32) ], inf).asStream;
>
> // mouse x controls offset into sample of loop
> mx = MouseX.new;
>
> // mouse y controls loop length
> my = MouseY.new(0.01, 0.8, \exponential);
>
> // spawn a grain for each iteration of the loop
> Spawn.ar({ arg spawn;
> var offset, env;
>
> offset = mx.value * signal.size; // calculate start offset
> looplen = my.value * stream.next; // get loop length
>
> spawn.nextTime = looplen; // schedule next grain
>
> // create an envelope for this grain
> env = Env.linen(xfadelen, looplen - xfadelen, xfadelen, 0.4, \welch);
>
> // a PlayBuf with an envelope
> PlayBuf.ar(signal, sound.sampleRate, 1,
> offset, 0, signal.size-2, EnvGen.ar(env))
>
> }, 1, 1);
> }, 0.4);
> },{ (filename ++ " not found.\n").post });
> )
>