基于单片机的智能防火防盗控制系统.docVIP

基于单片机的智能防火防盗控制系统 程序参考AT89C51 1、主机主程序： ORG 0000H START: MOV TMOD, #20H ；定时器T1为方式2 MOV TH1, #0F4H ；波特率为1200bps MOV TL1, #0F4H SETB TR1 ；启动T1工作 MOV SCON, #0D8H ；串行口为方式3，允许接收，SM2=0，TB8=1 MOV PCOH, #00H MOV R0, #40H ；发送数据块始址送R0 MOV R1, #20H ；接收数据块始址送R1 MOV R2, #SLAVE ；被寻址从机地址送R2 MOV R3, #00H/01H ；若为00H，则主机发从机收命令 若为01H，则从机发主机收命令 MOV R4, #20D ；发送数据块长度送R4 MOV R5, #20D ；接收数据块长度送R5 ACALL MCOM ；调用主机通信子程序 ACALL DIS ；调用显示报警子程序 SJMP $ ；停止 2、主机查询通信子程序： MCOM： MOV TOMD，#20H ；初始化T1为定时器方式，方式2 MOV TL1， #0F3H ；置计数常数 MOV TH1， #0F3H ； SETB TR1 ；启动定时器T1 MOV PCON，#80H ；SMOD=1 MOV SCON，#0D8H ；串行口方式3，允许接收，TB8=1 TX-ADDR： MOV A，P2 ；发送地址帧 MOV SBUF，A LOOP1： JNB T1，LOOP1 CLR T1 RX-REPLY： JBC R1，IF-AGREE ；等待从机应答 SJMP RX-REPLY IF-AGREE： MOV A，SBUF ；判断应答地址相符否？ XRL A，R2 JZ TX-COMD COMEBAKE： MOV A，#0FFH ；重新联络 SETB TB8 MOV SBUF，A LOOP2： JNB T1，LOOP2 CLR T1 SJMP TX-ADDR TX-COMD： CLR TB8 ；地址符合，TB8置0，准备送命令 MOV A，R3 ；R3中的内容为控制代码 MOV SBUF，A ；送命令 LOOP3： JNB T1，LOOP3 CLR T1 RX-STATE： JBC R1，IF-RIGHT ；准备接收从机状态字节 SJMP RX-STATE IF-RIGHT： MOV A，SBUF ；判从机是否接到非法命令 JNB ACC.7，CO-ON ；若从机正确接收到命令就继续，否则返回重新联络 SJMP COMEBAKE CO-ON： CJNE R3，#00H，RECETVE；要求从机发送就绪跳转 JNB ACC.0，COMEBAKE ；从机接收未准备就绪，返回重新联络 TX-BYTES： MOV A，R4 ；发送数据块长度，R4中内容为入口参数 MOV SBUF，A WAIT1： JBC T1，TX-DATA SJMP WAIT1 TX-DATA： MO