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

instr 28

idel=.06

kenv oscili p4*8000, 1/p3, 2

a1 pluck kenv, p5, p6, 0, 4, .005, 4 ;parm1 .005, parm2 4
a11 pluck kenv, 2.05*p5, p6, 0, 4, .005, 4
a1=a1+a11

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, 1, 1/(p2+p3)
amove=amove+4
a3 vdelay a2, amove, 6
a4 vdelay a3, amove, 6
a2=a2+a3+a4

a7 delay a2, .01

outs a2, a7

endin