单片机数码管静态显示实验程序
org 00h
num equ p0 ;p0口连接数码管
clr p2.0 ;
mov dptr ,#tab
clr a
mov r2,#0
loop:
movc a,@a+dptr
mov num ,a
acall delay_200ms
inc r2
mov a,r2
cjne r2,#15, loop
mov r2,#0
clr a
ajmp loop
tab :
DB
0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,88H,83H,0C6H,0A1H,86H,8EH
delay_200ms:
mov r3,#20
delay:
acall delay_10ms
djnz r3,delay
ret
;;;;;;;;;;;;;;;; 非中断精确1MS定时程序 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
delay_1ms:
MOV R7 ,#249
signed: ;循环部分4机器周期
nop
nop
djnz R7 ,signed
ret ;返回指令2机器周期
;2+249*4+2=1000us 可以精确定时1MS,假设外部晶振是12M
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 非中断精确10MS定时程序 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
mov r6,#9 ;2个机器周期用2us
delay_10ms_sined: ;9次循环共用9(1ms+4us)=9036us
acall delay_1ms
djnz r6,delay_10ms_sined
MOV r6 ,#240 ;2个机器中期用2us
signed_10ms : ;循环部分4机器周期 共240次
nop
nop
djnz r6 ,signed_10ms
ret ;返回指令要2us
;2us+9036us+240*4us+2us = 10ms 即可精确定时10ms
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 非中断精确定时1s ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
delay_1s:
mov r5,#99 ;两个机器周期2us
delay_1s_signed: ;循环指令周期为4us,加上延时10ms
;(10ms+4us)*99 = 990.396ms
acall delay_10ms
djnz r5,delay_1s_signed
mov r5 ,#9 ;两个机器周期2us
signed_1s: ;循环指令周期为4us,加上延时1ms
;(1ms+4us)*9 = 9ms+36us
acall delay_1ms
djnz r5 ,signed_1s
mov r5 ,# 140 ;机器周期2us
signed_1s_: ;一次循环4us共有140次。140us*4 = 560us
nop
nop
djnz r5,signed_1s_
ret ;2us
;2us+990ms+396us+2us+9ms+36us+2us+560us+2us = 999ms+1000us = 1s
end
因篇幅问题不能全部显示,请点此查看更多更全内容
Copyright © 2019- efsc.cn 版权所有 赣ICP备2024042792号-1
违法及侵权请联系:TEL:199 1889 7713 E-MAIL:2724546146@qq.com
本站由北京市万商天勤律师事务所王兴未律师提供法律服务