抖音粉丝群1
『7x24小时有问必答』

AI浪潮下的计算机行业——从业者现状与未来展望
该功能块(FB520)是西门子SCL语言编写的SICK RFU630射频识别(RFID)设备通信模块,核心功能是通过TCP协议与SICK RFU设备交互,实现RFID标签的读取、写入、故障诊断、数据可视化及报警上报,广泛用于工业自动化场景,如汽车生产线物料追踪)。
HMI面板:
<img><img><img><img><img><img><img><img><img><img><img><img>
功能块:
功能块大纲:
<img><img><img><img><img><img><img><img><img><img><img>

输入参数

名称
类型
描述
Frg_oProz
BOOL
预选无过程使能
Ver_Lesen
BOOL
读联锁
Ver_Schreiben
BOOL
写保护
Lesen
BOOL
外部读,读门打开上升沿 (GateOn) -> 读门关闭下降沿 (GateOff),变量数据传输
Schreiben
BOOL
启动外部读操作
StartAdd
INT
起始地址,用于写数据载体
Laenge
INT
将要写入数据载体的字数量
FM_Reset
BOOL
清除循环监控
ZUeGes
TIME
写 / 读过程超时 (T#10s)
VerbID
STRUCT
本地 TCP 连接
_Cfg
WORD
组态字
VkStoe_In
BOOL
连接故障

组态位

参数
状态
描述
Cfg
00
0
对内部时间上的 “门关闭” 进行外部读 - 不

1
对内部时间上的 “门关闭” 进行外部读 - 是

01
0
出错后重复读 - 不

1
出错后重复读 - 是

02 - 15
-

输出参数

名称
类型
描述
oProz
BOOL
无过程预选
Data_UII
字节数组 [1..30]
UII 区的数据
FM_Lesen
BOOL
读操作结束
ERROR
BOOL
故障
FM_Schreiben
BOOL
写完成
BUSY
BOOL
写 / 读处于活跃状态
Stoe
BOOL
组故障
VkStoe_Out
BOOL
连接故障

输入和输出参数

名称
类型
描述
ST_MELD
消息缓冲区
消息结构,用于记录全部错误消息的全局数据结构,可被所有块写,由消息管理功能评估,含时间戳、设备标签和错误文本并输入到该结构中
ST_BA
ST_Betriebsarten
运行模式结构
ST_RFU_DATA
ST_RFU_DATA
接收和发送缓冲区
功能块深度解读:
变量声明(输入/输出/In-Out/临时/静态)
变量按功能分为:控制信号、TCP参数、状态标志、数据缓冲区、可视化变量,是功能块逻辑的数据载体
1.  输入变量(VAR_INPUT):外部控制与配置
代码片段:
VAR_INPUT     Frg_oProz      : BOOL;              // Freigabe Vorwahl ohne Prozess → 允许“无流程”模式     Ver_Lesen      : BOOL;              // Verriegelung Lesen → 读取使能(锁定/解锁读取)     Ver_Schreiben: BOOL;              // Verriegelung Schreiben → 写入使能(锁定/解锁写入)     Lesen            : BOOL;              // Lesen extern pos.Flanke Start Tag lesen → 外部读取触发(上升沿启动读标签)     Schreiben      : BOOL;              // Start Schreiben extern → 外部写入触发     StartAdd       : INT:=  0;         // Start Wort beim Schreiben auf Datentraeger max. 31 → 写入起始地址(最大31)     Laenge          : INT:=  32;        // Anzahl Worte beim Schreiben auf Datentraeger → 写入数据长度(字)     FM_Reset       : BOOL;              // Taktkontrolle abloeschen → 复位触发(清空时序控制)     ZUeGes          : TIME:= T#10s;  // Timeout Schreib/Lesevorgang → 读写超时时间(默认10s)     // TCP连接参数结构体     VerbID : STRUCT                     //TCP-native Kopplung              ID : INT;                             //Verbindungsidentifikationsnummer → 连接ID            DeviceID : INT;                    //2= CPU31x(F)-2PN/DP; 3=CPU319(F)-3PN/DP; 5= CPU41x(F)-xPN/DP → CPU型号            IP : ARRAY[1  ..  4  ] OF INT;  //Partner IP Adresse → RFU设备IP(如[192,168,0,100])            lokalPort : INT;                  //eigene Portnummer (2000 ... 5000) → 本地端口(2000-5000)            remotePort : INT ;               //nicht relevant → 远程端口(未使用)            lokalTSAP : STRUCT               //nicht relevant → 本地TSAP(未使用,TCP-native无需配置)                    Rack : BYTE ;                                   Steckplatz : BYTE ;                          TSAP : STRING   [14  ];               END_STRUCT ;                  remoteTSAP : STRING   [16  ];  //nicht relevant → 远程TSAP(未使用)     END_STRUCT ;           // 配置位(WORD映射为BOOL,方便位操作)     _Cfg :      WORD;// X0:Lesen extern "Gate Off" ueber interne Zeit, X1:Lesen Wiederholung bei Fehler              Cfg AT _Cfg: STRUCT            // WORD → BOOL                  X8~X15 : BOOL ;            // 未使用                  X0   : BOOL ;                 // Lesen extern "Gate Off" ueber interne Zeit → 外部读取时用内部延时判断Gate Off                  X1   : BOOL ;                 // Lesen Wiederholung bei Fehler → 读取错误时自动重试                  X2~X7 : BOOL ;              // 未使用            END_STRUCT;      VkStoe_In    : BOOL;                    // Verkettete Stoerung → 外部连锁故障输入(如上游设备故障)END_VAR```#### 解读- **控制信号**:`Lesen`/`Schreiben`是外部触发读写的核心信号(需上升沿触发);`Ver_Lesen`/`Ver_Schreiben`是“权限开关”,锁定时无法触发读写。- **TCP参数**:`VerbID`结构体定义RFU设备的IP、本地端口、CPU型号,是TCP连接的基础配置。- **配置位**:`Cfg.X0`/`Cfg.X1`通过`AT`指令映射到`_Cfg`的位,实现“用WORD存储、按BOOL操作”,是西门子SCL的常用技巧。### 2. 输出变量(VAR_OUTPUT):状态反馈与数据输出#### 代码片段```sclVAR_OUTPUT      oProz          : BOOL;                                // Vorwahl Ohne Prozess → “无流程”模式状态输出      Data_UII      : ARRAY [1..30] OF BYTE ;     // ARRAY UII → 读取到的标签UII(EPC码,30字节)      FM_Lesen      : BOOL;                                // Lesen abgeschlossen → 读取完成标志(TRUE=读取成功)      FM_Schreiben: BOOL;                                // Schreiben abgeschlossen → 写入完成标志      BUSY            : BOOL;                                // Schreiben/Lesen aktiv → 读写忙状态(TRUE=正在执行)      Stoe            : BOOL;                                // Sammelstoerung → 汇总故障(任一故障触发为TRUE)      VkStoe_Out   : BOOL;                                // Verkettete Stoerung → 连锁故障输出(传递给下游设备)END_VAR```#### 解读- **数据输出**:`Data_UII`是核心输出,存储读取到的RFID标签UII(全球唯一标识)。- **状态反馈**:`FM_Lesen`/`FM_Schreiben`告知外部“读写是否完成”,`BUSY`避免并行触发读写,`Stoe`汇总所有故障。### 3. In-Out变量(VAR_IN_OUT):数据交互通道#### 代码片段```sclVAR_IN_OUT      ST_RFU_DATA : ST_RFU_DATA;         // Empfangs- und Sendefach → RFU读写数据结构体(存储读写的标签数据)      ST_BA          : ST_Betriebsarten;  // Betriebsartenstruktur → 运行模式结构体(如设备使能、复位信号)      ST_Meld       : Meldungspuffer;     // Meldestruktur → 报警缓冲区(存储故障信息)END_VAR```#### 解读- `ST_RFU_DATA`是“读写数据枢纽”:读取时从RFU接收的数据存入该结构体,写入时从该结构体取数据发送给RFU。- `ST_BA`包含设备运行模式(如`ST_BA.SWE7`是复位使能),`ST_Meld`用于上报故障到系统报警模块。### 4. 临时变量(VAR_Temp):逻辑计算临时存储#### 代码片段```sclVAR_Temp      TempPointerMsys                         :ANY;// Hilfsvariable → 报警指针(ANY类型兼容任意数据)      TempPointerFlanken                     :ANY;// 边沿检测指针      TempPointerMeldpuffer                :ANY;// 报警缓冲区指针      erg_SFC20                                  :INT;// Rueckgabewert SFC20 → SFC20(数据块复制)返回值       // 指针结构体(用于访问报警数据的位/字节/字)      pMeldFeld AT TempPointerMsys: STRUCT                                                     BYTE0 :BYTE;   // Byte 0                                                     TYP    :BYTE;   // Daten/Parametertyp → 数据类型(1=BOOL,2=BYTE)                                                   ANZ    :WORD;   // Laenge der Variablen → 变量长度                                                   DBNR   :WORD;   // DB-Nummer → 数据块编号                                                   BZ      :DWORD;  // Bereichszeiger → 地址指针                                               END_STRUCT;         // 循环变量与临时地址      i                : INT;           // Loop variable → 循环计数器1      j                : INT;           // Loop variable → 循环计数器2      Address       : INT;           // Temporarily address → 临时地址      Temp            : INT;           // Temporarily variable → 临时变量      Start_Adr    : INT;           // Start address → 临时起始地址      StartAdresse: INT;           // 临时起始地址(写入用)      EndAdresse   : INT;           // 临时结束地址(写入用)  END_VAR```#### 解读- **指针变量**:`TempPointerMsys`等`ANY`类型指针用于灵活访问报警数据块(如`pMeldFeld.BZ`指向报警数据的地址),是西门子PLC中“跨数据块访问”的常用方式。- **循环变量**:`i`/`j`用于遍历数组(如清空缓冲区、复制标签数据)。### 5. 静态变量(VAR):功能块内部状态保持静态变量在功能块调用周期中保持值(不同于临时变量),核心是**TCP状态、读写流程、故障标志、可视化缓存**。#### 代码片段(核心部分)```sclVAR       // 可视化数据(HMI显示用)      _dwVisuWerte1 : DWORD;            // IP地址(如192.168.0.30 = DWORD#16#C0A8001E)      _dwVisuWerte2 : DWORD;            // 本地端口(低字)      _dwVisuWerte3 : DWORD;            // 错误号(低字)      _dwVisuWerte4 : DWORD;            // 状态双字(HMI显示读写状态)      _dwVisuWerte5 : DWORD;            // 起始地址/长度/结束地址(字节0=StartAdd,字节1=Laenge)      strVisuText1   : STRING[64];     // UII读取区域(HMI显示)      strVisuText2   : STRING[64];     // User数据读取区域(HMI显示)       // TCP相关状态      TCON_PARAM               : TCON_PAR ;// TCP连接参数结构体(给TCON功能块用)      iCommand                  : INT;         // 命令选择(1=GateOn,2=GateOff,3=Write,4=Timer)      STATUS_TRCV             : WORD;        // TRCV(接收)状态      STATUS_TCON             : WORD;        // TCON(连接)状态      xConnected               : BOOL;        // 连接建立标志(TRUE=TCP已连接)      xConnReq                  : BOOL := True;        // 连接请求(初始为TRUE,触发首次连接)       // 读写流程状态      xGateOn                   : BOOL;        // Gate开启确认(RFU返回“GateOn”响应)      xGateOff                  : BOOL;        // Gate关闭确认      xWrite                     : BOOL;        // 写入成功确认      xWriteNIO                : BOOL;        // 写入失败确认      xRead                      : BOOL;        // 读取成功确认(收到标签数据)      xNoRead                   : BOOL;        // 无标签确认(未读到标签)      xCCError                  : BOOL;        // CC错误(通信校验错误)      xReadError               : BOOL;        // 读取错误(数据格式错误)       // 故障标志      F_TCPConnect            : BOOL;        // TCP连接故障      F_TCPReceive            : BOOL;        // TCP接收故障      F_TCPSend                : BOOL;        // TCP发送故障      F_TimeOutL               : BOOL;        // 读取超时故障      F_TimeOutS               : BOOL;        // 写入超时故障      F_NoRead                  : BOOL;        // 无标签故障      F_CCError                : BOOL;        // CC错误故障      F_ReadError             : BOOL;        // 读取错误故障      F_Error                   : BOOL;        // 数据接收故障      F_Konfig                  : BOOL;        // 配置错误(起始地址/长度非法)       // 时序控制      iSchritt                  : INT;         // 流程步骤(状态机核心,0=空闲,1=GateOn,2=等待GateOn...)       // 标准功能块实例      R_TRIG_Lesen            : R_Trig;     // 读取触发上升沿检测      F_TRIG_Lesen            : F_Trig;     // 读取触发下降沿检测      TON_Timeout             : TON;         // 超时定时器(监控读写是否超时)      TCP_Connect             : TCON;        // TCP连接功能块(西门子标准FB)      TCP_Send                  : TSEND;      // TCP发送功能块      TCP_Receive             : TRCV;        // TCP接收功能块       // 数据缓冲区      TMP_Buffer               : ARRAY [1..256] OF BYTE;            // 临时缓冲区(存储标签数据)      Buffer                     : ARRAY [1..256] OF BYTE;            // TCP接收缓冲区(存储RFU返回的原始数据)      DW_Buffer AT Buffer : ARRAY [1..64] OF DWORD;            // 接收缓冲区的DWORD视图(方便4字节比对)      Send_Buffer             : ARRAY [1..256] OF BYTE;            // TCP发送缓冲区(存储发给RFU的命令)      Command AT SEND_Buffer: STRING;                                 // 发送缓冲区的字符串视图(方便写命令)END_VAR```
、核心逻辑(按功能模块拆解)
功能块逻辑按可视化控制→TCP连接标签读写故障处理可视化数据准备报警上报  顺序执行,覆盖从触发反馈的全流程。
1.  可视化按键处理(HMI手动控制)
代码片段:
(**************************************************************************)(************************ Visu Tasten auswerten  ***************************)(**************************************************************************)If PC_AKTIV = DWORD#0 Then   // PC_AKTIV=0 → HMI未激活,清空按键      bVisuTasten   := Byte#0;END_IF;// 映射HMI按键(bVisuTasten=1→读取,2→无流程,3→写入,4→复位)xS_Lesen            := (bVisuTasten = 1);xS_oProz            := (bVisuTasten = 2);  xS_Schreiben      := (bVisuTasten = 3);xS_Reset            := (bVisuTasten = 4);// 按键上升沿检测(避免长按重复触发)R_TRIG_S_Lesen(CLK:= xS_Lesen);R_TRIG_S_oProz(CLK:= xS_oProz);                    R_TRIG_S_Schreiben(CLK:=xS_Schreiben);R_TRIG_S_Reset(CLK:=xS_Reset);(* An-/Abwahl ohne Prozess → “无流程”模式切换(HMI按键触发)  *)IF R_TRIG_S_oProz.Q AND Frg_oProz THEN   // 上升沿+外部允许      xoProz := NOT xoProz;   // 切换“无流程”状态(TRUE=激活,FALSE=取消)      IF xoProz THEN   // 激活“无流程”:清空所有数据缓冲区和可视化文本            FOR i := 1 TO 256 BY 1 DO                  Buffer :=      B#16#00;              END_FOR;            FOR i:=1 TO 30 BY 1 DO                  ST_RFU_DATA.READ_TAG.DATA_UII := B#0;   // 清空UII数据            END_FOR;               FOR i:=1 TO 64 BY 1 DO                  ST_RFU_DATA.READ_TAG.DATA_USER := B#0;   // 清空User数据            END_FOR;              // 清空HMI显示文本(UII读取区域)            arrVisuText1[1] :=    B#64;   // 字符串长度(64字节)            arrVisuText1[2] :=    B#0;    // 实际数据长度(0=空)            arrVisuText3[1] :=    B#64;   // UII写入区域            arrVisuText3[2] :=    B#0;              FOR i := 1 TO 30 BY 1 DO                  arrVisuText1[i+2] :=      B#16#0;                    arrVisuText3[i+2] :=      B#16#0;                           END_FOR;            // 清空User数据显示区域            arrVisuText2[1] :=    B#64;               arrVisuText2[2] :=    B#0;              arrVisuText4[1] :=    B#64;               arrVisuText4[2] :=    B#0;              FOR i := 1 TO 64 BY 1 DO                  arrVisuText2[i+2] :=      B#16#0;                  arrVisuText4[i+2] :=      B#16#0;            END_FOR;      END_IF;END_IF;oProz    := xoProz;   // “无流程”状态输出到外部
解读:
HMI按键映射:`bVisuTasten`是HMI发送的按键编码(1~4对应4个功能),通过上升沿检测(`R_TRIG_S_oProz`)避免长按重复触发。
无流程模式:激活后清空所有数据缓冲区,用于“手动调试”(无需外部触发`Lesen`/`Schreiben`,直接HMI操作)。
2.  TCP连接管理(建立/重连/状态监测)
代码片段
(**************************************************************************)(*********************** Verbindung aufbauen ******************************)// 复位时断开连接IF R_TRIG_Reset.Q THEN      xConnected := False;END_IF;// 复位结束后,触发连接请求IF F_TRIG_Reset.Q THEN      xConnReq       := True;END_IF;// 未连接/接收故障/发送故障时,尝试建立/重连TCPIF NOT xConnected OR F_TCPReceive OR F_TCPSend THEN         // 接收/发送故障时,按0.5Hz频率重试(避免频繁重试)      IF F_TCPReceive OR F_TCPSend THEN            xConnReq :=  "0,5Hz";         END_IF;       // 配置TCON参数(TCP-native连接)      TCON_PARAM.id                      := INT_TO_WORD(VerbID.ID);      // 连接ID      TCON_PARAM.active_est          := True;                                // 主动建立连接      TCON_PARAM.connection_type   := B#16#11;                           // 连接类型:TCP-native      TCON_PARAM.local_device_id   := INT_TO_BYTE(VerbID.DeviceID);   // CPU型号       // 本地端口(高字节+低字节)      TCON_PARAM.local_tsap_id[1] := WORD_TO_BYTE(SHR(IN:=INT_TO_WORD(VerbID.lokalPort),N:=8));            TCON_PARAM.local_tsap_id[2] := WORD_TO_BYTE(INT_TO_WORD(VerbID.lokalPort));            TCON_PARAM.rem_staddr_len    := B#16#4;                             // 远程IP长度(4字节)      TCON_PARAM.rem_tsap_id_len   := B#16#2;                             // 远程TSAP长度(2字节)       // 远程IP(从VerbID.IP复制)      TCON_PARAM.rem_staddr[1]      := INT_TO_BYTE(VerbID.IP[1]);            TCON_PARAM.rem_staddr[2]      := INT_TO_BYTE(VerbID.IP[2]);            TCON_PARAM.rem_staddr[3]      := INT_TO_BYTE(VerbID.IP[3]);            TCON_PARAM.rem_staddr[4]      := INT_TO_BYTE(VerbID.IP[4]);            TCON_PARAM.rem_tsap_id[1]    := B#16#8;                             // 远程TSAP高字节(SICK RFU默认)      TCON_PARAM.rem_tsap_id[2]    := B#16#40;                           // 远程TSAP低字节(SICK RFU默认)       // 调用TCON功能块,建立TCP连接      TCP_Connect(            REQ       := xConnReq,      // 连接请求            ID         := TCON_PARAM.ID,   // 连接ID            CONNECT := TCON_PARAM);     // 连接参数              // 发送连接请求后,重置请求标志(避免重复发送)      IF xConnReq THEN            xConnReq := False;      END_IF;       // 连接完成/错误时,更新连接状态和故障标志      IF TCP_Connect.DONE OR TCP_Connect.ERROR THEN            xConnected    := TCP_Connect.DONE;   // DONE=TRUE→连接成功            F_TCPConnect := TCP_Connect.ERROR;  // ERROR=TRUE→连接故障      END_IF;                     // 特殊状态:STATUS=0x80A3(连接已存在),视为连接成功      IF TCP_Connect.ERROR AND TCP_Connect.STATUS = W#16#80A3 THEN            xConnected    := True;            F_TCPConnect := False;            F_TCPReceive := False;            F_TCPSend      := False;      END_IF;       // 记录连接状态(非0x7000=连接过程中)      IF TCP_Connect.STATUS <> W#16#7000  THEN            STATUS_TCON := TCP_Connect.STATUS;      END_IF;
解读
连接逻辑:首次调用或连接故障时,通过`TCON`功能块主动建立TCP连接,参数`TCON_PARAM`严格匹配SICK RFU的TCP协议要求(如TSAP=0x840)。
自动重连:若`F_TCPReceive`/`F_TCPSend`(收发故障)触发,按0.5Hz频率重试,避免“死等”。
状态处理:`TCP_Connect.STATUS=0x80A3`表示“连接已存在”(重复调用TCON),此时视为连接成功,避免误判故障。
3.  标签读取流程(核心逻辑)
读取流程通过`iSchritt`(步骤)控制,顺序为:GateOn→延时→GateOff→接收标签数据→确认完成
代码片段:
(**************************************************************************)(************************** RECEIVE TELEGRAM ******************************)ELSE   // TCP已连接,执行读写逻辑       // ... 省略TCP参数重配置(与连接阶段一致)…      TCON_PARAM.id                      := INT_TO_WORD(VerbID.ID);      //配置连接标识符(ID),将VerbID.ID(整数类型)转换为 WORD 类型,作为当前 TCP 连接的唯一标识。      TCON_PARAM.active_est          := True;      //设置为 “主动建立连接” 模式(True表示主动发起连接,False表示被动等待连接)。      TCON_PARAM.connection_type   := B#16#11;   // 定义连接类型,B#16#11是西门子标准中 “TCP 协议” 的标识(固定值,用于指定使用 TCP 而非 UDP)。      TCON_PARAM.local_device_id   := INT_TO_BYTE(VerbID.DeviceID);   // CPU型号          // 本地端口(高字节+低字节)      TCON_PARAM.local_tsap_id[1] := WORD_TO_BYTE(SHR(IN:=INT_TO_WORD(VerbID.lokalPort),N:=8));            TCON_PARAM.local_tsap_id[2] := WORD_TO_BYTE(INT_TO_WORD(VerbID.lokalPort));            TCON_PARAM.rem_staddr_len    := B#16#4;      // 远程IP长度(4字节)      TCON_PARAM.rem_tsap_id_len   := B#16#2;      // 远程TSAP长度(2字节)定义远程 TSAP 长度,B#16#2表示远程 TSAP 是 2 字节(16 位,通常对应远程端口号)。     // 远程IP(从VerbID.IP复制)      TCON_PARAM.rem_staddr[1]      := INT_TO_BYTE(VerbID.IP[1]);            TCON_PARAM.rem_staddr[2]      := INT_TO_BYTE(VerbID.IP[2]);            TCON_PARAM.rem_staddr[3]      := INT_TO_BYTE(VerbID.IP[3]);            TCON_PARAM.rem_staddr[4]      := INT_TO_BYTE(VerbID.IP[4]);            TCON_PARAM.rem_tsap_id[1]    := B#16#8;      // 远程TSAP高字节(SICK RFU默认)        TCON_PARAM.rem_tsap_id[2]    := B#16#40;        // 远程TSAP低字节(SICK RFU默认)     //是 PLC 中用于接收 TCP 数据的函数块      TCP_Receive(            EN_R      := NOT F_TCPReceive,     //接收使能信号,当F_TCPReceive(可能是 “接收故障标志”)为False时,使能接收功能(即EN_R为True时允许接收)。            ID         := TCP_Connect.ID,     //关联的连接 ID,与前面TCON_PARAM.id对应,指定从哪个 TCP 连接接收数据。            LEN       :=  0,                                                        //接收数据长度,0表示接收缓冲区中所有可用的数据(不限制长度,直到缓冲区满)。            DATA      := Buffer);                           //接收缓冲区,接收到的 TCP 数据将存储到Buffer变量中。           //TCP_Receive.NDR:新数据就绪信号(True表示成功接收到新数据)。           //TCP_Receive.ERROR:接收错误信号(True表示接收过程中发生错误)。           //逻辑说明:当 “接收到新数据” 或 “接收出错” 时,更新F_TCPReceive标志位 —— 若接收出错,则F_TCPReceive设为True(表示故障);若成功接收,则F_TCPReceive设为False(清除故障标志)。                   IF TCP_Receive.NDR OR TCP_Receive.ERROR THEN            F_TCPReceive := TCP_Receive.ERROR;      END_IF;       // 读取触发条件:外部触发/ HMI触发 + 读取使能 + 未写入 + 非“无流程”      IF (R_TRIG_Lesen.Q OR R_TRIG_S_Lesen.Q OR xLesen) AND xFrgLesen AND NOT xSchreiben THEN             // 步骤0:初始化(清空缓冲区、重置状态)            IF iSchritt =  0  THEN                  xGateOn       := False;                  xGateOff      := False;                  xWrite         := False;                  xWriteNIO    := False;                  xRead          := False;                  xNoRead       := False;                  xCCError      := False;                  xReadError   := False;                  xTimer         := False;                  xFM_Lesen    := False;                  FM_Lesen      := False;                  FM_Schreiben:= False;                  BUSY            := True;   // 置位忙状态                  xLesen         := True;   // 标记“正在读取”                  xLesenExt    := R_TRIG_Lesen.Q AND NOT CFG.X0;   // 外部读取标志                  iZaehler      :=  0;                   // 清空缓冲区                  FOR i :=  1  TO  256  BY  1  DO                          Buffer :=      B#16#00;                          TMP_Buffer := B#16#00;                    END_FOR;                    FOR i:=1  TO  30  BY  1  DO                        ST_RFU_DATA.READ_TAG.DATA_UII := B#0;                  END_FOR;                     FOR i:=1  TO  64  BY  1  DO                        ST_RFU_DATA.READ_TAG.DATA_USER := B#0;                  END_FOR;                    iSchritt      :=  1;   // 进入步骤1:发送GateOn命令            END_IF;                          // 步骤1:发送GateOn命令(开启RFU的读取门)            IF iSchritt =  1  THEN                  iCommand      :=  1;                 // 命令1=GateOn                  iSchritt      :=  2;                 // 下一步:等待GateOn确认            END_IF;                          // 步骤2:等待RFU返回“GateOn”确认            IF iSchritt =  2  THEN                  IF xGateOn THEN                    // 收到GateOn确认                        iSchritt      :=  3;           // 下一步:启动延时                        xGateOn       := False;     // 重置确认标志                  END_IF;            END_IF;                          // 步骤3:启动延时(等待标签进入读取范围)            IF iSchritt =  3  THEN                  xTimer         := True;            // 启动定时器                  iCommand      :=  4;                 // 命令4=Timer                  iSchritt      :=  4;                 // 下一步:等待延时结束            END_IF;                          // 步骤4:等待延时结束(内部延时/Cfg.X0外部延时)            IF iSchritt =  4  THEN                   // 条件:内部延时结束 或 外部读取触发下降沿+外部延时                  IF (NOT xLesenExt AND NOT xTimer) OR (xLesenExt AND NOT Lesen AND NOT xTimer) THEN                           iSchritt      :=  5;           // 下一步:发送GateOff命令                  END_IF;            END_IF;                  // 步骤5:发送GateOff命令(关闭读取门,准备接收数据)            IF iSchritt =  5  THEN                  iCommand      :=  2;                 // 命令2=GateOff                  iSchritt      :=  7;                 // 下一步:等待数据/故障确认            END_IF;             // 步骤7:等待RFU返回“数据/无标签/错误”            IF iSchritt =  7  THEN                   // 收到数据/无标签/CC错误/读取错误,进入下一步                  IF xRead OR xNoRead OR xCCError OR xReadError THEN                          iSchritt      :=  6;                             END_IF;            END_IF;                          // 步骤6:等待GateOff确认,完成读取            IF iSchritt =  6  THEN                  IF xGateOff THEN  // 收到GateOff确认                        iSchritt      :=  0;           // 回到空闲步骤                         // 记录故障状态                        F_NoRead      := xNoRead;                        F_CCError    := xCCError;                        F_ReadError := xReadError;                        xFM_Lesen    := xRead;     // 读取成功标志                        FM_Lesen      := xRead;     // 输出读取完成(TRUE=成功)                        BUSY            := False;     // 复位忙状态                         // 重置所有状态标志                        xGateOn       := False;                        xGateOff      := False;                        xWrite         := False;                        xWriteNIO    := False;                        xRead          := False;                        xNoRead       := False;                        xCCError      := False;                        xReadError   := False;                        xTimer         := False;                        xLesen         := False;                    END_IF;            END_IF;      END_IF;                  ```#### 关键命令与响应解析| 步骤 | 命令(iCommand) | 发送内容(Send_Buffer)          | RFU响应                        | 处理逻辑                               ||------|------------------|--------------------------------|------------------------|------------------------------|| 1      | 1(GateOn)         | `[STX]sMN mTCgateon[ETX]`         | `[STX]sAN mTCgate on  1[ETX]` | 置位`xGateOn`,确认门开启      || 5      | 2(GateOff)       | `[STX]sMN mTCgateoff[ETX]`       | `[STX]sAN mTCgate off  1[ETX]`| 置位`xGateOff`,确认门关闭      || 7      | -                        | -                                             | `[STX]RSS...[ETX]`       | 置位`xRead`,解析UII/User数据|| 7      | -                        | -                                             | `[STX]NoRead[CR]`         | 置位`xNoRead`,无标签故障      |- **Gate控制**:`GateOn`/`GateOff`是SICK RFU的专用命令,用于控制“读取门”(只有门开启时,RFU才会扫描标签)。- **数据解析**:RFU返回`[STX]RSS...[ETX]`表示读取到标签数据,后续代码会将ASCII格式的UII/User数据转换为HEX格式,存入`ST_RFU_DATA.READ_TAG`。
  4.  标签写入流程(核心逻辑)
写入流程顺序:发送写命令→等待写入确认→GateOn→延时→GateOff→确认完成,代码结构与读取类似,核心差异是“发送写数据”。
代码片段(关键步骤):
// 写入触发条件:外部触发/HMI触发 + 读取完成 + 写入使能 + 未读取IF (((R_TRIG_Schreiben.Q OR R_TRIG_S_Schreiben.Q) AND FM_Lesen) OR xSchreiben) AND xFrgSchreiben AND NOT xLesen THEN               // 步骤0:初始化(准备写入数据)      IF iSchritt =  0   THEN             // ... 省略状态重置(同读取步骤0)...            BUSY            := True;            xSchreiben   := True;              iSchritt      :=  8;                         // HMI写入:从arrVisuText4(HMI输入)复制数据到arrTempText            IF R_TRIG_S_Schreiben.Q THEN                                    j :=  2;                  FOR i := StartAdd *2  TO iEndAdd *2  BY  1  DO                        arrTempText[j] := arrVisuText4[i+2];                        j := j+1;                  END_FOR;                  arrTempText[1]   := B#64;   // 字符串长度                  arrTempText[2]   := INT_TO_BYTE(Laenge *2);   // 数据长度(字节)            END_IF;             // 外部写入:从ST_RFU_DATA.Write_TAG(外部输入)复制数据            IF R_TRIG_Schreiben.Q THEN                                       j :=  2;                  FOR i := StartAdd *2  TO iEndAdd *2  BY  1  DO                        arrTempText[j] := ST_RFU_DATA.Write_TAG.DATA_USER;                          j := j+1;                  END_FOR;                  arrTempText[1]   := B#64;                  arrTempText[2]   := INT_TO_BYTE(Laenge *2);            END_IF;      END_IF;       // 步骤8:发送写入命令(TAwriteTagData)      IF iSchritt =  8  THEN            iCommand      :=  3;                 // 命令3=Write            iSchritt      :=  9;                 // 下一步:等待写入确认      END_IF;              // 步骤9:等待写入成功/失败确认      IF iSchritt =  9  THEN            IF xWrite   THEN                    // 写入成功                  iSchritt      :=  10;                             xWrite         := False;              ELSIF xWriteNIO THEN            // 写入失败                  iSchritt      :=  0;                             xWriteNIO    := False;              END_IF;      END_IF;                  //这段代码是 FB_Sick_RFU 功能块中写入流程后续的标签验证读取逻辑,属于状态机控制的一部分(iSchritt为步骤变量,10-16 为验证读取的特定步骤)。        //其核心作用是:在完成标签写入操作后,自动触发一次标签读取,验证写入的数据是否正确,形成 “写入→读取验证” 的闭环,确保数据写入可靠性。       // 状态机步骤控制:标签写入后的验证读取流程(确保写入数据可被正确读取)       // 核心逻辑:写入完成后自动执行"开读取门→等待→关读取门→验证数据"的闭环       // 步骤10:启动读取门(为读取标签做准备)      IF iSchritt =  10  THEN            iCommand :=  1;                     // 触发GateOn命令(对应CASE iCommand中的1:开启RFU读取门)                                                       // RFU收到该命令后,开始激活天线扫描标签            iSchritt :=  11;                    // 步骤跳转至11,等待读取门开启的确认信号      END_IF;       // 步骤11:等待读取门开启确认(确保RFU已进入就绪状态)      IF iSchritt =  11  THEN            IF xGateOn THEN                    // xGateOn为TRUE:RFU已返回GateOn确认响应(响应解析逻辑设置)                  iSchritt      :=  12;         // 读取门已开启,跳转至步骤12(启动读取前延时)                  xGateOn       := False;     // 复位确认标志(避免因响应残留导致重复触发)            END_IF;      END_IF;       // 步骤12:启动读取前延时(确保标签稳定进入读取范围)      IF iSchritt =  12  THEN            xTimer    := True;                 // 置位定时器启动标志            iCommand :=  4;                     // 触发Timer命令(对应CASE iCommand中的4:启动1秒延时)                                                       // 延时目的:生产线场景中,标签可能需要时间移动到RFU天线正下方            iSchritt :=  13;                    // 跳转至步骤13,等待延时结束      END_IF;       // 步骤13:等待延时结束(确保标签处于最佳读取位置)      IF iSchritt =  13  THEN            IF NOT xTimer THEN               // xTimer为FALSE:1秒延时已结束(由TON_Timer.Q触发复位)                  iSchritt      :=  14;         // 延时完成,跳转至步骤14(关闭读取门)            END_IF;      END_IF;       // 步骤14:关闭读取门(停止扫描,准备返回已读取数据)      IF iSchritt =  14  THEN            iCommand :=  2;                     // 触发GateOff命令(对应CASE iCommand中的2:关闭RFU读取门)                                                       // 关闭后RFU停止扫描新标签,开始处理已捕获的标签数据            iSchritt :=  16;                    // 跳转至步骤16,等待RFU返回读取结果      END_IF;       // 步骤16分支1:处理读取成功的情况(验证写入数据有效)      IF iSchritt =  16  THEN            IF xRead THEN                       // xRead为TRUE:RFU成功返回标签数据(UII+User区已解析)                  iSchritt      :=  0;           // 回归初始步骤(整个"写入→验证"流程结束)                  xRead          := False;     // 复位读取成功标志                  FM_Lesen      := True;      // 置位读取完成标志(通知HMI/外部模块:验证读取成功)                  FM_Schreiben:= True;      // 置位写入完成标志(通知外部:写入+验证全流程成功)                  BUSY            := False;     // 复位忙状态(允许新的读写操作触发)                  xSchreiben   := False;     // 复位写入触发标志(避免重复写入)            END_IF;      END_IF;       // 步骤16分支2:处理所有可能的读取结果(成功/失败均需流转)      IF iSchritt =  16  THEN             // 覆盖所有读取结果:成功(xRead)、无标签(xNoRead)、校验错(xCCError)、数据错(xReadError)            IF xRead OR xNoRead OR xCCError OR xReadError THEN                    iSchritt      :=  15;         // 跳转至步骤15(异常处理步骤,代码中未展示,推测逻辑:                                                       // 1. 若xNoRead/xCCError/xReadError:置位对应故障标志(如F_NoRead)                                                       // 2. 触发重试机制或上报报警                                                       // 3. 最终回归初始步骤iSchritt=0            END_IF;      END_IF;                     // 步骤15:写入完成,复位状态      IF iSchritt =  15  THEN            IF xGateOff THEN                    iSchritt      :=  0;                              // 记录故障                  F_NoRead      := xNoRead;                  F_CCError    := xCCError;                  F_ReadError := xReadError;                  xFM_Lesen    := xRead;                  FM_Lesen      := xRead;           // 读取完成(写入后需确认数据)                  FM_Schreiben:= xRead;           // 写入完成(TRUE=成功)                  BUSY            := False;                  xGateOn       := False;                  xGateOff      := False;                  xWrite         := False;                  xWriteNIO    := False;                  xRead          := False;                  xNoRead       := False;                  xCCError      := False;                  xReadError   := False;                  xTimer         := False;                  xSchreiben   := False;              END_IF;      END_IF;END_IF;            
5、SICK RFU命令生成
CASE  iCommand  OFiCommand`是命令选择变量(1=GateOn、2=GateOff、3=Write、4=Timer),通过`CASE`语句生成对应TCP发送命令,遵循SICK RFU的**ASCII通信协议**(命令需包含`[STX]`(0x02)起始符和`[ETX]`(0x03)结束符)。
### 1. 命令1:GateOn(开启RFU读取门)             #### 代码片段      CASE iCommand OF                         ```scl             // GateOn             1:   Command         :=  'sMN mTCgateon';      // Trigger on command → SICK RFU开门命令                  Send_Buffer[1]      := B#16#00;          // Overwrite string length → 覆盖字符串长度(用自定义长度)                  Send_Buffer[2]      := B#16#02;          // Add [STX] → 添加起始符(ASCII码0x02,通信协议要求)                  Send_Buffer[16]    := B#16#03;          // Add [ETX] → 添加结束符(ASCII码0x03)                  TCP_SEND.LEN         :=  16;                  // 发送数据长度(16字节:[STX]+命令+[ETX])                  xCreateCommand      := True;               // 命令生成完成标志(触发后续TCP发送)            ```             #### 解读            - **命令含义**:`sMN mTCgateon`是SICK RFU的标准命令,用于开启“读取门”(只有门开启时,RFU才会扫描标签)。            - **格式细节**:               - `Send_Buffer[1] =  0x00`:覆盖`Command`字符串默认的长度字节(PLC字符串前2字节为长度,此处用自定义长度);               - `Send_Buffer[2] =  0x02`:插入`[STX]`,告知RFU“命令开始”;               - `Send_Buffer[16] =  0x03`:插入`[ETX]`,告知RFU“命令结束”;               - 总长度16字节:`[STX]`(1)+`sMN mTCgateon`(13)+`[ETX]`(1)+ 填充(1)=16字节。            - **触发后续**:`xCreateCommand=True`触发下方`TCP_Send`执行发送。                          ### 2. 命令2:GateOff(关闭RFU读取门)             #### 代码片段            ```scl             // GateOff             2:   Command         :=  'sMN mTCgateoff';     // Trigger on command → SICK RFU关门命令                  Send_Buffer[1]      := B#16#00;          // Overwrite string length                  Send_Buffer[2]      := B#16#02;          // Add [STX]                  Send_Buffer[17]    := B#16#03;          // Add [ETX]                  TCP_SEND.LEN         :=  17;                  // 发送长度17字节(命令比GateOn多1个字符“f”)                  xCreateCommand      := True;            ```             #### 解读            - **核心差异**:命令`mTCgateoff`比`mTCgateon`多1个字符(“f”),因此`[ETX]`位置从16移到17,总长度变为17字节。            - **功能作用**:关闭读取门后,RFU停止扫描标签,准备返回已读取的标签数据(或“无标签”响应)。                          ### 3. 命令3:Write(写入数据到RFID标签)             #### 代码片段(核心复杂命令,分步骤解析)            ```scl             // Write             3:   Command :=  'sMN TAwriteTagData +64 ';     // Write tag command → SICK RFU写标签命令(+64是标签地址前缀)                  Start_Adr :=  1;  // Set Start adress → 发送缓冲区起始地址(从1开始)                  j:=16;                                // 步骤1:从TMP_Buffer复制基础参数(标签地址相关)                  FOR i:=  25  TO   88  DO                        Send_Buffer[Start_Adr+i] := TMP_Buffer[i-9];  // 复制标签地址参数到发送缓冲区                  END_FOR;                                // 步骤2:拼接写入配置参数(Bank、起始地址、长度、重试次数)                  Send_Buffer[Start_Adr+89]    := B#16#20;             // Add blank → 空格分隔                  Send_Buffer[Start_Adr+90]    := B#16#33;             // Add Bank = 3 → 写入区域:Bank3(用户数据区,SICK RFU固定)                  Send_Buffer[Start_Adr+91]    := B#16#20;             // Add blank                  Send_Buffer[Start_Adr+92]    := arrStartAdd[3];   // Add Pointer(起始地址,如0)→ 从输入变量StartAdd转换的字符串                  Send_Buffer[Start_Adr+93]    := arrStartAdd[4];                     Send_Buffer[Start_Adr+94]    := arrStartAdd[5];                     Send_Buffer[Start_Adr+95]    := arrStartAdd[6];                     Send_Buffer[Start_Adr+96]    := B#16#20;             // Add blank                  Send_Buffer[Start_Adr+97]    := arrLaenge[3];      // Add Wordcounter(写入长度,如32字)→ 从输入变量Laenge转换                  Send_Buffer[Start_Adr+98]    := arrLaenge[4];                        Send_Buffer[Start_Adr+99]    := arrLaenge[5];                        Send_Buffer[Start_Adr+100]   := arrLaenge[6];                        Send_Buffer[Start_Adr+101]   := B#16#20;             // Add blank                    Send_Buffer[Start_Adr+102]   := B#16#33;             // Add Retries(频率重试次数=3)                  Send_Buffer[Start_Adr+103]   := B#16#32;             // Add Retries(信道跳变重试次数=2)                  Send_Buffer[Start_Adr+104]   := B#16#20;             // Add blank                    Send_Buffer[Start_Adr+105]   := arrDataL[3];        // Add Datalength(数据长度,如128字节)→ Laenge*4                  Send_Buffer[Start_Adr+106]   := arrDataL[4];                          Send_Buffer[Start_Adr+107]   := arrDataL[5];                          Send_Buffer[Start_Adr+108]   := arrDataL[6];                                       // 步骤3:处理数据长度字符串的空格(避免格式错误)                  IF arrDataL[5] = BYTE#16#20 THEN   // 数据长度字符串第5位是空格(短长度,如“   32”)                        Send_Buffer[Start_Adr+107] := B#16#20;   // 填充空格                        Address :=109;   // 数据起始地址设为109                  ELSIF arrDataL[6] = BYTE#16#20 THEN   // 第6位是空格(中长度,如“ 128”)                        Send_Buffer[Start_Adr+108] := B#16#20;                        Address :=110;                  ELSE   // 无空格(长长度,如“1024”)                        Send_Buffer[Start_Adr+109]   := B#16#20;                        Address :=  111;                  END_IF;                                            // 步骤4:HEX→ASCII HEX转换(RFU仅接受ASCII格式的十六进制数据)                  StartAdresse :=  3;   // 待转换数据的起始地址(arrTempText的3号位置)                  EndAdresse := (Laenge *  2) +  2;   // 待转换数据的结束地址(长度×2:1字节=2个ASCII字符)                  FOR j:= StartAdresse TO EndAdresse DO                        Temp :=  BYTE_TO_INT(SHR(IN:=arrTempText[j],  N:=4));   // 取字节的高4位(如0x31→0x3)                        FOR i:=1  TO  2  DO   // 转换高4位→ASCII,再转换低4位→ASCII                              IF Temp >  9  THEN   // 高4位是A-F(10-15)→ ASCII码65-70(A-F)=10+55=65                                    Temp := Temp +  55;                              ELSE   // 高4位是0-9→ASCII码48-57(0-9)=0+48=48                                    Temp := Temp +  48;                              END_IF;                              Send_Buffer[Address] :=  INT_TO_BYTE(Temp);   // 存入发送缓冲区                              Address := Address+1;                              Temp      :=  BYTE_TO_INT(arrTempText[j] AND B#16#0F);   // 取字节的低4位(如0x31→0x1)                        END_FOR;                                      END_FOR;                                // 步骤5:添加通信协议头/尾,设置发送长度                  Send_Buffer[1]   := B#16#00;       // Overwrite string length                  Send_Buffer[2]   := B#16#02;       // Add [STX]                  Send_Buffer[Address] := B#16#03;      // Add [ETX]                       TCP_SEND.LEN      := Address +  1;              // 总发送长度(地址+1:包含[ETX])                  xCreateCommand   := True;            ```             #### 解读(分核心要点)            - **命令基础**:`sMN TAwriteTagData +64`是SICK RFU写标签的标准前缀,`+64`指定标签的基础地址段。            - **关键参数含义**:               - `Bank=3`:SICK RFU的标签存储分区(Bank3为**用户数据区**,可自定义写入数据;其他Bank为系统区,不可写);               - `Pointer`:写入起始地址(对应输入变量`StartAdd`,0-31,单位:字);               - `Wordcounter`:写入长度(对应输入变量`Laenge`,1-(32-StartAdd),单位:字);               - `Datalength`:数据总字节数(`Laenge×4`,因1字=4字节);               - `Retries=3/2`:发送失败时的重试策略(频率重试3次,信道跳变重试2次,提高写入成功率)。            - **数据格式转换(核心)**:               - RFU要求写入数据为**ASCII HEX格式**(如字节0x31需转为ASCII字符“3”和“1”);               - 转换逻辑:1字节拆为“高4位+低4位”,分别转为ASCII(0-948-57,A-F→65-70);               - 示例:字节`0x31`(十进制49)→ 高4位`0x3`(3→ASCII  51=“3”)、低4位`0x1`(1→ASCII  49=“1”)→ 最终发送“31”。            - **长度动态计算**:`Address`随数据长度动态递增,最终`TCP_SEND.LEN=Address+1`(包含`[ETX]`),确保命令格式正确。                          ### 4. 命令4:Timer(启动延时定时器)             #### 代码片段            ```scl             // Timer             4:   xTimer         := True;   // 启动延时标志                  iCommand      :=  0;        // 重置命令变量(避免重复执行)            END_CASE;             #### 解读            - **功能作用**:用于“GateOn后等待标签进入读取范围”(如生产线物料移动需要时间),下方`TON_Timer`会以1秒延时(`PT:=t#1s`)触发`xTimer=False`,表示延时结束。            - **与其他命令差异**:不生成TCP发送命令,仅控制内部定时器,是流程时序的“等待节点”。
6、TCP数据发送与状态处理(TCP_Send)
生成命令后,通过西门子标准FB `TCP_Send`将`Send_Buffer`中的命令发送给SICK RFU,并处理发送结果。
代码片段:
// 延时定时器(命令4触发,1秒延时)            TON_Timer(IN:=xTimer, PT:= t#1s);            IF TON_Timer.Q THEN                  xTimer := False;   // 延时结束,重置延时标志            END_IF;             // 命令生成完成后,触发TCP发送            IF xCreateCommand THEN                                xSendReq            := True;   // 发送请求置位                  iCommand            :=  0;        // 重置命令变量                  xCreateCommand   := False;  // 重置命令生成标志            END_IF;             // 调用TCP_Send功能块,发送命令到RFU            TCP_Send(                  REQ       := xSendReq,      // 发送请求(上升沿触发)                  ID         := TCON_PARAM.ID,   // 连接ID(与TCP_Connect一致)                  DATA      := SEND_Buffer);     // 发送缓冲区(存储生成的命令)                            Status_TRCV := TCP_Send.STATUS;   // 记录发送状态(用于调试)                          // 发送请求触发后,立即重置(避免重复发送)            IF xSendReq THEN                  xSendReq := False;            END_IF;                             // 处理发送结果(成功/失败)            IF TCP_Send.DONE OR TCP_Send.Error THEN                  F_TCPSend := TCP_Send.Error;   // 发送失败则置位发送故障标志            END_IF;             ```            ### 解读            - **发送触发逻辑**:`xCreateCommand=True`→`xSendReq=True`→`TCP_Send`执行发送,发送后`xSendReq=False`(避免因`xCreateCommand`持续为True导致重复发送)。            - **状态处理**:               - `TCP_Send.DONE=True`:发送成功,`F_TCPSend=False`(无故障);               - `TCP_Send.Error=True`:发送失败(如网络中断),`F_TCPSend=True`(置位发送故障,触发后续TCP重连);               - `Status_TRCV`:记录发送状态码(如0x0000=成功,0x8090=连接不存在),用于调试排查问题。            
  7、SICK RFU响应解析(TCP_Receive.NDR
RFU接收命令后,会返回响应数据(如“GateOn确认”“标签数据”“无标签”),通过`TCP_Receive`接收后,解析响应内容并更新对应状态标志(如`xGateOn`、`xRead`)。
代码片段(核心响应分类解析):
// 接收缓冲区有新数据(NDR=True)且接收未忙时,解析响应            IF (*BUSY AND*)NOT TCP_Receive.BUSY AND TCP_Receive.NDR THEN                           // 1. 响应1:GateOn确认(RFU已开启读取门)                  IF   DW_Buffer[1] = DW#16#0273414E AND     // '[STX]sAN'(sAN=命令确认前缀)                        DW_Buffer[2] = DW#16#206D5443 AND     //   ' mTC'                        DW_Buffer[3] = DW#16#67617465  AND     //   'gate'                        DW_Buffer[4] = DW#16#6F6E2031 AND     //   'on 1'(1=成功)                        Buffer[17]    = B#16#03                      //   '[ETX]'                          THEN                        xGateOn := True;   // 置位GateOn确认标志,触发下一步流程                                      // 2. 响应2:GateOff确认(RFU已关闭读取门)                  ELSIF DW_Buffer[1] = DW#16#0273414E AND  // '[STX]sAN'                           DW_Buffer[2] = DW#16#206D5443 AND  //   ' mTC'                           DW_Buffer[3] = DW#16#67617465  AND  //   'gate'                           DW_Buffer[4] = DW#16#6F666620 AND  //   'off '                           Buffer[17]    = B#16#31            AND  //   '1'(成功)                           Buffer[18]    = B#16#03                   //   '[ETX]'                           THEN                        xGateOff := True;   // 置位GateOff确认标志                                      // 3. 响应3:Write成功确认(数据已写入标签)                  ELSIF DW_Buffer[1] = DW#16#0273414e AND  // '[STX]sAN'                           DW_Buffer[2] = DW#16#20544177  AND  //   ' TAw'(TAwriteTagData前缀)                           DW_Buffer[3] = DW#16#72697465  AND  //   'rite'                           DW_Buffer[4] = DW#16#54616744  AND  //   'TagD'                           DW_Buffer[5] = DW#16#61746120  AND  //   'ata '                           Buffer[21]    = B#16#31                   //   '1'(成功)                           THEN                        xWrite := True;   // 置位写入成功标志                                      // 4. 响应4:Write失败确认(数据未写入)                  ELSIF DW_Buffer[1] = DW#16#0273414e AND  // '[STX]sAN'                           DW_Buffer[2] = DW#16#20544177  AND  //   ' TAw'                           DW_Buffer[3] = DW#16#72697465  AND  //   'rite'                           DW_Buffer[4] = DW#16#54616744  AND  //   'TagD'                           DW_Buffer[5] = DW#16#61746120  AND  //   'ata '                           Buffer[21]    = B#16#30                   //   '0'(失败)                           THEN                        xWriteNIO := True;   // 置位写入失败标志                                // 5. 响应5:Read成功(接收到标签数据)                  ELSIF DW_Buffer[1] = DW#16#02525353        // '[STX]RSS'(RSS=数据响应前缀)                           THEN                                      // 步骤1:解析UII数据(30字节,标签唯一标识)                        (*Convert ASCII HEX --> HEX , UII Area*)                          FOR j:=1  TO  30  BY  1  DO                              IF j =  1  THEN                                      Address :=  20;   // UII数据在Buffer中的起始地址(偏移20)                              END_IF;                               // 1个UII字节对应Buffer中2个ASCII字符(ASCII HEX→HEX)                              FOR i:=1  TO  2  BY  1  DO                                    Temp :=BYTE_TO_INT(Buffer[Address])-48;   // ASCII→数值(如“3”→51-48=3)                                    IF Temp >  9  THEN                                          Temp := Temp-7;   // A-F→ASCII 65-70→数值10-15(65-48-7=10)                                    END_IF;                                     // 拼接高4位+低4位→1字节(如“3”→3<<4=48,“1”→1→48+1=49=0x31)                                    ST_RFU_DATA.READ_TAG.DATA_UII[j] := SHL(IN:=ST_RFU_DATA.READ_TAG.DATA_UII[j], N:=4) OR INT_TO_BYTE(Temp);                                    Address      := Address +  1;                              END_FOR;                           END_FOR;                                      // 步骤2:解析User数据(64字节,用户自定义数据)                        (*Convert ASCII HEX --> HEX , USER Area*)                          FOR j:=1  TO  64  BY  1  DO                              IF j =  1  THEN                                      Address :=  86;   // User数据在Buffer中的起始地址(偏移86)                              END_IF;                               // 转换逻辑同UII(ASCII HEX→HEX)                              FOR i:=1  TO  2  BY  1  DO                                    Temp :=BYTE_TO_INT(Buffer[Address])-48;                                    IF Temp >  9  THEN                                          Temp := Temp-7;                                    END_IF;                                    ST_RFU_DATA.READ_TAG.DATA_USER[j] := SHL(IN:=ST_RFU_DATA.READ_TAG.DATA_USER[j], N:=4) OR INT_TO_BYTE(Temp);                                    Address      := Address +  1;                              END_FOR;                           END_FOR;                        TMP_BUFFER := BUFFER;   // 备份接收数据(用于后续调试)                        xRead := True;   // 置位读取成功标志                                // 6. 响应6:No Read(未检测到标签)                  ELSIF DW_Buffer[1] = DW#16#024E6F52 AND  // '[STX]NoR'(NoRead前缀)                           DW_Buffer[2] = DW#16#6561640D        // 'ead[CR]'([CR]=回车符,结束标志)                           THEN                        xNoRead := True;   // 置位无标签标志                        iF_NoRead := iF_NoRead +1;        // 测试用:统计无标签次数                                // 7. 响应7:CCError(通信校验错误,标签与RFU通信异常)                  ELSIF DW_Buffer[1] = DW#16#02434345  AND  // '[STX]CCE'(CCError前缀)                           DW_Buffer[2] = DW#16#72726F72        // 'rror'                           THEN                        xCCError := True;   // 置位校验错误标志                        iF_CCError := iF_CCError +1;   // 测试用:统计校验错误次数                                // 8. 响应8:ReadError(读取数据格式错误,无法解析)                  ELSIF DW_Buffer[1] = DW#16#02526561  AND  // '[STX]Rea'(ReadError前缀)                           DW_Buffer[2] = DW#16#64457272        // 'dErr'                           THEN                        xReadError := True;   // 置位读取错误标志                        iF_ReadError := iF_ReadError +1;   // 测试用:统计读取错误次数                   // ELSE: 未定义响应(可扩展F_Error=True,此处预留)                  END_IF;             // 测试用:统计接收命令次数(超过4次则计数,用于调试流程异常)            iZaehler := iZaehler +  1;                  END_IF;             // 测试用:接收命令超过4次,置位异常计数(排查是否有重复响应)            IF iZaehler >=  4  THEN                              iF_3Befehle := iF_3Befehle +  1;                  iZaehler :=  0;            END_IF;             ```            ### 解读(核心响应解析逻辑)            - **响应前缀识别**:RFU响应以固定前缀区分类型(如`[STX]sAN`=命令确认、`[STX]RSS`=数据响应、`[STX]NoR`=无标签),通过`DW_Buffer`(`Buffer`的DWORD视图)快速匹配前缀(4字节比对,效率高于逐字节判断)。            - **数据解析(Read响应核心)**:               - UII数据:从`Buffer[20]`开始,30字节(标签唯一标识),ASCII HEX→HEX转换(逻辑同写入,反向操作);               - User数据:从`Buffer[86]`开始,64字节(用户自定义数据),转换逻辑同UII;               - 结果存储:解析后的数据存入`ST_RFU_DATA.READ_TAG`(后续输出到`Data_UII`供外部使用)。            - **故障响应处理**:               - `xNoRead`:无标签(如物料未到位);               - `xCCError`:标签与RFU通信校验失败(如标签损坏、距离过远);               - `xReadError`:数据格式错误(如RFU返回异常数据);               - 以上响应均会触发后续故障标志(如`F_NoRead=True`),最终汇总到`Stoe`(汇总故障)。            - **测试用代码**:`iZaehler`/`iF_3Befehle`/`iF_NoRead`等变量用于调试(统计响应次数、故障次数),现场运行时可保留或注释,不影响核心功能。            
8、故障检测与复位(保障系统稳定性)
涵盖**配置错误检测、故障复位、超时处理、读取重试**四大功能,确保在异常场景下系统可恢复、故障可定位。
代码片段:
### 1. 配置错误检测(F_Konfig)             #### 代码片段            ```scl             // 检测写入起始地址/长度是否合法(3.9.05版本新增,避免越界写入)             IF  ((StartAdd <  0)  OR  (StartAdd >  31)  OR  (Laenge <  1)  OR  (Laenge >  32- StartAdd)) AND ST_BA.En_Stoe THEN                  F_Konfig :=  TRUE;   // 配置错误标志置位(如StartAdd=32、Laenge=33均非法)            ELSE                  F_Konfig :=  FALSE;            END_IF;            ```             #### 解读            - **合法范围**:               - `StartAdd`:0-31(标签用户区最大地址31,字单位);               - `Laenge`:1-(32-StartAdd)(避免写入地址超过31,如StartAdd=30时Laenge最大2);            - **触发条件**:配置非法且设备使能(`ST_BA.En_Stoe=True`),`F_Konfig=True`会汇总到`Stoe`,触发报警。                          ### 2. 故障复位(清空故障与状态)             #### 代码片段            ```scl             // 故障复位触发条件:报警确认/设备未使能/外部复位             IF  ((ST_BA.Quit OR NOT ST_BA.En_Stoe) AND Stoe AND NOT xoProz AND NOT ST_BA.K92_PoT ) OR xReset THEN                   // 清空所有故障标志                  F_TimeOutL         := False;                    F_TimeOutS         := False;                    F_NoRead            := False;                  F_CCError          := False;                  F_ReadError       := False;                  F_Error             := False;                  F_Konfig            := False;                   // 重置流程状态                  iCommand            :=  0;                    iSchritt            :=  0;                    BUSY                  := False;                  xLesen               := False;                  xSchreiben         := False;            END_IF;             // 外部复位(如HMI复位、系统重启):额外清空缓冲区和可视化数据            IF xReset THEN                   // 清空TCP接收缓冲区                  F_TCPConnect      := False;                  F_TCPReceive      := False;                  F_TCPSend          := False;                  FOR i :=  1  TO  256  BY  1  DO                        Buffer :=      B#16#0;                    END_FOR;                   // 清空标签数据缓冲区                  FOR i :=  1  TO  256  BY  1  DO                        Buffer :=      B#16#00;                    END_FOR;                  FOR i:=1  TO  30  BY  1  DO                        ST_RFU_DATA.READ_TAG.DATA_UII := B#0;                  END_FOR;                     FOR i:=1  TO  64  BY  1  DO                        ST_RFU_DATA.READ_TAG.DATA_USER := B#0;                  END_FOR;                     // 清空可视化文本(HMI显示)                  arrVisuText1[1] :=    B#64;                     // UII读取区域                  arrVisuText1[2] :=    B#0;                    arrVisuText3[1] :=    B#64;                     // UII写入区域                  arrVisuText3[2] :=    B#0;                    FOR i :=  1  TO  30  BY  1  DO                        arrVisuText1[i+2] :=      B#16#0;                          arrVisuText3[i+2] :=      B#16#0;                                 END_FOR;                  arrVisuText2[1] :=    B#64;                     // User读取区域                  arrVisuText2[2] :=    B#0;                    arrVisuText4[1] :=    B#64;                     // User写入区域                  arrVisuText4[2] :=    B#0;                    FOR i :=  1  TO  64  BY  1  DO                        arrVisuText2[i+2] :=      B#16#0;                        arrVisuText4[i+2] :=      B#16#0;                  END_FOR;                   // 重置读写完成标志                  FM_Lesen            := False;                  FM_Schreiben      := False;            END_IF;            ```             #### 解读            - **复位分级**:               - 普通复位(`ST_BA.Quit`=报警确认、`NOT ST_BA.En_Stoe`=设备未使能):仅清空故障标志和流程状态,保留缓冲区数据;               - 外部复位(`xReset`=HMI复位/系统重启):彻底清空故障标志、缓冲区、可视化数据,恢复到初始状态,适用于“严重故障后重新启动”。            - **复位保护**:`NOT xoProz`(非无流程模式)、`NOT ST_BA.K92_PoT`(非工艺暂停状态)确保复位仅在正常运行模式下执行,避免流程混乱。                          ### 3. 超时处理(TON_Timeout)             #### 代码片段            ```scl             // 读取超时:超时定时器触发且处于读取流程后期(iSchritt>5,避免刚启动就误判)            IF TON_Timeout.Q AND xLesen AND iSchritt >  5  THEN                  BUSY                  :=  FALSE;   // 重置忙状态                  F_TimeOutL         := True;     // 置位读取超时故障                  iF_TimeOut := iF_TimeOut +1;   // 测试用:统计超时次数             // 写入超时:超时定时器触发且处于写入流程            ELSIF TON_Timeout.Q AND xSchreiben THEN                  BUSY                  :=  FALSE;                  F_TimeOutS         := True;     // 置位写入超时故障            END_IF;             // 超时定时器:仅在忙状态且无超时故障时运行(PT=ZUeGes,输入变量,默认10s)             TON_Timeout(IN:=BUSY AND NOT F_TimeOutL AND NOT F_TimeOutS,  PT:=ZUeGes);              ```             #### 解读            - **超时触发条件**:               - 读取超时:`xLesen=True`(正在读取)、`iSchritt>5`(已发送GateOff,等待响应)、`TON_Timeout.Q=True`(超时时间到);               - 写入超时:`xSchreiben=True`(正在写入)、`TON_Timeout.Q=True`;            - **超时时间**:由输入变量`ZUeGes`配置(默认10s),可根据现场通信速度调整(如网络差时设为20s);            - **故障处理**:超时后`BUSY=False`(允许重新触发)、`F_TimeOutL/S=True`(汇总到`Stoe`),避免“无限等待”导致流程卡死。                          ### 4. 读取重试(自动恢复机制)             #### 代码片段            ```scl             // 读取重试定时器:读取故障时启动(500ms延时,避免频繁重试)             TON_Timer1(IN:=(F_TimeOutL OR F_NoRead OR F_CCError OR F_ReadError) AND NOT xWiederholen AND xLesenExt AND Cfg.X1, PT:= t#500ms);            IF TON_Timer1.Q THEN                   // 清空故障标志                  F_TimeOutL         := False;                    F_NoRead            := False;                  F_CCError          := False;                  F_ReadError       := False;                   // 重置流程,重新触发读取                  iCommand            :=  0;                    iSchritt            :=  0;                    BUSY                  := False;                  xLesen               := True;   // 重新触发读取流程                  xWiederholen      := True;   // 置位重试标志(避免重复触发)                  iF_Wiederh         := iF_Wiederh +1;   // 测试用:统计重试次数            END_IF;            ```             #### 解读            - **重试触发条件**:               - 故障类型:读取超时(`F_TimeOutL`)、无标签(`F_NoRead`)、校验错误(`F_CCError`)、读取错误(`F_ReadError`);               - 使能条件:`xLesenExt=True`(外部读取触发)、`Cfg.X1=True`(配置允许重试,输入变量`_Cfg`的位1);               - 防重复:`NOT xWiederholen`(避免单次故障多次重试)。            - **重试逻辑**:500ms延时后,清空故障标志、重置流程、`xLesen=True`重新触发读取,提高读取成功率(如临时网络波动、标签位置偏移场景)。                          ### 5. 汇总故障与连锁故障(Stoe/VkStoe_Out)             #### 代码片段            ```scl             // 汇总故障:所有故障标志逻辑或(任一故障则Stoe=True)            Stoe := F_TCPConnect                    OR F_TCPReceive                      OR F_TCPSend                    OR F_TimeOutL                      OR F_TimeOutS                      OR F_NoRead                    OR F_CCError                    OR F_ReadError                    OR F_Error                    OR F_Konfig;             // 连锁故障:本模块故障 + 外部连锁故障(传递给下游设备,如生产线停机)            VkStoe_Out:= VkStoe_In OR Stoe;            ```             #### 解读            - **汇总故障(Stoe)**:是功能块的“故障总开关”,`Stoe=True`时会:               - 禁止新的读写触发(`xFrgLesen/xFrgSchreiben=False`);               - 触发HMI报警显示;               - 传递给`VkStoe_Out`;            - **连锁故障(VkStoe_Out)**:将“本模块故障”与“上游设备故障(VkStoe_In)”结合,传递给下游设备(如生产线PLC),实现“一处故障,全线暂停”的安全逻辑,避免物料损坏或数据丢失。            
9、核心数据输出(Data_UII)
将解析后的标签UII数据输出到功能块外部,供其他模块(如物料追溯系统)使用。
代码片段:
(**************************************************************************)            (******************** Array Data_UII schreiben ****************************)            (**************************************************************************)            FOR i:=1  TO  30  BY  1  DO                  Data_UII := ST_RFU_DATA.READ_TAG.DATA_UII;   // 复制UII数据到输出变量            END_FOR;             ```            #### 解读            - **数据来源**:`ST_RFU_DATA.READ_TAG.DATA_UII`(解析RFU响应得到的标签UII,30字节);            - **输出作用**:`Data_UII`是功能块的核心数据输出,外部系统可通过该变量获取标签唯一标识(如汽车VIN码、物料批次号),实现全流程追溯。                         ## 六、可视化数据准备(HMI交互)            将设备状态、标签数据、故障信息转换为HMI可显示的格式(DWORD/STRING),实现“人机交互”与状态监控。            ### 1. 设备信息显示(IP地址、端口)            #### 代码片段            ```scl             // IP地址转换:VerbID.IP[1..4](如[192,168,0,100])→ DWORD(0xC0A80064),HMI可反向解析为IP            dwVisuWerte1.B0 := INT_TO_BYTE(VerbID.IP[4]);   // IP第4段(100→0x64)            dwVisuWerte1.B1 := INT_TO_BYTE(VerbID.IP[3]);   // IP第3段(0→0x00)            dwVisuWerte1.B2 := INT_TO_BYTE(VerbID.IP[2]);   // IP第2段(168→0xA8)            dwVisuWerte1.B3 := INT_TO_BYTE(VerbID.IP[1]);   // IP第1段(192→0xC0)             // 本地端口显示:存入dwVisuWerte2的低字(如2000→0x07D0)            dwVisuWerte2.W0 := VerbID.lokalPort;             ```            #### 解读            - **IP转换逻辑**:IPv4地址的4个段(如192.168.0.100)对应DWORD的4个字节(B3.B2.B1.B0=0xC0.0xA8.0x00.0x64),HMI通过“DWORD转IP”控件即可显示为“192.168.0.100”;            - **端口显示**:本地端口(如2000)直接存入`dwVisuWerte2.W0`,HMI可直接显示十进制数值。                         ### 2. 标签数据与故障文本显示(strVisuText1~5)            #### 代码片段            ```scl             // 读取到数据时,显示数据质量信息(strVisuText5)            IF (DW_Buffer[1] = DW#16#02525353) THEN  // [STX]RSS(读取到数据)                  arrVisuText5[1] := B#64;   // 字符串长度(64字节)                  arrVisuText5[2] := B#4;     // 实际数据长度(4字节质量信息)                  arrVisuText5[3] := Buffer[7];   // 质量信息1(如信号强度)                  arrVisuText5[4] := Buffer[8];   // 质量信息2(如校验结果)                  arrVisuText5[5] := Buffer[9];   // 质量信息3(如读取次数)                  arrVisuText5[6] := Buffer[10];  // 质量信息4(如标签状态)            END_IF;             // 无标签故障时,HMI显示“No Read”            IF F_NoRead THEN   // [STX]NoRead[CR]                  strVisuText1 :=  'No Read';   // UII读取区域显示                  strVisuText2 :=  'No Read';   // User读取区域显示                  strVisuText3 :=  ' ';            // UII写入区域清空                  strVisuText4 :=  ' ';            // User写入区域清空            END_IF;             // CCError故障时,HMI显示“CCError >=2”            IF F_CCError THEN   // [STX]CCError                  strVisuText1 :=  'CCError >=2';                  strVisuText2 :=  'CCError >=2';                  strVisuText3 :=  ' ';                  strVisuText4 :=  ' ';            END_IF;             // ReadError故障时,HMI显示“Read Error”            IF F_ReadError THEN   // [STX]ReaError                  strVisuText1 :=  'Read Error';                  strVisuText2 :=  'Read Error';                  strVisuText3 :=  ' ';                  strVisuText4 :=  ' ';            END_IF;             // 读取完成后,更新HMI显示的UII/User数据(处理NULL字符)            IF R_TRIG_FM_Lesen.Q THEN                   // UII读取区域显示(30字节)                  arrVisuText1[1] :=    B#64;                                       arrVisuText1[2] :=    B#64;   // 数据长度64字节                  FOR i :=  1  TO  30  BY  1  DO                        arrVisuText1[i+2] :=      ST_RFU_DATA.READ_TAG.DATA_UII;                  END_FOR;                   // User读取区域显示(64字节,NULL字符替换为空格)                  arrVisuText2[1] :=    B#64;                                       arrVisuText2[2] :=    B#64;                     FOR i :=  1  TO  64  BY  1  DO                         // 避免HMI显示乱码:将NULL(0x00)替换为空格(0x20)                        IF ST_RFU_DATA.READ_TAG.DATA_USER = Byte#16#00  THEN                              arrVisuText2[i+2] :=      Byte#16#20;                        ELSE                              arrVisuText2[i+2] :=      ST_RFU_DATA.READ_TAG.DATA_USER;                          END_IF;                                END_FOR;                   // UII/User写入区域显示(同读取区域,方便用户确认)                  IF xFM_Lesen THEN                        arrVisuText3[1] :=    B#64;                                       arrVisuText3[2] :=    B#64;                           FOR i :=  1  TO  30  BY  1  DO                              arrVisuText3[i+2] :=      ST_RFU_DATA.READ_TAG.DATA_UII;                          END_FOR;                        arrVisuText4[1] :=    B#64;                                       arrVisuText4[2] :=    B#64;                           FOR i :=  1  TO  64  BY  1  DO                              IF ST_RFU_DATA.READ_TAG.DATA_USER = Byte#16#00  THEN                                    arrVisuText4[i+2] :=      Byte#16#20;                              ELSE                                    arrVisuText4[i+2] :=      ST_RFU_DATA.READ_TAG.DATA_USER;                                END_IF;                        END_FOR;                  xFM_Lesen := False;                  END_IF;            END_IF;             // 无读写操作时,清空HMI显示            IF NOT FM_Lesen AND NOT xLesen AND NOT xSchreiben THEN                  arrVisuText1[1] :=    B#64;                                       arrVisuText1[2] :=    B#0;   // 数据长度0(空)                  FOR i :=  1  TO  30  BY  1  DO                        arrVisuText1[i+2] :=      B#16#0;                    END_FOR;                                     arrVisuText2[1] :=    B#64;                                       arrVisuText2[2] :=    B#0;                    FOR i :=  1  TO  64  BY  1  DO                        arrVisuText2[i+2] :=      B#16#0;                  END_FOR;                  arrVisuText3[1] :=    B#64;                                       arrVisuText3[2] :=    B#0;                    FOR i :=  1  TO  30  BY  1  DO                        arrVisuText3[i+2] :=      B#16#0;                    END_FOR;                  arrVisuText4[1] :=    B#64;                                       arrVisuText4[2] :=    B#0;                    FOR i :=  1  TO  64  BY  1  DO                        arrVisuText4[i+2] :=      B#16#0;                  END_FOR;            END_IF;             ```            #### 解读            - **文本格式**:HMI显示的字符串遵循“前2字节为长度”的PLC字符串格式(如`arrVisuText1[1]=64`表示字符串最大长度64字节,`arrVisuText1[2]=64`表示实际数据长度64字节);            - **NULL字符处理**:标签数据中的`0x00`(NULL)会导致HMI显示乱码,因此替换为`0x20`(空格),确保显示正常;            - **故障文本**:故障时`strVisuText1~2`显示故障原因(如“No Read”“CCError >=2”),方便操作人员快速定位问题;            - **读写同步显示**:读取完成后,`arrVisuText3~4`(写入区域)同步显示读取数据,方便用户确认“写入数据是否与读取一致”。                         ### 3. 状态指示灯控制(dwVisuWerte4/5)            #### 代码片段            ```scl             // dwVisuWerte4:HMI指示灯状态(位映射,1位对应1个指示灯)            dwVisuWerte4.X0 := xLesen AND NOT FM_Lesen AND NOT Stoe;      // 读取中(绿灯闪烁)            dwVisuWerte4.X1 := FM_Lesen;                                                // 读取完成(绿灯常亮)            dwVisuWerte4.X2 := xFrgLesen;                                               // 读取使能(绿灯常亮)            dwVisuWerte4.X3 := xSchreiben AND NOT FM_Schreiben AND NOT Stoe;  // 写入中(绿灯闪烁)            dwVisuWerte4.X4 := FM_Schreiben;                                          // 写入完成(绿灯常亮)            dwVisuWerte4.X5 := xFrgSchreiben AND FM_Lesen;                     // 写入使能(绿灯常亮)            dwVisuWerte4.X6 := xoProz;                                                   // 无流程模式(黄灯常亮)            dwVisuWerte4.X7 := Frg_oProz;                                               // 无流程允许(绿灯常亮)            dwVisuWerte4.X8 := False;                                                     // K100功能(未使用,灯灭)            dwVisuWerte4.X9 := ST_BA.K100K_LSP;                                      // K100使能(绿灯常亮)            dwVisuWerte4.X10 := F_TimeOutL                                             // 读取故障(红灯常亮)                                      OR ((F_NoRead OR F_CCError OR F_ReadError OR F_Error)AND xLesen);            dwVisuWerte4.X11 := F_TimeOutS                                             // 写入故障(红灯常亮)                                      OR ((F_NoRead OR F_CCError OR F_ReadError OR F_Error)AND xSchreiben);            dwVisuWerte4.X12 := xReset;                                                  // 复位中(绿灯常亮)            dwVisuWerte4.X13 := ST_BA.SWE7;                                            // 复位允许(绿灯常亮)             // dwVisuWerte4的字节视图:步骤状态显示(dwVisuWerteSB4是dwVisuWerte4的BYTE视图)            dwVisuWerteSB4.B2 := INT_TO_BYTE(iSchritt);                          // 显示当前流程步骤(如1=GateOn,5=GateOff)             // dwVisuWerte5:写入地址/长度信息(HMI显示)            dwVisuWerte5.B0    := INT_TO_BYTE(StartAdd *2);                     // 起始地址(字节单位,方便HMI显示)            dwVisuWerte5.B1    := INT_TO_BYTE(Laenge *2);                        // 长度(字节单位)            dwVisuWerte5.B2    := INT_TO_BYTE(iEndAdd *2);                       // 结束地址(字节单位)             // HMI报警颜色控制(故障=红色,警告=黄色,维护=蓝色,正常=无色)            IF xStoe THEN                                                                          dwVisuWerteSB4.B3 := Byte#3;                            (* Rot → 故障(红色)*)            ELSIF xWARN THEN                  dwVisuWerteSB4.B3 := Byte#6;                            (* Gelb → 警告(黄色)*)            ELSIF xWart THEN                  dwVisuWerteSB4.B3 := Byte#2;                            (* Blau → 维护(蓝色)*)            ELSE                  dwVisuWerteSB4.B3 := Byte#0;                            (* 无色 → 正常 *)            END_IF;                   ```            #### 解读            - **指示灯位映射**:`dwVisuWerte4`的每一位对应HMI的一个指示灯,通过“逻辑与/或”判断状态(如`X0=读取中`、`X1=读取完成`),HMI可根据位状态控制灯的“亮/灭/闪烁”;            - **颜色控制**:`dwVisuWerteSB4.B3`定义报警颜色(3=红色、6=黄色、2=蓝色),HMI根据该字节值显示对应颜色,实现“视觉化故障分级”;            - **地址信息**:`dwVisuWerte5`将`StartAdd`/`Laenge`/`iEndAdd`转换为字节单位(×2),方便HMI以“字节”为单位显示(符合用户习惯)。            
10、系统报警集成(MeldSend)
将功能块内部故障转换为系统级报警,通过`MeldSend`函数块上报到工厂报警系统,实现“故障集中监控”。
代码片段:
(****************************************************************************************)            (*******************Anfang Signalaufbereitung Meldesystem *******************************)            (***********************AUFRUF am Ende im SCL-BAUSTEINS**********************************)            // 配置报警指针(指向MSYS报警数据、MSYS.Flanken边沿数据、ST_Meld报警缓冲区)            TempPointerMsys := Msys;            TempPointerFlanken := Msys.Flanken;            TempPointerMeldpuffer := ST_Meld;            // 调整地址指针:将数据块(DB)地址转换为背景数据块(DI)地址(避免地址冲突)            pMeldFeld.BZ := pMeldFeld.BZ OR 16#1000000; // 0x1000000是DB→DI的地址偏移            pMeldAbb.BZ   := pMeldAbb.BZ   OR 16#1000000;            // 配置报警参数(MeldSend函数块要求)            pMeldFeld.TYP := 1;// Typ:=1 → 报警数据类型为BOOL(1位对应1个报警)            pMeldFeld.ANZ := 16;// 报警数量:16个BOOL(需是8的倍数)            pMeldAbb.TYP := 2;// Typ:=2 → 边沿数据类型为BYTE(1字节对应8个边沿)            pMeldAbb.ANZ := 2;// 边沿数据数量:2个BYTE(对应16个报警的边沿)            // 映射故障到MSYS.xF_1~xF_16(16个报警位,1位对应1个故障/警告)            MSYS.xF_1    := F_TCPConnect;                        // STE/TCP连接故障            MSYS.xF_2    := F_TCPReceive;                        // STE/TCP接收故障            MSYS.xF_3    := F_TCPSend;                            // STE/TCP发送故障            MSYS.xF_4    := F_TimeOutL;                           // STE/读取超时故障            MSYS.xF_5    := F_TimeOutS;                           // STE/写入超时故障            MSYS.xF_6    := F_NoRead;                              // STE/无标签故障            MSYS.xF_7    := F_CCError;                            // STE/通信校验错误            MSYS.xF_8    := F_Error;                               // STE/数据接收错误            MSYS.xF_9    := F_ReadError;                         // STE/读取数据错误            MSYS.xF_10   := xWiederholen;                        // MT0/读取重试(警告)            MSYS.xF_11   := xoProz;                                 // MT0/无流程模式(警告)            MSYS.xF_12   := F_Konfig;                              // STE/配置错误(起始地址/长度非法)            MSYS.xF_13   := False;                                  // 未使用(预留)            MSYS.xF_14   := False;                                  // 未使用(预留)            MSYS.xF_15   := False;                                  // 未使用(预留)            MSYS.xF_16   := False;                                  // 未使用(预留)            // 调用MeldSend函数块,上报报警到系统            MeldSend(AufrufNr :=   1                               // 调用编号(唯一标识本功能块的报警)                          ,Anz_Meld :=   16                              // 报警数量(16个)                          ,pMeldFeld :=   pMeldFeld.BZ             // 报警数据指针(指向MSYS.xF_1~xF_16)                          ,pMeldAbb :=   pMeldAbb.BZ               // 边沿数据指针(指向MSYS.Flanken)                          ,MeldDB :=   WORD_TO_INT(pMeldDBNR.DBNR) // 报警数据块编号(存储报警信息的DB)                          ,AenderungsID :=   AenderungsID         // 版本标识(用于追溯报警数据版本)                          ,Integritaet :=   Integritaet            // 数据完整性标志(确保报警数据未篡改)                          ,Neustart :=   Neustart                     // 系统重启标志(重启后清空报警)                          ); // VOID(无返回值)            // 报警分类:故障(Stoe)、警告(Warn)、维护(Wart),更新到全局可视化状态            // 1. 故障(Stoe):触发红色报警            xStoe := Msys.xF_1                           OR Msys.xF_2                           OR Msys.xF_3                           OR Msys.xF_4                           OR Msys.xF_5                           OR Msys.xF_6                           OR Msys.xF_7                           OR Msys.xF_8                           OR Msys.xF_9                             OR Msys.xF_12                          OR Msys.xF_13                          OR Msys.xF_14                          OR Msys.xF_15                          OR Msys.xF_16;            DB_ARG.VisuSS.Station_Stoer:= DB_ARG.VisuSS.Station_Stoer OR xStoe;   // 全局故障状态            // 2. 警告(Warn):触发黄色报警(非故障,仅提示)            xWARN := Msys.xF_10                     OR Msys.xF_11;            DB_ARG.VisuSS.Station_Warn := DB_ARG.VisuSS.Station_Warn OR xWARN;   // 全局警告状态            // 3. 维护(Wart):触发蓝色报警(预留,如定期维护提醒)            xWART := FALSE;            DB_ARG.VisuSS.Station_Wart := DB_ARG.VisuSS.Station_Wart OR xWART;   // 全局维护状态                                                                 (****************************************************************************************)            (*************Ende Signalaufbereitung fuer das Meldesystem  *******************************)            (****************************************************************************************)            ```            ### 解读(核心报警逻辑)            -  **报警数据映射**:`MSYS.xF_1~xF_16`是“报警信号枢纽”,将功能块内部的12个故障/警告(如`F_TCPConnect`→`xF_1`、`xoProz`→`xF_11`)映射到16个BOOL位,预留4个位用于后续扩展;            -  **指针地址调整**:`pMeldFeld.BZ OR 0x1000000`将数据块(DB)地址转换为背景数据块(DI)地址,避免与其他模块的DB地址冲突(西门子PLC中DI是独立的背景数据区);            -  **MeldSend函数块作用**               - 是项目自定义的系统级报警FB,负责将`MSYS`中的报警数据写入`ST_Meld`(报警缓冲区);               - 支持报警编号(`AufrufNr=1`)、数据完整性校验(`Integritaet`)、系统重启清空(`Neustart`),确保报警数据可靠;            -  **报警分类与全局同步**               - 故障(`xStoe`):影响功能执行的严重异常(如TCP连接故障、读取错误),触发红色报警,更新`DB_ARG.VisuSS.Station_Stoer`(全局故障状态);               - 警告(`xWARN`):不影响功能但需关注的提示(如读取重试、无流程模式),触发黄色报警,更新`DB_ARG.VisuSS.Station_Warn`(全局警告状态);               - 维护(`xWART`):预留用于定期维护提醒(如RFU设备清洁、天线校准),触发蓝色报警;            -  **系统集成价值**:通过`MeldSend`将分散的故障信号集中上报,工厂操作员可在中央监控系统查看所有设备的报警状态,实现“远程监控、快速排查”。            
、整体逻辑闭环总结
本次解读的代码是FB_Sick_RFU的**执行核心**,与前期的“变量声明、TCP连接”共同构成完整的RFID通信控制逻辑,其闭环流程如下:

1.**配置触发**:外部输入`Lesen`/`Schreiben`触发读写,`VerbID`配置TCP参数;

2.**命令生成**:`iCommand`选择命令类型(GateOn/GateOff/Write/Timer),生成符合SICK RFU协议的TCP命令;

3.**TCP发送**:`TCP_Send`发送命令,处理发送结果(`F_TCPSend`);

4.**响应解析**:`TCP_Receive.NDR`触发响应解析,更新`xGateOn`/`xRead`/`xNoRead`等状态;

5.**故障处理**:检测配置错误、超时、通信故障,触发重试或复位,汇总到`Stoe`;

6.**数据输出**:解析的UII数据通过`Data_UII`输出,供外部系统使用;

7.**可视化与报警**:HMI显示状态/数据/故障,`MeldSend`上报系统报警,实现人机交互与集中监控。
  该逻辑覆盖了“从触发到反馈”的全流程,兼顾了**功能性(读写标签)、可靠性(重试/复位)、可维护性(报警/可视化)**  ,是工业RFID应用的典型实现方案。
     
END

加入知识星球智能制造与自动化,加入会员可下载此公众号发布文章中的相关资料(行业报告、MES、数字化技术方案、自动化教程、自动化行业标准化资料VASS\SICAR\戴姆勒等、C#上位机开发、node-red开发、人工智能教程等)。
今天的文章,如果你感觉有价值,请记得一键三连:点赞加关注,留言,转发朋友圈,分享收藏,点击在看之后,一定记着加我个人微信:ZIDHXB。
往期精彩回顾

技术交流
资源获取
趋热纳凉,尽享美好时
     

免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?获取邀请码

x
您需要登录后才可以回帖 登录 | 获取邀请码

本版积分规则

上一主题上一主题         下一主题下一主题
QQ手机版小黑屋粤ICP备17165530号

Copyright 2010-2015. All rights reserved. 

微信公众号二维码 抖音二维码 百家号二维码 今日头条二维码哔哩哔哩二维码