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

instr 29

idel=.06

kenv oscili p4*6000, 1/p3, 2
a1 pluck kenv, p5, p6, 4, 6

a2 multitap a1, idel, 1, 2*idel, .62, 3*idel, .62, 4*idel, .38, 5*idel, .38, 6*idel, .24, 7*idel, .24, 8*idel, .15, 9*idel, .15, 10*idel, .1, 11*idel, .1, 12*idel, .06, 13*idel, .06, 14*idel, .03, 15*idel, .03, 16*idel, .02, 17*idel, .02, 18*idel, .01, 19*idel, .01
a2=a2+a1

amove randi 2, 4, 1/(p2+p3)
amove=amove+4
a3 vdelay a2, amove, 6
a4 vdelay a3, amove, 6
a2=a2+a3+a4

a7 delay a2, .03

outs a2*p7, a7*(1-p7)

endin