基于Delphi开发平台的分布式数据采集系统的论文.docVIP

基于Delphi开发平台的分布式数据采集系统的论文.doc

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
基于Delphi开发平台的分布式数据采集系统的论文.doc

  基于Delphi开发平台的分布式数据采集系统的论文 【摘要】用rs485串行通讯构成的总线型的分布式数据采集系统,数据采集模块可以进行单独采集测量,但采集结果需由上位机进行数据显示,保存,分析处理等操作,系统上层软件基于delphi开发平台,采用简单的非重叠i/o模式,通过合理的设置,有效地解决了i/o读写阻塞问题,增强了系统运行可靠性;由于采用分布式i/o采集模块,整个系统具备良好的扩展性。   【关键词】串行通讯 delphi rs485 分布式数据采集      串行通讯因其线路简单,开发相对比较容易,所以经常应用于各种监控、测试和自动化设备中。而rs485串行总线接口采用平衡发送和差分接收的方式进行数据通讯,较rs232提高了抗共模干扰能力和传输距离,其在适当的波特率下通讯距离可以达到1千米以上。rs485总线可用于多个带有rs485接口设备的互连,以实现数据高速远距离传送,其连线十分方便,鉴于以上优点,rs485总线在工业控制现场得到了广泛的应用。      一、系统设计      本系统采用一台pc作为上位机,采集系统通过若干块研华adam4000系列i/o模块完成,系统原理图如图1所示。      上位机的rs232串行口通过adam4520 rs232/rs485转换器转换为rs485总线,adam4000系列通过adam4520跟上位机(pc)进行通讯。.各个采集模块设有自己惟一的地址,且各个模块之间不进行信息交换,一切通讯受上位机控制。开始时,所有下位机都处于监听状态,等待上位机发出指令。当上位机发出指令时,所有的采集模块都接收并且将其中的地址帧与自己的地址比较, 如果相同则继续接收后面的指令或数据,若不同则不予理睬。   系统通过从模块中采集到的数据,显示在软件中,通过软件的开发,可以对数据进行保存,分析等自动化操作。      二、通讯协议      本系统采用半双工异步通讯,下位机以串行中断方式接收。   adam4520模块已经帮我们把rs232的字符串信号转换成rs485的信号后,此信号就可以在rs485网络上传送了。而一个串行通讯进行之前必须先就传输的状态条件进行设置,adam4000系列的分布式模块所使用的校验位检查方式是none,数据位长度是8,停止位长度是1,模块的速度可以有多种选择,最高可以达到115200bps。分布式模块的命令格式被分成送出与响应两个部分,其中送出部分由计算机下达命令给分布式模块,由5个片段组成,如图2。      在分布式模块中,上位机会根据实际需求向模块发出指令,上位机在发送指令后如接收到下位机的应答则认为指令发送成功,可以发送下一个指令,否则重新发送此指令。模块在接收到正确的指令后送回执行结果,这个被传送回来的字符串由以下5个部分组成,如图3。     三、软件设计      采集软件的设计是完成整个系统的关键,我们使用msm控件作为串口的操作控件,通过下面4个简单步骤完成系统功能的设计。   1.通讯端口的打开   begin   msm1.mport=1 //确定串口号   msm1.settings=“9600,n,8,1” //波特率的设定,校验方式,数据位,停止位   msm1.portopen=true//打开串口   end   2.指令送出   begin   msm1.output:=’$01’+chr(13) //读取地址为01的模块数据   end   3.数据接收   begin   edit1.txt:=msm1.input //把接收的数据显示在edit1控件上   end   4.结束系统   begin   close;   end   以上是单个功能的设计,实际设计中要复杂得多,下面是本人在设计使用的一个过程函数   procedure tformadamm.msmam(sender: tobject);   var   sss:ansistring; //串口数据   ci:byte; //di,do模块判断   qii:integer;//串口故障对比   begin   if not msma.portopen then exit;   if intadamclylt;1 then exit;   qii:=msma.mevent;//读串口故障号(1004-帧错误)   if qii=1008 then msma.inbuffercount :=0; //接收溢出   if qii=1010 then msma.outbuffercount :=0;//发送溢出   //if qiilt;gt;2 then e

文档评论(0)

ggkkppp + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档