基于单片机用四位共阳极数码管显示上限,下限和当个前值的keil程序

时间: 2024-02-23 07:00:42 浏览: 24
以下是基于STC89C52单片机和共阳极数码管的Keil程序示例,用于显示上限、下限和当前值: ``` #include <reg52.h> #include <intrins.h> // 数码管显示表,0~9对应的值 unsigned char code num_table[10] = {0xC0, 0xF9, 0xA4, 0xB0, 0x99, 0x92, 0x82, 0xF8, 0x80, 0x90}; // 定义数码管位选引脚 sbit DIG_1 = P1^0; sbit DIG_2 = P1^1; sbit DIG_3 = P1^2; sbit DIG_4 = P1^3; // 定义数码管段选引脚 sbit SEG_A = P2^0; sbit SEG_B = P2^1; sbit SEG_C = P2^2; sbit SEG_D = P2^3; sbit SEG_E = P2^4; sbit SEG_F = P2^5; sbit SEG_G = P2^6; sbit SEG_DP = P2^7; // 定义上限、下限和当前值 unsigned char upper_limit = 99; unsigned char lower_limit = 0; unsigned char current_value = 50; // 定义蜂鸣器引脚 sbit BEEP = P3^7; // 数码管显示函数 void display(unsigned char num) { unsigned char i; // 数码管位选和段选的映射表,用于设置相应的引脚状态 unsigned char code seg_map[4] = {0xFE, 0xFD, 0xFB, 0xF7}; // 数码管位选 DIG_1 = 1; DIG_2 = 1; DIG_3 = 1; DIG_4 = 1; // 数码管段选 for (i = 0; i < 4; i++) { P2 = seg_map[i]; // 设置段选引脚状态 P0 = num_table[num % 10]; // 显示个位数 if (i == 1) SEG_DP = 1; // 小数点控制 _nop_(); // 延时 _nop_(); DIG_1 = 0; // 第一位数码管亮 P0 = num_table[num / 10]; // 显示十位数 if (i == 2) SEG_DP = 0; // 小数点控制 _nop_(); _nop_(); DIG_2 = 0; // 第二位数码管亮 P0 = 0x00; // 关闭数码管 SEG_DP = 0; DIG_3 = 0; // 第三位数码管亮 DIG_4 = 0; // 第四位数码管亮 } } // 蜂鸣器报警函数 void beep() { unsigned char i; for (i = 0; i < 50; i++) { BEEP = 0; // 发出蜂鸣器声音 _nop_(); _nop_(); BEEP = 1; // 关闭蜂鸣器 _nop_(); _nop_(); } } void main() { while (1) { // 读取当前值 current_value = P0; // 判断当前值是否超出上限或下限 if (current_value > upper_limit) { beep(); // 超出上限,发出蜂鸣器报警 current_value = upper_limit; // 修正当前值为上限 } else if (current_value < lower_limit) { beep(); // 超出下限,发出蜂鸣器报警 current_value = lower_limit; // 修正当前值为下限 } // 在数码管上显示当前值、上限和下限 display(current_value); display(upper_limit); display(lower_limit); } } ``` 该程序使用P0口读取当前值,通过数码管显示上限、下限和当前值,并在超出范围时发出蜂鸣器报警。具体的数码管位选和段选引脚需要根据具体的电路连接进行修改。同时,需要根据具体的数码管类型和显示要求进行调整。

相关推荐

最新推荐

recommend-type

基于STM32单片机流水灯仿真与程序设计

本次程序设计和仿真是基于Proteus和keil的环境对STM32F103系列单片机进行流水灯设计,通过配置STM32的GPIO工作模式,实现LED的点亮和熄灭;通过配置8位流水灯程序设计,实现灯的流水实现。 关键字:Proteus、keil、...
recommend-type

组成原理课程实验:MIPS 流水线CPU、实现36条指令、转发、冒险检测-内含源码和说明书.zip

组成原理课程实验:MIPS 流水线CPU、实现36条指令、转发、冒险检测-内含源码和说明书.zip
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

实现实时数据湖架构:Kafka与Hive集成

![实现实时数据湖架构:Kafka与Hive集成](https://img-blog.csdnimg.cn/img_convert/10eb2e6972b3b6086286fc64c0b3ee41.jpeg) # 1. 实时数据湖架构概述** 实时数据湖是一种现代数据管理架构,它允许企业以低延迟的方式收集、存储和处理大量数据。与传统数据仓库不同,实时数据湖不依赖于预先定义的模式,而是采用灵活的架构,可以处理各种数据类型和格式。这种架构为企业提供了以下优势: - **实时洞察:**实时数据湖允许企业访问最新的数据,从而做出更明智的决策。 - **数据民主化:**实时数据湖使各种利益相关者都可
recommend-type

用 Python 画一个可以动的爱心

好的,我可以帮助您使用Python来绘制一个动态的爱心。您可以使用turtle库来实现。以下是实现代码: ```python import turtle import math # 设置画布和画笔 canvas = turtle.Screen() canvas.bgcolor("black") pencil = turtle.Turtle() pencil.speed(0) pencil.color("red", "pink") pencil.pensize(3) # 定义爱心函数 def draw_love(heart_size, x_offset=0, y_offset=0):
recommend-type

JSBSim Reference Manual

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

"互动学习:行动中的多样性与论文攻读经历"

多样性她- 事实上SCI NCES你的时间表ECOLEDO C Tora SC和NCESPOUR l’Ingén学习互动,互动学习以行动为中心的强化学习学会互动,互动学习,以行动为中心的强化学习计算机科学博士论文于2021年9月28日在Villeneuve d'Asq公开支持马修·瑟林评审团主席法布里斯·勒菲弗尔阿维尼翁大学教授论文指导奥利维尔·皮耶昆谷歌研究教授:智囊团论文联合主任菲利普·普雷教授,大学。里尔/CRISTAL/因里亚报告员奥利维耶·西格德索邦大学报告员卢多维奇·德诺耶教授,Facebook /索邦大学审查员越南圣迈IMT Atlantic高级讲师邀请弗洛里安·斯特鲁布博士,Deepmind对于那些及时看到自己错误的人...3谢谢你首先,我要感谢我的两位博士生导师Olivier和Philippe。奥利维尔,"站在巨人的肩膀上"这句话对你来说完全有意义了。从科学上讲,你知道在这篇论文的(许多)错误中,你是我可以依
recommend-type

实现实时监控告警系统:Kafka与Grafana整合

![实现实时监控告警系统:Kafka与Grafana整合](https://imgconvert.csdnimg.cn/aHR0cHM6Ly9tbWJpei5xcGljLmNuL21tYml6X2pwZy9BVldpY3ladXVDbEZpY1pLWmw2bUVaWXFUcEdLT1VDdkxRSmQxZXB5R1lxaWNlUjA2c0hFek5Qc3FyRktudFF1VDMxQVl3QTRXV2lhSWFRMEFRc0I1cW1ZOGcvNjQw?x-oss-process=image/format,png) # 1.1 Kafka集群架构 Kafka集群由多个称为代理的服务器组成,这
recommend-type

已知n个人(以编号0,1,2,3...n-1分别表示)围坐在一张圆桌周围。从编号为0的人开始报数1,数到m的那个人出列;他的下一个人又从1开始报数,数到m+1的那个人又出列(每次报数值加1);依此规律重复下去,直到圆桌周围的人全部出列。用递归方法解决

这个问题可以使用递归方法解决。下面是一个思路: 1. 定义一个函数,接收三个参数:n、m、i,表示还剩下n个人,每次数到m时出列,当前报数的人是i; 2. 如果n=1,返回i,即最后留下的那个人的编号; 3. 否则,计算出下一个出列的人的编号j,通过递归调用函数解决n-1个人的问题,其结果为k; 4. 如果k < j,即当前i之后出列的人的编号为k,需要将k转换为在i之前出列的编号,返回值为 k+(n-1); 5. 如果k>=j,即当前i之后出列的人的编号为k,返回值为 k-(j-1); 下面是对应的Python代码: ```python def josephus(n, m, i):