使用51单片机蜂鸣器播放音乐 求keil程序

//主程序查音符码，将不同的初值装入定时器，定时器每中断一次，P37取反一次，形成不同频率的方波

//11代表低音哆 21代表高音哆 1代表中音哆

//12代表低音来 22代表高音来 2代表中音来，是不是翻译乐谱很方便

#include<reg52h>

sbit SPK = P3^7; //P37外接扬声器，可以改成你所说的P1^5

#define uint unsigned int;

#define uchar unsigned char;

uint x,y;

uint i,j,k;

//以下是根据歌谱转来的音乐代码 3代表中音咪 1个全音被分成4个1/4 音符

//小燕子第一句 3,5,21,6,5,5,5,5, 21是高音哆 ，后面4个5，是因为这个音节占4拍

uchar code MUSIC[]={3,5,21,6,5,5,5,5, 3,5,6,21,5,5,5,5, 21,21,21,23,22,22,21,21, 22,21,6,21,5,5,5,5, 3,3,5,6,6,5,6, 21,21,22,5,6,6,6,6, 3,3,1,1,2,2,2,2,2,

2,2,2,3,5,5,5,5, 21,21,2,3,5,5,5,5, 2,1,16,1,15,15,15,15, 0,0,0,0,16,16,1,1, 15,15,16,16,1,1,1,1, 5,5,6,6,4,4,3,3, 2,2,2,2,2,2,5,5, 5,5,2,2,4,4,3,3, 2,2,1,2,4,4,4,4,

16,16,1,1,2,2,4,4, 2,1,16,1,15,15,15,15, 16,16,16,16,15,15,15,15, 15,15,15,15,15,15,15,15, 0,0,5,5,5,5,0,0, 5,5,5,5,4,4,4,4,

5,5,5,5,2,2,2,2, 2,2,5,5,4,4 ,4,4, 16,16,1,1,2,2,2,2, 4,4,2,2,2,2,4,4, 5,5,5,5,5,5,6,6, 21,21,21,21,6,6,21,21,

21,21,6,6,5,5,5,5, 5,5,6,6,5,5,4,4, 2,2,2,2,2,2,5,5, 5,5,2,2,4,4,3,3, 2,2,1,2,4,4,4,4, 16,16,1,1,2,2,4,4,

2,1,16,1,15,15,15,15, 16,16,16,16,15,15,15,15, 5,5,6,6,5,5,6,6, 5,5,4,4,5,5,5,5, 1,1,2,2,1,1,2,2, 15,15,16,16,1,1,1,1,

5,5,6,6,5,5,6,6, 21,21,6,6,5,5,5,5, 1,1,2,2,1,1,2,2, 15,15,16,16,1,1,1,1, 5,5,6,6,5,5,4,4, 5,5,5,5,1,1,2,2, 15,15,16,16,1,1,1,1,

5,5,6,6,5,5,5,5, 1,1,2,2,1,1,1,1, 5,5,6,6,5,5,5,5, 1,1,2,2,1,1,1,1, 5,5,5,5,1,1,1,1, 5,5,5,5,1,1,1,1, 5,5,5,5,1,1,5,5,

1,1,5,5,1,1,5,5, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 0,0,1,1,1,1,0,0, 5,5,5,5,4,4,4,4, 5,5,5,5,2,2,2,2, 2,2,5,5,4,4,4,4,

6,6,1,1,2,2,2,2, 4,4,2,2,2,2,4,4, 5,5,5,5,5,5,6,6, 21,21,21,21,6,6,21,21, 21,21,6,6,5,5,5,5, 5,5,6,6,5,5,4,4, 2,2,2,2,2,2,5,5,

5,5,2,2,4,4,3,3, 2,2,1,22,4,4,4,4, 16,16,1,1,2,2,4,4, 4,4,6,6,5,5,5,5, 5,5,5,5,5,5,5,5, 6,6,6,6,5,5,5,5};

uchar code table[] = { 0,0xfc,0xfc,0xfd,0xfd,0xfd,0xfd,0xfe,0,0,0, //定时半周期的初始值中音123 4 5 67高8位

//三个0是补位码，为了使表格整齐，便于按规律查询 首个0是休止符11个

0xf8,0xf9,0xfa,0xfa,0xfb,0xfb,0xfc,0,0,0, //低音1 2 3 4 5 67高8位 10个

0xfe,0xfe,0xfe,0xfe,0xfe,0xfe,0xff, //高音1 2 3 4 5 67高8位 7个

0,0x44,0xad,0,0x34,0x82,0xc8,0x06,0,0,0, //中音123 4 5 67低8位 10个

0x89,0x59,0x13,0x68,0x04,0x90,0x0c,0 ,0,0, //低音1 2 3 4 5 6 7低8位10个

0x22,0x56,0x85,0x9a,0xc1,0xe4,0x03}; //高音1 2 3 4 5 6 7低8位 7个

void delay(i) //晶振12MHZ时延时1ms

{

for(j=i;j>0;j--)

for(k=121;k>0;k--);

}

void TIM0_ISR() interrupt 1

{

SPK=!SPK;//定时取反,形成方波

TH0=table[x]; //重新载入定时半周期的初始值

TL0=table[x+28];//为什么加28 11+10+7=28

}

void main(void)

{

TMOD|=0x01;

EA=1;

ET0=1;

while(1)

{

y=0;

while(y<592)//此乐谱里面有592个音符

{

x=MUSIC[y];//查乐谱表

TH0=table[x]; //查不同音节的定时器初值

TL0=table[x+28];

TR0=1; //打开定时器

if(y>72)//两首曲子不同节奏,延时不同

{

delay(125); //延时125ms

}

else

{

delay(250); //延时250ms

}

y++;

TR0=0;

}

}

}

蜂鸣器播放乐曲主要取决于两个参数, 音调和音长 音调为do, re, mi等, 音长是同样的音调持续的时间

蜂鸣器的歌曲播放的驱动方式就变成碰到do就输出多少频率(音调即频率), 然后保证这个音调持续多少时间 每个人写的驱动都有可能不一样(例如有些人do, re, mi只用1,2,3表示, 然后再查频率表, 有些人则直接用相应输出频率的设置值)

所以针对你的歌曲驱动方法(你必须先要了解), 就可以将歌曲转换为代码

举个例子: 8-8-5-5-3-3-1-1-5-4-3-2-1-- (1: do, 8代表高do, -代表一个节拍), 假设我的驱动方法是1的对应的频率设置0x55, 2对应0x65, 以此类推 8为0xC5, 另假设一个节拍"-"对应的时间长度设置为0x30, 则上面的简谱可以转换为 {{0xC5, 0x30}, {0xC5, 0x30}, {0x95, 0x30}, {0x95, 0x30}, {0x75, 0x30}, {0x75, 0x30}, {0x55, 0x30}, {0x55, 0x30}, {0x95, 0x30}, {0x85, 0x30},{0x75, 0x30}, {0x65, 0x30}, {0x55, 0x60}}

知道规律后就可以在电脑上面写一个程序专门将简谱转换成代码

如果是蜂鸣器的话，那么加一个电平信号就可以发声了。\x0d\FMQ EQU P10\x0d\ORG 0000H\x0d\LJMP MAIN\x0d\ORG 0030H\x0d\MAIN:\x0d\CPL FMQ\x0d\LCALL DELAY\x0d\SJMP MAIN\x0d\DELAY:\x0d\MOV R2,#200\x0d\DLY:\x0d\MOV R3,#250\x0d\DJNZ R3,$\x0d\DJNZ R2,DLY\x0d\RET\x0d\END

#include <windowsh>

#include <stdioh>

int main()

{

int m[]={0,320,391,399,445,466,494, 523}, i=0; //定义曲谱中的 do rui mi fa sou la ci 不准确 自己靠感觉调的

int s[]={5,3,5,3,5,2,1}; //我是一个粉刷匠 的曲谱 我就会这句。。。

int t[]={300,300,300,300,300,300,500}; //这是每个音的发生时间， 可以自己定义 半拍多少时间 四分之一拍多少时间

for (i=0; i<7; i++)

{

Beep(m[s[i]],t[i]); //Beep函数 第一个参数 是 发生频率 第二个参数 是发声时间

}

return 0;

}

c语言之家

这个程序你可以分为两部分来做那一部分，你要先调试这个蜂鸣器音调歌曲的程序先调试好。然后你可以做一个指针来指向不同的存储期。通过按键实现自身的跳转就可以实现上下级的播放。这个程序你可以分为两部分来做那一部分，你要先调试这个蜂鸣器音调歌曲的程序先调试好。然后你可以做一个指针来指向不同的存储期。通过按键实现自身的跳转就可以实现上下级的播放。这个程序你可以分为两部分来做那一部分，你要先调试这个蜂鸣器音调歌曲的程序先调试好。然后你可以做一个指针来指向不同的存储期。通过按键实现自身的跳转就可以实现上下级的播放。这个程序你可以分为两部分来做那一部分，你要先调试这个蜂鸣器音调歌曲的程序先调试好。然后你可以做一个指针来指向不同的存储期。通过按键实现自身的跳转就可以实现上下级的播放。

#include\r\n#include\r\n//本例采用89C52,晶振为110592MHZ\r\n//关于如何编制音乐代码,其实十分简单,各位可以看以下代码\r\n//频率常数即音乐术语中的音调,而节拍常数即音乐术语中的多少拍;\r\n//所以拿出谱子,试探编吧!\r\nsbitBeep=P1^5;\r\n\r\nunsignedcharn=0;//n为节拍常数变量\r\nunsignedcharcodemusic_tab[]={\r\n0x18,0x30,0x1C,0x10,//格式为:频率常数,节拍常数,频率常数,节拍常数,\r\n0x20,0x40,0x1C,0x10,\r\n0x18,0x10,0x20,0x10,\r\n0x1C,0x10,0x18,0x40,\r\n0x1C,0x20,0x20,0x20,\r\n0x1C,0x20,0x18,0x20,\r\n0x20,0x80,0xFF,0x20,\r\n0x30,0x1C,0x10,0x18,\r\n0x20,0x15,0x20,0x1C,\r\n0x20,0x20,0x20,0x26,\r\n0x40,0x20,0x20,0x2B,\r\n0x20,0x26,0x20,0x20,\r\n0x20,0x30,0x80,0xFF,\r\n0x20,0x20,0x1C,0x10,\r\n0x18,0x10,0x20,0x20,\r\n0x26,0x20,0x2B,0x20,\r\n0x30,0x20,0x2B,0x40,\r\n0x20,0x20,0x1C,0x10,\r\n0x18,0x10,0x20,0x20,\r\n0x26,0x20,0x2B,0x20,\r\n0x30,0x20,0x2B,0x40,\r\n0x20,0x30,0x1C,0x10,\r\n0x18,0x20,0x15,0x20,\r\n0x1C,0x20,0x20,0x20,\r\n0x26,0x40,0x20,0x20,\r\n0x2B,0x20,0x26,0x20,\r\n0x20,0x20,0x30,0x80,\r\n0x20,0x30,0x1C,0x10,\r\n0x20,0x10,0x1C,0x10,\r\n0x20,0x20,0x26,0x20,\r\n0x2B,0x20,0x30,0x20,\r\n0x2B,0x40,0x20,0x15,\r\n0x1F,0x05,0x20,0x10,\r\n0x1C,0x10,0x20,0x20,\r\n0x26,0x20,0x2B,0x20,\r\n0x30,0x20,0x2B,0x40,\r\n0x20,0x30,0x1C,0x10,\r\n0x18,0x20,0x15,0x20,\r\n0x1C,0x20,0x20,0x20,\r\n0x26,0x40,0x20,0x20,\r\n0x2B,0x20,0x26,0x20,\r\n0x20,0x20,0x30,0x30,\r\n0x20,0x30,0x1C,0x10,\r\n0x18,0x40,0x1C,0x20,\r\n0x20,0x20,0x26,0x40,\r\n0x13,0x60,0x18,0x20,\r\n0x15,0x40,0x13,0x40,\r\n0x18,0x80,0x00\r\n};\r\n\r\nvoidint0()interrupt1//采用中断0控制节拍\r\n{TH0=0xd8;\r\nTL0=0xef;\r\nn--;\r\n}\r\n\r\nvoiddelay(unsignedcharm)//控制频率延时\r\n{\r\nunsignedi=3m;\r\nwhile(--i);\r\n}\r\n\r\nvoiddelayms(unsignedchara)//豪秒延时子程序\r\n{\r\nwhile(--a);//采用while(--a)不要采用while(a--);各位可编译一下看看汇编结果就知道了!\r\n}\r\n\r\nvoidmain()\r\n{unsignedcharp,m;//m为频率常数变量\r\nunsignedchari=0;\r\nTMOD&=0x0f;\r\nTMOD|=0x01;\r\nTH0=0xd8;TL0=0xef;\r\nIE=0x82;\r\nplay:\r\nwhile(1)\r\n{\r\na:p=music_tab[i];\r\nif(p==0x00){i=0,delayms(1000);gotoplay;}//如果碰到结束符,延时1秒,回到开始再来一遍\r\nelseif(p==0xff){i=i+1;delayms(100),TR0=0;gotoa;}//若碰到休止符,延时100ms,继续取下一音符\r\nelse{m=music_tab[i++],n=music_tab[i++];}//取频率常数和节拍常数\r\nTR0=1;//开定时器1\r\nwhile(n!=0)Beep=~Beep,delay(m);//等待节拍完成,通过P1口输出音频(可多声道哦!)\r\nTR0=0;//关定时器1\r\n}\r\n}\r\n\r\n你参考这个吧

我之前写过一个汇编的，声音有问题，后来中间加了个1秒延时调试了一下，发现是取码过程中取码位数计算错误，导致正常频率和不定的一个频率交替出现。你的程序我没仔细看，只是说了一下我遇到过的问题。如果不是你要的答案请不要轻易采纳。

这是我学校电子设计时做的，可以d琴，也有几首歌在里面。。你应该看得懂#include <reg52h> #define uchar unsigned char

#define uint unsigned int

#define ulong unsigned long

sbit BEEP=P2^0; //喇叭输出脚uchar th0_f; //在中断中装载的T0的值高8位

uchar tl0_f; //在中断中装载的T0的值低8位

uchar key;/------------------------------------------------

函数声明

------------------------------------------------/

uchar keyscan(void);//键盘扫描程序

void delay(uint i); //延时子程序/-------- T0的值,及输出频率对照表 --------------/

uchar code freq[362]={

0xA9,0xEF, //0x3F,0XEE,//00220HZ ,1 //0

0x93,0xF0, //0X3D,0XEF,//00233HZ ,1#

0x73,0xF1, //0X30,0XF0,//00247HZ ,2

0x49,0xF2, //0X18,0XF1,//00262HZ ,2#

0x07,0xF3, //0XE6,0XF1,//00277HZ ,3

0xC8,0xF3, //0XB7,0XF2,//00294HZ ,4

0x73,0xF4, //0X71,0XF3,//00311HZ ,4#

0x1E,0xF5, //0X2A,0XF4,//00330HZ ,5

0xB6,0xF5, //0XCF,0XF4,//00349HZ ,5#

0x4C,0xF6, //0X72,0XF5,//00370HZ ,6

0xD7,0xF6, //0X09,0XF6,//00392HZ ,6#

0x5A,0xF7, //0X97,0XF6,//00415HZ ,7

0xD8,0xF7, //0X20,0XF7,//00440HZ 1 //12

0x4D,0xF8, //0X9F,0XF7,//00466HZ 1# //13

0xBD,0xF8, //0X18,0XF8,//00494HZ 2 //14

0x24,0xF9, //0X88,0XF8,//00523HZ 2# //15

0x87,0xF9, //0XF3,0XF8,//00554HZ 3 //16

0xE4,0xF9, //0X59,0XF9,//00587HZ 4 //17

0x3D,0xFA, //0X05,0XFA,//00622HZ 4# //18

0x90,0xFA, //0X13,0XFA,//00659HZ 5 //19

0xDE,0xFA, //0X66,0XFA,//00698HZ 5# //20

0x29,0xFB, //0XB9,0XFA,//00740HZ 6 //21

0x6F,0xFB, //0X05,0XFB,//00784HZ 6# //22

0xB1,0xFB, //0X4D,0XFB,//00831HZ 7 //23

0xEF,0xFB, //0X90,0XFB,//00880HZ `1

0x2A,0xFC, //0XD0,0XFB,//00932HZ `1#

0x62,0xFC, //0X0C,0XFC,//00988HZ `2

0x95,0xFC, //0X44,0XFC,//01046HZ `2#

0xC7,0xFC, //0X7B,0XFC,//01109HZ `3

0xF6,0xFC, //0XAD,0XFC,//01175HZ `4

0x22,0xFD, //0XDD,0XFC,//01244HZ `4#

0x4B,0xFD, //0X0A,0XFD,//01318HZ `5

0x73,0xFD, //0X35,0XFD,//01397HZ `5#

0x98,0xFD, //0X5D,0XFD,//01480HZ `6

0xBB,0xFD, //0X83,0XFD,//01568HZ `6#

0xDC,0xFD, //0XA6,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 diaodata[48]; //音调缓冲

uchar jiedata[48]; //音长缓冲

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++) //按照音长延时

{ key = keyscan();

for(n=0;n<29500;n++); // 29500

if(key != 0xff)//((!K1)||(!K2)||(!K3)||(!K4))//发现按键,立即退出播放

{

TR0=0;

return;

}

}

TR0=0;

for(n=0;n<460;n++); //460音符间延时

TR0=1;

}

TR0=0;

}//一分钱

uchar code yifenqian[]={

"5`1|6_`1_5|3_5_2_3_|5-|"

"3_5_6_`1_|5_6_5_3_|13__|2-|"

"3_2_1_2_|3-|6_5_3_5_|6-|"

"5_`1_6_5_|3_5_2|5_2_3_2_|1-|"

}; //世上只有妈妈好

uchar code mamahao[]={

"65_35|`16_5_6-|35_6_53_2_|1_,6_5_3_2-|"

"23_55_6_|321-|53_2_1_,6_1_|,5--"

};

//找朋友

uchar code zhaopengyou[]={ "5_6_5_6_|5_6_5|5_`1_7_6_|5 3|"

"5_5_3_4_|5_5_3|1_4_3_2_|1_2_1|"

};

//茉莉花

uchar code molihua[]={"33_5_6_`1_`1_6_|55_6_5-|33_5_6_`1_`1_6_|55_6_5-|"

"5553_5_|665-|32_3_53_2_|11_2_1|"

//"3_2_1_3_23_|56_`1_5-|23_5_2_3_1_,6_|,5-,61|"

//"23_1_2-1_,6_|,5--"

};

//新年好

uchar code xinnianhao[]={

"1_1_1 ,5|3_3_3 1|1_3_5 5|4_3_2-|"

"2_3_4-|3_2_3 1|1_3_2 ,5|,7_2_1-|"

};

//小星星

uchar code xingxing[]={

"1155|665-|4433|221-|"

"5544|332-|5544|332-|"

"1155|665-|4433|221-|"

};

//外婆的澎湖湾

uchar code waipodephw[]={

"3_5_5_5_6_`1_6_5_|`1_`1_`1_6_5-|"

"`3_`3_`3_`3_`4_`3_`2_`1_|`2_`2_`2_`3_`2-|"

"`3_`3_`3_`3_`4_`3_`2_`1_|6_`1_`1_6_5-|"

};

}

以上就是关于使用51单片机蜂鸣器播放音乐 求keil程序全部的内容，包括:使用51单片机蜂鸣器播放音乐 求keil程序、怎样得到蜂鸣器的歌曲代码、单片机用汇编语言怎么写一个蜂鸣器程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！