Source code (which I also release under the license given here) runs in w:SuperCollider:
// Written by Dan Stowell, September 2006
b = Buffer.read(s,"sounds/break2.snd"); // Provide a simple breakbeat loop
(
var ampTable = Signal.hanningWindow(1024,100).squared;
var ampBuf = Buffer.loadCollection(s, ampTable);
SynthDef("accelerando_inf1", { arg out=0,bufnum=0;
var pos, posses, pitches, amps, sons;
// "pos" is a kind of master pitch control, linear varying between one and zero
pos = Phasor.ar(1, 0.007 / SampleRate.ir, 0, 1);
posses = (pos + ((0..4)/5)).wrap(0.0, 1.0); // Evenly spaced circularly within 0 to 1
pitches = (0.2 * 2.0.pow(posses * 5));
amps = BufRd.kr(1, ampBuf.bufnum, posses * BufFrames.ir(ampBuf.bufnum));
sons = (PlayBuf.ar(1, bufnum, pitches.poll(100), loop:1) * amps * 10);
Out.ar(out,
Pan2.ar(sons.mean.softclip)
)
}).play(s,[\out, 0, \bufnum, b.bufnum]);
)
to share – to copy, distribute and transmit the work
to remix – to adapt the work
Under the following conditions:
attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
{{Information |Description=An example of the accelerando effect invented by w:Jean-Claude Risset |Source=self-made |Date=23 September 2006 |Author= Mcld |Permission= |other_versions= }} Category:Auditory illusions [[Category:Illusio
File usage
The following file is a duplicate of this file (more details):