[西门子] 485转TCP-西门子1200数据读取-FB块封装

[复制链接]
查看143 | 回复0 | 2024-10-24 14:12:59 | 显示全部楼层 |阅读模式
>

将RS-485通信转换为TCP/IP通信,通常是为了让不支持以太网通信的设备能够通过网络进行数据传输。在西门子S7-1200 PLC的情况下,如果你想要通过RS-485接口读取数据,并且希望通过TCP/IP协议来访问这些数据,你可以使用一个RS-485转TCP的转换器(也称为串口服务器或串行到以太网转换器)。

下面是实现这个过程的一般步骤:
  1. 选择合适的RS-485转TCP转换器

    • 确保转换器支持RS-485标准。

    • 检查它是否兼容你的网络环境(如IP地址设置、端口配置等)。

    • 有些高级型号可能提供额外的功能,比如数据加密、断线重连机制等。

  2. 硬件连接

    • 将转换器的RS-485端口与PLC的RS-485端口相连。注意正确的接线方式(A-B线对应)。

    • 使用网线将转换器的以太网端口连接至你的局域网中。

  3. 配置RS-485转TCP转换器

    • 通常需要通过网页界面或者专用软件对转换器进行配置,包括设定IP地址、端口号以及RS-485参数(波特率、数据位、停止位、校验位等)。

    • 确保配置信息与PLC的通信设置相匹配。

  4. 编程PLC

    • 在TIA Portal或其他适用的编程环境中编写程序,使PLC能够通过其RS-485接口发送/接收数据。

    • 如果必要的话,还需编写处理来自TCP客户端的数据请求的逻辑。

  5. 开发TCP客户端应用

    • 开发一个可以作为TCP客户端的应用程序,该程序应该能够建立到RS-485转TCP转换器的TCP连接。

    • 客户端应用程序需要构造符合MODBUS RTU或其他你所使用的协议格式的请求帧,并通过TCP发送给转换器。

    • 接收并解析从转换器返回的数据。

  6. 测试与调试

    • 测试整个系统的连通性和稳定性。

    • 调试可能出现的问题,比如通信超时、数据错误等。


一、上海卓岚485-TCP通讯模块

上海卓岚信息科技有限公司生产的485转TCP通讯模块是一种常见的设备,用于将RS-485串行通信转换为基于TCP/IP的网络通信。这类模块可以帮助用户通过以太网远程访问和控制使用RS-485接口的设备,如PLC、传感器等。下面是关于如何设置和使用这种类型模块的一般指导步骤:

1. 硬件安装

  • 连接电源:确保给模块提供正确的电源电压。

  • 连接RS-485:按照模块上的指示正确连接A线(通常是负极)和B线(正极)。确保终端电阻的设置符合要求。

  • 连接以太网:使用标准网线将模块连接到局域网交换机或直接连接到电脑。

2. 配置网络参数

大多数卓岚485转TCP模块可以通过Web界面进行配置。通常需要做以下几步:

  • 获取IP地址:如果不知道模块的默认IP地址,可以查阅产品手册或联系供应商。有些模块支持自动DHCP获取IP地址。

  • 登录管理界面:在电脑浏览器中输入模块的IP地址进入配置页面。

  • 修改网络设置:根据实际网络环境调整IP地址、子网掩码、网关等信息。

  • 设定端口号:定义用于监听的数据传输端口。

  • 保存设置:完成配置后不要忘记保存更改,并重启设备使新设置生效。

3. RS-485参数配置

  • 在配置界面中,设置与RS-485设备相匹配的波特率、数据位、停止位以及校验方式等通信参数。

  • 如果是MODBUS RTU协议,还需要注意从站ID等特定参数的设置。


二、西门子1200MODBUS-TCP-FB块封装

西门子S7-1200系列PLC支持使用TIA Portal软件进行编程,可以通过FB(功能块)来封装特定的功能,如MODBUS TCP通信。为了实现MODBUS TCP通信,你需要利用TIA Portal中的库或自己创建一个自定义的功能块。以下是一个基本的步骤指南,用于在S7-1200 PLC中封装和使用MODBUS TCP功能块:

1. 准备工作

  • 确保你有最新版本的TIA Portal软件。

  • 安装并配置好以太网模块(如果需要的话)。

  • 确认你的S7-1200 PLC固件版本支持MODBUS TCP。

2. 创建项目和程序

  • 在TIA Portal中创建一个新的项目,并添加S7-1200 CPU。

  • 创建一个新的程序块,例如一个组织块(OB1)或者函数块(FB)。

3. 使用库或创建自定义FB

使用现有库

  • TIA Portal可能包含了一些预定义的库,这些库提供了MODBUS TCP通信的功能块。检查是否有可用的库,如“SIMATIC S7-1200/1500 Modbus TCP Library”。

  • 如果存在这样的库,导入它并按照文档说明使用其中的FB。

创建自定义FB

如果你需要创建自己的功能块,可以参考以下步骤:

  • 定义数据结构:为MODBUS请求和响应定义适当的数据类型。

  • 编写逻辑:根据MODBUS TCP协议编写发送和接收数据的逻辑。这通常涉及到TCP连接的建立、数据帧的构造、发送命令以及解析响应等操作。

  • 错误处理:确保在功能块中包含适当的错误处理机制,以便在通信失败时能够妥善处理。

4. 示例代码片段


IF #stop  THEN
    
    #Relay[10] := TRUE;
    
END_IF;

#R_TRIG_Instance(CLK := #run,
                 Q => #Relay[1]);

IF #Relay[1] THEN
    
    #IN[1].REQ := TRUE;
    #Relay[10] := FALSE;
END_IF;

IF #Relay[10] =  FALSE THEN
    
    REGION 第一路读

        
        
        #MB_CLIENT_Instance(REQ := #IN[1].REQ,
                            DISCONNECT := #IN[1].DESCON,
                            MB_MODE := #IN[1].MODE,
                            MB_DATA_ADDR := #IN[1].DATA_ADDR,
                            MB_DATA_LEN := #IN[1].DATA_LEN,
                            DONE => #OUT[1].Master_Done,
                            BUSY => #OUT[1].Master_Busy,
                            ERROR => #OUT[1].Master_Error,
                            STATUS => #OUT[1].Master_Error_ID,
                            MB_DATA_PTR := #read_data_out_1,
                            CONNECT := #tcp_connect[1]);
        
        #IEC_Timer_0_Instance(IN := NOT #OUT[1].Master_Done,
                              PT := T#1000MS);
        
        IF (#OUT[1].Master_Done OR #OUT[1].Master_Error) OR #IEC_Timer_0_Instance.Q THEN
            
            #IN[1].REQ := FALSE;
            #IN[2].REQ := TRUE;
        END_IF;
        
        IF #IEC_Timer_0_Instance.Q AND #OUT[1].Master_Busy THEN
            #Error_ID := 1;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
            #Relay[2] := TRUE;   // 报错中继
        END_IF;
        
        IF #IEC_Timer_0_Instance.Q = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
            
        END_IF;
        
    END_REGION
    
    REGION 第二路读
        
        #MB_CLIENT_Instance_1(REQ := #IN[2].REQ,
                              DISCONNECT := #IN[2].DESCON,
                              MB_MODE := #IN[2].MODE,
                              MB_DATA_ADDR := #IN[2].DATA_ADDR,
                              MB_DATA_LEN := #IN[2].DATA_LEN,
                              DONE => #OUT[2].Master_Done,
                              BUSY => #OUT[2].Master_Busy,
                              ERROR => #OUT[2].Master_Error,
                              STATUS => #OUT[2].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_2,
                              CONNECT := #tcp_connect[2]);
        
        #IEC_Timer_0_Instance_1(IN := NOT #OUT[2].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[2].Master_Done OR #OUT[2].Master_Error) OR #IEC_Timer_0_Instance_1.Q OR #OUT[1].Master_Busy THEN
            
            #IN[2].REQ := FALSE;
            #IN[3].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_1.Q AND #OUT[2].Master_Busy THEN
            #Error_ID := 2;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_1.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    
    REGION 第三路读
        
        #MB_CLIENT_Instance_2(REQ := #IN[3].REQ,
                              DISCONNECT := #IN[3].DESCON,
                              MB_MODE := #IN[3].MODE,
                              MB_DATA_ADDR := #IN[3].DATA_ADDR,
                              MB_DATA_LEN := #IN[3].DATA_LEN,
                              DONE => #OUT[3].Master_Done,
                              BUSY => #OUT[3].Master_Busy,
                              ERROR => #OUT[3].Master_Error,
                              STATUS => #OUT[3].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_3,
                              CONNECT := #tcp_connect[3]);
        
        
        #IEC_Timer_0_Instance_2(IN := NOT #OUT[3].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[3].Master_Done OR #OUT[3].Master_Error) OR #IEC_Timer_0_Instance_2.Q OR #OUT[2].Master_Busy THEN
            
            #IN[3].REQ := FALSE;
            #IN[4].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_2.Q AND #OUT[3].Master_Busy THEN
            #Error_ID := 3;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_2.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
        
        
    END_REGION
    
    REGION 第四路读
        
        #MB_CLIENT_Instance_3(REQ := #IN[4].REQ,
                              DISCONNECT := #IN[4].DESCON,
                              MB_MODE := #IN[4].MODE,
                              MB_DATA_ADDR := #IN[4].DATA_ADDR,
                              MB_DATA_LEN := #IN[4].DATA_LEN,
                              DONE => #OUT[4].Master_Done,
                              BUSY => #OUT[4].Master_Busy,
                              ERROR => #OUT[4].Master_Error,
                              STATUS => #OUT[4].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_4,
                              CONNECT := #tcp_connect[4]);
        
        
        #IEC_Timer_0_Instance_3(IN := NOT #OUT[4].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[4].Master_Done OR #OUT[4].Master_Error) OR #IEC_Timer_0_Instance_3.Q OR #OUT[3].Master_Busy THEN
            
            #IN[4].REQ := FALSE;
            #IN[5].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_3.Q AND #OUT[4].Master_Busy THEN
            #Error_ID := 4;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_3.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    
    REGION 第五路读
        
        #MB_CLIENT_Instance_4(REQ := #IN[5].REQ,
                              DISCONNECT := #IN[5].DESCON,
                              MB_MODE := #IN[5].MODE,
                              MB_DATA_ADDR := #IN[5].DATA_ADDR,
                              MB_DATA_LEN := #IN[5].DATA_LEN,
                              DONE => #OUT[5].Master_Done,
                              BUSY => #OUT[5].Master_Busy,
                              ERROR => #OUT[5].Master_Error,
                              STATUS => #OUT[5].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_5,
                              CONNECT := #tcp_connect[5]);
        
        
        
        #IEC_Timer_0_Instance_4(IN := NOT #OUT[5].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[5].Master_Done OR #OUT[5].Master_Error) OR #IEC_Timer_0_Instance_4.Q OR #OUT[4].Master_Busy THEN
            
            #IN[5].REQ := FALSE;
            #IN[6].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_4.Q AND #OUT[5].Master_Busy THEN
            #Error_ID := 5;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_4.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    
    REGION 第六路读
        
        #MB_CLIENT_Instance_5(REQ := #IN[6].REQ,
                              DISCONNECT := #IN[6].DESCON,
                              MB_MODE := #IN[6].MODE,
                              MB_DATA_ADDR := #IN[6].DATA_ADDR,
                              MB_DATA_LEN := #IN[6].DATA_LEN,
                              DONE => #OUT[6].Master_Done,
                              BUSY => #OUT[6].Master_Busy,
                              ERROR => #OUT[6].Master_Error,
                              STATUS => #OUT[6].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_6,
                              CONNECT := #tcp_connect[6]);
        
        
        
        #IEC_Timer_0_Instance_5(IN := NOT #OUT[6].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[6].Master_Done OR #OUT[6].Master_Error) OR #IEC_Timer_0_Instance_5.Q OR #OUT[5].Master_Busy THEN
            
            #IN[6].REQ := FALSE;
            #IN[7].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_5.Q AND #OUT[6].Master_Busy THEN
            #Error_ID := 5;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_5.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    
    REGION 第七路读
        
        #MB_CLIENT_Instance_6(REQ := #IN[7].REQ,
                              DISCONNECT := #IN[7].DESCON,
                              MB_MODE := #IN[7].MODE,
                              MB_DATA_ADDR := #IN[7].DATA_ADDR,
                              MB_DATA_LEN := #IN[7].DATA_LEN,
                              DONE => #OUT[7].Master_Done,
                              BUSY => #OUT[7].Master_Busy,
                              ERROR => #OUT[7].Master_Error,
                              STATUS => #OUT[7].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_7,
                              CONNECT := #tcp_connect[7]);
        
        
        
        #IEC_Timer_0_Instance_6(IN := NOT #OUT[7].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[7].Master_Done OR #OUT[7].Master_Error) OR #IEC_Timer_0_Instance_5.Q OR #OUT[6].Master_Busy THEN
            
            #IN[7].REQ := FALSE;
            #IN[8].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_6.Q AND #OUT[7].Master_Busy THEN
            #Error_ID := 7;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_6.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    
    REGION 第八路读
        
        #MB_CLIENT_Instance_7(REQ := #IN[8].REQ,
                              DISCONNECT := #IN[8].DESCON,
                              MB_MODE := #IN[8].MODE,
                              MB_DATA_ADDR := #IN[8].DATA_ADDR,
                              MB_DATA_LEN := #IN[8].DATA_LEN,
                              DONE => #OUT[8].Master_Done,
                              BUSY => #OUT[8].Master_Busy,
                              ERROR => #OUT[8].Master_Error,
                              STATUS => #OUT[8].Master_Error_ID,
                              MB_DATA_PTR := #read_data_out_8,
                              CONNECT := #tcp_connect[8]);
        
        
        #IEC_Timer_0_Instance_7(IN := NOT #OUT[8].Master_Done,
                                PT := T#1000MS);
        
        IF (#OUT[8].Master_Done OR #OUT[8].Master_Error) OR #IEC_Timer_0_Instance_5.Q OR #OUT[7].Master_Busy THEN
            
            #IN[8].REQ := FALSE;
            #IN[1].REQ := TRUE;
            
        END_IF;
        
        IF #IEC_Timer_0_Instance_7.Q AND #OUT[8].Master_Busy THEN
            #Error_ID := 7;
            #Error_content := 'Disconnected_from_the_station';
            #ERROR := TRUE;
        END_IF;
        IF #IEC_Timer_0_Instance_6.Q = FALSE AND #Relay[2] = FALSE THEN
            #Error_content := 'No_error_reported';
            #Error_ID := 0;
            #ERROR := #Relay[2] := FALSE;
        END_IF;
        
    END_REGION
    

    
END_IF;

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册哦

x
您需要登录后才可以回帖 登录 | 注册哦

本版积分规则