(
var ot,c, b, m;

ot = #[60, 62, 64, 66, 67, 69, 70, 71];

c = Pbind(\dur, 0.1,
\amp, Pseq([ Pgeom(0.2,0.95,50)],2),
\midinote, Prand( ot-12, inf),
\legato, 0.2,
\pan, Pfunc({1.0.rand2})
);

b = Pbind( \dur, Prand([5,Pseq([1,1,1,1,1]), Pseq([3,2]) ], 2),
\amp, Pfunc( {XLine.kr(0.001,0.1, 0.5)} ),
\midinote, Pshuf( ot-24)
);

Paddp(\ctranspose,
Pseq([0,2,4,6,7], inf), Ppar([b,c])).play

)