View Single Post
Old 05-30-2010   #13
Google

 
Google's Avatar
 
Last Online: 05-30-2013
Join Date: Jan 2008
Posts: 1,788
Thanks: 10,018
Thanked 1,100 Times in 651 Posts
Groans: 1
Groaned at 6 Times in 6 Posts
Default

There is a big progress. Now it looks much better than before. But still needs some tuning

Here it is => http://securepp.net/sound/sound3.wma


And here are the notes so far:
Code:
#define         A            142             // 440 Hz,        A    
#define         B            127             // 493.88 Hz,   B 
#define         Bl            254             // 246.94 Hz,   Bl
#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 Hz,        GH
Code:
rom near TonesStruct Tones[] =    {{500*SF, {G}},
{250*SF, {D,D}},
{500*SF, {Bl,D}},
{1000*SF, {G,A,B}},
{750*SF, {B}},
{250*SF, {C}},
{1000*SF, {Dh}},
{1000*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, {G}},
{250*SF, {D,D}},
{500*SF, {Bl,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}},
{333*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, {Fd}},
{250*SF, {Fd}},
{4000*SF, {G}}};
__________________

Google is offline   Reply With Quote