用软件延时实现00－59秒单片机计

DJNZ R5,D2

RET

5． 程序框图

图4.11.2

6． 汇编源程序

Second EQU 30H

ORG 0

START: MOV Second,#00H

NEXT: MOV A,Second

MOV B,#10

DIV AB

MOV DPTR,#TABLE

MOVC A,@A+DPTR

MOV P0,A

MOV A,B

MOVC A,@A+DPTR

MOV P2,A

LCALL DELY1S

INC Second

MOV A,Second

CJNE A,#60,NEXT

LJMP START

DELY1S: MOV R5,#100

D2: MOV R6,#20

D1: MOV R7,#248

DJNZ R7,$

DJNZ R6,D1

DJNZ R5,D2

RET