ORG 0000H
LJMP A1
A1:
A2:MOV P0,#0FFH
MOV 32H,#01H
MOV 33H,#00H
MOV R3,#10
MOV P1,#0F6H
A3:MOV 2AH,P1
MOV 2BH,R3
LCALL DEL
MOV R3,2BH
DEC R3
LJMP A4
A5:MOV A,R3
MOV B,#0AH
DIV AB
MOV 32H,A
MOV 33H,B
LJMP A3
A4:CJNE R3,#00H,A5
B1:MOV P1,#0FFH
MOV R3,#4
MOV 30H,#0CH
MOV 31H,#11H
MOV 32H,#00H
MOV 33H,#04H
MOV P1,#0EDH
B2:MOV 2AH,P1
MOV 2BH,R3
LCALL DEL
CPL P1.1
CPL P1.4
DEC R3
LJMP B3
B4: MOV A,R3
MOV B,#0AH
DIV AB
MOV 32H,A
MOV 33H,B
LJMP B2
B3:CJNE R3,#00H,B4
C1:MOV P0,#0FFH
MOV 30H,#0BH
MOV 31H,#11H
MOV 32H,#01H
MOV 33H,#00H
MOV R3,#10
MOV P1,#0DBH
C2:MOV 2AH,P1
MOV 2BH,R3
LCALL DEL
DEC R3
LJMP C3
C4:MOV A,R3
MOV B,#0AH
DIV AB
MOV 32H,A
MOV 33H,B
LJMP C2
C3:CJNE R3,#00H,C4
D1:SETB P1.2
SETB P1.5
MOV R3,#4
MOV 30H,#0CH
MOV 31H,#11H
MOV 32H,#00H
MOV 33H,#04H
MOV P0,#0EDH
D2: MOV 2AH,P1
MOV 2BH,R3
LCALL DEL
CPL P1.1
CPL P1.4
DEC R3
LJMP D3
D4:MOV A,R3
MOV B,#0AH
DIV AB
MOV 32H,A
MOV 33H,B
LJMP D2
D3:CJNE R3,#00H,D4
LJMP A2
DEL:MOV R6,#0FFH
DEL1:MOV R2,#0F7H
MOV R0,#30H
DEL2:MOV A,#00H
MOV P0,#00H
MOV A,@R0
MOV DPTR,#SGTR ;指向七段码表首地址
MOVC A,@A+DPTR
MOV P0,A
MOV P2,R2
MOV R1,#0FFH ;延时程序
DEL3:DJNZ R1,DEL3
INC R0 ;指向数码管下一位地址
MOV A,R2
RR A ;右移
MOV R2,A
JB P2.7,DEL2 ;判断4位数码管是否扫描完
DJNZ R6,DEL1
RET
SGTR:DB 3FH,06H,5BH,4FH,66H,6DH
DB 7DH,07H,7FH,6FH,77H,7CH
DB 39H,5EH,79H,71H,00H,40H,0F3H
这个是单片机做的,只是时间不同,紧急情况4S,这个是有显示的,如果不要显示就去掉那部分程序就是了
温馨提示:答案为网友推荐,仅供参考