《基于单片机的智能防火防盗控制系统》由会员分享，可在线阅读，更多相关《基于单片机的智能防火防盗控制系统（10页珍藏版）》请在金锄头文库上搜索。
1、47基于单片机的智能防火防盗控制系统 程序参考 AT89C511、主机主程序：ORG 0000HSTART: MOV TMOD, #20H ；定时器 T1 为方式 2MOV TH1, #0F4H ；波特率为 1200bpsMOV TL1, #0F4HSETB TR1 ；启动 T1 工作MOV SCON, #0D8H ；串行口为方式 3，允许接收，SM2=0，TB8=1MOV PCOH, #00HMOV R0, #40H ；发送数据块始址送 R0MOV R1, #20H ；接收数据块始址送 R1MOV R2, #SLAVE ；被寻址从机地址送 R2MOV R3, #00H/01H ；若为 00H
2、，则主机发从机收命令若为 01H，则从机发主机收命令MOV R4, #20D ；发送数据块长度送 R4MOV R5, #20D ；接收数据块长度送 R5ACALL MCOM ；调用主机通信子程序ACALL DIS ；调用显示报警子程序SJMP $ ；停止2、主机查询通信子程序：MCOM： MOV TOMD，#20H ；初始化 T1 为定时器方式，方式 248MOV TL1， #0F3H ；置计数常数MOV TH1， #0F3H ；SETB TR1 ；启动定时器 T1MOV PCON，#80H ；SMOD=1MOV SCON，#0D8H ；串行口方式 3，允许接收，TB8=1TX-ADDR： M
3、OV A，P2 ；发送地址帧MOV SBUF，ALOOP1： JNB T1，LOOP1CLR T1RX-REPLY： JBC R1，IF-AGREE ；等待从机应答SJMP RX-REPLYIF-AGREE： MOV A，SBUF ；判断应答地址相符否？XRL A，R2JZ TX-COMDCOMEBAKE： MOV A，#0FFH ；重新联络SETB TB8MOV SBUF，ALOOP2： JNB T1，LOOP2CLR T1SJMP TX-ADDRTX-COMD： CLR TB8 ；地址符合，TB8 置 0，准备送命令MOV A，R3 ；R3 中的内容为控制代码MOV SBUF，A ；送命令
4、LOOP3： JNB T1，LOOP3CLR T1RX-STATE： JBC R1，IF-RIGHT ；准备接收从机状态字节SJMP RX-STATEIF-RIGHT： MOV A，SBUF ；判从机是否接到非法命令JNB ACC.7，CO-ON ；若从机正确接收到命令就继续，否则返回重新联络SJMP COMEBAKECO-ON： CJNE R3，#00H，RECETVE；要求从机发送就绪跳转JNB ACC.0，COMEBAKE ；从机接收未准备就绪，返回重新联络TX-BYTES： MOV A，R4 ；发送数据块长度，R4 中内容为入口49参数MOV SBUF，AWAIT1： JBC T1，T
5、X-DATASJMP WAIT1TX-DATA： MOV A，R0 ；发送数据块MOV SBUF，AWAIT2： JNB T1，WAIT2CLR T1INC R0 ；指针指向下一个要发送的数据DJNZ R4，TX-DATA ；数据未发送完，继续发送RET ；发送数据完毕，返回主程序RECEIVE： JNB ACC.1，COMEBAKE ；从机发送未准备就绪，则跳转RX-BYTES： JNB R1，RX-BYTES ；接收数据块长度CLR R1MOV A，SBUFMOV R4，A ；数据块长度暂存 R4，以作计数MOV R1，A ；数据块长度保存INC R1 ；指向存储数据地址RX-DATA：
6、JNB R1，RX-DATA ；准备接收数据CLR R1MOV A，SBUFMOV R1，AINC R1DJNZ R4，RX-DATA ；数据未接受完就继续RET ；返回主程序3、从机主程序：ORG 1000HSTART1: MOV TMOD, #20H ；定时器 T1 为方式 2MOV TH1, #0F4H ；波特率为 1200bps50MOV TL1, #0F4H SETB TR1 ；启动 T1 工作MOV SCON, #0F8H ；串行口为方式 3，允许接收，SM2=1，TB8=1 MOV PCON, #00HMOV R0, #20H ；R0 指向发送数据块始址MOV R, #40H ；
7、R1 指向接收数据区始址MOV R2, #20D ；发送数据块长度送 R2MOV R3, #20D ；接收数据块长度送 R3SETB EA ；开 CPU 中断SETB ES ；允许串行口中断CLR RI ；清 RILCALL BAOSJMP $ ；停机4、从机中断通信子程序：ORG 0023HLJMP SERVE ；串行口中断服务程序入口ORG 0050H51START： MOV TOMD，#20H ；定时器 T1 初始化，方式 2MOV TL1，#0F3HMOV TH1，#0F3HSETB TR1 ；启动定时器MOV PCON，#80H ；SMOD=1MOV SCON，#0F0H ；串行口为
8、方式 3，允许接收，SM2=1MOV 08H，#50H ；发送数据缓冲区首址至 R0MOV 09H，#60H ；接收数据缓冲区首址至 R1SETB EA ；开中断SETB ES ；允许串行口中断LJMP MAIN ；转主程序，等待串行口中断SERVE: CLR RIPUSH APUSH PSWCLR RS0 ；选工作寄存器 I 区SETB RS1MOV A，SBUFXRL A，#MYADDR ；MYADDR 为本从机地址JZ IS-ME ；地址符合，跳转RETURN： POP PSWPOP ARET1 ；中断返回IS-ME： CLR SM2 ；地址符合，继续与主机通信MOV SBUF，#MYA
9、DDR ；从机地址送回主机LOOP1： JNB T1， LOOP1CLR T1RX-COMD：JNB R1，RX-COMD ；接收主机命令CLR R1IF-RESET： JNB RB8，DO-WHAT ；是命令帧跳转SETB SM2 ；RB8=1 是复位信号，置 SM2=1 返回LJMP RETURNDO-WHAT：MOV A，SBUF ；命令分析CJNE A，#02H，NEXT152NEXT1： JC NEXTMOV A，#80H ；非法命令，置 ERR=1，向主机返回本机状态MOV SBUF，ALOOP2： JNB T1， LOOP2CLR T1SETB SM2 LJMP RETURN ；
10、返回NEXT： JZ READY-RX READY-RX：JB PSW.1,TX-TRDY ；PSW.1=1 发送准备就绪，跳转MOV A，#00H ；PSW.1=0，未准备好，置TRDY=0，回送给主机MOV SBUF，ALOOP3： JNB T1， LOOP3CLR T1SETB SM2 LJMP RETURNTX-TRDY：MOV A，#02H ；向主机返回发送准备就绪标志MOV SBUF，ACLR PSW.1WHAT1： JNB T1，WHAT1CLR T1MOV R4，R0 ；数据块长度至 R4INC R4 ；数据块长度加 1TX-DATA：MOV SBUF，R0 ；发送数据块，发送
11、的第一个字节是数据块长度WHAT2： JNB T1，WHAT2CLR T1INC R0DJNZ R4，TX-DATASETB SM2 ；发送完毕，置 SM2=1，返回LJMP RETURNREADY-RX：JB PSW.5， TX-RRDY ；PSW.5=1 发送准备就绪，跳转MOV A，#00H ；PSW.5=0，未做好接收准备MOV SBUF，A53LOOP4： JNB T1， LOOP4CLR T1SETB SM2 LJMP RETURNTX-RRDY：MOV SBUF，#01H ；向主机报告接收准备就绪CLR PSW.5RX-BYTEX：JNB R1，RX-BYTEX ；接收数据块长度
12、CLR RIMOV A，SBUFMOV R1，A ；保存数据块长度INC R1 MOV R4，A ；数据块长度送 R4RX-DATA： JNB RI，RX-DATA ；接收数据块CLR RIMOV R1，SBUFINC R1 DJNZ R4，DX-DATASETB SM2 LJMP RETURN5、 查找报警点子程序：TLTC: MOV A, R1 ；送有警口控制字到 AANL A, #0FH ；屏蔽高 4 位MOV R7, AJNZ L1MOV R3, #10H ；是 P4 口，10H 送 R3L1: MOV A, R754XRL A, #01HNZ L2MOV R3, 20H ；是 P5 口，20H 送 R3L2: MOV A, R7 XRL A, #02HJNZ L3MOV R3, 30H ；是 P6 口，30H 送 R3L3: MOV A, R7 XRL A, #03HJNZ L4MOV R3, 40H ；是 P7 口，40H 送 R3L4:
