单片机定时音乐播放器

功能:

矩阵键盘输入定时,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;
}

后话:

本文档源于单片机课程设计,如有疑问欢迎讨论。
在这里插入图片描述

  • 4
    点赞
  • 18
    收藏
    觉得还不错? 一键收藏
  • 6
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 6
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值