       10 // Test program for SYS sysin and SYS sysout.
       20 //
       30 PROC deliet EXTERNAL "deliet.sq"
       40 //
       50 deliet("aap")
       60 SYS sysout, "aap"
       70 PRINT 4
       80 PRINT 5
       90 SYS sysout, ""
      100 SYS sysin, "aap"
      110 INPUT a
      120 INPUT b
      130 SYS sysin, ""
      140 SYS assert, a+b=9
      150 DELETE "aap"
      160 PRINT "Ok"
