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

Simple drum (CSound instrument)

sr     = 44100
kr     = 4410
nchnls = 1

instr 1
  iptch = cpspch(p5)
  asig pluck p4, iptch, iptch*0.81, 1, 3, .5
  out asig
endin
f1 0 8 2  1 1 1 1 1 -1 -1 -1

t 30

i1     0         0.2        10000     8.00 
i1     +         0.2        10000     8.00 
i1     +         0.3        10000     8.00 
i1     +         0.1        10000     8.00 
i1     +         0.2        10000     8.00 
i1     +         0.2        10000     8.00