蜂鸣器程序单片机蜂鸣器

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

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

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

VinaHost,越南vps,国内延时100MS;不限流量100Mbps

vinahost怎么样?vinahost是一家越南的主机商家,至今已经成13年了,企业运营,老牌商家,销售VPS、虚拟主机、域名、邮箱、独立服务器等,机房全部在越南,有Viettle和VNPT两个机房,其中VNPT机房中三网直连国内的机房,他家的产品优势就是100Mbps不限流量。目前,VinaHost商家发布了新的优惠,购买虚拟主机、邮箱、云服务器、VPS超过三个月都有赠送相应的时长,最高送半年...

天上云月付572元,起香港三网CN2直连,独立服务器88折优惠,香港沙田机房

天上云怎么样?天上云隶属于成都天上云网络科技有限公司,是一家提供云服务器及物理服务器的国人商家,目前商家针对香港物理机在做优惠促销,香港沙田机房采用三网直连,其中电信走CN2,带宽为50Mbps,不限制流量,商家提供IPMI,可以自行管理,随意安装系统,目前E3-1225/16G的套餐低至572元每月,有做大规模业务的朋友可以看看。点击进入:天上云官方网站天上云香港物理机服务器套餐:香港沙田数据中...

UCloud云服务器香港临时补货,(Intel)CN2 GIA优化线路,上车绝佳时机

至今为止介绍了很多UCLOUD云服务器的促销活动,UCLOUD业者以前看不到我们的个人用户,即使有促销活动,续费也很少。现在新用户的折扣力很大,包括旧用户在内也有一部分折扣。结果,我们的用户是他们的生存动力。没有共享他们的信息的理由是比较受欢迎的香港云服务器CN2GIA线路产品缺货。这不是刚才看到邮件注意和刘先生的通知,而是补充UCLOUD香港云服务器、INTELCPU配置的服务器。如果我们需要他...

蜂鸣器程序为你推荐
南宁虚拟空间南宁自由空间在哪里?公众号付费阅读如何申请微信付费阅读功能网络安全密钥一般路由器是网络安全密钥是多少东兴证券网站东兴证券开户是假的吗?怎么查微信注册时间微信号用了多久,怎么知道短信套餐手机短信都有什么套餐acceptchangesaltium designer 6.0如何给元件重新编号btestBTEST软件测试工程师培训女孩适合学吗?就业前景如何呢?如何查看qq特别关心我的人qq空间特别关心我的人怎么看网页背景音乐代码网页背景音乐的源码一般在哪?
上海虚拟主机 东莞虚拟主机 域名查询系统 北京vps 3322免费域名 什么是域名地址 vir java主机 56折 typecho 国内加速器 警告本网站美国保护 柚子舍官网 微软服务器操作系统 网站在线扫描 starry 网页加速 godaddy空间 香港博客 碳云 更多