将以下十六进制代码0x01 0x03 0x00 0x00 0x00 0x01 0x0a 0x84发送到串行设备(电压传感器)时遇到一些麻烦,它将使用Python和pyserial返回当前电压的int。我的代码如下:
import serial
import time
ser = serial.Serial(
port=1,
baudrate=38400,
parity=serial.PARITY_NONE,
stopbits=serial.STOPBITS_TWO,
bytesize=serial.EIGHTBITS,
timeout=0,
xonxoff=0,
rtscts=0)
ByteStringToSend = "\x01\x03\x00\x00\x00\x01\x0a\x84"
ser.write(ByteStringToSend)
time.sleep(1)
RecievedData = ""
while ser.inWaiting() > 0:
RecievedData = ser.read(1)
return RecievedData
问题是看起来Python正在将每个字节作为单个数据包发送,请参见下面的串行监视器图像
见http://www.centralinfo.com.au/images/SerialOutput.png
上的图片前8个字节(00 - 07)来自python应用程序(注意不同数据包的altinate颜色)接下来的8个字节(08 - 0f)是一个VB.net应用程序发送相同的数据。< / p>
我的问题是如何根据vb.net应用程序发送上面的8个十六进制字节,以便它在一个数据包(Modbus协议)中?
用于比较的VB代码:
' open the serial port if it is closed
If Me.SerialPort1.IsOpen = False Then
Me.SerialPort1.PortName = ComPort
Me.SerialPort1.BaudRate = "38400" 'Set Baud rate
Me.SerialPort1.RtsEnable = False ' Set RTS
Me.SerialPort1.DtrEnable = False ' Set DTR
Me.SerialPort1.Parity = IO.Ports.Parity.None
Me.SerialPort1.StopBits = IO.Ports.StopBits.Two
Me.SerialPort1.DataBits = 8 ' Set data length
Me.SerialPort1.Handshake = Handshake.XOnXOff
Me.SerialPort1.ReadTimeout = 10000
Me.SerialPort1.WriteTimeout = 10000
Me.SerialPort1.Open()
End If
Try
Dim CommandBlock(7) As Byte
CommandBlock(0) = &H1
CommandBlock(1) = &H3
CommandBlock(2) = &H0
CommandBlock(3) = &H0
CommandBlock(4) = &H0
CommandBlock(5) = &H1
CommandBlock(6) = &HA
CommandBlock(7) = &H84
Me.SerialPort1.Write(CommandBlock, 0, CommandBlock.Length)
Thread.Sleep(100)
Return True
Catch ex As Exception
Return False
End Try
提前感谢您的时间 克里斯
答案 0 :(得分:1)
你的VB应用程序启用XON / XOFF协议,而你的python应用程序没有。如果没有打开XON / XOFF,我怀疑你的python应用程序在发送之前在每个字节之间等待一段时间,因此接收设备将每个字节看作一个单独的“数据包”。