51单片机电子琴设计C语言程序实例

#define uchar unsigned char //定义一下方便使用
#define uint unsigned int
#define ulong unsigned long
#include //包括一个 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;
}
}
/*******************************新的好用的电子琴*************************/
#include
#include
#include

#define uchar unsigned char
//#define uchar unsigned char //定义一下方便使用
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P3^0;
uchar rr;
uchar k;
uchar keydata;
uchar th0_f; //在中断中装载的 T0 的值高 8 位
uchar tl0_f; //在中断中装载的 T0 的

值低 8 位

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 key_scan(void); //键盘函数定义段；
uchar key_tab(uchar k);
void delay(void);
void key_in(uchar k);
code unsigned char ledmap[] = {0x3F, 0x06, 0x5B, 0x4F, 0x66,
0x6D, 0x7D, 0x07, 0x7F, 0x6F,0x77,0x7c,0x39,0x5e,0x79,0x71,0x40,0x00}; //8段显示

//---------------------------------------------------------------
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)
{ P2=0x00;
key_scan();
tl0_f=freq[jie8[keydata]*2]; //置一个音符的值
th0_f=freq[jie8[keydata]*2+1];
TR0 = 1;


//延时

P0=ledmap[keydata];
}
}//---------------------------------------------------------------------------------------------

void key_scan(void)
{ uchar sccode,recode,i;
P1=0xf0;
if((P1&0xf0)!=0xf0)
{
delay();
if((P1&0xf0) !=0xf0)
{
sccode=0xfe;
for(i=0;i<4;i++)
{
P1=sccode;
if((P1&0xf0) !=0xf0)
{
recode=(P1&0xf0)|0x0f;
k=(~recode)+(~sccode);
rr=P1;

key_in(k);
break;
}
else
sccode=(sccode<<1)|0x01;
}
}

}
//do {ta=P2;}while(ta==rr);
}
void delay() //去抖动
{int a=2500;
while(--a);
}

void key_in(ucha

r k)
{ uchar ta;
//uchar keydata;

do {ta=P1;}while(ta==rr);
keydata=key_tab(k);
}



//-------------------------------------------------------------
uchar key_tab(uchar k)
{ uchar kb;
switch(k)
{ case 0x11:kb=0x0c;break;
case 0x21:kb=0x0d;break;
case 0x41:kb=0x0e;break;
case 0x81:kb=0x0f;break;
case 0x12:kb=0x08;break;
case 0x22:kb=0x09;break;
case 0x42:kb=0x0a;break;
case 0x82:kb=0x0b;break;
case 0x14:kb=0x04;break;
case 0x24:kb=0x05;break;
case 0x44:kb=0x06;break;
case 0x84:kb=0x07;break;
case 0x18:kb=0x00;break;
case 0x28:kb=0x01;break;
case 0x48:kb=0x02;break;
case 0x88:kb=0x03;break;
default :kb=0x00;break;
}
return kb;
}