SystemSh0cker/monaco-editor
1
0
Fork 0
mirror of https://github.com/microsoft/monaco-editor.git synced 2025-12-22 18:32:56 +01:00
Code Issues Projects Releases Packages Activity

Structured text example (#1552)

Browse source 
Structured text example
This commit is contained in:
Alexandru Dima 2019-09-19 10:45:45 +02:00 • committed by GitHub
commit 9ac4ec836b
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 34 additions and 14 deletions
Download patch file Download diff file Expand all files Collapse all files

40
website/index/samples/sample.st.txt
View file

@ -1,14 +1,34 @@
FUNCTION_BLOCK SubFB CONFIGURATION DefaultCfg
VAR_INPUT VAR_GLOBAL
TimeIN : BOOL; (* Boolean input variable *) Start_Stop AT %IX0.0: BOOL; (* This is a comment *)
TimeQ : BOOL; (* Boolean input variable *)
END_VAR END_VAR
VAR_IN_OUT TASK NewTask (INTERVAL := T#20ms);
Timer : TON; (* pointer to instance Time1 of TON – input/output variable *) PROGRAM Main WITH NewTask : PLC_PRG;
END_VAR END_CONFIGURATION
VAR_OUTPUT
Time3 : TON; (* 3rd instance of TON *) PROGRAM demo
VAR_EXTERNAL
Start_Stop: BOOL;
END_VAR END_VAR
VAR VAR
Start : BOOL := TRUE; (* local Boolean variable *) a : REAL; // Another comment
todTest: TIME_OF_DAY := TOD#12:55;
END_VAR END_VAR
a := csq(12.5);
TON1(IN := TRUE, PT := T#2s);
16#FAC0 2#1001_0110
IF TON1.Q AND a > REAL#100 THEN
Start_Stop := TRUE;
END_IF
END_PROGRAM;
/* 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