René Nyffenegger's collection of things on the web
René Nyffenegger on Oracle - Most wanted - Feedback
 

Bouncer [CSound effect]

Bouncer generates a series of 'impulses' that occur at a increasing speed. It gives the impression of a 'bouncing' sound.
sr     = 44100
kr     = 4410
nchnls = 2

instr 1
  ilen     = p3
  iamp     = p4
  ifrq     = cpspch(p5)
  ipan     = p6

  kfreq_incr expon 5.6, ilen, 112

  kbounce oscil iamp, 1/ilen *kfreq_incr, 2
  a1 oscil kbounce, ifrq, 1

  a1 butterlp a1, 4*ifrq

  outs a1*ipan*10,a1*(1-ipan)*10
endin
f1 0 2048 10 1              
f2 0 512   7 1 500 0 12 1 

i1   0   6  9999  6.00 0.8