蜂鸣器程序单片机蜂鸣器

蜂鸣器程序  时间: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)大循环,让它“滴、滴”不停地叫。

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

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

月神科技:香港CN2/洛杉矶CN2/华中电信高防vps,月付20元起

月神科技怎么样?月神科技是由江西月神科技有限公司运营的一家自营云产品的IDC服务商,提供香港安畅、香港沙田、美国CERA、华中电信等机房资源,月神科技有自己的用户群和拥有创宇认证,并且也有电商企业将业务架设在月神科技的平台上。目前,香港CN2云服务器、洛杉矶CN2云主机、华中电信高防vps,月付20元起。点击进入:月神科技官方网站地址月神科技vps优惠信息:香港安畅CN2-GIA低至20元核心:2...

SugarHosts糖果主机圣诞节促销 美国/香港虚拟主机低至6折

SugarHosts 糖果主机商我们算是比较熟悉的,早年学会建站的时候开始就用的糖果虚拟主机,目前他们家还算是为数不多提供虚拟主机的商家,有提供香港、美国、德国等虚拟主机机房。香港机房CN2速度比较快,美国机房有提供优化线路和普通线路适合外贸业务。德国欧洲机房适合欧洲业务的虚拟主机。糖果主机商一般是不会发布黑五活动的,他们在圣圣诞节促销活动是有的,我们看到糖果主机商发布的圣诞节促销虚拟主机低至6折...

Sharktech云服务器35折年付33美元起,2G内存/40G硬盘/4TB流量/多机房可选

Sharktech又称SK或者鲨鱼机房,是一家主打高防产品的国外商家,成立于2003年,提供的产品包括独立服务器租用、VPS云服务器等,自营机房在美国洛杉矶、丹佛、芝加哥和荷兰阿姆斯特丹等。之前我们经常分享商家提供的独立服务器产品,近期主机商针对云虚拟服务器(CVS)提供优惠码,优惠后XS套餐年付最低仅33.39美元起,支持使用支付宝、PayPal、信用卡等付款方式。下面以XS套餐为例,分享产品配...

蜂鸣器程序为你推荐
订房系统什么是酒店客房控制系统?最好的翻译网站求最好的翻译网站和软件java程序员招聘女java程序员好找工作嘛如何查看qq特别关心我的人qq空间特别关心我的人怎么看data什么意思c语言 data的作用手机在线客服vivo人工客服电话多少手机在线客服怎样和oppo客服在线交流flv转avi为什么将flv格式转换成avi格式就不太清楚啦cpu仪表盘华硕cpu温度显示搞没了怎么设备回来啊ps文字处理Photoshop cs3中的文字处理(如图)
个人域名备案流程 拜登买域名批特朗普 sharktech ion 新加坡服务器 Dedicated sugarsync 服务器怎么绑定域名 typecho 网站实时监控 华为4核 太原联通测速平台 dux 域名转接 hostloc 699美元 赞助 域名和空间 申请网页 环聊 更多