单片机音乐程序

//本例采用89c52, 晶振为11.0592mhz

//关于如何编制音乐代码, 其实十分简单,各位可以看以下代码.

//频率常数即音乐术语中的音调,而节拍常数即音乐术语中的多少拍; //所以拿出谱子, 试探编吧!

unsigned char n=0; //n为节拍常数变量 unsigned char code music_tab[] ={

0x18, 0x30, 0x1c , 0x10, //格式为: 频率常数, 常数,

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 , 0xff, 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, 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, 0x18, 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 控制节拍 { 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_tab[i];

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_tab[i ], n=music_tab[i ];} //取频率常数 和 节拍常数 tr0=1; //开定时器1

while(n!=0) p1=~p1,delay(m); //等待节拍完成, 通过p1口输出音频(可多声道哦!)

tr0=0; //关定时器1 } }