shizhong3.asm

电子时钟,LED动态显示,带校准和闹钟功能,是汇编程序,希望对初学单片机的朋友有帮助

		ORG 0000H
		AJMP MAIN
		ORG 0003H
		LJMP INT0P
		ORG 000BH
		AJMP CLOCK
		ORG 0013H
		LJMP INT1P
		ORG 0100H
MAIN:		MOV SP,#60H
		MOV 2BH,#60H
		MOV 2CH,#60H
		MOV 2DH,#24H
		MOV 27H,#00H
		MOV 28H,#00H
		MOV 29H,#12H
		MOV TMOD,#01H
		MOV TL0,#0B0H
		MOV TH0,#3CH
		MOV IE,#87H
		SETB TR0
LOOP:		LCALL DUSP
		AJMP LOOP
CLOCK:		PUSH PSW
		PUSH ACC
		MOV TL0,#0F0H
		MOV TH0,#0D8H
		INC 26H
		MOV A,26H
		CJNE A,#64H,DONE
		MOV 26H,#00H
		MOV R0,#27H
		MOV R1,#2BH
		MOV R3,#03H
LOOP0:		MOV A,@R0
		ADD A,#01H
		DA A
		MOV @R0,A
		MOV 38H,@R1
		CJNE A,38H,DONE0
		MOV @R0,#00H
		INC R0
		INC R1
		DJNZ R3,LOOP0
DONE0:		ACALL	LOOP1	
DONE:		POP ACC
		POP PSW
		RETI
DUSP:		MOV R0,#4FH
		MOV A,27H
		ACALL PTDS
		MOV A,28H
		ACALL PTDS
		MOV A,29H
		ACALL PTDS
		MOV R0,#4AH
		MOV R2,#0F8H
DSUP1:		MOV P1,R2
		MOV A,@R0
		MOV DPTR,#SEGPT
		MOVC A,@A+DPTR
		MOV P2,A
		MOV R3,#00H
		DJNZ R3,$
		INC R0
		INC R2
		CJNE R2,#0FEH,DSUP1
		RET
PTDS:		MOV R1,A
		ACALL PTDS1
		MOV A,R1
		SWAP A
PTDS1:		ANL A,#0FH
		MOV @R0,A
		DEC R0
		RET
SEGPT:		DB 3FH,06H,5BH,4FH,66H,6DH,7DH
		DB 07H,7FH,6FH,77H,7CH,39H,5EH
		DB 79H,71H
LOOP1:		MOV R4, A
		MOV DPTR,#100CH
		MOV 2EH,DPL
LOOP4:		MOV DPL,2EH
		MOV R3,#04H
		MOV R1,#2AH
LOOP2:		INC DPTR
		DJNZ R3,LOOP2		
		MOV 2EH,DPL
		MOV R3,#03H
		CLR A
		MOVC A,@A+DPTR
		JZ LOOP3
		MOV 3AH,A
LOOP5:		INC DPTR
		DEC R1
		CLR A
		MOVC A,@A+DPTR
		MOV 3BH,A
		MOV A,@R1
		CJNE A,3BH,LOOP4
		DJNZ R3,LOOP5
		MOV A,3AH
		CPL A
		MOV P3,A
		MOV A,R4
LOOP3:		RET
		ORG 1010H
CODE1:		DB 10H,12H,00H,10H,20H,12H,00H,15H
INT0P:		CLR EX1
		JNB P3.2,$
		INC 29H
		MOV A,29H
		ADD A,#00H
		DA A
		MOV 29H,A
		SUBB A,#24H
		JC NEXT
		MOV 29H,#00H
NEXT:		SETB EX1
		RETI
INT1P:		CLR EX1
		JNB P3.3,$
		INC 28H
		MOV A,28H
		ADD A,#00H
		DA A
		MOV 28H,A
		SUBB A,#60H
		JC NEXT1
		MOV 28H,#00H
NEXT1:		;SETB P3.3
		SETB EX1
		RETI										
		END