模拟板信号驱动原理

　　模拟板的现实信号驱动由一台微机通过RS232 串 口控制。驱动程序在后台运行,数据来源于同一台计算 机上运行的InTouch 人机界面程序。运行有InTouch 程 序的计算机工作从工业控制网络的控制层网络MB+ 上获得数据。MB+ 的下层是现场设备层(Devicenet ) 。 InTouch 可以通过控制网采集现场实时数据。模拟板驱 动程序调用电子表格(Excel)中的数据作为显示内容,而 电子表格以InTouch 客户程序的方式从InTouch 获得实 时数据.

　　一、 设置InTouchDDEserver工作模式

　　DDE 是过程之间的通讯机制,是在粘贴板技术上发 展出来的一种数据交换技术。它使用windows 消息和 共享的内存, 使相互合作的应用程序能够交换数据。 DDE 中有着一种潜在的协议,发送者应用程序和接受者 应用程序在交换数据时都必须遵守这种协议。数据的 提供者就是DDE 服务器,而数据的接受者就是DDE 的 客户机。InTouch 本身是用于建立人机接口的一个软 件包,它包括三个主要程序,它们是InTouch 应用程序 管理器、WindowMaker 和WindowViewer 此外, InTouch 还包括诊断程序WonderwareLogger 。InTouch 应用程序管理器用于组织您所创建的应用程序,也可以 用于将WindowViewer 配置成一个NT 服务程序,为基 于客户机和基于服务器的结构体系配置网络应用程序 开发(NAD)以及配置动态分辨率转换(DRC)和(或)分布式 报警。DBDump 和DBLoad 数据库实用程序也是从应 用程序管理器启动的。WindowMaker 一个开发环境, 在这个开发环境中可以使用面向对象的图形来创建富 于动画感的触控式显示窗口。这些显示窗口可以连接 到工业I/O 系统和其它Microsoft Windows 应用程序。 WindowViewer 是用于显示在WindowMaker 中创建的 图形窗口的运行时环境。WindowViewer 执行InTouch QuickScript 执行历史数据的记录和报告、处理报警记 录和报告,并且可以充当DDE 和SuiteLink 通讯协议的 客户机和服务器。InTouch 的功能是建立动画显示窗 口。通过它的工具箱还可方便建立实时趋势图、历史趋 势图。在建造一个具有DDE SERVER 功能的InTouch 工程时, 首先要建立一个标签库, 将被控对象的动画属 性与标签库标签对应起来就能够动态表示监控对象。 InTouch 通过数据采集接口从PLC 获得实时数据,并将 数据赋予标签变量。InTouch 支持它的应用程序既能够 以DDE 服务器的方式运行,也能够以DDE 客户端的方 式运行。当在DDE 服务器模式下运行时,其客户端应用 程序可以获得标签变量的数据。如果InTouch 在DDE 客户方式下工作,则工程中的标签变量可以从一个DDE 服务器中获取数据.

　　二、 DDE客户端程序

　　DDE 服务器应用程序使用一个由服务名、话题名 和项目名构成的三级分级体制,以便DDE 客户端唯一地 识别服务器应用程序在会话中可以进行交换的数据单 位。服务名是当客户应用程序想要与服务器应用程序 建立会话时,服务器应用程序需要响应的字符串。客户 名应用程序必须指明这个服务名才能与服务器应用程 序建立会话。话题名是用以识别逻辑数据关联的字符 串。对于基于文件的文本操作服务器应用程序来说,话 题名一般就是文件名。对于其他服务器应用程序来说, 话题名是应用程序指定的其他字符串。客户应用程序 要与服务器应用程序建立会话,必须在指明服务器应用 的服务名时,指明话题名。项目名是用于标识服务器应 用程序一次交互可以传给客户应用程序的数据单位。 Office2000 的Excel 应用程序支持DDE 方式的数据交换, 其作为DDE 客户端的通用调用方法是:

　　(1) 选定要链接的单元格。

　　(2) 用下列语法输入公式:应用程序名、文档名或 主题,然后是单元格区域、值、字段或引用的数据。

　　三、模拟板通讯程序

　　模拟板的驱动程序分为两部分,一部分用以实现从 Excel 应用程序中获得显示数据,另一部分用以实现串 口通讯控制,驱动程序使用VB 开发。开发步骤如下:

　　(1) 由于 Excel 应用程序符合OLE 全服务器的软件规范,在VB 模拟板驱动程序中调用Excel 对象时,Excel 是服务器,VB 模拟板驱动应用程序是容器, 也是客户。 在VB 模拟板驱动应用程序中很容易获得Excel 对象的 属性,通过对Excel 属性数据进行操作,模拟板驱动程序 会将它们放入到串口的发送缓冲区。为此,要在VB“工 程”菜单的“引用”项目中添加可以引用的对象,并在 该项目对话框中选定“Microsoft excel 8.0 Object Library”。

　　由于Excel对象是多层次的对象集合, 程序中只 是引用并操作了Sheet对象。VB引用Excel对象的 语句如下:

　　Option Explicit

　　Private Sub Command1 - Click()

　　Dim xObject As Object

　　′调用Excel

　　Set xObj e ct = CreateObject (“Excel .Sheet " )

　　Set xObject = xObject.Application.ActiveWorkbook.

　　ActiveSheet

　　xObject.Range(“A1").Value = Text1.Text ′将 数值送入Excel 的A1 单元格

　　xObject.Range(“A3").Formula = “=MAX(A1. A2)" ′将最大值送入 A3 单元格

　　Set xObject = Nothing

　　End Sub

　　(2) VB 本身不提供对计算机底层端口的编程,在模 拟屏驱动程序中可采用ActiveX 控件实现对串口的控 制。Microsoft 提供了Mscomm 控件支持对串口的编程。