KeilC51学习6控制播放音乐--688IT编程网

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 位

688IT编程网

KeilC51学习6控制播放音乐

发表评论

推荐文章

negotiable certificates of deposits -回复

trandate翻译 -回复

tenoke翻译 -回复

避免合同倒签的方法

cut down the transaction cost

热门文章

Truncate Table

truncate table audit_result_temp; -回复

truncate 语法

truncated incorrect double value 21分钟

truncate()函数

统计学专业辞汇英语翻译

铁塔专业术语英语

大数据英语翻译

A MEANS FOR SAWING ELONGATE UNITS FROM A TREE-TRUN

外文翻译--拥塞控制中的算法

TOC术语中英文对照

conditionalty贸易术语 -回复

termination_date翻译

determined 翻译

truncatedsvd函数作用

tangential翻译

表面处理方面的缺陷术语(Defect Terms)

exterminate翻译

delamination翻译

antiquated翻译

最新文章

negotiable certificates of deposits -回复

teams中presenting duplicate -回复

老同志独断专行处理流程详解

quota share reinsurance contract -回复

attempted to resolve relative to -回复

concurrent modification during iteration dart

标签列表

688IT编程网

KeilC51学习6控制播放音乐

发表评论

推荐文章

negotiable certificates of deposits -回复

trandate翻译 -回复

tenoke翻译 -回复

避免合同倒签的方法

cut down the transaction cost

热门文章

Truncate Table

truncate table audit_result_temp; -回复

truncate 语法

truncated incorrect double value 21分钟

truncate()函数

统计学专业辞汇英语翻译

铁塔专业术语 英语

大数据英语翻译

A MEANS FOR SAWING ELONGATE UNITS FROM A TREE-TRUN

外文翻译--拥塞控制中的算法

TOC术语中英文对照

conditionalty贸易术语 -回复

termination_date翻译

determined 翻译

truncatedsvd函数作用

tangential翻译

表面处理方面的缺陷术语(Defect Terms)

exterminate翻译

delamination翻译

antiquated翻译

最新文章

negotiable certificates of deposits -回复

teams中presenting duplicate -回复

老同志独断专行处理流程详解

quota share reinsurance contract -回复

attempted to resolve relative to -回复

concurrent modification during iteration dart

标签列表

铁塔专业术语英语