system$ Example
10 CLEAR SCREEN
20 PRINT "*** System$ TEST ****"
30 PRINT "Memory "&SYSTEM$("AVAILABLE MEMORY")
40 PRINT "CRT ID: "&SYSTEM$("CRT ID")
50 PRINT "DISP line: "&SYSTEM$("DISP LINE")
60 PRINT "Dump devices: "&SYSTEM$("DUMP DEVICE IS")
70 PRINT "Graphics: "&SYSTEM$("GRAPHICS INPUT IS") !401
80 PRINT "Input line is: "&SYSTEM$("KBD LINE")
90 PRINT "Lexical order: "&SYSTEM$("LEXICAL ORDER IS")
100 PRINT "Mss memory: "&SYSTEM$("MASS MEMORY")
110 PRINT "Mass storage: "&SYSTEM$("MSI")
120 PRINT "Plotter: "&SYSTEM$("PLOTTER IS")
130 PRINT "Printer: "&SYSTEM$("PRINTER IS")
140 PRINT "Process ID: "&SYSTEM$("PROCESS ID")
150 PRINT "Serial number: "&SYSTEM$("SERIAL NUMBER") !401
160 PRINT "System ID: "&SYSTEM$("SYSTEM ID")
170 PRINT "Priority: "&SYSTEM$("SYSTEM PRIORITY")
180 PRINT "Timezone: "&SYSTEM$("TIMEZONE IS")
190 PRINT "Trig mode: "&SYSTEM$("TRIG MODE")
200 PRINT "BASIC ver: "&SYSTEM$("VERSION:BASIC")
210 PRINT SYSTEM$("VERSION:HTB")
220 PRINT "OS ver: "&SYSTEM$("VERSION:OS")
230 PRINT "Wild cards are: "&SYSTEM$("WILDCARDS")
240 PRINT "Window system: "&SYSTEM$("WINDOW SYSTEM")
250 END
