中文字幕无码不卡一区二区三区_少妇被又大又粗又爽毛片久久黑人_91精品国产在热久久无毒不卡_久久久久久亚洲综合网站

技術(shù)熱線: 4007-888-234
設(shè)計開發(fā)

專注差異化嵌入式產(chǎn)品解決方案 給智能產(chǎn)品定制注入靈魂給予生命

開發(fā)工具

提供開發(fā)工具、應用測試 完善的開發(fā)代碼案例庫分享

技術(shù)支持

從全面的產(chǎn)品導入到強大技術(shù)支援服務 全程貼心伴隨服務,創(chuàng)造無限潛能!

新品推廣

提供新的芯片及解決方案,提升客戶產(chǎn)品競爭力

新聞中心

提供最新的單片機資訊,行業(yè)消息以及公司新聞動態(tài)

PIC16系列單片機與PC機串行通信的軟硬件實現(xiàn)

更新時間: 2019-03-26
閱讀量:1876

 介紹一種運用PIC16F84單片機實現(xiàn)與PC機串行通信的方法,并給出其硬件接口電路及通信源程序。

1 前言 美國Microchip公司的PIC16系列單片機是一種新型的CMOS工藝的8位單片機。其中,PIC16FXX單片機的程序存儲器為電可擦除閃速存儲器(flash),可多次修改程序,甚至可以在線編程。PIC16F83和PIC16F84片內(nèi)數(shù)據(jù)存儲器除RAM外,還有64字節(jié)的EEPROM,可以當作一般的或非易失性的數(shù)據(jù)存儲器使用,簡單方便。它還具有片內(nèi)上電復位、延時電路、看門狗電路等。另外,PIC16系列單片機功耗極低,因而是一種非常適合在各種便攜式設(shè)備中使用的高性價比的單片機,并已經(jīng)得到了越來越廣泛的應用。 但是在許多需要大量計算的運用中,還必須借助微機的強大數(shù)據(jù)處理能力。這樣必須通過通信電路實現(xiàn)PIC單片機與微機間的可靠數(shù)據(jù)傳輸。有的PIC16單片機內(nèi)并沒有提供串行口,所以串行通信必須通過自己設(shè)計的硬件電路和通信軟件來實現(xiàn)。 下面介紹用查詢法實現(xiàn)異步串行通訊的方法。同時給出了用PIC16F84單片機的兩個I/O口模擬2線串行口的硬件接口電路、程序流程框圖、單片機內(nèi)通信程序以及微機內(nèi)的通信程序等。

1 前言 美國Microchip公司的PIC16系列單片機是一種新型的CMOS工藝的8位單片機。其中,PIC16FXX單片機的程序存儲器為電可擦除閃速存儲器(flash),可多次修改程序,甚至可以在線編程。PIC16F83和PIC16F84片內(nèi)數(shù)據(jù)存儲器除RAM外,還有64字節(jié)的EEPROM,可以當作一般的或非易失性的數(shù)據(jù)存儲器使用,簡單方便。它還具有片內(nèi)上電復位、延時電路、看門狗電路等。另外,PIC16系列單片機功耗極低,因而是一種非常適合在各種便攜式設(shè)備中使用的高性價比的單片機,并已經(jīng)得到了越來越廣泛的應用。 但是在許多需要大量計算的運用中,還必須借助微機的強大數(shù)據(jù)處理能力。這樣必須通過通信電路實現(xiàn)PIC單片機與微機間的可靠數(shù)據(jù)傳輸。有的PIC16單片機內(nèi)并沒有提供串行口,所以串行通信必須通過自己設(shè)計的硬件電路和通信軟件來實現(xiàn)。 下面介紹用查詢法實現(xiàn)異步串行通訊的方法。同時給出了用PIC16F84單片機的兩個I/O口模擬2線串行口的硬件接口電路、程序流程框圖、單片機內(nèi)通信程序以及微機內(nèi)的通信程序等。

PIC16F84單片機內(nèi)通信程序的設(shè)計 

 接收子程序框圖 圖3發(fā)送子程序框圖 圖2和圖3分別是串行發(fā)送和接收的子程序流程框圖。發(fā)送時,通過使數(shù)據(jù)發(fā)送端DX為低電平并保持B秒(9600波特率時為104μs)來發(fā)送起始位。隨后每B秒鐘通過置位或清零DX端把數(shù)據(jù)發(fā)送出去。這里的B是指一位所持續(xù)的時間(B=1/波特率)。接收時,數(shù)據(jù)接收端DR大約要每B/2秒(9600波特率時為52μs)查詢一次以檢測起始位,如果檢測到起始位,則在大約1.5B秒(9600波特率時為156μs)后檢測第一位數(shù)據(jù)位,隨后每B秒鐘檢測一次其它的數(shù)據(jù)位。 相應的源程序如下: ;接收子程序 Rcvr clrwdt ;清片內(nèi)看門狗 ;定時器 btfsc RA,DR ;檢測起始位 goto Rcvr ;未檢測到起始位 movlw 8 ;檢測到起始位 movwf R_CNT ;8位數(shù)據(jù)位 Rnext call Delay ;延時B/2秒 bcf STATUS,C ;清進位標志 rrf RevReg ;LSB在先 btfsc RA,DR ;該位為0   ;還是為1 bsf RcvReg,MSB ;為1 call Delay ;延時B/2秒 decfsz R_CNT goto Rnext retlw0 ;返回 ;發(fā)送子程序 Xmtr clrwdt ;清片內(nèi)看門狗 ;定時器 movlw 8 ;發(fā)送位數(shù)為8 movwf X_CNT bcf RA,DX ;發(fā)送起始位 Xnext call Delay ;延時B/2秒 call Delay ;延時B/2秒 rrf XmtReg ;LSB在先 btfsc STATUS,C ;檢測將要發(fā)送   ;的數(shù)據(jù)位 bsf RA,DX ;數(shù)據(jù)位為1 btfss STATUS,C bcf RA,DX ;數(shù)據(jù)位為0 decfsz X_CNT ;位計數(shù)為0則 ;發(fā)停止位 goto Xnext ;位計數(shù)不為0 ;則發(fā)下一位數(shù)據(jù)位 Xstop call Delay ;延時B/2秒 call Delay ;延時B/2秒 Bsf RA,DX ;發(fā)送停止位 Retlw 0 ;返回 ;延時子程序 Delay movlw 12 ;52μS延時 movwf DCNT ; Dnext decfsz DCNT goto Dnext ; retlw 0 ;

4 Win95的串行通信機制及串口查詢法的原理 常用的DOS系統(tǒng)主要是工作在響應中斷方式。PC機串行通信程序大多利用其BIOS塊的INT14H中斷,以查詢串口的方式完成異步串行通信。 Windows系統(tǒng)函數(shù)即包含了通信支持中斷功能。Win95系統(tǒng)為每個通信設(shè)備開辟了用戶定義的輸入輸出緩沖區(qū)(即讀/寫緩沖區(qū)),數(shù)據(jù)進出通信口均由系統(tǒng)后臺來完成。應用程序只需完成對輸入輸出緩沖區(qū)操作就可以了。實際過程是每接收一個字符就產(chǎn)生一個低級硬件中斷,Win95系統(tǒng)中的串行驅(qū)動程序就取得了控制權(quán),并將接收到的字符放入輸入數(shù)據(jù)緩沖區(qū)。然后將控制權(quán)返還正在運行的應用程序。如果輸入緩沖區(qū)數(shù)據(jù)已滿,串行驅(qū)動程序用當前定義的流控制機制通知發(fā)送方停止發(fā)送數(shù)據(jù)。隊列中的數(shù)據(jù)按“先進先出”的次序處理。 (1) 按協(xié)議的設(shè)置初始化并打開串口,這樣做就是通知Windows本應用程序需要這個串口,并封鎖其他應用程序使它們不能使用此串口。 (2) 配置這個串口。 (3) 在串口上往返地傳輸數(shù)據(jù),并在傳輸過程中進行校驗。 (4) 不需要此串口時,關(guān)閉串口。即釋放串口以供其它應用程序使用。 在這四個步驟中,主要的程序代碼集中在第(3)步。 串口查詢法是一種主要工作在查詢方式下的實現(xiàn)方法。當通信程序工作在“查詢”方式時,可以不考慮Win95的進程和線程的問題。僅在串口有數(shù)據(jù)時,去讀串口緩沖區(qū)就可以了,如圖4所示。這種方法下確定串口讀取的時機、握手協(xié)議及軟件糾錯的實現(xiàn)是程序員應考慮的主要問題。

 

串口初始化流程 由于這種方法主要工作在查詢方式。程序員必須完成相當一部分通信狀態(tài)的檢測工作,許多細節(jié)(甚至包括通信過程中的字符屬性的轉(zhuǎn)換)也必須通過程序代碼完成。這種查詢方法對通信雙方協(xié)議的依賴性尤其大。雙方通信協(xié)議的約定對程序?qū)崿F(xiàn)的難易程度影響很大。 串口查詢法中,一般串口初始化的流程如圖5。 值得注意的一點是,此方法下協(xié)議的約定必須滿足以下條件:即甲方發(fā)送時,乙方必須在甲方發(fā)送動作之前進入循環(huán)接收狀態(tài),直到接收到字符后通過對串口讀取函數(shù)ReadFile返回值的判斷跳出循環(huán)狀態(tài)。 同時,一般為了不使系統(tǒng)因循環(huán)等待接收而進入“死循環(huán)”狀態(tài),可以人為設(shè)置讀取串口的循環(huán)次數(shù),一般1000~10000次即可。 本程序的實現(xiàn)平臺是VB4,這是一種極為靈活的高級語言,它可以方便地引入?yún)R編語言的思維,利用其GoTo轉(zhuǎn)向語句方便地控制程序的流程,靈活方便。

5 PC機內(nèi)通信程序的實例 現(xiàn)約定甲方是PC機,乙方是單片機系統(tǒng)(如讀卡器)。通信格式設(shè)置為2400波特率,8位數(shù)據(jù)位,1位停止位,無奇偶校驗。 下面是一個約定好通訊協(xié)議的程序?qū)嵗?,協(xié)議流程如圖6所示。 以下是甲方(PC機)的幾個子函數(shù)的程序?qū)嵗?nbsp; 通信協(xié)議流程 Private Function OpenThePort(cPort as String,cBaud as String,cParity as String,cData as String,tStops asString)As Boolean ’ 打開串口的子過程 Dim lResult as Long Dim lHandle as Long Dim DCB_COMM as DCB Dim cDCBConfig as String lHandle = CreateFile(cPort,GENERIC_READ Or GENERIC_WRITE, 0&,0&,OPEN_EXISTING,0&,0&) If lHandle = -1 Then ’打開串口失敗 OpenThePort = False MsgBox “串口可能正被其他應用程序占用!” lResult = CloseHandle(lHandle) ’先關(guān)閉串口后再打開 If lResult = 0 Then OpenThePort Exit Function End If End If cDCBConfig.band = 2400 ’設(shè)置DCB cDCBConfig.parity = None cDCBConfig.data = 8 cDCBConfig.stop = 1 lResult = BuildCommDCB(cDCBConfig,DCB_COMM 按用戶設(shè)定配置一個DCB結(jié)構(gòu) If lResult = 0 Then OpenThePort = False MsgBox “無法建立DCB設(shè)備控制塊” Exit Function End If lResult = SetCommState(lHandle,DCB_Comm) ’實際設(shè)置一個串口的DCB If lResult = 0 Then OpenThePort = False MsgBox “無法建立DCB設(shè)備控制塊” Exit Function End If OpenThePort = True End Function Private Sub SendHand ( ) ’發(fā)送握手信號的子過程 Dim Nchars As Long Static Readbuff As String * 1 Static Writebuff As String * 1 Dim lpDCB As DCB Dim lRet As Long Dim lHandle As Long Dim lpOverlapped As OVERLAPPED Dim RNum As Integer MsgBox “請把讀卡器插在串口2上!”, 48,“提示窗口” lHandle = OpenThePort(COMM1,2400,None,8,1) lRet = PurgeComm( lHandle,1 ) ’清輸出緩沖區(qū) lRet = PurgeComm( lHandle,0 ) ’清輸入緩沖區(qū) lRet = GetCommState ( lHandle,lpDCB ) ’獲得通訊口的狀態(tài) Shand: Writebuff$= Chr$(&H8F) lRet = WriteFile (lHandle,Writebuff$,1,Nchars,lpOverlapped ) ’送握手信號入串口緩沖區(qū) If lRet <= 0 Then MsgBox “發(fā)送操作出錯,卡握手信號未發(fā)送成功”, 16 GoTo Shand ’不成功則重發(fā) Else GoTo Qtest End If GoTo Shand Qtest: Readbuff$ =“ ” ’清除緩沖區(qū)為空 Do While lHandle ’循環(huán)查詢串口 RNum = 0 ’設(shè)置讀串口次數(shù)的指針為0 ReadAgain: lRet = ReadFile( lHandle, Readbuff$,1,Nchars,lpOverlapped ) If lRet < 0 Then MsgBox “讀取應答信號時出錯”, 16 End If If lRet = 0 Then If RNum > 1000 Then ’只讀1000次串口,以免陷入死循環(huán) MsgBox "卡沒有插接好或卡沒有接在串口上!" GoTo CloseP End If RNum = RNum + 1 GoTo ReadAgain End If If Hex$(Asc(Readbuff)) <> Hex$(&HFF) Then GoTo Shand ’回送碼不正確則返回繼續(xù)發(fā)送握手信號 Else Label1.Caption = “握手信號是:” +Hex$(Asc(Readbuff$)) Msgbox “握手信號正確,已正確聯(lián)機” GoTo CloseP End If Loop CloseP:lRet = CloseHandle( lHandle ) If lRet = 0 Then MsgBox “串行通訊口關(guān)閉成功”, 48,“提示窗口” End If End Sub 這里要注意的是:當PC機與單片機系統(tǒng)通信時,單片機數(shù)據(jù)存儲區(qū)( RAM )內(nèi)的數(shù)據(jù)是十六進制,在信號線上傳輸?shù)氖鞘M制數(shù)的ASCII碼的二進制形式;而Windows系統(tǒng)下使用的是ANSI碼,ANSI碼僅在前126個與ASCII碼相同。即在Win95下接收到的是十六進制數(shù)的ASCII碼的字符串,可先轉(zhuǎn)換為ANSI碼后再在Win95下還原為十六進制數(shù)。 具體為:Code$=Hex$(Asc ( Readbuff$ ) ) 另外,由于32位API函數(shù)參數(shù)的數(shù)據(jù)類型的變化,所有整形參數(shù)都被換為長整型(Long)以支持32位的處理,這一點在設(shè)置返回值時尤其如此。 6 結(jié)束語 以上的軟硬件在我們的實踐中達到了較為理想的效果。通過軟件節(jié)省了硬件的開銷,并通過在PIC16F84單片機系統(tǒng)和PC機雙方的通信軟件內(nèi)增加握手信號,達到了軟件數(shù)據(jù)校驗的目的,獲得了較高的通信可靠性。




 



荔波县| 获嘉县| 西丰县| 聊城市| 泰州市| 洞头县| 若尔盖县| 玛多县| 尚志市| 唐河县| 资讯| 五华县| 栾城县| 高青县| 巴东县| 芦山县| 鄢陵县| 静安区| 明星| 石棉县| 通榆县| 无为县| 亳州市| 沾益县| 渭南市| 金华市| 方山县| 淮安市| 固阳县| 温泉县| 科技| 铜川市| 屏南县| 濉溪县| 邢台市| 萍乡市| 新昌县| 揭阳市| 工布江达县| 鹰潭市| 通江县|