VAR CONSTANT
    c_tInterval     : TIME := T#1S;
    c_udiInterval   : UDINT := 3 * TIME_TO_UDINT(c_tInterval)/1000;
END_VAR
VAR
    ipAddress       : NBS.IPv4Address;
    fbTcpClient     : NBS.TCP_Client;
    fbTcpRead       : NBS.TCP_Read;
    fbTcpWrite      : NBS.TCP_Write;
     
    abyTx           : ARRAY [0..gvlSetting.gc_wMaxTelegram] OF BYTE;
    abyRx           : ARRAY [0..gvlSetting.gc_wMaxTelegram] OF BYTE;
     
    fbBlink         : BLINK := (TIMELOW := c_tInterval, TIMEHIGH := c_tInterval);      
    xBlink          : BOOL; // Memory of the last state of PLC_PRG.fbBlink
     
    udiVal          : UDINT;
    pudiVal         : POINTER TO BYTE;
    iIndex          : INT;
    xConnect        : BOOL;
     
    xRead           : BOOL;
    xMissingAck     : BOOL;
    udiResult       : UDINT;
    udiLastAck      : UDINT;
    udiNow          : UDINT;
    udiRead         : UDINT;
    eRErrorID       : NBS.ERROR;
    eWErrorID       : NBS.ERROR;
END_VAR


IF NOT fbTcpClient.xActive THEN
    ipAddress.SetInitialValue(ipAddress := gvlSetting.gc_stIpAddr);
END_IF
fbTcpClient(xEnable := xConnect, itfIPAddress := ipAddress, uiPort := gvlSetting.gc_uiPort, udiTimeOut := 0);
 
fbBlink(ENABLE := TRUE);
IF (fbBlink.OUT AND (xBlink <> fbBlink.OUT) ) THEN
    udiVal := udiVal + 1;
    FOR iIndex := 0 TO gvlSetting.gc_wMaxTelegram DO
        abyTx[iIndex] := 0;
    END_FOR
    // 'WD: ' = Watchdog-Telegram
    abyTx[0] := 87;
    abyTx[1] :=  0" class="post-container bg-white pb-3" style="min-height:360px;">

{{item.nickname}}

{{item.c_time}}{{key+1}}楼

{{item.content}}

点赞({{item.like}})
点赞({{item.like}})
回复

{{item2.nickname}}

{{item2.c_time}}
点赞(1)
回复

{{item2.content}}