原理圖如下：
Proteus仿真圖
代碼如下：
ORG 0000H
LJMP MAIN
ORG 001BH ;dingshizhongduan
LJMP DSZD
ORG 0060H
MAIN:
MOV SP, #60H
MOV TMOD, #10H
MOV TH1, #3CH ;50ms
MOV TL1, #0C0H
SETB EA
SETB ET1
SETB TR1
MOV R1,#20
LOOP0:MOV R0,#00H
LOOP1:LCALL SKIP
CJNE R0,#60, LOOP1
SJMP LOOP0
DSZD:
MOV TH1, #3CH ;50ms
MOV TL1, #0C0H
DJNZ R1,LOOP
INC R0
MOV R1,#20
LOOP:RETI
SKIP:
MOV A,R0
MOV B, #10
DIV AB
MOV DPTR, #TAB
MOVC A, @A+ DPTR
MOV P0, A
MOV A,B
MOVC A, @A+ DPTR
MOV P2, A
RET
TAB:
DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
END
|
