找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 1890|回复: 1
打印 上一主题 下一主题
收起左侧

单片机音乐盒程序

[复制链接]
跳转到指定楼层
楼主
ID:393275 发表于 2018-9-4 10:04 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
#include<reg52.h>
#define uint unsigned int
#define uchar unsigned char
sbit BUZZER=P1^0;//蜂鸣器输出
uchar th0,tl0; //定时器0赋值变量
uchar start_; //返回变量
uint code Note[]={0,64580,64684,64777,64820,64898,64968,65030,/*中音*/
63628,63853,64021,64103,64260,64400,64524,/*低音*/
65058,65110,65157,65178,65217,65252,65282/*高音*/}; /*************************************************************************
音普规则:
1、音普由一个字节十六进制数组成
2、高4位代表节拍,一拍约400MS,将一拍分成8份
3、低4位代表音符,一一对应Note[]列表
4、0x20代表歌曲结束符
**************************************************************************/
uchar code Xiaopingguo[]={
0x83,0x81,0x82,0x6d,0x43,0x42,0x41,0x42,0x8d,0x8d,0x40, /*你是我的小呀小苹果*/
0x83,0x81,0x82,0x82,0x45,0x43,0x8e,0x81,0x40,
/*怎么爱你都不嫌多*/
0x41,0x4e,0x8d,0x4e,0x41,0x82,0x8c,0x46,0x45,0x83,0x83,0x43,0x40, /*红红的小脸温暖我的心窝*/
0x42,0x81,0x42,0x43,0x42,0x43,0x42,0x23,0x25,0x85,0x30,0x45,0x10,0x45,0x30,0x45,0x10,0x45,0x30,0x85,0x85,0x85,0x40,
/*点亮我生命的火 火火 火火 火*/
0x83,0x81,0x82,0x6d,0x43,0x42,0x41,0x42,0x8d,0x8d,0x40, /*你是我的小呀小苹果*/
0x83,0x81,0x82,0x82,0x45,0x43,0x8e,0x81,0x40,
/*就像天边最美丽的云朵*/
0x41,0x4e,0x8d,0x4e,0x41,0x82,0x8c,0x46,0x45,0x83,0x83,0x43,0x40, /*春天又来到了花开满山坡*/
0x42,0x81,0x42,0x43,0x82,0x8c,0x8d,0x4d,0x41,0x8d,0x20 /*种下希望就会收获*/
};
uchar code mamahao[]={              //世上只有妈妈好
//世上只有妈妈好
0x68,0x52,0x34,0x54,0x84,0x62,0x52,0x68,
//世上只有妈妈好
0x34,0x52,0x62,0x54,0x34,0x12,0xc2,0x52,0x32,0x28,
//有妈的孩子像个宝
0x24,0x32,0x54,0x52,0x62,0x34,0x24,0x18,
//投进了妈妈的怀抱
0x54,0x32,0x22,0x12,0xc2,0x12,0xb8,0x04,0xff,
//幸福享不了
};
uchar code tiger[]={//两只老虎
0x14,0x24,0x34,0x14,0x14,0x24,0x34,0x14,
//两只老虎两只老虎
0x34,0x44,0x58,0x34,0x44,0x58,
//跑得快跑得快
0x52,0x61,0x52,0x41,0x34,0x14,0x52,0x61,0x52,0x41,0x34,0x14,
//一只没有眼睛一只没有尾巴
0x14,0xb4,0x18,0x14,0xb4,0x18,0xff,
//真奇怪真奇怪
};



//----延时子程序--------------------------------------------------
void Delay(uint xms)
{
uint j;
for(;xms>0;xms--)
for(j=110;j>0;j--);
}
//---------------------------------------------------------------

//----定时器变量赋值---------------------------------------------
void Timer_Set(uchar num)
{
th0=Note[num]/256;
tl0=Note[num]%256;
}
//---------------------------------------------------------------
//----系统初始化-------------------------------------------------
void Init()
{
BUZZER = 1; //关闭蜂鸣器
TMOD = 0x01; //定时器0工作方式1
TR0 = 1; //启动定时器
ET0 = 1; //定时器0溢出中断使能
EA = 1; //总中断使能
start_ = 0; //返回变量初始化
}
//---------------------------------------------------------------
//----按键扫描---------------------------------------------------
void Key_Scan()
{
P0 = 0x0f;
if(P0!=0x0f)
{

Delay(5);
if(P0!=0x0f)
{
P0=0xfe;
if(P0==0xee){Timer_Set(8);} //按键1被按下
else if(P0==0xde){Timer_Set(12);}//按键5被按下
else if(P0==0xbe){Timer_Set(2);} //按键9被按下
else if(P0==0x7e){Timer_Set(6);} //按键13被按下
else;
P0=0xfd;
if(P0==0xed){Timer_Set(9);} //按键2被按下
else if(P0==0xdd){Timer_Set(13);}//按键6被按下
else if(P0==0xbd){Timer_Set(3);} //按键10被按下
else if(P0==0x7d){Timer_Set(7);} //按键14被按下
else;
P0=0xfb;
if(P0==0xeb){Timer_Set(10);} //按键3被按下
else if(P0==0xdb){Timer_Set(14);}//按键7被按下
else if(P0==0xbb){Timer_Set(4);} //按键11被按下
else if(P0==0x7b){Timer_Set(15);}//按键15被按下
else;
P0=0xf7;
if(P0==0xe7){Timer_Set(11);} //按键4被按下
else if(P0==0xd7){Timer_Set(1);} //按键8被按下
else if(P0==0xb7){Timer_Set(5);} //按键12被按下
else if(P0==0x77){Timer_Set(1);} //按键16被按下
else;
}
}
else
{
th0=0;
}
}
//---------------------------------------------------------------
//----主程序-----------------------------------------------------
void main()
{
uchar temp,yinpu,jiepai;
Init();
while(1)
{
start:
temp=0;
while(Xiaopingguo[temp]!=0x20)
{
jiepai=Xiaopingguo[temp]>>4; //获取节拍
yinpu=Xiaopingguo[temp]&0x0F; //获取音普
Timer_Set(yinpu);
Delay(jiepai*50);
temp++;
P0 = 0x0f;
if(P0!=0x0f)goto out;
}
out:
th0 = 0;
BUZZER = 1;//关闭蜂鸣器
while(1)
{
Key_Scan();
if(start_==1)
{
start_=0;
goto start;
}
}
}
}
//---------------------------------------------------------------
//----定时器0中断服务程序----------------------------------------
void Timer0() interrupt 1
{

TH0 = th0;
TL0 = tl0;
if(th0==0)BUZZER=1; //判断停顿,有停顿不发音
else{BUZZER = ~BUZZER;} //无停顿发音
}
//----------------------------------------------------------------

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:1 发表于 2018-9-6 05:51 | 只看该作者
补全原理图或者详细说明一下电路连接即可获得100+黑币
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表