ORG 0030H
MAIN: MOV P1, #0F0H ; 主程序开始 MOV P3,#7FH MOV SP,#35H
MOV 56H,#0F0H ; ＃0F0H排水标志(指定56H为标志单元) MOV 57H,#03 ; 洗衣机标准洗衣工作程序标志(指定57H) MOV 54H,#40 ; 强洗正、反转驱动４秒赋值(指定54H存放) MOV 55H,#10 ; 强洗间歇１秒赋值(指定55H存放) MOV 58H,#06 ; 漂洗６分钟赋值(指定58H存放) CLR ET0
SETB EA ; 开总中断
CLR IT0 ; 设置外部中断０、１为低电平触发 CLR IT1
SETB PX0 ; 设置中断优先级别 SETB PT0 SETB PX1
MOV TL0,#0B0H ; 设置１００ＭＳ中断时间常数 MOV TH0,#3CH MOV TMOD,#01H
KA: JNB P1.4,X1 ; 以下为按键扫描程序 AJMP KB X1: ACALL K1
25
唐 山 学 院 毕 业 设 计
KB: JNB P1.5,X2 AJMP KC X2: ACALL K2
KC: JB P3.4,KA ; 按键扫描程序结束 ACALL DEL10 JB P3.4,KA ACALL FZH JNB P3.4,$
SETB ET0 ; 开定时器０中断 SETB TR0 ; 启动定时器０ SETB P3.5 SETB EX0 CLR P3.4 MOV A ,57H
CJNE A,#00H,XY ; 是排水程序？ AJMP BSH1 ; 是则跳转排水程序 XY: MOV 70H,#00 MOV 51H,#00
SETB P1.0 ; 以下为进水操作，打开进水阀 MOV A,#240
L0: CJNE A,51H,L1 ; 进水系统有故障？ AJMP FW ; 有则跳转故障处理程序 L1: JB P3.5 ,L0 ; 进水达预定水位？ CLR P1.0 ; 进水结束，关闭进水阀 MOV 70H,#00 MOV 71H,#00 MOV 72H,#00
L: MOV 50H,#00 ; 以下为洗涤／漂洗工作程序 SETB P1.2 ; 正转洗涤／漂洗驱动 MOV A,50H CJNE A,50H,$
CLR P1.2 ; 洗涤／漂洗间歇 MOV 50H,#00 MOV A,55H
26
唐 山 学 院 毕 业 设 计
CJNE A,50H,$ MOV 50H,#00
SETB P1.3 ; 反转洗涤／漂洗驱动 MOV A,54H CJNE A,50H,$
CLR P1.3 ; 洗涤／漂洗间歇 MOV 50H,#00 MOV A,55H CJNE A,50H,$ MOV A,58H
CJNE A,72H,L ; 洗涤／漂洗工作结束？ BSH: MOV A,56H
CJNE A,#0F0h,PBSH ; 洗涤／漂洗工作结束，排水否？ DEC 57H ; 洗衣工作循环次数减1
BSH1: SetB P1.1 ; 排水操作，打开排水阀 MOV 70H,#00 MOV 51H,#00 MOV A,#60
BSH2: CJNE A,51H,BSH3 ; 排水系统有故障？ AJMP FW ; 有则跳转故障处理程序
BSH3: JNB P3.5,BSH2 ; 水位下降至预定水位？ MOV A,51H ADD A,#50 MOV 70H,#00 MOV 51H,#00
CJNE A,51H,$ ; 排水时间延长Ｄ＋５０秒 MOV 73H,#00 ; 以下为脱水程序
CLR P3.5 ; 开盖、不平衡中断请求触器允许 SETB EX1 ; 脱水期间，开盖、不平衡中断允许 BSH4: MOV 50H,#00 SETB P1.2 ; 脱水驱动５秒 MOV A,#50 CJNE A,50H,$
CLR P1.2 ; 脱水间歇２秒
27
唐 山 学 院 毕 业 设 计
MOV A,#20 MOV 50H,#00 CJNE A,50H,$ INC 73H MOV A,73H
CJNE A,#17,BSH4 ; 脱水时间达2分钟？ CLR P1.1 SETB P3.5
CLR EX1 ; 脱水结束，禁止开盖、不平衡中断中断崐 MOV A,57H CJNE A,#00,BSH5 ; 洗衣工作是否结束？ AJMP PBSH ; 结束跳转结束报警程序 BSH5: MOV A,58H
SUBB A,#2 ; 洗涤／漂洗时间减２分钟 MOV 58H,A
AJMP XY ; 洗衣工作未结束，继续下一循环 PBSH: MOV 74H,#00 ; 洗衣结束报警程序 JK: MOV 50H,#00 BJ1: SETB P3.7 MOV A,50H CJNE A,#10,BJ1 MOV 50H,#00 BJ2: CLR P3.7 MOV A,50H CJNE A,#10,BJ2 INC 74H MOV A,74H CJNE A,#3,JK
AJMP MAIN ; 洗衣工作结束，返回主程序;
FW: CLR EX1 ; 以下为进排水系统故障处理程序 CLR P1.0 CLR P1.1 CLR P1.2
28
唐 山 学 院 毕 业 设 计
CLR P1.3
FW1: MOV 50H,#00 FW2: SETB P3.7 JNB P1.4,FW4 MOV A,50H CJNE A,#10,FW2 MOV 50H,#00 FW3: CLR P3.7 JNB P1.4,FW4 MOV A,50H CJNE A,#20,FW3 AJMP FW1 FW4: CLR P3.7 ACALL FZH JNB P1.4 ,$ AJMP MAIN;
INT0: PUSH A ; 以下为暂停中断服务程序 PUSH PSW PUSH DPH PUSH DPL
SETB P3.4 ; 撤消本次中断请求信号 ACALL FZH MOV A,P1
MOV R1,A ; 保存Ｐ１端口状态 ANL A,#0F0H
MOV P1,A ; 洗衣机暂停各种操作 JB P3.4,$ ; 等待启动键按下 ACALL FZH MOV A,R1
MOV P1,A ; 恢复Ｐ１口原始数据