; read a sound file from disk sr = 44100 kr = 4410 ksmps = 10 nchnls = 1 instr 1 kvibdepth linseg p7, p3/2, p8, p3/2, p9 ; control the depth of vibrato kvibrate linseg p10, p3/2, p11, p3/2, p12 ; control the rate of vibrato kvib oscil kvibdepth, kvibrate, 1 ; vibrato oscillator anote diskin p6, p5+kvib, 0, 0, 0 ; read the specified soundfile from disk out anote endin