蜂鸣器程序求蜂鸣器发声程序(周期有关)

蜂鸣器程序  时间:2021-06-18  阅读:()

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口高电平,蜂鸣器发声 delay(500); //延时 fengmingqi=0; //p0.0口低电平,蜂鸣器不发声 delay(500); //延时 } }

急求一个能让蜂鸣器响的程序。明天竞赛了。完整的程序,谢谢好心人了。

//此程序在硬件上调试通过 //本程序的单片机晶振采用11.0592M #include <reg51.h> sbit speaker=P1^2; unsigned char timer0h,timer0l,time; //生日歌 code unsigned char sszymmh[]={5,1,1, 5,1,1, 6,1,2, 5,1,2, 1,2,2, 7,1,4, 5,1,1, 5,1,1, 6,1,2, 5,1,2, 2,2,2, 1,2,4, 5,1,1, 5,1,1, 5,2,2, 3,2,2, 1,2,2, 7,1,2, 6,1,2, 4,2,1, 4,2,1, 3,2,2, 1,2,2, 2,2,2, 1,2,4}; // 音阶频率表 高八位 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<8000;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,i; TMOD=1; //置CT0定时工作方式1 EA=1; ET0=1;//IE=0x82 //CPU开中断,CT0开中断 while(1) { i=0; while(i<75){ //音乐数组长度 ,唱完从头再来 k=sszymmh[i]+7*sszymmh[i+1]-1; timer0h=FREQH[k]; timer0l=FREQL[k]; time=sszymmh[i+2]; i=i+3; song(); } } } P12接J31的7脚,我在板子上已经测试过了,用的是89S52 花时间编的,希望你能采纳

51单片机蜂鸣器程序是什么?

51单片机蜂鸣器程序为: #include"reg52.h" typedef unsigned char u8; typedef unsigned int u16; sbit beep=P1^5; void delay(u16 i) { while(i--); } void main() { while(1) { beep=~beep; delay(1000);//控制音调频率 beep=~beep;/控制声音大小 delay(10); } } 扩展资料: BUZZER蜂鸣器的分类: 1、按其驱动方式的原理分,可分为:有源蜂鸣器(内含驱动线路,也叫自激式蜂鸣器)和无源蜂鸣器(外部驱动,也叫他激式蜂鸣器)。

2、按构造方式的不同,可分为:电磁式蜂鸣器和压电式蜂鸣器。

3、按封装的不同,可分为:DIP BUZZER(插针蜂鸣器)和SMD BUZZER(贴片式蜂鸣器)。

4、按电流的不同,可分为:直流蜂鸣器和交流蜂鸣器,其中,以直流最为常见压电式蜂鸣器,用的是压电材料,即当受到外力导致压电材料发生形变时压电材料会产生电荷。

同样,当通电时压电材料会发生形变。

电磁式蜂鸣器,主要是利用通电导体会产生磁场的特性,用一个固定的永久磁铁与通电导体产生磁力推动固定在线圈上的鼓膜。

由于两种蜂鸣器发音原理不同,压电式结构简单耐用但音调单一音色差,适用于报警器等设备。

而电磁式由于音色好,所以多用于语音、音乐等设备。

单片机 蜂鸣器 滴滴声音c程序怎么写

#include<reg52.h>

sbit beep=P3^7;

void delay() //延时子函数

{

unsigned char x,y;

for(x=50;x>0;x--)

for(y=110;y>0;y--);

}

void main()

{

beep=0;

while(1)

{

delay();//调用延时子函数

beep=~beep;

}

}

这个是52的,看看好使不

求蜂鸣器发声程序(周期有关)

假设蜂鸣器接在P1.0;假设是12M晶振; 用for循环: P1^0=1; //输出高电平让蜂鸣器响 for(a=0;a<100;a++) //高电平保持时间延时函数 for(b=0;b<100;b++) for(c=0;c<10;c++); //三级for嵌套循环定时100*100*10微秒即100毫秒 P1^0=0; //输出低电平让蜂鸣器关闭 for(a=0;a<100;a++) //关闭保持时间延时函数 for(b=0;b<100;b++) for(c=0;c<50;c++); //三级for嵌套循环定时100*100*50微秒即500毫秒 还有不懂的补充提问.

90IDC-香港云主机,美国服务器,日本KVM高性能云主机,创建高性能CLOUD只需60秒即可开通使用!

官方网站:点击访问90IDC官方网站优惠码:云八五折优惠劵:90IDCHK85,仅适用于香港CLOUD主机含特惠型。活动方案:年付特惠服务器:CPU均为Intel Xeon两颗,纯CN2永不混线,让您的网站更快一步。香港大浦CN2測速網址: http://194.105.63.191美国三网CN2測速網址: http://154.7.13.95香港购买地址:https://www.90idc.ne...

易探云:香港物理机服务器仅550元/月起;E3-1230/16G DDR3/SATA 1TB/香港BGP/20Mbps

易探云怎么样?易探云(yitanyun.com)是一家知名云计算品牌,2017年成立,从业4年之久,目前主要从事出售香港VPS、香港独立服务器、香港站群服务器等,在售VPS线路有三网CN2、CN2 GIA,该公司旗下产品均采用KVM虚拟化架构。目前,易探云推出免备案香港物理机服务器性价比很高,E3-1230 8 核*1/16G DDR3/SATA 1TB/香港BGP线路/20Mbps/不限流量,仅...

PacificRack:洛杉矶KVM月付1.5美元起,1G内存套餐年付12美元起

PacificRack在本月发布了几款特价产品,其中最低款支持月付仅1.5美元,基于KVM架构,洛杉矶机房,PR-M系列。PacificRack简称PR,QN机房旗下站点,主要提供低价VPS主机产品,基于KVM架构,数据中心为自营洛杉矶机房,现在只有PR-M一个系列,分为了2个类别:常规(Elastic Compute Service)和多IP产品(Multi IP Server)。下面列出几款秒...

蜂鸣器程序为你推荐
4k超高清视频下载为新手推荐几个获取4K片源的途径郭列90后的杰出代表有那些?暴力破解rar暴力破解rar,一个15位左右的密码,得用多长时间。(双核。2g内存)broadcast播哈尔滨哪里有卖broadcast播 这个服装品牌的shoujiao手机电池突然充不上电,是怎么回事?该怎么办?网络安全密钥一般路由器是网络安全密钥是多少cursorlocation如何用ENVI把不同图像中的相同地点的某个像素点的值读出来。按时间把这个点的值连起来,。谢谢好人。cursorlocation在ENVI中双击遥感图像出来个CURSOR LOCATION/value对话框。下面有个LL : 31?6'21.84"N, 117?9'11.78"E全局钩子delphi 键盘全局钩子东兴证券网站东兴证券交易软件如何操作?
抗投诉vps主机 域名备案收费吗 ix主机 Hello图床 win8.1企业版升级win10 好看的桌面背景图片 500m空间 网站挂马检测工具 灵动鬼影 坐公交投2700元 ntfs格式分区 新家坡 中国电信测网速 ca187 银盘服务是什么 789 主机管理系统 购买空间 创速 免费赚q币 更多