sr=44100
kr=20
ksmps=2205
nchnls=2

instr 24

kenv expseg .01, p3*.1, p4*3000, p3*.2, p4*1000, p3*.7, .01
kwah randi 8, 8, 1/(p2+p5)

a1 foscili kenv, p5, p6, p7, 12+kwah, 1
amove line 8, p3, 4
a2 vdelay a1, amove, 8
a3 vdelay a2, amove, 8
a1=a1+a2+a3

a4 delay a1, .02

outs a1*p8, a4*(1-p8)

endin