【正文】 NB RI， $ ；等待 2號機的應答信號 CLR RI MOV A， SBUF ； 2號機應答，讀至 A JNZ ALOOP2 ； 2號機應答“錯誤”，轉重新發(fā)送 RET ； 2號機應答“正確”，返回 3/2/2023 47 接收程序清單如下： BSTART： CLR EA MOV TMOD， 20H MOV TH1， 0F4H MOV TL1， 0F4H MOV PCON， 00H SETB TR1 MOV SCON， 50H ；設定串口方式 1，且準備接收 BLOOP1： JNB RI， $ ；等待 1號機的聯絡信號 CLR RI MOV A， SBUF ；收到 1號機信號 XRL A， 0E1H ；判是否為 1號機聯絡信號 JNZ BLOOP1 ；不是 1號機聯絡信號，再等待 MOV SBUF， 0E2H ；是 1號機聯絡信號，發(fā)應答信號 JNB TI， $ CLR TI MOV R0， 40H ；設定數據塊地址指針初值 MOV R7， 10H ；設定數據塊長度初值 MOV R6， 00H ；清校驗和單元 3/2/2023 48 BLOOP2： JNB RI， $ CLR RI MOV A， SBUF MOV R0， A ；接收數據轉儲 INC R0 ADD A， R6 ；求校驗和 MOV R6， A DJNZ R7， BLOOP2 ；判數據塊是否接收完畢 JNB RI， $ ；完畢，接收 1號機發(fā)來的校驗和 CLR RI MOV A， SBUF XRL A， R6 ；比較校驗和 JZ END1 ；校驗和相等，跳至發(fā)正確標志 MOV SBUF， 0FFH ；校驗和不相等，發(fā)錯誤標志 JNB TI， $ ；轉重新接收 CLR TI END1： MOV SBUF， 00H RET 3/2/2023 49 用串行口進行多機異步通信 多機通信原理 在多機通信時， TB8可置 1或者清 0，與 SM2配合使用。因此，在 SM2=1時， TB8/RB8可作為地址 /數據標志位。 T X DR X D主 機T X DR X D1 號 從 機T X DR X D2 號 從 機T X DR X DN 號 從 機? ?3/2/2023 51 通信協(xié)議 所有從機的 SM2置 1，以接收地址幀 主機發(fā)地址幀 所有從機收到地址幀后，將收到地址與本機地址比較： 相符的從機，使 SM2置 0（以接收隨后的數據幀），并把本機地址發(fā)回主機作為應答 不符的從機，保持 SM2=1，對主機隨后發(fā)來的數據幀不予理睬。 主機收到從機應答地址后，確認地址是否相符，如果地址不符，發(fā)復位信號（數據幀中 TB8=1）；如果地址相符，則清 TB8，開始發(fā)送數據。 主機命令編碼為： 01H，主機命令從機接收數據； 02H，主機命令從機發(fā)送數據。 ERR=1： 表示從機接收的命令是非法的。 MAIN： MOV TMOD， 20H ； T1方式 2 MOV TH1， 0FDH ；初始化波特率 9600 MOV TL1， 0FDH MOV PCON， 00H SETB TR1 MOV SCON， 0F0H ；串口方式 3，多機，準備接收應答 LOOP1： SETB TB8 MOV SBUF， 40H ；發(fā)送預通信從機地址 JNB TI， $ CLR TI JNB RI， $ ；等待從機對聯絡應答 CLR RI MOV A， SBUF ；接收應答，讀至 A XRL A， 40H ；判應答的地址是否正確 JZ AD_OK 3/2/2023 55 AD_ERR： MOV SBUF， 0FFH ；應答錯誤，發(fā)命令 FFH JNB TI， $ CLR TI SJMP LOOP1 ；返回重新發(fā)送聯絡信號 AD_OK： CLR TB8 ；應答正確 MOV SBUF， 41H ；發(fā)送命令字 JNB TI， $ CLR TI JNB RI， $ ；等待從機對命令應答 CLR RI MOV A， SBUF ；接收應答，讀至 A XRL A， 80H ；判斷應答是否正確 JNZ CO_OK SETB TB8 SJMP AD_ERR ；錯誤處理 3/2/2023 56 CO_OK： MOV A， SBUF ；應答正確，判是發(fā)送還是接收 XRL A， 01H JZ SE_DATA ；從機準備好接收，可以發(fā)送 MOV A， SBUF XRL A， 02H JZ RE_DATA ；從機準備好發(fā)送，可以接收 LJMP SE_DATA RE_DATA： MOV R6， 00H ；清校驗和接收 16個字節(jié)數據 MOV R0， 30H MOV R7， 10H 3/2/2023 57 LOOP2： JNB RI， $ CLR RI MOV A， SBUF MOV R0， A INC R0 ADD A， R6 MOV R6， A DJNZ R7， LOOP2 JNB RI， $ CLR RI MOV A， SBUF ；接收校驗和并判斷 XRL A， R6 JZ XYOK ；校驗正確 MOV SBUF， 0FFH ；校驗錯誤 JNB TI， $ CLR TI LJMP RE_DATA 3/2/2023 58 XYOK ： MOV SBUF， 00H ；校驗和正確，發(fā) 00H JNB TI， $ CLR TI SETB TB8 ；置地址標志 LJMP RETEND SE_DATA： MOV R6， 00H ；發(fā)送 16個字節(jié)數據 MOV R0， 30H MOV R7， 10H LOOP3 ： MOV A， R0 MOV SBUF， A JNB TI， $ CLR TI INC R0 ADD A， R6 MOV R6， A DJNZ R7， LOOP3 3/2/2023 59 MOV A， R6 MOV SBUF， A ；發(fā)校驗和 JNB TI， $ CLR TI JNB RI， $ CLR RI MOV A， SBUF XRL A， 00H JZ RET_END ；從機接收正確 SJMP SE_DATA ；從機接收不正確，重新發(fā)送 RET_END： RET 3/2/2023 60 從機程序清單： 設本機號存于 40H單元， 41H單元存放“發(fā)送”命令， 42H單元存放“接收”命令。因此，串行通信適合遠距離數據傳送。請編寫全雙工通信程序。請編寫通