中国自动化学会专家咨询工作委员会指定宣传媒体
免费注册 登录 广告服务 | 客服中心
您现在所在的是:

三菱Mitsubishi

抖音 德嘉 泓格论坛 FLIR红外热像论坛
工控论坛首页 三菱Mitsubishi → 浏览主题: 使用FX2N-485-BD如何使电脑与三菱PLC(FX2N-48MR) 通信?
发表新帖 回复该主题
回帖:0个,阅读:1511 [上一页] [1] [下一页]
* 帖子主题:

使用FX2N-485-BD如何使电脑与三菱PLC(FX2N-48MR) 通信?

分享到
1289
kuailin
文章数:91
年度积分:50
历史总积分:1289
注册时间:2003/6/21
发站内信
发表于:2004/2/18 20:00:00
#0楼

使用FX2N-485-BD如何使电脑与三菱PLC(FX2N-48MR) 通信?

电脑端:UOTEK 公司的UT-201型号 RS2323/RS485转换器
PLC 端:FX2N-485-BD
两者接线如下:
   RS232/RS485               FX2N-485-BD
   T/R+   ----------------->  RDA
   T/R-   ----------------->  RDB

FX2N-485-BD其他接线端子(SDA、SDB、SG)还须如何接线?


PLC的梯形图简单示例如下:

 |  M8002
 |---| |---------|------------------------------[MOV H1B81 D8120]
 |               |
 |               |------------------------------[MOV H0001 D8121]
 |
 |---[= D200 K1]-------------------------------------(Y1)
 |
 |
 |---------------------------------------------------[END]
 |


上位机用VB6.0编程,简单示例如下:

   Private Sub Form_Load()
       MSComm1.CommPort = 1
       MSComm1.Settings = "9600,n,8,1"
       MSComm1.Handshaking = 0
       MSComm1.InputLen = 0
       MSComm1.OutBufferCount = 0
       MSComm1.InBufferCount = 0
       MSComm1.PortOpen = True
   End Sub


  Private Sub Command4_Click()
      MSComm1.Output = Chr(5) + "00FFRR0" + SumCheck("00FFRR0")
      TimeDelay 100 不清  ‘为一延时函数。
      Text1.Text = MSComm1.Input
  End Sub

   Function SumCheck(Data$) As String
         '和检验函数
     Dim i&
     Dim Check&
     For i = 1 To Len(Data)
       Check = Check + Asc(Mid(Data, i, 1))
     Next
     SumCheck = Right(Hex$(Check), 2)
  End Function


 上面VB程序如果是使用FX-232-BD连接电脑与三菱PLC(FX2N系列),PLC梯形图中
 设置D8120的值为:H6881,通信正常,电脑能监控PLC.
 
 但这里使用RS485通信方式,用上面的程序与设置,结果电脑与PLC不能正常通信。
此时D8120的设置值应是?VB程序中的MSCOMM控件的属性又该如何?


请教哪位大侠,如何解决上面的问题。谢谢!!

工控学堂推荐视频:

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 工控网 Copyright©2024 Gkong.com, All Rights Reserved

31.2002