AT89C52單片機(jī)與VB串行通信的實(shí)現(xiàn)

4．2下位機(jī)（單片機(jī)）串行通信及程序設(shè)計(jì)

單片機(jī)可以采用中斷方式或查詢RI（接受中斷標(biāo)志位）或TI（發(fā)送中斷標(biāo)志位）方式進(jìn)行數(shù)據(jù)通信②。設(shè)計(jì)采用查詢方式，在定時(shí)器T2中斷子程序中查詢 RI，一旦檢測(cè)到RI=1則轉(zhuǎn)入接受數(shù)據(jù)子程序，在子程序中單片機(jī)讀取從上位機(jī)發(fā)送的通信指令、讀取記錄個(gè)數(shù)等數(shù)據(jù)，經(jīng)校驗(yàn)正確后，即從ATC256存儲(chǔ)器中將歷史記錄數(shù)據(jù)上傳給PC機(jī)，單片機(jī)發(fā)送數(shù)據(jù)子程序流程圖如圖3：

圖3單片機(jī)發(fā)送數(shù)據(jù)子程序流程圖

4．3上位機(jī)（PC機(jī)）串行通信及程序設(shè)計(jì)

1．編程方法

上位機(jī)利用Visual Basic 6.0編程。用VB6.0開(kāi)發(fā)串行通信程序有兩種法，一種是利用Windows的API函數(shù)；另一種是采用VB6.0的通信控件MSComm。利用API 函數(shù)編寫(xiě)串行通信程序較為復(fù)雜，需要掌握大量的通信知識(shí)，其優(yōu)點(diǎn)是可實(shí)現(xiàn)的功能更豐富、應(yīng)用面更廣泛，適合于編寫(xiě)較為復(fù)雜的低層次通信程序。而VB6.0 的MSComm通信控件提供了標(biāo)準(zhǔn)的事件處理函數(shù)、事件、方法，并通過(guò)控件屬性對(duì)串口參數(shù)進(jìn)行設(shè)置，比較容易地解決了串口通信問(wèn)題。

2．VB6.0的通信控件及通信方式③

MSComm是VB6.0提供的ActiveX控件，使用前需將該控件添加到VB工具欄。MSComm控件具有功能完善的串口數(shù)據(jù)發(fā)送和接受功能，有兩種處理通信的方式，即事件驅(qū)動(dòng)方式和查詢方式，事件驅(qū)動(dòng)方式是利用MSComm控件的OnComm事件捕獲并處理通信錯(cuò)誤事件，是處理串行端口交互作用的一種非常有效的方法；查詢方式是通過(guò)檢查CommEvent屬性的值來(lái)判斷事件和錯(cuò)誤。

本系統(tǒng)采用事件驅(qū)動(dòng)方式進(jìn)行串口通信設(shè)計(jì)，圖4為上位機(jī)通信界面，設(shè)計(jì)4個(gè)命令按紐，分別為發(fā)送命令、退出、保存、瀏覽數(shù)據(jù)；兩個(gè)文本框，Text2用于輸入需從下位機(jī)讀取的記錄個(gè)數(shù)，Text3用于顯示下位機(jī)發(fā)送來(lái)的數(shù)據(jù)；進(jìn)行數(shù)據(jù)通信的單片機(jī)和串行通信口的選擇通過(guò)兩組單選按紐完成。在發(fā)送命令按紐的 Click事件中，將通信指令通過(guò)串行口發(fā)送給上位機(jī)，當(dāng)選擇左側(cè)單片機(jī)時(shí)（變量LR(1)=1）,通信指令為“ET”，選擇右側(cè)單片機(jī)時(shí)（變量LR(1)=2），通信指令為 “DT”，數(shù)據(jù)傳送以回車(chē)符（十進(jìn)制ASCII碼為13）作為結(jié)束標(biāo)記。

下面是MSComm控件的初始化程序、部分?jǐn)?shù)據(jù)發(fā)送和接受程序：
MSComm控件的初始化（屬性設(shè)置）程序：
MScomm1.ComPort=1 ；設(shè)置串行端口(com1)
MScomm1.Settings=2400,n,8,1 ；設(shè)置波特率及數(shù)據(jù)幀格式
MScomm1.InputMOde=1 ；數(shù)據(jù)接受按字節(jié)(binary)方式
MScomm1.InbufferSize=4000 ；數(shù)據(jù)接受緩沖區(qū)大小為4000字節(jié)
MScomm1.InputLen=0 ；INPUT讀取緩沖區(qū)的所有內(nèi)容