sr=44100 ksmps=25 nchnls=2 garvbl init 0 garvbr init 0 instr 11 acrnch guiro 0dbfs * .7, p3 kjit jitter .2, 5, 15 koffs = kjit + 1 acrmod = acrnch * koffs kfc expseg 4000, p3,8000 ;acrf lowpass2 acrmod, kfc, 10 acrf butterhp acrmod, kfc aenv linseg 0, .008, 1, p3-.01, 1, .002, 0 acrenv = acrf * aenv anot delayr .4 a1 deltap .04 a2 deltap .06 a3 deltap .12 a4 deltap .1 a5 deltap .14 a6 deltap .17 a7 deltap .2 a8 deltap .19 delayw acrenv garvbl = garvbl + .4*a1 + .2*a3 + .3*a5 + .2*a7 + acrenv garvbr = garvbr + .4*a2 + .2*a4 + .3*a6 + .2*a8 + acrenv outs acrenv, acrenv endin instr 12 krvt init p4 al reverb garvbl, krvt ar reverb garvbr, krvt outs al, ar garvbl = 0 garvbr = 0 endin i11 0 .18 i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i11 ^+.14 . i12 0 10 .04 e