[r4]: / trunk / 2.0.0.1 / +CTRLBYTE / ExampleProject 2.0.0.1.project.md  Maximize  Restore  History

Download this file

42 lines (38 with data), 630 Bytes

<?xml version="1.0" encoding="utf-8"?>---

PROGRAM PRG
VAR
    inByte: BYTE;
    outByte: BYTE;
    xOut0: BOOL;
    xOut1: BOOL;
    xOut2: BOOL;
    xOut3: BOOL;
    iAO0: INT;
    iAO1: INT;
    iAI0: INT;
    iAI1: INT;
    xIn0: BOOL;
    xIn1: BOOL;
    xIn2: BOOL;
    xIn3: BOOL;
END_VAR

outbyte := outbyte + 1;
IF outbyte &gt; 15 THEN
    OutByte := 0;
END_IF
xOut0 := outbyte.0;
xOut1 := outbyte.1;
xOut2 := outbyte.2;
xOut3 := outbyte.3;

iAO0 := IAO0 + 1;
IF iAO0 &gt; 4096 THEN
    iAO0 := 0;
END_IF;

iAO1 := IAO0;
IF iAO1 &gt; 4096 THEN
    iAO1 := 0;
END_IF;