男女午夜激情_www.天堂av.com_亚洲综合小说区_亚洲欧美自拍视频_成年精品_久久www免费人成—看片_激情综合五月天_久久高潮视频_最新国产成人ab网站_国产精品卡一

    AI儀表是通過計算機串口與計算機連接的，其具有自己的串行通訊協議，軟件開發者可以根據此通訊協議實現對儀表的數據讀取與設定，以及對儀表狀態的讀取與設定。網上對于AI儀表通訊程序的例程多為VB編制，并且程序較為簡單，功能較為單一，不利于二次開發者對儀表進行全面開發。在此筆者自己針對708P型溫度控制器編制了一個AI儀表的上位機監控軟件以實現計算機對AI儀表監控。本文根據自己的開發經歷，詳細介紹了基于delphi開發AI儀表上位機通用程序的開發全過程，以及在開發過程中所應注意的一些事項。

1.1程序功能介紹

    本軟件為AI儀表通用監控軟件，其包括以下功能：

    1） AI儀表檢測與識別

    2） AI儀表參數的讀取與設定

    3） AI儀表的狀態讀取與設定

在下面將對以上功能的實現作相應介紹。

1.2功能實現

    在開發過程中，為了縮短開發周期，軟件中使用了第三方控件SPCOMM實現串行通訊功能，當然如果讀者感興趣可以自己嘗試使用bbbbbbS API函數自行編制此功能，對于bbbbbbS API函數以及控件SPCOMM的使用方法，在本文中不作介紹，讀者可以參看相關資料。在介紹程序功能前必須先說明兩個過程：

A. 讀儀表參數過程TAI.ReadData（var msg: TMessage）程序代碼如下：

var
NO1,NO2,NO3,NO4,NO5,NO6,NO7,NO8:Cardinal;
｛NO1,NO2,NO3,NO4,NO5,NO6,NO7,NO8分別對應要發送的8個數據｝
s : bbbbbb;
p : PChar;
begin
NO1 := 128 + msg.Wbbbbb;//對于讀數據過程Wbbbbb保存要讀儀表的地址
NO2 := NO1;
NO3 := 82;
NO4 := msg.Lbbbbb; //對于讀數據過程Lbbbbb保存要讀的參數的參數地址
NO5 := 0;
NO6 := 0;
NO7 := 82 + msg.Wbbbbb;
NO8 := msg.Lbbbbb; 
s := chr（NO1）+chr（NO2）+chr（NO3）+chr（NO4）+chr（NO5）+chr（NO6）+chr（NO7）+chr（NO8）;
p := PChar（s）;
Comm1.WriteCommData（p,Length（s））;
end;

B. 寫儀表參數過程TAI.SetData（var msg: TMessage） 程序代碼如下：

var
NO1,NO2,NO3,NO4,NO5,NO6,NO7,NO8:Integer;
｛NO1,NO2,NO3,NO4,NO5,NO6,NO7,NO8分別對應要發送的1～8位｝
s :  bbbbbb;
p :  PChar;
begin
NO1 := 128 + Meter_Addr;// Meter_Addr為全局變量，保存儀表地址
NO2 := NO1;
NO3 := 67;
NO4 := msg.Wbbbbb;//對于寫過程Wbbbbb保存要寫參數的參數地址
｛按協議要求，計算出NO5、NO6、NO7以及NO8的值｝
NO5 := （msg.Lbbbbb mod 256）;// 對于寫過程Lbbbbb保存要寫參數值
NO6 := （msg.Lbbbbb div 256）;
NO7 := （（67 + Meter_Addr + msg.Lbbbbb + msg.Wbbbbb ＊256） mod 256）;
NO8 := （（67 + Meter_Addr + msg.Lbbbbb + msg.Wbbbbb ＊256） div 256）;
s := chr（NO1）+chr（NO2）+chr（NO3）+chr（NO4）+chr（NO5）+chr（NO6）+chr（NO7）+chr（NO8）;
p := PChar（s）;
Comm1.WriteCommData（p,Length（s））;
end;

在程序中定義兩個消息常量：

WM_Set = WM_USER + 100
WM_Read = WM_USER + 200

    通過發送以上兩個消息并附帶相應的參數，實現對以上兩個過程的調用，從而實現對消息對儀表數據的讀取與設定。以上兩個過程按照AI儀表通訊協議，計算出每一位發送的數據，然后組合成字符串，一次性發送給儀表。每個參數代表的意義見程序解釋。

1.2.1 AI儀表檢測

    在實際應用中，計算機往往不止連接一個儀表，所以需要對不同地址儀表進行檢索和識別：

    對于儀表檢索是通過對地址的辨識實現的，利用AI通訊協議的讀動作讀取不同地址的儀表的地址參數，如果此時會返回值，并且其讀回的數據與發送所設定的地址變量值相等，則確定檢索到此地址的儀表，并添加到儀表隊列中。

    對于儀表的識別即對已存在的儀表的識別的，即儀表必須有其明確且獨立的地址。識別儀表關鍵在識別儀表的段數（單段或多段），對于不同段數的儀表，其某些參數地址所對應的參數意義有所不同。在軟件中是通過讀取一個固定參數地址的數據實現的，比如說：對于多段儀表來說，讀取某一段的數據時（其參數地址通常都會大于25），儀表會返回相應參數地址的返回值，然而對于單段儀表，向該地址發送數據儀表并不會作任何反應。

1.2.2 AI儀表參數讀取

    軟件能夠讀取儀表內所有可讀取的數據，包括采集的數據、控制數據以及對儀表的設定。自動識別小數點位數，按儀表表盤顯示格式顯示讀取的數據。對于儀表的讀取過程實現可以參看以上的ReadData過程以及宇電的儀表通訊協議。需要指出的是在讀取過程中需要注意對某些特殊數據的處理，其中包括小數點的處理以及負數的處理。

A. 小數點的處理

    在儀表數據的讀取過程中，當你獲得了儀表的返回數據后，必須按照AI通訊協議對返回的數據進行分析和計算。其中存在一個問題，通過計算后有的數據可能是實際數據的10倍，而有的數據可能與實際數據相同。根據筆者的觀察，在儀表說明書中允許帶小數點的數據都需要進行10倍處理，即將返回數據計算得到的結果然后作除10計算才能得到正確的數據。

B. 負數的處理

    在儀表數據的讀取過程中，往往會碰到負數的問題，此時按照AI通訊協議計算得到的數據往往會很大并且數值與實際數值不符。對于這種小于零的數據需要進行負數處理。但是如何識別一個負數呢？其實對于負數而言，當其被讀取時其高位往往大于127，于是我們可以通過判斷高位來識別負數。當識別到負數后，我們要顯示正確的數據就存在一個轉換，從二進制的角度分析可知儀表返回的數據的高位的最高位為標志位，當其為0時代表正數，當其為1時代表負數。根據以上分析，如果我們需要得到負數的數值，只需將計算出來的數據減去65536即可。

    以下是接收過程中的一些處理程序：

    接收過程：

var
p : PChar;
begin
p := Buffer;

buffer為SPCOMM的接收過程中所接收到的數據。
    負數處理過程： 

if （p7>127 then
ReData:=（（p6+p7＊256）-65536）/10
else
ReData := （p6+p7＊256）/10;

p6、p7是接收到數據的第7位和第8位的轉化為整數后的值，可以通過p6:=ord（p[6]）（p為接收過程中的p）獲得。根據以上過程得到的數據ReData再經過小數點分析及即可得到與儀表一致的數據。

1.2.3 狀態的讀取

    儀表的狀態包括運行狀態及報警狀態，可以通過讀取儀表的第21號參數同時獲取。

    讀取21號參數時，儀表返回的參數值是系統儀表的運行狀態值，由于各個位代表的儀表運行狀態不同，所以需要對其進行分析。返回數據的第3位代表停止位，第2位代表暫停位，其余的0位和1位代表運行位。只要2和3位不為1即代表儀表處于運行狀態。所以當我們檢測儀表的運行狀態時，我們只需要對這些位進行識別即可。

    讀取21號參數時，儀表同時會返回報警狀態，通過對報警狀態位的識別，可以獲取儀表的報警狀態。MV值的0、1、2、3位分別代表儀表的上限報警、下限報警、正偏差報警、負偏差報警狀態，其為1有效。

1.2.4 參數設定

    對于參數的設定可以參考儀表通訊協議以及過程SetData，其需要注意的是其數據的計算、小數點處理以及負數的處理。其處理方式與數據的讀取基本相同，在此不再詳細講敘。

2．結語  

    通過以上方法可以實現儀表與計算機的數據交換，并且具有程序簡單、模塊化、運行可靠、功能全面等特點。該程序源代碼已被本公司廣泛應用于AI儀表的工業應用軟件中。