实用水塔水位控制程序
- 格式:doc
- 大小:36.00 KB
- 文档页数:2
实用水塔水位控制程序
功能:可实现水塔水位自动控制。
具有水位高低指示灯、异常情况报警灯。
元件:NPN:三极管NPN型;CAP:电容;CAPELEC:电解;CRYSTAL:晶振;
AT89C51:单片机;G5CLE-1-DC3:继电器;RES:电阻。
LED-GREEN、LED-RED、LED-BLUE、LED-YELLOW:绿、红、蓝、黄指示灯;Proteus仿真电路图:
程序如下:
;******水塔水位控制程序******
ORG 0030H
LOOP: ANL P1, #03H ;为检查水位状态准备
MOV A, P1
JNB ACC.0, ONE ;P1.0=0转
JB ACC.1, TWO ;P1.1=1转
CLR P1.2 ;停止电机P1.0=1;P1.1=0
SETB P1.3 ;水满灯灭
SETB P1.4 ;水低灯灭
CLR P1.5 ;异常灯亮
AJMP BACK ;返回
BACK: ACALL D10S ;延时10s
AJMP LOOP ;再检测水位
ONE: JNB ACC.1, THREE ;P1.1=0转
SETB P1.2 ;启动电机P1.0=0;P1.1=1
SETB P1.3 ;水满灯灭
SETB P1.4 ;水低灯灭
SETB P1.5 ;异常灯灭
AJMP BACK ;返回
THREE:CLR P1.2 ;停止电机P1.0=0;P1.1=0 CLR P1.3 ;水满灯亮
SETB P1.4 ;水低灯灭
SETB P1.5 ;异常灯灭
AJMP BACK ;返回
TWO: SETB P1.2 ;启动电机P1.0=1;P1.1=1 SETB P1.3 ;水满灯灭
CLR P1.4 ;水低灯亮
SETB P1.5 ;异常灯灭
AJMP BACK ;返回
ORG 0100H ;延时程序
D10S: MOV R3, #19H
LOOP3: MOV R1, #85H
LOOP1: MOV R2, #0FAH
LOOP2: DJNZ R2, LOOP2
DJNZ R1, LOOP1
DJNZ R3, LOOP3
RET
END。