用VB 編程語言實(shí)現(xiàn)PC機(jī)與AVR 單片機(jī)的通信
圖2 程序流程圖
以下是加載窗體時(shí)對(duì)MSCOMM 控件的初
始化設(shè)置
Private Sub Form Load ()
With MSComm1
. CommPort = 1 ’設(shè)置通訊端口
. InBufferCount = 0 ’清空緩沖區(qū)
. InBufferSize = 5 000
’設(shè)置通訊波特率等
. Settings = “9 600 , n ,8 ,1”
If (PortOpen = False) Then
PortOpen = True
End if’將取出的數(shù)據(jù)設(shè)置為二進(jìn)制
. InputMode = comInputModeBinary
End With
End Sub
接收按鈕按下時(shí),定時(shí)器啟動(dòng),開始檢查緩沖區(qū)中是否有數(shù)據(jù)。本系統(tǒng)定義了2 個(gè)定時(shí)器,一個(gè)用于對(duì)通訊協(xié)議中起始符和命令碼的檢測(cè),另一個(gè)用于控制信息段的數(shù)據(jù)流。
接收數(shù)據(jù)時(shí),定義一個(gè)變體(Variant) 類型的變量tempbuf ,將緩沖區(qū)內(nèi)的數(shù)據(jù)賦給此變量tempbuf = MSComm1. Input ,同時(shí)還要定義一個(gè)字節(jié)(Byte) 型的數(shù)組變量indate () ,再次賦值indate = tempbuf ,這樣就可以操作indate () 中的數(shù)據(jù)了。
由于Input 屬性在取出數(shù)據(jù)后會(huì)自動(dòng)清空緩沖區(qū),因此不再需要用其他代碼強(qiáng)制清空。
為了解決傳輸干擾的問題,還要求上位機(jī)給下位機(jī)發(fā)送數(shù)據(jù),以通知下位機(jī)接收的數(shù)據(jù)是否無誤,從而使下位機(jī)決定是否重新發(fā)送數(shù)據(jù)。
發(fā)送數(shù)據(jù)時(shí),定義一字符串(St ring) 類型的數(shù)組變量outdate ( ) ,將需要發(fā)送的數(shù)據(jù)賦給變量,然后用下面語句發(fā)送MSComm1. Output = CVar (outdate)
5 硬件實(shí)現(xiàn)
實(shí)現(xiàn)電路如圖3 所示。
AT90 系列單片機(jī)帶有一個(gè)全雙工的通用串行異步收發(fā)器(UART) ,數(shù)據(jù)傳送通過把被傳送的數(shù)據(jù)寫入U(xiǎn)ART I/ O寄存器UDR 來初始化,在波特率時(shí)鐘加載到移位寄存器的傳送操作時(shí),起始位從TXD 引腳移出,然后是數(shù)據(jù),低位在先。當(dāng)停止位被移出時(shí)UDR 寄存器中沒有新的數(shù)據(jù),UDRE 標(biāo)志位將保
持為1 直到UDR 被重寫。而在數(shù)據(jù)接收時(shí),接收器前端的邏輯以16 倍波特率采樣RXD 引腳的信號(hào)。如果一個(gè)有效的起始位被發(fā)現(xiàn),就開始起始位之后的數(shù)據(jù)位的采樣,在采樣的同時(shí),這些位被移入傳送移位寄存器。當(dāng)停止位到來時(shí),3 個(gè)采樣中的大數(shù)應(yīng)為1 才能接收該停止位。
圖3 硬件實(shí)現(xiàn)電路
6 結(jié)束語
本系統(tǒng)試運(yùn)行已經(jīng)成功,說明MSCOMM 控件完全可以實(shí)現(xiàn)各種高速復(fù)雜的串行通信協(xié)議,具有很高的實(shí)用價(jià)值。
參 考 文 獻(xiàn)
[1 ] 耿德根,宋建國(guó),馬潮. AVR 高速嵌入式單片機(jī)原理與應(yīng)用[M] . 北京:北京航空航天大學(xué)出版社,
2001.
[2 ] 東箭工作室. Visual Basic 5. 0 中文版程序設(shè)計(jì)[M] . 北京:清華大學(xué)出版社,1997.InBufferSize :設(shè)置并返回接收緩沖區(qū)的字節(jié)數(shù)。
單片機(jī)相關(guān)文章:單片機(jī)教程
單片機(jī)相關(guān)文章:單片機(jī)視頻教程
單片機(jī)相關(guān)文章:單片機(jī)工作原理
數(shù)字通信相關(guān)文章:數(shù)字通信原理
通信相關(guān)文章:通信原理
評(píng)論