引言

　　在一般的配料工程中，要一台上位機對配料過程中所產(chan) 生的一係列數據進行保存和統計，往往需要檢測來自現場的一些開關(guan) 信號。在應用工程中，在一般的上位機與(yu) 稱量儀(yi) 表的通訊過程中，一般隻用了3個(ge) 引腳（TXD ，RXD ，GND），而還有6個(ge) 腳（CD，DSR，CTS，RI，DTR，RTS）沒有用到,而這些沒有用到的引腳就正好可用於(yu) 檢測和輸出開關(guan) 量。

　　下麵我將介紹基於(yu) VB6.0的平台做的一個(ge) 小項目。

　　工程概況：該項目是廣州科密集團公司用於(yu) 一種新型耗材的配方研製所用的一個(ge) 的自動配方管理軟件。由於(yu) 實驗場所環境所限製，要求計算機不放在現場（不要求設立專(zhuan) 人去操作計算機），隻要求操作工人每稱量按一下秤台旁邊的一個(ge) 按鈕就可以存儲(chu) 當前每物料種類和其相應的重量，使管理係統以這個(ge) 實驗數據為(wei) 依據，進行整理和加工。最後得出一些綜合分析結果，為(wei) 以後的正式生產(chan) 提出配方工藝上的要求。因此係統本身就要求負責實時采集儀(yi) 表的數據；實時采集開關(guan) 量（按鈕和轉換開關(guan) 的狀態）；實時的提醒操作員當些次配料是否有效果（根據配方來看是否報警也就是開關(guan) 量的輸出）；還有存儲(chu) 當前當種物料的配料量，配方的管理，用戶日後的數據查詢和分析工作等。
根據這種要求，我們(men) 可以選擇一種RAD工具來作為(wei) 開發平台。
　　
　　硬件配置：兩(liang) 套計量設備（包含兩(liang) 台定點輸出儀(yi) 表）一台計算機（工控機）
　　軟件：本實例采用Microsoft公司的Visual Basic 6.0作為(wei) 開發平台。Visual Basic是一種具有可視圖形界麵的、快速開發工具，同時它也較流行的開發工具。它可以利用Mscomm控件來完成對串口的控製和開關(guan) 量的采用以及開關(guan) 量的輸出。

　　先介紹一下這九個(ge) 引腳所代表的意義(yi) ：
　　RXD表示接收數據
　　TXD表示發送數據
　　GND表示接地
　　注：（連接計算機和通訊儀(yi) 表的接地端，開關(guan) 量的輸入的公共端就用儀(yi) 表的電源）
　　CD表示調製解調器通知通計算機有載波被檢測到 
　　DTR表示計算機通知調製解調器可以進行傳(chuan) 輸
　　DSR表示調製解調器通知計算機準備就序
　　RI表示調製解調器通知計算機有電話打來
　　CTS表示調製解調器通知計算機可送出數據
　　RTS表示計算機要求調製解調器將數據發出
　　根據這些引腳的意義(yi) ，我們(men) 將調製解調器當成其它的外部設備， CD、DSR、RTS、RI可以用於(yu) 開關(guan) 量的輸入引腳。RTS和DTR可用於(yu) 開關(guan) 量的輸出。
　　具體(ti) 方法如下：
　　在工程中，添加部件Microsoft Comm Control 6.0控件。

1． 控件屬性設置介紹：
　　Commport：設置或返回端口號。就是指 通訊的端口號， 用COMM1就設為(wei) 1， 用COMM2就設為(wei) 2， 但MSComm控件的最大值是16， 在本項目中同 時用了兩(liang) 個(ge) 口， 因為(wei) 需要和兩(liang) 台儀(yi) 表進行通訊（常用計算機有兩(liang) 個(ge) 串口， 如果串口不 夠用的話， 可以買(mai) 串口卡）。
　　Settings：設置並返回波特率、奇偶校驗、數據位、停止位 。參數格式為(wei) ："BBBB,P,D,S"。例如“9600， E， 7， 2”；在RS232中雙方必須完全一樣， 彼此才能順利的通信。否則的話將不 能正確的接收到來自對方的信號。
　　Handshaking：設置並返回硬件握手協議；（設為(wei) 無）
　　InBufferSize：設置並返回接收緩衝(chong) 區的字節數；
　　OutBufferCount：返回在傳(chuan) 輸緩衝(chong) 區中等待的字符數。也可以用它來清除傳(chuan) 輸緩衝(chong) 區；
　　DTREnable：確定在通訊時是否使 Data Terminal Ready (DTR) 線有效（設為(wei) 有效）。
　　RTSEnable：確定在通訊時是否使 Request To Send (RTS) 線有效（設為(wei) 有效）。
　　CommEvent：返回最近的通訊事件或錯誤。當發生錯誤或事件會(hui) 產(chan) 生OnComm事件。
　　InputMode：設置或返回Input 屬性取回的數據的類型。它有兩(liang) 個(ge) 參數， 0 表示以文字形式取回， 1表示以二進製形式取回。（設為(wei) 0）
　　Rthreshold：設置並返回的要接收的字符數。
　　Sthreshold：設置並返回傳(chuan) 輸緩衝(chong) 區中允許的最小字符數
　　InputLen：設置並返回 Input 屬性從(cong) 接收緩衝(chong) 區讀取的字符數。
2． 采集儀(yi) 表當前數據
　　提醒：要和儀(yi) 表通訊，在參數（Comports、Settings）設置上必須相互吻合。
　　先要打開對象
　　MSComm1.PortOpen = True
　　MSComm2.PortOpen = True

　　Private Sub MSComm1_OnComm ()#p#分頁標題#e#
 　　If MSComm1.CommEvent = comEvReceive Then  // 收到Rthreshold # of
      　TxtReceive.Text = MSComm1.Input     //將采集到的信息賦予到文本框
 　　found1 = InStr(TxtReceive.Text, "+")     //以下數行是對所采集到的數據進行處理加工，最終　　得到我們(men) 想要的格式的數據。
　　 …  ……  
　　If found1 > 0 Then
     　　For i = 1 To leng Step 1
            　　Strin1 = Mid(TxtReceive.Text, found1 + 1, 3)
            　　Strin2 = Mid(TxtReceive.Text, found1 + 4, 3)
            　　Format(Val(strin2), "000")
        　　Next i
　　display1.Caption = Format(Val(strin1), "0") + "." + Format(Val(strin2), "00")
 　　End If
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　End If
　　//本項目中,也就是需要兩(liang) 個(ge) 計量儀(yi) 表的的當前數據)
 

3． 開關(guan) 狀態的采集

        //檢測四個(ge) 引腳的工作狀態（就是判斷現場的開關(guan) 狀態和按鈕狀態）
　　在具體(ti) 的應用過程中，要添加一個(ge) TIMER控件用於(yu) 循環的檢測這幾個(ge) 輸入引腳的電位的高低。
 
　　Private Sub Timer1_Timer()
　　 If MSComm1.CDHolding Then msgbox "CD is switch in! " //檢測CD腳的電位
　　… … … …       //消息處理過程
　　 If MSComm1.CTSHolding Then msgbox "CTS is switch in! "//檢測CTS腳的電位
　　… … … …       //消息處理過程

　　  If MSComm1.DSRHolding Then msgbox "DSR is switch in! "//檢測CTS腳的電位
　　… … … …       //消息處理過程

　　  If MSComm1.CommEvent=comEvRing Then msgbox "RI is switch in!"//檢測CTS腳的電位 
　　 … … … …       //消息處理過程

　　End Sub

4． 兩(liang) 個(ge) 開關(guan) 量的輸出      
　　 //就是控製兩(liang) 個(ge) 引腳的電位，
5． 驅動的微型繼電器工作
　　如果操作員在具體(ti) 的配料過程中，出現錯誤（超出了配方所要求物料品種的誤差範圍），軟件會(hui) 將　　DTR或者是RTS引腳上的電位抬高，驅動微型繼電器來控製現場的報警裝置。用報警來提示操作人員，本次配料不符合要求，需要添加或是減少份量。這樣可以實時的糾正不必要了操作失誤。

　　MSComm1.RTSEnable = True //抬高電位 使微型繼電器動作接通報警器
　　MSComm1.DTREnable = True

總結

        在本應用工程已在現場運行快一年時間，實踐證明采用這種用串口來作開關(guan) 量的檢測和輸出方式作有限開關(guan) 量輸入輸出是可行的，也是可靠。因此在類似這種小型應用項目中，采用這種串口來作開關(guan) 量的檢測和輸出做法，即滿足了用戶要求，又為(wei) 用戶提供了更多的選擇，同時控製了工程的成本。#p#分頁標題#e#