用51單片機演奏義勇軍進行曲

用51單片機演奏義勇軍進行曲

源代碼

#include<reg51.h> 
sbit Buzz = P1^5; //聲明綁定蜂鳴器
unsigned int code NoteFrequ[]={   
	523,587,659,698,784,880,988,    //中音對應的1-7  
	1047,1175,1319,1397,1568,1760,1976,	//高音對應的1-7
	262,294,330,349,392,440,494};  //低音對應的1-7

unsigned int code NoteReload[]={ //中音1-7和高音1-7對應的定時器重載值
	65536 - (11059200/12) /(523*2),//中音1-7  
	65536 - (11059200/12) /(587*2),  
	65536 - (11059200/12) /(659*2),
	65536 - (11059200/12) /(698*2),
	65536 - (11059200/12) /(784*2),  
	65536 - (11059200/12) /(880*2),
	65536 - (11059200/12) /(988*2),
	65536 - (11059200/12) /(1047*2),//高音1-7  
	65536 - (11059200/12) /(1175*2),  
	65536 - (11059200/12) /(1319*2),  
	65536 - (11059200/12) /(1397*2),
	65536 - (11059200/12) /(1568*2),
	65536 - (11059200/12) /(1760*2),
	65536 - (11059200/12) /(1976*2),
	65536 - (11059200/12) /(262*2), //低音1-7
	65536 - (11059200/12) /(294*2),
	65536 - (11059200/12) /(330*2),
	65536 - (11059200/12) /(349*2),
	65536 - (11059200/12) /(392*2),
	65536 - (11059200/12) /(440*2),
	65536 - (11059200/12) /(494*2)};

bit enable = 1; //發聲使能表標識
bit tmrflay = 0; //定時器中中斷完成標識

unsigned char T0RH = 0xff; //T0重載值高字節
unsigned char T0RL = 0x00; //T0重載值低字節

void PlayTwoTiger(); void main()
{   
	unsigned int i;
    EA = 1;
	TMOD =0x01;  //模式1	
	TH0 = T0RH;
	TL0 = T0RL;  
	ET0 = 1;  //使能T0中斷
    TR0 = 1;  //啓動
    while(1)
	{  
		PlayTwoTiger();
		for(i=0;i<40000;i++); 
    }
}


/**音樂函數**/
void PlayTwoTiger()
{
	unsigned char beat;    //節拍索引
	unsigned char note;    //節拍對應音符
	unsigned int time=0;   //節拍計時
	unsigned int beattime=0;  //總時間計時
	unsigned int soundtime=0; //沒拍發聲計時
	unsigned char code PlayTwoTigerNote[]={ //音符表
		19,1,1,1,1,19,20,21,1,1,
		3,1,2,3,5,5,
		3,3,1,3,5,3,2,2,
		6,5,2,3,5,3,5,3,2,3,1,2,3,
		5,20,1,1,3,3,5,5,2,2,2,20,20,2,
		19,1,1,3,3,5,
		1,3,5,5,6,5,
		3,1,5,5,5,3,1,
		19,1,
		3,1,5,5,5,3,1,
		19,1,19,1,19,1,1
		};  
	unsigned char code PlayTwoBeat[]={  //節拍表,4表示一拍，1表示1/4拍,8表示兩拍
		2,6,2,3,1,2,1,1,4,4,
		2,2,1,1,4,4,
		3,1,3,1,3,1,4,8,
		4,4,4,4,2,4,2,2,1,1,3,1,8,
		3,1,2,2,3,1,3,1,1,1,1,3,1,6,
		2,6,2,6,2,8,
		3,1,3,1,4,4,
		3,1,1,1,1,4,4,
		4,4,
		3,1,1,1,1,4,4,
		4,4,4,4,4,4,4
		};   
	for(beat=0; beat<sizeof(PlayTwoTigerNote);) //節拍索引循環變量
	{		   
		while(!tmrflay);   //每次定時器中斷完成 節拍處理 
		tmrflay = 0;       
		if(time == 0)      //節拍播放完成重啓
		{
			note = PlayTwoTigerNote[beat]-1;
			T0RH = NoteReload[note]>>8;
			T0RL = NoteReload[note];     //計算總時間,右移2位等於除4,移位代替除法加快速度
			beattime = (PlayTwoBeat[beat]*NoteFrequ[note])>>2;   //計算髮聲時間,爲總時間的0.75s
			soundtime =beattime - (beattime>>2);  
			enable = 1;  //開始發聲  
			time++;   
		}
		else    //節拍播放未結束，則繼續處理
		{
			if(time >= beattime) //當前時間清零  
			{
				time = 0;     //準備重新啓動
				beat++;   
			}
			else      //累加時間
			{
				time++;   
				if(time == soundtime)    //發聲時間到達；關閉蜂鳴器
				{
					enable =0;      //用以區分連續兩個節拍  
				}
			}  
		}
	}
}

void InterRupt() interrupt 1   //中斷服務
{
	TH0 =T0RH;
	TL0 =T0RL;
	tmrflay = 1;
	if(enable)
	{  
		Buzz=~Buzz;
	}
	else
	{   
		Buzz=1;
	}
}