51单片机唱歌C51音乐程序[整理]

1、51 单片机唱歌C51 音乐程序 整理 51 单片机唱歌C51音乐程序,i nclude <reg52.h> ,i nclude <intrins.h> /本例采用89C52,晶振为11.0592MHZ /关于如何编制音乐代码,其实十分简单, 各位可以看以下代码./ 频率常数即音乐术语中的音调 , 而节拍常数即音乐术语中的多少拍 ;/ 所以拿出谱子 , 试探编吧 !unsigned char n=0; /n为节拍常数变量unsigned char code music_tab= 0x18, 0x30, 0x1C , 0x10, /格式为 :频率常数 ,节拍常数 ,频率常

2、数 ,节拍常数 ,0x20, 0x40, 0x1C , 0x10, 0x18, 0x10, 0x20 , 0x10, 0x1C, 0x10, 0x18 , 0x40, 0x1C, 0x20, 0x20 , 0x20, 0x1C, 0x20, 0x18 , 0x20, 0x20, 0x80, 0xFF , 0x20,0x30, 0x1C, 0x10 , 0x18,0x20, 0x15, 0x20 , 0x1C, 0x20, 0x20, 0x20 ,0x26, 0x40, 0x20, 0x20 , 0x2B, 0x20, 0x26, 0x20 , 0x20, 0x20, 0x30,0x80 , 0

3、xFF, 0x20, 0x20, 0x1C , 0x10, 0x18, 0x10, 0x20 , 0x20, 0x26,0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B , 0x40, 0x20, 0x20, 0x1C , 0x10,0x18, 0x10, 0x20 , 0x20, 0x26, 0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B ,0x40, 0x20, 0x30, 0x1C , 0x10, 0x18, 0x20, 0x15 , 0x20, 0x1C, 0x20,0x20 , 0x20, 0x26, 0x40, 0x20 , 0x20,

4、 0x2B, 0x20, 0x26 , 0x20, 0x20,0x20, 0x30 , 0x80, 0x20, 0x30, 0x1C , 0x10, 0x20, 0x10, 0x1C , 0x10,0x20, 0x20, 0x26 , 0x20, 0x2B, 0x20, 0x30 , 0x20, 0x2B, 0x40, 0x20 ,0x15,0x1F, 0x05, 0x20 , 0x10, 0x1C, 0x10, 0x20 , 0x20, 0x26, 0x20, 0x2B , 0x20, 0x30, 0x20, 0x2B , 0x40, 0x20, 0x30, 0x1C , 0x10, 0x1

5、8, 0x20, 0x15 , 0x20, 0x1C, 0x20, 0x20 , 0x20, 0x26, 0x40, 0x20 , 0x20, 0x2B, 0x20, 0x26 , 0x20, 0x20, 0x20, 0x30 , 0x30, 0x20, 0x30, 0x1C , 0x10, 0x18, 0x40, 0x1C , 0x20, 0x20, 0x20, 0x26 , 0x40, 0x13, 0x60, 0x18 , 0x20, 0x15, 0x40, 0x13 , 0x40, 0x18, 0x80, 0x00 ;void int0() interrupt 1 /采用中断 0 控制节

6、拍 TH0=0xd8; TL0=0xef;n-;void delay (unsigned char m) /unsigned i=3*m;while(-i);控制频率延时void delayms(unsigned char a) / 豪秒延时子程序while(-a); /采用while(-a)不要采用while(a-);各位可编译一下看看汇编结果就知道了 ! void main() unsigned char p,m; /m为频率常数变量unsigned char i=0;TMOD&=0x0f;TMOD =0x01;TH0=0xd8;TL0=0xef;IE=0x82;play:while(1)a: p=music_tabi;if(p=0x00) i=0, delayms(1000); goto play; /如果碰到结束符 , 延时 1秒 ,回到开始再来一遍else if(p=0xff) i=i+1;delayms(100),TR0=0; goto a; /若碰到休止符 ,延时 100ms,继续取下一音符else m=music_tabi+, n=music_tabi