研华工业级嵌入式控制平台UNO在钢厂的应用

1、研华工业级嵌入式控制平台（UNO ）在钢厂的应用摘要:黄雪锋研华中国公司本文介绍了采用研华公司工业级的嵌入式计算平台,采用微软最新编程工具VB.NET,采用 UDP 的网络编程方法和ADO.NET的数据编程方法,实现了一个高稳定性的工业级的智能查询终端系统.此系统不仅可以用于钢厂中,在很多其他的工业现场中都很有应用价值 .关键词 :UNO,嵌入式技术 , VB.NET , SQLServer , UDP SERVER随着钢铁厂生产和管理自动化水平的不断提高，目前大部分钢厂都实现了整个钢厂各个生产环节的信息的统一监控和管理。但是目前大部分钢铁厂都是采用传统的PC 计算机或工控机作为钢厂的信息采集

2、和查询终端，传统的计算机由于体积庞大，抗干扰性能和稳定性不高，而钢厂中的生产和现场环境都比较恶劣，如高温，金属粉尘严重，电磁干扰很大等。 PC 机在现场使用经常出现死机现象，随着自动化系统要求的提高，原来的方式已经无法满足钢厂生产现代化的要求。1.1 嵌入式技术在自动化中得到了广泛的应用近年来，嵌入式技术得到了广泛的应用，在自动化领域也一样，嵌入式产品以它独有的实时性、稳定性在工业领域得到了客户的认可。嵌入式系统主要由嵌入式处理器、 相关支撑硬件和嵌入式软件系统组成， 它是集软硬件于一体的可独立工作的 “器件 ”。嵌入式硬件包括处理器，显示卡，存储介质、通讯设备、IC 卡或信用卡读取设备等。嵌

3、入式软件包括与硬件相关的底层软件、操作系统、图形界面、通讯协议、数据库系统、标准化浏览器和应用软件等。便利灵活、性价比高、嵌入式强；软件不可修改性、系统所需配置要求较低、系统专业性和实时性较强！河南舞阳钢铁厂作为国内最大的特种钢的生产厂家，首先采用了工也控制领域的领导厂商研华公司的UNO2000 产品来实现一个高性能的稳定的嵌入式信息查询终端。UNO-2000是开放的、嵌入式计算平台，不仅继承了传统PC 开放、灵活的特点，而且使用嵌入式技术增强其可靠性。UNO-2000作为无风扇、 无硬盘的操作平台，使用了嵌入式操作系统（ Microsoft WinCE & Linux）。克服了传统工

4、控机死机的三大“癌症”：CPU 风扇机械不稳定特点， 磁介质存储的抗震性不高，交流电源的发热量高的特点。真正实现了工业现场的“ 3C”（现场控制，现场计算，现场通讯）的要求。UNO-2000是紧凑式计算平台。非常容易嵌入有限空间的装置或设备，寸为“ 188 x 106 x 35 ” (mm) ，工业 PC 的尺寸为“ 482 x 177 x 452 ”(mm) 。UNO-2000尺UNO-2000是高度集成综合、通过良好测试、稳定可靠的操作平台。而工业PC 需要用户针对应用系统集成CPU 底板、 CPU 卡、 CPU、内存、通讯卡以及I/O 卡等。 UNO2000 系列产品本身就为用户集成了非

5、常丰富的通信口和I/O 口，例如 UNO2050 这款产品就有两个以太网通信口，2 个 USB 口， 4 个串行通信口，8 个 DI/O ，一个计数器通道。有的UNO 产品甚至还具有PC-104 口和 PCMIA 口。真正实现了一个开放式的嵌入式计算平台。在舞钢中，UNO主要作为一个现场的信息采集和查询终端来使用，其应用的架构图如下：SQL SERVER数据服务器钢厂 LANFPM#1DI/O操作面#MODBUS/TCPRS-485VB.NET编程1.2研华 UNO2050在钢厂自动化系统中要实现的主要功能和即使特点UNO2050 要实现的主要自动化功能如下:1、通过以太网口，采用MODBUS

6、/TCP 的通信协议，与研华公司的基于以太网的数据采集模块通信，实现对钢厂中的泵站的各种过程数据的采集和处理。2、通过串口，与钢厂现场的PLC 连接，实现对钢厂各个生产过程的监控（炼钢，轧钢等）3、把采集过来的现场数据通过钢厂中的以太网送到钢厂中的SQL SERVER 数据库中去，进行集中存储管理。4、UNO2050 本机根据当地的查询权限，不仅可以把本地采集的数据进行本地显示监控，还可以查询 SQL SERVER 数据库，监控远端的生产现场。5、需要在 UNO 上做一个简易的键盘，提供给钢厂中的工人操作，以代替普通的键盘。因为普通键盘按键太多，太复杂， 加上也不利于现场安装。加上键盘功能比较

7、复杂，工人计算机知识有限，容易造成误操作。所以现场非常需要提供一个坚毅的工业化键盘，只需要几个简单的查询按扭就可以完成查询功能。针对钢厂的实际功能需求， 选用研华公司 UNO-2050产品来实现这个智能的工业化的信息交互查询终端系统。UNO-2050 的主要技术特点如下：1、目前 UNO-2050具有两个以太网通信口， 可以分别来满足采集现场 MODBUS/TCP数据模块和通过钢厂中的骨干网把信息递交给数据服务器的功能。两个以太网口可以处于不同的网段，可以实现一个智能的隔离通信网关的功能。2、UNO2050 内建的嵌入式操作系统为WINCE.NET,可以支持 VISUAL.NET 的编程 ,也

8、就是客和可以使用目前微软最新的变成工具VB.NET 和 C#来编程 ,实现自己的功能 .3、UNO2050 内建的嵌入式操作系统WINCE.NET里面构建了 SQL 组件 , 用户可以采用 SQLCLIENT的方法 ,进行嵌入式数据库查询方法,来与远端的数据库进行查询 .4、UNO-2050 内置了 4 个串行通信口 ,可以很方便的实现与现场的数据采集设备连接,实现数据的采集和控制 .5、UNO-2050 本身自带了 4DI 和 4DO , 可以为本身的系统上的饿报警信号以及快速的输入输出要求提供了直接的接口.1.3 此项目实施的主要技术关键点这个项目在工程的实际实施过程中,主要有以下技术难点

9、:1、客户需要采用VB.NET编程工具来编程,在编程过程中 , 需要实现一个UDPSERVER 功能 ,这个功能与一般的SOCK 组件编程不同 ,它需要实现有远端的多个数据提供方根据接收方的IP 地址和绑定通道 ,同时发送给接收方.而接收放需要能同时接收和处理这些数据 .这时就需要 SOCK 组建采用 UDP 的协议 ,而且要处于一直的监测接收状态 .从技术上讲 ,这里做接收多个站的数据处理方面,应该使用多线程的技术来处理.但是考虑到 UNO 上的资源以及要实现功能比较多的实际情况,还是采用了轮询监控的方法 ,由于 UDP 协议的 ”无连接 ”特点 ,基本上可以实现接收和处理多个站的数据通信的

10、要求。实现此功能的源代码如下：Imports System.Net' 引用 SOCK 组建Imports System.TextPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.ClickDim l_poit As IPEndPointDim ip As IPAddressl_poit = New IPEndPoint(ip, 200)udpserver= New Socket(AddressFamily.InterNetwork, S

11、ocketType.Dgram, ProtocolType.Udp)udpserver.Bind(l_poit)绑定 IP 地址和通道启动定时监孔End SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Timer1.Tick接收数据的处理Dim rec(4096) As ByteDim recnum As IntegerDim diobyte As ByteIf udpserver.Available > 0 Thenrecnum = udpserv

12、er.Receive(rec)If recnum > 0 Thendev.DIOPort().GetDiPortValue(diobyte)'获得 DI 值If diobyte = 0 ThenElseIf diobyte = 1 ThenEnd IfEnd IfEnd IfEnd SubPrivateSubButton2_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs) Handles Button2.Click关闭连接udpserver.Close()End Sub2、客户使用VB.net 编程方法，与SQL

13、 SERVER数据库进行数据交互。需要采用使用微软的精简NET FRAME组建，采用 SMARD DEVICE的 SQL SERVER CLIENT的技术，并采用 ADO.NET的编程方法来实现数据库的编程方法实现的，实现代码如下：Imports System.DataPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click'Dim cecon As New SqlCeConnectionDim sqlstrAsString =&q

14、uot;IntegratedSecurity=SSPI;database=Northwind;server=XUEFENG;UserID=BUILTINadministrator; Password=hxfbit;"建立数据库的连接Dim myconn As New SqlConnection(sqlstr)Dim mycmd As New SqlCommand("SELECT * from Customers ", myconn)mycmd.CommandType = CommandType.Text(SQL 语句查询命令)myconn.Open()Dim i

15、As IntegerDim eof As Booleaneof = TrueDim myreader As SqlDataReader = mycmd.ExecuteReader()建立数据缓冲区Do Until Not eofWhile myreader.Read()显示查询数据End Whileeof = myreader.NextResult()Loopmyreader.Close()myreader.Close()End Sub3、客户需要一个工业化的建议键盘来代替通用键盘的操作，UNO-2050 本机上的DI/O 口正好可以来满足此功能，通过4DI 和 4DO 的交叉矩阵，通过软件处

16、理，正好可以来实现一个最多有16 个按键的仿真键盘。而研华公司也正好提供了在VB.NET下 DIO 编程的驱动 ,客户可以非常方便的来实现这个键盘功能. 驱动的主要函数用法如下:Imports Advantech.UNO导入驱动Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button3.ClickDim num As Int32num = 0''UNO 2000的设备号就是为0'''初始化UNO 2000dev.O

17、pen() '打开UNO 2000End SubPrivateSubButton4_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs) Handles Button4.Clickdev.Close()'关闭设备End SubPrivateSubButton5_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs) Handles Button5.Clickdev.DIOPort().SetDoPortValue(255, 15)'DO输出第一个

18、参数为屏蔽码(0为屏蔽)，第二个参数为输出量，自动输出到输出端口End Sub4 、使用UNO2050与 串口的数据采集模块和串口仪表连接，但是由于客户需要采用VB.NET 编程， VB.net编程工具没有直接的类似VB6 的 MSCOMM 的控件来进行编程，如果直接用 NET 下面的 MSCORLIB.dll来编程， 会给客户带来很大的困难。但是研华为UNO提供了一个VB.NET 下的串口变成驱动,很好的解决了此问题,用户可以非常方便的采用此驱动,就像使用MSCOMM控件一样简单 ,实现代码如下:Imports SystemImports Advantech.CommonPrivate Su

19、b btnOpen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOpen.ClickDim port As Integerport = comArray(cbxCOM.SelectedIndex()建立串口对象com.SetComPortState(9600, 8, 0, 1)If com.OpenComPort() = True Then' set COM port stateIf SetComState() = False Then设置串口参数打开串口MsgBox("Set COM port state failed!", MsgBoxStyle.OKOnly, "Error")ReturnEnd IfIf SetComTimeout() = False ThenMsgBox("Set COM port timeout failed!", MsgBoxStyle.OKOnly, "Error")ReturnEnd IfbtnClose.Enabled = Tr