单片机自动水位控制系统.docVIP

list p=16f877 #includep16f877.inc _CONFIG_WDT_OFF_RC_OSC_LVP_ON w_temp EQU 0x7D status_temp EQU 0x7E pclath_temp EQU 0x7F ORG 0x000 nop goto main ORG 0x004 retfie main NOP NOP BSF STATUS,RP0 ;选择BANK1区，进行设置 MOVLW 0XE0 MOVWF TRISC ;配置C口7 6 5 为输入 MOVLW 0X00 MOVWF TRISB ;配置B口为输出 MOVLW 0X00 MOVWF TRISE ;配置E口为输出 MOVLW 0X00 MOVWF TRISD ;配置D口为输出 BCF STATUS,RP0 ;选择BANK0区，进行设置 BCF STATUS,RP1 MOVLW 0X00 MOVWF PORTB ;配置B口输出低电平 MOVLW 0XC0 ;配置数码管输出0 MOVWF PORTD START: CALL KEYSCAN GOTO START KEYSCAN: MOVLW 0XE0 MOVWF PORTB ;配置B口输出1110 0000 BTFSC PORTC,5 ;判断C口第5位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY1 CALL DELAY BTFSC PORTC,5 ;判断C口第5位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY1 BTFSS PORTC,5 ;检查C口第5位是否为低 GOTO JIAN3 KEY1: BTFSC PORTC,6 ;判断C口第6位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY2 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY2 BTFSS PORTC,6 ;检查C口第6位是否为低 GOTO JIAN7 KEY2: BTFSC PORTC,7 ;判断C口第7位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY3 CALL DELAY BTFSC PORTC,7 ;判断C口第7位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY3 BTFSS PORTC,7 ;检查C口第7位是否为低 GOTO JIAN11 ;=================================================================================== KEY3: MOVLW 0XD0 MOVWF PORTB ;配置B口输出1101 0000 BTFSC PORTC,5 ;判断C口第5位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY4 CALL DELAY BTFSC PORTC,5 ;判断C口第5位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY4 BTFSS PORTC,5 ;检查C口第5位是否为低 GOTO JIAN2 KEY4: BTFSC PORTC,6 ;判断C口第6位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY5 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY5 BTFSS PORTC,6 ;检查C口第6位是否为低 GOTO JIAN6 KEY5: BTFSC PORTC,7 ;判断C口第7位是否为1，是则顺序执行，否则跳一行执行 GOTO KEY6 CALL DELAY BTFSC PORTC,7