工业控制中对等网的运用0法兰阀

工业控制中对等网的运用

工业控制中对等网的运用 2011年12月09日 来源： 工业控制中对等网的运用

一、概述

在分布式控制系统中，控制计算机担任了对过程或运动的直接控制，而监控计算机或工程师站则负责对整个工艺过程的工艺参数进行监视、调整或存储打印。在监控点数目较多或距控制机较远时，我们采用建立工业以太网的方式，完成计算机之间的数据传递。监控机作为服务端，监听控制机发出的信息，并做出回应。这样，就需要在计算机之间制定一套应用层的协议，以完成数据交换。在在分布式控制系统中，控制计算机担任了对过程或运动的直接控制，而监控计算机或工程师站则负责对整个工艺过程的工艺参数进行监视、调整或存储打印。在监控点数目较多或距控制机较远时，我们采用建立工业以太网的方式，完成计算机之间的数据传递。监控机作为服务端，监听控制机发出的信息，并做出回应。这样，就需要在计算机之间制定一套应用层的协议，以完成数据交换。在Delphi中，可采用相应的Socket 控件完成这项工作。　二、软硬件环境

1. 网卡：10M ISA BNC与RJ45双口，NOVELL NE2000兼容，符合Windows95 PnP准。

2. 网线：RG58AU同轴电缆。其具有价格便宜，网络扩充及维护简单的特点。

3. 网络操作系统：Windows95或WINDOWS NT。　三、网络硬件的安装

1. 网卡的安装：首先像安装其他任何硬件卡一样，将网卡插入首先像安装其他任何硬件卡一样，将网卡插入PC机的一个ISA插槽中，固定好即可。

2. 网线的安装：在网线上安装BNC接头，再接上T型头后，插入网卡，最后联上终端电阻。

四、软件的安装与调试

首先在计算机中安装Windows95，对于PnP网卡，开机时系统会提示发现新设备，要求加载设备驱动程序，这时可直接使用Windows95提供的设备驱动程序，并设置网卡的中断和输入输出地址。网卡的设置完成以后进行网络的设置。

1. 添加“网络客户\MICROSOFT客户”。

2. 添加“协议”。选择“网络协议?/FONT>IPX/SPX兼容协议”及“NetBEUI”。添加“协议”。选择“网络协议?/FONT>IPX/SPX兼容协议”及“NetBEUI”。

3. 设定网络的文件和打印机共享。

4. 在“基本网络登录方式”中选“MICROSOFT网络登录”。

5. 输入计算机名称和工作组名称,每台机器应该有不同的名称。最后按“确定”，这时系统会提示放入Windows95的安装盘，安装好相应的驱动程序后，重新启动系统。6. 网络资源的共享。设置计算机中可以在网络中被共享的设备。当所有的机器都设置好了以后，就可以像访问自己的一样访问其它计算机的硬盘了。如果经常用某个网络驱动器，也可以把某个网络驱动器映射到自己的计算机上。至此，一个局域网就设置完毕。在网络上共享资源，网上每一台计算机都可以互相访问，计算机之间也没有主次之分，各自都有绝对的自主权的网络被称为对等式的网络(PEER TO PEER)，也叫点对点的网络。这种网络的优点是安装维护方便，不需要专门的服务器，价格也就相应地便宜。

五、网络环境下的数据传递。

1. 客户端1．1 在Delphi的表单上加入ClientSocket控件，并在某个事件发生时激活此控件。

beginif SpeedButton5.down thenif inputquery(所需传递数据的计算机,IP地址:,net_sever) thenbeginif length(net_sever)>0 thenbeginClientSocket1.Active:=true;ClientSocket1.host:=net_sever;end;endelsebeginSpeedButton5.down:=false;end;if not SpeedButton5.down then ClientSocket1.Active:=false;end;　　1．2 在ClientSocket控件的事件中，加入相应的响应代码。procedure TForm1.ClientSocket1Error(Sender: TObject;Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;var ErrorCode:Integer);beginstatusbar1.panels[0>.text:=net_sever+: 网络故障;end;procedure TForm1.ClientSocket1Connect(Sender: TObject;Socket: TCustomWinSocket);beginstatusbar1.panels[0>.text:=net_sever+:网络已连通;end;

procedure TForm1.ClientSocket1Disconnect(Sender: TObject;Socket: TCustomWinSocket);beginstatusbar1.panels[0>.text:=net_sever+:网络已断开;end;　　1．3 在需要发送数据时，采用Socket的SendText方法即可。if ClientSocket1.active then ClientSocket1.Socket.SendText(net_string);　　2. 服务端2．1在Delphi的表单上加入ServerSocket控件，并在某个事件发生时激活此控件。

procedure TForm1.Button1Click(Sender: TObject);beginServerSocket1.active:=not ServerSocket1.Active;end;

2．2 在需要接受数据时，采用Socket的receiv

刮板输送机铭牌标准集合刮板输送机埋刮板输送机有效体积

山东华美月饼生产厂家华美月饼时尚系列华美月饼预订

超级蹦床公园租赁蹦床乐园出租

张家界5p5吨不锈钢保温水箱厂，湖南长沙不锈钢消防水箱厂批发

445nm单模光纤耦合激光器

平头四驱自动挡房车

奔驰泵车挂挡总泵奔驰挂挡总泵奔驰泵车配件奔驰挂挡总泵

小麦螺旋提升机粉灰装仓螺旋上料机LJY6

纤维增强水泥泄爆板

冶金加工负压过滤机冷却液过滤纸