example.iecst

CONFIGURATION DefaultCfg
  VAR_GLOBAL
    Start_Stop AT %IX0.0 : BOOL; (* This is a comment *) 
  END_VAR
  TASK NewTask  (INTERVAL := T#20MS);
  PROGRAM Main WITH NewTask : PLC_PRG;
END_CONFIGURATION

PROGRAM demo
  VAR_EXTERNAL
    Start_Stop : BOOL;
  END_VAR
  VAR
    a : REAL; // Another comment
    todTest : TIME_OF_DAY := TOD#12 : 55;
  END_VAR
  a := csq(12.5); 16#FAC0 2#1001_0110
  IF a > REAL#100 THEN
    Start_Stop := TRUE;
  END_IF
END_PROGRAM;

FUNCTION_BLOCK PRIVATE MyName EXTENDS AnotherName
	
END_FUNCTION_BLOCK
 /* Get a square of the circle */ 
FUNCTION csq : REAL 
  VAR_INPUT
    r : REAL;
  END_VAR
  VAR CONSTANT
    c_pi : REAL := 3.14;
  END_VAR
  TON(IN := TRUE, PT := T#10S);
  csq := ABS(c_pi * (r * 2));
END_FUNCTION