循序渐进51study之实例8
;实例8
include sdo_h
intsum.value equ 40h
;int0中断次数 max=255
intbcd1.value equ 41h
intbcd2.value equ 42h
intbcd3.value equ 43h
org 0000h
ljmp start
org 0003h
push acc
push dph
push dpl
inc intsum.value
mov a,intsum.value
mov b,#100
div ab
mov intbcd1.value,a
mov a,b
mov b,#10
div ab
mov intbcd2.value,a
mov intbcd3.value,b
mov dptr,#dispcode
mov a,intbcd1.value
movc a,@a+dptr
mov 35h,a
mov a,intbcd2.value
movc a,@a+dptr
mov 36h,a
mov a,intbcd3.value
movc a,@a+dptr
mov 37h,a
pop dpl
pop dph
pop acc
reti
start: mov sp,#70h
setb it0
setb ex0
setb ea
lcall screen_clear<>
mov 30h,#30h
mov 31h,#37h
mov 32h,#31h
mov 33h,#3fh
main: lcall print10ms<>
sjmp main
dispcode: db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,67h
end