NOP
DJNZ R4,DL2 DJNZ R3,DL1 RET
;****************************************** ;显示控制子程序 DISPLAY:MOV A,SECOND MOV B,#10
DIV AB CLR
P3.6
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY SETB P3.6 MOV
A,B
CLR
P3.7
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY
SETB
P3.7
CLR P3.5 MOV
P0,#40H
LCALL DELAY
SETB
P3.5
MOV A,MINUTE
MOV
B,#10
;显示秒 ;显示分隔符
;显示分钟 DIV AB CLR
P3.3
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY SETB P3.3 MOV
A,B
CLR
P3.4
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY SETB P3.4 CLR P3.2 MOV
P0,#40H
LCALL DELAY SETB P3.2 MOV A,HOUR MOV B,#10
DIV AB CLR
P3.0
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY SETB P3.0 MOV
A,B
CLR
P3.1
MOVC A,@A+DPTR MOV
P0,A
LCALL DELAY
;显示分隔符
;显示小时
SETB RET
P3.1
TABLE: DB
DB
3FH,06H,5BH,4FH,66H 6DH,7DH,07H,7FH,6FH
R6,#10
DELAY: MOV
D1: DJNZ R7,$
DJNZ RET
R6,D1
END
