aboutsummaryrefslogtreecommitdiff
path: root/plugin/examples/highlighting.cps
diff options
context:
space:
mode:
Diffstat (limited to 'plugin/examples/highlighting.cps')
-rw-r--r--plugin/examples/highlighting.cps41
1 files changed, 41 insertions, 0 deletions
diff --git a/plugin/examples/highlighting.cps b/plugin/examples/highlighting.cps
new file mode 100644
index 0000000..9925bf3
--- /dev/null
+++ b/plugin/examples/highlighting.cps
@@ -0,0 +1,41 @@
+// Open in a dark theme; keywords are uppercase and comments ignore [(
+TYPE Season = (Spring, Summer, Autumn, Winter)
+TYPE IntPointer = ^INTEGER
+TYPE Student
+ DECLARE Name : STRING
+ DECLARE Initial : CHAR
+ENDTYPE
+
+DECLARE Values : ARRAY[1:3] OF INTEGER
+DECLARE Index : INTEGER
+DECLARE Total : REAL
+DECLARE Ready : BOOLEAN
+DECLARE Text : STRING
+DECLARE Letter : CHAR
+Ready <- TRUE AND NOT FALSE
+Total <- -3.5 + 2 * 4 / 2
+Text <- "CIE // [()]" & " pseudocode"
+Letter <- 'A'
+
+FOR Index <- 1 TO 3 STEP 1
+ Values[Index] <- Index MOD 2
+NEXT Index
+IF Ready OR Total >= 1 THEN
+ OUTPUT MID(Text, 1, LENGTH(Text))
+ELSE
+ OUTPUT "Try again"
+ENDIF
+
+FUNCTION Double(Value : INTEGER) RETURNS INTEGER
+ RETURN Value * 2
+ENDFUNCTION
+PROCEDURE Swap(BYREF X : INTEGER, Y : INTEGER)
+ DECLARE Temp : INTEGER
+ Temp <- X
+ X <- Y
+ Y <- Temp
+ENDPROCEDURE
+
+OPENFILE "example.txt" FOR WRITE
+WRITEFILE "example.txt", Text
+CLOSEFILE "example.txt"