玉林西門子工控系統授權代理商

玉林西門子工控系統授權代理商

全新原裝，，保修一年，提供技術服務，價格合理

本公司長期供應：德國西門子PLC可編程控制器。觸摸屏，直流調速器 軟啟動器。數控系統。NCU數控主板。DP接頭，DP電纜，伺服電機，CP5611網卡，誠信經營 價格實惠，質保一年人為損壞除外，選擇上海隆彥是我們追求的目標 合作雙贏，24小時恭候您的來電，

本店可開百分之十七個點的增值稅發票，產品保證全新原裝，質保一年

2.3 通訊協議

本通信協議應用于D08－8CZM型流量積算儀與上位機的通信，數據以16進制格式傳輸，波特率：9600；數據位8位；停止位：1位；效驗位：無。本協議與MODBUS協議兼容，可以通過上位機顯示流量積算儀的瞬時流量、累積流量、滿量程、單位和閥狀態（包括閥控、關閉和清洗），而且可以通過上位機設定流量積算儀的瞬時流量、使流量積算儀的累積流量清零。因此在本協議用到了MODBUS協議的命令$03（Reading 1~9words）、命令$05(Force single coil)和命令$06(Writing 1 word)。

使用命令$03可以通過上位機讀流量積算儀的當前狀態，其通信協議的具體格式為：

上位機 積算儀：01 03 00 02 00 08 E5 CC

各字節含義：

01： MODBUS地址；
03： 功能碼03（Reading 1~9words）；
00 02：起始地址，00為高8位，02為低8位；
00 08：讀取的字數；
E5 CC：CRC效驗值，E5為CRC的低8位，CC為高8位。

上位機 積算儀：01 03 10 （1）～（16） CRCL CRCH

各字節含義：

01：MODBUS地址；
03：MODBUS命令號；
10：上傳的字節數；

（1）～（4）：瞬時流量值；“00～09"表示數字“0～9"，“10～19"表示“0.～9."；
（5）～（10）：流量累積值；同上；
（11）～（14）：滿量程；同上；
（15）：流量單位；00表示SCCM和SCC，01表示SCCM和SL，11表示SLM和SL；
（16）：閥狀態；00表示關閉，80表示閥控，FF表示清洗；
CRCL：CRC的低八位；CRCH：CRC的高8位。

3、用VB實現串行通訊玉林西門子工控系統授權代理商

3.1 MSComm控件

VB的通信控件MSComm能夠提供串行通信的全部功能，程序編寫、調試簡單方便，開發速度快，該控件封裝了通信過程中的底層操作程序，用戶只需設置和監控控件的屬性和事件，就可以方便地實現異步串行通信。

采用MSComm控件接收數據，按照接收方式分兩種形式：事件驅動方式，定時查詢方式。本例為適應流量的實時控制采用定時驅動方式，若定時器計時到，通過串行通信口向地址流量積算儀發出讀寫等操作命令，等待時間到則檢查InBufferCount屬性值來判斷輸入緩沖區中是否接受到了相應數目的字符，從而進行讀取、判斷數據合法性和數據存儲、處理等操作。

3.2 通信功能的編程實現

串口初始化：MSComm1.CommPort = 1
MSComm1.SThreshold = 1
MSComm1.Settings = 9600,N,8,1
MSComm1.InBufferSize = 1024
MSComm1.OutBufferSize = 1024
MSComm1.bbbbbMode = combbbbbModeBinary

打開串口并定時發送數據命令：Private Sub Timer1_Timer()
Dim bytearray(0 To 7) As Byte
bytearray(0) = &H1
bytearray(1) = &H3
bytearray(2) = &H0
bytearray(3) = &H2
bytearray(4) = &H0
bytearray(5) = &H8
bytearray(6) = &HE5
bytearray(7) = &HCC
MSComm1.bbbbbLen = 21
MSComm1.InBufferCount = 0
MSComm1.OutBufferCount = 0
MSComm1.RThreshold = 1
MSComm1.PortOpen = True
If MSComm1.PortOpen = True Then
MSComm1.Output = bytearray
End If
End Sub
接受數據：Private Sub MSComm1_OnComm()
Do
DoEvents
Loop Until MSComm1.InBufferCount = 21
Dim dataread() As Byte
Dim tempdata As Variant
Dim str As bbbbbb
If MSComm1.CommEvent = comEvReceive Then

玉林西門子工控系統授權代理商