烽火社区

标题: 51 音乐播放实验(十二) [打印本页]

作者: liuyongpengedn 时间: 2015-1-17 08:11 AM
谢谢

作者: tcad007 时间: 2015-2-15 08:34 AM
谢谢

作者: wendy2009 时间: 2015-2-18 05:28 AM
顶

作者: 正点原子 时间: 2015-5-7 11:13 AM
标题: 51 音乐播放实验(十二)
[attach]10121[/attach]
这个实验实现利用单片机定时器,播放音乐.详情见
附件
平台:FDR51开发板
代码:
#include
#include"key.h"
/*************************************************************************
IO口宏定义区
**************************************************************************/
sbit beep="P3"^7;
/************************************************************************
音乐编码存储区
**************************************************************************/
unsigned char code SONG[] ={ //祝你平安
0x26,0x20,0x20,0x20,0x20,0x20,0x26,0x10,0x20,0x10,0x20,0x80,0x26,
0x20,0x30,0x20,0x30,0x20,0x39,0x10,0x30,0x10,0x30,0x80,0x26,0x0,
0x20,0x20,0x20,0x20,0x1c,0x20,0x20,0x80,0x2b,0x20,0x26,0x20,0x20,
0x20,0x2b,0x10,0x26,0x10,0x2b,0x80,0x26,0x20,0x30,0x20,0x30,0x20,
0x39,0x10,0x26,0x10,0x26,0x60,0x40,0x10,0x39,0x10,0x26,0x20,0x30,
0x20,0x30,0x20,0x39,0x10,0x6,0x10,0x26,0x80,0x26,0x20,0x2b,0x10,
0x2b,0x10,0x2b,0x20,0x30,0x10,0x39,0x10,0x26,0x10,0x2b,0x10,0x2b,
0x20,0x2b,0x40,0x40,0x20,0x20,0x10,0x20,0x10,0x2b,0x10,0x26,0x30,
0x30,0x80,0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,0x40,0x26,
0x20,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,0x20,0x80,
0x1c,0x20,0x1c,0x20,0x1c,0x20,0x30,0x20,0x30,0x60,0x39,0x10,0x30,
0x10,0x20,0x20,0x2b,0x10,0x26,0x10,0x2b,0x10,0x26,0x10,0x26,0x10,
0x2b,0x10,0x2b,0x80,0x18,0x20,0x18,0x20,0x26,0x20,0x20,0x20,0x20,
0x60,0x26,0x10,0x2b,0x20,0x30,0x20,0x30,0x20,0x1c,0x20,0x20,0x20,
0x20,0x80,0x26,0x20,0x30,0x10,0x30,0x10,0x30,0x20,0x39,0x20,0x26,
0x10,0x2b,0x10,0x2b,0x20,0x2b,0x40,0x40,0x10,0x40,0x10,0x20,0x10,
0x20,0x10,0x2b,0x10,0x26,0x30,0x30,0x80,0x00};
/***************************************************************
全局变量声明区
****************************************************************/
unsigned char Count="0";
/*********************************************************************
定时器0中断初始化函数
**********************************************************************/
void Time0_Init()
{
TMOD = 0x01;
IE = 0x82;
TH0 = 0xD8;
TL0 = 0xEF; //12MZ晶振，10ms
}
/*************************************************************************
定时器0中断处理函数
**************************************************************************/
void Time0_Int() interrupt 1
{
TH0 = 0xD8;
TL0 = 0xEF;
Count++; //长度加1
}
/*********************************************************************************
延时函数
**********************************************************************************/
void Delay_xMs(unsigned char x)
{
unsigned char i,j;
for( i =0;i < x;i++ )for( j =0;j<3;j++ );
}
/*********************************************************************************
放音子函数
参数：frequence 决定音乐声调的变量
length 决定某个音调播放的时间
*********************************************************************************/
void beeping(unsigned char frequence,unsigned char length)
{
TR0=1;
while(1)
{
beep = !beep;
Delay_xMs(frequence);
if ( length == Count )
{
Count = 0;
break;
}
}
TR0=0;
beep=1; //关蜂鸣器
}
/********************************************************************************
放音主函数
**********************************************************************************/
void Play_Song()
{
unsigned char Temp1,
key=0;
unsigned int Addr="0",
Count = 0; //中断计数器清0
while(1)
{
key=getch(); //按键扫描
if(key!=255)break; //若按下13，停止放音
Temp1 = SONG[Addr++];
if ( Temp1 == 0xFF ) //休止符
{
TR0 = 0;
Delay_xMs(100);
}
else
{
if ( Temp1 == 0x00 )return; //歌曲结束符
else beeping(Temp1,SONG[Addr++]);
}
}
}
/****************************************************
程序主函数
*****************************************************/
void main()
{
unsigned char k="0";
Time0_Init(); //初始化定时器0
while(1)
{
k=getch();
if(k!=255)Play_Song();
}
}

作者: santai543 时间: 2015-5-31 03:50 AM
qwqw

作者: 莫北 时间: 2015-8-24 12:20 PM
很好啊

作者: hnhy0394 时间: 2015-8-24 01:53 PM
顶

作者: ROMANU 时间: 2015-8-24 03:22 PM
看看

作者: wendy2009 时间: 2015-8-24 05:32 PM
谢谢

作者: tcad007 时间: 2015-8-24 06:24 PM
look! look!

作者: santai543 时间: 2015-8-24 07:11 PM
v

作者: tcad007 时间: 2015-8-24 09:23 PM
谢谢

作者: hnhy0394 时间: 2015-8-24 11:38 PM
下载看看

作者: picq 时间: 2015-8-25 02:27 AM
看看

作者: tcad007 时间: 2015-8-25 03:29 AM
看看是不是我要的

作者: cola123 时间: 2015-8-25 05:24 AM
路过看看

作者: tcad007 时间: 2015-8-25 08:03 AM
kankan

作者: zhang1986sc 时间: 2015-8-25 08:40 AM
看看学习一下

作者: qinhld 时间: 2015-11-18 01:56 AM
谢谢楼主！

作者: xiaoznic 时间: 2015-11-20 09:20 AM
很好!!

作者: 莫北 时间: 2015-12-22 11:38 AM
ergherherhger

作者: jiaia 时间: 2015-12-29 11:43 AM
看看

欢迎光临烽火社区 (https://bbs.cnecport.com/)