📄 time.asm
字号:
minH data 20h
minL data 21h
secH data 22h
secL data 23h
min data 24h
sec data 25h
org 0000h
ljmp main
org 0023h
ljmp re
org 0100h
main: mov min,#12
mov sec,#30
mov tmod,#00100000B
anl pcon,#011111111B
mov th1,#0f3h
mov tl1,#0f3h
setb tr1
mov scon,#01010000B
mov ie,#10010000B
start: MOV A,min
MOV B,#100
DIV AB
MOV R3,A
MOV A,#10
XCH A,B
DIV AB
MOV minH,A
MOV minL,B
MOV A,sec
MOV B,#100
DIV AB
MOV R3,A
MOV A,#10
XCH A,B
DIV AB
MOV secH,A
MOV secL,B
mov dptr,#tab
clr a
mov a,minH
movc a,@a+dptr
mov p0,a
clr p2.7
acall del
setb p2.7
mov a,minL
movc a,@a+dptr
mov p0,a
clr p0.0
clr p2.6
acall del
setb p2.6
mov a,secH
movc a,@a+dptr
mov p0,a
clr p2.5
acall del
setb p2.5
mov a,secL
movc a,@a+dptr
mov p0,a
clr p2.4
acall del
setb p2.4
ajmp start
tab: db 03h,9fh,25h,0dh,99h,49h,41h,1fh,01h,09h
;-------------------------------------------------------------
re: push a
push psw
jnb ri,$
clr ri
mov a,sbuf
mov min,a
jnb ri,$
clr ri
mov a,sbuf
mov sec,a
pop psw
pop a
reti
DEL:
MOV R6,#25
DL2: MOV R7,#50
DJNZ R7,$
DJNZ R6,DL2
RET
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -