51单片机蜂鸣器实现《卡农》代码,连接一个蜂鸣器到P2.5口

时间: 2023-11-13 15:03:30 浏览: 93
以下是51单片机实现《卡农》的蜂鸣器代码,使用定时器0实现: ```c #include <reg51.h> #define uchar unsigned char #define uint unsigned int uchar code music[]={0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c, 0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c, 0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1c, 0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c, 0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1c,0x1c, 0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1d,0x1c,0x1c,0x1c,0x1c, 0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c,0x1f,0x1c,0x1c, 0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1e,0x1c,0x1c,0x1c,0x1c}; //乐谱数组 uchar cnt; //计数变量 void delay(uint z) //延时函数 { uint x,y; for(x=z;x>0;x--) for(y=114;y>0;y--); } void timer0() interrupt 1 //定时器0中断 { TH0=(65536-1000)/256; //重新加载初值 TL0=(65536-1000)%256; cnt++; //计数器自增 if(cnt>=sizeof(music)) //计数器达到乐谱数组长度时清零 cnt=0; P2=music[cnt]; //输出下一个音符 } void main() { TMOD=0x01; //定时器0,工作方式1 TH0=(65536-1000)/256; //给定初值 TL0=(65536-1000)%256; TR0=1; //启动定时器0 ET0=1; //使能定时器0中断 EA=1; //使能总中断 while(1); } ``` 将蜂鸣器连接到P2.5口。

相关推荐

最新推荐

recommend-type

51单片机驱动无源蜂鸣器

在学习过程中遇到如下例题:8个发光管由上至下间隔1s流动,其中每个管亮500ms,灭500ms,亮时蜂鸣器响,灭时关闭蜂鸣器,一直重复下去。
recommend-type

蜂鸣器和弦音实现基于瑞萨单片机实现电路+代码.doc

现在一些带按键显示控制面板的家电(比较常见的是柜式空调)在按键操作的时候会有悦耳的和弦音发出,特别是开关机或操作上下键时会有不同变调的和弦音,相比普通的嘀嘀...基于瑞萨单片机实现代码,内有原理图、程序代码
recommend-type

基于AT89C51 单片机的节拍器

目前市场上的机械摆动式结构的节拍器节拍声音单调,调节不便,节拍准确度不高,...为此用AT98C51 单片机为控制核心设计制作了用鲜艳颜色的数码管显示节拍数的节拍器,看得见节拍数,听得清节拍声,克服了机械式节拍器的不足。
recommend-type

基于单片机AT89C51的电动自行车快速充电器的设计

本文旨在研究开发一个根据电池饱和的程度智能改变充电模式,并可在较短时间(四小时)内将电池充好的电动自行车快速充电器(电池规格36V、12A)。 二、脉冲快速充电法 脉冲充电方式即脉冲电流间歇对电池充电,充电...
recommend-type

scrapy练习 获取喜欢的书籍

主要是根据网上大神做的 项目一 https://zhuanlan.zhihu.com/p/687522335
recommend-type

zigbee-cluster-library-specification

最新的zigbee-cluster-library-specification说明文档。
recommend-type

管理建模和仿真的文件

管理Boualem Benatallah引用此版本:布阿利姆·贝纳塔拉。管理建模和仿真。约瑟夫-傅立叶大学-格勒诺布尔第一大学,1996年。法语。NNT:电话:00345357HAL ID:电话:00345357https://theses.hal.science/tel-003453572008年12月9日提交HAL是一个多学科的开放存取档案馆,用于存放和传播科学研究论文,无论它们是否被公开。论文可以来自法国或国外的教学和研究机构,也可以来自公共或私人研究中心。L’archive ouverte pluridisciplinaire
recommend-type

【实战演练】MATLAB用遗传算法改进粒子群GA-PSO算法

![MATLAB智能算法合集](https://static.fuxi.netease.com/fuxi-official/web/20221101/83f465753fd49c41536a5640367d4340.jpg) # 2.1 遗传算法的原理和实现 遗传算法(GA)是一种受生物进化过程启发的优化算法。它通过模拟自然选择和遗传机制来搜索最优解。 **2.1.1 遗传算法的编码和解码** 编码是将问题空间中的解表示为二进制字符串或其他数据结构的过程。解码是将编码的解转换为问题空间中的实际解的过程。常见的编码方法包括二进制编码、实数编码和树形编码。 **2.1.2 遗传算法的交叉和
recommend-type

openstack的20种接口有哪些

以下是OpenStack的20种API接口: 1. Identity (Keystone) API 2. Compute (Nova) API 3. Networking (Neutron) API 4. Block Storage (Cinder) API 5. Object Storage (Swift) API 6. Image (Glance) API 7. Telemetry (Ceilometer) API 8. Orchestration (Heat) API 9. Database (Trove) API 10. Bare Metal (Ironic) API 11. DNS
recommend-type

JSBSim Reference Manual

JSBSim参考手册,其中包含JSBSim简介,JSBSim配置文件xml的编写语法,编程手册以及一些应用实例等。其中有部分内容还没有写完,估计有生之年很难看到完整版了,但是内容还是很有参考价值的。