Hintergrundkommunikation

Die Kommunikation zwischen der seriellen Hardware und dem Datenpuffer vom Typ ComBuffer wird mit einem separaten Baustein ComControl abgewickelt.

Siehe auch Kommunikationskonzept.

PROGRAM MAIN
VAR
    ComControl: KL6ControlBC;
    Timer: TON;
    Receive: ReceiveByte;
    Send: SendByte;
    Rb: BYTE;
    Sb: BYTE;
END_VAR

ComControl( CoMin:=KL6InData,
            CoMout:=KL6OutData,
            TxBuffer:=TxBuffer,
            RxBuffer:=RxBuffer );

Timer(IN:=TRUE,PT:=T#1S );
IF Timer.Q THEN
    IF Sb=0 THEN
        Sb:=64;
    END IF
    Sb:=Sb+1;
    IF Sb>90 THEN
        Sb:=64;
    END IF
    Send(SendByte:=Sb, TxBuffer:=TxBuffer);
    Timer(IN:=FALSE);
END IF