{+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
        DECLARE THE FOLLOWING IN YOUR MAIN PROGRAM.
CONST
 DEFAULT       = 80;
 SMAX          = 255;
 space         = ' ';
 maxargc       = 5;    < maximum # of words you expect to parse >
                       < out of the Command line.               >

TYPE
 byte          = 0..255;
 int           = INTEGER;
 DSTRING       = string default;
 MSTRING       = STRING SMAX;
 S$0           = string 0;
 S$255         = string 255;

VAR
 argc : byte;
 argv : ARRAY [1..maxargc] OF DSTRING;
 infile,
 outfile,
 params : byte;
 inbuf : MSTRING;
 ioresult,
 con_wanted,
 printer_wanted : boolean;
 stdin,
 stdout        : TEXT;

PROCEDURE HALT(message:MSTRING);EXTERNAL;

++++++++++++++++++++++++++++++++++++++++++++++++++++}