Branch
Hash :
8704cdfb
Author :
Date :
2020-04-12T23:15:37
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39
<h2>Code</h2>
<pre><code>
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;
StringVar: STRING[250] := "Test String"
END_VAR
VAR
a : REAL; // Another comment
todTest: TIME_OF_DAY := TOD#12:55;
END_VAR
a := csq(12.5);
IF a > REAL#100 - 16#FAC0 + 2#1001_0110 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
csq := ABS(c_pi * (r * 2));
END_FUNCTION
</code></pre>