8位数码管电子时钟仿真图及程序源代码
利用8位数码管显示时间，原理与4位数码管显示的基本一样
仿真图：
程序源代码:
本程序已经通过在线软件仿真和硬件制作.
org 0000h ;程序开始入口地址
sjmp main ;跳转至主程序
org 000bh ;t0中断入口地址
ljmp inti0 ;跳转至t0中断程序
org 001bh ;t1中断入口地址
ljmp inti1 ;跳转至t1中断程序
org 0030h
main:mov tmod,#11h ;设t0、t1为模式1
mov ie,#8ah ;开t0、t1允许中断
mov th0,#4ch ;赋t0 50ms初值
mov tl0,#00h
mov th1,#4ch ;赋t1 50ms初值
mov tl1,#00h
mov sp,#60h ;设置堆栈指针
mov 38h,#00 ;闹钟分初值
mov 39h,#00 ;闹钟时初值
mov 31h,#00 ;时间秒初值
mov 32h,#00 ;时间分初值
mov 33h,#00 ;时间时初值
setb tr0 ;启动定时器t0
setb tr1 ;启动定时器t1
loop:lcall display ;调用时间显示程序
lcall keysan ;调用时间调节按钮
lcall keynz ;调用闹钟控制按钮
ajmp loop
inti0:push psw ;压入堆栈指针，保护现场
push acc
clr ea ;关中断www.dgzj.com
mov th0,#4ch ;重赋t0定时初值
mov tl0,#00h
inc 3ah ;3ah为50ms计数单元
mov a,3ah
cjne a,#20,out ;1秒计数是否到
mov 3ah,#00 ;清50ms计数初值
inc 31h ;秒加1
mov a,31h
cjne a,#60,out ;60秒计数是否到
mov 31h,#00
inc 32h ;分加1
mov a,32h
cjne a,#60,out ;60分计数是否到
mov 32h,#00
inc 33h ;时加1
mov a,33h
cjne a,#24,out ;24时计数是否到
mov 33h,#00
out: setb ea ;开中断
pop acc ;弹出堆栈指针，恢复现场
pop psw
reti ;中断返回
inti1:push psw ;压入堆栈指针，恢复现场
push acc
clr ea
mov th1,#4ch ;重赋t1定时初值
mov tl1,#00h
inc 71h ;71h为50ms计数单元
mov a,71h
cjne a,#20,out1
mov 71h,#00
mov a,32h ;闹钟判断
cjne a,38h,out1 ;闹钟时间分判断
mov a,33h
cjne a,39h,out1 ;闹钟时间时判断
clr p1.0 ;到闹钟时间，清p1.0
out1:setb ea ;开中断
pop acc
pop psw
reti ;中断返回
display:mov a,31h ;秒显示
mov b,#10
p ab
mov 20h,a ;将十位放入20h单元
mov 21h,b ;将个位、余数放入21h单元
disp1: mov a,20h ;秒十位显示
mov dptr,#table
movc a,@a+dptr ;将a的内容+table内容，结果回存给a
mov p0,a ;将a给p0口
clr p2.6 ;清p2.6,点亮第7位数码管
lcall del1ms ;调用1ms延时子程序
setb p2.6 ;灭第7位数码管
disp2: mov a,21h ;秒个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.7
lcall del1ms
setb p2.7
disp4: mov a,32h ;分显示
mov b,#10
p ab
mov 22h,a
mov 23h,b
disp5: mov a,22h ;分十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.3
lcall del1ms
setb p2.3
disp6: mov a,23h ;分个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.4
lcall del1ms
setb p2.4
disp7: mov a,33h ;时显示
mov b,#10
p ab
mov 24h,a
mov 25h,b
disp8: mov a,24h ;时十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.0
lcall del1ms
setb p2.0
disp9: mov a,25h ;时个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.1
lcall del1ms
setb p2.1
disp10: mov 34h,#0bfh ;-显示
mov a,34h
mov p0,a
clr p2.5
lcall del1ms
setb p2.5
disp11: mov 35h,#0bfh ;-显示
mov a,35h
mov p0,a
clr p2.2
lcall del1ms
setb p2.2
ret
display1:mov a,38h ;闹钟分显示
mov b,#10
p ab
mov 26h,a
mov 27h,b
d1:mov a,26h ;闹钟分十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.3
lcall del1ms
setb p2.3
d2:mov a,27h ;闹钟分个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.4
lcall del1ms
setb p2.4
dispnz: mov a,39h ;闹钟时显示
mov b,#10
p ab
mov 28h,a
mov 29h,b
d5: mov a,28h ;闹钟时十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.0
lcall del1ms
setb p2.0
d6: mov a,29h ;闹钟时个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.1
lcall del1ms
setb p2.1
mov 35h,#0bfh ;-显示
mov a,35h
mov p0,a
clr p2.2
lcall del1ms
setb p2.2
ret
table:db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h ;数字0—9
del1ms:mov r7,#10 ;1ms延时子程序
del1: mov r6,#50
del2:djnz r6,del2
djnz r7,del1
ret
del20ms:mov r5,#40 ;20ms延时子程序
del3: mov r4,#250
del4: djnz r4,del4
djnz r5,del3
ret
keysan:jnb p3.1,key1 ;秒加1按钮
jnb p3.2,key2 ;分加1按钮
jnb p3.3,key3 ;时加1按钮
sjmp keyout
key1: lcall del20ms
jb p3.1,keyout
jnb p3.1,$
inc 31h ;秒加1
mov a,31h
cjne a,#60,keyout
mov 31h,#00
sjmp keyout
key2:lcall del20ms
jb p3.2,keyout
jnb p3.2,$
inc 32h ;分加1
mov a,32h
cjne a,#60,keyout
mov 32h,#00
sjmp keyout
key3:lcall del20ms
jb p3.3,keyout
jnb p3.3,$
inc 33h ;时加1
mov a,33h
cjne a,#24,keyout
mov 33h,#00
sjmp keyout
keyout:ret
keynz:jnb p3.4,keynz4 ;显示闹钟并可修改和显示当前时间
jnb p3.7,keynz5
jnb p3.5,nz3
jnb p3.6,nz4
sjmp nzout
nzout:ret
nz2:lcall display1
jnb p3.5,nz3
jnb p3.6,nz4
keynz4:jnb p3.4,nz2
sjmp nzout
nz3:lcall del20ms
jb p3.5,nzout
jnb p3.5,$
inc 38h
mov a,38h
cjne a,#60,nzout
mov 38h,#00
sjmp nzout
nz4:lcall del20ms
jb p3.6,nzout
jnb p3.6,$
inc 39h
mov a,39h
cjne a,#24,nzout
mov 39h,#00
sjmp keyout
keynz5:jb p3.7,nzout
jnb p3.7,$
setb p1.0
sjmp nzout
HFAN-08.2.1: PWM Temperature C
英国科学家：工业系统将成为下一波黑客攻击的目标
UWB 如何工作？如何使用UWB进行测距和位置？
智能家居的下一个应用场景在智能汽车中
三星首款5G折叠手机售价近2000美元 试图超越苹果和中国竞争对手
8位数码管电子时钟仿真图及程序源代码
城市轨道交通视频监控系统的架构、特点及功能实现
电瓶修复知识：浮充电压的设置对蓄电池寿命的影响
小米自主研发的松果处理器究竟如何？ 别抱太大希望
功率模块铜线键合工艺参数优化设计方案
iPhone6仍支持True TOne双LED闪光灯
激光焊锡的几种工艺介绍
部分流行安卓应用程序与脸书共享用户的数据
Omniverse 资讯速递 | 行业动态、应用案例、创作者故事等你来解锁！
家用电器的节电技巧分享
三星Galaxy A80 5G新机或再次采用滑动翻转式摄像头
一套完整的家庭“安全卫士”系统方案解析
贴片电阻器的制造工艺流程_贴片电阻器的阻值测试方法
Polhemus LIBERTY LATUS无线电磁位置跟踪系统的简介
更加环保的锂—二氧化碳电池推出，具有更高能量密度的应用优势
仿真图：
程序源代码:
本程序已经通过在线软件仿真和硬件制作.
org 0000h ;程序开始入口地址
sjmp main ;跳转至主程序
org 000bh ;t0中断入口地址
ljmp inti0 ;跳转至t0中断程序
org 001bh ;t1中断入口地址
ljmp inti1 ;跳转至t1中断程序
org 0030h
main:mov tmod,#11h ;设t0、t1为模式1
mov ie,#8ah ;开t0、t1允许中断
mov th0,#4ch ;赋t0 50ms初值
mov tl0,#00h
mov th1,#4ch ;赋t1 50ms初值
mov tl1,#00h
mov sp,#60h ;设置堆栈指针
mov 38h,#00 ;闹钟分初值
mov 39h,#00 ;闹钟时初值
mov 31h,#00 ;时间秒初值
mov 32h,#00 ;时间分初值
mov 33h,#00 ;时间时初值
setb tr0 ;启动定时器t0
setb tr1 ;启动定时器t1
loop:lcall display ;调用时间显示程序
lcall keysan ;调用时间调节按钮
lcall keynz ;调用闹钟控制按钮
ajmp loop
inti0:push psw ;压入堆栈指针，保护现场
push acc
clr ea ;关中断www.dgzj.com
mov th0,#4ch ;重赋t0定时初值
mov tl0,#00h
inc 3ah ;3ah为50ms计数单元
mov a,3ah
cjne a,#20,out ;1秒计数是否到
mov 3ah,#00 ;清50ms计数初值
inc 31h ;秒加1
mov a,31h
cjne a,#60,out ;60秒计数是否到
mov 31h,#00
inc 32h ;分加1
mov a,32h
cjne a,#60,out ;60分计数是否到
mov 32h,#00
inc 33h ;时加1
mov a,33h
cjne a,#24,out ;24时计数是否到
mov 33h,#00
out: setb ea ;开中断
pop acc ;弹出堆栈指针，恢复现场
pop psw
reti ;中断返回
inti1:push psw ;压入堆栈指针，恢复现场
push acc
clr ea
mov th1,#4ch ;重赋t1定时初值
mov tl1,#00h
inc 71h ;71h为50ms计数单元
mov a,71h
cjne a,#20,out1
mov 71h,#00
mov a,32h ;闹钟判断
cjne a,38h,out1 ;闹钟时间分判断
mov a,33h
cjne a,39h,out1 ;闹钟时间时判断
clr p1.0 ;到闹钟时间，清p1.0
out1:setb ea ;开中断
pop acc
pop psw
reti ;中断返回
display:mov a,31h ;秒显示
mov b,#10
p ab
mov 20h,a ;将十位放入20h单元
mov 21h,b ;将个位、余数放入21h单元
disp1: mov a,20h ;秒十位显示
mov dptr,#table
movc a,@a+dptr ;将a的内容+table内容，结果回存给a
mov p0,a ;将a给p0口
clr p2.6 ;清p2.6,点亮第7位数码管
lcall del1ms ;调用1ms延时子程序
setb p2.6 ;灭第7位数码管
disp2: mov a,21h ;秒个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.7
lcall del1ms
setb p2.7
disp4: mov a,32h ;分显示
mov b,#10
p ab
mov 22h,a
mov 23h,b
disp5: mov a,22h ;分十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.3
lcall del1ms
setb p2.3
disp6: mov a,23h ;分个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.4
lcall del1ms
setb p2.4
disp7: mov a,33h ;时显示
mov b,#10
p ab
mov 24h,a
mov 25h,b
disp8: mov a,24h ;时十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.0
lcall del1ms
setb p2.0
disp9: mov a,25h ;时个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.1
lcall del1ms
setb p2.1
disp10: mov 34h,#0bfh ;-显示
mov a,34h
mov p0,a
clr p2.5
lcall del1ms
setb p2.5
disp11: mov 35h,#0bfh ;-显示
mov a,35h
mov p0,a
clr p2.2
lcall del1ms
setb p2.2
ret
display1:mov a,38h ;闹钟分显示
mov b,#10
p ab
mov 26h,a
mov 27h,b
d1:mov a,26h ;闹钟分十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.3
lcall del1ms
setb p2.3
d2:mov a,27h ;闹钟分个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.4
lcall del1ms
setb p2.4
dispnz: mov a,39h ;闹钟时显示
mov b,#10
p ab
mov 28h,a
mov 29h,b
d5: mov a,28h ;闹钟时十位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.0
lcall del1ms
setb p2.0
d6: mov a,29h ;闹钟时个位显示
mov dptr,#table
movc a,@a+dptr
mov p0,a
clr p2.1
lcall del1ms
setb p2.1
mov 35h,#0bfh ;-显示
mov a,35h
mov p0,a
clr p2.2
lcall del1ms
setb p2.2
ret
table:db 0c0h,0f9h,0a4h,0b0h,99h,92h,82h,0f8h,80h,90h ;数字0—9
del1ms:mov r7,#10 ;1ms延时子程序
del1: mov r6,#50
del2:djnz r6,del2
djnz r7,del1
ret
del20ms:mov r5,#40 ;20ms延时子程序
del3: mov r4,#250
del4: djnz r4,del4
djnz r5,del3
ret
keysan:jnb p3.1,key1 ;秒加1按钮
jnb p3.2,key2 ;分加1按钮
jnb p3.3,key3 ;时加1按钮
sjmp keyout
key1: lcall del20ms
jb p3.1,keyout
jnb p3.1,$
inc 31h ;秒加1
mov a,31h
cjne a,#60,keyout
mov 31h,#00
sjmp keyout
key2:lcall del20ms
jb p3.2,keyout
jnb p3.2,$
inc 32h ;分加1
mov a,32h
cjne a,#60,keyout
mov 32h,#00
sjmp keyout
key3:lcall del20ms
jb p3.3,keyout
jnb p3.3,$
inc 33h ;时加1
mov a,33h
cjne a,#24,keyout
mov 33h,#00
sjmp keyout
keyout:ret
keynz:jnb p3.4,keynz4 ;显示闹钟并可修改和显示当前时间
jnb p3.7,keynz5
jnb p3.5,nz3
jnb p3.6,nz4
sjmp nzout
nzout:ret
nz2:lcall display1
jnb p3.5,nz3
jnb p3.6,nz4
keynz4:jnb p3.4,nz2
sjmp nzout
nz3:lcall del20ms
jb p3.5,nzout
jnb p3.5,$
inc 38h
mov a,38h
cjne a,#60,nzout
mov 38h,#00
sjmp nzout
nz4:lcall del20ms
jb p3.6,nzout
jnb p3.6,$
inc 39h
mov a,39h
cjne a,#24,nzout
mov 39h,#00
sjmp keyout
keynz5:jb p3.7,nzout
jnb p3.7,$
setb p1.0
sjmp nzout
HFAN-08.2.1: PWM Temperature C
英国科学家：工业系统将成为下一波黑客攻击的目标
UWB 如何工作？如何使用UWB进行测距和位置？
智能家居的下一个应用场景在智能汽车中
三星首款5G折叠手机售价近2000美元 试图超越苹果和中国竞争对手
8位数码管电子时钟仿真图及程序源代码
城市轨道交通视频监控系统的架构、特点及功能实现
电瓶修复知识：浮充电压的设置对蓄电池寿命的影响
小米自主研发的松果处理器究竟如何？ 别抱太大希望
功率模块铜线键合工艺参数优化设计方案
iPhone6仍支持True TOne双LED闪光灯
激光焊锡的几种工艺介绍
部分流行安卓应用程序与脸书共享用户的数据
Omniverse 资讯速递 | 行业动态、应用案例、创作者故事等你来解锁！
家用电器的节电技巧分享
三星Galaxy A80 5G新机或再次采用滑动翻转式摄像头
一套完整的家庭“安全卫士”系统方案解析
贴片电阻器的制造工艺流程_贴片电阻器的阻值测试方法
Polhemus LIBERTY LATUS无线电磁位置跟踪系统的简介
更加环保的锂—二氧化碳电池推出，具有更高能量密度的应用优势