BETA    up
 
 


 Hello World   Michael Neumann 
(#
do
   'Hello World' -> putline
#)
Prints "Hello World" onto the screen.


 Loop-Test   Michael Neumann 
(#
   schleife:  (# n: @integer
              enter n
              do (for n repeat inner for)
              #)
do
   9 -> schleife  (#
                  do 10-n -> schleife (#
                                      do n -> putint; ' ' -> put
                                      #) newline
                  #)
#)
Prints following onto the screen:
1 2 3 4 5 6 7 8 9
1 2 3 4 5 6 7 8
1 2 3 4 5 6 7
1 2 3 4 5 6
1 2 3 4 5
1 2 3 4
1 2 3
1 2
1


 Squares   Michael Neumann 
(#
do
   (for i:10 repeat
      i*i -> putint
   for)
#)
Outputs the squares from 1 to 10.