功能:
矩阵键盘输入定时,Enter键确认,Clear键清零;
定时结束后自动停止,End键可提前停止。
工具:
Proteus、Keil。
原理图:
源代码:
#include <reg51.h>
/**定义音符频率**/
#define C3 131
#define C35 139
#define D3 147
#define D35 156
#define E3 165
#define F3 175
#define F35 185
#define G3 196
#define G35 208
#define A3 220
#define A35 233
#define B3 247
#define C4 262
#define C45 277
#define D4 294
#define D45 311
#define E4 330
#define F4 349
#define F45 370
#define G4 392
#define G45 415
#define A4 440
#define A45 466
#define B4 494
#define C5 523
#define C55 554
#define D5 587
#define D55 622
#define E5 659
#define F5 689
#define F55 740
#define G5 784
#define G55 831
#define A5 880
#define A55 932
#define B5 988
#define C6 1047
#define C65 1109
#define D6 1175
#define D65 1245
#define E6 1319
#define F6 1397
#define F65 1480
#define G6 1568
#define G65 1661
#define A6 1760
#define A65 1865
#define B6 1976
#define C7 2093
#define C75 2217
#define D7 2349
#define D75 2489
#define E7 2637
#define F7 2794
#define F75 2960
#define G7 3136
#define G75 3322
#define A7 3520
#define A75 3729
#define B7 3951
#define C8 4186
/**定义接口**/
sbit L0 = P1^0;
sbit L1 = P1^1;
sbit L2 = P1^2;
sbit L3 = P1^3;
sbit O = P3^7;
sbit S = P1^4;
/**定义数组**/
unsigned char code list[] = {0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90};
unsigned int code music[] = {
A55,G55,F5,D55,F5,D55,/**/F5,G55,F5,C55,/**/A55,G55,A55,C6,C65,C6,/**/A55,C55,C5,A45,/**/
A55,G55,F5,D55,F5,D55,/**/F5,G55,F5,C55,/**/A55,G55,A55,C6,C65,C6,/**/A55,F4,G45,A45,C5,C55,D55,F5,/**/A55,F4,A45,C5,D5,/**/
F5,D55,F5,A55,F5,D55,F5,D55,/**/F5,D55,F5,A55,F5,D55,F5,/**/F5,D55,F5,A55,F5,D55,F5,D55,F5,G55,F5,D55,/**/F5,D55,F5,G55,A55,/**/
F5,D55,F5,A55,F5,D55,F5,D55,/**/F5,D55,F5,A55,F5,D55,F5,/**/F5,D55,F5,A55,F5,D55,C6,A55,C6,D65,C65,C6,/**/C6,C6,C65,/**/
F5,D55,F5,A55,F5,D55,F5,D55,/**/F5,D55,F5,A55,F5,D55,F5,/**/F5,D55,F5,A55,F5,D55,F5,D55,F5,G55,F5,D55,/**/F5,D55,F5,G55,A55,/**/
F5,D55,F5,A55,F5,D55,F5,D55,/**/F5,D55,F5,A55,F5,D55,F5,/**/F5,D55,F5,A55,F5,D55,C6,A55,C6,D65,C65,C6,/**/C6,C6,C65,F7,C75,C7,A65,F6,C65,C6,A55,/**/
A55,F5,D55,F5,G55,F5,D55,F5,/**/G55,D55,F5,G55,A55,/**/D65,C6,A55,G55,A55,G55,F5,D55,F5,G55,D55,/**/F5,A55,G55,D55,F5,A55,G55,D55,F5,/**/
F5,D55,F5,A55,F5,G55,F5,D55,F5,/**/F5,D55,F5,A55,G55,D55,F5,D55,F5,/**/F5,D55,F5,A55,F5,D55,F5,A55,C6,A55,F5,A55,C6,A55,F5,A55,/**/C65,C6,F5,C6,C65,C6,F5,C6,C65,C6,F5,C6,C65,C6,F5,C6,/**/
C75,C7,F6,C7,C75,C7,F6,C7,C75,C7,F6,C7,C75,C7,F6,C7,/**/F35,D55,C55,D55,G55,F5,D55,/**/G35,D55,C55,D55,G55,F5,D55,/**/A35,D55,C55,D55,G55,F5,D55,/**/
A35,D55,F5,D55,C5,A45,C5,A45,F4,G45,F4,D45,F4,/**/F35,D55,C55,D55,G55,F5,D55,/**/G35,D55,C55,D55,G55,F5,D55,/**/A35,F5,C55,C5,C55,C5,A45,F4,G45,/**/
F4,F4,G45,F4,A45,F4,A45,D45,F4,/**/F35,D55,C55,D55,G55,F5,D55,/**/G35,D55,C55,D55,G55,F5,D55,/**/A35,D55,C55,D55,G55,F5,D55,/**/
A35,C55,C5,C55,C5,C55,C5,C55,C5,/**/F35,D55,A45,C55,D55,G55,F5,D55,C55,/**/G35,D55,C55,A45,C55,G55,F5,D55,C55,/**/A35,A45,D55,C55,C5,D55,C5,A45,F4,/**/
A45,G45,A45,F4,G45,A45,F4,A45,F4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/
F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/F6,C6,C65,F5,F7,C4,C45,C4,F6,C6,C65,F5,F7,C4,C45,C4,/**/
};
unsigned int code beat[] = {
2,2,2,2,4,4,/**/8,2,2,4,/**/2,2,2,2,4,4,/**/4,2,2,8,/**/
2,2,2,2,4,4,/**/8,2,2,4,/**/2,2,2,2,4,4,/**/2,2,2,2,2,2,2,2,/**/2,2,2,2,8,/**/
1,1,1,2,1,2,4,4,/**/1,1,1,2,1,2,8,/**/1,1,1,2,1,2,1,1,1,2,1,2,/**/2,2,2,2,8,/**/
1,1,1,2,1,2,4,4,/**/1,1,1,2,1,2,8,/**/1,1,1,2,1,2,1,1,1,2,1,2,/**/4,2,10,/**/
1,1,1,2,1,2,4,4,/**/1,1,1,2,1,2,8,/**/1,1,1,2,1,2,1,1,1,2,1,2,/**/2,2,2,2,8,/**/
1,1,1,2,1,2,4,4,/**/1,1,1,2,1,2,8,/**/1,1,1,2,1,2,1,1,1,2,1,2,/**/4,2,2,1,1,1,1,1,1,1,1,/**/
2,2,2,2,2,2,2,2,/**/2,2,2,2,8,/**/2,2,2,2,2,1,1,1,1,1,1,/**/2,2,2,2,2,1,2,1,2,/**/
2,1,2,1,2,2,2,2,2,/**/2,1,2,1,1,1,4,2,2,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/2,1,1,4,2,2,4,/**/2,1,1,4,2,2,4,/**/1,1,1,5,2,2,4,/**/
1,1,1,1,1,1,1,2,1,1,1,2,2,/**/4,2,2,2,2,2,2,/**/4,2,2,2,2,2,2,/**/2,2,2,2,2,1,3,1,1,/**/
4,2,2,2,1,2,1,1,1,/**/2,1,1,4,2,2,4,/**/2,1,1,6,1,1,4,/**/2,1,1,6,1,1,4,/**/
2,1,1,2,2,2,2,2,2,/**/1,1,1,2,5,1,1,2,2,/**/1,1,1,3,4,1,1,2,2,/**/2,1,1,4,1,1,2,2,2,/**/
1,3,1,2,1,2,2,2,2,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/
1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,/**/
};
/**定义变量**/
bit lock = 0,flag = 0;
unsigned char row,col,value,key,H,L,k = 0;
unsigned int i,j,t,count = 0,num = 0;
unsigned int leng = sizeof(music)/sizeof(music[0]);
unsigned int leng2 = sizeof(beat)/sizeof(beat[0]);
unsigned long speed;
/**延时函数**/
void delay(int x){
for(x;x > 0;x--);
}
/**显示函数**/
void display(){
switch(k){
case 0: L3 = 0;P0 = list[num%10];L0 = 1;delay(100);k++;break;
case 1: L0 = 0;P0 = list[num/10%10];L1 = 1;delay(100);k++;break;
case 2: L1 = 0;P0 = list[num/10/10%10];L2 = 1;delay(100);k++;break;
case 3: L2 = 0;P0 = list[num/10/10/10];L3 = 1;delay(100);k = 0;break;
default:break;
}
}
/**键盘扫描中断函数**/
void keyboard_scan() interrupt 0{
col = P2;
P2 = 0x0F;
row = P2;
value = row | col;
switch(value){
case 0xD7: key = 0;break;
case 0xEB: key = 1;break;
case 0xDB: key = 2;break;
case 0xBB: key = 3;break;
case 0xED: key = 4;break;
case 0xDD: key = 5;break;
case 0xBD: key = 6;break;
case 0xEE: key = 7;break;
case 0xDE: key = 8;break;
case 0xBE: key = 9;break;
case 0x77: key = 10;break;
case 0x7D: key = 11;break;
case 0x7E: key = 12;break;
default:break;
}
if(lock == 0){
if(key >= 0 && key <= 9){
if(num == 0)
num = key;
else
num = num * 10 + key;
if(num > 3600)
num = 0;
}
if(key == 11){
num = 0;
}
}
if(key == 10){
lock = 1;
TR0 = 1;
}
P2 = 0xF0;
}
/**定时中断函数**/
void time_count() interrupt 1{
TH0 = (65536 - 50000) / 256;
TL0 = (65536 - 50000) % 256;
count++;
if(count == 20){
count = 0;
num--;
}
if(num == 0){
lock = 0;
num = 120;
TR1 = 1;
if(flag == 1){
key = 12;
// TR0 = 0;
}
flag = 1;
}
if(key == 12){
TR0 = 0;
flag = 1;
}
}
/**蜂鸣器中断函数**/
void sound() interrupt 3{
TH1 = H;
TL1 = L;
O = ~O;
}
/**主函数**/
void main(){
TMOD = 0x11; //工作方式1
TH0 = (65536 - 50000) / 256;
TL0 = (65536 - 50000) % 256; //定时器0装入初值(50ms)
IT0 = 1; //INT0边缘触发
EX0 = 1;
ET0 = 1;
ET1 = 1;
EA = 1; //开中断
if(leng != leng2){
S = 0;
}
while(flag == 0){
P2 = 0xF0;
display();
}
P0 = 0xC0;
P1 = 0xFF;
for(i = 0;i < leng;i++){
TR1 = 1;
if(key == 12)
break;
if(i < 49)
speed = 187500; //以四分音符为一拍,一分钟80拍
else
speed = 160000;
t = speed / 12;
if(music[i] != 0){
H = (65536 - 500000 / music[i])/256;
L = (65536 - 500000 / music[i])%256;
}
else{
TR1 = 0;
}
for(j = 0;j < beat[i];j++){
delay(t);
}
TR1 = 0;
delay(1000);
TR1 = 1;
}
flag = 0;
TR0 = 0;
TR1 = 0;
num = 0;
}
后话:
本文档源于单片机课程设计,如有疑问欢迎讨论。