[Google]

Now it is better. But It is still missing something.
Here it is => http://securepp.net/sound/sound2.wma
At the beginning it is not very clear yet. At the end, it is good but the last 3 notes aren't well placed.
I think I should use 0 (no sound) with no delay somewhere in between.

Now this is what I'm using:

#define         A         142                       // 440 Hz,       A        
#define         B         127                       // 493.88 Hz,   B    
#define         C         120                       // 523.25 Hz,   C        
#define         D         214                       // 293.66 Hz,   D       
#define        Dh        107                       // 587.33 Hz,    DH    
#define         E         190                       // 329.63 Hz,   E        
#define         F         179                       // 349.23 Hz,    F
#define        Fd         169                       // 369.99 Hz,    F#          
#define         G         160                       // 392 Hz,        G      
#define        Gh          80                       // 783.99,        GH

rom near TonesStruct Tones[] =    {{500*SF, {G}},
{250*SF, {D,D}},
{500*SF, {B,D}},
{1000*SF, {G,A,B}},
{750*SF, {C}},
{250*SF, {B}},
{750*SF, {D}},
{250*SF, {B}},
{1000*SF, {C}},
{750*SF, {A}},
{250*SF, {D}},
{1000*SF, {B}},
{750*SF, {G}},
{250*SF, {B}},
{1000*SF, {B}},
{750*SF, {G}},
{250*SF, {B}},
{1000*SF, {A}},
{750*SF, {A}},
{250*SF, {G}},
{500*SF, {Fd}},
{250*SF, {D,D}},
{500*SF, {D,D}},
{1000*SF, {B}},
{250*SF, {D,D}},
{500*SF, {B,D}},
{1000*SF, {G,A}},
{1000*SF, {B}},
{750*SF, {B}},
{250*SF, {C}},
{1000*SF, {Dh,C}},
{1000*SF, {B}},
{750*SF, {B}},
{250*SF, {B}},
{1000*SF, {A,D,E,Fd}},
{1000*SF, {G}},
{750*SF, {G}},
{250*SF, {G}},
{1000*SF, {G}},
{750*SF, {D}},
{250*SF, {D}},
{3000*SF, {G}},
{750*SF, {A}},
{250*SF, {A}},
{1000*SF, {B}},
{750*SF, {D}},
{250*SF, {D}},
{1000*SF, {E}},
{750*SF, {Fd}},
{250*SF, {Fd}},
{3000*SF, {G}},
{750*SF, {D}},
{250*SF, {D}},
{3000*SF, {G}},
{750*SF, {A}},
{250*SF, {A}},
{1000*SF, {B}},
{750*SF, {Dh}},
{250*SF, {C}},
{1000*SF, {B}},
{750*SF, {A}},
{250*SF, {A}},
{3000*SF, {G}},
{750*SF, {B}},
{250*SF, {C}},
{1000*SF, {Dh}},
{750*SF, {Dh}},
{250*SF, {Dh}},
{500*SF, {Dh,C}},
{750*SF, {B}},
{250*SF, {C}},
{1000*SF, {Dh}},
{750*SF, {Dh}},
{250*SF, {Dh}},
{1000*SF, {Dh}},
{750*SF, {C}},
{250*SF, {B}},
{1000*SF, {A}},
{750*SF, {A}},
{250*SF, {A}},
{500*SF, {A,G}},
{750*SF, {Fd}},
{250*SF, {G}},
{1000*SF, {A}},
{750*SF, {A}},
{250*SF, {A}},
{1000*SF, {A}},
{750*SF, {D}},
{250*SF, {D}},
{1000*SF, {B}},
{750*SF, {B}},
{250*SF, {B}},
{1000*SF, {B}},
{750*SF, {G}},
{250*SF, {D}},
{1000*SF, {E}},
{750*SF, {E}},
{250*SF, {E}},
{1000*SF, {E}},
{750*SF, {C}},
{250*SF, {A}},
{3000*SF, {Dh}},
{750*SF, {F}},
{250*SF, {F}},
{4000*SF, {Gh}}};