西门子S7-200读取温度示例.docVIP

下载本文档

73
0
约3.45千字
约 7页
2016-10-12 发布于重庆
举报
版权申诉

西门子S7-200读取温度示例.doc

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

西门子S7-200读取温度示例

西门子S7-200与上位机通讯，读取温度值的程序范例！ (2010-04-26 16:53:00) 西门子S7-200与上位机通讯，读取温度值的程序范例！ ? PLC主程序网络1 // 设置控制方式为自由口通信方式，启动接收字符中断 // ??? PLC首次扫描 ??? 自由口通信，波特率为9600，数据位8，停止位1，无校验 ??? 初始化RCV，允许RCV，有结束符，检查空闲时间 ??? 结束符为 A ??? 空闲时间为5MS ??? 一次接收的最大字符为6个 ??? 启动通信口，接收完成中断 ??? 全局允许中断 ??? 接收数据 LD???? SM0.1 MOVB?? 16#09, SMB30 MOVB?? 16#B0, SMB87 MOVB?? 16#0A, SMB89 MOVB?? 6, SMB94 ATCH?? INT_0, 23 ENI RCV??? VB199, 0 网络2 // 检测温度送VW0 // ??? 转换成实际温度值 ??? 从工作站编号送到输出缓冲区 ??? 检测温度送输出缓冲区 LD???? SM0.0 MOVW?? AIW0, VW0 /I???? +54, VW0 MOVW?? AIW2, VW2 /I???? +54, VW2 MOVW?? 1, VW300 MOVW?? VW0, VW302 MOVW?? VW2, VW304 网络3 // 设置温度控制上限和下限// LD???? SM0.0 MOVW?? +350, VW4 MOVW?? +450, VW6 网络4 // 检测温度低于下限，则输出加温 // LDW?? VW0, VW4 A????? SM0.5 S????? Q0.0, 1 网络5 // 检测温度高于上限，则输出降温 // LDW?? VW0, VW6 A????? SM0.5 R????? Q0.0, 1 网络6 //准备传送参数 // ?? 发送字节数据，送VB99 ?? 发送检测温度数据，送VW100 ?? 发送工作站编号数据，送VW102 LD???? SM0.0 MOVB?? 6, VB99 MOVW?? VW300, VW100 MOVW?? VW302, VW102 MOVW?? VW304, VW104 网络7 // 传送数据 // LD???? SM0.5 XMT??? VB99, 0 中断程序网络1 //通信口接收数据完成后的中断 // // SMB86 等于16#20，表示PLC收到结速符 // ??? 收到结束符，把收到的数据传到VB400 ??? 中断有条件返回? ??? 否则继续接收 LDB=?? SMB86, 16#20 MOVB?? VB200, VB400 CRETI NOT RCV??? VB199, 0 \\*******************************\\ VB源程序 Dim x1, k1, k2 Dim p11, p22???????????????????????????? 定义变量 Dim aa() As Byte???????????????????????? 定义数组 Private Sub Command1_Click()???????????? 开始监控，定时器1有效 Timer1.Enabled = True End Sub Private Sub Command2_Click()???????????? 退事程序，定时器1无效 Timer1.Enabled = False Cls?????????????????????????????????????? 清屏 Unload Me End Sub Private Sub Form_Load()?????????????????? 初始化 Timer1.Enabled = False??????????????????? 定时器1无效 Timer1.Interval = 100???????????????????? 定时器1时间为0.1S Timer2.Enabled = True???????????????????? 定时器2有效 Timer2.Interval = 1000??????????????????? 定时器2时间为1S Picture1.ScaleMode = 0??????????????????? 定义纵横坐标 MSComm1.CommPort = 1????????????????????? 设定端口号 MSComm1.Settings = 9600,n,8,1?????????? 设定通讯波特率 MSComm1.InputLen = 6????????????????????? 输入缓冲区为6个字符 MSComm