semi=2^(1/12.);

tones={9,11,13,11,9,6,6,4,11,9,8,9,11};

freq=semi^(tones-9);

times={0,1.5,2,3.5,4,5,6,7,8,9.5,10,11,12};

durations=Append[Drop[RotateLeft[times]-times,-1],2];

vg[w_]:=1/w

vg[w_]:=w^(1/3)

L=0.;
tempo=.5;

Sound[MapThread[SoundNote[#1,#2+L/vg[#3]+{0,#4},"Flute"]&,{tones,tempo times,freq,tempo durations}]]