有谁做过上海耀华称重系统有限公司的XK3190-A9型仪表的串口通讯软件,我需要帮助?付少许费用也可!!!

发布时间:2024-05-16 10:07 发布:上海旅游网

问题描述:

该电子秤为上海耀华称重系统有限公司的XK3190-A9型仪表,输出为RS-232C标准接口,波特率为600/1200/2400/4800/9600、传输的数据格式(10位:第一位起始位,第10位为停止位,中间8位为数据位(ASCII编码))。通讯方式为:1。连续方式2。指令方式。本人选:
1。连续方式:所传送的数据为仪表显示的当前称重(毛重或净重)。每帧数据由12组数据组成。格式如下:
第X字节 内容及注释
1 02(XON) 开始
2 +或- 符号位
3 称重数据 高位
4 称重数据 ..
5 称重数据 ..
6 称重数据 ..
7 称重数据 ..
8 称重数据 低位
9 小数点位数 从右到左(0—4)
10 异或校验 高四位
11 异或校验 低四位
12 03(XOFF) 结束
异或:2异或3异或....8异或9
本程序是从网上下载的(稍作改动),调试环境为Windows Xp Professional SP2,VB6.0,在VB中与串口通讯需要引入控件MSComm串口通讯控件在Microsoft Comm Control 6.0中)。具体程序如下:控件简称:MSC
Dim Out(12) As Byte '接收var中的值
Dim var As Variant '接收MSC.input中的数值
Dim i As Integer, j As Integer '随即变量,计算循环
Private Sub cmdOk_Click()
With MSC
.InputMode = comInputModeBinary '设置数据接收模式为二进制形式
.InBufferCount = 0 '清除接收缓冲区
If Not .PortOpen Then
.PortOpen = True '打开通信端口
End If
End With
End Sub
Private Sub Form_Load()
With MSC
.CommPort = 2 '设置Com1为通信端口
.Settings = "9600,N,8,1" '设置通信端口参数 9600赫兹、无校验、8个数据位、1个停止位.
.InBufferSize = 40 '设置缓冲区接收数据为40字节
.InputLen = 1 '设置Input一次从接收缓冲读取字节数为1
.RThreshold = 1 '设置接收一个字节就产生OnComm事件
End With
End Sub
Private Sub SwichVar(ByVal nNum As Integer)
Text4.Text = Text4.Text & nNum
var = Null
var = MSC.Input
Out(nNum) = var(0)
End Sub
Private Sub Form_Resize()
Text1.Width = Me.Width
Text4.Width = Me.Width
End Sub
Private Sub MSC_OnComm()
With MSC
Select Case .CommEvent '判断通信事件
Case comEvReceive: '收到Rthreshold个字节产生的接收事件
SwichVar 1
Text1.Text = Text1.Text & Chr(Out(1))
If Out(1) = 2 Then '判断是否为数据的开始标志
.RThreshold = 0 '关闭OnComm事件接收
End If
Do
DoEvents
Loop Until .InBufferCount >= 3 '循环等待接收缓冲区>=3个字节
For i = 2 To UBound(Out)
SwichVar i
Text1.Text = Text1.Text & Chr(Out(i))
Next
Text1.Text = LTrim(Text1.Text)
.RThreshold = 1 '打开MSComm事件接收
Case Else
'.PortOpen = False
End Select
End With
End Sub
运行结果:
当仪表显示:0 时
一直重复显示
+00000001B+00000001B+00000001B+00000001B+00000001B+00000001B+00000001B+00000001B+00000001B+00000001B
或:出现下列错误:
实时错误:'9' 下标越界
由于本人没有接触过硬件通讯编程,加之时间紧,麻烦哪位高手帮助一下!!!!或者副少许费用也可!!!!!
怎样把显示正确的数据,而且显示格式为“-+9999.99”

问题解答:

我可以帮你,本人开发过类似产品
QQ:330171588

想知道通讯协议啊?有点难哦!

用珠海长陆的表,品质好,可为你编写通讯协议软件,如果需要,还有整套的控制方案

热点新闻