武汉波仕电子有限公司

智能制造网免费16

收藏

串口波特率转换的纯软件实现--向丽

时间:2012-02-24      阅读:1015

 

串口波特率转换的纯软件实现
                    武汉波仕电子有限公司 ________
 
串口通信,就是RS-232/RS-485通信,要求通信的双方波特率等通信格式一样才可以通信成功。可是在许多情况下,两种不同格式比如不同波特率的串口也要相互通信,这就必须进行串口波特率等格式的转换。本文介绍了如何用纯软件实现串口波特率的转换。
如果串口设备1与串口设备2之间需要通信,但是它们之间的通信波特率不一样。纯软件实现串口波特率的转换的原理就是利用计算机的两个串口,称为串口A和串口B,分别设置为不同的波特率、不同的校验位、不同的数据位和不同的停止位。其中串口A按照串口A设置的波特率等格式接收数据立即从串口B按照串口B设置的波特率等格式发送出去,同样串口B以串口B设置波特率等格式收到的数据立即从串口A以串口A设置的波特率等格式发送出去。
 
 
将计算机的串口A接设备1,串口A的通信波特率设置为设备1的波特率、校验位、数据位和停止位。将计算机的串口B接设备2,串口B的通信波特率设置为设备2的波特率、校验位、数据位和停止位。计算机必须至少有两个RS-232串口,扩展串口可以采用USB-串口转换器等。这样就实现了串口设备1与串口设备2之间的通信。
 
 
  
  
串口波特率转换软件的界面如图。左边分别是两个串口的设置框,分别可以设置COM口的号码、波特率、校验位、数据位、停止位,默认的格式为(9600,N,8,1)。可以选择的COM口号码为116号。COM串口号可以从操作系统的“设备管理器”只能够的“端口”看到。波特率的可选择范围为:25600012800011520057600384002880019200144009600 480024001200600。校验位可选择:n(无)、o(偶)、e(奇)。数据位可选择:87654。停止位可选择10
设置好串口格式后,按“打开串口”。注意AB两个串口都要打开。成功打开串口后会在“打开串口”按钮的旁边显示红色的圆圈。“打开串口”按钮下面为“清空计数”按钮和本串口接收和发送数据的个数。正常情况下,由于串口A接收到的数据都立即发送给了串口B,所以串口A接收的计数与串口B发送的计数时一样的。同理串口B接收的计数与串口A发送的计数时一样的。
串口波特率转换软件的界面右边为测试和检测部分,正常工作时不需要操作。按“手动发送A串口”可以测试串口A的设置是否生效,是否可以正确与设备1通信,接收到的数据显示在“接收区A”框内。串口B的部分是同样的功能。右下角有“字符格式”和“十六进制”的选项,默认为“字符格式”。当选择“十六进制”时,本软件可以实现16进制数据的格式转换,特别适合MODBUS等工控软件。
如果在软件界面上只打开一个串口,比如串口A或者串口B,那么本软件就是一个功能齐全的串口调试助手软件,可以进行每个串口的设置、数据收发等。
本软件用Visual Basic软件编写,串口用MSCOMM控件实现。核心功能就是将Mscomm1接收的数据立即送到Mscomm2的发送区。难点在于对16进制数据的转换处理。
Mscomm的核心代码如下:
Private Sub MSComm1_OnComm()
    Dim BytReceived() As Byte
    Dim strBuff As String
    Dim i As Integer
    Select Case mEvent    '事件发生
            Case 2
           MSComm1.InputLen = 0     '读入缓冲区全部内容
            strBuff = MSComm1.Input '读入到缓冲区
            If MSComm1.InputMode = comInputModeBinary Then
            BytReceived() = strBuff '如果是二进制接收模式则进行数据处理,否则直接显示字符串
            For i = 0 To UBound(BytReceived)
             If Len(Hex(BytReceived(i))) = 1 Then
       strData = strData & "0" & Hex(BytReceived(i)) & " "
'如果只有一个字符,则前补0,如F显示0F,zui后补空格
                Else                      '方便显示观察如: 00 0F FE
                    strData = strData & Hex(BytReceived(i)) & " "
                End If
            Next
             Text1 = strData
              Call hexSend2          ' '发送一个16进制
              strData = ""
 
        Else
            Text1 = Text1 & strBuff
           If MSComm2.PortOpen = False Then
           MsgBox "请打开串口B"
            End If
            On Error GoTo uerror3
            MSComm2.Output = strBuff
            Label14.Caption = Label14.Caption + Len(strBuff) '发送计数
           End If
       End Select
uerror3:  
 End Sub
本文介绍的串口波特率转换的纯软件方法和程序,对不同格式之间的串口通信具有一定的使用价值。本软件不仅仅实现了波特率的转换,还同时实现了校验位、数据位和停止位的转换。文中介绍的软件可以从波仕电子的下载。纯软件波特率转换的不足之处在于占用了一台计算机,并且必须配有两个专门用于波特率转换的串口。如果要实现方便简单的波特率转换,还是要用具有双串口的单片机或者FPGA。通过对单片机或者FPGA的两个串口进行波特率等格式的设置,而两个串口在内部进行数据透明传输。这种产品就是硬件波特率转换器,我们将以另外文章《串口波特率转换的纯硬件实现》予以介绍。
  


 

上一篇: RS232隔离和浪涌防雷--应用于浙江某* 下一篇: 波仕*---互联网串口转换器 ETH232I
提示

请选择您要拨打的电话: