hsc3-graphs-0.11: src/shepard-tones.scd

{var ampTable = Signal.hanningWindow(1024).squared
;var amp_f = {arg i;0.5 ** i * 20000}
;var freqTable = Signal.newClear(1024).waveFill(amp_f,0,10)
;var b1 = Buffer.loadCollection(s,freqTable)
;var b2 = Buffer.loadCollection(s,ampTable)
;var ratescale = 1024 / 44100 / 10
;var rate = 0.1
;var ph = Phasor.ar(0,rate * ratescale,0,1024,0)
;var phases = (0..9) * 0.1 * 1024 + ph
;var freqs = BufRd.ar(1,b1.bufnum,phases)
;var amps = BufRd.ar(1,b2.bufnum,phases)
;var tone = Mix.ar(SinOsc.ar(freqs) * amps) * 0.1
;Out.ar(0,tone)}.play