【正文】 OOP10 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 。加一 。置秒低位 INCF MIAO1,1 MOVFW MIAO1 SUBLW 09H BTFSC STATUS,0 。置秒高位 CLRF MIAO1 。置分低位 CLRF MIAO2 。置分高位 CLRF FEN1 。置時(shí)低位 BSF BIAO2,7 CLRF FEN2 SWAPF SHI2,0 IORWF SHI1,0 MOVWF TEMP INCF TEMP,1 MOVFW TEMP SUBLW 23H BTFSS STATUS,0 。計(jì)數(shù)沒超過范圍 GOTO $+5 ANDWF TEMP,1 。1 GOTO LOOP6 CLRW ADDWF SHI1,0 BTFSS STATUS,2 。置日位 BSF BIAO1,0 SWAPF RI2,0 IORWF RI1,0 MOVWF TEMP INCF TEMP,1 MOVFW TEMP SUBWF SPTEMP,0 MOVLW 01H BTFSS STATUS,0 。計(jì)數(shù)沒超過范圍 GOTO $+5 ANDWF TEMP,1 。月調(diào)整 IORWF RI1,0 ADDLW 0FFH BTFSS STATUS,2 。 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 。計(jì)數(shù)沒超過范圍 GOTO $+5 ANDWF TEMP,1 。1 GOTO LOOP6 BSF BIAO1,4 。0 GOTO LOOP6 BSF BIAO1,5 。清低位 INCF NIAN2,1 MOVFW NIAN2 SUBLW 09H BTFSC STATUS,0 GOTO LOOP6 BSF BIAO1,6 。清低位 INCF NIAN3,1 MOVFW NIAN3 26 SUBLW 09H BTFSC STATUS,0 GOTO LOOP6 BSF BIAO1,7 。清低位 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 。1 CLRF TRISD MOVLW 07H MOVWF ADCON1 CLRF TRISE BCF OPTION_REG,NOT_RBPU 。子程序名，也是子程序入口地址 movlw 050h 。送入用作外 循環(huán)變量的 20H 單元 movlw 0ffh 。送入用作內(nèi)循環(huán)變量的 21H 單元 decfsz TTEMP2,1 。跳轉(zhuǎn)到 LP1 處 decfsz TTEMP1,1 。跳躍到 LP0 處 return 。將內(nèi)層循環(huán)參數(shù)值 FFH 經(jīng)過 W movwf TTEMP2 。變量 21H 內(nèi)容遞減，若為 0跳躍 goto $1 。返回主程序 WRRAM BSF PORTE,RS 。寫命令 BCF PORTE,RW MOVWF PORTD BCF PORTE,E BSF PORTE,E NOP NOP BCF PORTE,E CALL DELAY1 RETURN TIAO BCF INTCON,GIE 。0 跳 干擾退出 GOTO OUT1 BTFSS PORTC,2 。清標(biāo) BTFSS PORTC,3 CALL KEY 28 BTFSC BIAO2,0 CALL ADD2 BTFSC PORTC,2 。確認(rèn) GOTO $8 BTFSS PORTC,2 。清標(biāo) BCF PIR1,TMR2IF BSF INTCON,GIE GOTO LOOP5 KEY CALL DELAY BTFSC PORTC,3 。1 GOTO $1 BSF BIAO2,0 CALL DELAY RETURN ADD2 INCF INDF,1 MOVFW INDF SUBLW 09H BTFSS STATUS,0 CLRF INDF MOVFW INDF ADDLW 30H 31 CALL WRRAM MOVFW SPBTEMP CALL WRIT BCF BIAO2,0 RETURN END 項(xiàng) 目 經(jīng) 理項(xiàng) 目 副 經(jīng) 理 項(xiàng) 目 總 工 質(zhì) 安 總 監(jiān)工程管理部物資管理部技術(shù)管理部檢測(cè)試驗(yàn)室質(zhì)安管理部監(jiān) 督 工 程 管 理部 、 物 資 管 理部 、 檢 測(cè) 試 驗(yàn) 室現(xiàn) 場(chǎng) 質(zhì) 檢 員 、 施 工 員施 工 班 組