【正文】 清標(biāo) BCF PIR1,TMR2IF BSF INTCON,GIE GOTO LOOP5 KEY CALL DELAY BTFSC PORTC,3 。清標(biāo) BTFSS PORTC,3 CALL KEY 28 BTFSC BIAO2,0 CALL ADD2 BTFSC PORTC,2 。寫命令 BCF PORTE,RW MOVWF PORTD BCF PORTE,E BSF PORTE,E NOP NOP BCF PORTE,E CALL DELAY1 RETURN TIAO BCF INTCON,GIE 。變量 21H 內(nèi)容遞減，若為 0跳躍 goto $1 。跳躍到 LP0 處 return 。送入用作內(nèi)循環(huán)變量的 21H 單元 decfsz TTEMP2,1 。子程序名，也是子程序入口地址 movlw 050h 。清低位 INCF NIAN4,1 MOVFW NIAN4 SUBLW 09H BTFSC STATUS,0 GOTO LOOP6 CLRF NIAN4 GOTO LOOP6 REST2 MOVLW 38H CALL WRIT MOVLW 0CH CALL WRIT MOVLW 06H CALL WRIT MOVLW 01H CALL WRIT RETURN REST1 BCF STATUS,RP1 。清低位 INCF NIAN2,1 MOVFW NIAN2 SUBLW 09H BTFSC STATUS,0 GOTO LOOP6 BSF BIAO1,6 。1 GOTO LOOP6 BSF BIAO1,4 。 BSF BIAO1,3 SWAPF YUE2,0 IORWF YUE1,0 MOVWF TEMP 25 INCF TEMP,1 MOVFW TEMP SUBWF SPTEMP,0 MOVLW 01H BTFSS STATUS,0 。計數(shù)沒超過范圍 GOTO $+5 ANDWF TEMP,1 。1 GOTO LOOP6 CLRW ADDWF SHI1,0 BTFSS STATUS,2 。置時低位 BSF BIAO2,7 CLRF FEN2 SWAPF SHI2,0 IORWF SHI1,0 MOVWF TEMP INCF TEMP,1 MOVFW TEMP SUBLW 23H BTFSS STATUS,0 。置分低位 CLRF MIAO2 。置秒低位 INCF MIAO1,1 MOVFW MIAO1 SUBLW 09H BTFSC STATUS,0 。1 GOTO LOOP7 BCF BIAO2,2 MOVLW 0DH MOVWF SPBTEMP CALL TEXT LOOP7 BTFSS BIAO2,3 GOTO LOOP8 BCF BIAO2,3 MOVLW 0CH MOVWF SPBTEMP CALL TEXT LOOP8 BTFSS BIAO2,4 GOTO LOOP9 BCF BIAO2,4 MOVLW 0BH MOVWF SPBTEMP CALL TEXT LOOP9 BTFSS BIAO2,5 GOTO LOOP10 BCF BIAO2,5 MOVLW 0AH MOVWF SPBTEMP CALL TEXT LOOP10 BTFSS BIAO2,6 GOTO LOOP11 BCF BIAO2,6 MOVLW 09H MOVWF SPBTEMP CALL TEXT LOOP11 BTFSS BIAO2,7 GOTO LOOP12 BCF BIAO2,7 MOVLW 08H MOVWF SPBTEMP 21 CALL TEXT LOOP12 BTFSS BIAO1,0 GOTO LOOP13 BCF BIAO1,0 MOVLW 07H MOVWF SPBTEMP CALL TEXT LOOP13 BTFSS BIAO1,1 GOTO LOOP14 BCF BIAO1,1 MOVLW 06H MOVWF SPBTEMP CALL TEXT LOOP14 BTFSS BIAO1,2 GOTO LOOP15 BCF BIAO1,2 MOVLW 05H MOVWF SPBTEMP CALL TEXT LOOP15 BTFSS BIAO1,3 GOTO LOOP16 BCF BIAO1,3 MOVLW 04H MOVWF SPBTEMP CALL TEXT LOOP16 BTFSS BIAO1,4 GOTO LOOP17 BCF BIAO1,4 MOVLW 03H MOVWF SPBTEMP CALL TEXT LOOP17 BTFSS BIAO1,5 GOTO LOOP18 BCF BIAO1,5 MOVLW 02H MOVWF SPBTEMP CALL TEXT LOOP18 BTFSS BIAO1,6 GOTO LOOP19 BCF BIAO1,6 MOVLW 01H MOVWF SPBTEMP CALL TEXT LOOP19 BTFSS BIAO1,7 22 GOTO LOOP20 BCF BIAO1,7 MOVLW 00H MOVWF SPBTEMP CALL TEXT LOOP20 BTFSC BIAO2,0 GOTO TIAO BTFSS PORTB,0 BSF BIAO2,0 GOTO LOOP5 TEXT BCF INTCON,GIE CALL TABLE3 BSF INTCON,GIE CALL WRIT MOVLW NIAN4 ADDWF SPBTEMP,0 MOVWF FSR MOVFW INDF ADDLW 30H CALL WRRAM RETURN 。1 MOVLW 07DH MOVWF PR2 CLRF TRISD CLRF PIE1 BSF PIE1,TMR2IE CLRF STATUS 20 CLRF PORTD CLRF INTCON CLRF PIR1 BSF INTCON,PEIE MOVLW B39。寫首地址 1 CLRF SPTEMP MOVLW 0AH 19 MOVWF SPBTEMP LOOP1 MOVFW SPTEMP CALL TABLE CALL WRRAM INCF SPTEMP,1 DECFSZ SPBTEMP,1 GOTO LOOP1 MOVLW 0C4H CALL WRIT 。 TABLE3 ADDWF PCL,1 DT 83H,84H,85H,86H,88H,89H,8BH,8CH,0C4H,0C5H,0C7H,0C8H,0CAH,0CBH TABLE4 ADDWF PCL,1 DT 00H,31H,28H,31H,30H,31H,30H,31H,31H,30H,00H,00H,00H,00H,00H,00H,31H,30H,31H 。,39。,39。,39。 TABLE2 ADDWF PCL,1 DT 39。,39。,39。,39。,39。程序從 00h 開始運行 GOTO MAIN ORG 0004H 18 MOVWF W_TEMP SWAPF STATUS,W CLRF STATUS MOVWF STATUS_TEMP MOVFW FSR MOVWF FSR_TEMP BCF PIR1,TMR2IF INCF MIAO3,1 MOVLW 064H XORWF MIAO3,0 BTFSS STATUS,2 GOTO QUIT BSF BIAO2,1 CLRF MIAO3 QUIT CLRF STATUS MOVFW FSR_TEMP