//
// il faut tout d'abord lancer l'extension AmbIEM et des hrtfs types KemarHRTF

b = Buffer.read(s, "sounds/a11wlk01.wav");
(
~grain = {
    var trate, dur, clk, pos, pan;
    trate = MouseY.kr(8,120,1);
    dur = 4 / trate;
    clk = Dust.kr(trate);
    pos = MouseX.kr(0,BufDur.kr(b.bufnum)) + TRand.kr(0, 0.01, clk);
    pan = WhiteNoise.kr(0.6);
    TGrains.ar(2, clk, b, 1, pos, dur, pan, 0.8);
};
)

v.addSource( ~grain, "grainer", [2, 5, 2.5]);