大众VASS标准：FB_Pruefziffer（FB170）校验数据功能块深度解读

前几天我们对大众VASS标准：FB_Sick_RFU(FB520_RFID数据读取)功能块进行了深度解读，读出来的数据需要使用FB_Pruefziffer（FB170）对数据进行校验是否正确。

大众VASS标准：FB_Sick_RFU(FB520_RFID数据读取)功能块深度解读

FB_Pruefziffer（FB170）是西门子 SCL 编写的校验位功能块，支持 Code 2/5、Code 39 和 CRC16 三种校验算法。通过配置字_Cfg 选择校验方式及模式，可实现校验位计算、输入校验位验证，或仅验证数据有效性。

功能块接收待校验数据指针、输入校验位、数据起始地址与长度等参数，经算法处理后输出计算的校验位、校验结果（通过 / 不通过）及选中的校验方式。包含可视化交互逻辑，可显示数据、校验位及状态，并通过消息系统报告故障（如数据长度为 0、无效数据等），支持链式故障传递。

功能块：

HMI界面：

功能块程序结构大纲：

1.?**功能块基本信息**

-?名称、版本、用途（校验位计算与校验）、适用标准（VASS）。

2.?**变量声明**

-?输入变量：控制信号（Start）、配置（_Cfg）、数据参数（Pruefdaten等）。

-?输出变量：校验结果（Pruef_IO）、计算的校验位（PruefZiff_Out）、状态指示（Anwahl_*）。

-?输入输出变量：消息缓冲区（ST_Meld）。

-?临时变量：数据处理（Buffer）、校验计算（iCheckSum2of5等）、可视化（strVisutext_*）。

3.?**核心逻辑**

-?配置解析：_Cfg位映射为校验方式。

-?输入控制：可视化按键检测与无过程模式切换。

-?初始化：可视化文本与校验结果清空。

-?校验处理：

-?Code?2/5：数据校验→加权求和→模10计算→对比。

-?Code?39：数据校验→求和→模43计算→对比。

-?CRC16：查表法计算→高低位拆分→对比。

-?结果输出：校验通过/不通过（Pruef_IO/NIO）、无效数据指示。

4.?**辅助功能**

-?故障处理：本地故障与链式故障汇总。

-?消息系统：故障信息发送至消息缓冲区。

-?可视化：文本显示与按钮/指示灯状态控制。

下面是对FB_Pruefziffer功能块的逐行详细解读，包含代码和对应的解释：

(******************************************************************************************* ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?**** ?Copyright ?2011? ? ? ? ? ? SIEMENS AG I IA&DT, D-90475?Nuernberg ? ? ? ? ? ? ? ? ? **** ?All Rights Reserved ? ? ? ? VOLKSWAGEN AG,?38436?Wolfsburg ? ? ? ? ? ? ? ? ? ? ? ? ?**** ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?AUDI AG, D-85045?Ingolstadt ? ? ? ? ? ? ? ? ? ? ? ? ? ? **** ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?********************************************************************************************** ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?**** Aenderungsjournal ?: ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?********************************************************************************************** Datum ? ?Version ? ? ? ?Autor ? ? ? ?Beschreibung ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?**------------------------------------------------------------------------------------------?24.02.17? ??3.0.00? ? ? ? Schulz ? ? ? Uebernahme in VASS_Standard*****************************************************************************************)// 定义功能块FB_Pruefziffer，编号为170，用于校验位计算与验证FUNCTION_BLOCK FB_Pruefziffer ? ?//FB 170TITLE ? =?'Version 3.0.00'? ? ??// 功能块标题，显示版本信息VERSION :?'3.0'? ? ? ? ? ? ? ? ?// 功能块版本号AUTHOR ?: VASS_V05 ? ? ? ? ? ? ?// 作者信息NAME ? ?: PRUEFZIF ? ? ? ? ? ? ?// 功能块名称FAMILY ?: PRUEFZIF ? ? ? ? ? ? ?// 功能块所属家族// 输入变量声明区VAR_INPUT? ? Start ? ? ? : BOOL;?// Pruefziffern Berechnung durchfuehren?? ? ? ? ? ? ? ? ? ? ? ?// 启动信号：触发校验位计算? ??? ? Frg_Start ? : BOOL;?// Freigabe Vorwahl Start auf VISU? ? ? ? ? ? ? ? ? ? ? ?// 可视化界面启动许可：允许从可视化界面启动校验? ??? ? Frg_oProz ? : BOOL;?// Freigabe Vorwahl ohne Prozess? ? ? ? ? ? ? ? ? ? ? ?// 无过程模式许可：允许切换到无过程模式? ??? ? Pruefdaten ?: ANY; ?// Pruefdaten Pointer ? ?? ? ? ? ? ? ? ? ? ? ? ?// 校验数据：指向待校验数据的指针? ??? ? PruefZiff1_In : BYTE;?// Eingabe zu pruefende Pruefziffer 1 (Hoeheres Byte)? ? ? ? ? ? ? ? ? ? ? ?// 输入校验位1：待验证的高位校验字节? ??? ? PruefZiff2_In : BYTE;?// Eingabe zu pruefende Pruefziffer 2 (niedrigeres Byte)? ? ? ? ? ? ? ? ? ? ? ?// 输入校验位2：待验证的低位校验字节? ??? ? DatenAnfang : INT; ?// Startadresse? ? ? ? ? ? ? ? ? ? ? ?// 数据起始地址：校验数据的起始位置? ??? ? DatenLaenge : INT; ?// Anzahl zu pruefender Daten? ? ? ? ? ? ? ? ? ? ? ?// 数据长度：待校验数据的字节数? ??? ? _Cfg ? ? ? ?: WORD;?//x0: C2/5 x1: C39 x2: nur Pruefziffer x3: CRC16 x4: CRC16 nur Pruefziffer?? ? ? ? ? ? ? ? ? ? ? ?// 配置字：用于选择校验算法和工作模式? ??(**SIEMENS********************Anfang Variablendeklaration*************************************)(***********fuer bit-,?byte-, wordgranulare Sicht von Variablen mit dem AT-Befehl**************) ? ?// 使用AT关键字将配置字_Cfg映射为结构体，便于按位访问Cfg AT _Cfg: STRUCT ? ? ? ?// WORD -> BOOL? ? X8 ? ? ? ? : BOOL; ? ?// 配置位8? ? X9 ? ? ? ? : BOOL; ? ?// 配置位9? ? X10 ? ? ? ?: BOOL; ? ?// 配置位10? ? X11 ? ? ? ?: BOOL; ? ?// 配置位11? ? X12 ? ? ? ?: BOOL; ? ?// 配置位12? ? X13 ? ? ? ?: BOOL; ? ?// 配置位13? ? X14 ? ? ? ?: BOOL; ? ?// 配置位14? ? X15 ? ? ? ?: BOOL; ? ?// 配置位15? ? X0 ? ? ? ? : BOOL; ?//Code 2/5 Modulo10?? ? ? ? ? ? ? ? ? ? ? ? ?// 配置位0：启用Code 2/5（模10）校验? ? X1 ? ? ? ? : BOOL; ?//Code 39 Modulo43? ? ? ? ? ? ? ? ? ? ? ? ?// 配置位1：启用Code 39（模43）校验? ? X2 ? ? ? ? : BOOL; ?//fuer Code 2/5 und Code 39 0:kontrollieren und berechnete Pruefziffer ausgeben,? ? ? ? ? ? ? ? ? ? ? ? ?//1: nur kontrollieren ob gueltige Pruefdaten vorliegen und berechnete Pruefziffer ausgeben? ? ? ? ? ? ? ? ? ? ? ? ?// 配置位2：对于Code 2/5和Code 39，0=验证并输出计算的校验位，1=仅验证数据有效性并输出校验位? ? X3 ? ? ? ? : BOOL; ?//Code CRC16 Genibus (Ausgabe 2x8Bit)kontrollieren und berechnete Pruefziffer ausgeben? ? ? ? ? ? ? ? ? ? ? ? ?// 配置位3：启用CRC16 Genibus校验（输出2个8位字节）? ? X4 ? ? ? ? : BOOL; ?//fuer Code CRC16 ?0:kontrollieren und berechnete Pruefziffer ausgeben,1: nur berechnete Pruefziffer ausgeben ? ?? ? ? ? ? ? ? ? ? ? ? ? ?// 配置位4：对于CRC16，0=验证并输出计算的校验位，1=仅输出计算的校验位? ? X5 ? ? ? ? : BOOL; ??// 配置位5 ? ? ??? ? X6 ? ? ? ? : BOOL; ??// 配置位6? ? X7 ? ? ? ? : BOOL; ??// 配置位7END_STRUCT;VkStoe_In ? ? ? : BOOL; ? ? ? ? ? ??// Sammelstoerung verkettet mit VkStoe_Out ??? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 链式故障输入：与链式故障输出级联(**SIEMENS**********************Ende Variablendeklaration*************************************)(***********fuer bit-,?byte-, wordgranulare Sicht von Variablen mit dem AT-Befehl**************)END_VAR// 输出变量声明区VAR_OUTPUT? ? PruefZiff1_Out ? ? ?: BYTE;?// berechnete Pruefziffer1 ausgeben (Hoeheres Byte)? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 输出校验位1：计算得到的高位校验字节? ??? ? PruefZiff2_Out ? ? ?: BYTE;?// berechnete Pruefziffer2 ausgeben (niedrigeres Byte)? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 输出校验位2：计算得到的低位校验字节? ??? ? oProz ? ? ? ? ? ? ? : BOOL;?// Vorwahl ohne Prozess/Ohne Berechnung? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 无过程模式：预选无过程/无计算模式? ??? ? Pruef_IO ? ? ? ? ? ?: BOOL;?// Pruefziffer PruefZiff_In passt zu Pruefdaten ??? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验通过：输入校验位与校验数据匹配? ??? ? Pruef_NIO ? ? ? ? ? : BOOL;?// Pruefziffer PruefZiff_In passt nicht zu Pruefdaten?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验不通过：输入校验位与校验数据不匹配? ??? ? Anwahl_Pruef_Code2_5: BOOL;?// Pruefung Code 2/5 Modulo10 parametriert? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 2/5选中：已配置Code 2/5模10校验? ??? ? Anwahl_Pruef_C39 ? ?: BOOL;?// Pruefung Code 39 Modulo43 parametriert ?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 39选中：已配置Code 39模43校验? ??? ? Anwahl_Pruef_CRC16 ?: BOOL;?// Pruefung Code CRC16 Genibus parametriert? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// CRC16选中：已配置CRC16 Genibus校验? ??? ? Pruef_Auswahl_IO ? ?: BOOL;?// (Nur) eine Pruefung ausgewaehlt? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验选择有效：(仅)选中一种校验方式? ??? ? Invalide_Pruefdaten : BOOL;?// Pruefdaten enthalten ungueltige Werte-->Pruefziffer nicht berechenbar? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 无效校验数据：校验数据包含无效值，无法计算校验位? ??? ? Stoexx ? ? ?: BOOL;?// Sammelstoerung?? ? ? ? ? ? ? ? ? ? ? ?// 汇总故障：本地故障信号? ??? ? VkStoe_Out ?: BOOL;?// Verkettete Stoerung?? ? ? ? ? ? ? ? ? ? ? ?// 链式故障输出：级联后的故障信号END_VAR// 输入输出变量声明区（可读写）VAR_IN_OUT? ? ST_Meld ? ? : Meldungspuffer; ??// Meldestruktur?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 消息缓冲区：用于存储和传递消息结构END_VAR(**SIEMENS****************************************************************************)// 临时变量声明区（仅在功能块内部使用，不保留状态）VAR_Temp? ? erg_SFC20 ? ? ? :INT;// Rueckgabewert SFC20? ? ? ? ? ? ? ? ? ? ? ? ?// SFC20返回值：块移动指令的返回值? ??? ? _pMeldFeld ? ? ?:ANY;?// Hilfsvariable? ? ? ? ? ? ? ? ? ? ? ? ?// 消息字段指针：辅助变量? ??? ? pMeldFeld AT _pMeldFeld: STRUCT?? ? ? ? BYTE0 ? ? ? :BYTE; ?// Byte 0?? ? ? ? TYP ? ? ? ? :BYTE; ?// Byte 1 ? ? ? ?Daten/Parametertyp?? ? ? ? ANZ ? ? ? ? :WORD; ?// Byte 2+3 ? ? ?Laenge der Variablen?? ? ? ? DBNR ? ? ? ?:WORD; ?// Byte 4+5 ? ? ?DB-Nummer?? ? ? ? BZ ? ? ? ? ?:DWORD;?// Byte 6 bis 10 Bereichszeiger?? ? END_STRUCT;?? ? ? ? ? ? ? ? ? ? ? ? ?// 使用AT关键字将_pMeldFeld映射为结构体，便于访问消息字段的各个部分? ? _pMeldAbb ? ? ?:ANY;?// Hilfsvariable? ? ? ? ? ? ? ? ? ? ? ? ?// 消息确认指针：辅助变量? ??? ? pMeldAbb AT _pMeldAbb: STRUCT?? ? ? ? BYTE0 ? ? ? :BYTE; ?// Byte 0?? ? ? ? TYP ? ? ? ? :BYTE; ?// Byte 1 ? ? ? ?Daten/Parametertyp?? ? ? ? ANZ ? ? ? ? :WORD; ?// Byte 2+3 ? ? ?Laenge der Variablen?? ? ? ? DBNR ? ? ? ?:WORD; ?// Byte 4+5 ? ? ?DB-Nummer?? ? ? ? BZ ? ? ? ? ?:DWORD;?// Byte 6 bis 10 Bereichszeiger?? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ?// 使用AT关键字将_pMeldAbb映射为结构体，便于访问消息确认的各个部分? ? _pMeld :ANY;?// Hilfsvariable? ? ? ? ? ? ? ? ?// 消息指针：辅助变量? ??? ? pMeld AT _pMeld: STRUCT?? ? ? ? BYTE0 ? ? ? :BYTE; ?// Byte 0?? ? ? ? TYP ? ? ? ? :BYTE; ?// Byte 1 ? ? ? ?Daten/Parametertyp?? ? ? ? ANZ ? ? ? ? :WORD; ?// Byte 2+3 ? ? ?Laenge der Variablen?? ? ? ? DBNR ? ? ? ?:WORD; ?// Byte 4+5 ? ? ?DB-Nummer?? ? ? ? BZ ? ? ? ? ?:DWORD;?// Byte 6 bis 10 Bereichszeiger?? ? END_STRUCT;? ? ? ? ? ? ? ? ?// 使用AT关键字将_pMeld映射为结构体，便于访问消息的各个部分? ??? ? DATA_IN_T ? ? ? ? ? ? ? : ANY;?//Kopie von DATA_IN?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 数据输入副本：DATA_IN的副本? ??? ? p_DATA_IN AT DATA_IN_T: STRUCT?? ? ? ? ? ? ? ? SyntaxId ? ?: BYTE; ? ? ? ??//Byte 0?? ? ? ? ? ? ? ? DataType ? ?: BYTE; ? ? ? ??//Byte 1 ? ? ? ?Daten/Parametertyp?? ? ? ? ? ? ? ? DataCount ? : WORD; ? ? ? ??//Byte 2+3 ? ? ?Laenge der Variablen?? ? ? ? ? ? ? ? DBNR ? ? ? ?: WORD; ? ? ? ??//Byte 4+5 ? ? ?DB-Nummer?? ? ? ? ? ? ? ? BZ ? ? ? ? ?: DWORD; ? ? ? ?//Byte 6 bis 10 Bereichszeiger?? ? ? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 使用AT关键字将DATA_IN_T映射为结构体，解析数据输入的信息?END_VAR(************************************************************************************)// 变量声明区（保留状态）VAR? ? _dwVisuWerte1 ? : DWORD;?// Statusdoppelword 1 an VISU?? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化状态双字1：发送到可视化界面的状态信息? ??? ? strVisutext_1_32 ? ? ? ? : ARRAY [1..34] OF BYTE ?;//STRING Visu Pruefdaten Zeichen ?1 bis 32? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化文本1-32：可视化界面显示的校验数据字符1到32? ??? ? strVisutext_33_64 ? ? ? ?: ARRAY [1..34] OF BYTE ?;//STRING Visu Pruefdaten Zeichen 33 bis 64? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化文本33-64：可视化界面显示的校验数据字符33到64? ??? ? strVisutext_Ziffer ? ? ? : ARRAY [1..4] OF BYTE ? ;//STRING Visu Pruefziffern? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化校验位文本：可视化界面显示的校验位? ??? ? _Visutext_Ziffer_Hex ? ? : WORD; ? ? ? ? ? ? ? ? ??//strVisutext_Ziffer als Hex? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化校验位十六进制：校验位的十六进制表示? ??? ? bVisuTasten ? ? : BYTE; ?// Softkeys von VISU?? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 可视化按键：来自可视化界面的软键输入? ??(**SIEMENS************************************************************************************)(*****************************Anfang Variablendeklaration*************************************)(*********************************fuers Meldesystem********************************************)(*********************************************************************************************)? ? MeldFeld : STRUCT?? ? ? ? b0 : Byte;? ? ? ? b1 : Byte;? ? ? ? b2 : Byte;? ? ? ? b3 : Byte;? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 消息字段：存储消息相关信息? ??? ? MSYS AT MeldFeld: STRUCT?? ? ? ? xF_1 ? : BOOL;? ? ? ? xF_2 ? : BOOL;?? ? ? ? xF_3 ? : BOOL;?? ? ? ? xF_4 ? : BOOL;?? ? ? ? xF_5 ? : BOOL;? ? ? ? xF_6 ? : BOOL;? ? ? ? xF_7 ? : BOOL;?? ? ? ? xF_8 ? : BOOL;? ? ? ? xF_9 ? : BOOL;? ? ? ? xF_10 ?: BOOL;? ? ? ? xF_11 ?: BOOL;? ? ? ? xF_12 ?: BOOL;? ? ? ? xF_13 ?: BOOL;? ? ? ? xF_14 ?: BOOL;?? ? ? ? xF_15 ?: BOOL;?? ? ? ? xF_16 ?: BOOL;? ? ? ? xF_17 ?: BOOL;?? ? ? ? xF_18 ?: BOOL;?? ? ? ? xF_19 ?: BOOL;?? ? ? ? xF_20 ?: BOOL;?? ? ? ? xF_21 ?: BOOL;?? ? ? ? xF_22 ?: BOOL;?? ? ? ? xF_23 ?: BOOL;?? ? ? ? xF_24 ?: BOOL;?? ? ? ? xF_25 ?: BOOL;?? ? ? ? xF_26 ?: BOOL;?? ? ? ? xF_27 ?: BOOL;?? ? ? ? xF_28 ?: BOOL;?? ? ? ? xF_29 ?: BOOL;?? ? ? ? xF_30 ?: BOOL;?? ? ? ? xF_31 ?: BOOL;?? ? ? ? xF_32 ?: BOOL;?? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 使用AT关键字将MeldFeld映射为结构体，每个位表示一种故障状态? ??? ? MeldAbb : STRUCT ? ? ? ?? ? ? ? b0 : Byte;? ? ? ? b1 : Byte;? ? ? ? b2 : Byte;? ? ? ? b3 : Byte;? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 消息确认：存储消息确认相关信息? ??? ? AenderungsID : STRUCT? ? ? ? SNr ? ?: WORD;? ? ? ? ANr ? ?: BYTE;? ? ? ? Detail : BYTE;? ? END_STRUCT;? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 变更ID：用于标识消息的变更信息? ??? ? Integritaet : BOOL;? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 完整性：消息完整性标志(**SIEMENS************************************************************************************)(*****************************Ende Variablendeklaration***************************************)(*********************************fuers Meldesystem********************************************)(*********************************************************************************************)(**SIEMENS********************Anfang Variablendeklaration*************************************)(***********fuer bit-,?byte-, wordgranulare Sicht von Variablen mit dem AT-Befehl**************)// 使用AT关键字将_dwVisuWerte1映射为结构体，便于访问可视化状态的各个位dwVisuWerte1 AT _dwVisuWerte1: STRUCT ? ? ? ? ? ? ? ?// DWORD -> BOOL? ? B3 ? ? ?: BYTE ;//VISU Button Start ?? ? ? ? ? ? ? ? ? ?// 可视化按钮Start：控制Start按钮的显示? ? B2 ? ? ?: BYTE ;//VISU Button Ohne? ? ? ? ? ? ? ? ? ?// 可视化按钮Ohne：控制Ohne按钮的显示? ? X8 ? ? ?: BOOL ;//? ? X9 ? ? ?: BOOL ;//? ? X10 ? ? : BOOL ;//? ? X11 ? ? : BOOL ;//? ? X12 ? ? : BOOL ;//? ? X13 ? ? : BOOL ;//? ? X14 ? ? : BOOL ;//? ? X15 ? ? : BOOL ;//? ? X0 ? ? ?: BOOL ;//? ? X1 ? ? ?: BOOL ;//? ? X2 ? ? ?: BOOL ;//? ? X3 ? ? ?: BOOL ;//? ? X4 ? ? ?: BOOL ;// ? ??? ? X5 ? ? ?: BOOL ;//? ? X6 ? ? ?: BOOL ;//? ? X7 ? ? ?: BOOL ;//END_STRUCT;// 使用AT关键字将_Visutext_Ziffer_Hex映射为结构体，拆分为两个字节Visutext_Ziffer_Hex AT _Visutext_Ziffer_Hex: STRUCT ?//strVisutext_Ziffer als Hex? ? B1 : BYTE;? ? B2 : BYTE;END_STRUCT;(**SIEMENS**********************Ende Variablendeklaration*************************************)(***********fuer bit-,?byte-, wordgranulare Sicht von Variablen mit dem AT-Befehl**************)? ? xCfg_0 ? ? ?: BOOL;?// 配置位0的副本 ?? ? xCfg_1 ? ? ?: BOOL;?// 配置位1的副本 ?? ? xCfg_2 ? ? ?: BOOL;?// 配置位2的副本 ?? ? xCfg_3 ? ? ?: BOOL;?// 配置位3的副本?? ? xCfg_4 ? ? ?: BOOL;?// 配置位4的副本?? ? xCfg_5 ? ? ?: BOOL;?// 配置位5的副本?? ? xCfg_6 ? ? ?: BOOL;?// 配置位6的副本?? ? xCfg_7 ? ? ?: BOOL;?// 配置位7的副本 ?? ? xCfg_8 ? ? ?: BOOL;?// 配置位8的副本?? ? iHM_Zaehler1 ? ? ? ? ? ?: INT; ? ? ? ? ? ? ? ? ?//Laufvariable? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 循环变量1：用于循环计数? ? iHM_Zaehler2 ? ? ? ? ? ?: INT; ? ? ? ? ? ? ? ? ?//Laufvariable? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 循环变量2：用于循环计数? ? iLaenge ? ? ? ? ? ? ? ? : INT; ? ? ? ? ? ? ? ? ?//Codelaenge? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 代码长度：存储代码长度信息? ? Buffer ? ? ? ? ? ? ? ? ?: ARRAY [0..68] OF BYTE;//Buffer + Pruefziffer? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 缓冲区：存储数据和校验位? ? arrCode_pos ? ? ? ? ? ? : ARRAY [0..68] OF INT;?//Codedatensatz + Pruefziffer? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 代码位置数组：存储转换后的代码数据和校验位? ? iCheckSum2of5 ? ? ? ? ? : INT; ? ? ? ? ? ? ? ? ?//Checksumme Code 2of5? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 2/5校验和：用于Code 2/5算法? ? iMOD_39 ? ? ? ? ? ? ? ? : INT; ? ? ? ? ? ? ? ? ?//Modulofunktion Code 39? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 39模运算结果：用于Code 39算法? ? iCharCode39 ? ? ? ? ? ? : INT; ? ? ? ? ? ? ? ? ?//CharCode39? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 39字符代码：用于Code 39算法? ? xF_Invalide_Daten_C2x5 ?: BOOL; ? ? ? ? ? ? ? ??//Fehler Falsche Daten? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 2/5无效数据：标记Code 2/5的无效数据? ? xF_Invalide_Daten_C39 ? : BOOL; ? ? ? ? ? ? ? ??//Fehler Falsche Daten? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Code 39无效数据：标记Code 39的无效数据? ? xF_Invalide_Daten_CRC16 : BOOL; ? ? ? ? ? ? ? ??//Fehler Falsche Daten? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// CRC16无效数据：标记CRC16的无效数据? ? xF_PruefdatenKopie ? ? ?: BOOL; ? ? ? ? ? ? ? ??//Pruefdaten nicht einlesbar? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验数据复制错误：标记校验数据无法读取? ? Pruefende ? ? ? ? ? ? ? : INT; ? ? ? ? ? ? ? ? ?//Letztes Zeichen, das geprueft werden soll? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验结束位置：需要校验的最后一个字符位置? ? iPaFe_Pruefdaten ? ? ? ?: INT; ? ? ? ? ? ? ? ? ?//parametrierfehler beim Kopieren der Pruefdaten ?? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验数据复制参数错误：复制校验数据时的参数错误? ? iFM ? ? ? ? ? ? ? ? ? ? : BOOL; ? ? ? ? ? ? ? ??//FM? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 功能标志：用于标记某些功能状态? ? xS_Start ? ? ? ? ? ? ? ?: BOOL; ? ? ? ? ? ? ? ??//Visu Tasten Lesen? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Start信号：读取可视化按钮的Start信号? ? xS_OProz ? ? ? ? ? ? ? ?: BOOL; ? ? ? ? ? ? ? ??//Visu Tasten Ohne Prozess? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 无过程信号：读取可视化按钮的无过程信号? ? R_TRIG_oProz ? ? ? ? ? ?: STRUCT ? ? ? ? ? ? ? ?//Positive Flanke ohne Prozess? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 无过程上升沿触发器：检测无过程信号的上升沿? ? ? ? Edge : BOOL; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??// 边沿：存储上一周期的状态? ? ? ? Q ? ?: BOOL; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??// 输出：上升沿检测输出? ? END_STRUCT;? ? R_TRIG_Start ? ? ? ? ? ?: STRUCT ? ? ? ? ? ? ? ?//Positive Flanke Start? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// Start上升沿触发器：检测Start信号的上升沿? ? ? ? Edge : BOOL; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??// 边沿：存储上一周期的状态? ? ? ? Q ? ?: BOOL; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??// 输出：上升沿检测输出? ? END_STRUCT;? ? chrPZ ? ? ? ? ? ? ? ? ? : CHAR; ? ? ? ??//Berechnete Pruefziffer? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 校验位字符：计算得到的校验位字符? ? iDatenLaenge_max32 ? ? ?: INT; ? ? ? ? ?//Datenlaenge auf maximal 32 gesetzt, wenn > 32? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 最大32的数据长度：当数据长度>32时设为32? ??// CRC16查找表1：用于CRC16算法计算? ? CRCTable1 : ARRAY [0..127] OF WORD :=?? ??16#0000,16#1021,16#2042,16#3063,16#4084,16#50a5,16#60c6,16#70e7,? ??16#8108,16#9129,16#a14a,16#b16b,16#c18c,16#d1ad,16#e1ce,16#f1ef,? ??16#1231,16#0210,16#3273,16#2252,16#52b5,16#4294,16#72f7,16#62d6,? ??16#9339,16#8318,16#b37b,16#a35a,16#d3bd,16#c39c,16#f3ff,16#e3de,? ??16#2462,16#3443,16#0420,16#1401,16#64e6,16#74c7,16#44a4,16#5485,? ??16#a56a,16#b54b,16#8528,16#9509,16#e5ee,16#f5cf,16#c5ac,16#d58d,? ??16#3653,16#2672,16#1611,16#0630,16#76d7,16#66f6,16#5695,16#46b4,? ??16#b75b,16#a77a,16#9719,16#8738,16#f7df,16#e7fe,16#d79d,16#c7bc,? ??16#48c4,16#58e5,16#6886,16#78a7,16#0840,16#1861,16#2802,16#3823,? ??16#c9cc,16#d9ed,16#e98e,16#f9af,16#8948,16#9969,16#a90a,16#b92b,? ??16#5af5,16#4ad4,16#7ab7,16#6a96,16#1a71,16#0a50,16#3a33,16#2a12,? ??16#dbfd,16#cbdc,16#fbbf,16#eb9e,16#9b79,16#8b58,16#bb3b,16#ab1a,? ??16#6ca6,16#7c87,16#4ce4,16#5cc5,16#2c22,16#3c03,16#0c60,16#1c41,? ??16#edae,16#fd8f,16#cdec,16#ddcd,16#ad2a,16#bd0b,16#8d68,16#9d49,? ??16#7e97,16#6eb6,16#5ed5,16#4ef4,16#3e13,16#2e32,16#1e51,16#0e70,? ??16#ff9f,16#efbe,16#dfdd,16#cffc,16#bf1b,16#af3a,16#9f59,16#8f78;? ??? ??// CRC16查找表2：用于CRC16算法计算? ? CRCTable2 : ARRAY [0..127] OF WORD :=?? ??16#9188,16#81a9,16#b1ca,16#a1eb,16#d10c,16#c12d,16#f14e,16#e16f,? ??16#1080,16#00a1,16#30c2,16#20e3,16#5004,16#4025,16#7046,16#6067,? ??16#83b9,16#9398,16#a3fb,16#b3da,16#c33d,16#d31c,16#e37f,16#f35e,? ??16#02b1,16#1290,16#22f3,16#32d2,16#4235,16#5214,16#6277,16#7256,? ??16#b5ea,16#a5cb,16#95a8,16#8589,16#f56e,16#e54f,16#d52c,16#c50d,? ??16#34e2,16#24c3,16#14a0,16#0481,16#7466,16#6447,16#5424,16#4405,? ??16#a7db,16#b7fa,16#8799,16#97b8,16#e75f,16#f77e,16#c71d,16#d73c,? ??16#26d3,16#36f2,16#0691,16#16b0,16#6657,16#7676,16#4615,16#5634,? ??16#d94c,16#c96d,16#f90e,16#e92f,16#99c8,16#89e9,16#b98a,16#a9ab,? ??16#5844,16#4865,16#7806,16#6827,16#18c0,16#08e1,16#3882,16#28a3,? ??16#cb7d,16#db5c,16#eb3f,16#fb1e,16#8bf9,16#9bd8,16#abbb,16#bb9a,? ??16#4a75,16#5a54,16#6a37,16#7a16,16#0af1,16#1ad0,16#2ab3,16#3a92,? ??16#fd2e,16#ed0f,16#dd6c,16#cd4d,16#bdaa,16#ad8b,16#9de8,16#8dc9,? ??16#7c26,16#6c07,16#5c64,16#4c45,16#3ca2,16#2c83,16#1ce0,16#0cc1,? ??16#ef1f,16#ff3e,16#cf5d,16#df7c,16#af9b,16#bfba,16#8fd9,16#9ff8,? ??16#6e17,16#7e36,16#4e55,16#5e74,16#2e93,16#3eb2,16#0ed1,16#1ef0;? ??? ? EndAddr : DWORD; ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 结束地址：存储数据结束地址? ??? ? iCRCIndex : INT;?// Calculated CRC index into CRC lookup tables? ? ? ? ? ? ? ? ? ? ?// CRC索引：计算得到的CRC查找表索引? ? wCRCTemp : WORD;?// CRC临时变量：用于CRC计算的临时变量? ? _wCRC : WORD; ? ?// CRC结果：存储最终的CRC结果? ??? ??// 使用AT关键字将_wCRC映射为结构体，拆分为两个字节? ? wCRC AT _wCRC : STRUCT? ? ? ? B1 : BYTE; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 字节1：CRC结果的高位字节? ? ? ? B2 : BYTE; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 字节2：CRC结果的低位字节? ? END_STRUCT; ?? ? ? ??END_VAR(*----------------------------------------------------------------------------------*)(*Dieser Baustein berechnet Pruefn anhand der Eingabedaten. Die Auswahl des Pruefverfahrens?wird ueber cfg. Bits eingestellt*)(*此功能块根据输入数据计算校验位。校验方法的选择通过配置位设置*)(*----------------------------------------------------------------------------------*)(*Konfiguration auswerten*)(*解析配置*)xCfg_0 ? ?:= Cfg.X0;?// 配置位0：Code 2/5使能xCfg_1 ? ?:= Cfg.X1;?// 配置位1：Code 39使能xCfg_2 ? ?:= Cfg.X2;?// 配置位2：校验位验证模式xCfg_3 ? ?:= Cfg.X3;?// 配置位3：CRC16使能xCfg_4 ? ?:= Cfg.X4;?// 配置位4：CRC16验证模式xCfg_5 ? ?:= Cfg.X5;?// 配置位5xCfg_6 ? ?:= Cfg.X6;?// 配置位6xCfg_7 ? ?:= Cfg.X7;?// 配置位7xCfg_8 ? ?:= Cfg.X8;?// 配置位8(*----------------------------------------------------------------------------------*)(* Tasten von Visu pruefen *)(*检查来自可视化界面的按键*)// 如果PC未激活，则将可视化按键设为0IF PC_AKTIV=DWORD#16#00000000?THEN bVisuTasten := Byte#0;?END_IF;// 定义Start信号：当可视化按键为1，且启动许可有效，且不在无过程模式xS_Start:=(bVisutasten = Byte#1) AND Frg_Start AND NOT oProz;// 定义无过程信号：当可视化按键为2，且无过程许可有效xS_oProz:=(bVisutasten = Byte#2) AND Frg_oProz;(* Pruefung starten *)(*启动校验*)// 检测Start信号的上升沿R_TRIG_Start.Q ? ?:= xS_Start AND NOT R_TRIG_Start.Edge;R_TRIG_Start.Edge := xS_Start;?(* An-/Abwahl ohne Prozess *)(*切换无过程模式*)// 检测无过程信号的上升沿R_TRIG_oProz.Q ? ? ?:= xS_OProz AND NOT R_TRIG_oProz.Edge;R_TRIG_oProz.Edge ? := xS_OProz;// 当检测到无过程信号的上升沿且无过程许可有效时，切换无过程模式状态IF R_TRIG_oProz.Q AND Frg_OProz THEN? ? oProz := NOT oProz;END_IF;// 暂时注释掉的代码：将输入校验位直接输出//PruefZiff1_Out := PruefZiff1_In;//PruefZiff2_Out := PruefZiff2_In;// 输出选中的校验方式Anwahl_Pruef_Code2_5 := xCfg_0; ??// Code 2/5选中标志Anwahl_Pruef_C39 ? ? := xCfg_1; ??// Code 39选中标志Anwahl_Pruef_CRC16 ? := xCfg_3; ??// CRC16选中标志// 检查是否只选择了一种校验方式（通过异或运算）Pruef_Auswahl_IO := (xCfg_0 XOR xCfg_1 XOR xCfg_3);// 初始化Buffer[0] :=?66; ?// 缓冲区初始化// 设置可视化文本的最大长度strVisutext_1_32[1] ? ? :=?32;?// 前32个字符的最大长度strVisutext_33_64[1] ? ?:=?32;?// 33-64个字符的最大长度strVisutext_Ziffer[1] ? :=?2; ?// 校验位的最大长度// 当没有Start按钮按下且没有Start信号时，清空可视化文本和校验结果IF NOT xS_Start AND NOT Start THEN ? ? ?? ? strVisutext_1_32[2] ? ? :=?0; ?// 前32个字符的实际长度设为0? ? strVisutext_33_64[2] ? ?:=?0; ?// 33-64个字符的实际长度设为0? ? strVisutext_Ziffer[2] ? :=?0; ?// 校验位的实际长度设为0? ? Pruef_IO ? ? ? ? ? ? ? ?:= FALSE;?// 校验通过标志设为FALSE? ? Pruef_NIO ? ? ? ? ? ? ? := FALSE;?// 校验不通过标志设为FALSE? ? xF_Invalide_Daten_C2x5 ?:= FALSE;?// Code 2/5无效数据标志设为FALSE? ? xF_Invalide_Daten_C39 ? := FALSE;?// Code 39无效数据标志设为FALSE? ? _Visutext_Ziffer_Hex ? ? :=?0; ?// 校验位的十六进制表示设为0END_IF;// 如果处于无过程模式，则直接设置校验通过IF oProz THEN? ? Pruef_IO := TRUE; ? ?// 如果数据长度大于0，且有Start上升沿或Start信号，且不在无过程模式，且校验方式选择有效ELSIF DatenLaenge >?0?AND (R_TRIG_Start.Q OR Start) AND NOT oProz AND Pruef_Auswahl_IO THEN? ??// 初始化可视化校验位文本? ? strVisutext_Ziffer[3] ? :=?20;?// 空格? ? strVisutext_Ziffer[4] ? :=?20;?// 空格? ? Pruef_IO := FALSE; ? ? ? ? ? ?// 校验通过标志设为FALSE? ? Pruef_NIO := FALSE; ? ? ? ? ??// 校验不通过标志设为FALSE? ??? ??// 读取校验数据到缓冲区? ? Byte_String(Start ? ? ? := DatenAnfang,?? ? ? ? ? ? ? ? Ende ? ? ? ?:= ( DatenAnfang + DatenLaenge -?1?),?? ? ? ? ? ? ? ? DATA_IN ? ? := Pruefdaten ,?? ? ? ? ? ? ? ? DATA_OUT ? ?:= Buffer,?? ? ? ? ? ? ? ? PaFE ? ? ? ?:= iPaFe_Pruefdaten,?? ? ? ? ? ? ? ? FM ? ? ? ? ?:= iFM);? ??// 如果复制过程有参数错误，则设置校验数据复制错误标志? ? xF_PruefdatenKopie := iPaFe_Pruefdaten >?0;? ? ? ??? ??// 将输入的校验位添加到缓冲区? ? Buffer[2?+ DatenLaenge] := PruefZiff1_In;? ? Buffer[2?+ DatenLaenge +?1] := PruefZiff2_In;? ??? ??// 设置可视化校验位文本的长度? ? strVisutext_Ziffer[2] :=?1;?// 实际长度设为1? ??// strVisutext_Ziffer[3] := Buffer[2 + DatenLaenge];? ??? ??// 初始化可视化文本的实际长度? ? strVisutext_1_32[2] :=?0;? ? strVisutext_33_64[2] :=?0;? ??? ??// 处理前32个字符的可视化文本? ? IF DatenLaenge >?0?AND DatenLaenge <?65?THEN? ? ? ??// 如果数据长度大于32，则最大显示32个字符? ? ? ? IF DatenLaenge >?32?THEN ? ?? ? ? ? ? ? iDatenLaenge_max32 :=?32;? ? ? ? ELSE? ? ? ? ? ? iDatenLaenge_max32 := DatenLaenge;? ? ? ? END_IF;? ? ?? ? ? ??// 复制数据到可视化文本缓冲区? ? ? ? Byte_String(Start ? ? ? := DatenAnfang, ? ? ? ? ? ? ? ? ? ??? ? ? ? ? ? ? ? ? ? Ende ? ? ? ?:= ( DatenAnfang + iDatenLaenge_max32 -?1),?? ? ? ? ? ? ? ? ? ? DATA_IN ? ? := Pruefdaten ,?? ? ? ? ? ? ? ? ? ? DATA_OUT ? ?:= strVisutext_1_32,?? ? ? ? ? ? ? ? ? ? PaFE ? ? ? ?:= iPaFe_Pruefdaten,?? ? ? ? ? ? ? ? ? ? FM ? ? ? ? ?:= iFM);? ? ? ??// 如果复制过程有参数错误，则设置校验数据复制错误标志? ? ? ? xF_PruefdatenKopie := xF_PruefdatenKopie OR iPaFe_Pruefdaten >?0; ? ?? ? END_IF;? ??// 处理33-64个字符的可视化文本? ? IF DatenLaenge >?32?AND DatenLaenge <?65?THEN? ? ? ??// 复制数据到可视化文本缓冲区? ? ? ? Byte_String(Start ? ? ? := DatenAnfang +?32,?? ? ? ? ? ? ? ? ? ? Ende ? ? ? ?:= ( DatenAnfang + DatenLaenge -?1),?? ? ? ? ? ? ? ? ? ? DATA_IN ? ? := Pruefdaten ,?? ? ? ? ? ? ? ? ? ? DATA_OUT ? ?:= strVisutext_33_64,?? ? ? ? ? ? ? ? ? ? PaFE ? ? ? ?:= iPaFe_Pruefdaten,?? ? ? ? ? ? ? ? ? ? FM ? ? ? ? ?:= iFM);? ? ? ??// 如果复制过程有参数错误，则设置校验数据复制错误标志? ? ? ? xF_PruefdatenKopie := xF_PruefdatenKopie OR iPaFe_Pruefdaten >?0;?? ? ELSE? ? ? ? strVisutext_33_64[2] :=?0;?// 实际长度设为0? ? END_IF;? ?// 根据配置选择校验方法? ? IF xCfg_0 THEN ?// Code 2/5校验? ? ? ? strVisutext_Ziffer[3] := Buffer[2?+ DatenLaenge];? ? ? ??? ? ? ??// 初始化Code 2/5校验相关变量? ? ? ? xF_Invalide_Daten_C2x5 := FALSE; ? ? ??? ? ? ? iCheckSum2of5 :=?0;? ? ? ??? ? ? ??// 处理校验数据（不包括校验位）? ? ? ? FOR iHM_Zaehler2 :=?2?TO (2?+ DatenLaenge -?1) DO?? ? ? ? ? ? (* 将CODE128字符集中的A-Z转换为数字以便计算校验和 *)? ? ? ? ? ? CASE BYTE_TO_INT(Buffer[iHM_Zaehler2]) OF?? ? ? ? ? ? ? ??48: arrCode_pos[iHM_Zaehler2] :=?0? ? ? ;// '0'? ? ? ? ? ? ? ??49: arrCode_pos[iHM_Zaehler2] :=?1? ? ? ;// '1'? ? ? ? ? ? ? ??50: arrCode_pos[iHM_Zaehler2] :=?2? ? ? ;// '2'? ? ? ? ? ? ? ??51: arrCode_pos[iHM_Zaehler2] :=?3? ? ? ;// '3'? ? ? ? ? ? ? ??52: arrCode_pos[iHM_Zaehler2] :=?4? ? ? ;// '4'? ? ? ? ? ? ? ??53: arrCode_pos[iHM_Zaehler2] :=?5? ? ? ;// '5'? ? ? ? ? ? ? ??54: arrCode_pos[iHM_Zaehler2] :=?6? ? ? ;// '6'? ? ? ? ? ? ? ??55: arrCode_pos[iHM_Zaehler2] :=?7? ? ? ;// '7'? ? ? ? ? ? ? ??56: arrCode_pos[iHM_Zaehler2] :=?8? ? ? ;// '8'? ? ? ? ? ? ? ??57: arrCode_pos[iHM_Zaehler2] :=?9? ? ? ;// '9'? ? ? ? ? ? ? ??65: arrCode_pos[iHM_Zaehler2] :=?1? ? ? ;// 'A'? ? ? ? ? ? ? ??66: arrCode_pos[iHM_Zaehler2] :=?2? ? ? ;// 'B'? ? ? ? ? ? ? ??67: arrCode_pos[iHM_Zaehler2] :=?3? ? ? ;// 'C'? ? ? ? ? ? ? ??68: arrCode_pos[iHM_Zaehler2] :=?4? ? ? ;// 'D'? ? ? ? ? ? ? ??69: arrCode_pos[iHM_Zaehler2] :=?5? ? ? ;// 'E'? ? ? ? ? ? ? ??70: arrCode_pos[iHM_Zaehler2] :=?6? ? ? ;// 'F'? ? ? ? ? ? ? ??71: arrCode_pos[iHM_Zaehler2] :=?7? ? ? ;// 'G'? ? ? ? ? ? ? ??72: arrCode_pos[iHM_Zaehler2] :=?8? ? ? ;// 'H'? ? ? ? ? ? ? ??73: arrCode_pos[iHM_Zaehler2] :=?9? ? ? ;// 'I'? ? ? ? ? ? ? ??74: arrCode_pos[iHM_Zaehler2] :=?1? ? ? ;// 'J'? ? ? ? ? ? ? ??75: arrCode_pos[iHM_Zaehler2] :=?2? ? ? ;// 'K'? ? ? ? ? ? ? ??76: arrCode_pos[iHM_Zaehler2] :=?3? ? ? ;// 'L'? ? ? ? ? ? ? ??77: arrCode_pos[iHM_Zaehler2] :=?4? ? ? ;// 'M'? ? ? ? ? ? ? ??78: arrCode_pos[iHM_Zaehler2] :=?5? ? ? ;// 'N'? ? ? ? ? ? ? ??79: arrCode_pos[iHM_Zaehler2] :=?6? ? ? ;// 'O'? ? ? ? ? ? ? ??80: arrCode_pos[iHM_Zaehler2] :=?7? ? ? ;// 'P'? ? ? ? ? ? ? ??81: arrCode_pos[iHM_Zaehler2] :=?8? ? ? ;// 'Q'? ? ? ? ? ? ? ??82: arrCode_pos[iHM_Zaehler2] :=?9? ? ? ;// 'R'? ? ? ? ? ? ? ??83: arrCode_pos[iHM_Zaehler2] :=?1? ? ? ;// 'S'? ? ? ? ? ? ? ??84: arrCode_pos[iHM_Zaehler2] :=?2? ? ? ;// 'T'? ? ? ? ? ? ? ??85: arrCode_pos[iHM_Zaehler2] :=?3? ? ? ;// 'U'? ? ? ? ? ? ? ??86: arrCode_pos[iHM_Zaehler2] :=?4? ? ? ;// 'V'? ? ? ? ? ? ? ??87: arrCode_pos[iHM_Zaehler2] :=?5? ? ? ;// 'W'? ? ? ? ? ? ? ??88: arrCode_pos[iHM_Zaehler2] :=?6? ? ? ;// 'X'? ? ? ? ? ? ? ??89: arrCode_pos[iHM_Zaehler2] :=?7? ? ? ;// 'Y'? ? ? ? ? ? ? ??90: arrCode_pos[iHM_Zaehler2] :=?8? ? ? ;// 'Z'? ? ? ? ? ? ELSE: (* 如果找到不匹配的字符，则设置无效数据标志并退出循环 *)? ? ? ? ? ? ? ? xF_Invalide_Daten_C2x5 := TRUE;? ? ? ? ? ? ? ? Pruef_IO := FALSE;? ? ? ? ? ? ? ? EXIT;? ? ? ? ? ? END_CASE;?? ? ? ? ? ??? ? ? ? ? ? (* 计算校验和 *)? ? ? ? ? ??// +1是为了进行奇偶位的判断? ? ? ? ? ? IF ((iHM_Zaehler2 +?1) MOD?2) =?0?THEN ?? ? ? ? ? ? ? ? iCheckSum2of5 := iCheckSum2of5 +?1?* arrCode_pos[iHM_Zaehler2];// 偶数位乘1? ? ? ? ? ? ELSE? ? ? ? ? ? ? ? iCheckSum2of5 := iCheckSum2of5 +?3?* arrCode_pos[iHM_Zaehler2];// 奇数位乘3? ? ? ? ? ? END_IF;? ? ? ?? ? ? ? END_FOR;? ??? ? ? ? (* 从总和计算模10，10减去该值得到校验位 *)? ? ? ? IF (iCheckSum2of5 MOD?10) >?0?THEN? ? ? ? ? ? iCheckSum2of5 :=?10?- (iCheckSum2of5 MOD?10);? ? ? ? ELSE? ? ? ? ? ? iCheckSum2of5 :=?0;? ? ? ? END_IF;? ??? ? ? ??// 如果数据有效，则计算校验位? ? ? ? IF NOT xF_Invalide_Daten_C2x5 THEN? ? ? ??? ? ? ? ? ??// 将校验位转换为字符? ? ? ? ? ? CASE iCheckSum2of5 OF? ? ? ? ? ? ? ??0: chrPZ :=?'0'? ? ;// '0'? ? ? ? ? ? ? ??1: chrPZ :=?'1'? ? ;// '1'? ? ? ? ? ? ? ??2: chrPZ :=?'2'? ? ;// '2'? ? ? ? ? ? ? ??3: chrPZ :=?'3'? ? ;// '3'? ? ? ? ? ? ? ??4: chrPZ :=?'4'? ? ;// '4'? ? ? ? ? ? ? ??5: chrPZ :=?'5'? ? ;// '5'? ? ? ? ? ? ? ??6: chrPZ :=?'6'? ? ;// '6'? ? ? ? ? ? ? ??7: chrPZ :=?'7'? ? ;// '7'? ? ? ? ? ? ? ??8: chrPZ :=?'8'? ? ;// '8'? ? ? ? ? ? ? ??9: chrPZ :=?'9'? ? ;// '9' ? ? ? ? ? ?? ? ? ? ? ? END_CASE; ? ?? ? ? ? ? ? ??? ? ? ? ? ? (************************************************************? ? ? ? ? ? 检查输入值，如果功能块外部的PruefZiff_OUT与PruefZiff_IN指向相同的存储位置，? ? ? ? ? ? 则存储计算得到的校验位。*)? ? ? ? ? ??// 将字符转换为字节存储到输出校验位1? ? ? ? ? ? PruefZiff1_Out := INT_TO_BYTE(CHAR_TO_INT(chrPZ));? ? ? ? ? ? PruefZiff2_Out :=?0;?// 输出校验位2设为0? ? ? ? ? ??? ? ? ? ? ??// 如果不是仅验证数据有效性模式? ? ? ? ? ? IF NOT xCfg_2 THEN ?? ? ? ? ? ? ? ??// 将计算得到的校验位与输入校验位比较? ? ? ? ? ? ? ? Pruef_IO := PruefZiff1_Out = PruefZiff1_In;? ? ? ? ? ? ELSE ? ?// 仅验证数据有效性，不验证校验位? ? ? ? ? ? ? ? strVisutext_Ziffer[3] := PruefZiff1_Out;? ? ? ? ? ? ? ? Pruef_IO := TRUE; ? ? ? ? ? ? ? ? ??? ? ? ? ? ? END_IF;?? ? ? ? ? ? ? ? ? ? ? ??? ? ? ? END_IF; ? ? ? ?? ? ELSIF xCfg_1 THEN ?// Code 39校验? ? ? ? strVisutext_Ziffer[3] := Buffer[2?+ DatenLaenge];? ? ? ??// 初始化Code 39校验相关变量? ? ? ? xF_Invalide_Daten_C39 := FALSE;? ? ? ? iCharCode39 :=?0; ??? ? ? ??? ? ? ??// 处理校验数据（不包括校验位）? ? ? ? FOR iHM_Zaehler2 :=?2?TO (2?+ DatenLaenge -?1) DO ?? ? ? ? ? ??// 将字符转换为对应的Code 39值? ? ? ? ? ? CASE BYTE_TO_INT(Buffer[iHM_Zaehler2]) OF?? ? ? ? ? ? ? ??48: arrCode_pos[iHM_Zaehler2] :=?0? ? ? ;// '0'? ? ? ? ? ? ? ??49: arrCode_pos[iHM_Zaehler2] :=?1? ? ? ;// '1'? ? ? ? ? ? ? ??50: arrCode_pos[iHM_Zaehler2] :=?2? ? ? ;// '2'? ? ? ? ? ? ? ??51: arrCode_pos[iHM_Zaehler2] :=?3? ? ? ;// '3'? ? ? ? ? ? ? ??52: arrCode_pos[iHM_Zaehler2] :=?4? ? ? ;// '4'? ? ? ? ? ? ? ??53: arrCode_pos[iHM_Zaehler2] :=?5? ? ? ;// '5'? ? ? ? ? ? ? ??54: arrCode_pos[iHM_Zaehler2] :=?6? ? ? ;// '6'? ? ? ? ? ? ? ??55: arrCode_pos[iHM_Zaehler2] :=?7? ? ? ;// '7'? ? ? ? ? ? ? ??56: arrCode_pos[iHM_Zaehler2] :=?8? ? ? ;// '8'? ? ? ? ? ? ? ??57: arrCode_pos[iHM_Zaehler2] :=?9? ? ? ;// '9'? ? ? ? ? ? ? ??65: arrCode_pos[iHM_Zaehler2] :=?10? ? ?;// 'A'? ? ? ? ? ? ? ??66: arrCode_pos[iHM_Zaehler2] :=?11? ? ?;// 'B'? ? ? ? ? ? ? ??67: arrCode_pos[iHM_Zaehler2] :=?12? ? ?;// 'C'? ? ? ? ? ? ? ??68: arrCode_pos[iHM_Zaehler2] :=?13? ? ?;// 'D'? ? ? ? ? ? ? ??69: arrCode_pos[iHM_Zaehler2] :=?14? ? ?;// 'E'? ? ? ? ? ? ? ??70: arrCode_pos[iHM_Zaehler2] :=?15? ? ?;// 'F'? ? ? ? ? ? ? ??71: arrCode_pos[iHM_Zaehler2] :=?16? ? ?;// 'G'? ? ? ? ? ? ? ??72: arrCode_pos[iHM_Zaehler2] :=?17? ? ?;// 'H'? ? ? ? ? ? ? ??73: arrCode_pos[iHM_Zaehler2] :=?18? ? ?;// 'I'? ? ? ? ? ? ? ??74: arrCode_pos[iHM_Zaehler2] :=?19? ? ?;// 'J'? ? ? ? ? ? ? ??75: arrCode_pos[iHM_Zaehler2] :=?20? ? ?;// 'K'? ? ? ? ? ? ? ??76: arrCode_pos[iHM_Zaehler2] :=?21? ? ?;// 'L'? ? ? ? ? ? ? ??77: arrCode_pos[iHM_Zaehler2] :=?22? ? ?;// 'M'? ? ? ? ? ? ? ??78: arrCode_pos[iHM_Zaehler2] :=?23? ? ?;// 'N'? ? ? ? ? ? ? ??79: arrCode_pos[iHM_Zaehler2] :=?24? ? ?;// 'O'? ? ? ? ? ? ? ??80: arrCode_pos[iHM_Zaehler2] :=?25? ? ?;// 'P'? ? ? ? ? ? ? ??81: arrCode_pos[iHM_Zaehler2] :=?26? ? ?;// 'Q'? ? ? ? ? ? ? ??82: arrCode_pos[iHM_Zaehler2] :=?27? ? ?;// 'R'? ? ? ? ? ? ? ??83: arrCode_pos[iHM_Zaehler2] :=?28? ? ?;// 'S'? ? ? ? ? ? ? ??84: arrCode_pos[iHM_Zaehler2] :=?29? ? ?;// 'T? ? ? ? ? ? ? ??85: arrCode_pos[iHM_Zaehler2] :=?30? ? ?;// 'U'? ? ? ? ? ? ? ??86: arrCode_pos[iHM_Zaehler2] :=?31? ? ?;// 'V'? ? ? ? ? ? ? ??87: arrCode_pos[iHM_Zaehler2] :=?32? ? ?;// 'W'? ? ? ? ? ? ? ??88: arrCode_pos[iHM_Zaehler2] :=?33? ? ?;// 'X'? ? ? ? ? ? ? ??89: arrCode_pos[iHM_Zaehler2] :=?34? ? ?;// 'Y'? ? ? ? ? ? ? ??90: arrCode_pos[iHM_Zaehler2] :=?35? ? ?;// 'Z'? ? ? ? ? ? ? ??45: arrCode_pos[iHM_Zaehler2] :=?36? ? ?;// '-'? ? ? ? ? ? ? ??46: arrCode_pos[iHM_Zaehler2] :=?37? ? ?;// '.'? ? ? ? ? ? ? ??32: arrCode_pos[iHM_Zaehler2] :=?38? ? ?;// ' '? ? ? ? ? ? ? ??36: arrCode_pos[iHM_Zaehler2] :=?39? ? ?;// '$'? ? ? ? ? ? ? ??47: arrCode_pos[iHM_Zaehler2] :=?40? ? ?;// '/'? ? ? ? ? ? ? ??43: arrCode_pos[iHM_Zaehler2] :=?41? ? ?;// '+'? ? ? ? ? ? ? ??37: arrCode_pos[iHM_Zaehler2] :=?42? ? ?;// '%'?? ? ? ? ? ? ELSE: (* 如果找到不匹配的字符，则设置无效数据标志并退出循环 *)? ? ? ? ? ? ? ? xF_Invalide_Daten_C39 := TRUE; ?? ? ? ? ? ? ? ? Pruef_IO := FALSE;?? ? ? ? ? ? ? ? EXIT;? ? ? ? ? ? END_CASE; ? ?? ??? ? ? ? ? ??// 累加所有字符的Code 39值? ? ? ? ? ? iCharCode39 := iCharCode39 + arrCode_pos[iHM_Zaehler2]; ? ? ? ? ? ? ? ? ? ? 此时将刚转换的四个数值加起来4+2+5+10=21??? ? ? ? END_FOR;? ? ? ?? ? ? ??// 如果数据有效，则计算校验位? ? ? ? IF NOT xF_Invalide_Daten_C39 THEN? ? ? ? ? ??// 计算模43结果? ? ? ? ? ? iMOD_39 := iCharCode39 MOD?43?;? ? ? ? ? ??? ? ? ? ? ??// 将模43结果转换为对应的字符? ? ? ? ? ? CASE iMOD_39 OF? ? ? ? ? ? ? ??0? : chrPZ :=?'0';? ? ? ? ? ? ? ??1? : chrPZ :=?'1';? ? ? ? ? ? ? ??2? : chrPZ :=?'2';? ? ? ? ? ? ? ??3? : chrPZ :=?'3';? ? ? ? ? ? ? ??4? : chrPZ :=?'4';? ? ? ? ? ? ? ??5? : chrPZ :=?'5';? ? ? ? ? ? ? ??6? : chrPZ :=?'6';? ? ? ? ? ? ? ??7? : chrPZ :=?'7';? ? ? ? ? ? ? ??8? : chrPZ :=?'8';? ? ? ? ? ? ? ??9? : chrPZ :=?'9';? ? ? ? ? ? ? ??10?: chrPZ :=?'A';? ? ? ? ? ? ? ??11?: chrPZ :=?'B';? ? ? ? ? ? ? ??12?: chrPZ :=?'C';? ? ? ? ? ? ? ??13?: chrPZ :=?'D';? ? ? ? ? ? ? ??14?: chrPZ :=?'E';? ? ? ? ? ? ? ??15?: chrPZ :=?'F';? ? ? ? ? ? ? ??16?: chrPZ :=?'G';? ? ? ? ? ? ? ??17?: chrPZ :=?'H';? ? ? ? ? ? ? ??18?: chrPZ :=?'I';? ? ? ? ? ? ? ??19?: chrPZ :=?'J';? ? ? ? ? ? ? ??20?: chrPZ :=?'K';? ? ? ? ? ? ? ??21?: chrPZ :=?'L';? ? ? ? ? ? ? ??22?: chrPZ :=?'M';? ? ? ? ? ? ? ??23?: chrPZ :=?'N';? ? ? ? ? ? ? ??24?: chrPZ :=?'O';? ? ? ? ? ? ? ??25?: chrPZ :=?'P';? ? ? ? ? ? ? ??26?: chrPZ :=?'Q';? ? ? ? ? ? ? ??27?: chrPZ :=?'R';? ? ? ? ? ? ? ??28?: chrPZ :=?'S';? ? ? ? ? ? ? ??29?: chrPZ :=?'T';? ? ? ? ? ? ? ??30?: chrPZ :=?'U';? ? ? ? ? ? ? ??31?: chrPZ :=?'V';? ? ? ? ? ? ? ??32?: chrPZ :=?'W';? ? ? ? ? ? ? ??33?: chrPZ :=?'X';? ? ? ? ? ? ? ??34?: chrPZ :=?'Y';? ? ? ? ? ? ? ??35?: chrPZ :=?'Z';? ? ? ? ? ? ? ??36?: chrPZ :=?'-';? ? ? ? ? ? ? ??37?: chrPZ :=?'.';? ? ? ? ? ? ? ??38?: chrPZ :=?' ';? ? ? ? ? ? ? ??39?: chrPZ :=?'$24';? ? ? ? ? ? ? ??40?: chrPZ :=?'/';? ? ? ? ? ? ? ??41?: chrPZ :=?'+';? ? ? ? ? ? ? ??42?: chrPZ :=?'%';? ? ? ? ? ? END_CASE;? ? ? ? ? ??? ? ? ? ? ??// 将字符转换为字节存储到输出校验位1? ? ? ? ? ? PruefZiff1_Out := INT_TO_BYTE(CHAR_TO_INT(chrPZ));? ? ? ? ? ? PruefZiff2_Out :=?0;?// 输出校验位2设为0? ? ? ? ? ??// 如果不是仅验证数据有效性模式? ? ? ? ? ? IF NOT xCfg_2 THEN ? ? ? ? ? ? ?? ? ? ? ? ? ? ??// 将计算得到的校验位与输入校验位比较? ? ? ? ? ? ? ? Pruef_IO := PruefZiff1_Out = PruefZiff1_In;? ? ? ? ? ? ELSE ? ?// 仅验证数据有效性，不验证校验位? ? ? ? ? ? ? ? strVisutext_Ziffer[3] := PruefZiff1_Out;? ? ? ? ? ? ? ? Pruef_IO := TRUE; ? ?? ? ? ? ? ? END_IF; ? ?? ? ? ??? ? ? ? END_IF;? ? ELSIF xCfg_3 THEN ??// CRC16 Genibus校验? ? ? ? wCRCTemp :=?16#FFFF;// CRC初始值? ? ? ??? ? ? ??// 对每个数据字节进行CRC计算? ? ? ? FOR iHM_Zaehler2 :=?2?TO (2?+ DatenLaenge -?1) DO? ? ? ? ? ??? ? ? ? ? ??// 计算CRC表索引? ? ? ? ? ? iCRCIndex := WORD_TO_INT(SHR(IN := wCRCTemp, N :=?8) XOR Buffer[iHM_Zaehler2]);?? ? ? ? ? ??? ? ? ? ? ??// 根据索引选择对应的CRC表进行计算? ? ? ? ? ? IF iCRCIndex <=?127?THEN? ? ? ? ? ? ? ? wCRCTemp := SHL(IN := wCRCTemp, N :=?8) XOR CRCTable1[iCRCIndex];?? ? ? ? ? ? ELSE? ? ? ? ? ? ? ? wCRCTemp := SHL(IN := wCRCTemp, N :=?8) XOR CRCTable2[iCRCIndex -?128];?? ? ? ? ? ? END_IF;? ? ? ??? ? ? ? END_FOR;? ? ? ??? ? ? ??// 计算最终的CRC值? ? ? ? _wCRC := wCRCTemp XOR?16#FFFF;? ? ? ??? ? ? ??// 输出CRC的高低位字节? ? ? ? PruefZiff1_Out := wCRC.B1; ??// 高位字节? ? ? ? PruefZiff2_Out := wCRC.B2; ??// 低位字节? ? ? ??? ? ? ??// 如果不是仅输出校验位模式? ? ? ? IF NOT xCfg_4 THEN? ? ? ? ? ??// 显示输入的校验位? ? ? ? ? ? Visutext_Ziffer_Hex.B1 := PruefZiff1_In;? ? ? ? ? ? Visutext_Ziffer_Hex.B2 := PruefZiff2_In;? ? ? ? ? ??? ? ? ? ? ??// 比较计算得到的校验位与输入校验位? ? ? ? ? ? Pruef_IO := PruefZiff1_Out = PruefZiff1_In?? ? ? ? ? ? ? ? ? ? AND PruefZiff2_Out = PruefZiff2_In; ? ??? ? ? ? ELSE? ? ? ? ? ??// 显示计算得到的校验位? ? ? ? ? ? Visutext_Ziffer_Hex.B1 := PruefZiff1_Out;? ? ? ? ? ? Visutext_Ziffer_Hex.B2 := PruefZiff2_Out;? ? ? ? ? ??? ? ? ? ? ? Pruef_IO := TRUE;? ? ? ? END_IF; ? ?? ? ? ? ? ??? ? END_IF; ? ?? ??? ??// 校验不通过 = 校验通过的非? ? Pruef_NIO := NOT Pruef_IO;END_IF;// 无效校验数据 = Code 39无效数据 或 Code 2/5无效数据Invalide_Pruefdaten := xF_Invalide_Daten_C39 OR xF_Invalide_Daten_C2x5;(*----------------------------------------------------------------------------------*)(* 汇总故障 *)Stoexx := False; ?// 初始化为无故障(*----------------------------------------------------------------------------------*)(* 链式故障输出 = 链式故障输入 或 汇总故障 *)VkStoe_Out:= VkStoe_In OR Stoexx;(*----------------------------------------------------------------------------------*)// 可视化相关设置dwVisuWerte1.X0 ? ? := FALSE; ? ? ? ? ? ? ?dwVisuWerte1.X1 ? ? := FALSE; ? ? ? ? ? ? ?dwVisuWerte1.X2 ? ? := xCfg_3; ? ? ? ? ? ? ?(* 显示CRC16是否选中 *)dwVisuWerte1.X3 ? ? := Pruef_IO; ? ? ? ? ? ?(* 显示校验是否通过 *)dwVisuWerte1.X4 ? ? := NOT Invalide_Pruefdaten AND (Pruef_NIO OR Pruef_IO); (* 显示数据是否有效 *)?dwVisuWerte1.X5 ? ? := Frg_Start AND NOT oProz AND Pruef_Auswahl_IO; ? ? ? ? ? (* 控制Start按钮是否可点击 *) ? ? ? ?dwVisuWerte1.X6 ? ? := Frg_oProz; ? ? ? ? ? (* 控制Ohne按钮是否可点击 *)dwVisuWerte1.X7 ? ? := Pruef_NIO?? ? ? ? ? ? ? ? ? ? OR DatenLaenge <?1? ? ? ? ? ? ? ? ? ? OR xF_PruefdatenKopie? ? ? ? ? ? ? ? ? ? OR xF_Invalide_Daten_C2x5? ? ? ? ? ? ? ? ? ? OR xF_Invalide_Daten_C39; ?(* 控制是否显示红色边框 *)dwVisuWerte1.X8 ? ? := FALSE; ? ? ? ? ? ? ? (* 不显示黄色边框 *)// 可视化Start按钮设置dwVisuWerte1.B3 := BYTE#64;?// 显示Start按钮// 根据Start信号状态设置按钮颜色IF xS_Start THEN?? ? dwVisuWerte1.B3 ? ? ? ? := ?dwVisuWerte1.B3 OR BYTE#16#01?; (*01: 绿色背景 黑色文本*)ELSE? ? dwVisuWerte1.B3 ? ? ? ? := ?dwVisuWerte1.B3 OR BYTE#16#00?; (*00: 灰色背景 黑色文本*)END_IF;// 可视化Ohne按钮设置dwVisuWerte1.B2 := BYTE#64;?// 显示Ohne按钮// 根据无过程模式状态设置按钮颜色IF oProz THEN ?? ? dwVisuWerte1.B2 ? ? ? ? := dwVisuWerte1.B2 OR BYTE#16#06?; (*06: 黄色背景 黑色文本*)ELSE? ? dwVisuWerte1.B2 ? ? ? ? := dwVisuWerte1.B2 OR BYTE#16#00?; (*00: 灰色背景 黑色文本*)END_IF;(************************************************************************************)(**SIEMENS***************************************************************************)(************Anfang Signalaufbereitung Meldesystem fuer den Siemensteil**************)(***********************AUFRUF am Ende im SCL-BAUSTEINS******************************)// 初始化消息指针_pMeldFeld ?:= MeldFeld;_pMeldAbb ? := MeldAbb;_pMeld ? ? ?:= ST_Meld;// 修改消息指针的存储区域（从DB到DI）pMeldFeld.BZ := pMeldFeld.BZ OR?16#1000000;?pMeldAbb.BZ ?:= pMeldAbb.BZ ?OR?16#1000000;?// 设置消息系统的故障标志MSys.xF_1 ? := DatenLaenge <?1; ? ? ? ? ? ??//'STE/Pruefdatenlaenge = 0' 校验数据长度为0MSys.xF_2 ? := xF_Invalide_Daten_C2x5; ? ? ?//'STE/Code2x5 Invalide Daten' Code 2/5无效数据MSys.xF_3 ? := xF_Invalide_Daten_C39; ? ? ??//'STE/Code39 Invalide Daten' Code 39无效数据MSys.xF_4 ? := xF_PruefdatenKopie; ? ? ? ? ?//'STE/Pruefdaten nicht einlesbar 校验数据无法读取? ? ?// 发送消息MeldSend(AufrufNr ? ? ? :=?1? ? ? ? ?,Anz_Meld ? ? ?:=?4?? ? ? ? ?,pMeldFeld ? ? := pMeldFeld.BZ? ? ? ? ?,pMeldAbb ? ? ?:= pMeldAbb.BZ? ? ? ? ?,MeldDB ? ? ? ?:= WORD_TO_INT(pMeld.DBNR)? ? ? ? ?,AenderungsID ?:= AenderungsID? ? ? ? ?,Integritaet ? := Integritaet? ? ? ? ?,Neustart ? ? ?:=?"Neustart"? ? ? ? ?);// 站点相关的故障汇总DB_ARG.VisuSS.Station_Stoer:= DB_ARG.VisuSS.Station_Stoer?? ? ? ? ? ? ? ? ? ? ? ? ? ? OR Msys.xF_1? ? ? ? ? ? ? ? ? ? ? ? ? ? OR Msys.xF_2? ? ? ? ? ? ? ? ? ? ? ? ? ? OR Msys.xF_3? ? ? ? ? ? ? ? ? ? ? ? ? ? OR Msys.xF_4;? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?// 站点相关的警告汇总（此处未使用，设为FALSE）DB_ARG.VisuSS.Station_Warn := DB_ARG.VisuSS.Station_Warn?? ? ? ? ? ? ? ? ? ? ? ? ? ?OR FALSE ;? ? ? ? ? ? ? ? ? ? ? ? ? ?// 站点相关的维护提示汇总（此处未使用，设为FALSE）DB_ARG.VisuSS.Station_Wart := DB_ARG.VisuSS.Station_Wart?? ? ? ? ? ? ? ? ? ? ? ? ? ?OR FALSE ;(**SIEMENS***************************************************************************)(*************Ende Signalaufbereitung Meldesystem fuer den Siemensteil****************)(************************************************************************************)// 注释掉的代码：块移动操作（用于优化循环时间）//erg_SFC20:= BLKMOV(srcblk:= _ST_BA, dstblk:= ST_BA); ? ?//Zykluszeitoptimierung(*----------------------------------------Ende--------------------------------------*)END_FUNCTION_BLOCK```以上是对FB_Pruefziffer功能块的逐行详细解读。这个功能块主要实现了三种校验算法（Code 2/5、Code 39和CRC16），用于计算和验证数据的校验位。功能块还包含了与可视化界面交互的逻辑，能够显示数据和校验结果，并通过消息系统报告故障状态。整个功能块设计严谨，考虑了各种边界情况和错误处理，适用于工业自动化环境中的数据校验场景。

加入知识星球智能制造与自动化，加入会员可下载此公众号发布文章中的相关资料（行业报告、MES、数字化技术方案、自动化教程、自动化行业标准化资料VASSSICAR戴姆勒等、C#上位机开发、node-red开发、人工智能教程等）。