179,854Messages
9,130Senders
30Years
342mboxes

← back to listing · view thread

From:
christian hresko
To:
Date:
Tue, 19 Oct 1999 23:46:12 -0400
Subject:
(idm) Ae - The Killing Game
Msg-Id:
<380D3B03.457A0F1@ix.netcom.com>
Mbox:
idm.9910.gz
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 }); > ) >
i'm sure there was some variation on this code, but not much. one day, i'm going to be just like YOU. thanks, christian -- " there's nothing worse in life than being ordinary "