#define uchar unsigned char //定義一下方便使用
#define uint  unsigned int
#define ulong unsigned long
#include <reg52.h>     //包括一個52標準內核的頭文件

char code dx516[3] _at_ 0x003b;//這是為了仿真設置的

sbit    BEEP=P1^7; //喇叭輸出腳
sbit K1= P3^2;	   
sbit K2= P3^5;	
sbit K3= P2^4;	   
sbit K4= P2^5;  

uchar th0_f; //在中斷中裝載的T0的值高8位
uchar tl0_f; //在中斷中裝載的T0的值低8位

//T0的值,及輸出頻率對照表
uchar code freq[36*2]={
	0xA9,0xEF,//00220HZ ,1	 //0
	0x93,0xF0,//00233HZ ,1#
	0x73,0xF1,//00247HZ ,2
	0x49,0xF2,//00262HZ ,2#
	0x07,0xF3,//00277HZ ,3
	0xC8,0xF3,//00294HZ ,4
	0x73,0xF4,//00311HZ ,4#
	0x1E,0xF5,//00330HZ ,5 
	0xB6,0xF5,//00349HZ ,5#
	0x4C,0xF6,//00370HZ ,6
	0xD7,0xF6,//00392HZ ,6#
	0x5A,0xF7,//00415HZ ,7    
	0xD8,0xF7,//00440HZ 1     //12
	0x4D,0xF8,//00466HZ 1#    //13
	0xBD,0xF8,//00494HZ 2     //14
	0x24,0xF9,//00523HZ 2#    //15
	0x87,0xF9,//00554HZ 3     //16
	0xE4,0xF9,//00587HZ 4     //17
	0x3D,0xFA,//00622HZ 4#    //18
	0x90,0xFA,//00659HZ 5     //19
	0xDE,0xFA,//00698HZ 5#    //20
	0x29,0xFB,//00740HZ 6     //21
	0x6F,0xFB,//00784HZ 6#    //22
	0xB1,0xFB,//00831HZ 7     //23
	0xEF,0xFB,//00880HZ `1
	0x2A,0xFC,//00932HZ `1#
	0x62,0xFC,//00988HZ `2
	0x95,0xFC,//01046HZ `2#
	0xC7,0xFC,//01109HZ `3
	0xF6,0xFC,//01175HZ `4
	0x22,0xFD,//01244HZ  `4#
	0x4B,0xFD,//01318HZ `5
	0x73,0xFD,//01397HZ `5#
	0x98,0xFD,//01480HZ `6
	0xBB,0xFD,//01568HZ `6#
	0xDC,0xFD,//01661HZ `7	   //35
};

//定時中斷0,用于產生唱歌頻率
timer0() interrupt 1 
{
    TL0=tl0_f;TH0=th0_f;  //調入預定時值
    BEEP=~BEEP;           //取反音樂輸出IO
}

//按鍵控制音階聲音輸出（電子琴）
void main(void)	// 主程序
{
	ulong n;

	uchar code jie8[8]={12,14,16,17,19,21,23,24};//1234567`1八個音符在頻率表中的位置

	TMOD = 0x01;  //使用定時器0的16位工作模式
	TR0 = 0;
	ET0 = 1;
	EA = 1;

	while(1)
	{
		 if(!K1)
		 {	
			tl0_f=freq[jie8[0]*2];	  //置一個音符的值
			th0_f=freq[jie8[0]*2+1];
			TR0 = 1;
		 	for(n=0;n<10000;n++);	//延時
		 }
		 if(!K2)
		 {	
			tl0_f=freq[jie8[1]*2];	  //置一個音符的值
			th0_f=freq[jie8[1]*2+1];
			TR0 = 1;
		 	for(n=0;n<10000;n++);	//延時
		 }
		 if(!K3)
		 {	
			tl0_f=freq[jie8[2]*2];	  //置一個音符的值
			th0_f=freq[jie8[2]*2+1];
			TR0 = 1;
		 	for(n=0;n<10000;n++);	//延時
		 }
		 if(!K4)
		 {	
			tl0_f=freq[jie8[3]*2];	  //置一個音符的值
			th0_f=freq[jie8[3]*2+1];
			TR0 = 1;
		 	for(n=0;n<10000;n++);	//延時
		 }
		 TR0 = 0;
	}
}