单片机自动水位控制系统.doc_第1页
单片机自动水位控制系统.doc_第2页
单片机自动水位控制系统.doc_第3页
单片机自动水位控制系统.doc_第4页
单片机自动水位控制系统.doc_第5页
免费预览已结束,剩余1页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

list p=16f877#include_CONFIG_WDT_OFF_RC_OSC_LVP_ONw_temp EQU 0x7Dstatus_temp EQU 0x7Epclath_temp EQU 0x7FORG 0x000nopgoto mainORG 0x004retfiemain 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 PORTDSTART: CALL KEYSCAN GOTO STARTKEYSCAN: 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 JIAN3KEY1:BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY2 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY2BTFSS PORTC,6 ;检查C口第6位是否为低GOTO JIAN7KEY2:BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY3 CALL DELAY BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY3BTFSS 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 JIAN2KEY4:BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY5 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY5BTFSS PORTC,6 ;检查C口第6位是否为低GOTO JIAN6KEY5:BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY6 CALL DELAY BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY6BTFSS PORTC,7 ;检查C口第7位是否为低GOTO JIAN10;=KEY6:MOVLW 0XB0 MOVWF PORTB ;配置B口输出1011 0000 BTFSC PORTC,5 ;判断C口第5位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY7 CALL DELAY BTFSC PORTC,5 ;判断C口第5位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY7 BTFSS PORTC,5 ;检查C口第5位是否为低 GOTO JIAN1KEY7:BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY8 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY8BTFSS PORTC,6 ;检查C口第6位是否为低GOTO JIAN5KEY8:BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY9 CALL DELAY BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY9BTFSS PORTC,7 ;检查C口第7位是否为低GOTO JIAN9;=KEY9:MOVLW 0X70 MOVWF PORTB ;配置B口输出0111 0000 BTFSC PORTC,5 ;判断C口第5位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY10 CALL DELAY BTFSC PORTC,5 ;判断C口第5位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY10 BTFSS PORTC,5 ;检查C口第5位是否为低 GOTO JIAN0KEY10:BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY11 CALL DELAY BTFSC PORTC,6 ;判断C口第6位是否为1,是则顺序执行,否则跳一行执行 GOTO KEY11BTFSS PORTC,6 ;检查C口第6位是否为低GOTO JIAN4KEY11:BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 RETURN CALL DELAY BTFSC PORTC,7 ;判断C口第7位是否为1,是则顺序执行,否则跳一行执行 RETURNBTFSS PORTC,7 ;检查C口第7位是否为低GOTO JIAN8JIAN0:MOVLW 0XC0 ;配置数码管输出0MOVWF PORTDRETURNJIAN1:MOVLW 0XF9 ;配置数码管输出1MOVWF PORTDRETURNJIAN2:MOVLW 0XA4 ;配置数码管输出2MOVWF PORTDRETURNJIAN3:MOVLW 0XB0 ;配置数码管输出3MOVWF PORTDRETURNJIAN4:MOVLW 0X02MOVWF PORTE ;按下此键,声光报警,小灯亮MOVLW 0X99 ;配置数码管输出4MOVWF PORTDRETURNJIAN5:MOVLW 0X01MOVWF PORTE ;按下此键,声光报警消警,小灯灭MOVLW 0X92 ;配置数码管输出5,消警MOVWF PORTDRETURNJIAN6:MOVLW 0X82 ;配置数码管输出6MOVWF PORTDRETURNJIAN7:MOVLW 0XF8 ;配置数码管输出7MOVWF PORTDRETURNJIAN8:MOVLW 0X80 ;配置数码管输出8MOVWF PORTDRETURNJIAN9:MOVLW 0X90 ;配置数码管输出9MOVWF PORTDRETURNJIAN10:MOVLW 0X88 ;配置数码管输出AMOVWF PORTDRET

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论