sym.asm

基于单片机的数字时钟

S_SET BIT P1.0
M_SET BIT P1.1
H_SET BIT P1.2
RSET BIT P1.7
SECOND EQU 30H
MINUTE EQU 31H
HOUR EQU 32H
TCNT EQU 34H 
ORG 00H
SJMP START
ORG 0BH
LJMP INT_T0
START:MOV DPTR,#TABLE
MOV HOUR,#0
MOV MINUTE,#0
MOV SECOND,#0
MOV TCNT,#0
MOV TMOD,#01H
MOV TH0,#3CH
MOV TL0,#0B0H
MOV IE,#82H
SETB TR0

A1:LCALL DISPLAY
JNB S_SET,S1
JNB M_SET,S2
JNB H_SET,S3
JNB RSET,S4
LJMP A1
S1:LCALL DELAY
JB S_SET,A1
INC SECOND
MOV A,SECOND
CJNE A,#60,J0
MOV SECOND,#0
LJMP K1
S2:LCALL DELAY
JB M_SET,A1
K1:INC MINUTE
MOV A,MINUTE
CJNE A,#60,J1
MOV MINUTE,#0
LJMP K2
S3:LCALL DELAY
JB H_SET,A1
K2:INC HOUR
MOV A,HOUR
CJNE A,#24,J2
MOV HOUR,#0
MOV MINUTE,#0
MOV SECOND,#0
LJMP A1
S4:LCALL DELAY
JB RSET,A1
K3:MOV MINUTE,#0
MOV SECOND,#0
LJMP A1


J0:JB S_SET,A1
LCALL DISPLAY
SJMP J0
J1:JB M_SET,A1
LCALL DISPLAY
SJMP J1
J2:JB H_SET,A1
LCALL DISPLAY
SJMP J2
J3:JB RSET,A1
LCALL DISPLAY
SJMP J3

INT_T0:ORL TL0,#0B0H
MOV TH0,#3CH
INC TCNT
MOV A,TCNT
CJNE A,#20,RETUNE
INC SECOND
MOV TCNT,#0
MOV A,SECOND
CJNE A,#60,RETUNE
INC MINUTE
MOV SECOND,#0
MOV A,MINUTE
CJNE A,#60,RETUNE
INC HOUR
MOV MINUTE,#0
MOV A,HOUR
CJNE A,#24,RETUNE
MOV HOUR,#0
MOV MINUTE,#0
MOV SECOND,#0
MOV TCNT,#0
RETUNE:RETI

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 P3.1
RET

TABLE:DB 3FH,06H,5BH,4FH,66H
      DB 6DH,7DH,07H,7FH,6FH
DELAY:MOV R7,#20
D1:MOV R6,#125
D2:DJNZ R6,D2
DJNZ R7,D1
RET
END