蜂鸣器程序单片机蜂鸣器

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

让蜂鸣器发出7个音阶的程序

uchar code DSY_CODE[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90}; //标准音符频率对应的延时表 uchar code HI_LIST[]={0,226,229,232,233,236,238,240,241,242,244,245,246,247,248}; uchar code LO_LIST[]={0,4,13,10,20,3,8,6,2,23,5,26,1,4,3}; //三段音乐的音符 uchar code Song[][50]= { {1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,3,5,6,5,3,5,3,2,1,2,1,-1}, {3,3,3,4,5,5,5,5,6,5,3,5,3,2,1,5,6,53,3,2,1,1,-1}, {3,2,1,3,2,1,1,2,3,1,1,2,3,1,3,4,5,3,4,5,5,6,5,3,5,3,2,1,3,2,1,1,-1} }; //三段音乐的节拍 uchar code Len[][50]= { {1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,1,1,1,1,1,1,1,1,1,2,1,2,-1}, {1,1,1,1,1,1,2,1,1,1,1,1,1,1,2,1,1,1,1,1,1,2,2,-1}, {1,1,2,1,1,2,1,1,1,1,1,1,1,1,1,1,2,1,1,2,1,1,1,1,1,1,1,2,1,1,2,2,-1} }; //外部中断0 void EX0_INT() interrupt 0 { TR0=0; //播放结束或者播放中途切换歌曲时停止播放 Song_Index=(Song_Index+1)%3; //跳到下一首的开头 Tone_Index=0; P2=DSY_CODE[Song_Index]; //数码管显示当前音乐段号 }

void main() { P2=0xc0; SPK=0; TMOD=0x00; //T0 方式 0 IE=0x83; IT0=1; IP=0x02; while(1) { while(K1==1); //未按键等待 while(K1==0); //等待释放 TR0=1; //开始播放 Tone_Index=0; //从第0 个音符开始 //播放过程中按下 K1 可提前停止播放(K1=0)。

//若切换音乐段会触发外部中断,导致 TR0=0,播放也会停止 while(Song[Song_Index][Tone_Index]!=-1&&K1==1&&TR0==1) { DelayMS(300*Len[Song_Index][Tone_Index]); //播放延时(节拍) Tone_Index++; //当前音乐段的下一音符索引 } TR0=0; //停止播放 while(K1==0); //若提前停止播放,按键未释放时等待 } }

STC51单片机C语言开启蜂鸣器

^#include<reg52.h> sbit??beep=P0^4; void??main() {? ???beep=0; ???while(1); }试试这个怎2113样,单片机在执行完程序之5261后会回到初始状态,然后4102再重新执行程序,所以蜂鸣器就会反1653复的开和关,听起来声音会小很回多;加个while(1)死循环,让程序一直保持在beep=0的状答态。

求51单片机蜂鸣器程序

#include<reg51.h> sbit buzzer = P1^0?? ;声明区 void delay(int)?? ; void pulse_BZ(int,int,int);声明函数void main(void) { while(1) { pulse_BZ(500,1,1);? 调用发声 delay(1000);??????? 延时1000 X 0.5ms pulse_BZ(500,1,1); delay(1000); pulse_BZ(500,1,1); delay(1000); pulse_BZ(200,1,1); delay(1000); pulse_BZ(200,1,1); delay(1000); } }void delay(int x) { int i,j; for(i=0;i<x;i++) for(j=0;j<60;j++); }void pulse_BZ(int count;int TH;int TL) { int i; for(i=o;i<count;i++)??? //循环count次,时间count x 1ms { buzzer=1;?????????????? //此程序段产生1HZ 信号 delay(TH); buzzer=0; delay(TL); } } 51单片机蜂鸣器 开关C语言程序: sbit P2^0=KEY; sbit P2^1=BEEP; unsigned char KEYNUM=0; void main() { while(1) { if(KEY==0)//开关按下; { KEYNUM++; } if(KEYNUM==1)//第一次按下; { BEEP=1; //蜂鸣器响 } if(KEYNUM==2)/第二次按下; { BEEP=0; //蜂鸣器不响 KEYNUM=0; } } } 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); //延时 } }

单片机蜂鸣器

1、单片机与蜂鸣器连接图已附. 2、通常P1、P2、P3口都可以用来作为控制,P0口也可以,但因其内部无上拉电阻,所以外接时,应接一1K的上拉电阻,其他一样。

有源蜂鸣器驱动电路设计,无须外加驱动电路。

3、C语言编程为: #include//头文件 sbit d1=P1^2;//位定义,把P1口的P1.2位设为驱动口,当然其它口也可。

void main()//主函数 { d1=0//单片机默认状态为1,不用初始化了,此处直接赋值0则可驱动 }; 此为最最简单的电路程序设计。

下载后,蜂鸣器一会一直处于鸣叫状态。

你可以加一个延时函数,再把d1口置高,可让它,叫一下关闭。

也可以加个while(1)大循环,让它“滴、滴”不停地叫。

还可以设置一个按键,按一个亮一下。

随程序的变化,现象也会各不同。

半月湾hmbcloud升级500Mbps带宽,原生VPS,$4.99/月

关于半月湾HMBCloud商家之前也有几篇那文章介绍过这个商家的产品,对于他们家的其他产品我都没有多加留意,而是对他们家的DC5机房很多人还是比较喜欢的,这个比我们有些比较熟悉的某商家DC6 DC9机房限时,而且半月湾HMBCloud商家是相对便宜的。关于半月湾DC5机房的方案选择和介绍:1、半月湾三网洛杉矶DC5 CN2 GIA同款DC6 DC9 1G内存 1TB流量 月$4.992、亲测选择半...

Sharktech($49/月),10G端口 32GB内存,鲨鱼机房新用户赠送$50

Sharktech 鲨鱼机房商家我们是不是算比较熟悉的,因为有很多的服务商渠道的高防服务器都是拿他们家的机器然后部署高防VPS主机的,不过这几年Sharktech商家有自己直接销售云服务器产品,比如看到有新增公有云主机有促销活动,一般有人可能买回去自己搭建虚拟主机拆分销售的,有的也是自用的。有看到不少网友在分享到鲨鱼机房商家促销活动期间,有赠送开通公有云主机$50,可以购买最低配置的,$49/月的...

DMIT:香港国际线路vps,1.5GB内存/20GB SSD空间/4TB流量/1Gbps/KVM,$9.81/月

DMIT怎么样?DMIT是一家美国主机商,主要提供KVM VPS、独立服务器等,主要提供香港CN2、洛杉矶CN2 GIA等KVM VPS,稳定性、网络都很不错。支持中文客服,可Paypal、支付宝付款。2020年推出的香港国际线路的KVM VPS,大带宽,适合中转落地使用。现在有永久9折优惠码:July-4-Lite-10OFF,季付及以上还有折扣,非 中国路由优化;AS4134,AS4837 均...

蜂鸣器程序为你推荐
isbackground急!there is no attribute "background"怎么改?英文名网站介绍几个好的英语学习网站4k超高清视频下载为新手推荐几个获取4K片源的途径youtube创始人我的世界captainsparklez是谁pps官网pps软件下载中心 pps影视软件下载暴力破解rar怎么暴力破解rar密码?快速且有效的特斯拉model3降价特斯拉model 3中国有补贴吗flash序列号急求flash序列号cc防火墙服务器里安全狗里的WEB防火墙是什么意思元宝汇为什么我喝汇圆肾宝喝的阳痿了?
最好的虚拟主机 virpus 流媒体服务器 大容量存储 最好看的qq空间 商务主机 个人域名 合租空间 国外免费asp空间 微软服务器操作系统 注册阿里云邮箱 电信宽带测速软件 贵州电信 .htaccess gotoassist winserver2008下载 阿里云宕机故障 饭桶 租主机 丹弗润滑油 更多