KeilC51学习6控制播放⾳乐变频救护车
#include<reg52.h>//包含访问sfr库函数
#define uchar unsigned char //定义⼀下⽅便使⽤
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P1^0;
sbit K1=P3^2;
//变频声救护车报警信号输出试验
main()
{
uint n;
ulong ul;
while(1) //程序循环
{
//输出约 1 秒种⼀个频率的声⾳
for(ul=0;ul<3000;ul++)
{
for(n=0;n<80;n++); //延时
BEEP=~BEEP; //取反输出到喇叭的信号
}
//输出约 1 秒种另⼀个频率的声⾳
for(ul=0;ul<2500;ul++)
{
for(n=0;n<100;n++); //延时
BEEP=~BEEP; //取反输出到喇叭的信号
}
}
}
变频声救护车报警信号输出试验
⾳阶声⾳⾃动输出试验
#include<reg52.h>//包含访问sfr库函数
#define uchar unsigned char //定义⼀下⽅便使⽤
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P1^0;
uchar th0_f; //在中断中装载的 T0 的值⾼ 8 位
uchar tl0_f; //在中断中装载的 T0 的值低 8 位
//T0 的值，及输出频率对照表
uchar code freq[36*2]={
0xA9,0xEF,//00220HZ ,1 //0
0x93,0xF0,//00233HZ ,1#
0x73,0xF1,//00247HZ ,2
0x49,0xF2,//00262HZ ,2#
0x07,0xF3,//00277HZ ,3
0xC8,0xF3,//00294HZ ,4
0x73,0xF4,//00311HZ ,4#
0x1E,0xF5,//00330HZ ,5
0xB6,0xF5,//00349HZ ,5#
0x4C,0xF6,//00370HZ ,6
0xD7,0xF6,//00392HZ ,6#
0x5A,0xF7,//00415HZ ,7
0xD8,0xF7,//00440HZ 1 //12
0x4D,0xF8,//00466HZ 1# //13
0xBD,0xF8,//00494HZ 2 //14
0x24,0xF9,//00523HZ 2# //15
0x87,0xF9,//00554HZ 3 //16
0xE4,0xF9,//00587HZ 4 //17
0x3D,0xFA,//00622HZ 4# //18
0x90,0xFA,//00659HZ 5 //19
0xDE,0xFA,//00698HZ 5# //20
0x29,0xFB,//00740HZ 6 //21
0x6F,0xFB,//00784HZ 6# //22
0xB1,0xFB,//00831HZ 7 //23
0xEF,0xFB,//00880HZ `1
0x2A,0xFC,//00932HZ `1#
0x62,0xFC,//00988HZ `2
0x95,0xFC,//01046HZ `2#
0xC7,0xFC,//01109HZ `3
0xF6,0xFC,//01175HZ `4
0x22,0xFD,//01244HZ `4#
0x4B,0xFD,//01318HZ `5
0x73,0xFD,//01397HZ `5#
0x98,0xFD,//01480HZ `6
0xBB,0xFD,//01568HZ `6#
};
//定时中断 0,⽤于产⽣唱歌频率
timer0() interrupt 1
{
TL0=tl0_f;TH0=th0_f; //调⼊预定时值
BEEP=~BEEP; //取反⾳乐输出 IO
}
//⾳阶声⾳⾃动输出试验
void main(void) // 主程序
{
ulong n;
uchar i;
uchar code jie8[8]={12,14,16,17,19,21,23,24};//1234567`1 ⼋个⾳符在频率表中的位置 TMOD = 0x01; //使⽤定时器 0 的 16 位⼯作模式
TR0 = 1;
ET0 = 1;
EA = 1;
while(1)
{
for(i=0;i<8;i++) //循环播放 8 个⾳符
{
tl0_f=freq[jie8[i]*2]; //置⼀个⾳符的值
th0_f=freq[jie8[i]*2+1];
for(n=0;n<50000;n++); //延时 1 秒左右
}
}
}
//⾳阶声⾳⾃动输出试验
按键控制⾳阶声⾳输出（电⼦琴）
#include<reg52.h>//包含访问sfr库函数
#define uchar unsigned char //定义⼀下⽅便使⽤
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P1^0; //喇叭输出脚
sbit K1= P3^2;
sbit K2= P3^3;
sbit K3= P3^4;
sbit K4= P3^5;
uchar th0_f; //在中断中装载的 T0 的值⾼ 8 位
uchar tl0_f; //在中断中装载的 T0 的值低 8 位
//T0 的值，及输出频率对照表
uchar code freq[36*2]={
0xA9,0xEF,//00220HZ ,1 //0
0x93,0xF0,//00233HZ ,1#
0x73,0xF1,//00247HZ ,2
0x49,0xF2,//00262HZ ,2#
0x07,0xF3,//00277HZ ,3
0xC8,0xF3,//00294HZ ,4
0x73,0xF4,//00311HZ ,4#
0x1E,0xF5,//00330HZ ,5
0xB6,0xF5,//00349HZ ,5#
0x4C,0xF6,//00370HZ ,6
0xD7,0xF6,//00392HZ ,6#
0x5A,0xF7,//00415HZ ,7
0xD8,0xF7,//00440HZ 1 //12
0x4D,0xF8,//00466HZ 1# //13
0xBD,0xF8,//00494HZ 2 //14
0x24,0xF9,//00523HZ 2# //15
0x87,0xF9,//00554HZ 3 //16
0xE4,0xF9,//00587HZ 4 //17
0x3D,0xFA,//00622HZ 4# //18
0x90,0xFA,//00659HZ 5 //19
0xDE,0xFA,//00698HZ 5# //20
0x29,0xFB,//00740HZ 6 //21
0x6F,0xFB,//00784HZ 6# //22
0xB1,0xFB,//00831HZ 7 //23
0xEF,0xFB,//00880HZ `1
0x2A,0xFC,//00932HZ `1#
0x62,0xFC,//00988HZ `2
0x95,0xFC,//01046HZ `2#
0xC7,0xFC,//01109HZ `3
0xF6,0xFC,//01175HZ `4
0x22,0xFD,//01244HZ `4#
0x4B,0xFD,//01318HZ `5
0x73,0xFD,//01397HZ `5#
0x98,0xFD,//01480HZ `6
0xDC,0xFD,//01661HZ `7 //35
};
//定时中断 0,⽤于产⽣唱歌频率
timer0() interrupt 1
{
TL0=tl0_f;TH0=th0_f; //调⼊预定时值
BEEP=~BEEP; //取反⾳乐输出 IO
}
//按键控制⾳阶声⾳输出（电⼦琴）
void main(void) // 主程序
{
ulong n;
uchar code jie8[8]={12,14,16,17,19,21,23,24};//1234567`1 ⼋个⾳符在频率表中的位置
TMOD = 0x01; //使⽤定时器 0 的 16 位⼯作模式
TR0 = 0;
ET0 = 1;
EA = 1;
while(1)
{
if(!K1)
{
tl0_f=freq[jie8[0]*2]; //置⼀个⾳符的值
th0_f=freq[jie8[0]*2+1];
TR0 = 1;
for(n=0;n<10000;n++); //延时
}
if(!K2)
{
tl0_f=freq[jie8[1]*2]; //置⼀个⾳符的值
th0_f=freq[jie8[1]*2+1];
TR0 = 1;
for(n=0;n<10000;n++); //延时
}
if(!K3)
{
tl0_f=freq[jie8[2]*2]; //置⼀个⾳符的值
th0_f=freq[jie8[2]*2+1];
TR0 = 1;
for(n=0;n<10000;n++); //延时
}
if(!K4)
{
tl0_f=freq[jie8[3]*2]; //置⼀个⾳符的值
th0_f=freq[jie8[3]*2+1];
TR0 = 1;
for(n=0;n<10000;n++); //延时
}
TR0 = 0;
}
}
按键控制⾳阶声⾳输出（电⼦琴）
乐谱⽅式输⼊的⾳乐播放，仙剑奇侠传
乐谱解释函数，是逐个字符解释的。
html播放音乐代码 遇到拍⼦分隔符和空格跳过，判断是否⾼低⾳，读⾳符，调整为⾼低⾳⾳符，读⾳符后的升半个⾳符的“#”，读延长⾳“-”“.”，读缩短⼀半⾳长的“_”，字符串结束符“0x00”。请仔细领会这个函数。
奏乐函数就⽐较简单，基本上就是从数组中取出⾳符和时长，送⼊定时器预置数，再延时即可。在每个⾳符播放前后，⽤ TR0 控制是否输出⾳乐，每个⾳符之间也有短暂静⾳，以使⾳乐更为清晰。
在本程序中，播放⾳乐函数中，我们使⽤了 xdata 的空间的 RAM，这是因为乐谱的数据需要⽐较多的内存，data 和 idata 空间已经放不下了的原因。
如果你把这个程序烧写到⼀⽚没有 XRAM 的芯⽚中，⽐如 at89c52 之类，就会出现⽆法运⾏的现象。在使⽤没有 XRAM 的 51 芯⽚时，如果使⽤了 XRAM，则要在总线上外加⼀个内存芯⽚，⽐如 62256
之类。
完全看懂了程序之后，请编译运⾏，观察结果。按全速，可以听到美妙的仙剑⾳乐从蜂鸣器中传出，真是太奇妙了
#include<reg52.h>//包含访问sfr库函数
#define uchar unsigned char //定义⼀下⽅便使⽤
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P1^0; //喇叭输出脚
sbit K1= P3^2;
sbit K2= P3^3;
sbit K3= P3^4;
sbit K4= P3^5;
uchar th0_f; //在中断中装载的 T0 的值⾼ 8 位
uchar tl0_f; //在中断中装载的 T0 的值低 8 位
//T0 的值，及输出频率对照表
uchar code freq[36*2]={
0xA9,0xEF,//00220HZ ,1 //0
0x93,0xF0,//00233HZ ,1#
0x73,0xF1,//00247HZ ,2
0x49,0xF2,//00262HZ ,2#
0x07,0xF3,//00277HZ ,3
0xC8,0xF3,//00294HZ ,4
0x73,0xF4,//00311HZ ,4#
0x1E,0xF5,//00330HZ ,5
0xB6,0xF5,//00349HZ ,5#
0x4C,0xF6,//00370HZ ,6
0xD7,0xF6,//00392HZ ,6#
0x5A,0xF7,//00415HZ ,7
0xD8,0xF7,//00440HZ 1 //12
0x4D,0xF8,//00466HZ 1# //13
0xBD,0xF8,//00494HZ 2 //14
0x24,0xF9,//00523HZ 2# //15
0x87,0xF9,//00554HZ 3 //16
0xE4,0xF9,//00587HZ 4 //17
0x3D,0xFA,//00622HZ 4# //18
0x90,0xFA,//00659HZ 5 //19
0xDE,0xFA,//00698HZ 5# //20
0x29,0xFB,//00740HZ 6 //21
0x6F,0xFB,//00784HZ 6# //22
0xB1,0xFB,//00831HZ 7 //23
0xEF,0xFB,//00880HZ `1
0x2A,0xFC,//00932HZ `1#
0x62,0xFC,//00988HZ `2
0x95,0xFC,//01046HZ `2#
0xC7,0xFC,//01109HZ `3
0xF6,0xFC,//01175HZ `4
0x22,0xFD,//01244HZ `4#
0x4B,0xFD,//01318HZ `5
0x73,0xFD,//01397HZ `5#
0x98,0xFD,//01480HZ `6
0xBB,0xFD,//01568HZ `6#
0xDC,0xFD,//01661HZ `7 //35
};
//定时中断 0,⽤于产⽣唱歌频率
timer0() interrupt 1
{
TL0=tl0_f;TH0=th0_f; //调⼊预定时值
BEEP=~BEEP; //取反⾳乐输出 IO
}
//******************************
//⾳乐符号串解释函数
//⼊⼝：要解释的⾳乐符号串，输出的⾳调串，输出的时长串changedata(uchar *song,uchar *diao,uchar *jie)
{
uchar i,i1,j;
char gaodi; //⾼低+/-12 ⾳阶
uchar banyin;//有没有半个升⾳阶
uchar yinchang;//⾳长
uchar code jie7[8]={0,12,14,16,17,19,21,23}; //C 调的 7 个值 *diao=*song;
for(i=0,i1=0;;)
{
gaodi=0; //⾼低=0
banyin=0;//半⾳=0
yinchang=4;//⾳长 1 拍
if((*(song+i)=='|') || (*(song+i)=='')) i++;
//拍⼦间隔和⼀个空格过滤
switch(*(song+i))
{
case',': gaodi=-12;i++;//低⾳
break;
case'`': gaodi=12;i++; //⾼⾳
break;
}
if(*(song+i)==0) //遇到 0 结束
{
*(diao+i1)=0; //加⼊结束标志 0
*(jie+i1)=0;
return;
}
j=*(song+i)-0x30; i++; //取出基准⾳
j=jie7[j]+gaodi; //加上⾼低⾳
yinc: switch(*(song+i))
{
case'#': //有半⾳ j 加⼀个⾳阶
i++;j++;
goto yinc;
case'-': //有⼀个⾳节加长
yinchang+=4;
i++;
goto yinc;
case'_': //有⼀个⾳节缩短
yinchang/=2;
i++;
goto yinc;
case'.': //有⼀个加半拍
yinchang=yinchang+yinchang/2;
i++;
goto yinc;
}
*(diao+i1)=j; //记录⾳符
*(jie+i1)=yinchang; //记录⾳长
i1++;
}
}
//******************************************
//奏乐函数
//⼊⼝：要演奏的⾳乐符号串
void play(uchar *songdata)
{
uchar i,c,j=0;
uint n;
uchar xdata diaodata[112]; //⾳调缓冲
uchar xdata jiedata[112]; //⾳长缓冲
changedata(songdata,diaodata,jiedata); //解释⾳乐符号串 TR0=1;
for(i=0;diaodata[i]!=0;i++) //逐个符号演奏
{
tl0_f=freq[diaodata[i]*2]; //取出对应的定时值送给 T0
th0_f=freq[diaodata[i]*2+1];
for(c=0;c<jiedata[i];c++) //按照⾳长延时
for(n=0;n<32000;n++);
TR0=0;
for(n=0;n<500;n++); //⾳符间延时
TR0=1;
}
TR0=0;
}
//仙剑
uchar code xianjian[]={
"|3_3_3_2_3-|2_3_2_2_,6,6_,7_|12_1_,7,6_,5_|,6---|"
"3_3_3_2_3.6_|5_6_5_5_22_3_|45_4_32_1_|3.--3_|" "67_6_55_3_|5--3_5_|26_5_32_3_|3---|"
"26_6_6-|16_6_66_7_|`17_6_76_7_|3.--3_|"
"67_6_55_3_|5--3_5_|67_6_76_7_|3---|"
"26_6_6-|16_6_66_7_|`17_6_7.5_|6---|"
};
//乐谱⽅式输⼊的⾳乐播放，仙剑奇侠传
void main(void) // 主程序
{
TMOD = 0x01; //使⽤定时器 0 的 16 位⼯作模式
TR0 = 0;
ET0 = 1;
EA = 1;
while(1)
{
play(xianjian);
}
}
仙剑奇侠传
四个按键控制
#include<reg52.h>//包含访问sfr库函数
#define uchar unsigned char //定义⼀下⽅便使⽤
#define uint unsigned int
#define ulong unsigned long
sbit BEEP=P1^0; //喇叭输出脚
sbit P10=P1^1;//灯
sbit K1= P3^2;
sbit K2= P3^3;
sbit K3= P3^4;
sbit K4= P3^5;
uchar th0_f; //在中断中装载的 T0 的值⾼ 8 位
uchar tl0_f; //在中断中装载的 T0 的值低 8 位
版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。
发表评论