|
|
a_bit equ 20h
b_bit equ 21h
temp equ 22h
org 0000h
ljmp star
org 0020h
star: mov temp,#0 ;初始化計(jì)數(shù)器
stlop: acall display
jb p1.0,stlop
we: acall display
acall d1ms
acall display
jnb p1.0,we
inc temp
mov a,temp
cjne a,#100,next ;=100重來(lái)
mov temp,#0
next: ljmp stlop
;顯示子程序
display: mov a,temp ;將temp中的十六進(jìn)制數(shù)轉(zhuǎn)換成10進(jìn)制
mov b,#10 ;10進(jìn)制/10=10進(jìn)制
div ab
mov b_bit,a ;十位在a
mov a_bit,b ;個(gè)位在b
mov dptr,#numtab ;指定查表啟始地址
mov r0,#4
dpl1: mov r1,#250 ;顯示1000次
dplop: mov a,a_bit ;取個(gè)位數(shù)
MOVC A,@A+DPTR ;查個(gè)位數(shù)的7段代碼
mov p0,a ;送出個(gè)位的7段代碼
clr p2.7 ;開個(gè)位顯示
acall d1ms ;顯示1ms
setb p2.7
mov a,b_bit ;取十位數(shù)
MOVC A,@A+DPTR ;查十位數(shù)的7段代碼
mov p0,a ;送出十位的7段代碼
clr p2.6 ;開十位顯示
acall d1ms ;顯示1ms
setb p2.6
djnz r1,dplop ;100次沒(méi)完循環(huán)
djnz r0,dpl1 ;4個(gè)100次沒(méi)完循環(huán)
ret
;1MS延時(shí)(按12MHZ算)
;====================================================
D1MS: MOV R7,#05h
djnz r7,$
RET
;共陰7段數(shù)碼管各劃的數(shù)字排列表
numtab: db 28h,7eh,0a2h,62h,74h,61h,21h,7ah,20h,60h,30h,25h,0a9h,26h,0a1h,0b1h;
;0 1 2 3 4 5 6 7 8 9
end
|
|
