【正文】 等待鍵釋放 DATEMON1: LCALL DISPLAY LCALL KEY JNB ,DATEDAY 。等待鍵釋放 INC 35H MOV A,35H CJNE A,64H,$+6 MOV 35H,00H SETB 05H SETB 06H SJMP DATEYEAR CLR 05H CLR 06H INC 35H MOV A,35H CJNE A,64H,$+6 MOV 35H,00H SJMP DATEYEAR1 DATEMON: CLR 05H CLR 06H SETB 03H 。等待鍵釋放 DATEYEAR: LCALL DISPLAY LCALL KEY JNB ,DATEMON 。等待鍵釋放 RET DATESET: SETB 05H SETB 06H 。等待鍵釋放 MOV 40H,0FH 。日期轉(zhuǎn)換、設(shè)定。等待鍵釋放 SJMP TIME3SIGN1 SETTIME3OUT: CLR 0AH SETTIMEOUT: CLR 01H CLR 02H CLR ET1 CLR TR1 LCALL DISPLAY LCALL KEY JNB ,$6 。等待鍵釋放 TIME3SIGN1: LCALL DISPLAY LCALL KEY JNB ,SETTIME3OUT 。等待鍵釋放 INC 3DH MOV A,3DH CJNE A,3CH,$+6 MOV 3DH,00H SETB 03H SETB 04H SJMP TIME3MIN1 CLR 03H CLR 04H INC 3DH MOV A,3DH CJNE A,3CH,$+6 MOV 3DH,00H SJMP TIME3MIN2 TIME3SIGN: CLR 03H CLR 04H SETB 01H 。等待鍵釋放 TIME3MIN1: LCALL DISPLAY LCALL KEY JNB ,TIME3SIGN 。等待鍵釋放 INC 3EH MOV A,3EH CJNE A,18H,$+6 MOV 3EH,00H SETB 05H SETB 06H SJMP TIME3HOUR CLR 05H CLR 06H INC 3EH MOV A,3EH CJNE A,18H,$+6 MOV 3EH,00H SJMP TIME3HOUR1 TIME3MIN: CLR 05H CLR 06H SETB 03H 。等待鍵釋放 TIME3HOUR: LCALL DISPLAY LCALL KEY JNB ,TIME3MIN 。等待鍵釋放 SJMP TIME2SIGN1 SETTIME2OUT: CLR 09H LJMP SETTIMEOUT TIME3SET: SETB 05H SETB 06H 。等待鍵釋放 TIME2SIGN1: LCALL DISPLAY LCALL KEY JNB ,SETTIME2OUT 。等待鍵釋放 INC 3AH MOV A,3AH CJNE A,3CH,$+6 MOV 3AH,00H SETB 03H SETB 04H SJMP TIME2MIN1 CLR 03H CLR 04H INC 3AH MOV A,3AH CJNE A,3CH,$+6 MOV 3AH,00H SJMP TIME2MIN2 TIME2SIGN: CLR 03H CLR 04H SETB 01H 。等待鍵釋放 TIME2MIN1: LCALL DISPLAY LCALL KEY JNB ,TIME2SIGN 。等待鍵釋放 INC 3BH MOV A,3BH CJNE A,18H,$+6 MOV 3BH,00H SETB 05H SETB 06H SJMP TIME2HOUR CLR 05H CLR 06H INC 3BH MOV A,3BH CJNE A,18H,$+6 MOV 3BH,00H SJMP TIME2HOUR1 TIME2MIN: CLR 05H CLR 06H SETB 03H 。等待鍵釋放 TIME2HOUR: LCALL DISPLAY LCALL KEY JNB ,TIME2MIN 。等待鍵釋放 SJMP TIME1SIGN1 SETTIME1OUT: CLR 08H LJMP SETTIMEOUT TIME2SET: SETB 05H 。等待鍵釋放 TIME1SIGN1: LCALL DISPLAY LCALL KEY JNB ,SETTIME1OUT 。等待鍵釋放 INC 37H MOV A,37H CJNE A,3CH,$+6 MOV 37H,00H SETB 03H SETB 04H SJMP TIME1MIN1 CLR 03H CLR 04H INC 37H MOV A,37H CJNE A,3CH,$+6 MOV 37H,00H SJMP TIME1MIN2 TIME1SIGN: CLR 03H CLR 04H SETB 01H 。等待鍵釋放 TIME1MIN1: LCALL DISPLAY LCALL KEY JNB ,TIME1SIGN 。等待鍵釋放 INC 38H MOV A,38H CJNE A,18H,$+6 MOV 38H,00H SETB