6位数码管电子时钟c语言程序,利用AT89C51单片机设计简易电子钟(六位),通过8位LED数码管实现时间显示;系统可以通过三个按键实现时间...-程序员宅基地

技术标签: 6位数码管电子时钟c语言程序  

利用AT89C51单片机设计简易电子钟(六位),通过8位LED数码管实现时间显示;系统可以通过三个按键实现时间 常见问题

汇编可以么LED_1 EQU 30HLED_2 EQU 31HLED_3 EQU 32HLED_4 EQU 33HLED_5 EQU 34HLED_6 EQU 35HLED_7 EQU 36HLED_8 EQU 37HTIMER EQU 38HMODE EQU 39H ;模式判断FLASH EQU 40H ;闪烁判断 1亮 0不亮BUTTON1 EQU 41H ;按钮开关BUTTON2 EQU 42H ;按钮开关BUTTON3 EQU 43H ;按钮开关BUTTON4 EQU 44H ;按钮灵敏CS1 EQU P2.0CS2 EQU P2.1WR_ON EQU P2.2;-------------------------------; 按钮;-------------------------------IN_SET EQU P2.3IN_GAL EQU P2.4IN_SUB EQU P2.5;-------------------------------; 主程序;接口:D0-D7 接 P1.0-P1.7; CS1 P2.0 CS2 P2.1 WR P2.2;-------------------------------ORG 0000HJMP MAINORG 000BHJMP T0INTORG 0030HMAIN:CALL SYSINIT;-------------------------------START:JMP START;-------------------------------; 计时器子程序;-------------------------------T0INT:MOV TH0,#03CHMOV TL0,#0AFHCALL SHOWDJNZ BUTTON4,T0INT1MOV BUTTON4,#10CALL AJ1CALL AJ3CALL AJ5T0INT1:DJNZ TIMER,T0INTENDCALL MODE_PD1T0INTEND:RETI;-------------------------------; 模式判断;-------------------------------MODE_PD1:MOV A,MODECJNE A,#0,MODE_PD2MOV TIMER,#200CALL CADDJMP MODE_PDENDMODE_PD2:MOV A,MODECJNE A,#1,MODE_PD3MOV TIMER,#50CALL FLASH1JMP MODE_PDENDMODE_PD3:MOV A,MODECJNE A,#2,MODE_PD4MOV TIMER,#50CALL FLASH3JMP MODE_PDENDMODE_PD4:MOV A,MODECJNE A,#3,MODE_PDENDMOV TIMER,#50CALL FLASH5MODE_PDEND:RET;-------------------------------; 按钮;-------------------------------AJ1:MOV A,BUTTON1CJNE A,#1,AJ2JB IN_SET,AJENDMOV BUTTON1,#0CALL SAVE2MOV TIMER,#1INC MODEMOV A,MODECJNE A,#4,AJENDMOV MODE,#0MOV TIMER,#100JMP AJENDAJ2:MOV A,BUTTON1CJNE A,#0,AJ1JNB IN_SET,AJENDMOV BUTTON1,#1JMP AJENDAJ3:MOV A,BUTTON2CJNE A,#1,AJ4JB IN_GAL,AJENDMOV BUTTON2,#0CALL GAL1JMP AJENDAJ4:MOV A,BUTTON2CJNE A,#0,AJ3JNB IN_GAL,AJENDMOV BUTTON2,#1JMP AJENDAJ5:MOV A,BUTTON3CJNE A,#1,AJ6JB IN_SUB,AJENDMOV BUTTON3,#0CALL SUB1JMP AJENDAJ6:MOV A,BUTTON3CJNE A,#0,AJ5JNB IN_SUB,AJENDMOV BUTTON3,#1JMP AJENDAJEND:RET;-------------------------------; 加法;-------------------------------GAL1:MOV A,MODECJNE A,#3,GAL2INC 58HMOV A,58HCJNE A,#10,GALENDMOV 58H,#0INC 57HMOV A,57HCJNE A,#6,GALENDMOV 57H,#0GAL2:MOV A,MODECJNE A,#2,GAL3INC 55HMOV A,55HCJNE A,#10,GALENDMOV 55H,#0INC 54HMOV A,54HCJNE A,#6,GALENDMOV 54H,#0GAL3:MOV A,MODECJNE A,#1,GALENDINC 52HMOV A,52HCJNE A,#10,GAL32MOV 52H,#0INC 51HGAL32:CJNE A,#4,GALENDMOV A,51HCJNE A,#2,GALENDMOV 52H,#0MOV 51H,#0GALEND:CALL SAVE2RET;-------------------------------; 减法;-------------------------------SUB1:MOV A,MODECJNE A,#3,SUB2DEC 58HMOV A,58HCJNE A,#-1,SUBENDMOV 58H,#9DEC 57HMOV A,57HCJNE A,#-1,SUBENDMOV 57H,#5SUB2:MOV A,MODECJNE A,#2,SUB3DEC 55HMOV A,55HCJNE A,#-1,SUBENDMOV 55H,#9DEC 54HMOV A,54HCJNE A,#-1,SUBENDMOV 54H,#5SUB3:MOV A,MODECJNE A,#1,SUBENDDEC 52HMOV A,52HCJNE A,#-1,SUBENDMOV 52H,#9DEC 51HMOV A,51HCJNE A,#-1,GALENDMOV 52H,#3MOV 51H,#2SUBEND:CALL SAVE2RET;-------------------------------; 闪烁;-------------------------------FLASH1:MOV A,FLASHCJNE A,#0,FLASH2MOV 51H,LED_1MOV 52H,LED_2MOV LED_1,#11MOV LED_2,#11MOV FLASH,#1JMP FLASHENDFLASH2:MOV A,FLASHCJNE A,#1,FLASHENDMOV LED_1,51HMOV LED_2,52HMOV FLASH,#0JMP FLASHEND ;小时闪烁FLASH3:MOV A,FLASHCJNE A,#0,FLASH4MOV 54H,LED_4MOV 55H,LED_5MOV LED_4,#11MOV LED_5,#11MOV FLASH,#1JMP FLASHENDFLASH4:MOV A,FLASHCJNE A,#1,FLASHENDMOV LED_4,54HMOV LED_5,55HMOV FLASH,#0 JMP FLASHEND ;分钟闪烁FLASH5:MOV A,FLASHCJNE A,#0,FLASH6MOV 57H,LED_7MOV 58H,LED_8MOV LED_7,#11MOV LED_8,#11MOV FLASH,#1JMP FLASHENDFLASH6:MOV A,FLASHCJNE A,#1,FLASHENDMOV LED_7,57HMOV LED_8,58HMOV FLASH,#0 ;秒钟闪烁FLASHEND:RET;-------------------------------; 数据加减;-------------------------------CADD:INC LED_8MOV A,LED_8CJNE A,#10,CADDENDMOV LED_8,#0INC LED_7MOV A,LED_7CJNE A,#6,CADDENDMOV LED_7,#0INC LED_5MOV A,LED_5CJNE A,#10,CADDENDMOV LED_5,#0INC LED_4MOV A,LED_4CJNE A,#6,CADDENDMOV LED_4,#0INC LED_2MOV A,LED_2CJNE A,#10,CADD2MOV LED_2,#0INC LED_1CADD2:CJNE A,#4,CADDENDMOV A,LED_1CJNE A,#2,CADDENDCALL SYSINITCADDEND:CALL SAVE1RET;-------------------------------; 数据显示;-------------------------------SHOW:MOV R0,#30HMOV R1,#8MOV R2,#01111111BSHOW1:MOV A,R2MOV P0,ACALL CS2_ONRR AMOV R2,AMOV A,@R0MOVC A,@A+DPTRMOV P0,ACALL CS1_ONCALL DELAYMOV P0,#0FFHCALL CS1_ONCALL CS2_ONINC R0DJNZ R1,SHOW1RETCS1_ON:CLR WR_ONCLR CS1SETB WR_ONSETB CS1RETCS2_ON:CLR WR_ONCLR CS2SETB WR_ONSETB CS2RET;-------------------------------; 数据储存;-------------------------------SAVE1:MOV 51H,LED_1MOV 52H,LED_2MOV 54H,LED_4MOV 55H,LED_5MOV 57H,LED_7MOV 58H,LED_8RETSAVE2:MOV LED_1,51HMOV LED_2,52HMOV LED_4,54HMOV LED_5,55HMOV LED_7,57HMOV LED_8,58HRET;-------------------------------; 数据初始化;-------------------------------SYSINIT:MOV LED_1,#0MOV LED_2,#0MOV LED_3,#10MOV LED_4,#0MOV LED_5,#0MOV LED_6,#10MOV LED_7,#0MOV LED_8,#0CALL SAVE1MOV TIMER,#200MOV MODE,#0MOV FLASH,#0MOV BUTTON1,#1MOV BUTTON2,#1MOV BUTTON3,#1MOV BUTTON4,#3MOV TH0,#03CHMOV TL0,#0AFHSETB TR0SETB ET0SETB EAMOV DPTR,#TABRET;-------------------------------; 延迟;-------------------------------DELAY:MOV R6,#255DJNZ R6,$RET;-------------------------------; 段码;-------------------------------TAB:DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0BFH,0FFH;0- "0";1- "1";2- "2";...;9- "9";10-"-";11-" "END

版权声明:本文为博主原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明。
本文链接:https://blog.csdn.net/weixin_39796878/article/details/117099011

智能推荐

Docker 快速上手学习入门教程_docker菜鸟教程-程序员宅基地

文章浏览阅读2.5w次,点赞6次,收藏50次。官方解释是,docker 容器是机器上的沙盒进程,它与主机上的所有其他进程隔离。所以容器只是操作系统中被隔离开来的一个进程,所谓的容器化,其实也只是对操作系统进行欺骗的一种语法糖。_docker菜鸟教程

电脑技巧:Windows系统原版纯净软件必备的两个网站_msdn我告诉你-程序员宅基地

文章浏览阅读5.7k次,点赞3次,收藏14次。该如何避免的,今天小编给大家推荐两个下载Windows系统官方软件的资源网站,可以杜绝软件捆绑等行为。该站提供了丰富的Windows官方技术资源,比较重要的有MSDN技术资源文档库、官方工具和资源、应用程序、开发人员工具(Visual Studio 、SQLServer等等)、系统镜像、设计人员工具等。总的来说,这两个都是非常优秀的Windows系统镜像资源站,提供了丰富的Windows系统镜像资源,并且保证了资源的纯净和安全性,有需要的朋友可以去了解一下。这个非常实用的资源网站的创建者是国内的一个网友。_msdn我告诉你

vue2封装对话框el-dialog组件_<el-dialog 封装成组件 vue2-程序员宅基地

文章浏览阅读1.2k次。vue2封装对话框el-dialog组件_

MFC 文本框换行_c++ mfc同一框内输入二行怎么换行-程序员宅基地

文章浏览阅读4.7k次,点赞5次,收藏6次。MFC 文本框换行 标签: it mfc 文本框1.将Multiline属性设置为True2.换行是使用"\r\n" (宽字符串为L"\r\n")3.如果需要编辑并且按Enter键换行,还要将 Want Return 设置为 True4.如果需要垂直滚动条的话将Vertical Scroll属性设置为True,需要水平滚动条的话将Horizontal Scroll属性设_c++ mfc同一框内输入二行怎么换行

redis-desktop-manager无法连接redis-server的解决方法_redis-server doesn't support auth command or ismis-程序员宅基地

文章浏览阅读832次。检查Linux是否是否开启所需端口,默认为6379,若未打开,将其开启:以root用户执行iptables -I INPUT -p tcp --dport 6379 -j ACCEPT如果还是未能解决,修改redis.conf,修改主机地址:bind 192.168.85.**;然后使用该配置文件,重新启动Redis服务./redis-server redis.conf..._redis-server doesn't support auth command or ismisconfigured. try

实验四 数据选择器及其应用-程序员宅基地

文章浏览阅读4.9k次。济大数电实验报告_数据选择器及其应用

随便推点

灰色预测模型matlab_MATLAB实战|基于灰色预测河南省社会消费品零售总额预测-程序员宅基地

文章浏览阅读236次。1研究内容消费在生产中占据十分重要的地位,是生产的最终目的和动力,是保持省内经济稳定快速发展的核心要素。预测河南省社会消费品零售总额,是进行宏观经济调控和消费体制改变创新的基础,是河南省内人民对美好的全面和谐社会的追求的要求,保持河南省经济稳定和可持续发展具有重要意义。本文建立灰色预测模型,利用MATLAB软件,预测出2019年~2023年河南省社会消费品零售总额预测值分别为21881...._灰色预测模型用什么软件

log4qt-程序员宅基地

文章浏览阅读1.2k次。12.4-在Qt中使用Log4Qt输出Log文件,看这一篇就足够了一、为啥要使用第三方Log库,而不用平台自带的Log库二、Log4j系列库的功能介绍与基本概念三、Log4Qt库的基本介绍四、将Log4qt组装成为一个单独模块五、使用配置文件的方式配置Log4Qt六、使用代码的方式配置Log4Qt七、在Qt工程中引入Log4Qt库模块的方法八、获取示例中的源代码一、为啥要使用第三方Log库,而不用平台自带的Log库首先要说明的是,在平时开发和调试中开发平台自带的“打印输出”已经足够了。但_log4qt

100种思维模型之全局观思维模型-67_计算机中对于全局观的-程序员宅基地

文章浏览阅读786次。全局观思维模型,一个教我们由点到线,由线到面,再由面到体,不断的放大格局去思考问题的思维模型。_计算机中对于全局观的

线程间控制之CountDownLatch和CyclicBarrier使用介绍_countdownluach于cyclicbarrier的用法-程序员宅基地

文章浏览阅读330次。一、CountDownLatch介绍CountDownLatch采用减法计算;是一个同步辅助工具类和CyclicBarrier类功能类似,允许一个或多个线程等待,直到在其他线程中执行的一组操作完成。二、CountDownLatch俩种应用场景: 场景一:所有线程在等待开始信号(startSignal.await()),主流程发出开始信号通知,既执行startSignal.countDown()方法后;所有线程才开始执行;每个线程执行完发出做完信号,既执行do..._countdownluach于cyclicbarrier的用法

自动化监控系统Prometheus&Grafana_-自动化监控系统prometheus&grafana实战-程序员宅基地

文章浏览阅读508次。Prometheus 算是一个全能型选手,原生支持容器监控,当然监控传统应用也不是吃干饭的,所以就是容器和非容器他都支持,所有的监控系统都具备这个流程,_-自动化监控系统prometheus&grafana实战

React 组件封装之 Search 搜索_react search-程序员宅基地

文章浏览阅读4.7k次。输入关键字,可以通过键盘的搜索按钮完成搜索功能。_react search