STC89C52简易时钟代码

ORG 0000H
LJMP START
ORG 001BH
LJMP TM

START:
MOV SP,#60H
MOV R7,#20D
MOV R6,#00H
MOV R5,#08D
MOV R4,#21D
MOV TMOD,#10H
MOV TH1,#3CH
MOV TL1,#0B0H
SETB EA
SETB ET1
SETB TR1
MM:
MOV A,R4
MOV B,#10D
DIV AB
MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV 20H,A
MOV A,B
MOVC A,@A+DPTR
MOV 21H,A
MOV P0,20H
MOV P2,#11111111B
LCALL DELY100
MOV P0,21H
MOV P2,#11111011B
LCALL DELY100

MOV A,R5
MOV B,#10D
 DIV AB
 MOVC A,@A+DPTR
 MOV 22H,A
 MOV A,B
 MOVC A,@A+DPTR
 MOV 23H,A
 MOV P0,22H
 MOV P2,#11110111B
 LCALL DELY100
 MOV P0,23H
 MOV P2,#11110011B
 LCALL DELY100


 MOV A,R6
MOV B,#10D
 DIV AB
 MOVC A,@A+DPTR
 MOV 24H,A
 MOV A,B
 MOVC A,@A+DPTR
 MOV 25H,A
 MOV P0,24H
 MOV P2,#11101111B
 LCALL DELY100
 MOV P0,25H
 MOV P2,#11101011B
 LCALL DELY100
SJMP MM