新聞中心

EEPW首頁(yè) > 嵌入式系統(tǒng) > 設(shè)計(jì)應(yīng)用 > 在VB下PC機(jī)與MCS-51單片機(jī)的串行通信

在VB下PC機(jī)與MCS-51單片機(jī)的串行通信

作者: 時(shí)間:2012-01-30 來(lái)源:網(wǎng)絡(luò) 收藏

  在開(kāi)發(fā)微機(jī)控制及數(shù)據(jù)采集的系統(tǒng)中,經(jīng)常需要通過(guò)RS232接口實(shí)現(xiàn)與單片機(jī)之間的。在DOS時(shí)代,程序員須要具備相當(dāng)?shù)挠布R(shí),才有可能著手編寫(xiě)PC下的程序。而當(dāng)今在下,利用現(xiàn)有的Microsoft Comm control控件,只需要編寫(xiě)少量的程序代碼,就可以輕松、高效地完成任務(wù)。更何況Visual Basic是目前廣受程序員喜愛(ài)的可視化編程語(yǔ)言,利用它還能夠編寫(xiě)出Windows下漂亮的應(yīng)用程序。

一、 Microsoft Comm control控件簡(jiǎn)介

  微軟公司提供的Microsoft Comm control控件(簡(jiǎn)稱(chēng)MSComm)為編程者提供了簡(jiǎn)化的Windows下的編程,使編程者不必掌握諸多關(guān)于硬件方面的知識(shí)。它提供了兩種處理串行通信的方法:一是事件驅(qū)動(dòng)方法;二是查詢(xún)法。

1. 事件驅(qū)動(dòng)法

  這是一種很強(qiáng)的處理串口活動(dòng)的方法。當(dāng)串口接收到或發(fā)送完指定數(shù)量的數(shù)據(jù)時(shí),或當(dāng)狀態(tài)發(fā)生改變時(shí),MSComm 控件都將觸發(fā)OnComm事件,該事件也可以捕獲通信中的錯(cuò)誤。當(dāng)應(yīng)用程序捕獲到這些事件后,可通過(guò)檢查MSComm控件的CommEvent屬性的值來(lái)獲知所發(fā)生的事件或錯(cuò)誤,從而執(zhí)行相應(yīng)的處理。這種方法具有程序響應(yīng)及時(shí),可靠性高等優(yōu)點(diǎn)。

2. 查詢(xún)法

  可以在每個(gè)重要的程序之后查詢(xún)MSComm控件某些屬性(如CommEvent屬性和InBufferCount屬性)的值來(lái)檢測(cè)事件和通信錯(cuò)誤。這對(duì)小的自含程序可能比較常用。

  MSComm控件有許多重要的屬性,其中幾個(gè)重要的屬性如下:

  · CommPort: 設(shè)置或返回通信端口。為1時(shí)對(duì)應(yīng)COM1;為2時(shí)對(duì)應(yīng)COM2。
  · Settings: 設(shè)置或返回波特率、奇偶校驗(yàn)、數(shù)據(jù)位和停止位參數(shù)。
  · PortOpen: 打開(kāi)或關(guān)閉通信口。
  · Input: 讀取或刪除緩沖區(qū)中的數(shù)據(jù)流。
  · Output: 將數(shù)據(jù)寫(xiě)入發(fā)送緩沖區(qū)。
  · InputLen: 設(shè)置和返回Input屬性從接收緩沖區(qū)中讀取的字節(jié)數(shù)。
  · InputMode: 設(shè)置和返回的類(lèi)型。該屬性為0時(shí),Input屬性所檢取的數(shù)據(jù)是文本;為1時(shí),Input屬性所檢取的數(shù)據(jù)是二進(jìn)制數(shù)據(jù)。這個(gè)屬性對(duì)與單片機(jī)的通信尤為重要。

二、 通信線路連接

  的某個(gè)串行口通過(guò)電纜線與RS232收發(fā)器MAX232的232電平端口三線交叉連接,如圖1所示。MAX232的邏輯電平端口與單片機(jī)的串行口相連。RS232的9針連接器的4腳和6腳、7腳和8腳不用連接。


按此在新窗口瀏覽圖片
圖1 PC機(jī)與單片機(jī)的通信接口電路框圖

三、 編程實(shí)現(xiàn)

1. 實(shí)現(xiàn)功能

  因本程序?yàn)橥ㄐ叛菔境绦?,所以功能較為簡(jiǎn)單。具體功能為利用鍵盤(pán)在PC機(jī)中輸入一個(gè)6字節(jié)(12位的 0~9,A~F)的二進(jìn)制數(shù),然后用鼠標(biāo)點(diǎn)擊通信命令按鈕,PC機(jī)就將此二進(jìn)制數(shù)發(fā)給單片機(jī),單片機(jī)收到此數(shù)后再原樣發(fā)回,PC機(jī)收到后顯示在窗體上。試驗(yàn)者可通過(guò)肉眼比較發(fā)送和接收的兩個(gè)數(shù)據(jù),檢驗(yàn)通信是否成功。

2. 通信協(xié)議

  波特率:19.2kb/s;無(wú)奇偶校驗(yàn);8位數(shù)據(jù)位;1位停止位。

3. PC機(jī)程序

  (1) 在工程項(xiàng)目中添加一個(gè)窗體,取名為frmcomm,設(shè)置其Caption屬性為通信。
  (2) 在窗體中添加兩個(gè)大小一樣的文本框,分別取名為txtSend和txtRcv。
  (3) 在窗體中添加一個(gè)命令按鈕,取名為cmdcomm,設(shè)置其Caption屬性為通信。
  (4) 在窗體中添加MSComm控件,取名為MSComm1。
  (5) 打開(kāi)代碼窗口,在cmdcomm控件的Click事件中加入以下程序代碼:

Private Sub cmdcommClick()
  Dim Senddat(5) As Byte,Rcvdat() As Byte,
    dattemp As Variant,i As Integer
  cmdcomm.Enabled=False′使cmdcomm按鈕失效
  For i=0 To 5′從發(fā)送文本框txtSend獲取發(fā)送數(shù)據(jù)
    Senddat(i)="H" Mid(txtSend.Text,i * 2+1,2)
  Next i
  MSComm1.CommPort=1′設(shè)置端口號(hào)為1
  MSComm1.Settings="19200,N,8,1"′設(shè)置波特率等通 ′信協(xié)議
  MSComm1.InputLen=6′設(shè)置一次從串口讀取6個(gè)字節(jié)
  MSComm1.PortOpen=True′打開(kāi)串行口
  MSComm1.InputMode=comInputModeBinary′從串口 ′讀取二進(jìn)制數(shù)據(jù)
  MSComm1.Output=Senddat′發(fā)送數(shù)據(jù)
  Do Until MSComm1.InBufferCount >= 6′查詢(xún)方式,等 ′待接收到6個(gè)字節(jié)
    DoEvents
  Loop
  dattemp=MSComm1.Input′從串口讀取數(shù)據(jù)至變體變量
  Rcvdat=dattemp′數(shù)據(jù)送至接收二進(jìn)制數(shù)組
    txtRcv.Text=""
  For i=0 To 5′接收數(shù)據(jù)送至接收文本框txtRcv顯示
    txtRcv.Text=txtRcv.Text Right("0" Hex(Rcvdat(i)),2)
  Next i
  MSComm1.PortOpen=False′關(guān)閉串行口
  cmdcomm.Enabled=True′使能cmdcomm接鈕
End Sub

  (6) 選擇開(kāi)始-運(yùn)行。用PC機(jī)鍵盤(pán)在輸入文本框中輸入要發(fā)送的6字節(jié)二進(jìn)制數(shù)據(jù),然后用鼠標(biāo)點(diǎn)擊通信按鈕即可。

4. 單片機(jī)C51程序

  單片機(jī)晶振為11.0592MHz,串行口的工作方式設(shè)置為方式1,10位異步收發(fā)。采用查詢(xún)方式接收和發(fā)送,程序清單如下:

#include
#include uchar unsigned char
main() {
  uchar temp,datmsg[6];
  TMOD=0x20; //設(shè)置波特率為19.2kb/s
  PCON=0x80;
  TH1=0xfd; TL1=0xfd;
  TR1=1; //啟動(dòng)定時(shí)器1
  SCON=0x50; //設(shè)置串行口為10位異步收發(fā),且允許 //接收
  while(1) {for(temp=0;temp6;temp++) //連續(xù)接收6個(gè) //字節(jié)
    {while(RI==0); RI=0;
    datmsg[temp]=SBUF;
    }
    for(temp=0;temp6;temp++)//連續(xù)發(fā)送6個(gè) //字節(jié)
    {SBUF=datmsg[temp]; while(TI==0);TI=0;
    }
  }
}

結(jié)束語(yǔ)

  由于篇幅所限,本程序僅為演示參考程序,并無(wú)實(shí)際意義。但它展示了PC機(jī)和單片機(jī)串行通信的一般方法以及在 中處理二進(jìn)制數(shù)據(jù)的方法,使得單片機(jī)和PC機(jī)的應(yīng)用能夠更加緊密地結(jié)合在一起。讀者可在此基礎(chǔ)上加入一些握手信號(hào)和檢錯(cuò)碼,如奇偶校驗(yàn)、累加和校驗(yàn)及循環(huán)冗余校驗(yàn)(CRC)等等,便可成為自己的應(yīng)用程序。



關(guān)鍵詞: VB PC機(jī) MCS-51 串行通信

評(píng)論


相關(guān)推薦

技術(shù)專(zhuān)區(qū)

關(guān)閉