求51单片机用蜂鸣器演奏《最炫民族风》 程序！
作者&投稿：花纯 （若有异议请与网页底部的电邮联系）
宋晓晨 第一小提琴 First Violin
G调好 F调低音只有6 没有5 我觉得G调好
#include <reg51.h>sbit speaker=P1^2;
unsigned char timer0h,timer0l,time;
//歌 谱
code unsigned char sszymmh[]={6,1,4,6,1,2,5,1,2,6,1,4,6,1,2,1,2,2,1,2,4,2,2,2,
1,2,2,6,1,8,1,2,4,1,2,2,5,1,2,1,2,2,2,2,2,3,2,2,
5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,
5,2,2,3,2,2,3,2,4,1,2,2,6,1,2,6,1,2,6,1,2,3,2,2,
2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,
1,2,2,6,1,4,5,1,4,6,1,8,
6,1,4,6,1,2,5,1,2,6,1,4,6,1,2,1,2,2,1,2,4,2,2,2,
1,2,2,6,1,8,1,2,4,1,2,2,5,1,2,1,2,2,2,2,2,3,2,2,
5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,
5,2,2,3,2,2,3,2,4,1,2,2,6,1,2,6,1,2,6,1,2,3,2,2,
2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,
1,2,2,6,1,4,5,1,4,6,1,8,
//我们要唱
3,2,2,3,2,2,5,2,2,3,2,2,3,2,2,5,2,2,5,2,2,6,2,2,
1,3,2,6,2,2,5,2,4,6,2,8,
//你是我天边最美的云彩
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,8,
6,1,2,1,2,2,2,2,2,3,2,2,2,2,2,1,2,2,5,1,2,3,1,2,
6,1,8,
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,6,
1,2,2,6,1,2,1,2,2,2,2,2,3,2,2,5,2,2,3,2,2,3,2,2,
5,2,2,6,2,8,6,2,8,
6,2,3,6,2,1,6,2,2,6,2,2,6,2,3,5,2,1,3,2,2,2,2,2,
2,2,3,2,2,1,3,2,3,2,2,1,1,2,3,6,1,1,6,1,4,6,1,2,
5,1,2,6,1,4,6,1,2,1,2,2,2,2,2,3,2,1,2,2,1,2,2,1,
1,2,2,2,2,2,3,2,8,6,2,2,5,2,2,3,2,2,2,2,2,5,2,2,
3,2,2,2,2,2,1,2,2,1,2,8,
6,1,4,6,1,2,5,1,2,6,1,4,6,1,2,1,2,2,1,2,4,2,2,2,
1,2,2,6,1,8,1,2,4,1,2,2,5,1,2,1,2,2,2,2,2,3,2,2,
5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,
5,2,2,3,2,2,3,2,4,1,2,2,6,1,2,6,1,2,6,1,2,3,2,2,
2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,
1,2,2,6,1,4,5,1,4,6,1,8,
6,1,4,6,1,2,5,1,2,6,1,4,6,1,2,1,2,2,1,2,4,2,2,2,
1,2,2,6,1,8,1,2,4,1,2,2,5,1,2,1,2,2,2,2,2,3,2,2,
5,2,2,5,2,2,3,2,2,2,2,4,3,2,8,6,2,2,6,2,2,6,2,2,
5,2,2,3,2,2,3,2,4,1,2,2,6,1,2,6,1,2,6,1,2,3,2,2,
2,2,8,3,2,2,3,2,2,5,2,2,3,2,2,2,2,2,3,2,2,2,2,2,
1,2,2,6,1,4,5,1,4,6,1,8,
3,2,2,3,2,2,5,2,2,3,2,2,3,2,2,5,2,2,5,2,2,6,2,2,
1,3,2,6,2,2,5,2,4,6,2,8,
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,8,
6,1,2,1,2,2,2,2,2,3,2,2,2,2,2,1,2,2,5,1,2,3,1,2,
6,1,8,
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,6,
1,2,2,6,1,2,1,2,2,2,2,2,3,2,2,5,2,2,3,2,2,3,2,2,
5,2,2,6,2,8,6,2,8,
6,2,3,6,2,1,6,2,2,6,2,2,6,2,3,5,2,1,3,2,2,2,2,2,
2,2,3,2,2,1,3,2,3,2,2,1,1,2,3,6,1,1,6,1,4,6,1,2,
5,1,2,6,1,4,6,1,2,1,2,2,2,2,2,3,2,1,2,2,1,2,2,1,
1,2,2,2,2,2,3,2,8,6,2,2,5,2,2,3,2,2,2,2,2,5,2,2,
3,2,2,2,2,2,1,2,2,1,2,8,
//你是我天边最美的云彩
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,8,
6,1,2,1,2,2,2,2,2,3,2,2,2,2,2,1,2,2,5,1,2,3,1,2,
6,1,8,
6,2,8,6,2,8,0,0,8,3,2,2,5,2,2,3,2,2,5,2,2,
3,2,4,6,1,3,6,1,1,1,2,4,6,1,2,3,2,1,6,1,1,1,2,3,
1,2,1,2,2,1,1,2,1,2,2,1,3,2,8,3,2,4,6,2,3,6,2,1,
5,2,4,2,2,3,2,2,1,3,2,8,3,2,1,2,2,1,1,2,1,6,1,1,
3,1,1,2,1,1,3,1,1,5,1,1,1,2,4,6,1,3,6,1,1,2,2,4,
5,1,3,5,1,1,3,1,4,5,1,3,5,1,1,1,2,8,6,1,4,1,2,3,
6,1,1,3,2,3,3,2,1,2,2,3,3,2,1,6,2,8,6,2,8,
//你是我天边最美的云彩
6,1,4,6,1,2,5,1,2,6,1,4,1,2,4,2,2,2,3,2,1,2,2,1,
1,2,2,3,2,8,6,1,2,6,2,2,6,2,2,5,2,2,2,2,2,3,2,1,
2,2,1,1,2,2,2,2,2,3,2,8,1,2,2,6,1,2,6,1,2,1,2,2,
2,2,4,5,1,2,5,1,2,3,2,2,5,2,2,3,2,2,2,2,2,1,2,8,
6,1,2,1,2,2,2,2,2,3,2,2,2,2,2,1,2,2,5,1,2,3,1,2,
6,1,8};
// 音阶频率表 高八位
code unsigned char FREQH[]={
0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
} ;
// 音阶频率表 低八位
code unsigned char FREQL[]={
0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
};
void delay(unsigned char t)
{
unsigned char t1;
unsigned long t2;
for(t1=0;t1<t;t1++)
{
for(t2=0;t2<2000;t2++)
{
;
}
}
TR0=0;
}
void t0int() interrupt 1
{
TR0=0;
speaker=!speaker;
TH0=timer0h;
TL0=timer0l;
TR0=1;
}
void song()
{
TH0=timer0h;
TL0=timer0l;
TR0=1;
delay(time);
}
void main(void)
{
unsigned char k;
unsigned int i;
TMOD=1; //置CT0定时工作方式1
EA=1;
ET0=1;//IE=0x82 //CPU开中断,CT0开中断
while(1)
{
i=0;
while(i<1577){ //音乐数组长度 ，唱完从头再来
k=sszymmh[i]+7*sszymmh[i+1]-1;
timer0h=FREQH[k];
timer0l=FREQL[k];
time=sszymmh[i+2];
i=i+3;
song();
}
}
}
给你参考一下噢
51单片机如何让蜂鸣器只响0.5s
51单片机驱动蜂鸣器(蜂鸣器分有源与无源两种，有源指加电压就会响的，无源需要以一定频率的交变脉冲电压驱动)，如果只响0.5S，只要用一个定时0.5S开关信号驱动、或者用0.5S的一定频率的脉动信号驱动就可以了。
如下图为51单片机控制蜂鸣器的部分电路,其中的Q2代表什么,求大神指教...
Q2，是三极管的标号，就像 R39，是电阻的标号一样。8550，是三极管的型号，就像 0.1K，是电阻的阻值一样。Q2、8552，是同一个元件。
51单片机驱动的蜂鸣器电路,声音小,如何提高音量且无杂音?我的电路图如...
最简方法：减小R4，这样可以增大流过SPK的电流，从而提高SPK音量
51单片机蜂鸣器报警电路,实物有源蜂鸣器可以工作,仿真不能响?_百度...
3Ⅴ，严格要求不足5V，所以不响。修改方法，三极管发射极接电源，把蜂鸣器接到集电极上，就OK了。其实，这仿真有不严格的，你却没用，反倒麻烦了。蜂鸣器可以直接连接在单片机引脚上就行，还省事，少用一个三极管。但实物肯定是不行的，必须用三极管驱动。可仿真却又不严格了，它行了，可你没用。
怎样控制51单片机的蜂鸣器发出不同频率的声音?
用定时器来产生频率，如产生100Hz的声音。思路：100Hz即每秒变换200次，每次的时间就是1\/200秒=0.005秒=5毫秒。计算定时器的初值：TH0 = 0x0EE; TL0 = 0x00;include <reg51.h> sbit BEEP=P0^0;\/\/蜂鸣器引脚 void main(void){ \/\/初始化定时器（晶振：11.0592MHz，12T）TMOD = 0x01;...
51单片机让蜂鸣器响5次停止
51单片机让蜂鸣器响5次停止：只需要按照对应的电路给出电平(比如PNP驱动的只要给出低电平即可)，无源的麻烦一点，需要给一定频率的方波才能发声。
使用51单片机蜂鸣器播放音乐 求keil程序
\/\/主程序查音符码，将不同的初值装入定时器，定时器每中断一次，P3.7取反一次，形成不同频率的方波 \/\/11代表低音哆 21代表高音哆 1代表中音哆 \/\/12代表低音来 22代表高音来 2代表中音来，是不是翻译乐谱很方便 include<reg52.h> sbit SPK = P3^7; \/\/P3.7外接扬声器，可以改成你所说的...
求教,怎样控制51单片机的蜂鸣器发出不同频率的声音
蜂鸣器是不能发出不同频率的声音的，要发出不同频率的声音，你需要选择speaker，比如：include<reg51.h> define uchar unsigned char define uint unsigned int sbit SPK=P1^0;sbit K1=P1^7;\/\/发声函数 void Alarm(uchar t){ uchari,j;for(i=0;i<200;i++){ SPK=~SPK;for(j=0;j<t;j...
在51单片机中怎样让中断控制蜂鸣器?
让中断控制蜂鸣器，用定时器，一种应用是做电子钟，定点闹钟，整点报警都可以。第二种应用，用定时器控制蜂鸣器间断发声，产生各种效果。第三种应用是控制无源蜂鸣器，用定时器产生不同频率的信号，加到蜂鸣器上发出不同音调的声音。
求51单片机蜂鸣器音量可调程序,不是播放音乐的,按下不同的独立按键,音...
改起来会较麻烦。可以先试试用相同频率，但不同占空比的PWM信号，来驱动峰鸣器，看看是否能满足你的要求。如果可以自己设计或更改电路，可以将几只电阻一端共接后与蜂鸣器串联在一起，每只电阻另一端分别连接到单片机的不同I\/O引脚，通过控制不同引脚的输出电平，改变蜂鸣器串接电阻值，来调节音量。
漕宙枢星： ;//****************************************************************;//*文件名:祝你平安MUSIC程序;功能: INT1口接音频输出 一首祝你平安歌曲;//**************************************************************** ORG 0000H LJMP START ORG 000BH INC ...
双城市19738393391： 51单片机控制蜂鸣器唱歌程序怎么写,网上的程序我看不懂,求高手教写程度,非常感谢 - ？
漕宙枢星： 看样子你还是有基础的..那么.先声明.声音肯定不怎么好听.第一步,定义频率表.这个有的抄.当然你可以自己算.溢出时间按声音周期的一半算.拿音阶当索引,把定时器的设置值列成表.下面写歌谱的时候会用到.然后,拿个定时器...
双城市19738393391： 51单片机,编写延时程序,控制蜂鸣器发声; - ？
漕宙枢星： 很简单的 #include<reg52.h> #define uchar unsigned char #define uint unsigned int sbit fengmingqi=P0^0; //声明IO口 void delay(uint x)//延时子函数 {uint i,j;for(i=x;i>0;i--)for(j=50;j>0;j--); } void main(void) { while(1) //循环{fengmingqi=1; //p0.0...
双城市19738393391： 如何使用51单片机的蜂鸣器来播放某些歌曲? - ？
漕宙枢星： 蜂鸣器的发声频率是固定的,不能改变声调.要播放歌曲的话最好用小喇叭,通过改变脉冲的频率可以控制小喇叭的声调.
双城市19738393391： 51单片机蜂鸣器音乐 - ？
漕宙枢星： 首先用定时器操作蜂鸣器发出不同的频率,而音阶也就是1(do)、2(re)、3(mi)等等就是不同的频率,找到他们的频率表就可以发出对应的音阶. 然后用定时器操作一拍的时间,也就是每个音阶发声 的时间长短. 最后把上面两个内容封装成函数,把青花瓷的谱子做成响应的参数,就可以实现了不过,蜂鸣器发出高音不太好,基本属于噪音范畴,所以推荐用喇叭之类的.有问题再联系哈.
双城市19738393391： 51单片机如何控制蜂鸣器发出不同声调 - ？
漕宙枢星： 我这里有现成的程序,把分给我,留下信箱,我就给你发过去,呵呵.我利用软件定时和中断方式都有,可以演奏音乐,不过蜂鸣器演奏的实在够难听.看来楼主对程序不感兴趣,我还是告诉你吧,你定时必须知道准确的定时时间,音乐中DO...
双城市19738393391： 求一个51单片机上能用的有源蜂鸣器不同频率响的汇编程序 - ？
漕宙枢星： 有源蜂鸣器都是长鸣固定频率的,只要加5Ⅴ电压就响.要按不同频率发声,应该用无源蜂鸣器,或小功率的扬声器,即小喇叭.利用定时器定时,输出一定频率的方波信号即可.如1KHz方波,信号周期为1ms,定时0.5ms=500us,假设单片机...
双城市19738393391： 怎么使用单片机控制蜂鸣器发声 - ？
漕宙枢星： 直接用三极管驱动蜂鸣器,如果你使用的是有源蜂鸣器的话就直接高电平就可以驱动了,如果你是无源蜂鸣器的话就需要频率了,比如你可以通1MS断1MS,就可以让蜂鸣器发声了,望采纳,谢谢.
双城市19738393391： 急求无源蜂鸣器的驱动程序,单片机是51的 - ？
漕宙枢星： 无源蜂鸣器驱动,只需定时将管脚2端电平取反即可 如让其响1S,频率约500HZ,可用软延时 uint i; for(i=0;i{ P1^0=~P1^0; delay_ms(1); } 如果想长时间响,并且还不占用CPU,可以用定时器实现定时中断取反
双城市19738393391： 基于51单片机蜂鸣器控制过程和中断处理 - ？
漕宙枢星： 根据频率输出要求,利用定时器或专有的PWM模块,编写一个频率函数. 然后在按键中断响应函数中,实现频率切换.
