hsc3-0.21: Help/Graph/adc-down-sample.hs

-- down sample (adc)
let f = lfNoise2 kr 8
    nh = lfNoise2 kr 3
    src = blip ar (f * 200 + 300) (nh * 10 + 20)
    sr = mouseX kr 1000 (sampleRate * 0.1) Exponential 0.2
in latch src (impulse ar sr 0) * 0.1

-- down sample (adc) ; id
let f = lfNoise2Id 'α' kr 8
    nh = lfNoise2Id 'β' kr 3
    src = blip ar (f * 200 + 300) (nh * 10 + 20)
    sr = mouseX kr 1000 (sampleRate * 0.1) Exponential 0.2
in latch src (impulse ar sr 0) * 0.1