单片机演奏音乐程序

tonytong

单片机演奏音乐程序 [复制链接]

/************************************************************************
*****music.c
*****created by zhangyongchang
*****date 2006 4.5
/**********************************************************************/
#include
unsigned char m; //m为频率常数
unsigned char n=0; //n为节拍常数
unsigned char i=0;
sbit bell=P1^1;
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 time0(void) interrupt 1 using 1 //产生10MS精确定时
{ TH0=(65536-10000)/256;
TL0=(65536-10000)%256;
n--;
}
void delayms(unsigned char a) //微秒延时程序
{
while(--a);
}
void delay(void) //延迟程序
{
int i,j;
for(i=50;i--;i>0)
for(j=10000;j--;j>0)
;
}
void main()
{

TMOD=(TMOD&0xf0)|0x01;
TH0=(65536-10000)/256;
TL0=(65536-10000)%256;
EA=1;
ET0=1;
TR0=0;
while(1)
{
switch(music_tab)
{
case 0x00:
i=0;delay(); break; // 曲终停顿一定时间
case 0xff:
i=i+1;delayms(100);break; //遇到休止符停顿一定时间100微秒,再取下一个频率
default:
m=music_tab[i++];n=music_tab[i++];//取频率到m，取节拍到n

TR0=1;
while(n!=0)
{
bell=!bell;
delayms(4*m);//调整产生的频率，可以通过在m前的值来修正音调的高低

}
TR0=0;
}
}
}

newbedeng

好东西好东西，谢谢楼主的分享。

guoyuanqiang

演凑音乐