找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机多首歌曲播放演示

[复制链接]
跳转到指定楼层
楼主
没有办法,电路图压缩一份上来!

下面是源码:

#include<reg52.h>
#define uchar        unsigned char   
#define uint    unsigned int
uint Fre;
sbit spk=P3^4;
sbit sw=P1^0;

void delay(uint mS)

uint code FreTab_Low[7]   = {262,294,330,349,392,440,494};            //低音频率表
uint code FreTab_Mid[7]   = {523,578,659,698,784,880,988};            //中音频率表
uint code FreTab_Hight[7] = {1046,1175,1318,1397,1568,1760,1976};        //高音频率表

//------------------------      大海啊故乡
uchar code  Happy_Birthday1[]={
    0x11,0x04,0x12,0x04,0x11,0x0a,0x07,0x02,
0x06,0x02,0x05,0x04,0x13,0x04,0x13,0x0f,0x13,0x04,0x14,0x04,
0x13,0x0a,0x12,0x02,0x11,0x02,0x06,0x04,0x12,0x04,0x12,0x0f,
0x07,0x04,0x11,0x04,0x07,0x0a,0x06,0x02,0x05,0x02,0x05,0x04,
0x12,0x04,0x12,0x0f,0x14,0x0a,0x13,0x04,0x11,0x04,0x06,0x04,
0x11,0x18,0x15,0x04,0x16,0x04,0x15,0x0a,0x13,0x04,0x15,0x04,
0x16,0x04,0x15,0x0f,0x16,0x04,0x15,0x04,0x14,0x04,0x11,0x02,
0x11,0x02,0x16,0x04,0x15,0x04,0x15,0x18,0x13,0x04,0x14,0x04,
0x13,0x0a,0x12,0x02,0x11,0x02,0x06,0x04,0x12,0x04,0x12,0x0f,
0x14,0x04,0x15,0x04,0x14,0x04,0x13,0x04,0x11,0x04,0x06,0x04,
0x11,0x18,0x15,0x04,0x16,0x04,0x15,0x0a,0x13,0x04,0x15,0x04,
0x16,0x04,0x15,0x0f,0x16,0x04,0x15,0x04,0x14,0x04,0x11,0x02,
0x11,0x02,0x16,0x04,0x15,0x04,0x15,0x18,0x13,0x04,0x14,0x04,
0x13,0x0a,0x12,0x02,0x11,0x02,0x06,0x04,0x12,0x04,0x12,0x0f,
0x14,0x04,0x15,0x04,0x14,0x04,0x13,0x04,0x11,0x04,0x06,0x04,
0x11,0x18,0x00,0x00};
//----------------------     祝你生日快乐
uchar code Happy_Birthday2[]={0x11,0x05,0x11,0x05,0x12,0x0a,
0x11,0x0a,0x14,0x0a,0x13,0x14,0x11,0x05,0x11,0x05,0x12,0x0a,
0x11,0x0a,0x15,0x0a,0x14,0x14,0x11,0x05,0x11,0x05,0x21,0x0a,
0x16,0x0a,0x14,0x0a,0x13,0x0a,0x22,0x0a,0x17,0x05,0x17,0x05,
0x16,0x0a,0x14,0x0a,0x15,0x0a,0x14,0x14,0x00,0x00};
//--------------------       辣妹子
uchar code Happy_Birthday3[]={0x16,0x04,0x13,0x02,0x15,0x02,
0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,0x13,0x02,0x15,0x02,
0x06,0x08,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,0x13,0x02,
0x15,0x02,0x16,0x04,0x16,0x04,0x06,0x08,0x16,0x04,0x13,0x02,
0x15,0x02,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,0x13,0x02,
0x15,0x02,0x06,0x08,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,
0x13,0x02,0x15,0x02,0x06,0x04,0x06,0x04,0x06,0x08,0x16,0x04,
0x13,0x02,0x15,0x02,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,
0x16,0x04,0x16,0x08,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,
0x13,0x02,0x15,0x02,0x13,0x04,0x13,0x04,0x06,0x08,0x16,0x04,
0x13,0x02,0x15,0x02,0x16,0x04,0x13,0x02,0x15,0x02,0x16,0x04,
0x16,0x04,0x16,0x08,0x11,0x04,0x15,0x02,0x13,0x02,0x13,0x02,
0x15,0x02,0x13,0x04,0x13,0x04,0x06,0x08,0x13,0x04,0x13,0x02,
0x13,0x02,0x16,0x04,0x16,0x04,0x16,0x18,0x16,0x0a,0x21,0x04,
0x13,0x04,0x13,0x04,0x03,0x08,0x00,0x00};
void Timer_init()
{
TMOD=0x11;
EA=1;
ET0=1;
ET1=0;
TR0=0;
TR1=0;
}
void Timer0_i() interrupt 1
{
TH0=Fre/256;
TL0=Fre%256;
if(spk==0)
spk=1;
else spk=0;
}
void spk_Play(uchar *spkTab)
{
uchar *pspk;
uchar temp,i;
pspk=spkTab;  //将歌曲首地址给指针变量
while(*pspk!=0)
{
if((*pspk&0xf0)==0x00)
Fre=65536-1000000/FreTab_Low[*pspk&0x0f];
else if((*pspk&0xf0)==0x10)
Fre=65536-1000000/FreTab_Mid[*pspk&0x0f];
else if((*pspk&0xf0)==0x20)
Fre=65536-1000000/FreTab_Hight[*pspk&0x0f];
TH0=Fre/256;
TL0=Fre%256;
TH1=0x3c;           
TL1=0xb0;
pspk++;           //获得节拍值
temp=*pspk;
TR0=1;
TR1=1;
for(i=0;i<temp;i++)
{
while(TF1==0);
TH1=0x3c;
TL1=0xb0;
TF1=0;
}
pspk++;
}
}
void main()
{
while(1)
{
int k;
Timer_init();
if(sw==0)            
{
delay(10);               
if(sw==1)           
break;
while(sw==0);
{
k++;
if(k==1)spk_Play(Happy_Birthday1);
else if(k==2)spk_Play(Happy_Birthday2);
else if(k==3)spk_Play(Happy_Birthday3),k=0;
}
}
}
}
void delay(uint mS)
{
uint x,y;
for(x=mS;x>0;x--)
for(y=247;y>0;y--);
}


多首歌曲播放演示电路图.rar

46.67 KB, 下载次数: 16, 下载积分: 黑币 -5

评分

参与人数 1黑币 +15 收起 理由
sheng7533967 + 15 绝世好帖!

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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