User Tools

Site Tools


cdc:nos2.source:opl871:helplib

HELPLIB

Table Of Contents

Source Code

HELPLIB.txt
ASCII
*WIDTH 132
*NOSEQ
.PROC,ACCESS*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D ACCESS

      T^H^E ACCESS ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M.  Y^O^U ^M^U^S^T ^B^E
      ^A^U^T^H^O^R^I^Z^E^D ^T^O ^U^S^E ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M (^R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D).

      W^H^I^L^E ^I^N ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M, ^Y^O^U ^C^A^N ^C^O^M^M^U^N^I^C^A^T^E ^W^I^T^H ^A^N^O^T^H^E^R
      ^I^N^T^E^R^A^C^T^I^V^E ^T^E^R^M^I^N^A^L ^U^S^I^N^G ^T^H^E DIAL ^A^N^D WHATJSN ^C^O^M^M^A^N^D^S.  (Y^O^U
      ^C^A^N^N^O^T ^E^N^T^E^R ^T^H^E RUN ^C^O^M^M^A^N^D ^U^N^D^E^R ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M.)
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,ALTER*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ALTER,^C1,^C2,...,^C^N,/^S^T^R^I^N^G1/^S^T^R^I^N^G2/

      T^H^E ALTER ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G^S ^I^N ^A ^P^R^I^M^A^R^Y ^F^I^L^E.

      I^F ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D (^C1,^C2,...,^C^N), ^T^H^E ^C^H^A^N^G^E^S ^S^P^E^C^I^F^I^E^D
      ^B^Y ^S^T^R^I^N^G1 ^A^N^D ^S^T^R^I^N^G2 ^A^P^P^L^Y ^T^O ^T^H^E ^E^N^T^I^R^E ^F^I^L^E.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^L^I^N^E^S ^A^N^D ^S^T^R^I^N^G ^P^A^I^R, ^O^N^L^Y ^T^H^E ^O^C^C^U^R^R^E^N^C^E^S ^O^F ^S^T^R^I^N^G
      ^A^P^P^E^A^R^I^N^G ^I^N ^T^H^E ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^R^E ^C^H^A^N^G^E^D ^T^O
      ^S^T^R^I^N^G2, (^F^O^R ^E^X^A^M^P^L^E, ^A^L^T^E^R,100...130,/^B/^C/).  L^I^N^E^S 100 ^T^H^R^O^U^G^H 130
      ^C^O^N^T^A^I^N^I^N^G ^S^T^R^I^N^G1 (^B) ^A^R^E ^R^E^P^L^A^C^E^D ^W^I^T^H ^S^T^R^I^N^G2 (^C).

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R, ^S^T^R^I^N^G1, ^A^N^D ^A ^N^U^L^L ^S^T^R^I^N^G2
      (/^S^T^R^I^N^G1//), ^S^T^R^I^N^G1 ^I^S ^D^E^L^E^T^E^D ^F^R^O^M ^T^H^E ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E
      ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R, ^A ^N^U^L^L ^S^T^R^I^N^G1, ^A^N^D ^S^T^R^I^N^G2
      (//^S^T^R^I^N^G2/), ^S^T^R^I^N^G2 ^I^S ^A^P^P^E^N^D^E^D ^T^O ^T^H^E ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E ^L^I^N^E^S
      ^P^A^R^A^M^E^T^E^R.

      T^O ^C^O^R^R^E^C^T ^A ^S^I^N^G^L^E ^L^I^N^E ^I^N ^E^R^R^O^R, ^Y^O^U ^C^A^N ^S^I^M^P^L^Y ^R^E^S^P^E^C^I^F^Y ^T^H^E ^L^I^N^E
      ^N^U^M^B^E^R, ^E^N^T^E^R ^T^H^E ^O^L^D ^T^E^X^T ^T^O ^B^E ^C^H^A^N^G^E^D (^S^T^R^I^N^G1), ^T^H^E^N ^E^N^T^E^R ^T^H^E
      ^N^E^W ^T^E^X^T (^S^T^R^I^N^G2).

      Y^O^U ^C^A^N ^O^N^L^Y ^E^N^T^E^R ^T^H^I^S ^C^O^M^M^A^N^D ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,APL*I
,ILFN[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=INPUT)
,OLFN[S^O^U^R^C^E O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=OUTPUT)
,LO[B^A^T^C^H O^U^T^P^U^T O^P^T^I^O^N (LO)]=(*A1,*N=0)
,MN[M^I^N^I^M^U^M F^I^E^L^D L^E^N^G^T^H (MN)]=(*A1)
,MX[M^A^X^I^M^U^M F^I^E^L^D L^E^N^G^T^H (MX)]=(*A6,*N=)
,PW[P^A^S^S^W^O^R^D (PW)]=(*A7)
,TT[T^E^R^M^I^N^A^L T^Y^P^E (TT)]=(*A6,*N=ASCAPL)
,UN[U^S^E^R N^A^M^E (UN)]=(*A7)
,WS[A^C^T^I^V^E W^O^R^K^S^P^A^C^E (WS)]=(*A7)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  APL,I=^L^F^N,L=^L^F^N,LO=^B,MN=^M^N^F1,MX=^M^X^F1,PW=^P^A^S^S^W^O^R^D,TT=^T^T^Y
                  ,UN=^U^S^E^R^N^A^M,WS=^W^S^N^A^M^E.

      T^H^E ^C^O^M^M^A^N^D APL ^C^A^L^L^S ^T^H^E APL2 ^I^N^T^E^R^P^R^E^T^E^R.

.HELP,ILFN,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  T^H^E ^D^E^F^A^U^L^T ^F^I^L^E ^I^S
      I=INPUT.
.HELP,OLFN,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  T^H^E ^D^E^F^A^U^L^T ^F^I^L^E
      ^I^S L=OUTPUT.  I^F ^Y^O^U ^S^P^E^C^I^F^Y L=0, ^N^O APL ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^B

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^A^T^C^H ^O^U^T^P^U^T ^O^P^T^I^O^N^S; ^A^N^Y ^O^R ^A^L^L ^C^A^N ^B^E
      ^S^P^E^C^I^F^I^E^D, ^F^O^R ^E^X^A^M^P^L^E LO=EP.  T^H^E ^D^E^F^A^U^L^T ^I^S L=0.

         ^B                               M^E^A^N^I^N^G
         -                               -------
         E       B^A^T^C^H ^O^U^T^P^U^T ^E^C^H^O^S ^I^N^P^U^T.

         P       P^R^O^H^I^B^I^T^S ^P^R^O^M^P^T.

         B       I^N^S^E^R^T^S ^A ^B^L^A^N^K ^I^N ^T^H^E ^F^I^R^S^T ^C^O^L^U^M^N ^O^F ^E^A^C^H ^O^U^T^P^U^T ^L^I^N^E.

         0       N^O ^B^A^T^C^H ^O^U^T^P^U^T ^O^P^T^I^O^N^S.
.HELP,MN,NOLIST

      F^O^R^M^A^T@D  MN=^M^N^F^L

      T^H^E ^P^A^R^A^M^E^T^E^R MN ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^I^N^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H ^M^N^F^L.  I^F MN ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S ^T^H^E ^M^I^N^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H.
.HELP,MX,NOLIST

      F^O^R^M^A^T@D  MX=^M^X^F^L

      T^H^E ^P^A^R^A^M^E^T^E^R MX ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H ^M^X^F^L.  I^F MX ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S ^A ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H ^O^F 24576 ^W^O^R^D^S (60000
      ^O^C^T^A^L) ^O^R ^M^A^X^I^M^U^M ^A^L^L^O^W^E^D, ^W^H^I^C^H^E^V^E^R ^I^S ^L^E^S^S.
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^P^A^S^S^W^O^R^D

      T^H^E ^P^A^R^A^M^E^T^E^R PW ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^S^S^W^O^R^D ^T^O ^B^E ^U^S^E^D ^W^H^E^N ^U^S^I^N^G ^A^N^O^T^H^E^R
      ^U^S^E^R'^S ^W^O^R^K^S^P^A^C^E.  I^F PW ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O ^P^A^S^S^W^O^R^D.
.HELP,TT,NOLIST

      F^O^R^M^A^T@D  TT=^T^T^Y

      T^H^E ^P^A^R^A^M^E^T^E^R TT ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^T^Y^P^E ^T^O ^B^E ^U^S^E^D.  T^H^E ^D^E^F^A^U^L^T ^F^O^R
      ^J^O^B^S ^E^N^T^E^R^E^D ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^T^E^R^M^I^N^A^L ^I^S TT=ASCAPL.  I^F ^T^H^E ^J^O^B ^W^A^S
      ^E^N^T^E^R^E^D ^F^R^O^M ^A ^B^A^T^C^H ^O^R ^R^E^M^O^T^E ^B^A^T^C^H, ^T^H^E ^D^E^F^A^U^L^T ^I^S TT=BATCH.

         ^T^T^Y                       M^E^A^N^I^N^G
         ---                       -------
         COR       C^O^R^R^E^S^P^O^N^D^E^N^C^E APL ^T^E^R^M^I^N^A^L.

         TYPE      T^Y^P^E^W^R^I^T^E^R-^P^A^I^R^I^N^G APL ^T^E^R^M^I^N^A^L.

         BIT       B^I^T-^P^A^I^R^I^N^G APL ^T^E^R^M^I^N^A^L.

         ASCAPL    U^S^E^D ^W^H^E^N ^S^Y^S^T^E^M ^T^R^A^N^S^L^A^T^E^S APL ^C^O^D^E^S ^I^N^T^O ^S^T^A^N^D^A^R^D
                   ^I^N^T^E^R^M^E^D^I^A^T^E ^C^O^D^E.

         TTY33     T^E^L^E^T^Y^P^E 33 ^T^E^R^M^I^N^A^L.

         ASCII     F^U^L^L ASCII ^T^E^R^M^I^N^A^L ^N^O^T ^E^Q^U^I^P^P^E^D ^T^O ^P^R^I^N^T APL ^C^H^A^R^A^T^E^R ^S^E^T.
                   A^L^S^O ^U^S^E^D ^F^O^R ^N^O^N-APL ^C^O^R^R^E^S^P^O^N^D^E^N^C^E ^T^E^R^M^I^N^A^L.

         BATCH     D^E^V^I^C^E^S ^T^H^A^T ^S^U^P^P^O^R^T ASCII ^G^R^A^P^H^I^C 64-^C^H^A^R^A^C^T^E^R ^S^E^T ^S^U^C^H ^A^S
                   ^L^O^C^A^L ^A^N^D ^R^E^M^O^T^E ^B^A^T^C^H ASCII ^P^R^I^N^T^E^R.

         TTB501    B^A^T^C^H ^P^R^I^N^T^E^R.

         TT383     T^E^L^E^T^Y^P^E 38 ^T^E^R^M^I^N^A^L.

         713       F^U^L^L ASCII ^T^E^R^M^I^N^A^L.
.HELP,UN,NOLIST

      F^O^R^M^A^T@D  UN=^U^S^E^R^N^A^M

      T^H^E ^P^A^R^A^M^E^T^E^R UN ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^F^O^R ^T^H^E ^I^N^I^T^I^A^L ^W^O^R^K^S^P^A^C^E.  I^F
      UN ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^U^S^E^R ^N^A^M^E ^U^S^E^D ^T^O ^S^I^G^N ^O^N.
.HELP,WS,NOLIST

      F^O^R^M^A^T@D  WS=^W^S^N^A^M^E

      T^H^E ^P^A^R^A^M^E^T^E^R WS ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^C^T^I^V^E ^W^O^R^K^S^P^A^C^E.  I^F WS ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^A ^C^L^E^A^R ^W^O^R^K^S^P^A^C^E.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,APPEND*I
/PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^O ^A^P^P^E^N^D ^T^O]=(*F)
,LFN[L^O^C^A^L ^F^I^L^E ^T^O ^A^P^P^E^N^D]=(*F)
,UN [U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW [F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,PN [A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R  [D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB [T^O ^W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,N=,NO=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  APPEND,^P^F^N,^L^F^N/UN=^U^N,PW=^P^W,PN=^P^N,R=^R,NA,WB.

      T^H^E APPEND ^C^O^M^M^A^N^D ^A^D^D^S ^D^A^T^A ^T^O ^T^H^E ^E^N^D ^O^F ^A^N ^E^X^I^S^T^I^N^G ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S
      ^F^I^L^E ^W^I^T^H^O^U^T ^R^E^T^R^I^E^V^I^N^G ^T^H^E ^F^I^L^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^
      ^F^I^L^E ^T^O ^W^H^I^C^H ^D^A^T^A ^I^S ^A^P^P^E^N^D^E^D.  (A^N^Y ^L^O^C^A^L ^C^O^P^Y ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^I^S
      ^N^O^T ^C^H^A^N^G^E^D ^T^O; ^O^N^L^Y ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^I^S ^A^P^P^E^N^D^E^D ^T^O.)
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E
      ^T^O ^B^E ^A^P^P^E^N^D^E^D ^T^O ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E.  I^T ^M^U^S^T ^B^E ^L^O^C^A^L (^A^S^S^I^G^N^E^D ^T^O
      ^Y^O^U^R ^J^O^B) ^T^O ^B^E ^A^P^P^E^N^D^E^D.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E, ^W^H^I^C^H ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D
      ^I^F ^Y^O^U ^W^I^S^H ^T^O ^A^P^P^E^N^D ^D^A^T^A ^T^O ^A ^F^I^L^E ^W^H^I^C^H ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^P^W) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^A^P^P^E^N^D ^D^A^T^A ^T^O ^I^S
      ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^N^D ^H^A^S ^I^T^S ^O^W^N ^P^A^S^S^W^O^R^D, ^S^P^E^C^I^F^Y ^T^H^A^T ^P^A^S^S^W^O^

.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN=^P^N), ^W^H^I^C^H
      ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^A^P^P^E^N^D ^D^A^T^A ^T^O ^R^E^S^I^D^E^S ^O^N ^A^N
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.
.HELP,R,NOLIST
      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K, (4K ^S^E^C^T^O^R)  ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K, (16K ^S^E^C^T^O^R) ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K, (2K ^S^E^C^T^O^R) ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y PN (^P^A^C^K ^N^A^M^E),
      ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^E^R^R^O^R^S ^I^N APPEND ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E
      ^Y^O^U^R ^J^O^B.  I^N^S^T^E^A^D, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T,
      ^I^F ^T^H^E ^F^I^L^E ^I^S ^B^U^S^Y, ^Y^O^U^R ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^I^T ^I^S ^A^V^A^I^L^A^B^L^E.
      S^E^C^O^N^D, ^I^F ^T^H^E ^F^I^L^E ^D^O^E^S^N'^T ^E^X^I^S^T, ^Y^O^U^R ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.  E^N^T^E^R NA
      ^F^O^R ^N^O ^A^B^O^R^T, YES ^F^O^R ^A^B^O^R^T-^O^N-^E^R^R^O^R.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H ^T^H^E WB (^W^A^I^T-^I^F-^B^U^S^Y) ^A^N^D NA ^P^A^R^A^M^E^T^E^R^S.

      D^E^F^A^U^L^T@D  A^B^O^R^T (^E^R^R^O^R^S ^I^N APPEND ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B).
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K
      ^P^A^C^K^S ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^P^A^C^K ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.
      E^N^T^E^R WB ^F^O^R ^W^A^I^T, ^O^M^I^T ^F^O^R ^N^O ^W^A^I^T.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H ^T^H^E WB ^A^N^D NA (^N^O ^A^B^O^R^T) ^P^A^R^A^M^E^T^E^R^S.

      D^E^F^A^U^L^T@D  Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^T^H^E ^P^A^C^K ^I^S^N'^T ^A^V^A^I^L^A^B^L^E (^N^O ^W^A^I^T).
.ENDHELP
.EX.  $APPEND(PFN,LFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_WB)
*WEOR
.PROC,APPSW*I
,APPL[N^A^M^E ^O^F NAM ^A^P^P^L^I^C^A^T^I^O^N ^T^O ^S^W^I^T^C^H ^T^O]=(ITF,MCS,PLATO,
              PSU,TLF,IAF,NETOU,NJF,RBF,TAF,TVF,VEIAF,*N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D APPSW,^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E APPSW ^C^O^M^M^A^N^D ^S^W^I^T^C^H^E^S ^Y^O^U ^F^R^O^M ^T^H^E NAM ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E
      ^C^U^R^R^E^N^T^L^Y ^U^S^I^N^G ^T^O ^T^H^E NAM ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^S^P^E^C^I^F^Y (^P^R^O^V^I^D^E^D ^T^H^A^T ^T^H^E
      ^A^P^P^L^I^C^A^T^I^O^N ^I^S ^A^V^A^I^L^A^B^L^E ^A^T ^Y^O^U^R ^S^I^T^E ^A^N^D ^Y^O^U ^A^R^E ^V^A^L^I^D^A^T^E^D ^F^O^R ^T^H^A^T
      ^A^P^P^L^I^C^A^T^I^O^N).  O^N^C^E ^Y^O^U ^A^R^E ^U^N^D^E^R ^T^H^E ^C^O^N^T^R^O^L ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D
      ^A^P^P^L^I^C^A^T^I^O^N, ^T^H^E BYE, GOODBYE, HELLO, LOGIN, ^A^N^D LOGOUT ^C^O^M^M^A^N^D^S
      ^W^I^L^L ^S^W^I^T^C^H ^Y^O^U ^B^A^C^K ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E NAM ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^A^N^T ^T^O ^S^W^I^T^C^H ^T^O.

      A^P^P^L^I^C^A^T^I^O^N     D^E^S^C^R^I^P^T^I^O^N
      -----------     -----------

      IAF             I^N^T^E^R^A^C^T^I^V^E F^A^C^I^L^I^T^Y
      ITF             I^N^T^E^R^A^C^T^I^V^E T^R^A^N^S^F^E^R F^A^C^I^L^I^T^Y
      MCS             M^E^S^S^A^G^E C^O^N^T^R^O^L S^Y^S^T^E^M
      NETOU           N^E^T^W^O^R^K O^P^E^R^A^T^O^R U^T^I^L^I^T^Y
      NJF             N^E^T^W^O^R^K J^O^B E^N^T^R^Y F^A^C^I^L^I^T^Y
      PLATO           P^L^A^T^O-NAM I^N^T^E^R^F^A^C^E
      PSU             P^R^I^N^T^E^R S^U^P^P^O^R^T U^T^I^L^I^T^Y
      RBF             R^E^M^O^T^E B^A^T^C^H F^A^C^I^L^I^T^Y
      TAF             T^R^A^N^S^A^C^T^I^O^N F^A^C^I^L^I^T^Y
      TLF             T^I^E^L^I^N^E F^A^C^I^L^I^T^Y
      TVF             T^E^R^M^I^N^A^L V^E^R^I^F^I^C^A^T^I^O^N F^A^C^I^L^I^T^Y
      VEIAF           NOS/VE I^N^T^E^R^A^C^T^I^V^E F^A^C^I^L^I^T^Y

      N^O^T^E@D Y^O^U ^W^I^L^L ^B^E ^P^L^A^C^E^D ^U^N^D^E^R ^T^H^E ^C^O^N^T^R^O^L ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D
            ^A^P^P^L^I^C^A^T^I^O^N ^O^N^L^Y ^I^F ^T^H^A^T ^A^P^P^L^I^C^A^T^I^O^N ^I^S ^A^V^A^I^L^A^B^L^E ^A^T
            ^Y^O^U^R ^S^I^T^E ^A^N^D ^I^F ^Y^O^U ^A^R^E ^V^A^L^I^D^A^T^E^D ^F^O^R ^T^H^A^T ^A^P^P^L^I^C^A^T^I^O^N.

      D^E^F^A^U^L^T@D N^O^N^E.
.ENDHELP
.EX.  $APPSW(APPL)
$REVERT(NOLIST)
*WEOR
.PROC,ASCII*I
,P[D^O ^Y^O^U ^W^A^N^T ASCII ^M^O^D^E]=(Y,N,YES=Y,NO=N,*N).
.HELP,,NOLIST

      F^O^R^M^A^T@D  ASCII

      T^H^E ASCII ^C^O^M^M^A^N^D ^P^L^A^C^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^N ASCII ^M^O^D^E, ^A^L^L^O^W^I^N^G
      ^Y^O^U ^T^O ^U^S^E ^U^P^P^E^R^C^A^S^E ^A^N^D ^L^O^W^E^R^C^A^S^E ^T^E^X^T.  (T^H^E NORMAL ^C^O^M^M^A^N^D
      ^R^E^T^U^R^N^S ^Y^O^U ^T^O ^U^P^P^E^R^C^A^S^E ^O^N^L^Y.)
.HELP,P,NOLIST

      E^N^T^E^R Y ^T^O ^C^H^O^O^S^E ASCII ^M^O^D^E, N ^T^O ^S^T^A^Y ^I^N ^Y^O^U^R ^C^U^R^R^E^N^T ^M^O^D^E.  (T^O
      ^S^P^E^C^I^F^Y ASCII ^M^O^D^E ^F^R^O^M ^O^U^T^S^I^D^E ^O^F HELPME, ^E^N^T^E^R ^T^H^E ASCII ^C^O^M^M^A^N^D
      ^I^T^S^E^L^F ^W^I^T^H^O^U^T ^P^A^R^A^M^E^T^E^R^S.)
.ENDHELP
.IF($P$.EQ.$Y$,ASCII)
.EX. $ASCII.
.ENDIF,ASCII.
$REVERT(NOLIST)
*WEOR
.PROC,ASSIGN*I
,DEVICE[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890))
,LFN  [F^I^L^E ^N^A^M^E]=(*F)
,CKPT  [C^H^E^C^K^P^O^I^N^T ^O^P^T^I^O^N]=(CK=$,CK$,CB=$,CB$,*N=)
,AL[S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L (AL)]=(LVL0,LVL1,LVL2,LVL3,LVL4,LVL5,LVL6,LVL7,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ASSIGN,^D^E^V^I^C^E,^L^F^N,^C^K^P^T,AL=^L^E^V^E^L.

      T^H^E ASSIGN ^C^O^M^M^A^N^D ^A^S^S^I^G^N^S ^A ^L^O^C^A^L ^F^I^L^E ^T^O ^A ^D^E^V^I^C^E ^T^Y^P^E.  I^F ^Y^O^U ^W^A^N^T
      ^T^O ^A^S^S^I^G^N ^A ^L^O^C^A^L ^F^I^L^E ^T^O ^T^A^P^E, ^U^S^E ^T^H^E LABEL ^C^O^M^M^A^N^D.
.HELP,DEVICE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^D^E^V^I^C^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^O^R ^D^E^V^I^C^E ^T^Y^P^E ^T^O ^W^H^I^C^H ^T^H^E
      ^S^P^E^C^I^F^I^E^D ^F^I^L^E ^I^S ^T^O ^B^E ^A^S^S^I^G^N^E^D.  I^T ^M^A^Y ^B^E ^E^I^T^H^E^R ^T^H^E EST ^O^R^D^I^N^A^L
      ^O^F ^A ^P^E^R^I^P^H^E^R^A^L ^D^E^V^I^C^E ^O^R ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^A^S ^D^E^F^I^N^E^D ^B^E^L^O^W.

      E^N^T^E^R    T^O ^S^P^E^C^I^F^Y
      -----    ----------
      DB       885-42 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           (^F^U^L^L-^T^R^A^C^K)
      DC       895-1/2 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M          (^F^U^L^L-^T^R^A^C^K)
      DD       834 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              (^F^U^L^L-^T^R^A^C^K)
      DE       E^X^T^E^N^D^E^D ^M^E^M^O^R^Y
      DF       887 D^I^S^K (4K ^S^E^C^T^O^R)                    (^F^U^L^L-^T^R^A^C^K)
      DG       836 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              (^F^U^L^L-^T^R^A^C^K)
      DH       887 D^I^S^K (16K ^S^E^C^T^O^R)                   (^F^U^L^L-^T^R^A^C^K)
      DI       844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           (^H^A^L^F-^T^R^A^C^K)
      DJ       844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^H^A^L^F-^T^R^A^C^K)
      DK       844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           (^F^U^L^L-^T^R^A^C^K)
      DL       844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^F^U^L^L-^T^R^A^C^K)
      DM       885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^H^A^L^F-^T^R^A^C^K)
      DN       9853 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M (2K ^S^E^C^T^O^R) (^F^U^L^L-^T^R^A^C^K)
      DP       D^I^S^T^R^I^B^U^T^I^V^E ^D^A^T^A ^P^A^T^H ^T^O
               ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y
      DQ       885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^F^U^L^L-^T^R^A^C^K)
      DV       819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              (^S^I^N^G^L^E-^D^E^N^S^I^T^Y)
      DW       819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              (^D^O^U^B^L^E-^D^E^N^S^I^T^Y)
      MS       M^A^S^S ^S^T^O^R^A^G^E ^D^E^V^I^C^E
      NE       N^U^L^L ^E^Q^U^I^P^M^E^N^T
      TT       T^I^M^E^S^H^A^R^I^N^G ^T^E^R^M^I^N^A^L^S

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^S^P^E^C^I^F^I^E^D ^D^E^V^I^C^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,CKPT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^C^K^P^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^S ^A ^C^H^E^C^K^P^O^I^N^T ^F^I^L^E, ^E^N^T^E^R ^O^N^E
      ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      ^C^K^P^T                      M^E^A^N^I^N^G
      ----                      -------
      CK         E^A^C^H ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T ^T^H^E ^P^R^E^V^I^O^U^S EOI ^O^F ^T^H^E ^F^I^L^E.
      CB         E^A^C^H ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T ^T^H^E BOI ^O^F ^T^H^E ^F^I^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^F^I^L^E ^I^S ^N^O^T ^A ^C^H^E^C^K^P^O^I^N^T ^F^I^L^E.
.HELP,AL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (AL=^L^E^V^E^L) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^T^O ^A^S^S^I^G^N
      ^T^O ^T^H^E ^F^I^L^E.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, LVL7.

      D^E^F^A^U^L^T@D  T^H^E ^C^U^R^R^E^N^T ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^J^O^B.
.ENDHELP
.EX.  $ASSIGN,DEVICE,LFN_CKPT,#AL=AL.
*WEOR
.PROC,ATTACH*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/M  [F^I^L^E ^A^C^C^E^S^S ^M^O^D^E]=(E,EXECUTE,R,READ,RA,READAP,M,MODIFY,W,WRITE,
                                  RM,READMD,A,APPEND,*N=READ)
,UN [U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW [F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,PN [A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K ^N^A^M^E]=(*F,0,*N=)
,R  [D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,RT [R^E^A^L ^T^I^M^E ^P^R^O^C^E^S^S^I^N^G]=(*K=$,RT$,YES=$,RT$,Y=$,RT$,NO=,N=,*N=)
,WB [W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,NO=,N=,YES=$,WB$,Y=$,WB$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ATTACH,^L^F^N=^P^F^N/M=^M,UN=^U^N,PW=^P^W,PN=^P^N,R=^R,NA,RT,WB.

      T^H^E ATTACH ^C^O^M^M^A^N^D ^A^T^T^A^C^H^E^S ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^O ^A
      ^J^O^B.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^L^O^C^A^L ^F^I^L^E ^N^A^M^E
      ^R^E^F^E^R^E^N^C^I^N^G ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^W^H^I^L^E ^I^T'^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.  I^F
      ^Y^O^U ^W^I^S^H ^T^O ^R^E^F^E^R^E^N^C^E ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^B^Y ^I^T^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E
      ^O^M^I^T ^T^H^E ^L^O^C^A^L ^N^A^M^E.

      D^E^F^A^U^L^T@D Y^O^U^R ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^I^S ^R^E^F^E^R^E^N^C^E^D ^B^Y ^I^T^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E
               ^N^A^M^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^D^I^R^E^C^T
      ^A^C^C^E^S^S ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^A^T^T^A^C^H ^T^O ^Y^O^U^R ^J^O^B.  (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M=^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E.

      I^F ^M ^I^S@D            Y^O^U ^C^A^N@D            C^O^N^C^U^R^R^E^N^T^L^Y, ^O^T^H^E^R ^U^S^E^R^S ^C^A^N@D
      --------            --------            ------------------------------

         A      L^E^N^G^T^H^E^N, ^R^E^A^D, ^O^R ^E^X^E^C^U^T^E.   R^E^A^D ^O^R ^E^X^E^C^U^T^E.
         E      E^X^E^C^U^T^E ^O^N^L^Y.                 R^E^A^D ^O^R ^E^X^E^C^U^T^E.
         M      R^E^A^D, ^E^X^E^C^U^T^E, ^R^E^W^R^I^T^E ^O^R     R^E^A^D ^O^R ^E^X^E^C^U^T^E.
                ^L^E^N^G^T^H^E^N.

         R      R^E^A^D ^O^R ^E^X^E^C^U^T^E.              R^E^A^D ^O^R ^E^X^E^C^U^T^E.
         RU     R^E^A^D ^O^R ^E^X^E^C^U^T^E.              R^E^A^D ^O^R ^E^X^E^C^U^T^E; ^O^N^E ^U^S^E^R ^A^T
                                              ^A ^T^I^M^E ^C^A^N ^R^E^W^R^I^T^E ^T^H^E ^F^I^L^E.

         RA     R^E^A^D ^O^R ^E^X^E^C^U^T^E.              R^E^A^D ^O^R ^E^X^E^C^U^T^E; O^N^E ^U^S^E^R ^A^T
                                              ^A ^T^I^M^E ^C^A^N ^L^E^N^G^T^H^E^N ^T^H^E ^F^I^L^E.
         RM     R^E^A^D ^O^R ^E^X^E^C^U^T^E.              R^E^A^D ^O^R ^E^X^E^C^U^T^E; O^N^E ^U^S^E^R ^A^T
                                              ^A ^T^I^M^E ^C^A^N ^L^E^N^G^T^H^E^N ^O^R ^R^E^W^I^T^E
                                              ^T^H^E ^F^I^L^E.

         U      R^E^A^D, ^E^X^E^C^U^T^E, ^O^R             R^E^A^D ^O^R ^E^X^E^C^U^T^E ^T^H^E ^F^I^L^E.
                ^R^E^W^R^I^T^E ^T^H^E ^F^I^L^E.

         W      R^E^A^D, ^E^X^E^C^U^T^E, ^L^E^N^G^T^H^E^N,      N^O ^O^T^H^E^R ^U^S^E ^A^L^L^O^W^E^D.
                ^R^E^W^R^I^T^E ^O^R ^S^H^O^R^T^E^N.

      D^E^F^A^U^L^T@D  R.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E'^S ^O^W^N^E^R ^I^F ^Y^O^U
      ^A^R^E ^N^O^T ^T^H^E ^O^W^N^E^R.

      D^E^F^A^U^L^T@D  Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^P^W) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O
      ^A^S^S^I^G^N ^T^O ^Y^O^U^R ^J^O^B ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^N^D ^H^A^S ^I^T^S ^O^W^N ^P^A^S^S^W^O^R^D
      ^E^N^T^E^R ^T^H^A^T ^P^A^S^S^W^O^R^D.  A ^P^A^S^S^W^O^R^D ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN=^P^N), ^W^H^I^C^H
      ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^A^S^S^I^G^N ^T^O ^Y^O^U^R ^J

      ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.

      D^E^F^A^U^L^T@D  N^O^N^E.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A^N
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN=^P^N), ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N
      ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^I^F ^E^R^R^O^R^S ^O^C^C^U^R ^N^O^T ^T^O ^T^E^R^M^I^N^A^T^E ^Y^O^U^R
      ^J^O^B ^O^R ^P^R^O^C^E^D^U^R^E.  I^N^S^T^E^A^D, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D
      F^I^R^S^T, ^I^F ^T^H^E ^F^I^L^E ^I^S ^B^U^S^Y, ^Y^O^U^R ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^I^T ^I^S ^A^V^A^I^L^A^B^L^E;
      S^E^C^O^N^D, ^I^F ^T^H^E ^F^I^L^E ^D^O^E^S^N'^T ^E^X^I^S^T, ^Y^O^U^R ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).

      D^E^F^A^U^L^T@D  E^R^R^O^R^S ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,RT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RT) ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^A^L-^T^I^M^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N, ^Y^O^U^R ^J^O^B
      ^C^O^N^T^I^N^U^E^S ^P^R^O^C^E^S^S^I^N^G ^A^F^T^E^R ^R^E^Q^U^E^S^T^I^N^G ^T^H^E ^T^R^A^N^S^F^E^R ^O^F ^A ^D^I^R^E^C^T ^A^C^C^E^S^S
      ^F^I^L^E ^F^R^O^M ^A ^S^U^P^P^L^E^M^E^N^T^A^L ^M^A^S^S ^S^T^O^R^A^G^E ^S^U^B^S^Y^S^T^E^M ^S^U^C^H ^A^S M^A^S^S S^T^O^R^A^G^E
      E^X^T^E^N^D^E^D (MSE) ^T^O ^D^I^S^K.  A^F^T^E^R ^Y^O^U^R ^F^I^L^E ^I^S ^T^R^A^N^S^F^E^R^R^E^D,  ^Y^O^U ^M^U^S^T
      ^E^N^T^E^R ^A^N^O^T^H^E^R ATTACH ^C^O^M^M^A^N^D ^T^O ^A^S^S^I^G^N ^T^H^A^T ^F^I^L^E ^T^O ^Y^O^U^R ^J^O^B.  T^O
      ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R  RT.

      D^E^F^A^U^L^T@D  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^A ^F^I^L^E ^R^E^Q^U^E^S^T^E^D ^B^Y ^Y^O^U^R ^J^O^B
                ^R^E^S^I^D^E^S ^O^N ^A ^S^U^P^P^L^E^M^E^N^T^A^L ^S^T^O^R^A^G^E ^M^E^D^I^U^M ^O^N^L^Y, ^J^O^B
                ^P^R^O^C^E^S^S^I^N^G ^I^S ^S^U^S^P^E^N^D^E^D ^W^H^I^L^E ^T^H^E ^F^I^L^E ^I^S ^B^E^I^N^G ^T^R^A^N^S^F^E^R^R^E^D
                ^T^O ^D^I^S^K ^A^N^D ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F
      ^D^I^S^K ^P^A^C^K^S ^A^N^D ^B^U^S^Y ^F^I^L^E^S ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^D^I^S^K ^P^A^C^K
      ^O^R ^F^I^L^E ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.  E^N^T^E^R WB ^F^O^R ^W^A^I^T, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D  Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^D^I^S^K ^P^A^C^K ^O^R ^F^I^L^E ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.
.ENDHELP
.IF($LFN$.EQ.$$,L1)
.EX.  $ATTACH(PFN/#M=M,#UN=UN,#PW=PW,#PN=PN,#R=R_NA_RT_WB)
.ELSE(L1)
.EX.  $ATTACH(LFN=PFN/#M=M,#UN=UN,#PW=PW,#PN=PN,#R=R_NA_RT_WB)
.ENDIF(L1)
*WEOR
.PROC,AUTO*I
,NN[B^E^G^I^N^N^I^N^G L^I^N^E N^U^M^B^E^R]=(*A1,*N)
,II[I^N^C^R^E^M^E^N^T V^A^L^U^E]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  AUTO,^N^N^N^N^N,^I^I^I^I^I.

      T^H^E AUTO ^C^O^M^M^A^N^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^G^E^N^E^R^A^T^E^S 5-^D^I^G^I^T ^L^I^N^E ^N^U^M^B^E^R^S ^F^O^R
      ^L^I^N^E^S ^Y^O^U ^A^R^E ^E^N^T^E^R^I^N^G ^I^N^T^O ^Y^O^U^R ^P^R^I^M^A^R^Y ^F^I^L^E.

      T^O ^E^X^I^T ^F^R^O^M ^A^U^T^O ^M^O^D^E, ^Y^O^U ^P^R^E^S^S ^T^H^E ^C^A^N^C^E^L ^L^I^N^E ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^E^D ^B^Y ^
      ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N, ^T^H^U^S ^D^E^L^E^T^I^N^G ^T^H^E ^C^U^R^R^E^N^T ^L^I^N^E.  Y^O^U ^C^A^N ^A^L^S^O ^E^X^I^T ^F^R^O^M
      ^A^U^T^O ^M^O^D^E ^B^Y ^E^N^T^E^R^I^N^G ^T^H^E ^T^E^R^M^I^N^A^T^I^O^N ^S^E^Q^U^E^N^C^E.
.HELP,NN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^N^N^N^N^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^E^G^I^N^N^I^N^G ^L^I^N^E ^N^U^M^B^E^R; ^D^E^F^A^U^L^T ^V^A^L^U^E
&l5C      00100.
.HELP,II,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^I^I^I^I^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^C^R^E^M^E^N^T ^V^A^L^U^E ^A^D^D^E^D ^F^O^R ^E^A^C^H
      ^S^U^C^C^E^E^D^I^N^G ^L^I^N^E ^N^U^M^B^E^R; ^D^E^F^A^U^L^T ^V^A^L^U^E ^I^S 10.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BASIC*I
,AS[S^O^U^R^C^E P^R^O^G^R^A^M (AS)]=(*A1,*N=0)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=BIN)
,BL[S^E^P^A^R^A^T^E O^U^T^P^U^T L^I^S^T^I^N^G (BL)]=(*A1,*N)
,DB[CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G A^N^D T^R^A^C^E C^O^N^T^R^O^L (DB)]=(*A2,*N=0)
,ERR[C^O^M^P^I^L^E^R E^R^R^O^R F^I^L^E (E)]=(*F,*N=ERRS)
,EL[E^R^R^O^R L^E^V^E^L C^O^N^T^R^O^L (EL)]=(*A1,*N=W)
,GO[C^O^M^P^I^L^E^D BASIC P^R^O^G^R^A^M (GO)]=(*A1,*N)
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,EXE[E^X^E^C^U^T^I^O^N T^I^M^E I^N^P^U^T F^I^L^E (J)]=(*F,*N=INPUT)
,EXO[E^X^E^C^U^T^I^O^N T^I^M^E O^U^P^U^T F^I^L^E (K)]=(*F,*N=OUTPUT)
,LIST[L^I^S^T^A^B^L^E C^O^M^P^I^L^E^R O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=OUTPUT)
,LO[L^I^S^T^I^N^G O^P^T^I^O^N^S (LO)]=(*A3,*N=S)
,PGD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A2,*N)
,PS[P^A^G^E S^I^Z^E (PS)]=(*A2,*N=PD)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BASIC,AS,B=^L^F^N,BL,DB=^D^B,E=^L^F^N,EL=^E^L,GO=^N,I=^L^F^N,J=^L^F^N,K=^L^F^N,L=^L^F^N,
                  LO=^L^O,PD=^N,PS=^N.

      T^H^E ^C^O^M^M^A^N^D BASIC ^C^A^L^L^S ^T^H^E BASIC 3 ^C^O^M^P^I^L^E^R.
.HELP,AS,NOLIST

      F^O^R^M^A^T@D  AS

      T^H^E ^P^A^R^A^M^E^T^E^R AS ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^D^A^T^A ^I^S
      ^E^N^C^O^D^E^D ^I^N ^T^H^E ^E^X^T^E^N^D^E^D ASCII ^C^H^A^R^A^C^T^E^R ^S^E^T.  I^F AS=0, ^O^N^L^Y ^N^O^R^M^A^L
      (^N^O^N-ASCII) ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^C^O^N^T^A^I^N^E^D ^I^N ^T^H^E ^P^R^O^G^R^A^M ^A^N^D ^D^A^T^A ^F^I^L^E^S.
      AS=0 ^I^S ^T^H^E ^D^E^F^A^U^L^T.
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0,
      ^C^O^M^P^I^L^A^T^I^O^N ^I^S ^S^P^E^C^I^F^I^E^D ^T^O ^M^E^M^O^R^Y ^A^N^D ^T^H^E^R^E ^I^S ^N^O ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E.
      I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=BIN.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      B=0.
.HELP,BL,NOLIST

      F^O^R^M^A^T@D  BL

      T^H^E ^P^A^R^A^M^E^T^E^R BL ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^A ^S^E^P^A^R^A^T^E ^O^U^T^P^U^T ^L^I^S^T^I^N^G ^I^S ^T^O
      ^B^E ^G^E^N^E^R^A^T^E^D.  I^F BL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^G^E^N^E^R^A^T^E ^T^H^E ^L^I^S^T^I^N^G
      ^I^N ^C^O^M^P^A^C^T ^F^O^R^M.
.HELP,DB,NOLIST

      F^O^R^M^A^T@D  DB=^D^B

      T^H^E ^P^A^R^A^M^E^T^E^R DB ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G
      ^A^N^D T^R^A^C^E ^C^O^N^T^R^O^L.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E DB ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^
      ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, DB=B/DL).  I^N^S^E^R^T ^A 0/ ^B^E^F^O^R^E ^T^H^E ^O^P^T^I^O^N ^T^O ^T^U^R^N ^O^F^F
      ^T^H^E ^D^E^F^A^U^L^T ^O^R ^P^R^E^V^I^O^U^S^L^Y ^S^P^E^C^I^F^I^E^D ^V^A^L^U^E.  I^F ^D^B ^I^S ^O^M^I^T^T^E^D, ^T^H^E^N DB ^I^S
      ^T^H^E ^S^A^M^E ^A^S DB=0, ^E^X^C^E^P^T ^T^H^A^T CYBER I^N^T^E^R^A^T^I^V^E D^E^B^U^G ^I^S ^O^M^I^T^T^E^D ^A^N^D ^I^S
      ^A^C^T^I^V^A^T^E^D ^O^N^L^Y ^I^F ^T^H^E DEBUG ^O^R DEBUG(ON) ^C^O^M^M^A^N^D ^W^A^S ^P^R^E^V^I^O^U^S^L^Y ^I^S^S^U^E^D.

         ^D^B                        M^E^A^N^I^N^G
         --                        -------
         B       F^O^R^C^E ^B^I^N^A^R^Y ^G^E^N^E^R^A^T^I^O^N ^A^N^D/^O^R ^P^R^O^G^R^A^M ^E^X^E^C^U^T^I^O^N.

         DL      A^C^T^I^V^A^T^E ^P^R^O^G^R^A^M ^T^R^A^C^I^N^G ^A^S ^C^O^N^T^R^O^L^L^E^D ^B^Y REM TRACE ^D^E^B^U^G
                 ^L^I^N^E^S.

         ID      G^E^N^E^R^A^T^E CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G ^I^N^F^O^R^M^A^T^I^O^N.  S^A^M^E ^A^S
                 DB=B/DL/ID.

         TR      T^R^A^C^E ^A^L^L ^S^T^A^T^E^M^E^N^T^S ^R^E^G^A^R^D^L^E^S^S ^O^F REM TRACE ^D^E^B^U^G ^L^I^N^E^S.

         DB      S^A^M^E ^A^S DB=B/DL.

         0       CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G ^A^N^D T^R^A^C^E ^F^E^A^T^U^R^E ^N^O^T ^A^C^T^I^V^A^T^E^D.
.HELP,ERR,NOLIST

      F^O^R^M^A^T@D  E=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^L^F^N ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^M^P^I^L^E^D ^D^I^A^G^N^O^S^T^

      ^E^R^R^O^R ^M^E^S^S^A^G^E^S.  T^H^E ^D^E^F^A^U^L^T ^I^S E=ERRS.  I^F E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^C^O^M^P^I^L^E^D
      ^D^I^A^G^N^O^S^T^I^C ^E^R^R^O^R ^M^E^S^S^A^G^E^S ^A^R^E ^W^R^I^T^T^E^N ^T^O ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E L
      ^P^A^R^A^M^E^T^E^R.  I^F L=0, ^T^H^E^N ^T^H^E ^E^R^R^O^R ^M^E^S^S^A^G^E^S ^A^R^E ^W^R^I^T^T^E^N ^O^N ^F^I^L^E OUTPUT.
.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^E^L

      T^H^E ^P^A^R^A^M^E^T^E^R EL ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^E^V^E^L ^C^O^N^T^R^O^L; ^E^R^R^O^R^S ^A^R^E ^L^I^S^T^E^D
      ^O^N ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E E ^P^A^R^A^M^E^T^E^R.  T^H^E ^D^E^F^A^U^L^T ^I^S EL=W.

         ^E^L                        M^E^A^N^I^N^G
         --                        -------
         F       L^I^S^T ^F^A^T^A^L ^C^O^M^P^I^L^E^R ^D^I^A^G^N^O^S^T^I^C^S.

         W       L^I^S^T ^W^A^R^N^I^N^G ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D ^F^A^T^A^L ^C^O^M^P^I^L^E^R ^D^I^A^G^N^O^S^T^I^C^S.
.HELP,GO,NOLIST

      F^O^R^M^A^T@D  GO=^N

      T^H^E ^P^A^R^A^M^E^T^E^R GO ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^C^O^M^P^I^L^E^D BASIC ^P^R^O^G^R^A^M ^I^S ^T^O ^B^E
      ^E^X^E^C^U^T^E^D. W^H^E^N GO=0, ^E^X^E^C^U^T^I^O^N ^I^S ^P^R^O^H^I^B^I^T^E^D.  I^F GO ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^C^O^M^P^I^L^E^D-^T^O-^M^E^M^O^R^Y^C^O^D^E ^I^S ^E^X^E^C^U^T^E^D; ^B^I^N^A^R^Y ^O^U^T^P^U^T (^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E
      B ^P^A^R^A^M^E^T^E^R) ^I^S ^N^O^T ^G^E^N^E^R^A^T^E^D.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,EXE,NOLIST

      F^O^R^M^A^T@D  J=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R J ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.   I^F J=0,
      ^N^O ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^I^N^P^U^T ^F^I^L^E ^I^S ^P^R^O^D^U^C^E^D.  T^H^E ^D^E^F^A^U^L^T ^I^S J=INPUT.
.HELP,EXO,NOLIST

      F^O^R^M^A^T@D  K=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R K ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  T^H^E
      ^D^E^F^A^U^L^T ^I^S K=OUTPUT.
.HELP,LIST,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^A^B^L^E ^O^U^T^P^U^T ^C^O^M^P^I^L^E^R ^F^I^L^E ^L^F^N.  I^F
      L=0, ^N^O ^L^I^S^T^A^B^L^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S L=OUTPUT.  T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT ^F^O^R ^B^A^T^C^H ^J^O^B^S, ^A^N^D L=0
      ^F^O^R ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D   LO=^L^O

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^P^T^I^O^N^S, ^F^O^R ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D
      ^B^Y ^T^H^E L ^P^A^R^A^M^E^T^E^R.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E LO ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D
      ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, LO=O/S).  T^H^E ^D^E^F^A^U^L^T ^I^S LO=S.

         ^L^O                 M^E^A^N^I^N^G
         --                 -------
         O       O^B^J^E^C^T ^C^O^D^E ^A^N^D ^S^O^U^R^C^E ^L^I^S^T^I^N^G.

         S       S^O^U^R^C^E ^L^I^S^T^I^N^G.

         0/O     O^B^J^E^C^T ^C^O^D^E ^L^I^S^T^I^N^G.

         LO      S^A^M^E ^A^S LO=S.

         0       N^O ^L^I^S^T ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D.
.HELP,PGD,NOLIST

      F^O^R^M^A^T@D  PD=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^F^I^L^E^S ^S^P^E^C^I^F^I^E^
      ^B^Y ^T^H^E K ^A^N^D L ^P^A^R^A^M^E^T^E^R^S. T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T.

         ^N             M^E^A^N^I^N^G
         -             -------
         6       S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         8       E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         PD      S^A^M^E ^A^S PD=8.
.HELP,PS,NOLIST

      F^O^R^M^A^T@D  PS=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PS ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^S^I^Z^E ^F^O^R ^N ^P^R^I^N^T^A^B^L^E ^L^I^N^E^S ^P^E^R ^P^A^G^E
      (4<=^N<=32768) ^F^O^R ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E L ^P^A^R^A^M^E^T^E^R.  I^F PS ^I^S ^O^M^I^T^T^E^D
      ^A^N^D PD ^I^S ^O^M^I^T^T^E^D ^O^R ^S^P^E^C^I^F^I^E^S ^P^R^I^N^T ^D^E^N^S^I^T^Y ^D^E^F^A^U^L^T, ^T^H^E ^P^A^G^E ^S^I^Z^E ^I^S
      ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T.  I^F PD ^S^P^E^C^I^F^I^E^S ^A ^N^O^N^D^E^F^A^U^L^T ^P^R^I^N^T ^D^E^N^S^I^T^Y, ^T^H^E
      ^P^A^G^E ^S^I^Z^E ^I^S ^C^A^L^C^U^L^A^T^E^D ^B^Y@D

         PS=PD*(^D^E^F^A^U^L^T PS)/(^D^E^F^A^U^L^T PD)
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BATCH*I
,FL[F^I^E^L^D L^E^N^G^T^H (^F^L)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BATCH,^F^L

      T^H^E BATCH ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M.  Y^O^U ^C^A^N^N^O^T ^U^S^E ^T^H^E RUN
      ^C^O^M^M^A^N^D ^U^N^D^E^R ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M.
.HELP,FL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^F^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^I^T^I^A^L ^R^U^N^N^I^N^G ^F^I^E^L^D ^L^E^N^G^T^H ^F^O^R
      ^S^U^B^S^E^Q^U^E^N^T ^J^O^B ^S^T^E^P^S.  E^N^T^E^R^I^N^G ^T^H^I^S ^V^A^L^U^E ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O ^E^N^T^E^R^I^N^G ^T^H^
      RFL,^F^L ^C^O^M^M^A^N^D.  I^F ^F^L ^I^S ^O^M^I^T^T^E^D, 0 ^I^S ^A^S^S^U^M^E^D.  I^F ^Y^O^U ^I^M^P^L^I^C^I^T^L^Y
      ^S^E^L^E^C^T^E^D ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M ^B^Y ^R^E^T^R^I^E^V^I^N^G ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^

      ^F^I^L^E ^W^I^T^H ^T^H^E OLD ^C^O^M^M^A^N^D, ^T^H^E ^F^I^E^L^D ^L^E^N^G^T^H ^I^S ^E^I^T^H^E^R 0 ^O^R ^T^H^A^T ^E^N^T^E^R^E^D
      ^W^I^T^H ^T^H^E ^L^A^S^T RFL ^C^O^M^M^A^N^D.

      U^N^L^E^S^S ^Y^O^U ^H^A^V^E ^A ^R^E^A^S^O^N ^T^O ^D^O ^O^T^H^E^R^W^I^S^E, ^C^H^O^O^S^E ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M ^F^O^R
      ^N^O^R^M^A^L ^J^O^B ^P^R^O^C^E^S^S^I^N^G.  T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M ^A^L^L^O^W^S ^Y^O^U ^T^O ^E^N^T^E^R ^E^S^S^E^N^T^I^



      ^L^Y ^A^L^L ^C^O^M^M^A^N^D^S ^A^L^L^O^W^E^D ^I^N ^B^A^T^C^H ^J^O^B^S.  S^O^M^E ^F^I^L^E ^M^A^N^A^G^E^M^E^N^T ^C^O^M^M^A^N^D^S ^A^N

      ^N^E^A^R^L^Y ^A^L^L ^E^X^E^C^U^T^I^O^N ^C^O^N^T^R^O^L ^P^R^O^C^E^S^S^I^N^G ^C^O^M^M^A^N^D^S ^A^R^E ^A^V^A^I^L^A^B^L^E ^I^N ^T^H^E
      ^O^T^H^E^R ^S^U^B^S^Y^S^T^E^M^S ^O^N^L^Y ^T^H^R^O^U^G^H ^T^H^E X,^C^C^C ^C^O^M^M^A^N^D.

      A^L^T^H^O^U^G^H ^Y^O^U ^C^A^N ^E^N^T^E^R ^A^N^Y ^S^Y^S^T^E^M ^C^O^M^M^A^N^D ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B, ^T^H^E
      ^O^U^T^P^U^T ^P^R^O^D^U^C^E^D ^B^Y ^S^E^V^E^R^A^L ^O^F ^T^H^E^S^E ^C^O^M^M^A^N^D^S ^I^S ^F^O^R^M^A^T^T^E^D ^F^O^R ^T^R^A^N^S-
      ^M^I^S^S^I^O^N ^T^O ^A ^L^I^N^E ^P^R^I^N^T^E^R (137 ^C^H^A^R^A^C^T^E^R^S ^P^E^R ^L^I^N^E).  T^H^R^O^U^G^H ^U^S^E ^O^F ^T^H^E
      LO72 ^C^O^M^M^A^N^D, ^Y^O^U ^C^A^N ^F^O^R^M^A^T ^T^H^E ^O^U^T^P^U^T ^F^O^R ^T^R^A^N^S^M^I^S^S^I^O^N ^T^O ^A ^T^E^R^M^I^N^A^L
      (72 ^T^O 160 ^C^H^A^R^A^C^T^E^R^S ^P^E^R ^L^I^N^E) ^B^U^T ^S^O^M^E ^D^A^T^A ^M^A^Y ^B^E ^L^O^S^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,XXXXXX*I"BEGIN"
,PNAME[E^N^T^E^R ^P^R^O^C^E^D^U^R^E ^N^A^M^E]=(*F,*N=)
,PFILE[N^A^M^E ^O^F ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^P^R^O^C^E^D^U^R^E]=(*F,*N=PROCFILE)
,KEYWRD[E^N^T^E^R ^K^E^Y^W^O^R^D ^O^R ^V^A^L^U^E]=
   (*S15(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789$=?$),*S2($,?$),*N=)
,CK[E^N^T^E^R ^K^E^Y^W^O^R^D ^C^O^M^M^E^N^T^S]=(*A,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D BEGIN,^P^R^O^C^E^D^U^R^E^N^A^M^E,^P^F^I^L^E,^K^E^Y^W^O^R^D1=^V^A^L^U^E1,...,^K^E^Y^W^O^R^D^N=
                  ^V^A^L^U^E^N.^C^O^M^M^E^N^T

              -^P^R^O^C^E^D^U^R^E^N^A^M^E,^F^I^L^E^N^A^M^E,^K^E^Y^W^O^R^D1=^V^A^L^U^E1,...,^K^E^Y^W^O^R^D^N=
                  ^V^A^L^U^E^N.^C^O^M^M^E^N^T

              ^F^I^L^E^N^A^M^E,^K^E^Y^W^O^R^D1=^V^A^L^U^E1,...,^K^E^Y^W^O^R^D^N=^V^A^L^U^E^N.^C^O^M^M^E^N^T

      T^H^E BEGIN ^C^O^M^M^A^N^D ^S^T^A^R^T^S ^E^X^E^C^U^T^I^O^N ^O^F ^A ^P^R^O^C^E^D^U^R^E.  T^H^E ^F^I^R^S^T ^A^N^D ^T^H^I^R^D
      ^F^O^R^M^A^T^S ^C^A^N ^B^E ^U^S^E^D ^I^N ^E^I^T^H^E^R ^B^A^T^C^H ^O^R ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S, ^B^U^T ^T^H^E ^S^E^C^O^N^D
      ^F^O^R^M^A^T ^C^A^N ^O^N^L^Y ^B^E ^U^S^E^D ^I^N ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S.  I^N ^T^H^E ^T^H^I^R^D ^F^O^R^M^A^T,
      ^F^I^L^E^N^A^M^E ^M^U^S^T ^B^E ^A ^L^O^C^A^L ^F^I^L^E, ^A^N^D ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^P^O^I^N^T^E^R
      ^I^N ^T^H^E ^F^I^L^E ^D^E^T^E^R^M^I^N^E^S ^W^H^I^C^H ^P^R^O^C^E^D^U^R^E ^I^S ^E^X^E^C^U^T^E^D.  N^O^T^E@D ^O^N^L^Y ^T^H^E
      ^F^I^R^S^T ^F^O^R^M^A^T ^I^S ^E^X^E^C^U^T^E^D ^B^Y HELPME.
.HELP,PNAME,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^R^O^C^E^D^U^R^E ^Y^O^U ^W^I^S^H ^T^O ^E^X^E^C^U^T^E.  A ^P^R^O^C^E^D^U^R^E
      ^N^A^M^E ^I^S 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D T^H^E ^D^E^F^A^U^L^T ^P^R^O^C^E^D^U^R^E ^I^S ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N
               ^O^F ^T^H^E ^P^O^I^N^T^E^R ^I^N ^T^H^E ^F^I^L^E (^P^F^I^L^E).
.HELP,PFILE,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^P^R^O^C^E^D^U^R^E ^Y^O^U ^W^I^S^H ^T^O ^E^X^E^C^U^T^E.
      A ^F^I^L^E ^N^A^M^E ^I^S 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      T^O ^E^X^E^C^U^T^E ^T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^O^F BEGIN ^F^R^O^M ^C^O^M^M^A^N^D ^M^O^D^E ^O^U^T^S^I^D^E ^O^F HELPME,

              ^F^I^L^E^N^A^M^E,^K^E^Y^W^O^R^D1=^V^A^L^U^E1,...,^K^E^Y^W^O^R^D^N=^V^A^L^U^E^N.^C^O^M^M^E^N^T

      ^F^I^L^E^N^A^M^E ^M^U^S^T ^R^E^F^E^R ^T^O ^A ^L^O^C^A^L ^F^I^L^E.  I^N HELPME, ^T^H^I^S ^F^O^R^M^A^T ^C^A^N^N^O^T
      ^B^E ^E^X^E^C^U^T^E^D ^B^E^C^A^U^S^E HELPME ^S^P^E^C^I^F^I^E^S ^T^H^E BEGIN ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D F^I^L^E PROCFIL
.HELP,KEYWRD,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^K^E^Y^W^O^R^D ^V^A^L^U^E ^T^H^A^T ^I^S ^S^U^B^S^T^I^T^U^T^E^D ^F^O^R ^A ^P^A^R^A^M^E^T^E^R
      ^K^E^Y^W^O^R^D ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^Y^O^U ^E^X^E^C^U^T^E.  T^H^E ^V^A^L^U^E ^I^S ^C^O^M^P^A^R^E^D ^T^O ^T^H^E
      ^A^P^P^R^O^P^R^I^A^T^E ^C^H^E^C^K^L^I^S^T ^S^P^E^C^I^F^I^E^D ^F^O^R ^T^H^A^T ^P^A^R^A^M^E^T^E^R ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E
      ^H^E^A^D^E^R.  N^O^T^E@D T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^N HELPME, ^Y^O^U ^M^A^Y ^E^N^T^E^R ^A^N^Y
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^T^H^E = ^A^N^D ? ^C^H^A^R^A^C^T^E^R^S, ^U^P ^T^O ^A ^T^O^T^A^L
      ^O^F 15.   T^O ^E^N^T^E^R ^A ? ^B^Y ^I^T^S^E^L^F ^I^N ^T^H^I^S BEGIN ^P^R^O^C^E^D^U^R^E ^O^F HELPME,
      ^E^N^T^E^R ,? (^A ^C^O^M^M^A ^F^O^L^L^O^W^E^D ^B^Y ^A ^Q^U^E^S^T^I^O^N ^M^A^R^K).

      T^H^E ^K^E^Y^W^O^R^D ^V^A^L^U^E ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D ^I^N ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^W^A^Y^S@D

        F^O^R^M^A^T           D^E^S^C^R^I^P^T^I^O^N

        ^K^E^Y^W^R^D           S^P^E^C^I^F^I^E^S ^A ^P^A^R^A^M^E^T^E^R ^I^D^E^N^T^I^C^A^L ^T^O ^A ^K^E^Y^W^O^R^D
                         ^O^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^H^E^A^D^E^R.  S^U^B^S^T^I^T^U^T^I^O^N ^I^S
                         ^C^O^N^T^R^O^L^L^E^D ^B^Y ^T^H^E *K ^E^N^T^R^Y ^I^N ^T^H^E ^C^H^E^C^K^L^I^S^T.

        ^K^E^Y^W^R^D?          S^P^E^C^I^F^I^E^S ^I^N^T^E^R^A^C^T^I^V^E ^P^R^O^C^E^S^S^I^N^G (^H^E^L^P ^T^E^X^T) ^F^O^R
                         ^T^H^E ^P^A^R^A^M^E^T^E^R ^R^E^P^R^E^S^E^N^T^E^D ^B^Y ^K^E^Y^W^R^D.

        ?                S^P^E^C^I^F^I^E^S ^I^N^T^E^R^A^C^T^I^V^E ^P^R^O^C^E^S^S^I^N^G ^O^F ^T^H^E ^P^R^O^C^E^D^U^R^E.
                         S^A^M^E ^A^S ^K^E^Y^W^R^D?, ^E^X^C^E^P^T ^T^H^A^T ^M^A^I^N ^H^E^L^P ^T^E^X^T ^F^O^R
                         ^T^H^E ^P^R^O^C^E^D^U^R^E ^I^S ^R^E^Q^U^E^S^T^E^D (^R^A^T^H^E^R ^T^H^A^N ^T^H^E ^H^E^L^P
                         ^T^E^X^T ^F^O^R ^A ^S^P^E^C^I^F^I^C ^K^E^Y^W^O^R^D ^O^F ^T^H^E ^P^R^O^C^E^D^U^R^E).
                         T^O ^E^N^T^E^R ^A ? ^B^Y ^I^T^S^E^L^F ^I^N ^T^H^I^S BEGIN ^P^R^O^C^E^D^U^R^E ^O^F
                         HELPME, ^E^N^T^E^R ,? (^A ^C^O^M^M^A ^F^O^L^L^O^W^E^D ^B^Y ^A ^Q^U^E^S^T^I^O^N ^M^A^R^K).

        ^K^E^Y^W^R^D=          R^E^M^O^V^E^S ^K^E^Y^W^R^D ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^B^O^D^Y (^N^U^L^L
                         ^S^U^B^S^T^I^T^U^T^I^O^N) ^U^N^L^E^S^S ^O^V^E^R^R^I^D^D^E^N ^B^Y ^A ^C^H^E^C^K^L^I^S^T
                         ^S^P^E^C^I^F^I^C^A^T^I^O^N. (T^H^I^S ^F^O^R^M^A^T ^I^S ^N^O^T ^E^X^E^C^U^T^E^D ^B^Y
                         HELPME.)

        ^K^E^Y^W^R^D=^V^A^L^U^E     A^L^L^O^W^S ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T ^S^U^B^S^T^I^T^U^T^I^O^N.  ^V^A^L^U^E
                         ^R^E^P^L^A^C^E^S ^K^E^Y^W^R^D ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^B^O^D^Y ^U^N^L^E^S^S
                         ^T^H^E ^C^H^E^C^K^L^I^S^T ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^S^P^E^C^I^F^I^E^S ^O^T^H^E^R^W^I^S^E.
                         (T^H^I^S ^F^O^R^M^A^T ^I^S ^N^O^T ^E^X^E^C^U^T^E^D ^B^Y HELPME.)

        ^V^A^L^U^E            A^L^L^O^W^S ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^S^U^B^S^T^I^T^U^T^I^O^N.  ^V^A^L^U^E
                         ^R^E^P^L^A^C^E^S ^T^H^E ^K^E^Y^W^R^D ^W^H^O^S^E ^P^O^S^I^T^I^O^N ^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E
                         ^H^E^A^D^E^R ^M^A^T^C^H^E^S ^T^H^E ^P^O^S^I^T^I^O^N ^O^F ^T^H^I^S ^V^A^L^U^E ^I^N ^T^H^E
                         BEGIN ^C^O^M^M^A^N^D.

     D^E^F^A^U^L^T@D T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L ^A^N^D ^H^A^S ^N^O ^D^E^F^A^U^L^T.
.HELP,CK,NOLIST

      T^H^I^S ^I^S ^T^H^E ^V^A^L^U^E ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^C^O^M^M^E^N^T ^K^E^Y^W^O^R^D ^O^N ^T^H^E
      ^P^R^O^C^E^D^U^R^E ^H^E^A^D^E^R.  T^H^E ^V^A^L^U^E ^C^O^N^S^I^S^T^S ^O^F ^A^N^Y ^C^H^A^R^A^C^T^E^R^S ^Y^O^U
      ^S^P^E^C^I^F^Y.  I^N ^C^O^M^M^A^N^D ^M^O^D^E ^O^U^T^S^I^D^E ^O^F HELPME, ^T^H^E ^C^O^M^M^E^N^T ^M^U^S^T
      ^B^E ^P^R^E^C^E^D^E^D ^B^Y ^T^H^E ^T^E^R^M^I^N^A^T^O^R, ^W^H^I^C^H ^I^S ^A ^P^E^R^I^O^D (.).  I^N HELPME,
      ^A ^C^O^M^M^E^N^T ^M^A^Y ^B^E ^A^N^Y ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S (^A ^P^R^E^C^E^D^I^N^G ^P^E^R^I^O^D ^I^S
      ^N^O^T ^N^E^C^E^S^S^A^R^Y).

      D^E^F^A^U^L^T@D  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L ^A^N^D ^H^A^S ^N^O ^D^E^F^A^U^L^T.
.ENDHELP
.EX.  $BEGIN,PNAME,PFILE,KEYWRD.CK.
$EXIT.
$REVERT(NOLIST)
*WEOR
.PROC,BKSP*I
,LFN[F^I^L^E ^T^O ^B^A^C^K^S^P^A^C^E]=(*F)
,N[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^T^O ^B^A^C^K^S^P^A^C^E]=(*S6(0123456789),*N=1)
,M[M^O^D^E ^O^F ^F^I^L^E]=(C=$,C$,B=$,B$,*N=$,B$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BKSP,^L^F^N,^N,^M.

      T^H^E BKSP ^C^O^M^M^A^N^D ^B^A^C^K^S^P^A^C^E^S ^A ^F^I^L^E ^A ^C^E^R^T^A^I^N ^N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^B^A^C^K^S^P^A^C^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S 1
      ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^L^O^G^I^C^A^L ^R^E^C^O^R^D^S (^D^E^C^I^M^A^L)
      ^T^O ^B^A^C^K^S^P^A^C^E.  T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^I^S 262143.

      D^E^F^A^U^L^T@D B^A^C^K^S^P^A^C^E^S 1 ^R^E^C^O^R^D.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^M^O^D^E@D C ^F^O^R ^C^H^A^R^A^C^T^E^R^S, B ^F^O^R ^B^I^N^A^R^Y.

      D^E^F^A^U^L^T@D T^H^E ^F^I^L^E ^I^S ^A^S^S^U^M^E^D ^T^O ^B^E ^B^I^N^A^R^Y.
.ENDHELP
.EX.  $BKSP(LFN,N_M)
*WEOR
.PROC,BLANK*I
,VSN[V^O^L^U^M^E S^E^R^I^A^L N^U^M^B^E^R (VSN)]=(*A1,*N)
,MNT[S^P^E^C^I^F^Y T^A^P^E D^R^I^V^E (MT ^O^R NT)]=(*A1,*N)
,D[T^A^P^E D^E^N^S^I^T^Y (D)]=(D=D,*A1,*N)
,CV[C^O^N^V^E^R^S^I^O^N M^O^D^E (CV)]=(*A1,*N)
,FA[F^I^L^E A^C^C^E^S^S^I^B^I^L^I^T^Y (FA)]=(*A1,*N)
,OFA[O^L^D F^I^L^E A^C^C^E^S^S^I^B^I^L^I^T^Y (OFA)]=(*A1,*N)
,VA[V^O^L^U^M^E A^C^C^E^S^S^I^B^I^L^I^T^Y (VA)]=(*A1,*N)
,OWN[O^W^N^E^R I^D^E^N^T^I^F^I^C^A^T^I^O^N]=(*A1,*N)
,LSL[L^A^B^E^L S^T^A^N^D^A^R^D L^E^V^E^L (LSL)]=(*A1,*N)
,U[P^H^Y^S^I^C^A^L U^N^L^O^A^D (U)]=(U=U,*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BLANK,VSN=^V^S^N,^0MT ^O^R NT^2,D=^D^E^N,CV=^C^V,FA=^F^A,OFA=^O^F^A,
                    VA=^V^A,OWNER=^U^S^E^R^N^A^M^E/^F^A^M^I^L^Y^N^A^M^E,LSL=^L^S^L,U.

      T^H^E BLANK ^C^O^M^M^A^N^D ^W^R^I^T^E^S ^T^H^E ANSI ^S^T^A^N^D^A^R^D ^L^A^B^E^L^S VOL1, HDR1, ^A^N^D EOF1
      ^F^O^L^L^O^W^I^N^G ^T^H^E ^L^O^A^D ^P^O^I^N^T ^O^F ^A ^T^A^P^E.
.HELP,VSN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R VSN ^S^P^E^C^I^F^I^E^S ^A ^O^N^E- ^T^O ^S^I^X-^C^H^A^R^A^C^T^E^R ^V^O^L^U^M^E ^S^E^R^I^A^L ^N^U^M^B^E^R
      ^T^H^A^T ^U^N^I^Q^U^E^L^Y ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^R^E^E^L ^O^F ^T^A^P^E.  I^T ^I^S ^E^N^T^E^R^E^D ^I^N ^T^H^E VOL1
      ^L^A^B^E^L.  I^T ^N^E^E^D ^N^O^T ^M^A^T^C^H ^T^H^E VSN ^P^R^E^V^I^O^U^S^L^Y ^R^E^C^O^R^D^E^D ^O^N ^T^H^E ^T^A^P^E.

      N^O^T^E@D  A^V^O^I^D ^S^P^E^C^I^F^Y^I^N^G ^A ^V^O^L^U^M^E ^S^E^R^I^A^L ^N^U^M^B^E^R ^T^H^A^T ^M^A^T^C^H^E^S ^A ^L^O^C^A^L ^F^I^L^E
             ^N^A^M^E ^A^T^T^A^C^H^E^D ^T^O ^Y^O^U^R ^J^O^B; ^O^T^H^E^R^W^I^S^E ^T^H^E ^L^O^C^A^L ^F^I^L^E ^W^I^L^L ^B^E ^L^O^S^T.
             O^M^I^T^T^I^N^G ^T^H^E VSN ^P^A^R^A^M^E^T^E^R ^D^I^S^C^A^R^D^S ^A^N^Y ^L^O^C^A^L ^F^I^L^E ^N^A^M^E^D BLKTAPE
             ^F^R^O^M ^Y^O^U^R ^J^O^B.
.HELP,MNT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^0MT ^O^R NT^2 ^S^P^E^C^I^F^I^E^S ^S^E^V^E^N-^T^R^A^C^K (MT) ^O^R ^N^I^N^E-^T^R^A^C^K (NT)
      ^T^A^P^E ^D^R^I^V^E.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^I^N^E^D.  M^U^S^T ^N^O^T ^C^O^N^F^L^I^C^T ^W^I^T^H
      D=^D^E^N ^S^P^E^C^I^F^I^C^A^T^I^O^N.
.HELP,D,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R D=^D^E^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^A^P^E ^D^E^N^S^I^T^Y.  T^H^E ^T^A^P^E ^D^E^N^S^I^T^Y
      ^M^U^S^T ^N^O^T ^C^O^N^F^L^I^C^T ^W^I^T^H MT ^O^R NT ^S^P^E^C^I^F^I^C^A^T^I^O^N.  T^H^E ^D^E^F^A^U^L^T ^I^S
      ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^I^N^E^D.  T^H^E ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D ^F^O^R ^N^I^N^E-^T^R^A^C^K ^T^A^P^E
      ^N^O^T ^P^O^S^I^T^I^O^N^E^D ^A^T ^L^O^A^D ^P^O^I^N^T.  C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D


                  S^E^V^E^N-^T^R^A^C^K (MT)            N^I^N^E-^T^R^A^C^K (NT)
                  ----------------            ---------------
                  ^D^E^N      D^E^N^S^I^T^Y            ^D^E^N     D^E^N^S^I^T^Y
                  ---      -------            ---     -------
                  LO       200 ^C^P^I            HD       800 ^C^P^I
                  HI       556 ^C^P^I            PE      1600 ^C^P^I
                  HY       800 ^C^P^I            GE      6250 ^C^P^I
                  200      200 ^C^P^I            800      800 ^C^P^I
                  556      556 ^C^P^I            1600    1600 ^C^P^I
                  800      800 ^C^P^I            6250    6250 ^C^P^I
.HELP,CV,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R CV=^C^V ^O^R N=^C^V ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^N^V^E^R^S^I^O^N ^M^O^D^E ^F^O^R
      ^N^I^N^E-^T^R^A^C^K ^T^A^P^E ^L^A^B^E^L^S.  T^H^E ^D^E^F^A^U^L^T ^I^S I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^I^N^E^D.  M^U^S^T
      ^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H MT ^O^R ^S^E^V^E^N-^T^R^A^C^K ^D^E^N^S^I^T^Y ^S^P^E^C^I^F^I^C^A^T^I^O^N.

                  ^C^V               M^E^A^N^I^N^G
                  --               -------
                  AS               ASCII/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.

                  US               S^A^M^E ^A^S AS.

                  EB               EBCDIC/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.
.HELP,FA,NOLIST
      T^H^E FA ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S^I^B^I^L^I^T^Y ^C^H^A^R^A^C^T^E^R, ^I^N^D^I^C^A^T^I^N^G
      ^W^H^O ^H^A^S ^A^C^C^E^S^S ^T^O ^T^H^E ^L^A^B^E^L^E^D ^T^A^P^E.  T^H^E ^V^A^L^U^E ^I^S ^E^N^T^E^R^E^D ^I^N ^T^H^E HDR1 ^A^N^D
      EOF1 ^L^A^B^E^L^S.

              ^F^A                          D^E^S^C^R^I^P^T^I^O^N
              --                          -----------
              B^L^A^N^K                       U^N^L^I^M^I^T^E^D ^A^C^C^E^S^S (^D^E^F^A^U^L^T).

              A                           O^N^L^Y ^T^H^E ^O^W^N^E^R ^O^F ^T^H^I^S NOS ^W^R^I^T^T^E^N
                                          ^T^A^P^E ^C^A^N ^A^C^C^E^S^S ^I^T.

              O^T^H^E^R                       I^N ^A^L^L ^F^U^T^U^R^E ^A^C^C^E^S^S^E^S ^O^F ^T^H^I^S ^T^A^P^E,
                                          ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S ^C^H^A^R^A^C^T^E^R.
.HELP,OFA,NOLIST

      T^H^E OFA ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^L^D ^F^I^L^E ^A^C^C^E^S^S^I^B^I^L^I^T^Y ^C^H^A^R^A^C^T^E^R
      ^O^N ^A ^L^A^B^E^L^E^D ^T^A^P^E ^T^H^A^T ^I^S ^T^O ^B^E ^R^E^L^A^B^E^L^E^D.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^U^S^T
      ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E FA ^F^I^E^L^D ^I^S ^C^U^R^R^E^N^T^L^Y ^O^T^H^E^R ^T^H^A^N A ^O^R ^B^L^A^N^K.
      F^U^T^U^R^E ^A^C^C^E^S^S^E^S ^O^F ^T^H^E ^T^A^P^E ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^P^E^C^I^F^I^E^D
      ^W^I^T^H ^T^H^E FA ^P^A^R^A^M^E^T^E^R.
.HELP,VA,NOLIST

      T^H^E VA ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^V^O^L^U^M^E ^A^C^C^E^S^S^I^B^I^L^I^T^Y ^C^H^A^R^A^C^T^E^R
      ^I^N^D^I^C^A^T^I^N^G ^T^H^A^T ^T^H^E ^V^O^L^U^M^E ^M^U^S^T ^B^E ^A^C^C^E^S^S^E^D ^A^S ^A^N ANSI-^L^A^B^E^L^E^D
      ^T^A^P^E (LB=KL).  I^F VA ^I^S ^N^O^N^B^L^A^N^K, ^O^N^L^Y ^A ^S^Y^S^T^E^M ^O^R^I^G^I^N ^J^O^B ^C^A^N
      ^D^E^S^T^R^O^Y VOL1 (^F^O^R ^E^X^A^M^P^L^E, ^A^S^S^I^G^N ^T^A^P^E ^A^S ^U^N^L^A^B^E^L^E^D).  D^E^F^A^U^L^T
      ^I^S ^U^N^R^E^S^T^R^I^C^T^E^D ^A^C^C^E^S^S.
.HELP,OWN,NOLIST

      T^H^E OWNER ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^W^N^E^R ^I^D^E^N^T^I^F^I^C^A^T^I^O^N ^E^N^T^E^R^E^D ^I^N VOL1
      ^L^A^B^E^L.  D^E^T^E^R^M^I^N^E^S ^T^H^E ^O^W^N^E^R ^F^O^R ^F^I^L^E ^A^C^C^E^S^S^I^B^I^L^I^T^Y (FA) ^P^A^R^A^M^E^T^E^R.
.HELP,LSL,NOLIST
      T^H^E LSL ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^B^E^L ^S^T^A^N^D^A^R^D ^L^E^V^E^L ^E^N^T^E^R^E^D ^I^N VOL1
      ^L^A^B^E^L.  D^E^F^A^U^L^T ^I^S ^T^H^E ^N^U^M^B^E^R 1.
               ^L^S^L                        D^E^S^C^R^I^P^T^I^O^N
               ---                        -----------
               1                          T^A^P^E ^L^A^B^E^L^S ^A^N^D ^D^A^T^A ^F^O^R^M^A^T ^F^O^R ^T^H^I^S
                                          ^V^O^L^U^M^E ^C^O^N^F^O^R^M ^T^O ^T^H^E ANSI ^S^T^A^N^D^A^R^D.

               B^L^A^N^K                      T^A^P^E ^L^A^B^E^L^S ^A^N^D ^D^A^T^A ^F^O^R^M^A^T ^F^O^R ^T^H^I^S
                                          ^V^O^L^U^M^E ^M^A^Y ^O^R ^M^A^Y ^N^O^T ^C^O^N^F^O^R^M ^T^O ^T^H^E
                                          ANSI ^S^T^A^N^D^A^R^D.
.HELP,U,NOLIST

      T^H^E U ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^A^P^E ^I^S ^P^H^Y^S^I^C^A^L^L^Y ^U^N^L^O^A^D^E^D ^W^H^E^N ^R^E^T^U^R^N^E^D
      ^A^F^T^E^R ^B^L^A^N^K ^L^A^B^E^L^I^N^G.  I^F U ^I^S ^O^M^I^T^T^E^D, ^P^H^Y^S^I^C^A^L ^U^N^L^O^A^D^I^N^G ^I^S ^I^N^H^I^B^I^T^E^D.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^S^Y^S^T^E^M ^O^R^I^G^I^N ^J^O^B^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BLOCK*I
,LFN[L^O^C^A^L ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^B^L^O^C^K ^L^I^N^E^S]=(*F)
,P1[W^R^I^T^E ^O^V^E^R ^F^I^L^E ^C^O^N^T^E^N^T^S]=(Y=R,YES=R,R,
                            NR,N=NR,NO=NR,*N=NR)
,$P2$[C^A^R^R^I^A^G^E ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R]=(*N=1,$ $,SPACE=$ $,
                                   *S1($01-+/2QRST$))
,LINES[H^O^W ^M^A^N^Y ^L^I^N^E^S]=(1,2,3,4,5,*N=1)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D BLOCK,^L^F^N,P1,P2./^L^I^N^E1/^L^I^N^E2/.../^L^I^N^E^N

      T^H^E BLOCK ^C^O^M^M^A^N^D ^P^R^I^N^T^S ^O^N^E ^O^R ^M^O^R^E ^L^I^N^E^S ^O^F ^L^A^R^G^E ^B^A^N^N^E^R ^C^H^A^R^A^C^T^E^R^S
      ^O^N ^A ^D^E^S^I^G^N^A^T^E^D ^F^I^L^E.  T^H^E^Y ^M^A^Y ^B^E ^U^P^P^E^R^C^A^S^E ^A^L^P^H^A^N^U^M^E^R^I^C^S ^A^N^D ^S^P^E^C^I^A^L
      ^C^H^A^R^A^C^T^E^R^S.  E^A^C^H ^L^A^R^G^E ^C^H^A^R^A^C^T^E^R ^I^S 10 ^L^I^N^E^S ^B^Y 10 ^C^O^L^U^M^N^S ^I^N ^S^I^Z^E.
      (W^H^E^N ^E^X^E^C^U^T^E^D ^B^Y HELPME, BLOCK ^C^A^N ^O^N^L^Y ^G^E^N^E^R^A^T^E ^U^P ^T^O 5 ^L^I^N^E^S ^O^F ^L^A^R^G^E
      ^C^H^A^R^A^C^T^E^R^S.)

      T^H^E ^D^E^L^I^M^I^T^E^R ^B^E^T^W^E^E^N ^L^I^N^E^S ^M^A^Y ^B^E ^A ^S^L^A^S^H / ^O^R ^A^N^Y ^O^T^H^E^R
      ^C^H^A^R^A^C^T^E^R.  I^T ^M^U^S^T ^B^E ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^I^N^G ^T^H^E ^T^E^R^M^I^N^A^T^O^R
      (.).  N^O^T^E@D T^O ^R^U^N BLOCK ^F^R^O^M HELPME, ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^L^I^N^E ^D^E^L^I^M^I^T^E^R.
.HELP,LFN,NOLIST

      S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E, 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  T^H^I^S ^I^S ^T^H^E ^N^A^M^E
      ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^L^A^R^G^E ^C^H^A^R^A^C^T^E^R ^L^I^N^E^S.  N^O^T^E@D I^F ^Y^O^U ^S^E^L^E^C^T ^T^H^E
      ^R^E^W^I^N^D ^O^P^T^I^O^N (R), ^T^H^E ^D^A^T^A ^I^N ^T^H^E ^F^I^L^E ^W^I^L^L ^B^E ^W^R^I^T^T^E^N ^O^V^E^R ^B^Y ^B^L^O^C^K
      ^C^H^A^R^A^C^T^E^R^S.
.HELP,P1,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^L^O^C^A^L ^F^I^L^E ^I^S ^T^O ^B^E
      ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^R^E^C^E^I^V^I^N^G ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^L^I^N^E^S.  V^A^L^U^E^S ^A^R^E R
      (^R^E^W^I^N^D) ^A^N^D NR (^N^O ^R^E^W^I^N^D).  I^F ^T^H^E ^F^I^L^E ^I^S ^R^E^W^O^U^N^D ^B^E^F^O^R^E
      ^P^R^I^N^T^I^N^G ^B^L^O^C^K ^L^I^N^E^S, ^T^H^E ^D^A^T^A ^I^N ^T^H^E ^F^I^L^E ^W^I^L^L ^B^E ^O^B^L^I^T^E^R^A^T^E^D
      ^B^Y ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S.  T^H^E ^D^E^F^A^U^L^T ^I^S NR (^T^H^E ^F^I^L^E ^I^S ^N^O^T ^R^E^W^O^U^N^D
      ^B^Y ^T^H^E BLOCK ^C^O^M^M^A^N^D).
.HELP,P2,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^A^R^R^I^A^G^E ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^T^O ^B^E
      ^E^X^E^C^U^T^E^D ^B^E^F^O^R^E ^T^H^E ^F^I^R^S^T ^B^L^O^C^K ^L^I^N^E ^I^S ^P^R^I^N^T^E^D.  C^A^R^R^I^A^G^E ^C^O^N^T^R^O^L
      ^C^H^A^R^A^C^T^E^R^S ^A^R^E: 0, 1, -, +, /, 2, Q, R, S, T, ^A^N^D ^S^P^A^C^E (^E^N^T^E^R
      $ $ ^O^R ^T^H^E ^W^O^R^D SPACE).  T^H^E ^D^E^F^A^U^L^T ^I^S 1 (^T^O^P ^O^F ^F^O^R^M).
.HELP,LINES,NOLIST

      E^N^T^E^R ^T^H^E ^N^U^M^B^E^R ^O^F ^L^I^N^E^S ^O^F ^L^A^R^G^E ^C^H^A^R^A^C^T^E^R^S ^T^O ^P^R^I^N^T ^O^U^T.  W^I^T^H^I^N
      HELPME, ^T^H^E ^M^A^X^I^M^U^M ^I^S 5.  T^H^E ^D^E^F^A^U^L^T ^I^S 1.

         S^P^E^C^I^A^L V^A^L^U^E     D^E^S^C^R^I^P^T^I^O^N
         -------------     -----------
             DATE         C^U^R^R^E^N^T ^D^A^T^E.
             TIME         C^U^R^R^E^N^T ^T^I^M^E.
             USER         C^U^R^R^E^N^T ^U^S^E^R ^N^A^M^E.
             UJN          U^S^E^R ^J^O^B ^N^A^M^E.
             JSN          J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E.
.ENDHELP
IF,LINES.EQ.1.BEGIN,BLOCK1,ZZBLOCK?.
IF,LINES.EQ.2.BEGIN,BLOCK2,ZZBLOCK?.
IF,LINES.EQ.3.BEGIN,BLOCK3,ZZBLOCK?.
IF,LINES.EQ.4.BEGIN,BLOCK4,ZZBLOCK?.
IF,LINES.EQ.5.BEGIN,BLOCK5,ZZBLOCK?.
REVERT,NOLIST.
.DATA,ZZBLOCK.
.PROC,BLOCK1*I
,LINE[T^E^X^T ^F^O^R ^L^I^N^E]=(*A,*N)
.
.HELP,,NOLIST

      A ^S^I^N^G^L^E ^L^I^N^E ^O^F ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^U^P ^T^O 10 ^C^H^A^R^A^C^T^E^R^S ^I^N
      ^L^E^N^G^T^H (^A^L^P^H^A^N^U^M^E^R^I^C^S, ^U^P^P^E^R^C^A^S^E ^O^N^L^Y, ^A^N^D ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S).
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^M^O^R^E ^T^H^A^N 10 ^C^H^A^R^A^C^T^E^R^S, ^T^H^E ^L^I^N^E ^W^I^L^L ^B^E
      ^T^R^U^N^C^A^T^E^D ^T^O 10 ^C^H^A^R^A^C^T^E^R^S.

.ENDHELP
#.EX.  $BLOCK(LFN,P1,P2./LINE
.EOR
.PROC,BLOCK2*I
,LINE1[T^E^X^T ^F^O^R ^L^I^N^E 1]=(*A,*N)
,LINE2[T^E^X^T ^F^O^R ^L^I^N^E 2]=(*A,*N)
.
.HELP,,NOLIST

      A ^S^I^N^G^L^E ^L^I^N^E ^O^F ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^U^P ^T^O 10 ^C^H^A^R^A^C^T^E^R^S ^I^N
      ^L^E^N^G^T^H (^A^L^P^H^A^N^U^M^E^R^I^C^S, ^U^P^P^E^R^C^A^S^E ^O^N^L^Y, ^A^N^D ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S).
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^M^O^R^E ^T^H^A^N 10 ^C^H^A^R^A^C^T^E^R^S, ^T^H^E ^L^I^N^E ^W^I^L^L ^B^E
      ^T^R^U^N^C^A^T^E^D ^T^O 10 ^C^H^A^R^A^C^T^E^R^S.
.ENDHELP
#.EX.  $BLOCK(LFN,P1,P2./LINE1/LINE2
.EOR
.PROC,BLOCK3*I
,LINE1[T^E^X^T ^F^O^R ^L^I^N^E 1]=(*A,*N)
,LINE2[T^E^X^T ^F^O^R ^L^I^N^E 2]=(*A,*N)
,LINE3[T^E^X^T ^F^O^R ^L^I^N^E 3]=(*A,*N)
.
.HELP,,NOLIST

      A ^S^I^N^G^L^E ^L^I^N^E ^O^F ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^U^P ^T^O 10 ^C^H^A^R^A^C^T^E^R^S ^I^N
      ^L^E^N^G^T^H (^A^L^P^H^A^N^U^M^E^R^I^C^S, ^U^P^P^E^R^C^A^S^E ^O^N^L^Y, ^A^N^D ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S).
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^M^O^R^E ^T^H^A^N 10 ^C^H^A^R^A^C^T^E^R^S, ^T^H^E ^L^I^N^E ^W^I^L^L ^B^E
      ^T^R^U^N^C^A^T^E^D ^T^O 10 ^C^H^A^R^A^C^T^E^R^S.

.ENDHELP
#.EX.  $BLOCK(LFN,P1,P2./LINE1/LINE2/LINE3
.EOR
.PROC,BLOCK4*I
,LINE1[T^E^X^T ^F^O^R ^L^I^N^E 1]=(*A,*N)
,LINE2[T^E^X^T ^F^O^R ^L^I^N^E 2]=(*A,*N)
,LINE3[T^E^X^T ^F^O^R ^L^I^N^E 3]=(*A,*N)
,LINE4[T^E^X^T ^F^O^R ^L^I^N^E 4]=(*A,*N)
.
.HELP,,NOLIST

      A ^S^I^N^G^L^E ^L^I^N^E ^O^F ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^U^P ^T^O 10 ^C^H^A^R^A^C^T^E^R^S ^I^N
      ^L^E^N^G^T^H (^A^L^P^H^A^N^U^M^E^R^I^C^S, ^U^P^P^E^R^C^A^S^E ^O^N^L^Y, ^A^N^D ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S).
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^M^O^R^E ^T^H^A^N 10 ^C^H^A^R^A^C^T^E^R^S, ^T^H^E ^L^I^N^E ^W^I^L^L ^B^E
      ^T^R^U^N^C^A^T^E^D ^T^O 10 ^C^H^A^R^A^C^T^E^R^S.
.ENDHELP
#.EX.  $BLOCK(LFN,P1,P2./LINE1/LINE2/LINE3/LINE4
.EOR
.PROC,BLOCK5*I
,LINE1[T^E^X^T ^F^O^R ^L^I^N^E 1]=(*A,*N)
,LINE2[T^E^X^T ^F^O^R ^L^I^N^E 2]=(*A,*N)
,LINE3[T^E^X^T ^F^O^R ^L^I^N^E 3]=(*A,*N)
,LINE4[T^E^X^T ^F^O^R ^L^I^N^E 4]=(*A,*N)
,LINE5[T^E^X^T ^F^O^R ^L^I^N^E 5]=(*A,*N)
.
.HELP,,NOLIST

      A ^S^I^N^G^L^E ^L^I^N^E ^O^F ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^U^P ^T^O 10 ^C^H^A^R^A^C^T^E^R^S ^I^N
      ^L^E^N^G^T^H (^A^L^P^H^A^N^U^M^E^R^I^C^S, ^U^P^P^E^R^C^A^S^E ^O^N^L^Y, ^A^N^D ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S).
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^M^O^R^E ^T^H^A^N 10 ^C^H^A^R^A^C^T^E^R^S, ^T^H^E ^L^I^N^E ^W^I^L^L ^B^E
      ^T^R^U^N^C^A^T^E^D ^T^O 10 ^C^H^A^R^A^C^T^E^R^S.

.ENDHELP
#.EX.  $BLOCK(LFN,P1,P2./LINE1/LINE2/LINE3/LINE4/LINE5
*WEOR
.PROC,BRIEF*I.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BRIEF

      T^H^E BRIEF ^C^O^M^M^A^N^D ^S^U^P^P^R^E^S^S^E^S ^A^L^L ^F^U^L^L ^A^N^D ^P^A^R^T^I^A^L ^H^E^A^D^E^R^S ^P^R^O^D^U^C^E^D
      ^B^Y ^C^E^R^T^A^I^N ^C^O^M^M^A^N^D^S (^F^O^R ^E^X^A^M^P^L^E, LIBEDIT).  I^T ^A^L^S^O ^P^R^E^V^E^N^T^S ^T^H^E
      ^S^Y^S^T^E^M ^F^R^O^M ^E^C^H^O^I^N^G ^C^H^A^N^G^E^S ^Y^O^U ^M^A^K^E ^T^O ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^W^H^E^N ^U^S^I^N^G
      ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^E^D^I^T^I^N^G ^C^O^M^M^A^N^D^S.  T^O ^C^L^E^A^R ^T^H^E ^E^F^F^E^C^T ^O^F ^T^H^E BRIEF
      ^C^O^M^M^A^N^D, ^U^S^E ^T^H^E NORMAL ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BYE*I,
,APPL[A^P^P^L^I^C^A^T^I^O^N ^T^O ^C^O^N^N^E^C^T ^T^O]=(IAF,ITF,MCS,PLA,RBF,TAF,TVF,VEIAF,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  BYE,^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E BYE ^C^O^M^M^A^N^D ^L^O^G^S ^Y^O^U ^O^U^T ^O^F ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E ^C^U^R^R^E^N^T^L^Y ^U^S^I^N^G
      ^A^N^D ^E^I^T^H^E^R ^S^W^I^T^C^H^E^S ^Y^O^U ^T^O ^Y^O^U^R ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N ^O^R ^D^I^S^C^O^N^N^E^C^T^S
      ^Y^O^U^R ^T^E^R^M^I^N^A^L.  T^H^A^T ^I^S, ^I^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N ^W^A^S ^S^E^L^E^C^T^E^D ^F^R^O^M
      (^N^E^S^T^E^D ^W^I^T^H^I^N) ^A ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N, BYE ^W^O^U^L^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^R^E^C^O^N^N^E^C^T ^Y^O^U ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^A^P^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^I^S^H
      ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O.

      A^P^P^L^I^C^A^T^I^O^N     D^E^S^C^R^I^P^T^I^O^N

      IAF             I^N^T^E^R^A^C^T^I^V^E F^A^C^I^L^I^T^Y
      ITF             I^N^T^E^R^A^C^T^I^V^E T^R^A^N^S^F^E^R F^A^C^I^L^I^T^Y
      MCS             M^E^S^S^A^G^E C^O^N^T^R^O^L S^Y^S^T^E^M
      PLA             P^L^A^T^O-NAM I^N^T^E^R^F^A^C^E
      RBF             R^E^M^O^T^E B^A^T^C^H F^A^C^I^L^I^T^Y
      TAF             T^R^A^N^S^A^C^T^I^O^N F^A^C^I^L^I^T^Y
      TVF             T^E^R^M^I^N^A^L V^E^R^I^F^I^C^A^T^I^O^N F^A^C^I^L^I^T^Y
      VEIAF           NOS/VE I^N^T^E^R^A^C^T^I^V^E F^A^C^I^L^I^T^Y


      N^O^T^E@D Y^O^U ^W^I^L^L ^B^E ^P^L^A^C^E^D ^U^N^D^E^R ^T^H^E ^C^O^N^T^R^O^L ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D
            ^A^P^P^L^I^C^A^T^I^O^N ^O^N^L^Y ^I^F ^T^H^A^T ^A^P^P^L^I^C^A^T^I^O^N ^I^S ^A^V^A^I^L^A^B^L^E ^A^T
            ^Y^O^U^R ^S^I^T^E ^A^N^D ^I^F ^Y^O^U ^A^R^E ^V^A^L^I^D^A^T^E^D ^F^O^R ^T^H^A^T ^A^P^P^L^I^C^A^T^I^O^N.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N, ^Y^O^U ^A^R^E ^L^O^G^G^E^D ^O^U^T
               ^O^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N, ^A^N^D ^E^I^T^H^E^R ^Y^O^U ^A^R^E ^D^I^S^C^O^N^N^E^C^T^E^D
               ^F^R^O^M ^T^H^E ^N^E^T^W^O^R^K ^O^R ^R^E^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^E^R^E
               ^U^S^I^N^G ^P^R^I^O^R ^T^O ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
.EX.  $BYE(APPL)
$REVERT(NOLIST)
*WEOR
.PROC,CATALOG*I
,FILE[F^I^L^E ^T^O ^C^A^T^A^L^O^G]=(*F,*N=FILE)
,L[O^U^T^P^U^T ^F^I^L^E ^N^A^M^E]=(*F,*N=OUTPUT)
,N[F^I^L^E ^C^O^U^N^T]=(*K,*S6(0123456789),*N=1)
,U[L^I^S^T ^R^E^C^O^R^D^S ^W^I^T^H^I^N ^A ^L^I^B^R^A^R^Y]=(*K=$,U$,*N=)
,D[S^U^P^P^R^E^S^S ^C^O^M^M^E^N^T ^F^I^E^L^D]=(*K=$,D$,*N=)
,CS[S^U^P^P^R^E^S^S ^C^H^A^R^A^C^T^E^R ^S^E^T ^M^A^R^K]=(*K=$,CS$,*N=)
,R[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=$,R$,Y=$,R$,*K=$,R$,NO=,N=,*N=)
,T[L^I^S^T ^S^P^E^C^I^A^L ^T^E^X^T ^R^E^C^O^R^D^S]=(*K=$,T$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CATALOG,^L^F^N,L=^F^N^A^M^E,N=^N,U,D,CS,R,T.

      T^H^E CATALOG ^C^O^M^M^A^N^D ^L^I^S^T^S ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^E^A^C^H ^R^E^C^O^R^D ^I^N ^A ^F^I^L^E
      ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^J^O^B.
.HELP,FILE,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^A^T^A^L^O^G^E^D (^I^T ^M^U^S^T ^B^E ^A ^L^O^C^A^L ^F^I^L^E).

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E FILE
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^F^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^F^I^L^E ^T^O ^R^E^C^E^I^V^E
      ^T^H^E ^C^A^T^A^L^O^G ^L^I^S^T^I^N^G.

      D^E^F^A^U^L^T@D OUTPUT.
.HELP,N,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^B^E ^C^A^T^A^L^O^G^E^D (N=^N).  I^F ^N ^I^S 0, ^T^H^E
      ^S^Y^S^T^E^M ^C^A^T^A^L^O^G^S ^T^H^E ^F^I^L^E ^U^N^T^I^L ^A^N ^E^M^P^T^Y ^F^I^L^E ^I^S ^E^N^C^O^U^N^T^E^R^E^D.  I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D N, ^T^H^E ^S^Y^S^T^E^M ^C^A^T^A^L^O^G^S ^U^N^T^I^L ^I^T ^E^N^C^O^U^N^T^E^R^S
      ^T^H^E ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N.

      D^E^F^A^U^L^T@D 1.
.HELP,U,NOLIST

      I^F ^S^P^E^C^I^F^I^E^D, ^T^H^I^S ^P^A^R^A^M^E^T^E^R (U) ^L^I^S^T^S ^A^L^L ^R^E^C^O^R^D^S ^W^I^T^H^I^N ^T^H^E ^F^I^L^E
      ^T^O ^B^E ^C^A^T^A^L^O^G^E^D ^I^F ^T^H^A^T ^F^I^L^E ^I^S ^A ^U^S^E^R ^L^I^B^R^A^R^Y.  E^N^T^E^R U ^T^O ^S^P^E^C^I^F^Y
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D CATALOG ^L^I^S^T^S ^O^N^L^Y ^T^H^E ULIB ^R^E^C^O^R^D ^I^F ^L^F^N ^I^S ^A ^U^S^E^R
               ^L^I^B^R^A^R^Y.
.HELP,D,NOLIST

     T^H^I^S ^P^A^R^A^M^E^T^E^R (D) ^S^U^P^P^R^E^S^S^E^S ^T^H^E ^C^O^M^M^E^N^T^S ^F^I^E^L^D ^A^N^D ^A^L^L ^P^A^G^E
     ^H^E^A^D^I^N^G^S ^F^O^L^L^O^W^I^N^G ^T^H^E ^I^N^I^T^I^A^L ^P^A^G^E ^H^E^A^D^I^N^G ^F^O^R ^E^A^C^H ^F^I^L^E.  E^N^T^E^R
     D ^T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

     D^E^F^A^U^L^T@D C^O^M^M^E^N^T^S ^A^N^D ^P^A^G^E ^H^E^A^D^I^N^G^S ^A^R^E ^N^O^T ^S^U^P^P^R^E^S^S^E^D.
.HELP,CS,NOLIST

     T^H^I^S ^P^A^R^A^M^E^T^E^R (CS) ^S^U^P^P^R^E^S^S^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^I^N^D^I^C^A^T^O^R (63 ^O^R
     64) ^F^O^R OPL ^A^N^D OPLC ^R^E^C^O^R^D^S.  E^N^T^E^R CS ^T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

     D^E^F^A^U^L^T@D T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^I^N^D^I^C^A^T^O^R^S ^F^O^R OPL ^A^N^D OPLC ^R^E^C^O^R^D^S ^A^R^E
              ^N^O^T ^S^U^P^P^R^E^S^S^E^D.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R) ^R^E^W^I^N^D^S ^T^H^E ^F^I^L^E ^L^F^N ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^C^A^T^A^L^O^G^I^N^G.
      E^N^T^E^R R ^T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D I^F R ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^F^I^L^E ^L^F^N ^I^S ^N^O^T ^R^E^W^O^U^N^D.
.HELP,T,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (T) ^L^I^S^T^S ^T^H^E ^E^N^T^I^R^E ^T^E^X^T ^R^E^C^O^R^D ^I^F ^T^H^E ^R^E^C^O^R^D ^N^A^M^E
      ^B^E^G^I^N^S ^W^I^T^H ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^H^A^R^A^C^T^E^R^S@D

          APRD        EQPD       LIBD
          CMRD        IPRD

      E^N^T^E^R T ^T^O ^C^H^O^O^S^E ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T ^L^I^S^T ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^T^H^E ^T^E^X^T ^R^E^C^O^R^D.
.ENDHELP
.IF($N$.NE.$#N$,L1)
  .EX.  $CATALOG(FILE,#L=L,#N=N_U_D_CS_R_T)
.ELSE(L1)
  .EX.  $CATALOG(FILE,#L=L,#N_U_D_CS_R_T)
.ENDIF(L1)
*WEOR
.PROC,CATLIST*I
,DN[D^E^V^I^C^E ^N^U^M^B^E^R]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,EF[E^X^C^L^U^D^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*A7,*N=)
,FN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*A7,*N=*******)
,L[L^I^S^T^I^N^G ^F^I^L^E ^N^A^M^E]=(*F,*N=OUTPUT)
,LO[L^I^S^T ^O^P^T^I^O^N^S]=(F,FP,0,P,X,*N=0)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,RS[R^E^S^I^D^E^N^C^E ^O^F ^F^I^L^E]=(*S3(CDT),*N=)
,UN[U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(YES=$,WB$,Y=$,WB$,*K=$,WB$,N=,NO=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CATLIST,DN=^D^N,EF=^E^F,FN=^F^N,L=^L^F^N,LO=^P,NA,PN=^P^A^C^K^N^A^M^E,R=^R,
                   RS=^R^S,UN=^U^S^E^R^N^A^M^E,WB.

      T^H^E CATLIST ^C^O^M^M^A^N^D ^L^I^S^T^S ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^Y^O^U^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S, ^O^R
      ^A^B^O^U^T ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S ^Y^O^U ^C^A^N ^A^C^C^E^S^S ^I^N ^T^H^E ^C^A^T^A^L^O^G^S ^O^F ^O^T^H^E^R
      ^U^S^E^R^S.

      N^O^T^E@D CATLIST ^W^I^T^H^O^U^T ^P^A^R^A^M^E^T^E^R^S ^G^I^V^E^S ^Y^O^U ^A ^L^I^S^T ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T
            ^F^I^L^E^S ^I^N ^Y^O^U^R ^C^A^T^A^L^O^G.
.HELP,DN,NOLIST

       T^H^I^S ^P^A^R^A^M^E^T^E^R (DN=^D^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^N^U^M^B^E^R ^A^S^S^I^G^N^E^D ^T^O ^A ^D^E^V^I^C^E
       ^A^T ^S^Y^S^T^E^M ^I^N^I^T^I^A^L^I^Z^A^T^I^O^N.  I^F ^S^P^E^C^I^F^I^E^D, ^T^H^E CATLIST ^C^O^M^M^A^N^D ^L^I^S^T^S
       ^C^A^T^A^L^O^G ^I^N^F^O^R^M^A^T^I^O^N ^F^R^O^M ^T^H^A^T ^D^E^V^I^C^E.
.HELP,EF,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (EF=^E^F) ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^E^X^C^L^U^D^E^D ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^N^A^M^E^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^X^C^L^U^D^E^S ^F^R^O^M ^L^I^S^T^I^N^G ^T^H^E^S^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S.

      A^N ^A^S^T^E^R^I^S^K (*) ^P^R^E^S^E^N^T ^I^N ^A ^F^I^L^E ^N^A^M^E ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^A ^S^E^T ^O^F ^F^I^L^E^S ^I^S
      ^T^O ^B^E ^E^X^C^L^U^D^E^D.  F^O^R ^E^X^A^M^P^L^E, EF=***OPL ^W^I^L^L ^E^X^C^L^U^D^E ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H
      ^A ^S^I^X ^C^H^A^R^A^C^T^E^R ^F^I^L^E ^N^A^M^E ^T^H^A^T ^E^N^D^S ^I^N OPL; EF=M****** ^W^I^L^L ^E^X^C^L^U^D^E ^A^L^L
      ^T^H^E ^F^I^L^E^S ^W^I^T^H ^F^I^L^E ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R M.

      M^U^L^T^I^P^L^E ^F^I^L^E ^N^A^M^E^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D, ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S; ^F^O^R ^E^X^A^M^P^L^E,
      EF=A******/B******/C****** ^W^I^L^L ^E^X^C^L^U^D^E ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T
      ^B^E^G^I^N ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S A, B ^O^R C.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^A^L^L^O^W^E^D ^W^H^E^N ^L^I^S^T^I^N^G ^P^E^R^M^I^T ^I^N^F^O^R^M^A^T^I^O^N (LO=FP,
      LO=P), ^N^O^R ^W^H^E^N ^L^I^S^T^I^N^G ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S (LO=X).
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FN=^F^N) ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E^S.
      I^T ^A^L^S^O ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^C^A^T^A^L^O^G ^I^N^F^O^R^M^A^T^I^O^N ^I^S ^D^E^S^I^R^E^D ^O^N^L^Y ^F^O^R ^T^H^E^S^E
      ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S.

      A^N ^A^S^T^E^R^I^S^K (*) ^P^R^E^S^E^N^T ^I^N ^A ^F^I^L^E ^N^A^M^E (^F^N) ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^I^N^F^O^R^M^A^T^I^O^N ^F^O^R
      ^A ^S^E^T ^O^F ^F^I^L^E^S ^I^S ^T^O ^B^E ^L^I^S^T^E^D.  F^O^R ^E^X^A^M^P^L^E, FN=***OPL ^W^I^L^L ^L^I^S^T ^A^L^L ^T^H^E
      ^F^I^L^E^S ^W^I^T^H ^S^I^X ^C^H^A^R^A^C^T^E^R ^F^I^L^E ^N^A^M^E^S ^T^H^A^T ^E^N^D ^I^N OPL; FN=M****** ^W^I^L^L ^L^I^S^T
      ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H ^F^I^L^E ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R M.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^R^E^Q^U^I^R^E^D ^W^H^E^N ^L^I^S^T^I^N^G ^P^E^R^M^I^T ^I^N^F^O^R^M^A^T^I^O^N (LO=FP, LO=P),
      ^A^N^D ^W^H^E^N ^L^I^S^T^I^N^G ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S (LO=X).  W^H^E^N LO=FP, LO=P ^O^R
      LO=X ^I^S ^S^P^E^C^I^F^I^E^D, ^O^N^L^Y ^A ^S^I^N^G^L^E ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D, ^A^N^D ^N^O
      ^A^S^T^E^R^I^S^K (*) ^C^H^A^R^A^C^T^E^R^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^F^I^L^E ^T^O ^W^H^I^C^H CATLIST
      ^I^N^F^O^R^M^A^T^I^O^N ^I^S ^W^R^I^T^T^E^N.  T^H^E ^D^E^F^A^U^L^T ^I^S ^F^I^L^E OUTPUT.
.HELP,LO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (LO=^P) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T ^O^P^T^I^O^N^S.  T^H^E ^D^E^F^A^U^L^T ^I^S 0
      (^Z^E^R^O).  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ^P                               D^E^S^C^R^I^P^T^I^O^N
      -                               -----------

      F         L^I^S^T^S ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^E^A^C^H ^F^I^L^E ^I^N ^T^H^E ^U^S^E^R'^S ^C^A^T^A^L^O^G.
                I^F ^A^N^O^T^H^E^R ^U^S^E^R ^N^A^M^E ^I^S ^S^P^E^C^I^F^I^E^D, ^Y^O^U ^R^E^C^E^I^V^E ^A ^L^I^S^T^I^N^G ^O^F
                ^A^L^L ^T^H^E ^F^I^L^E^S ^A^C^C^E^S^S^I^B^L^E ^I^N ^T^H^E ^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.  T^H^E
                ^P^A^S^S^W^O^R^D^S ^F^O^R ^F^I^L^E^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^R^E ^N^O^T ^L^I^S^T^E^D.
                P^A^S^S^W^O^R^D^S ^M^U^S^T ^B^E ^O^B^T^A^I^N^E^D ^F^R^O^M ^T^H^E ^U^S^E^R.

      FP        L^I^S^T^S ^T^H^E ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N^S ^G^R^A^N^T^E^D ^F^O^R ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D
                ^O^N ^T^H^E FN ^P^A^R^A^M^E^T^E^R.  I^F ^A ^U^S^E^R ^N^A^M^E ^I^S ^A^L^S^O ^S^P^E^C^I^F^I^E^D,
                ^O^N^L^Y ^T^H^E ^F^I^L^E ^P^E^R^M^I^S^S^I^O^N ^G^R^A^N^T^E^D ^T^O ^T^H^A^T ^U^S^E^R ^I^S ^L^I^S^T^E^D.

                T^H^E ^U^S^E^R ^N^A^M^E, ^M^O^D^E ^O^F ^P^E^R^M^I^T^T^E^D ^A^C^C^E^S^S, ^P^E^R^M^I^S^S^I^O^N ^E^X^P^I^R^A^T^I^O^N
                ^D^A^T^E, ^N^U^M^B^E^R ^O^F ^A^C^C^E^S^S^E^S, ^A^N^D ^T^H^E ^D^A^T^E ^A^N^D ^T^I^M^E ^O^F ^T^H^E ^L^A^S^T
                ^A^C^C^E^S^S ^I^S ^L^I^S^T^E^D ^F^O^R ^E^A^C^H ^U^S^E^R ^T^H^A^T ^H^A^S ^B^E^E^N ^G^R^A^N^T^E^D ^E^X^P^L^I^C^I^T
                ^P^E^R^M^I^S^S^I^O^N ^T^O ^A^C^C^E^S^S ^T^H^E ^F^I^L^E; ^F^O^R ^A ^S^E^M^I^P^R^I^V^A^T^E ^F^I^L^E, ^T^H^I^S
                ^I^N^F^O^R^M^A^T^I^O^N ^I^S ^A^L^S^O ^L^I^S^T^E^D ^F^O^R ^A^L^L ^O^T^H^E^R ^U^S^E^R^S ^T^H^A^T ^H^A^V^E
                ^A^C^C^E^S^S^E^D ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E.  (U^S^E^R ^N^A^M^E^S ^A^R^E ^N^O^T ^R^E^C^O^R^D^E^D
                ^F^O^R ^A^C^C^E^S^S^E^S ^T^O ^P^U^B^L^I^C ^F^I^L^E^S.)  A^N ^A^S^T^E^R^I^S^K ^F^O^L^L^O^W^S ^T^H^E ^U^S^E^R
                ^N^A^M^E/^P^E^R^M^I^S^S^I^O^N ^M^O^D^E ^I^F ^E^X^P^L^I^C^I^T ^P^E^R^M^I^S^S^I^O^N ^H^A^S ^B^E^E^N ^G^R^A^N^T^E^D
                ^T^O ^T^H^I^S ^U^S^E^R.

      P         L^I^S^T^S ^T^H^E ^U^S^E^R ^N^A^M^E^S ^O^F ^U^S^E^R^S ^W^H^O ^H^A^V^E ^B^E^E^N ^G^R^A^N^T^E^D ^E^X^P^L^I^C^I^T
                ^P^E^R^M^I^S^S^I^O^N ^T^O ^A^C^C^E^S^S ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E (^F^O^R ^A ^S^E^M^I^P^R^I^V^A^T^E
                ^F^I^L^E, ^I^T ^A^L^S^O ^L^I^S^T^S ^T^H^E ^U^S^E^R ^N^A^M^E^S ^O^F ^A^L^L ^O^T^H^E^R ^U^S^E^R^S ^W^H^O ^H^A^V^E
                ^A^C^C^E^S^S^E^D ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E).  T^H^I^S ^O^P^T^I^O^N ^R^E^Q^U^I^R^E^S ^T^H^A^T ^A ^F^I^L^E
                ^N^A^M^E ^B^E ^S^P^E^C^I^F^I^E^D (FN=^F^N).

      X         L^I^S^T^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E
                ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E FN=^F^N ^P^A^R^A^M^E^T^E^R ^A^S ^W^E^L^L ^A^S ^T^H^E
                ^I^N^F^O^R^M^A^T^I^O^N ^R^E^T^U^R^N^E^D ^B^Y ^T^H^E LO=F ^P^A^R^A^M^E^T^E^R.  N^O^T^E@D ^Y^O^U ^M^U^S^T
                ^S^P^E^C^I^F^Y ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E (FN=^F^N) ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^I^S ^O^P^T^I^O^N
                (LO=X).  F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S
                ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^A ^F^I^L^E ^W^I^L^L ^N^O^T ^B^E ^L^I^S^T^E^D ^U^N^L^E^S^S ^Y^O^U^R ^C^U^R^R^E^N^T
                ^J^O^B ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^I^S ^A^T ^L^E^A^S^T ^A^S ^H^I^G^H ^A^S ^T^H^E ^C^U^R^R^E^N^T
                ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^F^I^L^E.

      0 (^Z^E^R^O)  L^I^S^T^S ^A^L^P^H^A^B^E^T^I^C^A^L^L^Y ^T^H^E ^N^A^M^E^S ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E^S
                ^A^N^D ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E^S ^I^N ^Y^O^U^R ^C^A^T^A^L^O^G.  I^F ^Y^O^U ^S^P^E^C^I^F^Y
                ^A ^U^S^E^R ^N^A^M^E ^O^T^H^E^R ^T^H^A^N ^Y^O^U^R ^O^W^N, ^Y^O^U ^R^E^C^E^I^V^E ^A ^L^I^S^T
                ^O^F ^T^H^E ^F^I^L^E^S ^A^C^C^E^S^S^I^B^L^E ^I^N ^T^H^E ^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^E^R^R^O^R^S ^I^N CATLIST ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E
      ^T^H^E ^J^O^B.  W^H^E^N ^S^P^E^C^I^F^Y^I^N^G NA, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O
      ^W^A^Y^S@D F^I^R^S^T, ^A^S ^A ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^A ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S ^B^U^S^Y
      (^S^O^M^E^O^N^E ^E^L^S^E ^I^S ^U^S^I^N^G ^I^T) ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S
      ^N^O^T ^A^V^A^I^L^A^B^L^E (^N^O^T ^M^O^U^N^T^E^D), ^R^E^S^U^L^T^I^N^G ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D
      ^U^N^T^I^L ^T^H^E ^F^I^L^E ^B^E^C^O^M^E^S ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R
      ^E^X^A^M^P^L^E, ^T^H^E ^F^I^L^E ^C^A^N^N^O^T ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.
      T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^J^O^B ^T^E^R^M^I^N^A^T^E^S ^O^N ^E^R^R^O^R.

      N^O^T^E@D ^Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^A^C^K^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^P^A^C^K (1- ^T^O 7-
      ^C^H^A^R^A^C^T^E^R ^P^A^C^K ^N^A^M^E) ^O^N ^W^H^I^C^H ^T^H^E ^F^I^L^E ^R^E^S^I^D^E^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^H^O^U^L^D
      ^B^E ^S^P^E^C^I^F^I^E^D ^O^N^L^Y ^W^H^E^N ^T^H^E ^F^I^L^E ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.  T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T, ^H^O^W^E^V^E^R, ^S^P^E^C^I^F^Y ^A ^N^E^W ^F^I^L^E ^R^E^S^I^D^E^N^C^E.  N^O^T^E@D ^Y^O^U ^M^U^S^T
      ^S^P^E^C^I^F^Y ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E (R=^R) ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A^N ^A^U^X^I^L^I^A^R^Y
      ^P^A^C^K.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E ^F^O^R ^F^I^L^E^S ^W^H^I^C^H
      ^R^E^S^I^D^E ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^S^T^O^R^A^G^E ^D^E^V^I^C^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T ^S^P^E^C^I^F^Y
      ^A ^N^E^W ^F^I^L^E ^R^E^S^I^D^E^N^C^E.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------

      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y PN (^P^A^C^K ^N^A^M^E),
      ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,RS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RS=^R^S) ^S^P^E^C^I^F^I^E^S ^B^Y ^R^E^S^I^D^E^N^C^E ^W^H^I^C^H ^F^I^L^E^S ^A^R^E ^T^O ^B^E
      ^L^I^S^T^E^D.  T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O ^R^E^S^I^D^E^N^C^E ^S^E^L^E^C^T^I^O^N, ^W^H^I^C^H ^W^I^L^L ^S^E^L^E^C^T
      ^A^L^L ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S ^T^H^A^T ^M^E^E^T ^T^H^E ^O^T^H^E^R ^S^P^E^C^I^F^I^E^D ^C^R^I^T^E^R^I^A.
      Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^A^N^Y ^C^O^M^B^I^N^A^T^I^O^N ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^R^E^S^I^D^E^N^C^E ^S^E^L^E^C^T^I^O^N^S.
      P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E:

      ^R^S                              D^E^S^C^R^I^P^T^I^O^N
      --                              -----------

      C         L^I^S^T^S ^T^H^O^S^E ^F^I^L^E^S ^W^H^I^C^H ^R^E^S^I^D^E ^O^N ^A^L^T^E^R^N^A^T^E ^C^A^R^T^R^I^D^G^E
                ^S^T^O^R^A^G^E.  T^H^E^S^E ^F^I^L^E^S ^M^A^Y ^A^L^S^O ^R^E^S^I^D^E ^O^N ^O^T^H^E^R ^M^E^D^I^A (^D^I^S^K
                ^A^N^D/^O^R ^A^L^T^E^R^N^A^T^E ^T^A^P^E ^S^T^O^R^A^G^E).

      D         L^I^S^T^S ^T^H^O^S^E ^F^I^L^E^S ^W^H^I^C^H ^R^E^S^I^D^E ^O^N ^D^I^S^K ^S^T^O^R^A^G^E.
                T^H^E^S^E ^F^I^L^E^S ^M^A^Y ^A^L^S^O ^R^E^S^I^D^E ^O^N ^O^T^H^E^R ^M^E^D^I^A (^A^L^T^E^R^N^A^T^E
                ^C^A^R^T^R^I^D^G^E ^A^N^D/^O^R ^A^L^T^E^R^N^A^T^E ^T^A^P^E ^S^T^O^R^A^G^E).

      T         L^I^S^T^S ^T^H^O^S^E ^F^I^L^E^S ^W^H^I^C^H ^R^E^S^I^D^E ^O^N ^A^L^T^E^R^N^A^T^E ^T^A^P^E ^S^T^O^R^A^G^E.
                T^H^E^S^E ^F^I^L^E^S ^M^A^Y ^A^L^S^O ^R^E^S^I^D^E ^O^N ^O^T^H^E^R ^M^E^D^I^A (^D^I^S^K
                ^A^N^D/^O^R ^A^L^T^E^R^N^A^T^E ^C^A^R^T^R^I^D^G^E ^S^T^O^R^A^G^E).
.HELP,UN,NOLIST

      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A ^U^S^E^R ^N^A^M^E ^O^T^H^E^R ^T^H^A^N ^Y^O^U^R ^O^W^N (UN=^U^S^E^R^N^A^M^E), ^Y^O^U
      ^R^E^C^E^I^V^E ^A ^L^I^S^T^I^N^G ^O^F ^F^I^L^E^S ^Y^O^U ^C^A^N ^A^C^C^E^S^S ^I^N ^T^H^E ^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.
      T^H^E ^O^N^L^Y ^F^I^L^E^S ^L^I^S^T^E^D, ^H^O^W^E^V^E^R, ^A^R^E ^T^H^O^S^E ^T^H^A^T ^T^H^E ^O^W^N^E^R ^H^A^S
      ^E^X^P^L^I^C^I^T^L^Y ^P^E^R^M^I^T^T^E^D ^T^O ^B^E ^L^I^S^T^E^D (^U^S^I^N^G ^T^H^E AC ^P^A^R^A^M^E^T^E^R ^O^N ^A
      CHANGE, DEFINE, ^O^R SAVE ^C^O^M^M^A^N^D).  T^H^E ^D^E^F^A^U^L^T ^I^S ^Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K ^P^A^C^K^S
      ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^R^E^Q^U^E^S^T^E^D ^P^A^C^K ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.  E^N^T^E^R WB
      ^F^O^R ^W^A^I^T, ^O^R NO ^F^O^R ^N^O ^W^A^I^T.  N^O^T^E@D ^Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D
      NA (^N^O ^A^B^O^R^T).  T^H^E ^D^E^F^A^U^L^T ^I^S ^Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^T^H^E ^P^A^C^K ^I^S ^U^N^A^V^A^I^L^A^B^L^E.
.ENDHELP
.EX.  $CATLIST(#DN=DN,#EF=EF,#FN=FN,#L=L,#LO=LO,#PN=PN,#R=R,#RS=RS,#UN=UN_NA_WB)
*WEOR
.PROC,CFO*I
,JSN[J^O^B S^E^Q^U^E^N^C^E N^A^M^E]=(*A1,*N)
,DD[D^A^T^A]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CFO,^J^S^N.^D^A^T^A

      T^H^E CFO ^C^O^M^M^A^N^D ^S^E^N^D^S ^D^A^T^A ^T^O ^O^N^E ^O^F ^Y^O^U^R ^E^X^E^C^U^T^I^N^G ^J^O^B^S.  T^H^E
      ^C^O^M^M^A^N^D ^P^L^A^C^E^S ^D^A^T^A ^I^N ^L^O^C^A^T^I^O^N^S RA+70B ^T^H^R^O^U^G^H RA+74B ^O^F ^T^H^E
      ^P^R^O^G^R^A^M'^S ^F^I^E^L^D ^L^E^N^G^T^H.  T^H^E CPU ^P^R^O^G^R^A^M ^R^E^C^E^I^V^I^N^G ^T^H^E ^D^A^T^A ^M^U^S^T
      ^S^E^T ^T^H^E CFO ^F^L^A^G (^B^I^T 14 ^O^F RA+0) ^T^O ^I^N^D^I^C^A^T^E ^I^T ^W^I^L^L ^A^C^C^E^P^T
      CFO ^D^A^T^A.  T^H^E CFO ^C^O^M^M^A^N^D ^C^L^E^A^R^S ^T^H^E CFO ^F^L^A^G ^A^N^D ^T^H^E PAUSE
      ^F^L^A^G ^I^N RA+0 ^A^F^T^E^R ^I^T ^P^L^A^C^E^S ^D^A^T^A ^I^N ^T^H^E ^J^O^B'^S ^F^I^E^L^D ^L^E^N^G^T^H.
.HELP,JSN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^J^O^B ^T^O
      ^R^E^C^E^I^V^E ^T^H^E ^D^A^T^A.


.HELP,DD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^D^A^T^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^A^T^A ^F^O^R ^T^H^E ^J^O^B.  T^H^E ^D^A^T^A ^M^U^S^T ^B^E 36
      ^C^H^A^R^A^C^T^E^R^S ^O^R ^L^E^S^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CHANGE*I
,NEW[N^E^W ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,OLD[C^U^R^R^E^N^T ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/CT[F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y]=(P,PR,PRIVATE,S,SPRIV,
                                         PU,PUBLIC,*N=)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,M[A^C^C^E^S^S ^M^O^D^E ^F^O^R ^O^T^H^E^R ^U^S^E^R^S]=(E,EXECUTE,R,READ,RA,READAP,M,MODIFY,W,WRITE,
                              RM,READMD,A,APPEND,N,NULL,*N=)
,BR[N^E^W ^B^A^C^K^U^P ^C^O^P^Y ^S^E^L^E^C^T^I^O^N]=(Y,MD,N,TAPE=Y,MSE=MD,NO=N,NONE=N,*N=)
,PR[N^E^W ^P^R^E^F^E^R^R^E^D ^R^E^S^I^D^E^N^C^E]=(M,N,MSE=M,NONE=N,NO=N,*N=)
,SS[S^U^B^S^Y^S^T^E^M]=(BASIC,BAS,BATCH,BAT,EXECUTE,EXE,
                              FORTRAN,FOR,FTNTS,FTN,NULL,NUL,*N=)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,CE[C^L^E^A^R ^F^I^L^E ^E^R^R^O^R ^C^O^D^E]=(*K=$,CE$,YES=$,CE$,Y=$,CE$,NO=,N=,*N=)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
,XD[F^I^L^E ^P^A^S^S^W^O^R^D ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E]=(*S6(0123456789),*N=)
,XT[F^I^L^E ^P^A^S^S^W^O^R^D ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^N ^D^A^Y^S]=(*S4(0123456789),$*$,*N=)
,AC[G^R^A^N^T CATLIST ^P^E^R^M^I^S^S^I^O^N]=(Y,YES=Y,N,NO=N,*N=N)
,CP[R^E^P^L^A^C^E ^C^H^A^R^G^E/^P^R^O^J^E^C^T ^N^U^M^B^E^R^S]=(YES=$,CP$,Y=$,CP$,*K=$,CP$,
                                NO=,N=,*N=)
.
.HELP,,NOLIST
      F^O^R^M^A^T@D  CHANGE,^N^E^W=^O^L^D/CT=^C^T,PW=^P^W,M=^M,BR=^B^R,PR=^P^R,SS=^S^S,PN=^P^N,
                R=^R,NA,CE,WB,XD=^E^X^P^I^R^E^D^A^T^E,XT=^E^X^P^I^R^E^T^E^R^M,AC=^A^C,CP.

      T^H^E CHANGE ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^C^E^R^T^A^I^N ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E.
      T^H^E ^F^I^L^E ^T^O ^B^E ^C^H^A^N^G^E^D ^D^O^E^S ^N^O^T ^H^A^V^E ^T^O ^B^E ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^J^O^B.
.HELP,NEW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^N^E^W) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E (1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I^F ^Y^O^U ^D^O ^N^O^T ^W^I^S^H ^T^O ^C^H^A^N^G^E ^T^H^E ^N^A^M^E,
      ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R.
.HELP,OLD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^O^L^D) ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^L^D ^O^R ^C^U^R^R^E^N^T ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^A^N^D
      ^I^T ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,PW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (PW=^P^W) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^A^S^S^W^O^R^D (^O^P^T^I^O^N^A^L) ^F^O^R ^T^H^E ^F^I^L^E.
      I^F PW=0 ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E CHANGE ^C^O^M^M^A^N^D ^C^L^E^A^R^S ^T^H^E ^O^L^D ^P^A^S^S^W^O^R^D ^W^I^T^H^O^U^T
      ^S^E^T^T^I^N^G ^A ^N^E^W ^O^N^E.
.HELP,CT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CT=^C^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y.  P^O^S^S^I^B^L^E
      ^V^A^L^U^E^S ^A^R^E@D

      P        P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^O^N^L^Y ^B^Y ^T^H^E^I^R ^C^R^E^A^T^O^R
               ^A^N^D ^B^Y ^T^H^O^S^E ^G^R^A^N^T^E^D ^E^X^P^L^I^C^I^T ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N ^B^Y ^T^H^E
               ^F^I^L^E ^C^R^E^A^T^O^R (^U^S^I^N^G ^T^H^E PERMIT ^C^O^M^M^A^N^D).

      S        S^E^M^I^P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A ^U^S^E^R ^W^H^O
               ^K^N^O^W^S ^T^H^E ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E, ^A^N^D ^P^A^S^S^W^O^R^D, ^A^N^D ^W^H^O ^H^A^S
               ^N^O^T ^B^E^E^N ^E^X^P^L^I^C^I^T^L^Y ^D^E^N^I^E^D ^P^E^R^M^I^S^S^I^O^N ^T^O ^T^H^E ^F^I^L^E (M=NULL
               ^P^A^R^A^M^E^T^E^R ^O^N ^A PERMIT ^C^O^M^M^A^N^D).

      PU       P^U^B^L^I^C ^F^I^L^E; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A^L^L ^U^S^E^R^S ^W^H^O ^K^N^O^W ^T^H^E
               ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E ^A^N^D ^P^A^S^S^W^O^R^D.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^R^D^S ^T^H^E
               ^N^U^M^B^E^R ^O^F ^T^I^M^E^S ^T^H^E ^F^I^L^E ^W^A^S ^A^C^C^E^S^S^E^D ^A^N^D ^T^H^E ^D^A^T^E ^A^N^D ^T^I^M^E
               ^O^F ^T^H^E ^L^A^S^T ^A^C^C^E^S^S, ^B^U^T ^D^O^E^S ^N^O^T ^R^E^C^O^R^D ^U^S^E^R ^N^A^M^E^S.

      D^E^F^A^U^L^T@D  N^O ^C^H^A^N^G^E ^I^N ^C^A^T^E^G^O^R^Y.
.HELP,BR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (BR=^B^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^B^A^C^K^U^P ^C^O^P^Y ^S^E^L^E^C^T^I^O^N.  E^N^T^E^R
      MD ^T^O ^S^P^E^C^I^F^Y ^A ^S^U^P^P^L^E^M^E^N^T^A^L ^S^T^O^R^A^G^E ^M^E^D^I^U^M (^S^U^C^H ^A^S M^A^S^S S^T^O^R^A^G^E
      E^X^T^E^N^D^E^D), Y ^F^O^R ^T^A^P^E, ^O^R N ^F^O^R ^N^O ^B^A^C^K^U^P.

      D^E^F^A^U^L^T@D  N^O^N^E; (^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L).
.HELP,PR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PR=^P^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^R^E^F^E^R^R^E^D ^R^E^S^I^D^E^N^C^E ^F^O^R ^T^H^E
      ^F^I^L^E.  E^N^T^E^R M ^T^O ^S^P^E^C^I^F^Y ^A ^S^U^P^P^L^E^M^E^N^T^A^L ^S^T^O^R^A^G^E ^M^E^D^I^U^M (^S^U^C^H ^A^S
      M^A^S^S S^T^O^R^A^G^E E^X^T^E^N^D^E^D), N ^F^O^R ^N^O ^P^R^E^F^E^R^E^N^C^E.

      D^E^F^A^U^L^T@D  N^O^N^E (^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L).
.HELP,SS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (SS=^S^S) ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^T^E^R^A^C^T^I^V^E ^S^U^B^S^Y^S^T^E^M ^T^O ^B^E
      ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^F^I^L^E.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      BAS        B^A^S^I^C ^S^U^B^S^Y^S^T^E^M
      BAT        B^A^T^C^H ^S^U^B^S^Y^S^T^E^M
      EXE        E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M
      FOR        FORTRAN 5 ^S^U^B^S^Y^S^T^E^M
      FTN        FORTRAN EXTENDED 4 ^S^U^B^S^Y^S^T^E^M
      NUL        N^U^L^L ^S^U^B^S^Y^S^T^E^M


      D^E^F^A^U^L^T@D  NULL, ^U^N^L^E^S^S ^F^I^L^E ^I^S ^S^P^E^C^I^F^I^E^D ^A^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E, ^I^N ^W^H^I^C^H
                ^C^A^S^E ^T^H^E ^C^U^R^R^E^N^T ^S^U^B^S^Y^S^T^E^M ^I^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^F^I^L^E.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^P^A^C^K ^O^N ^W^H^I^C^H ^T^H^E ^F^I^L^E
      ^R^E^S^I^D^E^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^H^O^U^L^D ^B^E ^S^P^E^C^I^F^I^E^D ^O^N^L^Y ^W^H^E^N ^T^H^E ^F^I^L^E
      ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^A ^N^E^W
      ^F^I^L^E ^R^E^S^I^D^E^N^C^E.  N^O^T^E@D ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E
      (R=^R) ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A^N ^A^U^X^I^L^I^A^R^Y ^P^A^C^K.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E, ^F^O^R ^F^I^L^E^S ^W^H^I^C^H
      ^R^E^S^I^D^E ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^S^T^O^R^A^G^E ^D^E^V^I^C^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T ^S^P^E^C^I^F^Y
      ^A ^N^E^W ^F^I^L^E ^R^E^S^I^D^E^N^C^E.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------

      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y PN (^P^A^C^K ^N^A^M^E),
      ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E
      ^T^Y^P^E.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M=^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^E^R^M^I^S^S^I^O^N ^M^O^D^E ^F^O^R ^A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^O^
      ^S^E^M^I^P^R^I^V^A^T^E ^O^R ^P^U^B^L^I^C ^F^I^L^E^S.  I^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^C^H^A^N^G^E ^I^S ^D^I^R^E^C^T
      ^A^C^C^E^S^S, ^T^H^E^N@D

      E^N^T^E^R  T^O ^A^L^L^O^W ^O^T^H^E^R ^U^S^E^R^S ^T^O ^A^T^T^A^C^H ^T^H^E ^F^I^L^E ^I^N ^T^H^E ^F^O^L^L^O^W^I^N^G ^M^O^D^E^S@D
      -----  ---------------------------------------------------------------

      E      E^X^E^C^U^T^E.

      R      R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RA     R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RM     R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RU     R^E^A^D ^U^P^D^A^T^E, ^R^E^A^D, ^O^R ^E^X^E^C^U^T^E.

      A      A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.

      M      M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.

      U      U^P^D^A^T^E.

      W      W^R^I^T^E ^M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.

      N      N^O^N^E.

      I^F ^T^H^E ^F^I^L^E ^I^S ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S, ^T^H^E^N@D

      E^N^T^E^R  T^O ^A^L^L^O^W ^O^T^H^E^R ^U^S^E^R^S ^T^O@D
      -----  ------------------------

      R      R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RA     R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RM     R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RU     R^E^A^D ^U^P^D^A^T^E, ^R^E^A^D, ^O^R ^E^X^E^C^U^T^E.

      U      U^P^D^A^T^E.

      E      R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^T^O ^E^X^E^C^U^T^E ^O^N^L^Y.

      A      A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E ^F^I^L^E ^W^I^T^H ^T^H^E APPEND ^C^O^M^M^A^N^D.

      M      R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^O^R ^A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E ^F^I^L^E. Y^O^U
             ^C^A^N ^E^N^T^E^R GET, OLD, NEW ^A^N^D APPEND ^C^O^M^M^A^N^D^S, ^B^U^T ^N^O^T ^A
             REPLACE ^C^O^M^M^A^N^D ^F^O^R ^T^H^E ^F^I^L^E.

      W      R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E, ^A^P^P^E^N^D ^D^A^T^A ^T^O ^I^T, ^R^E^P^L^A^C^E ^I^T ^O^R
             ^P^U^R^G^E ^I^T.

      N      N^O ^A^C^C^E^S^S ^I^S ^A^L^L^O^W^E^D.

      D^E^F^A^U^L^T@D  T^H^E ^M^O^D^E ^R^E^M^A^I^N^S ^U^N^C^H^A^N^G^E^D.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^E^R^R^O^R^S ^I^N CHANGE ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E
      ^T^H^E ^J^O^B.  W^H^E^N ^S^P^E^C^I^F^Y^I^N^G NA, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D
      F^I^R^S^T, ^A^S ^A ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S ^B^U^S^Y (^S^O^M^E^O^N^E
      ^E^L^S^E ^I^S ^U^S^I^N^G ^I^T) ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E
      (^N^O^T ^M^O^U^N^T^E^D), ^R^E^S^U^L^T^I^N^G ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^F^I^L^E
      ^B^E^C^O^M^E^S ^A^V^A^I^L^A^B^L^E;  S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R ^E^X^A^M^P^L^E, ^T^H^E ^F^I^L^E
      ^C^A^N^N^O^T ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^I^N^G.  E^N^T^E^R NA ^F^O^R ^N^O ^A^B^O^R^T;
      ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  T^H^E ^D^E^F^A^U^L^T ^I^S ^E^R^R^O^R^S ^I^N CHANGE ^T^E^R^M^I^N^A^T^E (^A^B^O^R^T) ^T^H^E
      ^J^O^B.
.HELP,CE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CE) ^C^L^E^A^R^S ^T^H^E ^R^E^C^O^V^E^R^Y ^E^R^R^O^R ^F^I^E^L^D ^I^N ^T^H^E ^C^A^T^A^L^O^G
      ^E^N^T^R^Y.  I^F ^T^H^E ^J^O^B ^I^S ^O^F ^S^Y^S^T^E^M ^O^R^I^G^I^N, ^I^T ^A^L^S^O ^C^L^E^A^R^S ^T^H^E ^S^U^P^P^L^E^M^E^N^T^A^L
      ^S^T^O^R^A^G^E ^M^E^D^I^U^M ^F^I^L^E ^E^R^R^O^R^S (^S^U^C^H ^A^S ^O^N M^A^S^S S^T^O^R^A^G^E E^X^T^E^N^D^E^D).  E^N^T^E^R CE
      ^T^O ^C^L^E^A^R ^T^H^E ^E^R^R^O^R ^F^I^E^L^D; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      N^O^T^E@D Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H CE ^A^N^D CP (^R^E^P^L^A^C^E ^C^H^A^R^G^E/^P^R^O^J^E^C^T
            ^N^U^M^B^E^R).
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^R^E^Q^U^E^S^T^E^D ^D^I^S^K ^P^A^C^K
      ^T^O ^B^E ^M^O^U^N^T^E^D ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^P^A^C^K ^I^S ^U^N^A^V^A^I^L^A^B^L^E.  E^N^T^E^R
      WB ^F^O^R ^W^A^I^T, NO ^F^O^R ^N^O ^W^A^I^T.  T^H^E ^D^E^F^A^U^L^T ^I^S ^Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^T^H^E
      ^R^E^Q^U^E^S^T^E^D ^P^A^C^K ^I^S ^U^N^A^V^A^I^L^A^B^L^E.

      N^O^T^E@D Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).
.HELP,XD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R XD=^E^X^P^I^R^E^D^A^T^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^F^O^R
      ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D.  T^H^E ^V^A^L^U^E ^E^X^P^I^R^E^D^A^T^E ^M^U^S^T ^B^E ^A ^S^I^X-^D^I^G^I^T ^S^T^R^I^N^G
      ^O^F ^T^H^E ^F^O^R^M ^Y^Y^M^M^D^D; ^W^H^E^R^E ^Y^Y, ^M^M, ^A^N^D ^D^D ^A^R^E ^T^W^O-^D^I^G^I^T ^Y^E^A^R, ^M^O^N^T^H,
      ^A^N^D ^D^A^Y ^D^E^S^I^G^N^A^T^O^R^S, ^R^E^S^P^E^C^T^I^V^E^L^Y.
.HELP,XT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R XT=^E^X^P^I^R^E^T^E^R^M ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^I^F^E ^O^F ^T^H^E ^F^I^L^E
      ^P^A^S^S^W^O^R^D ^I^N ^D^A^Y^S.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 0, ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^E^X^P^I^R^E^S
      ^I^M^M^E^D^I^A^T^E^L^Y.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 4095 ^O^R *, ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^D^O^E^S ^N^O^T
      ^E^X^P^I^R^E.
.HELP,AC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (AC=^A^C) ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^M^A^Y ^O^B^T^A^I^N
      ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^T^H^E ^F^I^L^E ^U^S^I^N^G CATLIST.  E^N^T^E^R Y (^Y^E^S) ^O^R
      N (^N^O).
.HELP,CP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CP) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S
      ^F^O^R ^T^H^E ^F^I^L^E ^A^R^E ^T^O ^B^E ^R^E^P^L^A^C^E^D ^W^I^T^H ^T^H^E ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T
      ^N^U^M^B^E^R^S ^C^U^R^R^E^N^T^L^Y ^I^N ^E^F^F^E^C^T ^F^O^R ^Y^O^U^R ^J^O^B.  E^N^T^E^R CP ^T^O ^H^A^V^E
      ^T^H^E ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S ^R^E^P^L^A^C^E^D; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.
      T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^A^T ^I^F CP ^I^S ^O^M^I^T^T^E^D, ^N^O ^R^E^P^L^A^C^E^M^E^N^T ^I^S ^M^A^D^E.

      N^O^T^E@D  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H CP ^A^N^D CE (^C^L^E^A^R ^F^I^L^E ^E^R^R^O^R ^C^O^D^E).
.ENDHELP
.IF($NEW$.NE.$$.AND.$XD$.EQ.$$.AND.$XT$.NE.$$,L1)
.EX. $CHANGE(NEW=OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#XT=XT,#AC=AC_CP_NA_WB_CE)
.ENDIF(L1)
.IF($NEW$.NE.$$.AND.$XD$.NE.$$,L2)
.EX. $CHANGE(NEW=OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#XD=XD,#AC=AC_CP_NA_WB_CE)
.ENDIF(L2)
.IF($NEW$.NE.$$,L3)
.EX. $CHANGE(NEW=OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#AC=AC_CP_NA_WB_CE)
.ENDIF(L3)
.IF($XD$.EQ.$$.AND.$XT$.NE.$$,L4)
.EX. $CHANGE(OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#XT=XT,#AC=AC_CP_NA_WB_CE)
.ENDIF(L4)
.IF($XD$.NE.$$,L5)
.EX. $CHANGE(OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#XD=XD,#AC=AC_CP_NA_WB_CE)
.ELSE(L5)
.EX. $CHANGE(OLD/#CT=CT,#PW=PW,#M=M,#BR=BR,#PR=PR,#SS=SS,#PN=PN,#R=R,#AC=AC_CP_NA_WB_CE)
.ENDIF(L5)
*WEOR
.PROC,CHARGE*I
,CHARGE[C^H^A^R^G^E  N^U^M^B^E^R]=(*S10(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),$*$,*N=)
,PROJECT[P^R^O^J^E^C^T N^U^M^B^E^R]=(*S10(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CHARGE,^C^H^A^R^G^E,^P^R^O^J^E^C^T.
               CHARGE,*.
               CHARGE.

      T^H^E CHARGE ^C^O^M^M^A^N^D ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^R^E^C^O^R^D ^O^N ^T^H^E ^A^C^C^O^U^N^T
      ^D^A^Y^F^I^L^E ^A^L^L ^I^N^F^O^R^M^A^T^I^O^N ^R^E^G^A^R^D^I^N^G ^R^E^S^O^U^R^C^E^S ^U^S^E^D ^I^N ^T^H^E ^P^R^E^V^I^O^U^S
      ^A^C^C^O^U^N^T ^B^L^O^C^K, ^A^N^D ^D^E^S^I^G^N^A^T^E^S ^A ^N^E^W ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R ^F^O^R
      ^S^U^B^S^E^Q^U^E^N^T ^A^C^T^I^V^I^T^Y.  I^T^S ^P^U^R^P^O^S^E ^I^S ^T^O ^C^O^N^T^R^O^L ^T^H^E ^A^C^C^O^U^N^T^I^N^G
      ^A^C^T^I^V^I^T^Y ^O^F ^T^H^E ^S^Y^S^T^E^M ^F^O^R ^A ^C^U^S^T^O^M^E^R ^O^R ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N.

      CHARGE,* ^U^S^E^S ^Y^O^U^R ^D^E^F^A^U^L^T ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S.  CHARGE.
      (^T^H^I^R^D ^F^O^R^M^A^T) ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^P^R^O^M^P^T ^Y^O^U ^F^O^R ^T^H^E ^C^H^A^R^G^E ^A^N^D
      ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S.
.HELP,CHARGE,NOLIST

      E^N^T^E^R ^T^H^E ^C^H^A^R^G^E ^N^U^M^B^E^R ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U ^B^Y ^Y^O^U^R ^S^I^T^E.  I^F ^Y^O^U
      ^E^N^T^E^R ^A^N ^A^S^T^E^R^I^S^K (CHARGE,*), ^T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^Y^O^U^R ^D^E^F^A^U^L^T ^C^H^A^R^G^E
      ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S.  (F^R^O^M HELPME, ^E^N^T^E^R ^T^H^E ^A^S^T^E^R^I^S^K ^A^F^T^E^R ^T^H^E
      ^P^R^O^M^P^T "C^H^A^R^G^E ^N^U^M^B^E^R" ^A^N^D ^L^E^A^V^E "P^R^O^J^E^C^T ^N^U^M^B^E^R" ^B^L^A^N^K.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^L^E^A^V^E ^T^H^E ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S ^B^L^A^N^K, ^T^H^E
      ^S^Y^S^T^E^M ^P^R^O^M^P^T^S ^Y^O^U ^F^O^R ^T^H^E^S^E ^N^U^M^B^E^R^S.
.HELP,PROJECT,NOLIST

      E^N^T^E^R ^T^H^E ^P^R^O^J^E^C^T ^N^U^M^B^E^R ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U ^B^Y ^Y^O^U^R ^S^I^T^E.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^L^E^A^V^E ^T^H^E ^C^H^A^R^G^E ^A^N^D ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S ^B^L^A^N^K, ^T^H^E
      ^S^Y^S^T^E^M ^P^R^O^M^P^T^S ^Y^O^U ^F^O^R ^T^H^E^S^E ^N^U^M^B^E^R^S.
.ENDHELP
.IF($CHARGE$.EQ.$*$,L1)
.EX. $#CHARGE,*.
.REVERT,NOLIST
.ENDIF(L1)
.IF($CHARGE$.EQ.$$.AND.$PROJECT$.EQ.$$,L2)
.EX. $#CHARGE.
.ELSE(L2)
.EX.  $#CHARGE,CHARGE,PROJECT.
.ENDIF(L2)
*WEOR
.PROC,CHVAL*I
,UC[S^E^R^V^I^C^E ^C^L^A^S^S ^A^S^S^I^G^N^M^E^N^T]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CHVAL,UC=^O^T^S^C.

      T^H^E CHVAL ^C^O^M^M^A^N^D ^R^E^D^E^F^I^N^E^S ^Y^O^U^R ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T^S ^O^R ^P^R^I^V^I^L^E^G^E^S.
      C^U^R^R^E^N^T^L^Y, ^Y^O^U ^A^R^E ^O^N^L^Y ^A^L^L^O^W^E^D ^T^O ^R^E^D^E^F^I^N^E ^Y^O^U^R ^D^E^F^A^U^L^T ^S^E^R^V^I^C^E ^C^L^A^S^S
      ^A^S^S^I^G^N^M^E^N^T^S.
.HELP,UC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UC=^O^T^S^C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^F^A^U^L^T ^S^E^R^V^I^C^E ^C^L^A^S^S ^A^S^S^I^G^N^M^E^N^T
      ^A^C^C^O^R^D^I^N^G ^T^O ^O^R^I^G^I^N ^T^Y^P^E.  I^T^S ^F^O^R^M^A^T ^I^S UC=^O^T^S^C.  ^O^T ^I^S ^T^H^E ^O^R^I^G^I^N ^T^Y^P^E
      ^M^N^E^M^O^N^I^C ^A^N^D ^S^C ^I^S ^T^H^E ^D^E^S^I^R^E^D ^S^E^R^V^I^C^E ^C^L^A^S^S ^M^N^E^M^O^N^I^C.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y
      ^B^O^T^H.  D^O ^N^O^T ^P^L^A^C^E ^A ^S^E^P^A^R^A^T^O^R ^B^E^T^W^E^E^N ^T^H^E ^M^N^E^M^O^N^I^C.  T^H^E ^V^A^L^U^E ^O^T ^M^U^S^T
      ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      ^O^T     D^E^S^C^R^I^P^T^I^O^N
      --     -----------
      IA   I^N^T^E^R^A^C^T^I^V^E ^O^R^I^G^I^N
      BC   L^O^C^A^L ^B^A^T^C^H
      RB   R^E^M^O^T^E ^B^A^T^C^H

      E^N^T^E^R ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^E^R^V^I^C^E ^C^L^A^S^S^E^S ^F^O^R ^S^C@D

      ^S^C     D^E^S^C^R^I^P^T^I^O^N
      --     -----------
      SY   S^Y^S^T^E^M
      BC   L^O^C^A^L ^B^A^T^C^H
      RB   R^E^M^O^T^E ^B^A^T^C^H
      TS   I^N^T^E^R^A^C^T^I^V^E
      DI   D^E^T^A^C^H^E^D ^I^N^T^E^R^A^C^T^I^V^E
      NS   N^E^T^W^O^R^K ^S^U^P^E^R^V^I^S^O^R
      MA   M^A^I^N^T^E^N^A^N^C^E
      CT   C^O^M^M^U^N^I^C^A^T^I^O^N ^T^A^S^K
      I^N   I^N^S^T^A^L^L^A^T^I^O^N ^C^L^A^S^S ^N (^N ^C^A^N ^B^E 0, 1, 2, ^O^R 3)
.ENDHELP
.EX.  $CHVAL(#UC=UC)
*WEOR
.PROC,CKP*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CKP,^L^F^N1,^L^F^N2,...,^L^F^N^N.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E CKP ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E CKP ^C^O^M^M^A^N^D ^T^A^K^E^S ^A ^U^S^E^R ^C^H^E^C^K^P^O^I^N^T ^D^U^M^P ^A^N^D ^W^R^I^T^E^S ^I^T ^T^O ^A
      ^T^A^P^E ^O^R ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^O^N ^A REQUEST, ASSIGN, ^O^R
      LABEL ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E CK ^O^R CB ^P^A^R^A^M^E^T^E^R.  T^H^E ^D^U^M^P ^C^O^N^S^I^S^T^S ^O^F ^A
      ^C^O^P^Y ^O^F ^T^H^E ^J^O^B'^S ^F^I^E^L^D ^L^E^N^G^T^H ^I^N ^C^E^N^T^R^A^L ^M^E^M^O^R^Y, ^T^H^E ^S^Y^S^T^E^M
      ^I^N^F^O^R^M^A^T^I^O^N ^U^S^E^D ^F^O^R ^J^O^B ^C^O^N^T^R^O^L, ^A^N^D ^T^H^E ^N^A^M^E^S ^A^N^D ^C^O^N^T^E^N^T^S ^O^F ^A^L^L
      ^A^S^S^I^G^N^E^D ^F^I^L^E^S ^E^X^P^L^I^C^I^T^L^Y ^O^R ^I^M^P^L^I^C^I^T^L^Y ^I^D^E^N^T^I^F^I^E^D ^B^Y ^T^H^E CKP ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CLASS*I
,SC[S^E^R^V^I^C^E ^C^L^A^S^S]=(SY,BC,RB,TS,DI,NS,MA,CT,I1,I2,I3,*N=)
,OP[A^B^O^R^T O^P^T^I^O^N]=(A,*N=)
,OT[O^R^I^G^I^N ^T^Y^P^E]=(SY,IA,TX,BC,RB,EI,*N=)
,L [F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^R^E^Q^U^E^S^T^E^D ^D^A^T^A]=(*F,*N=OUTPUT)
,JSN[JSN ^O^F ^J^O^B ^I^N ^I^N^P^U^T ^Q^U^E^U^E]=(*F,*N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CLASS,SC=^S^C,OP=A.
               CLASS,OT=^O^T,L=^L^F^N.
               CLASS,SC=^S^C,JSN=^J^S^N.

      T^H^E CLASS ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S ^O^F ^Y^O^U^R ^C^U^R^R^E^N^T
      ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B ^O^R ^O^F ^A ^J^O^B ^T^H^A^T ^Y^O^U ^H^A^V^E ^P^L^A^C^E^D ^I^N ^T^H^E ^I^N^P^U^T
      ^Q^U^E^U^E.  T^H^E CLASS ^C^O^M^M^A^N^D ^A^L^S^O ^S^H^O^W^S ^T^H^E ^R^E^L^A^T^I^V^E ^P^R^I^O^R^I^T^Y ^O^F ^T^H^E
      ^S^E^R^V^I^C^E ^C^L^A^S^S^E^S ^F^O^R ^A ^S^P^E^C^I^F^I^E^D ^O^R^I^G^I^N ^T^Y^P^E.

      N^O^T^E@D Y^O^U ^M^A^Y ^E^X^E^C^U^T^E ^O^N^E ^O^F ^T^H^E ^F^O^R^M^A^T^S ^O^F ^T^H^E CLASS ^C^O^M^M^A^N^D
            ^E^A^C^H ^T^I^M^E ^T^H^R^O^U^G^H HELPME.  B^E ^S^U^R^E ^T^O ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^O^S^E
            ^P^A^R^A^M^E^T^E^R^S ^A^L^L^O^W^E^D ^B^Y ^T^H^E ^F^O^R^M^A^T ^Y^O^U ^H^A^V^E ^C^H^O^S^E^N.
.HELP,SC,NOLIST

      T^H^I^S ^I^S ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S ^F^O^R ^T^H^E ^J^O^B (SC=^S^C).

      E^N^T^E^R    T^O ^S^P^E^C^I^F^Y              E^N^T^E^R    T^O ^S^P^E^C^I^F^Y

      SY       S^Y^S^T^E^M                  NS       N^E^T^W^O^R^K ^S^U^P^E^R^V^I^S^O^R
      BC       L^O^C^A^L ^B^A^T^C^H             MA       M^A^I^N^T^E^N^A^N^C^E
      RB       R^E^M^O^T^E ^B^A^T^C^H            CT       C^O^M^M^U^N^I^C^A^T^I^O^N ^T^A^S^K
      TS       I^N^T^E^R^A^C^T^I^V^E             I^N       I^N^S^T^A^L^L^A^T^I^O^N ^C^L^A^S^S,
      DI       D^E^T^A^C^H^E^D ^I^N^T^E^R^A^C^T^I^V^E             ^W^H^E^R^E ^N ^I^S 1, 2, ^O^R 3
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=A) ^S^E^L^E^C^T^S ^T^H^E ^A^B^O^R^T ^O^P^T^I^O^N.  W^H^E^N A ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E
      ^C^O^M^M^A^N^D ^A^B^O^R^T^S ^I^F ^T^O^O ^M^A^N^Y ^J^O^B^S ^I^N ^T^H^E ^S^Y^S^T^E^M ^A^L^R^E^A^D^Y ^H^A^V^E ^T^H^E ^S^E^R^V^I^C^E
      ^C^L^A^S^S ^Y^O^U ^S^P^E^C^I^F^I^E^D.  O^T^H^E^R^W^I^S^E, ^I^F ^T^H^I^S ^S^I^T^U^A^T^I^O^N ^O^C^C^U^R^S ^A^N^D ^Y^O^U ^H^A^V^E
      ^N^O^T ^S^P^E^C^I^F^I^E^D A, ^T^H^E ^S^Y^S^T^E^M^S ^R^O^L^L^S ^O^U^T ^Y^O^U^R ^J^O^B ^A^N^D ^W^A^I^T^S ^U^N^T^I^L ^I^T ^C^A^N
      ^M^A^K^E ^T^H^E ^D^E^S^I^R^E^D ^A^S^S^I^G^N^M^E^N^T.  E^N^T^E^R A ^T^O ^S^P^E^C^I^F^Y ^A^B^O^R^T, ^O^M^I^T ^I^T ^T^O
      ^S^P^E^C^I^F^Y ^R^O^L^L^O^U^T.

      D^E^F^A^U^L^T@D A ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,OT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (OT=^O^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^R^I^G^I^N ^T^Y^P^E ^F^O^R ^W^H^I^C^H ^T^H^E
      ^S^Y^S^T^E^M ^S^H^O^W^S ^T^H^E ^R^E^L^A^T^I^V^E ^P^R^I^O^R^I^T^Y ^O^F ^T^H^E ^A^V^A^I^L^A^B^L^E ^S^E^R^V^I^C^E ^C^L^A^S^S^E^S.
      N^O^T^E@D I^F ^Y^O^U ^S^P^E^C^I^F^Y OT=^O^T ^A^L^O^N^G ^W^I^T^H ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S ^P^A^R^A^M^E^T^E^R
      (SC=^S^C), OT=^O^T ^I^S ^I^G^N^O^R^E^D.

      E^N^T^E^R    ^F^O^R ^O^R^I^G^I^N ^T^Y^P^E

      SY       S^Y^S^T^E^M ^O^R^I^G^I^N
      IA       I^N^T^E^R^A^C^T^I^V^E ^O^R^I^G^I^N
      BC       L^O^C^A^L ^B^A^T^C^H ^O^R^I^G^I^N
      RB       R^E^M^O^T^E ^B^A^T^C^H ^O^R^I^G^I^N

      D^E^F^A^U^L^T@D T^H^E ^O^R^I^G^I^N ^T^Y^P^E ^O^F ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^D^I^S^P^L^A^Y
      ^G^E^N^E^R^A^T^E^D ^B^Y CLASS.  I^F ^Y^O^U ^S^P^E^C^I^F^Y L=^L^F^N ^A^L^O^N^G ^W^I^T^H ^T^H^E ^S^E^R^V^I^C^E
      ^C^L^A^S^S ^P^A^R^A^M^E^T^E^R(SC=^S^C), L=^L^F^N ^I^S ^I^G^N^O^R^E^D.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.HELP,JSN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E JSN ^O^F ^A ^J^O^B (^T^H^A^T ^Y^O^U ^C^U^R^R^E^N^T^L^Y
      ^H^A^V^E ^W^A^I^T^I^N^G ^I^N ^T^H^E ^I^N^P^U^T ^Q^U^E^U^E) ^I^N ^O^R^D^E^R ^T^O ^C^H^A^N^G^E ^I^T^S
      ^S^E^R^V^I^C^E ^C^L^A^S^S.  I^T ^C^A^N^N^O^T ^B^E ^U^S^E^D ^T^O ^C^H^A^N^G^E ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S
      ^O^F ^A^N ^O^N^L^I^N^E ^J^O^B.
.ENDHELP
.IF($SC$.NE.$$.AND.$OP$.NE.$$,L1)
.EX.  $CLASS(#SC=SC,#OP=OP)
$REVERT,NOLIST
.ENDIF(L1)
.IF($OT$.NE.$$.AND.$L$.NE.$$,L2)
.EX. $CLASS(#OT=OT,#L=L)
$REVERT,NOLIST
.ENDIF(L2)
.IF($SC$.NE.$$.AND.$JSN$.NE.$$,L3)
.EX. $CLASS(#SC=SC,#JSN=JSN)
$REVERT,NOLIST
.ENDIF(L3)
*WEOR
.PROC,CLEAR*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CLEAR
                ^O^R
               CLEAR,*,^L^F^N1,^L^F^N2,...,^L^F^N^N.

      T^H^E CLEAR ^C^O^M^M^A^N^D ^R^E^L^E^A^S^E^S (^D^R^O^P^S) ^A^L^L ^F^I^L^E^S ^C^U^R^R^E^N^T^L^Y ^A^S^S^I^G^N^E^D
      (^L^O^C^A^L) ^T^O ^Y^O^U^R ^J^O^B.

       N^O^T^E@D  P^R^E^S^S^I^N^G NEXT ^F^R^O^M ^W^I^T^H^I^N ^T^H^I^S ^D^I^S^P^L^A^Y ^O^F HELPME ^C^A^U^S^E^S ^E^X^E^C^U^T^I^O^N
       ^O^F ^T^H^E CLEAR ^C^O^M^M^A^N^D, ^W^H^I^C^H ^D^R^O^P^S ^A^L^L ^Y^O^U^R ^L^O^C^A^L ^F^I^L^E^S ^E^X^C^E^P^T ^T^H^O^S^E ^W^I^T^H
       ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S.

      T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^R^E^L^E^A^S^E^S ^A^L^L ^F^I^L^E^S; ^T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^R^E^L^E^A^S^E^S ^A^L^L
      ^F^I^L^E^S ^E^X^C^E^P^T ^T^H^O^S^E ^N^A^M^E^D.  (T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^C^A^N^N^O^T ^B^E ^E^X^E^C^U^T^E^D
      ^F^R^O^M ^W^I^T^H^I^N HELPME.)
.ENDHELP.
.EX.  $CLEAR.
*WEOR
.PROC,COBOL5*I
,ANSI[N^O^N-ANSI L^A^N^G^U^A^G^E E^X^T^E^N^S^I^O^N^S (ANSI)]=(*A7,*N=)
,APO[N^O^N^N^U^M^E^R^I^C L^I^T^E^R^A^L D^E^L^I^M^I^T^E^R (APO)]=(*A2,*N=64)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=BIN)
,BL[S^E^P^A^R^A^T^E O^U^T^P^U^T L^I^S^T^I^N^G (BL)]=(*A1,*N=)
,CC1[C^O^M^P^U^T^A^T^I^O^N^A^L D^A^T^A I^T^E^M^S (CC1)]=(*A1,*N=)
,DLFN[S^U^B^S^C^H^E^M^A F^O^R CYBER D^A^T^A^B^A^S^E C^O^N^T^R^O^L (D)]=(*A1,*N=0)
,DB[D^E^B^U^G^G^I^N^G O^P^T^I^O^N^S (DB)]=(*A2,*N=0)
,ELFN[E^R^R^O^R I^N^F^O^R^M^A^T^I^O^N (E)]=(*A7,*N=ERR)
,EL[E^R^R^O^R L^E^V^E^L C^O^N^T^R^O^L (EL)]=(*A1,*N=F)
,ET[C^O^M^P^I^L^E^R A^B^O^R^T O^P^T^I^O^N^S (ET)]=(*A1,*N=)
,FDL[F^A^S^T D^Y^N^A^M^I^C L^O^A^D^E^R P^R^O^C^E^S^S^I^N^G (FDL)]=(*A7,*N=FDLFILE)
,FIPS[L^A^N^G^U^A^G^E F^E^A^T^U^R^E^S (FIPS)]=(*A1,*N=4)
,ILFN[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*A7,*N=COMPILE)
,LLFN[L^I^S^T^A^B^L^E C^O^M^P^I^L^E^R O^U^T^P^U^T F^I^L^E (L)]=(*A7,*N=LIST)
,LBZ[L^E^A^D^I^N^G B^L^A^N^K^S (LBZ)]=(*A1,*N=)
,LO[L^I^S^T^I^N^G O^P^T^I^O^N^S (LO)]=(*A5,*N=$M/R/S$)
,MSB[P^R^O^G^R^A^M C^O^M^P^I^L^I^N^G (MSB)]=(*A1,*N=)
,PD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A1,*N=8)
,PS[O^U^T^P^U^T P^A^G^E S^I^Z^E (PS)]=(*A1,*N=)
,PSQ[S^E^Q^U^E^N^C^E N^U^M^B^E^R^S F^O^R D^I^A^G^N^O^S^T^I^C^S (PSQ)]=(*A1,*N=)
,PW[M^A^X^I^M^U^M C^H^A^R^A^C^T^E^R^S P^E^R L^I^N^E O^F O^U^T^P^U^T (PW)]=(*A3,*N=72)
,SB[P^R^O^G^R^A^M C^O^M^P^I^L^E^D A^S S^U^B^P^R^O^G^R^A^M (SB)]=(*A1,*N=)
,SY[S^O^U^R^C^E P^R^O^G^R^A^M S^Y^N^T^A^X C^H^E^C^K (SY)]=(*A1,*N=)
,TDF[T^E^R^M^I^N^A^T^I^O^N D^U^M^P (TDF)]=(*A7,*N=TDFILE)
,ULFN[COMPASS I^M^A^G^E^S F^I^L^E (U)]=(*A7,*N=COMPS)
,UC1[C^O^M^P^U^T^A^T^I^O^N^A^L-1 C^O^N^V^E^R^S^I^O^N (UC1)]=(*A1,*N=)
,XLFN[U^P^D^A^T^E P^R^O^G^R^A^M L^I^B^R^A^R^Y (X)]=(*A7,*N=NEWPL)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COBOL5,ANSI=^S,APO,B=^L^F^N,BL,CC1,D=^L^F^N,DB=^D^B,E=^L^F^N,EL=^E^L,ET=^O^P^T,
                  FDL=^L^F^N,FIPS=^N,I=^L^F^N,L=^L^F^N,LBZ,LO=^L^O,MSB,PD=^P^D,PS=^N,PSQ,PW=^N,
                  SB,SORT5,SY,TDF=^L^F^N,U=^L^F^N,UC1,X=^L^F^N.

     T^H^E ^C^O^M^M^A^N^D COBOL5 ^C^A^L^L^S ^T^H^E COBOL5 ^A^S^S^E^M^B^L^E^R.
.HELP,ANSI,NOLIST

      F^O^R^M^A^T@D  ANSI=^S

      T^H^E ^P^A^R^A^M^E^T^E^R ANSI ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O^N-ANSI ^L^A^N^G^U^A^G^E ^E^X^T^E^N^S^I^O^N^S ^T^O ^B^E
      ^T^R^E^A^T^E^D ^A^S ^E^R^R^O^R^S ^W^I^T^H ^S^E^V^E^R^I^T^Y ^S^P^E^C^I^F^I^C^A^T^I^O^N ^O^F ^S.  T^H^E ^D^E^F^A^U^L^T ^A^L^L^O^W^S
      ^N^O^N-ANSI ^E^X^T^E^N^S^I^O^N^S.

         ^S                         M^E^A^N^I^N^G
         -                         -------
         F       F^A^T^A^L ^E^R^R^O^R.

         T       T^R^I^V^I^A^L ^E^R^R^O^R.

         ANSI    S^A^M^E ^A^S ANSI=T.

         NOEDIT  R^E^Q^U^E^S^T^S ^S^T^R^I^C^T ANSI ^I^N^T^E^R^P^R^E^T^A^T^I^O^N; ^N^O^T ^E^D^I^T^E^D ^B^Y ^T^H^E DISPLAY
                 ^C^O^M^M^A^N^D.

         77LEFT  C^A^U^S^E^S ^L^E^V^E^L 77 ^I^T^E^M^S ^T^O ^B^E ^S^T^O^R^E^D ^A^S SYNC LEFT.  I^F ^N^O^T
                 ^S^P^E^C^I^F^I^E^D, ^I^T^E^M^S ^A^R^E ^S^T^O^R^E^D SYNC RIGHT.

         AUDIT   S^E^L^E^C^T^S ANSI=NOEDIT ^A^N^D ANSI=77LEFT ^P^A^R^A^M^E^T^E^R^S.
.HELP,APO,NOLIST

      F^O^R^M^A^T@D  APO

      T^H^E ^P^A^R^A^M^E^T^E^R APO ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O^N^N^U^M^E^R^I^C ^L^I^T^E^R^A^L ^D^E^L^I^M^I^T^E^R ^F^O^R ^T^H^E
      ASCII ^A^P^O^S^T^R^O^P^H^E ^C^H^A^R^A^C^T^E^R (^D^I^S^P^L^A^Y ^C^O^D^E ^V^A^L^U^E 70).  T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S
      ^T^H^E ^N^O^N^U^M^E^R^I^C ^L^I^T^E^R^A^L ^D^E^L^I^M^I^T^E^R ^T^O ^B^E ^T^H^E ^Q^U^O^T^A^T^I^O^N ^M^A^R^K (^D^I^S^P^L^A^Y ^C^O^D^E
      ^V^A^L^U^E ^O^F 64).
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^M^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O
      ^B^I^N^A^R^Y ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=BIN.  I^F
      B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,BL,NOLIST

      F^O^R^M^A^T@D  BL

      T^H^E ^P^A^R^A^M^E^T^E^R BL ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^G^E^N^E^R^A^T^E ^S^E^P^A^R^A^T^E ^O^U^T^P^U^T ^L^I^S^T^I^N^G^S
      I^F BL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^G^E^N^E^R^A^T^E ^L^I^S^T^I^N^G^S ^I^N ^C^O^M^P^A^C^T ^F^O^R^M.
.HELP,CC1,NOLIST

      F^O^R^M^A^T@D  CC1

      T^H^E ^P^A^R^A^M^E^T^E^R CC1 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^U^T^A^T^I^O^N^A^L ^D^A^T^A ^I^T^E^M^S ^B^E ^S^T^O^R^E^D
      ^A^N^D ^P^R^O^C^E^S^S^E^D ^A^S ^C^O^M^P^U^T^A^T^I^O^N^A^L-1 ^I^T^E^M^S.  T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S
      ^C^O^M^P^U^T^A^T^I^O^N^A^L ^D^A^T^A ^I^T^E^M^S ^B^E ^S^T^O^R^E^D ^A^N^D ^P^R^O^C^E^S^S^E^D ^A^S ^C^O^M^P^U^T^A^T^I^O^N^A^L ^I^T^E^

.HELP,DLFN,NOLIST

      F^O^R^M^A^T@D  D=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R D ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^U^B^S^C^H^E^M^A ^F^O^R ^T^H^E CYBER ^D^A^T^A^B^A^S^E ^C^O^N^T^R^O^L
      ^S^Y^S^T^E^M (CDCS) ^A^S ^T^H^E ^I^N^T^E^R^F^A^C^E ^O^N ^F^I^L^E ^L^F^N.  I^F D ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S D=0.

         ^L^F^N                        M^E^A^N^I^N^G
         ---                        -------
         D       S^U^B^S^C^H^E^M^A ^F^O^R CDCS ^I^N^T^E^R^F^A^C^E ^O^N ^T^H^E ^F^I^L^E ^W^H^O^S^E ^N^A^M^E ^I^S ^T^H^A^T ^O^F
                 ^T^H^E ^S^U^B^S^C^H^E^M^A.

         0       S^U^B^S^C^H^E^M^A ^F^O^R CDCS ^I^N^T^E^R^F^A^C^E ^I^S ^N^O^T ^U^S^E^D.
.HELP,DB,NOLIST

      F^O^R^M^A^T@D  DB=^D^B

      T^H^E ^P^A^R^A^M^E^T^E^R DB ^S^P^E^C^I^F^I^E^S ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E
      DB ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, DB=DL/SB).  I^F DB ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DB=0.

         ^D^B                         M^E^A^N^I^N^G
         --                         -------
         B       B^I^N^A^R^Y ^O^U^T^P^U^T ^I^S ^G^E^N^E^R^A^T^E^D ^R^E^G^A^R^D^L^E^S^S ^O^F ^T^H^E ^E^R^R^O^R^S ^I^N ^T^H^E
                 ^S^O^U^R^C^E.

         DL      D^E^B^U^G^G^I^N^G ^L^I^N^E^S (D ^I^N ^C^O^L^U^M^N 7) ^I^N ^T^H^E ^S^O^U^R^C^E ^A^R^E ^C^O^M^P^I^L^E^D ^A^S
                 ^T^H^E ^E^X^E^C^U^T^A^B^L^E ^C^O^D^E.

         ID      D^E^B^U^G ^T^A^B^L^E^S ^A^R^E ^P^R^O^D^U^C^E^D ^W^I^T^H ^T^H^E CID ^F^E^A^T^U^R^E^S.

         RF      C^O^D^E ^I^S ^C^O^M^P^I^L^E^D ^S^O ^T^H^A^T ^R^E^F^E^R^E^N^C^E ^M^O^D^I^F^I^C^A^T^I^O^N ^V^A^L^U^E^S ^A^R^E
                 ^C^H^E^C^K^E^D ^T^O ^E^N^S^U^R^E ^T^H^A^T ^T^H^E ^V^A^L^U^E^S ^A^R^E ^W^I^T^H^I^N ^T^H^E ^B^O^U^N^D^A^R^I^E^S ^O^F
                 ^T^H^E ^I^T^E^M ^B^E^I^N^G ^R^E^F^E^R^E^N^C^E ^M^O^D^I^F^I^E^D.

         SB      S^U^B^S^C^R^I^P^T ^A^N^D ^I^N^D^E^X ^R^E^F^E^R^E^N^C^E^S ^A^R^E ^C^H^E^C^K^E^D ^D^U^R^I^N^G ^E^X^E^C^U^T^I^O^N ^T^O
                 ^E^N^S^U^R^E ^T^H^A^T ^A^L^L ^O^F ^T^H^E ^R^E^F^E^R^E^N^C^E^S ^T^O ^T^H^E ^T^A^B^L^E^S ^A^R^E ^W^I^T^H^I^N ^T^H^E
                 ^T^A^B^L^E ^B^O^U^N^D^A^R^I^E^S.

         TR      P^A^R^A^G^R^A^P^H ^T^R^A^C^E ^D^U^R^I^N^G ^E^X^E^C^U^T^I^O^N.

         DB      S^A^M^E ^A^S DB=B/DL/SB.

         0       N^O ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^S^E^L^E^C^T^E^D.
.HELP,ELFN,NOLIST

      F^O^R^M^A^T@D  E=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^I^N^F^O^R^M^A^T^I^O^N ^A^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E EL
      ^P^A^R^A^M^E^T^E^R ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=ERR.  I^F
      E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=OUTPUT.
.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^E^L

      T^H^E ^P^A^R^A^M^E^T^E^R EL ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^E^V^E^L ^C^O^N^T^R^O^L.  I^F ^E^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S EL=F.  I^F EL ^I^S ^O^M^I^T^T^E^D, ^E^R^R^O^R ^L^E^V^E^L^S W, F, ^A^N^D C ^A^R^E ^L^I^S^T^E^D.

         ^E^L                        M^E^A^N^I^N^G
         --                        -------
         C       L^I^S^T ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         F       L^I^S^T ^F^A^T^A^L ^E^R^R^O^R^S ^A^N^D ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         W       L^I^S^T ^W^A^R^N^I^N^G ^E^R^R^O^R^S, ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S, ^A^N^D ^F^A^T^A^L ^E^R^R^O^R^S.

         T       L^I^S^T ^T^R^I^V^A^L ^E^R^R^O^R^S, ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S, ^F^A^T^A^L ^E^R^R^O^R^S, ^A^N^D
                 ^W^A^R^N^I^N^G ^E^R^R^O^R^S.
.HELP,ET,NOLIST

      F^O^R^M^A^T@D  ET=^O^P^T

      T^H^E ^P^A^R^A^M^E^T^E^R ET ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^A^B^O^R^T ^I^F ^A^N^Y ^E^X^E^C^U^T^A^B^L^E ^C^O^D

      ^C^O^N^T^A^I^N^S ^E^R^R^O^R^S ^O^F ^A^T ^L^E^A^S^T C, F, T, ^O^R W ^S^E^V^E^R^I^T^Y ^A^S ^I^N^D^I^C^A^T^E^D ^B^Y E
      ^P^A^R^A^M^E^T^E^R.  L^E^V^E^L^S ^A^R^E ^I^N^D^I^C^A^T^E^D ^B^Y ^T^H^E EL ^P^A^R^A^M^E^T^E^R.  T^H^E ^J^O^B ^R^E^S^U^M^E^S
      ^A^F^T^E^R ^T^H^E EXIT ^C^O^M^M^A^N^D.  I^F ET ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^E^X^E^C^U^T^E^S ^T^H^E ^N^E^X^T
      ^C^O^M^M^A^N^D ^I^N ^T^H^E ^J^O^B ^A^N^D ^I^S ^T^H^E^N ^T^E^R^M^I^N^A^T^E^D, ^D^E^S^P^I^T^E ^A^N^Y ^E^R^R^O^R^S ^D^E^T^E^C^T^E^D
      ^D^U^R^I^N^G ^C^O^M^P^I^L^A^T^I^O^N.
.HELP,FDL,NOLIST

      F^O^R^M^A^T@D  FDL=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R FDL ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^A^S^T ^D^Y^N^A^M^I^C ^L^O^A^D^E^R ^P^R^O^C^E^S^S^O^R ^B^E
      ^A^V^A^I^L^A^B^L^E; ^T^H^E FDL ^F^I^L^E ^I^S ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      FDL=FDLFILE.  I^F FDL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^A^S^T
      ^D^Y^N^A^M^I^C ^L^O^A^D^E^R ^P^R^O^C^E^S^S^O^R ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E.
.HELP,FIPS,NOLIST

      F^O^R^M^A^T@D  FIPS=^N

      T^H^E ^P^A^R^A^M^E^T^E^R FIPS ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^N^G^U^A^G^E ^F^E^A^T^U^R^E^S ^A^B^O^V^E F^E^D^E^R^A^L
      I^N^F^O^R^M^A^T^I^V^E P^R^O^C^E^S^S^I^N^G S^T^A^N^D^A^R^D (FIPS) ^B^E ^L^E^V^E^L ^N ^D^I^A^G^N^O^S^E^D (1<=^N<=4).
      I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S FIPS=4.  I^F FIPS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N^O ^D^I^A^G^N^O^S^T^I^C^S ^F^O^R FIPS ^L^E^V^E^L^S ^B^E ^I^S^S^U^E^D.
.HELP,ILFN,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,LLFN,NOLIST

      F^O^R^M^A^T@D   L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^A^B^L^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F
      L=0, ^N^O ^L^I^S^T^A^B^L^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S L=LIST.  I^F L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT.
.HELP,LBZ,NOLIST

      F^O^R^M^A^T@D  LBZ

      T^H^E ^P^A^R^A^M^E^T^E^R LBZ ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^H^E ^L^E^A^D^I^N^G ^B^L^A^N^K^S ^I^N ^T^H^E
      ^N^U^M^E^R^I^C ^F^I^E^L^D^S ^W^I^L^L ^B^E ^T^R^E^A^T^E^D ^A^S ^Z^E^R^O^S ^I^N ^A^R^I^T^H^M^E^T^I^C ^S^T^A^T^E^M^E^N^T^S ^A^N^D
      ^C^O^M^P^A^R^I^S^O^N^S.  I^F LBZ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^U^M^E^R^I^C ^F^I^E^L^D^S ^C^O^N^T^A^I^N^I^N^G
      ^B^L^A^N^K^S ^A^R^E ^I^N ^E^R^R^O^R.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^L^O

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R
      ^T^H^E LO ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, LO=O/S).  I^F ^L^O
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=M/R/S.  I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      LO=S.

         ^L^O                        M^E^A^N^I^N^G
         --                        -------
         M       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^M^A^P ^T^H^A^T ^C^O^R^R^E^L^A^T^E^S ^P^R^O^G^R^A^M ^E^N^T^I^T^I^E^S ^A^N^D
                 ^A^T^T^R^I^B^U^T^E^S, ^S^U^C^H ^A^S ^D^A^T^A ^C^L^A^S^S ^A^N^D ^P^H^Y^S^I^C^A^L ^S^T^O^R^A^G^E, ^I^S ^T^O ^B^E
                 ^P^R^O^D^U^C^E^D.

         O       S^P^E^C^I^F^I^E^S ^T^H^A^T ^O^B^J^E^C^T ^C^O^D^E ^W^I^T^H COMPASS ^M^N^E^M^O^N^I^C^S ^I^S ^P^R^O^D^U^C^E^D.

         R       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^O^F ^P^R^O^G^R^A^M ^E^N^T^I^T^I^E^S ^A^N^D
                 ^L^O^C^A^T^I^O^N^S ^O^F ^D^E^F^I^N^I^T^I^O^N^S ^A^N^D ^U^S^E ^W^I^T^H^I^N ^T^H^E ^P^R^O^G^R^A^M ^I^S ^T^O ^B^E
                 ^P^R^O^D^U^C^E^D.

         S       S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^I^S ^L^I^S^T^E^D.

         -S      S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^I^S ^N^O^T ^L^I^S^T^E^D.

         0       N^O ^L^I^S^T ^O^P^T^I^O^N^S ^A^R^E ^S^E^L^E^C^T^E^D.
.HELP,MSB,NOLIST

      F^O^R^M^A^T@D  MSB

      T^H^E ^P^A^R^A^M^E^T^E^R MSB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^P^R^O^G^R^A^M ^B^E ^C^O^M^P^I^L^E^D ^A^S ^A ^S^U^B^R^O^U^T^I^N^E
      ^T^H^A^T ^I^N^C^L^U^D^E^S COBOL ^I^N^I^T^I^A^T^I^O^N.  I^F MSB ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^C^O^M^P^I^L^E^S
      ^T^H^E ^N^O^R^M^A^L ^P^R^O^G^R^A^M.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^P^D

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^T^H^E E ^A^N^D L
      ^P^A^R^A^M^E^T^E^R ^L^I^S^T^I^N^G^S.  I^F ^P^D ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PD=8.  I^F PD ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^P^R^I^N^T ^D^E^N^S^I^T^Y ^I^S ^A^N ^I^N^S^T^A^L^L^A^T^I^O^N ^O^P^T^I^O^N.

         ^P^D                   M^E^A^N^I^N^G
         --                   -------
         3       D^O^U^B^L^E ^S^P^A^C^E ^A^T ^S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         4       D^O^U^B^L^E ^S^P^A^C^E ^A^T ^E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         6       S^I^N^G^L^E ^S^P^A^C^E ^A^T ^S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         8       S^I^N^G^L^E ^S^P^A^C^E ^A^T ^E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,PS,NOLIST
      F^O^R^M^A^T@D  PS=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PS ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^P^A^G^E ^S^I^Z^E ^B^E ^N ^P^R^I^N^T^A^B^L^E ^L^I^N^E^S
      ^P^E^R ^P^A^G^E.  I^F PS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^A^N ^I^N^S^T^A^L^L^A^T^I^O^N ^O^P^T^I^O^N.
.HELP,PSQ,NOLIST

      F^O^R^M^A^T@D  PSQ

      T^H^E ^P^A^R^A^M^E^T^E^R PSQ ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^I^N ^C^O^L^U^M^N^S 1
      ^T^H^R^O^U^G^H 6 ^B^E ^U^S^E^D ^F^O^R ^A^L^L ^D^I^A^G^N^O^S^T^I^C^S.  I^F PSQ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^C^O^M^P^I^L^E^R-^G^E^N^E^R^A^T^E^D ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^B^E ^U^S^E^D ^F^O^R
      ^D^I^A^G^N^O^S^T^I^C^S; ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^I^N ^C^O^L^U^M^N^S 1 ^T^H^R^O^U^G^H 6 ^A^R^E ^N^O^T ^P^R^O^C^E^S^S^E^D.
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PW ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^N ^C^H^A^R^A^C^T^E^R^S ^I^N ^A ^L^I^N^E
      ^T^O ^B^E ^P^R^I^N^T^E^D.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^A^N ^I^N^S^T^A^L^L^A^T^I^O^N ^O^P^T^I^O^N.
.HELP,SB,NOLIST

      F^O^R^M^A^T@D  SB

      T^H^E ^P^A^R^A^M^E^T^E^R SB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^P^R^O^G^R^A^M ^B^E ^C^O^M^P^I^L^E^D ^A^S ^A ^S^U^B^P^R^O^G^R^A^M.
      I^F SB ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^P^R^O^G^R^A^M ^B^E ^C^O^M^P^I^L^E^D ^A^S
      ^A ^M^A^I^N ^P^R^O^G^R^A^M.
.HELP,SY,NOLIST

      F^O^R^M^A^T@D  SY

      T^H^E ^P^A^R^A^M^E^T^E^R SY ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^B^E ^C^H^E^C^K^E^D ^F^O^R ^S^Y^N^T^A^X
      ^A^N^D ^A^N^Y ^E^X^E^C^U^T^A^B^L^E ^C^O^D^E ^N^O^T ^G^E^N^E^R^A^T^E^D.  I^F SY ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^B^E ^C^O^M^P^I^L^E^D ^A^N^D ^E^X^E^C^U^T^A^B^L^E ^C^O^D^E ^B^E ^G^E^N^E^R^A^T^E^D
.HELP,TDF,NOLIST

      F^O^R^M^A^T@D  TDF=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R TDF ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^T^E^R^M^I^N^A^T^I^O^N ^D^U^M^P ^I^S ^T^O ^B^E ^T^A^K^E^N;
      ^T^A^B^L^E^S ^N^E^E^D^E^D ^F^O^R ^T^H^E ^D^U^M^P ^A^R^E ^W^R^I^T^T^E^N ^O^N ^A ^S^Y^S^T^E^M ^F^I^L^E.  I^F ^L^F^N ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S TDF=TDFILE.  I^F TDF ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^T^E^R^M^I^N^A^T^I^O^N ^D^U^M^P ^N^O^T ^B^E ^T^A^K^E^N ^F^R^O^M ^T^H^I^S ^C^O^M^P^I^L^A^T^I^O^N
.HELP,ULFN,NOLIST

      F^O^R^M^A^T@D  U=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R U ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E COMPASS ^L^I^N^E ^I^M^A^G^E^S ^O^F ^T^H^E ^G^E^N^E^R^A^T^E^D
      ^P^R^O^G^R^A^M ^B^E ^W^R^I^T^T^E^N ^O^N ^F^I^L^E ^L^F^N, ^I^N ^A ^F^O^R^M^A^T ^A^C^C^E^P^T^A^B^L^E ^F^O^R ^T^H^E U^P^D^A^T^E
      ^U^T^I^L^I^T^Y.  I^F U=0, ^T^H^E COMPASS ^A^S^S^E^M^B^L^Y ^L^A^N^G^U^A^G^E ^P^R^O^D^U^C^E^S ^N^O ^I^M^A^G^E^S.  I^F
      ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S U=COMPS.  I^F U ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S U=0.
.HELP,UC1,NOLIST

      F^O^R^M^A^T@D  UC1

      T^H^E ^P^A^R^A^M^E^T^E^R UC1 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A^L^L ^C^O^M^P^U^T^A^T^I^O^N^A^L-1 ^I^T^E^M^S ^B^E ^C^O^N^V^E^R^T^E^D
      ^T^O ^I^N^T^E^G^E^R ^F^O^R^M^A^T ^B^E^F^O^R^E ^P^R^O^C^E^S^S^I^N^G.  I^F UC1 ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A^L^L ^C^O^M^P^U^T^A^T^I^O^N^A^L-1 ^I^T^E^M^S ^B^E ^P^R^O^C^E^S^S^E^D ^I^N ^C^O^M^P^U^T^A^T^I^O^N^A^L

      ^F^O^R^M^A^T.
.HELP,XLFN,NOLIST

      F^O^R^M^A^T@D  X=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^U^P^D^A^T^E ^R^A^N^D^O^M ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y
      ^C^O^N^T^A^I^N^I^N^G ^T^E^X^T ^F^O^R COPY ^S^T^A^T^E^M^E^N^T^S ^B^E ^W^R^I^T^T^E^N ^O^N ^F^I^L^E ^L^F^N.  I^F X=0,
      X=OLDPL.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S X=NEWPL.  I^F X ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OLDPL.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,COMMENT*I
,JSN[J^O^B S^E^Q^U^E^N^C^E N^A^M^E]=(*A1,*N)
,COM[C^O^M^M^E^N^T]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COMMENT,^J^S^N.^C^O^M^M^E^N^T
               COMMENT.^C^O^M^M^E^N^T
               *^C^O^M^M^E^N^T

      T^H^E COMMENT ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^P^L^A^C^E ^A ^C^O^M^M^E^N^T ^I^N ^T^H^E ^S^Y^S^T^E^M
      ^D^A^Y^F^I^L^E ^A^N^D ^I^N ^T^H^E ^D^A^Y^F^I^L^E ^O^F ^A^N^Y ^O^F ^Y^O^U^R ^J^O^B^S.
.HELP,JSN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^J^O^B ^I^N
      ^W^H^O^S^E ^D^A^Y^F^I^L^E ^Y^O^U ^W^A^N^T ^T^H^E ^C^O^M^M^E^N^T ^W^R^I^T^T^E^N.  T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T
      ^J^O^B.
.HELP,COM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^O^M^M^E^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^E^S^S^A^G^E ^Y^O^U ^W^A^N^T ^W^R^I^T^T^E^N ^I^N ^T^H^E
      ^D^E^S^I^G^N^A^T^E^D ^D^A^Y^F^I^L^E^S.  I^F ^Y^O^U ^U^S^E ^T^H^E *^C^O^M^M^E^N^T ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D,
      ^T^H^E ^A^S^T^E^R^I^S^K ^M^U^S^T ^B^E ^T^H^E ^F^I^R^S^T ^N^O^N^B^L^A^N^K ^C^H^A^R^A^C^T^E^R ^O^F ^T^H^E ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,COMMON*I
,FILE[F^I^L^E ^T^O ^A^C^C^E^S^S]=(SYSTEM)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COMMON,SYSTEM.

      T^H^E COMMON ^C^O^M^M^A^N^D ^S^E^A^R^C^H^E^S ^F^O^R ^A SYSTEM ^L^I^B^R^A^R^Y ^T^Y^P^E
      ^F^I^L^E (LIFT) ^A^N^D ^A^S^S^I^G^N^S ^I^T ^T^O ^Y^O^U^R ^J^O^B.  Y^O^U ^M^U^S^T
      ^B^E ^A^U^T^H^O^R^I^Z^E^D ^T^O ^A^C^C^E^S^S ^L^I^B^R^A^R^Y ^F^I^L^E^S.
.HELP,FILE,NOLIST

      T^H^E COMMON ^C^O^M^M^A^N^D ^A^C^C^E^S^S^E^S ^T^H^E ^S^Y^S^T^E^M ^F^I^L^E SYSTEM (^E^N^T^E^R SYSTEM).
      I^F ^A ^F^I^L^E ^W^I^T^H ^T^H^E ^N^A^M^E SYSTEM ^I^S ^A^L^R^E^A^D^Y ^L^O^C^A^L, ^N^O ^A^C^T^I^O^N ^I^S ^T^A^K^E^N.
      O^T^H^E^R^W^I^S^E, ^T^H^E ^S^Y^S^T^E^M ^S^E^A^R^C^H^E^S ^F^O^R ^A ^L^I^B^R^A^R^Y ^F^I^L^E SYSTEM, ^A^N^D ^I^F
      ^F^O^U^N^D, SYSTEM ^I^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^A^S ^A ^L^I^B^R^A^R^Y ^F^I^L^E.
.ENDHELP
.EX.  $COMMON(FILE)
*WEOR
.PROC,COMPASS*I
,ABOR[A^B^O^R^T J^O^B (A)]=(*A1,*N=)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=LGO)
,BL[S^E^P^A^R^A^T^E O^U^T^P^U^T L^I^S^T^I^N^G^S (BL)]=(*A1,*N=0)
,ASSM[A^S^S^E^M^B^L^Y E^R^R^O^R^S (D)]=(*A1,*N)
,ERR[E^R^R^O^R O^U^T^P^U^T F^I^L^E (E)]=(*F,*N=ERRS)
,FNAM[S^E^T COMPASS*F (F)]=(*A7,*N=COMPASS)
,GLFN[L^O^A^D S^Y^S^T^E^M O^V^E^R^L^A^Y (G)]=(*F,*N=SYSTEXT)
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,LIST[L^I^S^T^A^B^L^E A^S^S^E^M^B^L^E^R O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=OUTPUT)
,LO[L^I^S^T^I^N^G O^P^T^I^O^N^S (LO)]=(*A4,*N=0)
,ML[MODLEVEL M^I^C^R^O (ML)]=(*A1,*N)
,SUPP[S^U^P^P^R^E^S^S P^A^G^E E^J^E^C^T^S (N)]=(*A1,*N)
,OLFN[S^H^O^R^T L^I^S^T O^U^T^P^U^T F^I^L^E (O)]=(*F,*N=OUTPUT)
,PG[P^A^G^E N^U^M^B^E^R^I^N^G (P)]=(*A1,*N)
,PC[S^T^R^I^N^G P^A^D^D^I^N^G (PC)]=(*A2,*N=30)
,PD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A1,*N=8)
,PS[P^A^G^E S^I^Z^E (PS)]=(*A1,*N)
,SYS[S^Y^S^T^E^M T^E^X^T O^V^E^R^L^A^Y (S)]=(*F,*N=SYSTEXT)
,EXT[E^X^T^E^R^N^A^L T^E^S^T F^O^R XTEXT P^S^E^D^U^O-I^N^S^T^R^U^C^T^I^O^N F^I^L^E (X)]=(*F,*N=OPL)
.
.PROMPT, N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

     F^O^R^M^A^T@D  COMPASS,A,B=^L^F^N,BL,D,E=^L^F^N,F=^0^N^A^M^E ^O^R ^N^U^M^B^E^R^2,G=^L^F^N/^O^V^L,I=^L^F^N,
                 L=^L^F^N,LO=^L^O,ML=^N^N^N^N^N^N^N^N^N,N,O=^L^F^N,P,PC=^S^T^R^I^N^G,PD=^N,PS=X,
                 S=^L^I^B/^O^V^L,X=^L^F^N.

      T^H^E ^C^O^M^M^A^N^D COMPASS ^C^A^L^L^S ^T^H^E COMPASS ^A^S^S^E^M^B^L^E^R.
.HELP,ABOR,NOLIST

      F^O^R^M^A^T@D  A

      T^H^E ^P^A^R^A^M^E^T^E^R A ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^J^O^B ^S^T^E^P ^A^B^O^R^T ^A^T ^T^H^E ^E^N^D ^O^F ^T^H^E ^R^U^N
      ^I^F ^A^S^S^E^M^B^L^Y ^E^R^R^O^R^S ^A^R^E ^D^E^T^E^C^T^E^D.  I^F A ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S
      ^N^O^T ^T^O ^A^B^O^R^T ^T^H^E ^J^O^B ^S^T^E^P ^F^O^R ^A^S^S^E^M^B^L^Y ^E^R^R^O^R^S.
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O ^B^I^N^A^R^Y
      ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,BL,NOLIST

      F^O^R^M^A^T@D  BL

      T^H^E ^P^A^R^A^M^E^T^E^R BL ^S^P^E^C^I^F^I^E^S ^A ^S^E^P^A^R^A^T^E ^O^U^T^P^U^T ^L^I^S^T^I^N^G ^B^Y ^I^S^S^U^I^N^G ^A ^P^A^G^E
      ^E^J^E^C^T ^B^E^T^W^E^E^N ^L^I^S^T^I^N^G ^S^E^G^M^E^N^T^S.  I^F BL=0, ^T^H^E ^O^U^T^P^U^T ^L^I^S^T^I^N^G ^I^S ^G^E^N^E^R^A^T^E^D
      ^I^N ^C^O^M^P^A^C^T ^F^O^R^M^A^T; ^P^A^G^E ^P^A^R^I^T^Y ^A^N^D ^P^A^G^E ^E^J^E^C^T^S ^A^R^E ^S^U^P^P^R^E^S^S^E^D.  I^F BL ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S BL=0.
.HELP,ASSM,NOLIST

      F^O^R^M^A^T@D  D

      T^H^E ^P^A^R^A^M^E^T^E^R D ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^A^S^S^E^M^B^L^Y ^E^R^R^O^R^S ^N^O^T ^I^N^H^I^B^I^T ^T^H^E ^O^B^J^E^

      ^C^O^D^E ^W^R^I^T^T^E^N ^T^O ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E B ^P^A^R^A^M^E^T^E^R.  I^F D ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^A^S^S^E^M^B^L^Y ^E^R^R^O^R^S ^I^N^H^I^B^I^T ^T^H^E ^O^B^J^E^C^T ^C^O^D^E
.HELP,ERR,NOLIST

      F^O^R^M^A^T@D  E=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^I^S^T^I^N^G ^F^I^L^E ^L^F^N.  I^F E=0, ^N^O ^E^R^R^O^R
      ^L^I^S^T ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=ERRS.  I^F E ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=OUTPUT.
.HELP,FNAM,NOLIST

      F^O^R^M^A^T@D  F=^0^N^A^M^E ^O^R ^N^U^M^B^E^R^2

      T^H^E ^P^A^R^A^M^E^T^E^R F ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^T^T^I^N^G ^O^F ^T^H^E COMPASS*F ^S^Y^M^B^O^L ^B^A^S^E^D ^O^N
      ^T^H^E ^L^A^N^G^U^A^G^E ^P^R^O^C^E^S^S^I^O^N ^N^A^M^E ^O^R ^N^U^M^B^E^R.  I^F F ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S F=COMPASS (F=0).

         ^N^A^M^E          ^N^U^M^B^E^R
         ----          ------
         COMPASS          0

         FTN              2

         FTN5             3
.HELP,GLFN,NOLIST

      F^O^R^M^A^T@D  G=^L^F^N/^O^V^L

      T^H^E ^P^A^R^A^M^E^T^E^R G ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^A^D^I^N^G ^O^F ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^O^V^E^R^L^A^Y ^N^A^M^E^D
      ^O^V^L ^F^R^O^M ^F^I^L^E ^L^F^N.  I^F /^O^V^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^O^V^E^R^L^A^Y ^I^S
      ^L^O^A^D^E^D.  I^F G=0, ^N^O ^S^Y^S^T^E^M ^T^E^X^T ^I^S ^L^O^A^D^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S G=SYSTEXT.  I^F G ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S G=0.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,LIST,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^A ^L^I^S^T^A^B^L^E ^A^S^S^E^M^B^L^E^R ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F L=0,
      ^A ^F^U^L^L ^L^I^S^T ^I^S ^N^O^T ^P^R^O^D^U^C^E^D.  I^F L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^L^O

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^C^A^N ^B^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^P^U^T^T^I^N^G ^O^P^T^I^O^N^S ^N^E^C^E^S^S^A^R^Y ^A^F^T^E^R ^T^H^E ^E^Q^U^A^L ^S^I^G^N, ^F^O^R ^E^X^A^M^P^

      LO=LOEM.  I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=0.

         ^L^O                   M^E^A^N^I^N^G
         --                   -------
         A       L^I^S^T ^S^T^A^T^E^M^E^N^T^S ^A^C^T^U^A^L^L^Y ^A^S^S^E^M^B^L^E^D.

         B       L^I^S^T ^B^I^N^A^R^Y ^S^T^A^T^E^M^E^N^T^S.

         C       L^I^S^T ^S^T^A^T^E^M^E^N^T^S.

         D       I^N^C^L^U^D^E ^D^E^T^A^I^L^S.

         E       I^N^C^L^U^D^E ^E^C^H^O^E^D ^L^I^N^E^S.

         F       L^I^S^T IF-^S^K^I^P^P^E^D ^L^I^N^E^S.

         G       L^I^S^T ^G^E^N^E^R^A^T^E^D ^C^O^D^E.

         L       L^I^S^T ^M^A^S^T^E^R ^L^I^S^T ^C^O^N^T^R^O^L.

         M       L^I^S^T ^M^A^C^R^O^S ^A^N^D ^O^P^D^E^F^S.

         N       L^I^S^T ^N^O^N^R^E^F^E^R^E^N^C^E^D ^S^Y^M^B^O^L^S.

         R       A^C^C^U^M^U^L^A^T^E ^A^N^D ^L^I^S^T ^R^E^F^E^R^E^N^C^E^S.

         S       L^I^S^T ^S^Y^S^T^E^M ^M^A^C^R^O^S ^A^N^D ^O^P^D^E^F^S.

         T       L^I^S^T ^N^O^N^R^E^F^E^R^E^N^C^E^D ^S^Y^S^T^E^M ^S^Y^M^B^O^L^S.

         X       L^I^S^T XTEXT ^L^I^N^E^S.

         $$$$    S^E^L^E^C^T ^A^L^L ^O^P^T^I^O^N^S.

         LO      S^A^M^E ^A^S LO=CFGX.

         0       S^A^M^E ^A^S LO=BLNR.

.HELP,ML,NOLIST

      F^O^R^M^A^T@D  ML=^N^N^N^N^N^N^N^N^N

      T^H^E ^P^A^R^A^M^E^T^E^R ML ^S^P^E^C^I^F^I^E^S ^N^N^N^N^N^N^N^N^N ^T^O ^B^E ^T^H^E ^V^A^L^U^E ^O^F MODLEVEL ^M^I^C^R^O.
      I^F ^N^N^N^N^N^N^N^N^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T ^D^A^T^E ^I^N ^T^H^E ^F^O^R^M
      ^Y^Y^D^D^D.
.HELP,SUPP,NOLIST

      F^O^R^M^A^T@D  N

      T^H^E ^P^A^R^A^M^E^T^E^R N ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^U^P^P^R^E^S^S^I^O^N ^O^F ^P^A^G^E ^E^J^E^C^T^S ^C^A^U^S^E^D ^B^Y ^N^O^R^M^

      ^L^I^S^T^I^N^G ^C^O^N^T^R^O^L.  I^F N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O^T ^T^O ^S^U^P^P^R^E^S^S ^P^A^G^E
      ^E^J^E^C^T^S.
.HELP,OLFN,NOLIST

      F^O^R^M^A^T@D  O=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R O ^S^P^E^C^I^F^I^E^S ^A ^S^H^O^R^T ^L^I^S^T ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F O=0 (^Z^E^R^O),
      ^S^H^O^R^T ^L^I^S^T ^O^U^T^P^U^T ^I^S ^N^O^T ^P^R^O^D^U^C^E^D.  I^F O ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      O=OUTPUT.
.HELP,PG,NOLIST

      F^O^R^M^A^T@D  P

      T^H^E ^P^A^R^A^M^E^T^E^R P ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^P^A^G^E ^N^U^M^B^E^R^I^N^G ^P^R^O^C^E^E^D ^C^O^N^T^I^N^U^A^L^L^Y ^F^R^O^M
      ^S^U^B^P^R^O^G^R^A^M ^T^O ^S^U^B^P^R^O^G^R^A^M.  I^F P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^S^P^E^C^I^F^I^E^S ^P^A^G^E
      ^N^U^M^B^E^R^I^N^G ^T^O ^B^E^G^I^N ^A^T 1 ^F^O^R ^E^A^C^H ^S^U^B^P^R^O^G^R^A^M.
.HELP,PC,NOLIST

      F^O^R^M^A^T@D  PC=^S^T^R^I^N^G ^L^E^N^G^T^H

      T^H^E ^P^A^R^A^M^E^T^E^R PC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^T^R^I^N^G ^P^A^D^D^E^D ^W^I^T^H ^B^L^A^N^K^S (^U^P ^T^O 30
      ^C^H^A^R^A^C^T^E^R^S) ^B^E ^T^H^E ^V^A^L^U^E ^O^F ^T^H^E PCOMMENT ^M^I^C^R^O.  I^F PC ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S PC=30.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^T^H^E ^C^O^M^P^I^L^E^R
      ^L^I^S^T^I^N^G.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PD=8.  I^F PD ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E ^S^I^T^E.
.HELP,PS,NOLIST

      F^O^R^M^A^T@D  PS=X

      T^H^E ^P^A^R^A^M^E^T^E^R PS ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^S^I^Z^E X ^L^I^N^E^S ^P^E^R ^P^A^G^E; 4<=X<=99.  I^F
      PS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^P^A^G^E ^S^I^Z^E ^I^S ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E ^S^I^T^E.
.HELP,SYS,NOLIST

      F^O^R^M^A^T@D  S=^L^I^B/^O^V^L

      T^H^E ^P^A^R^A^M^E^T^E^R S ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y, ^O^V^L, ^B^E ^L^O^A^D^E^D
      ^F^R^O^M ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^F^I^L^E ^O^R ^S^Y^S^T^E^M ^L^I^B^R^A^R^Y, ^L^I^B.  I^F S=0, ^N^O ^S^Y^S^T^E^M
      ^T^E^X^T ^F^I^L^E ^I^S ^L^O^A^D^E^D.  I^F ^L^I^B/ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^L^O^A^D ^S^Y^S^T^E^M
      ^T^E^X^T ^O^V^E^R^L^A^Y, ^O^V^L, ^F^R^O^M ^T^H^E ^L^I^B^R^A^R^Y ^S^E^T.  I^F ^L^I^B/^O^V^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S S=SYSTEXT.  I^F S ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S S=SYSTEXT ^W^H^E^N G=0.
      I^F G .NE. 0, ^T^H^E^N ^N^O ^S^Y^S^T^E^M ^T^E^X^T ^F^I^L^E ^I^S ^L^O^A^D^E^D.
.HELP,EXT,NOLIST

      F^O^R^M^A^T@D  X=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^E^X^T^E^R^N^A^L ^T^E^S^T^I^N^G ^F^O^R XTEXT ^P^S^E^U^D^O-^I^N^S^T^R^U^C^T^I^O^N
      ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OPL.  I^F X ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OLDPL.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,COPY*I
,I[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,O[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,V[R^E^W^I^N^D ^B^O^T^H ^F^I^L^E^S]=(*S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ123456789),
                    R=$RW$,YES=$RW$,Y=$RW$,NO=,N=,*N=)
,M[S^E^T ^C^O^D^E^D ^M^O^D^E]=(C1,C2,CC,*N=)
,TC[T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N]=(F,EOF,I,EOI,D,EOD,*N=EOF)
,N[C^O^P^Y ^C^O^U^N^T]=(*S5(0123456789),*N=1)
,BS[M^A^X^I^M^U^M ^B^L^O^C^K ^S^I^Z^E]=(*S5(0123456789),*N=)
,CC[M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S]=(*S5(0123456789),*N=)
,EL[N^U^M^B^E^R ^O^F ^N^O^N^F^A^T^A^L ^E^R^R^O^R^S]=(*S5(0123456789),*N=0)
,PO[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N]=(*S4(EDRM),*N=)
,L[F^I^L^E ^F^O^R ^P^A^R^I^T^Y ^E^R^R^O^R ^M^E^S^S^A^G^E^S]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPY,I=^L^F^N1,O=^L^F^N2,V=^X,M=^C,TC=^T^C,N=^C^O^P^Y^C^N^T,BS=^B^S^I^Z^E,
                 CC=^C^H^A^R^C^N^T,EL=^E^R^L^I^M^I^T,PO=^P1^P2...^P^N,L=^L^F^N3,NS=^N^S.

      T^H^E COPY ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^D^A^T^A ^F^R^O^M ^O^N^E ^F^I^L^E ^T^O ^A^N^O^T^H^E^R, ^B^E^G^I^N^N^I^N^G ^A^T
      ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F ^B^O^T^H ^F^I^L^E^S ^U^N^L^E^S^S ^T^H^E ^V^E^R^I^F^Y ^O^P^T^I^O^N (V=^X) ^I^S
      ^S^P^E^C^I^F^I^E^D.
.HELP,I,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N1

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  I^F I ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,O,NOLIST

      F^O^R^M^A^T@D  O=^L^F^N2

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  I^F O
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S O=OUTPUT.
.HELP,V,NOLIST

      F^O^R^M^A^T@D  V=^X

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^B^O^T^H ^F^I^L^E^S ^L^F^N1 ^A^N^D ^L^F^N2 ^T^O ^B^E ^R^E^W^O^U^N^D, ^C^O^P^I^E^D,
      ^R^E^W^O^U^N^D, ^V^E^R^I^F^I^E^D, ^A^N^D ^R^E^W^O^U^N^D.  T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R ^A^N^Y
      1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S, ^E^X^C^E^P^T 0 (^Z^E^R^O).

      D^E^F^A^U^L^T@D F^I^L^E^S ^L^F^N1 ^A^N^D ^L^F^N2 ^A^R^E ^N^O^T ^R^E^W^O^U^N^D ^O^R ^V^E^R^I^F^I^E^D ^B^E^F^O^R^E
               ^C^O^P^Y^I^N^G.
.HELP,M,NOLIST

      F^O^R^M^A^T@D  M=^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^I^S ^I^N ^C^O^D^E^D ^M^O^D^E
      (^A^P^P^L^I^E^S ^O^N^L^Y ^T^O S ^A^N^D L ^F^O^R^M^A^T ^T^A^P^E^S).

      ^C                  D^E^S^C^R^I^P^T^I^O^N
      -                  -----------
      C1   C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^I^N^P^U^T ^F^I^L^E ^O^N^L^Y.

      C2   C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^O^U^T^P^U^T ^F^I^L^E ^O^N^L^Y.

      CC   C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^B^O^T^H ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T ^F^I^L^E^S.

      D^E^F^A^U^L^T@D B^I^N^A^R^Y ^O^N ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T ^F^I^L^E^S.
.HELP,TC,NOLIST

      F^O^R^M^A^T@D  TC=^T^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N ^F^O^R ^C^O^P^Y^I^N^G, ^A^N^D
      ^I^S ^U^S^E^D ^A^L^O^N^G ^W^I^T^H N=^C^O^P^Y^C^N^T.  V^A^L^U^E^S ^F^O^R ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N ^A^R^E@D

      ^T^C                         D^E^S^C^R^I^P^T^I^O^N
      --                         -----------
      F     T^H^E N ^K^E^Y^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y.

      EOF   S^A^M^E ^A^S F.

      I     C^O^P^Y ^T^O ^T^H^E ^E^N^D ^O^F ^I^N^F^O^R^M^A^T^I^O^N.  T^H^E N ^K^E^Y^W^O^R^D ^I^S ^I^G^N^O^R^E^D.

      EOI   S^A^M^E ^A^S I.

      D     T^H^E N ^K^E^Y^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^D^O^U^B^L^E EOF^S ^T^O ^C^O^P^Y ^T^O.

      EOD   S^A^M^E ^A^S D.

.HELP,N,NOLIST

      F^O^R^M^A^T@D  N=^C^O^P^Y^C^O^U^N^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^C^O^P^I^E^S ^T^O ^B^E ^M^A^D^E.  E^N^T^E^R
      ^T^H^E ^N^U^M^B^E^R ^I^N ^D^E^C^I^M^A^L.  I^F N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.

      N^O^T^E@D  T^H^E ^N^U^M^B^E^R ^O^F ^C^O^P^I^E^S ^M^A^D^E ^A^L^S^O ^D^E^P^E^N^D^S ^O^N ^T^H^E ^T^E^R^M^I^N^A^T^I^O^N
             ^C^O^N^D^I^T^I^O^N ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E TC ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D 1
.HELP,BS,NOLIST

      F^O^R^M^A^T@D  BS=^B^S^I^Z^E

      S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K ^S^I^Z^E (^I^N ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^W^O^R^D^S) ^W^H^I^C^H
      ^S^P^E^C^I^F^I^E^S S ^O^R L ^T^A^P^E PRU ^S^I^Z^E.  T^H^I^S ^A^P^P^L^I^E^S ^O^N^L^Y ^W^H^E^N ^C^O^P^Y^I^N^G ^T^O ^O^R
      ^F^R^O^M S ^A^N^D L ^T^A^P^E^S.  I^T ^C^A^N^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E CC ^P^A^R^A^M^E^T^E^R.
.HELP,CC,NOLIST

      F^O^R^M^A^T@D  CC=^C^H^A^R^C^N^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^I^N ^A^N S ^O^R
      L ^T^A^P^E ^B^L^O^C^K.  CC=^C^C ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^O^N^L^Y ^W^H^E^N ^C^O^P^Y^I^N^G ^T^O ^O^R ^F^R^O^M
      S ^A^N^D L ^F^O^R^M^A^T ^T^A^P^E^S.   T^H^E PRU ^S^I^Z^E ^A^N^D ^U^N^U^S^E^D ^B^I^T ^C^O^U^N^T ^A^R^E ^C^A^L^C^U^L^A^T^E^D
      ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T.

      N^O^T^E@D  CC=^C^H^A^R^C^N^T ^C^A^N^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E BS=^B^S^I^Z^E ^P^A^R^A^M^E^T^E^R.
.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^E^R^L^I^M^I^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^N^O^N^F^A^T^A^L ^E^R^R^O^R^S ^A^L^L^O^W^E^D ^B^E^F^O^R^E
      ^A^B^O^R^T^I^N^G.  T^H^I^S ^I^N^C^L^U^D^E^S ^B^O^T^H ^P^A^R^I^T^Y ^E^R^R^O^R^S ^A^N^D ^B^L^O^C^K-^T^O^O-^L^A^R^G^E ^E^R^R^O^R^S.

      D^E^F^A^U^L^T@D  0.
.HELP,PO,NOLIST

      F^O^R^M^A^T@D  PO=^P1^P2...^P^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^E^N^T^E^R ^O^N^E ^O^R ^M^O^R^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S@D

      ^P^N                         D^E^S^C^R^I^P^T^I^O^N
      --                         -----------
      E   I^N^P^U^T ^B^L^O^C^K^S ^W^I^T^H ^P^A^R^I^T^Y ^E^R^R^O^R^S ^O^R ^B^L^O^C^K-^T^O^O-^L^A^R^G^E ^E^R^R^O^R^S
          ^A^R^E ^P^R^O^C^E^S^S^E^D.

      D   A^N^Y ^N^O^I^S^E ^B^L^O^C^K^S ^G^E^N^E^R^A^T^E^D ^B^Y ^A ^C^O^P^Y ^F^R^O^M ^M^A^S^S ^S^T^O^R^A^G^E, I ^F^O^R^M^A^T
          ^T^A^P^E, ^O^R SI ^F^O^R^M^A^T ^T^A^P^E ^T^O ^A^N S ^O^R L ^F^O^R^M^A^T ^T^A^P^E ^A^R^E ^D^E^L^E^T^E^D.

      R   A^L^L^O^W^S ^R^E^C^O^R^D ^S^P^L^I^T^T^I^N^G ^T^O ^T^H^E ^C^O^P^Y ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N ^S^P^E^C^I^F^I^E^D
          ^B^Y ^T^H^E ^K^E^Y^W^O^R^D TC, ^E^L^I^M^I^N^A^T^I^N^G ^E^A^C^H EOF ^O^N ^O^U^T^P^U^T.

      M   C^O^P^Y ^F^I^L^E^S ^A^C^C^O^R^D^I^N^G ^T^O ^T^H^E ^C^O^P^Y ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N ^S^P^E^C^I^F^I^E^D ^B^Y
          ^T^H^E TC=^T^C ^P^A^R^A^M^E^T^E^R, ^E^L^I^M^I^N^A^T^I^N^G ^E^A^C^H EOF ^O^N ^O^U^T^P^U^T.
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N3

      S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^A^N ^A^L^T^E^R^N^A^T^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^P^A^R^I^T^Y ^E^R^R^O^R
      ^M^E^S^S^A^G^E^S ^W^H^E^N ^E^X^T^E^N^D^E^D ^E^R^R^O^R ^P^R^O^C^E^S^S^I^N^G ^I^S ^I^N ^E^F^F^E^C^T (^N^O^N^Z^E^R^O EL
      ^S^P^E^C^I^F^I^E^D).

      D^E^F^A^U^L^T@D  F^I^L^E OUTPUT
.ENDHELP
.EX. $COPY(#I=I,#O=O,#V=V,#M=M,#TC=TC,#N=N,#BS=BS,#CC=CC,#EL=EL,#PO=PO,#L=L#)
*WEOR
.PROC,COPYBF*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[   N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,C[   C^O^D^E^D ^O^R ^B^I^N^A^R^Y ^C^O^P^Y]=(C=$,C$,CODED=$,C$,B=,BINARY=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYBF,^L^F^N1,^L^F^N2,^N,^C. C^O^D^E^D ^C^O^P^Y
               ^O^R
               COPYBF,^L^F^N1,^L^F^N2,^N.  B^I^N^A^R^Y ^C^O^P^Y

      D^E^F^A^U^L^T@D INPUT (^L^F^N1)
               OUTPUT (^L^F^N2)

      T^H^E COPYBF ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^F^R^O^M ^O^N^E
      ^M^U^L^T^I^F^I^L^E ^F^I^L^E ^T^O ^A^N^O^T^H^E^R.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^O^N ^F^I^L^E ^L^F^N1 ^T^O ^C^O^P^Y.  I^F
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,C,NOLIST

      F^O^R^M^A^T@D  ^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^C^O^P^Y^I^N^G ^T^O ^O^R ^F^R^O^M ^A^N S ^O^R L
      ^F^O^R^M^A^T ^T^A^P^E ^I^S ^P^E^R^F^O^R^M^E^D ^I^N ^C^O^D^E^D ^R^A^T^H^E^R ^T^H^A^N ^B^I^N^A^R^Y ^M^O^D^E.  E^N^T^E^R
      C ^F^O^R ^C^O^D^E^D ^M^O^D^E, ^O^M^I^T ^F^O^R ^B^I^N^A^R^Y.  (I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N
      SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.)

      D^E^F^A^U^L^T@D  ^B^I^N^A^R^Y
.ENDHELP
.EX.  $COPYBF(LFN1,LFN2,N_C)
*WEOR
.PROC,COPYBR*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,C[C^O^D^E^D ^O^R ^B^I^N^A^R^Y ^C^O^P^Y]=(C=$,C$,CODED=$,C$,B=,BINARY=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYBR,^L^F^N1,^L^F^N2,^N,^C.  C^O^D^E^D ^C^O^P^Y
               ^O^R
               COPYBR,^L^F^N1,^L^F^N2,^N.  B^I^N^A^R^Y ^C^O^P^Y

      T^H^E COPYBR ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^F^R^O^M ^O^N^E
      ^F^I^L^E ^T^O ^A^N^O^T^H^E^R.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S 1 ^T^O 7
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  A ^F^I^L^E ^N^A^M^E
      ^I^S 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,C,NOLIST

      F^O^R^M^A^T@D  ^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^C^O^P^Y^I^N^G ^T^O ^O^R ^F^R^O^M ^A^N S ^O^R L ^F^O^R^M^A^T
      ^T^A^P^E ^S^H^O^U^L^D ^B^E ^P^E^R^F^O^R^M^E^D ^I^N ^C^O^D^E^D ^R^A^T^H^E^R ^T^H^A^N ^B^I^N^A^R^Y ^M^O^D^E.  E^N^T^E^R
      C ^F^O^R ^C^O^D^E^D ^M^O^D^E, ^O^M^I^T ^F^O^R ^B^I^N^A^R^Y.  (I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI
      ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.)

      D^E^F^A^U^L^T@D ^B^I^N^A^R^Y
.ENDHELP
.EX.  $COPYBR(LFN1,LFN2,N_C)
*WEOR
.PROC,COPYCF*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,FCHAR[F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E]=(*S5(0123456789),*N=1)
,LCHAR[L^A^S^T  ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E]=(*S5(0123456789),*N=136)
,NA[A^B^O^R^T ^I^F ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^M^I^S^S^I^N^G]=(YES=,Y=,NO=$,NA$,N=$,NA$,
                                               NA=$,NA$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYCF,^L^F^N1,^L^F^N2,^N,^F^C^H^A^R,^L^C^H^A^R,^N^A.

      T^H^E COPYCF ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^C^O^D^E^D ^F^I^L^E^S ^F^R^O^M ^O^N^E
      ^F^I^L^E ^T^O ^A^N^O^T^H^E^R.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O
      7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  A ^F^I^L^E ^N^A^M^E ^I^S
      ^F^R^O^M 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,FCHAR,NOLIST

      F^O^R^M^A^T@D  ^F^C^H^A^R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E
      ^T^O ^C^O^P^Y ^F^O^R ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S 1.
.HELP,LCHAR,NOLIST

      F^O^R^M^A^T@D  ^L^C^H^A^R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E ^T^O
      ^C^O^P^Y ^F^O^R ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 136.
.HELP,NA,NOLIST

      F^O^R^M^A^T@D  ^N^A

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^J^O^B ^S^T^E^P ^W^I^L^L ^N^O^T ^A^B^O^R^T ^W^H^E^N ^A ^L^I^N^E
      ^T^E^R^M^I^N^A^T^O^R ^D^O^E^S ^N^O^T ^A^P^P^E^A^R ^B^E^F^O^R^E ^A^N EOR.  E^N^T^E^R NA ^F^O^R ^N^O ^A^B^O^R^T,
      ^O^M^I^T ^F^O^R ^A^B^O^R^T.

      D^E^F^A^U^L^T@D  J^O^B ^A^B^O^R^T^S ^I^F ^N^O ^T^E^R^M^I^N^A^T^O^R.
.ENDHELP
.EX.  $COPYCF(LFN1,LFN2,N,FCHAR,LCHAR_NA)
*WEOR
.PROC,COPYCR*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,FCHAR[F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E]=(*S5(0123456789),*N=1)
,LCHAR[L^A^S^T  ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E]=(*S5(0123456789),*N=136)
,NA[A^B^O^R^T ^I^F ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^M^I^S^S^I^N^G]=(YES=,Y=,NO=$,NA$,NA=$,NA$,
                                                    N=$,NA$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYCR,^L^F^N1,^L^F^N2,^N,^F^C^H^A^R,^L^C^H^A^R,^N^A.

      T^H^E COPYCR ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^C^O^D^E^D ^R^E^C^O^R^D^S ^F^R^O^M ^O^N^E
      ^F^I^L^E ^T^O ^A^N^O^T^H^E^R.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O
      7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  A ^F^I^L^E ^N^A^M^E ^I^S
      ^F^R^O^M 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,FCHAR,NOLIST

      F^O^R^M^A^T@D  ^F^C^H^A^R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E ^T^O
      ^C^O^P^Y ^F^O^R ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,LCHAR,NOLIST

      F^O^R^M^A^T@D  ^L^C^H^A^R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^O^F ^E^A^C^H ^L^I^N^E ^T^O
      ^C^O^P^Y ^F^O^R ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 136.
.HELP,NA,NOLIST

      F^O^R^M^A^T@D  ^N^A

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^J^O^B ^S^T^E^P ^W^I^L^L ^N^O^T ^A^B^O^R^T ^W^H^E^N ^A
      ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^D^O^E^S ^N^O^T ^A^P^P^E^A^R ^B^E^F^O^R^E ^A^N EOR.  E^N^T^E^R NA ^F^O^R ^N^O
      ^A^B^O^R^T, ^O^M^I^T ^F^O^R ^A^B^O^R^T.

      D^E^F^A^U^L^T@D J^O^B ^A^B^O^R^T^S ^I^F ^N^O ^T^E^R^M^I^N^A^T^O^R.
.ENDHELP
.EX.  $COPYCR(LFN1,LFN2,N,FCHAR,LCHAR_NA)
*WEOR
.PROC,COPYEI*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,RW[R^E^W^I^N^D ^F^I^L^E^S ^B^E^F^O^R^E ^C^O^P^Y^I^N^G]=(YES=$,RW$,Y=$,RW$,RW=$,RW$,
                                          NO=,N=,*N=)
,C[C^O^D^E^D ^O^R ^B^I^N^A^R^Y ^C^O^P^Y]=(CODED=$,C$,C=$,C$,BINARY=,B=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYEI,^L^F^N1,^L^F^N2,^R^W,^C.

      T^H^E COPYEI ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^O^N^E ^F^I^L^E ^T^O ^A^N^O^T^H^E^R.  T^H^E ^C^O^P^Y^I^N^G ^B^E^G^I^N^S
      ^A^T ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^F^I^L^E ^A^N^D ^C^O^N^T^I^N^U^E^S ^U^N^T^I^L ^T^H^E EOI
      ^I^S ^E^N^C^O^U^N^T^E^R^E^D.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O
      7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  A ^F^I^L^E ^N^A^M^E ^I^S
      ^F^R^O^M 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,RW,NOLIST

      F^O^R^M^A^T@D  ^R^W

      S^P^E^C^I^F^I^E^S ^T^H^A^T ^B^O^T^H ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^T^H^E ^C^O^P^Y^I^N^G, ^A^N^D
      ^R^E^W^O^U^N^D, ^V^E^R^I^F^I^E^D, ^A^N^D ^R^E^W^O^U^N^D ^A^G^A^I^N ^A^F^T^E^R ^T^H^E ^C^O^P^Y^I^N^G ^I^S ^C^O^M^P^L^E^T^E.
      E^N^T^E^R RW ^F^O^R ^R^E^W^I^N^D, ^V^E^R^I^F^Y, ^A^N^D ^R^E^W^I^N^D; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D N^O ^R^E^W^I^N^D ^O^P^E^R^A^T^I^O^N^S.
.HELP,C,NOLIST

      F^O^R^M^A^T@D  ^C

      I^N^D^I^C^A^T^E^S ^T^H^A^T ^T^H^E ^C^O^P^Y^I^N^G ^T^O ^O^R ^F^R^O^M ^A^N S ^O^R L ^F^O^R^M^A^T ^T^A^P^E ^S^H^O^U^L^D
      ^B^E ^P^E^R^F^O^R^M^E^D ^I^N ^C^O^D^E^D ^R^A^T^H^E^R ^T^H^A^N ^B^I^N^A^R^Y ^M^O^D^E. E^N^T^E^R C ^F^O^R ^C^O^D^E^D
      ^M^O^D^E, ^O^M^I^T ^F^O^R ^B^I^N^A^R^Y.  (I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E
      ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.)

      D^E^F^A^U^L^T@D B^I^N^A^R^Y.
.ENDHELP
.EX.  $COPYEI(LFN1,LFN2_RW_C)
*WEOR
.PROC,COPYL*I
,P[F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^O^L^D ^F^I^L^E]=(*F,*N=OLD)
,B[F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E]=(*F,*N=LGO)
,N[F^I^L^E ^N^A^M^E ^O^F ^N^E^W ^F^I^L^E]=(*F,*N=NEW)
,LAST[N^A^M^E ^O^F ^L^A^S^T ^R^E^C^O^R^D ^T^O ^B^E ^P^R^O^C^E^S^S^E^D]=(*F,*N=)
,PO[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S]=(*S4(RATE),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYL,^O^L^D^L^F^N,^R^E^P^L^F^N,^N^E^W^L^F^N,^L^A^S^T,^F^L^A^G.

      T^H^E COPYL ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A^N ^O^L^D ^F^I^L^E (^O^L^D^L^F^N) ^T^O ^A ^N^E^W ^F^I^L^E
      (^N^E^W^L^F^N), ^S^U^B^S^T^I^T^U^T^I^N^G ^R^E^C^O^R^D^S ^F^R^O^M ^A ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E
      ^F^O^R ^T^H^E ^M^A^T^C^H^I^N^G ^R^E^C^O^R^D^S ^O^N ^T^H^E ^O^L^D ^F^I^L^E.  R^E^C^O^R^D^S ^O^N ^T^H^E
      ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E (^R^E^P^L^F^N) ^W^H^I^C^H ^D^O ^N^O^T ^M^A^T^C^H ^R^E^C^O^R^D^S ^O^N ^T^H^E
      ^O^L^D ^F^I^L^E ^A^R^E ^E^I^T^H^E^R ^I^G^N^O^R^E^D ^O^R ^A^P^P^E^N^D^E^D ^T^O ^T^H^E ^N^E^W ^F^I^L^E
      ^A^C^C^O^R^D^I^N^G ^T^O ^Y^O^U^R ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^C^A^T^I^O^N^S.  COPYL ^C^A^N ^B^E ^U^S^E^D
      ^T^O ^R^E^P^L^A^C^E ^M^U^L^T^I^P^L^E ^O^C^C^U^R^R^E^N^C^E^S ^O^F ^T^H^E ^S^A^M^E ^R^E^C^O^R^D ^I^F ^M^U^L^T^I^P^L^E
      ^O^C^C^U^R^R^E^N^C^E^S ^O^F ^T^H^E ^R^E^C^O^R^D ^A^R^E ^I^N ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E.
.HELP,P,NOLIST

      F^O^R^M^A^T@D  ^O^L^D^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^O^L^D ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O 7
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OLD
.HELP,B,NOLIST

      F^O^R^M^A^T@D  ^R^E^P^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1
      ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LGO.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N^E^W^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^N^E^W (^U^P^D^A^T^E^D) ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O
      7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S NEW.
.HELP,LAST,NOLIST

      F^O^R^M^A^T@D  ^L^A^S^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^A^S^T ^R^E^C^O^R^D ^O^N ^O^L^D^L^F^N ^T^O ^B^E
      ^P^R^O^C^E^S^S^E^D.  I^F ^L^A^S^T ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^A^L^L ^R^E^C^O^R^D^S ^O^N ^O^L^D^L^F^N ^A^R^E
      ^P^R^O^C^E^S^S^E^D ^F^R^O^M ^I^T^S ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^T^O ^T^H^E ^N^E^X^T EOF (^O^R EOI ^I^F
      ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N E ^I^S ^U^S^E^D).
.HELP,PO,NOLIST

      F^O^R^M^A^T@D  ^F^L^A^G

      T^H^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S ^A^R^E@D

      R = R^E^W^I^N^D ^O^L^D ^A^N^D ^N^E^W ^F^I^L^E^S ^B^E^F^O^R^E ^P^R^O^C^E^S^S^I^N^G.

      A = A^P^P^E^N^D ^T^O ^T^H^E ^E^N^D ^O^F ^T^H^E ^N^E^W ^F^I^L^E ^A^L^L ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E ^R^E^C^O^R^D^S ^T^H^A^T
          ^D^O ^N^O^T ^M^A^T^C^H ^A^N^Y ^R^E^C^O^R^D^S ^O^N ^T^H^E ^P ^F^I^L^E.  I^F A ^I^S ^N^O^T ^S^E^L^E^C^T^E^D,
          ^R^E^C^O^R^D^S ^O^N ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E ^T^H^A^T ^D^O ^N^O^T ^M^A^T^C^H ^A^N^Y ^R^E^C^O^R^D^S ^O^N
          ^T^H^E ^O^L^D ^F^I^L^E ^A^R^E ^I^G^N^O^R^E^D ^A^N^D ^A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^I^S ^I^S^S^U^E^D.

      T = C^H^E^C^K ^F^O^R ^M^A^T^C^H^I^N^G ^N^A^M^E ^O^F ^R^E^C^O^R^D, ^B^U^T ^O^M^I^T ^C^H^E^C^K ^F^O^R ^M^A^T^C^H^I^N^G
          ^T^Y^P^E ^O^F ^R^E^C^O^R^D.  I^F T ^I^S ^N^O^T ^S^E^L^E^C^T^E^D, ^R^E^C^O^R^D^S ^M^A^T^C^H ^O^N^L^Y ^I^F ^B^O^T^H
          ^T^H^E ^T^Y^P^E ^A^N^D ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^R^E^C^O^R^D ^A^R^E ^T^H^E ^S^A^M^E.

      E = P^R^O^C^E^S^S ^T^H^E ^O^L^D ^F^I^L^E ^U^N^T^I^L EOI.

      T^H^E^S^E ^O^P^T^I^O^N^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^B^Y ^C^O^M^B^I^N^I^N^G ^O^N^E ^O^R ^M^O^R^E ^L^E^T^T^E^R^S ^I^N
      ^A^N^Y ^O^R^D^E^R, ^S^U^C^H ^A^S TRA, AR, ERTA, ^O^R TR.
.ENDHELP
.EX.  $COPYL(P,B,N,LAST,PO)
*WEOR
.PROC,COPYLM*I
,P[F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^O^L^D ^F^I^L^E]=(*F,*N=OLD)
,B[F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E]=(*F,*N=LGO)
,N[F^I^L^E ^N^A^M^E ^O^F ^N^E^W ^F^I^L^E]=(*F,*N=NEW)
,LAST[N^A^M^E ^O^F ^L^A^S^T ^R^E^C^O^R^D ^T^O ^P^R^O^C^E^S^S]=(*F,*N=)
,PO[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S]=(*S4(RATE),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYLM,^O^L^D^L^F^N,^R^E^P^L^F^N,^N^E^W^L^F^N,^L^A^S^T,^F^L^A^G.

      T^H^E COPYLM ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A^N ^O^L^D ^F^I^L^E (^O^L^D^L^F^N) ^T^O ^A ^N^E^W
      ^F^I^L^E (^N^E^W^L^F^N), ^S^U^B^S^T^I^T^U^T^I^N^G ^R^E^C^O^R^D^S ^F^R^O^M ^A ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E
      ^F^O^R ^T^H^E ^M^A^T^C^H^I^N^G ^R^E^C^O^R^D^S ^O^N ^T^H^E ^O^L^D ^F^I^L^E.  R^E^C^O^R^D^S ^O^N ^T^H^E
      ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E (^R^E^P^L^F^N) ^W^H^I^C^H ^D^O ^N^O^T ^M^A^T^C^H ^R^E^C^O^R^D^S ^O^N ^T^H^E
      ^O^L^D ^F^I^L^E ^A^R^E ^E^I^T^H^E^R ^I^G^N^O^R^E^D ^O^R ^A^P^P^E^N^D^E^D ^T^O ^T^H^E ^N^E^W ^F^I^L^E
      ^A^C^C^O^R^D^I^N^G ^T^O ^Y^O^U^R ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^C^A^T^I^O^N^S.  COPYLM ^U^S^E^S ^T^H^E
      ^F^I^R^S^T ^M^A^T^C^H^I^N^G ^R^E^C^O^R^D ^E^N^C^O^U^N^T^E^R^E^D ^O^N ^F^I^L^E ^R^E^P^L^F^N ^T^O ^R^E^P^L^A^C^E ^E^A^C^H
      ^M^A^T^C^H^I^N^G ^R^E^C^O^R^D ^F^R^O^M ^F^I^L^E ^O^L^D^L^F^N.
.HELP,P,NOLIST

      F^O^R^M^A^T@D  ^O^L^D^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^O^L^D ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O 7
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^A OLD
.HELP,B,NOLIST

      F^O^R^M^A^T@D  ^R^E^P^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1
      ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LGO.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N^E^W^L^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^N^E^W (^U^P^D^A^T^E^D) ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S ^F^R^O^M 1 ^T^O
      7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S NEW.
.HELP,LAST,NOLIST

      F^O^R^M^A^T@D  ^L^A^S^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^A^S^T ^R^E^C^O^R^D ^O^N ^O^L^D^L^F^N ^T^O ^B^E
      ^P^R^O^C^E^S^S^E^D.  I^F ^L^A^S^T ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^A^L^L ^R^E^C^O^R^D^S ^O^N ^O^L^D^L^F^N ^A^R^E
      ^P^R^O^C^E^S^S^E^D ^F^R^O^M ^I^T^S ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^T^O ^T^H^E ^N^E^X^T EOF (^O^R EOI ^I^F
      ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N E ^I^S ^U^S^E^D).
.HELP,PO,NOLIST

      F^O^R^M^A^T@D  ^F^L^A^G

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S.  P^O^S^S^I^B^L^E ^O^P^T^I^O^N^S ^A^R^E@D

      R = R^E^W^I^N^D ^O^L^D ^A^N^D ^N^E^W ^F^I^L^E^S ^B^E^F^O^R^E ^P^R^O^C^E^S^S^I^N^G.

      A = A^P^P^E^N^D ^T^O ^T^H^E ^E^N^D ^O^F ^T^H^E ^N^E^W ^F^I^L^E ^A^L^L ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E ^R^E^C^O^R^D^S ^T^H^A^T
          ^D^O ^N^O^T ^M^A^T^C^H ^A^N^Y ^R^E^C^O^R^D^S ^O^N ^T^H^E ^P ^F^I^L^E.  I^F A ^I^S ^N^O^T ^S^E^L^E^C^T^E^D,
          ^R^E^C^O^R^D^S ^O^N ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E ^T^H^A^T ^D^O ^N^O^T ^M^A^T^C^H ^A^N^Y ^R^E^C^O^R^D^S ^O^N
          ^T^H^E ^O^L^D ^F^I^L^E ^A^R^E ^I^G^N^O^R^E^D ^A^N^D ^A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^I^S ^I^S^S^U^E^D.

      T = C^H^E^C^K ^F^O^R ^M^A^T^C^H^I^N^G ^N^A^M^E ^O^F ^R^E^C^O^R^D, ^B^U^T ^O^M^I^T ^C^H^E^C^K ^F^O^R ^M^A^T^C^H^I^N^G
          ^T^Y^P^E ^O^F ^R^E^C^O^R^D.  I^F T ^I^S ^N^O^T ^S^E^L^E^C^T^E^D, ^R^E^C^O^R^D^S ^M^A^T^C^H ^O^N^L^Y ^I^F ^B^O^T^H
          ^T^H^E ^T^Y^P^E ^A^N^D ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^R^E^C^O^R^D ^A^R^E ^T^H^E ^S^A^M^E.

      E = P^R^O^C^E^S^S ^T^H^E ^O^L^D ^F^I^L^E ^U^N^T^I^L EOI.

      T^H^E^S^E ^O^P^T^I^O^N^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^B^Y ^C^O^M^B^I^N^I^N^G ^O^N^E ^O^R ^M^O^R^E ^L^E^T^T^E^R^S ^I^N
      ^A^N^Y ^O^R^D^E^R, ^S^U^C^H ^A^S TRA, AR, ERTA, ^O^R TR.
.ENDHELP
.EX.  $COPYLM(P,B,N,LAST,PO)
*WEOR
.PROC,COPYSBF*I
,FROM[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,TO[  C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[   N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,NA[A^B^O^R^T ^W^H^E^N ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^M^I^S^S^I^N^G]=(YES=,Y=,*K=$,NA$,
                                         NO=$,NA$,N=$,NA$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYSBF,^L^F^N1,^L^F^N2,^N,^N^A.

      T^H^E COPYSBF ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^F^I^L^E ^A^N^D ^I^N^S^E^R^T^S ^A ^S^P^A^C^E ^B^E^F^O^R^E ^T^H^E
      ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^O^F ^E^A^C^H ^L^I^N^E ^O^F ^T^H^E ^F^I^L^E.
.HELP,FROM,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^C^O^P^Y.  T^H^E ^N^A^M^E ^M^A^Y ^B^E ^A^N^Y
      ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G ^O^F 1 ^T^O 7 ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,TO,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  T^H^E ^N^A^M^E ^M^A^Y
      ^B^E ^A^N^Y ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G ^O^F 1 ^T^O 7 ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,NA,NOLIST

      F^O^R^M^A^T@D  ^N^A

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^J^O^B ^S^T^E^P ^W^I^L^L ^N^O^T ^A^B^O^R^T ^W^H^E^N ^A
      ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^D^O^E^S ^N^O^T ^A^P^P^E^A^R ^B^E^F^O^R^E ^A^N EOR.  T^O ^S^P^E^C^I^F^Y ^N^O
      ^A^B^O^R^T, ^E^N^T^E^R NA.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O
      ^A^B^O^R^T (^I^F ^N^O ^T^E^R^M^I^N^A^T^O^R).
.ENDHELP
.EX.  $COPYSBF(FROM,TO,N_NA)
*WEOR
.PROC,COPYX*I
,LFN1[C^O^P^Y ^F^R^O^M ^T^H^I^S ^F^I^L^E]=(*F,*N=INPUT)
,LFN2[C^O^P^Y ^T^O ^T^H^I^S ^F^I^L^E]=(*F,*N=OUTPUT)
,N[C^O^P^Y ^S^P^E^C^I^F^I^C^A^T^I^O^N^S]=(*S15(ABCDEFGHIJKLMNOPQRSTUVWXYZ$/$0123456789),*N=1)
,B[B^A^C^K^S^P^A^C^E ^C^O^N^T^R^O^L]=(0,1,2,3,*N=0)
,C[C^O^D^E^D ^O^R ^B^I^N^A^R^Y ^C^O^P^Y]=(CODED=$,C$,C=$,C$,BINARY=,B=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  COPYX,^L^F^N1,^L^F^N2,^N,^B,^C.

      T^H^E COPYX ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^L^O^G^I^C^A^L ^R^E^C^O^R^D^S ^F^R^O^M ^F^I^L^E ^L^F^N1 ^T^O ^F^I^L^E ^L^F^N2
      ^U^N^T^I^L ^T^H^E ^C^O^N^D^I^T^I^O^N ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^N ^P^A^R^A^M^E^T^E^R ^I^S ^M^E^T.  I^T ^T^H^E^N
      ^B^A^C^K^S^P^A^C^E^S ^T^H^E ^F^I^L^E^S ^A^C^C^O^R^D^I^N^G ^T^O ^T^H^E ^V^A^L^U^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E ^B
      ^P^A^R^A^M^E^T^E^R.
.HELP,LFN1,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,LFN2,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  ^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^P^R^O^V^I^D^E^S ^A^D^D^I^T^I^O^N^A^L ^C^O^P^Y ^S^P^E^C^I^F^I^C^A^T^I^O^N^S.  P^O^S^S^I^B^L^E
      ^V^A^L^U^E^S ^A^R^E@D

      ^N            C^O^P^Y ^N ^R^E^C^O^R^D^S, ^W^H^E^R^E ^N ^I^S ^A ^D^E^C^I^M^A^L ^N^U^M^B^E^R.

      00           C^O^P^Y ^A^L^L ^R^E^C^O^R^D^S ^U^P ^T^O ^A^N^D ^I^N^C^L^U^D^I^N^G ^F^I^R^S^T ^Z^E^R^O-^L^E^N^G^T^H
                   ^R^E^C^O^R^D.

      ^N^A^M^E         C^O^P^Y ^A^L^L ^R^E^C^O^R^D^S ^U^P ^T^O ^A^N^D ^I^N^C^L^U^D^I^N^G ^R^E^C^O^R^D ^O^F
                   ^S^P^E^C^I^F^I^E^D ^N^A^M^E (^R^E^C^O^R^D ^N^A^M^E ^I^S ^T^H^E ^F^I^R^S^T ^S^E^V^E^N
                   ^C^H^A^R^A^C^T^E^R^S ^O^F ^T^H^E ^R^E^C^O^R^D ^O^R ^T^H^E ^N^A^M^E ^I^N ^T^H^E ^P^R^E^F^I^X ^T^A^B^L^E,
                   ^I^F ^P^R^E^S^E^N^T).

      ^T^Y^P^E/^N^A^M^E    C^O^P^Y ^A^L^L ^R^E^C^O^R^D^S ^U^P ^T^O ^A^N^D ^I^N^C^L^U^D^I^N^G ^T^H^E ^R^E^C^O^R^D ^O^F ^T^H^E
                   ^S^P^E^C^I^F^I^E^D ^T^Y^P^E ^A^N^D ^N^A^M^E.

      D^E^F^A^U^L^T@D 1 ^R^E^C^O^R^D ^I^S ^C^O^P^I^E^D.
.HELP,B,NOLIST

      F^O^R^M^A^T@D  ^B

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^A^C^K^S^P^A^C^E ^C^O^N^T^R^O^L.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      0    D^O ^N^O^T ^B^A^C^K^S^P^A^C^E.
      1    B^A^C^K^S^P^A^C^E ^F^I^L^E ^L^F^N1 ^O^N^E ^R^E^C^O^R^D ^A^F^T^E^R ^C^O^P^Y^I^N^G ^C^O^M^P^L^E^T^E^S.
      2    B^A^C^K^S^P^A^C^E ^F^I^L^E ^L^F^N2 ^O^N^E ^R^E^C^O^R^D ^A^F^T^E^R ^C^O^P^Y^I^N^G ^C^O^M^P^L^E^T^E^S.
      3    B^A^C^K^S^P^A^C^E ^F^I^L^E ^L^F^N1 ^A^N^D ^L^F^N2 ^O^N^E ^R^E^C^O^R^D ^A^F^T^E^R ^C^O^P^Y^I^N^G ^C^O^M^P^L^E^T^E^S.

      D^E^F^A^U^L^T@D 0.
.HELP,C,NOLIST

      F^O^R^M^A^T@D  ^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^C^O^P^Y^I^N^G ^T^O ^O^R ^F^R^O^M ^A^N S ^O^R L ^F^O^R^M^A^T
      ^T^A^P^E ^S^H^O^U^L^D ^B^E ^P^E^R^F^O^R^M^E^D ^I^N ^C^O^D^E^D ^R^A^T^H^E^R ^T^H^A^N ^B^I^N^A^R^Y ^M^O^D^E.  E^N^T^E^R
      C ^F^O^R ^C^O^D^E^D ^M^O^D^E, ^O^M^I^T ^F^O^R ^B^I^N^A^R^Y.  (I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N
      SI ^T^A^P^E, ^T^H^E ^J^O^B ^A^B^O^R^T^S.  F^O^R ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E^S ^A^N^D I ^A^N^D F ^F^O^R^M^A^T
      ^T^A^P^E ^F^I^L^E^S, ^T^H^E ^M^O^D^E ^S^E^T^T^I^N^G ^I^S ^I^G^N^O^R^E^D.)

      D^E^F^A^U^L^T@D B^I^N^A^R^Y ^M^O^D^E.
.ENDHELP
.EX.  $COPYX(LFN1,LFN2,N,B_C)
*WEOR
.PROC,CSET*I
,CS[C^H^A^R^A^C^T^E^R ^S^E^T (ASCII ^O^R NORMAL)]=(*N=NORMAL,ASCII,NORMAL)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CSET,^M^O^D^E.

      T^H^E CSET ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^O^F ^Y^O^U^R ^T^E^R^M^I^N^A^L.
.HELP,CS,NOLIST

      E^N^T^E^R    T^O ^T^Y^P^E ^I^N ^A^N^D ^R^E^A^D

      ASCII    U^P^P^E^R^C^A^S^E ^A^N^D ^L^O^W^E^R^C^A^S^E ^T^E^X^T.
      NORMAL   U^P^P^E^R^C^A^S^E ^T^E^X^T ^O^N^L^Y.

      D^E^F^A^U^L^T@D  NORMAL.
.ENDHELP
.EX.  $CSET(CS)
*WEOR
.PROC,CTIME*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  CTIME.

      T^H^E CTIME ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^T^H^A^T ^T^H^E ^A^C^C^U^M^U^L^A^T^E^D CPU ^J^O^B ^T^I^M^E
      ^B^E ^I^S^S^U^E^D ^T^O ^T^H^E ^J^O^B'^S ^D^A^Y^F^I^L^E.
.ENDHELP
.EX.  $CTIME.
*WEOR
.PROC,CYBIL*I
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,LLFN[L^I^S^T^I^N^G^S O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=LISTING)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=LGO)
,COM[S^P^E^C^I^F^Y C^O^M^P^I^L^E^R T^O B^E U^S^E^D (^C^O^M^P^I^L^E^R)]=(*A2,*N=CC)
,CHK[S^P^E^C^I^F^Y R^U^N T^I^M^E C^H^E^C^K (CHK)]=(*A3,*N=NRS)
,LO[S^P^E^C^I^F^Y L^I^S^T^I^N^G^S O^U^T^P^U^T G^E^N^E^R^A^T^E^D (LO)]=(*A2,*N=S)
,DEB[S^P^E^C^I^F^Y D^E^B^U^G^G^I^N^G O^P^T^I^O^N^S (DEBUB)]=(*A2,*N=SD)
,PAD[S^P^E^C^I^F^Y N^U^M^B^E^R O^F N^O-^O^P^S (PAD)]=(*A1,*N)
,OPT[S^P^E^C^I^F^Y O^P^T^I^M^I^Z^A^T^I^O^N L^E^V^E^L^S (OPT)]=(*A1,*N)
,MES[E^N^A^B^L^E I^N^F^O^R^M^A^T^I^V^E M^E^S^S^A^G^E^S (^M^E^S^S^A^G^E^S)]=(*A5,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

     F^O^R^M^A^T@D  SES.CYBIL,I=^L^F^N,L=^L^F^N,B=^L^F^N,^C^O^M^P^I^L^E^R,CHK=^C1^C2^C3,LO=^P1^P2...^P^N,
                  DEBUG=^D^B,PAD=^P^A^D,OPT=^N,^M^E^S^S^A^G^E^S.

      T^H^E CYBIL ^C^O^M^M^A^N^D ^C^A^L^L^S ^T^H^E CYBIL ^C^O^M^P^I^L^E^R.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S I=COMPILE.
.HELP,LLFN,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G^S ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F L ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S L=LISTING.
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O ^B^I^N^A^R^Y
      ^O^B^J^E^C^T ^C^O^D^E ^I^S ^P^R^O^D^U^C^E^D.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,COM,NOLIST

      F^O^R^M^A^T@D  ^C^O^M^P^I^L^E^R

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^O^M^P^I^L^E^R ^S^P^E^C^I^F^I^E^S ^W^H^I^C^H ^C^O^M^P^I^L^E^R ^T^O ^U^S^E.  I^F ^C^O^M^P^I^L^E^R ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S CC.  T^H^E ^P^A^R^A^M^E^T^E^R ^C^O^M^P^I^L^E^R ^H^A^S ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^V^A^L^U^E^S@D

         ^C^O^M^P^I^L^E^R                         M^E^A^N^I^N^G
         --------                         -------
         CC       C^O^M^P^I^L^E^S ^P^R^O^G^R^A^M^S ^F^O^R ^E^X^E^C^U^T^I^O^N ^O^N ^A CYBER 170-^T^Y^P^E ^C^O^M^P^U^T^E^R.
                  T^H^I^S ^I^S ^T^H^E ^D^E^F^A^U^L^T.

         CI       C^O^M^P^I^L^E^S ^P^R^O^G^R^A^M^S ^F^O^R ^E^X^E^C^U^T^I^O^N ^O^N ^A CYBER 180-^T^Y^P^E ^C^O^M^P^U^T^E^R.

         CP       C^O^M^P^I^L^E^S ^P^R^O^G^R^A^M^S ^I^N UCSD P-^C^O^D^E.
.HELP,CHK,NOLIST

      F^O^R^M^A^T@D  CHK=^C1^C2^C3

      T^H^E ^P^A^R^A^M^E^T^E^R CHK ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^U^N ^T^I^M^E ^C^H^E^C^K^S ^W^H^E^N ^T^H^E ^C^O^M^P^I^L^E^R ^I^S ^T^O
      ^B^E ^G^E^N^E^R^A^T^E^D.  I^F CHK=NO, ^N^O ^R^U^N ^T^I^M^E ^C^H^E^C^K^S ^A^R^E ^G^E^N^E^R^A^T^E^D.  A^N^Y
      ^C^O^M^B^I^N^A^T^I^O^N ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D.  I^F CHK ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S CHK=NRS.

         ^C                             M^E^A^N^I^N^G
         -                             -------
         N       G^E^N^E^R^A^T^E^S ^R^U^N ^T^I^M^E ^C^H^E^C^K^S ^F^O^R ^D^E^R^E^F^E^R^E^N^C^E ^O^F NIL ^P^O^I^N^T^E^R.

         R       G^E^N^E^R^A^T^E^S ^R^U^N ^T^I^M^E ^C^H^E^C^K^S ^F^O^R ^V^A^L^U^E ^R^A^N^G^E^S.

         S       G^E^N^E^R^A^T^E^S ^R^U^N ^T^I^M^E ^C^H^E^C^K^S ^F^O^R ^S^U^B^S^C^R^I^P^T ^R^A^N^G^E^S.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^P1^P2...^P^N

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^H^O^W ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^I^S ^T^O ^B^E ^G^E^N^E^R^A^T^E^D.  A^N^Y
      ^C^O^M^B^I^N^A^T^I^O^N ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^O^F ^P ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D.  I^F LO=NO,
      ^N^O ^L^I^S^T^I^N^G ^I^S ^P^R^O^D^U^C^E^D.  I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=S.

         ^P                                  M^E^A^N^I^N^G
         -                                  -------
         A       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^M^A^P ^O^F ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^B^L^O^C^K ^S^T^R^U^C^T^U^R^E ^A^N^D
                 ^S^T^A^C^K ^I^S ^T^O ^B^E ^P^R^O^D^U^C^E^D.

         R       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^S^Y^M^B^O^L^I^C ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^L^I^S^T^I^N^G ^I^S ^T^O ^B^E
                 ^P^R^O^D^U^C^E^D.

         RA      S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^S^Y^M^B^O^L^I^C ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^L^I^S^T^I^N^G ^O^F ^A^L^L
                 ^P^R^O^G^R^A^M ^E^N^T^I^T^I^E^S ^I^S ^T^O ^B^E ^P^R^O^D^U^C^E^D ^W^H^E^T^H^E^R ^T^H^E ^E^N^T^I^T^I^E^S ^A^R^E
                 ^R^E^F^E^R^E^N^C^E^D ^O^R ^N^O^T.

         S       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^L^I^S^T^I^N^G ^O^F ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^I^S ^T^O ^B^E
                 ^P^R^O^D^U^C^E^D.

         F       S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^F^U^L^L ^L^I^S^T^I^N^G ^I^S ^T^O ^B^E ^P^R^O^D^U^C^E^D (^S^E^L^E^C^T^S S, A,
                 ^A^N^D R).

         O       S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^L^I^S^T^I^N^G ^S^H^O^U^L^D ^I^N^C^L^U^D^E ^T^H^E ^G^E^N^E^R^A^T^E^D ^O^B^J^E^C^T
                 ^C^O^D^E ^I^N ^A^N ^A^S^S^E^M^B^L^E^R-^L^I^K^E ^F^O^R^M^A^T.

         W       S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^L^I^S^T^I^N^G ^O^F ^W^A^R^N^I^N^G ^D^I^A^G^N^O^S^T^I^C ^M^E^S^S^A^G^E^S ^I^S ^T^O
                 ^B^E ^S^U^P^P^R^E^S^S^E^D.

         X       W^O^R^K^S ^I^N ^C^O^N^J^U^C^T^I^O^N ^W^I^T^H ^T^H^E LISTEXT ^D^I^R^E^C^T^I^V^E ^S^U^C^H ^T^H^A^T
                 ^L^I^S^T^I^N^G^S ^C^A^N ^B^E ^E^X^T^E^R^N^A^L^L^Y ^C^O^N^T^R^O^L^L^E^D ^V^I^A ^T^H^E ^C^O^M^P^I^L^E^R ^C^A^L^L
                 ^S^T^A^T^E^M^E^N^T.
.HELP,DEB,NOLIST

      F^O^R^M^A^T@D  DEBUG=^D^B ^O^R D=^D^B

      T^H^E ^P^A^R^A^M^E^T^E^R DEBUG ^S^P^E^C^I^F^I^E^S ^W^H^I^C^H ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^T^O ^B^E ^I^N ^A^F^F^E^C^T
      ^F^O^R ^T^H^E ^C^O^M^P^I^L^A^T^I^O^N.  I^F ^T^H^E ^K^E^Y^W^O^R^D NODEBUG ^I^S ^U^S^E^D ^I^N^S^T^E^A^D ^O^F DEBUG,
      ^N^O^N^E ^O^F ^T^H^E ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^S^E^L^E^C^T^E^D.  I^F ^D^B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L

      ^I^S DEBUG=SD.  I^F DEBUG ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S NODEBUG.  M^O^R^E ^T^H^A^N
      ^O^N^E ^V^A^L^U^E ^F^O^R ^D^B ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^B^Y ^E^N^C^L^O^S^I^N^G ^T^H^E^M ^I^N ^P^A^R^E^N^T^H^E^S^E^S@D
      DEBUG=(SD,DS).

         ^D^B                                M^E^A^N^I^N^G
         --                                -------
         SD       S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^I^N^C^L^U^D^E^S ^S^Y^M^B^O^L ^T^A^B^L^E ^I^N^F^O^R^M^A^T^I^O^N
                  ^I^N ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^F^I^L^E ^F^O^R ^U^S^E ^B^Y ^T^H^E CYBIL ^I^N^T^E^R^A^C^T^I^V^E
                  ^D^E^B^U^G^G^E^R.

         FD       S^P^E^C^I^F^I^E^S ^T^H^E ^S^A^M^E ^C^O^N^D^I^T^I^O^N^S ^A^S SD ^A^N^D ^S^T^Y^L^I^Z^E^S ^T^H^E
                  ^G^E^N^E^R^A^T^E^D ^C^O^D^E ^T^O ^P^R^O^V^I^D^E ^A ^S^T^E^P ^F^A^C^I^L^I^T^Y ^W^H^E^N ^U^S^I^N^G ^T^H^E
                  ^S^Y^M^B^O^L^I^C ^D^E^B^U^G^G^E^R.

         DS       S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^D^E^B^U^G^G^I^N^G ^S^T^A^T^E^M^E^N^T^S ^B^E^T^W^E^E^N NOCOMPILE
                  ^A^N^D COMPILE ^D^I^R^E^C^T^I^V^E^S ^A^R^E ^T^O ^B^E ^C^O^M^P^I^L^E^D.  T^H^E ^D^E^F^A^U^L^T
                  ^I^S ^T^H^A^T ^T^H^E^S^E ^S^T^A^T^E^M^E^N^T^S ^A^R^E ^S^K^I^P^P^E^D.
.HELP,PAD,NOLIST

      F^O^R^M^A^T@D  PAD=^P^A^D

      T^H^E ^P^A^R^A^M^E^T^E^R PAD ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^N^O-^O^P^S ^B^E^T^W^E^E^N ^M^A^C^H^I^N^E
      ^I^N^S^T^R^U^C^T^I^O^N^S.  I^F PAD ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O ^N^O-^O^P^S ^B^E^T^W^E^E^N
      ^I^N^S^T^R^U^C^T^I^O^N^S.
.HELP,OPT,NOLIST

      F^O^R^M^A^T@D  OPT=^N

      T^H^E ^P^A^R^A^M^E^T^E^R OPT ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^P^T^I^M^I^Z^A^T^I^O^N ^L^E^V^E^L^S ^T^O ^B^E ^U^S^E^D ^I^N ^T^H^E
      ^G^E^N^E^R^A^T^E^D ^C^O^D^E.  I^F OPT ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OPT=0.  ^N ^H^A^S ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S@D

         ^N                        M^E^A^N^I^N^G
         -                        -------
         0       M^A^I^N^T^A^I^N^S ^C^O^N^S^T^A^N^T ^V^A^L^U^E^S ^I^N ^T^H^E ^R^E^G^I^S^T^E^R^S.

         1       M^A^I^N^T^A^I^N^S ^L^O^C^A^L ^V^A^R^I^A^B^L^E^S ^I^N ^T^H^E ^R^E^G^I^S^T^E^R^S.

         2       E^L^I^M^I^N^A^T^E^S ^R^E^D^U^N^D^A^N^T ^M^E^M^O^R^Y ^R^E^F^E^R^E^N^C^E^S ^A^N^D ^C^O^M^M^O^N
                 ^S^U^B^E^X^P^R^E^S^S^I^O^N^S.
.HELP,MES,NOLIST

      F^O^R^M^A^T@D  ^M^E^S^S^A^G^E^S

      T^H^E ^P^A^R^A^M^E^T^E^R ^M^E^S^S^A^G^E^S ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^K^E^Y^W^O^R^D MSG ^E^N^A^B^L^E^S ^T^H^E
      ^G^E^N^E^R^A^T^I^O^N ^O^F ^I^N^F^O^R^M^A^T^I^V^E ^M^E^S^S^A^G^E^S.  NOMSG ^I^N^H^I^B^I^T^S ^T^H^E ^G^E^N^E^R^A^T^I^O^N ^O^F
      ^T^H^E^S^E ^M^E^S^S^A^G^E^S.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,DAYFILE*I
,L[O^U^T^P^U^T ^F^I^L^E ^N^A^M^E]=(*F,*N=OUTPUT)
,FR[C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G ^T^O ^S^E^A^R^C^H ^F^O^R]=(*A,*N=$R61LRWFA$)
,OP[S^E^A^R^C^H ^O^P^T^I^O^N^S]=(T,M,I,F,*N=)
,PD[P^R^I^N^T ^D^E^N^S^I^T^Y]=(3,4,6,8,*N=6)
,PL[P^A^G^E ^S^I^Z^E]=(*S2(0123456789),*N=)
,I[D^A^Y^F^I^L^E ^T^O ^U^S^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DAYFILE,L=^L^F^N,FR=^S^T^R^I^N^G,OP=^O^P,PD=^P^D,PL=^P^L,I=^I^N^F^I^L^E.

      T^H^E DAYFILE ^C^O^M^M^A^N^D ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^W^R^I^T^E ^T^H^E ^J^O^B'^S
      ^D^A^Y^F^I^L^E ^T^O ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D.
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^I^S ^I^S ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^D^A^Y^F^I^L^E ^I^S ^T^O ^B^E ^W^R^I^T^T^E^N. (T^H^E DAYFILE
      ^C^O^M^M^A^N^D ^C^R^E^A^T^E^S ^A ^L^O^C^A^L ^F^I^L^E ^B^Y ^T^H^I^S ^N^A^M^E.)  P^A^G^I^N^A^T^I^O^N ^W^I^L^L ^O^C^C^U^R ^I^F
      ^T^H^E ^F^I^L^E ^N^A^M^E ^I^S OUTPUT ^O^R ^I^F ^T^H^E PD ^O^R PL ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D.  I^F
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,FR,NOLIST

      F^O^R^M^A^T@D  FR=^S^T^R^I^N^G

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G ^F^O^R ^W^H^I^C^H ^A ^S^E^A^R^C^H ^I^S
      ^T^O ^B^E ^M^A^D^E ^I^N ^T^H^E ^D^A^Y^F^I^L^E.  (T^H^E OP=^O^P ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^E^L^D
      ^T^O ^B^E ^S^E^A^R^C^H^E^D ^W^I^T^H^I^N ^T^H^E ^S^T^R^I^N^G.) T^H^E  ^S^P^E^C^I^F^I^E^D ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N
      ^W^I^T^H ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^I^N ^T^H^E ^F^I^E^L^D ^T^O ^B^E ^S^E^A^R^C^H^E^D.  T^H^E ^T^I^M^E ^B^E^G^I^N^S
      ^W^I^T^H ^A ^B^L^A^N^K.

      I^F ^T^H^E ^S^T^R^I^N^G ^C^O^N^T^A^I^N^S ^C^H^A^R^A^C^T^E^R^S ^O^T^H^E^R ^T^H^A^N ^L^E^T^T^E^R^S ^A^N^D ^N^U^M^B^E^R^S (^S^U^C^H
      ^A^S ^B^L^A^N^K^S), ^I^T ^M^U^S^T ^B^E ^E^N^C^L^O^S^E^D ^B^Y $ ^D^E^L^I^M^I^T^E^R^S.

      I^F ^T^H^E ^S^T^R^I^N^G ^I^S ^F^O^U^N^D, ^T^H^E ^P^O^R^T^I^O^N ^O^F ^T^H^E ^D^A^Y^F^I^L^E ^F^O^L^L^O^W^I^N^G ^T^H^E ^L^A^S^T
      ^O^C^C^U^R^R^E^N^C^E ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^S^T^R^I^N^G ^I^S ^O^U^T^P^U^T.  I^F ^T^H^E ^S^T^R^I^N^G ^I^S ^N^O^T
      ^F^O^U^N^D, ^A^N ^I^N^F^O^R^M^A^T^I^V^E ^M^E^S^S^A^G^E ^A^N^D ^T^H^E ^E^N^T^I^R^E ^D^A^Y^F^I^L^E ^I^S ^O^U^T^P^U^T.

      D^E^F^A^U^L^T@D  O^U^T^P^U^T ^E^N^T^I^R^E ^D^A^Y^F^I^L^E
.HELP,OP,NOLIST

      F^O^R^M^A^T@D  OP=^O^P

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^E^L^E^C^T^S ^T^H^E ^S^E^A^R^C^H ^O^P^T^I^O^N (^S^I^N^G^L^E ^C^H^A^R^A^C^T^E^R).

      E^N^T^E^R     T^O ^S^P^E^C^I^F^Y

      T         S^E^A^R^C^H ^T^I^M^E ^F^I^E^L^D ^F^O^R ^S^T^R^I^N^G ^S^P^E^C^I^F^I^E^D ^B^Y FR=^S^T^R^I^N^G.
      M         S^E^A^R^C^H ^M^E^S^S^A^G^E ^F^I^E^L^D ^F^O^R ^S^T^R^I^N^G ^S^P^E^C^I^F^I^E^D ^B^Y FR=^S^T^R^I^N^G.
      I         I^N^C^R^E^M^E^N^T^A^L ^D^U^M^P (^D^A^Y^F^I^L^E ^P^R^I^N^T^E^D ^F^R^O^M ^P^O^I^N^T ^O^F ^L^A^S^T
                ^D^A^Y^F^I^L^E ^C^O^M^M^A^N^D).
      F         F^U^L^L ^D^U^M^P.

      D^E^F^A^U^L^T@D OP=I  (^I^F OP ^A^N^D FR ^A^R^E ^N^O^T ^S^P^E^C^I^F^I^E^D).
               OP=M  (^I^F OP ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D ^A^N^D FR ^I^S ^S^P^E^C^I^F^I^E^D).

.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^P^D

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y (^T^H^R^E^E, ^F^O^U^R, ^S^I^X, ^O^R ^E^I^G^H^T
      ^P^R^I^N^T^E^D ^L^I^N^E^S ^P^E^R ^I^N^C^H).  A^C^C^E^P^T^A^B^L^E ^V^A^L^U^E^S ^A^R^E 3, 4, 6, ^O^R 8.

      D^E^F^A^U^L^T@D 6.
.HELP,PL,NOLIST

      F^O^R^M^A^T@D  PL=^P^L

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^P^A^G^E ^L^E^N^G^T^H ^I^N ^T^O^T^A^L ^N^U^M^B^E^R ^O^F ^L^I^N^E^S,
      ^P^R^I^N^T^E^D ^A^N^D ^B^L^A^N^K.  N^O^R^M^A^L ^P^A^G^E ^L^E^N^G^T^H ^I^S 60.  E^N^T^E^R ^A ^D^E^C^I^M^A^L
      ^V^A^L^U^E.

      D^E^F^A^U^L^T@D  D^E^T^E^R^M^I^N^E^D ^F^R^O^M ^P^R^I^N^T ^D^E^N^S^I^T^Y ^A^N^D ^S^Y^S^T^E^M ^P^A^G^E ^S^I^Z^E.
.HELP,I,NOLIST

      F^O^R^M^A^T@D  I=^I^N^F^I^L^E

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^A ^D^A^Y^F^I^L^E ^T^O ^B^E ^U^S^E^D
      ^F^O^R ^I^N^P^U^T.  (A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D T^H^E ^A^C^T^I^V^E ^D^A^Y^F^I^L^E.
.ENDHELP
.IF($FR$.NE.$R61LRWFA$,L1)
.EX.  $DAYFILE(#L=L,#FR=FR,#OP=OP,#PD=PD,#PL=PL,#I=I)
.ELSE(L1)
.EX.  $DAYFILE(#L=L,#OP=OP,#PD=PD,#PL=PL,#I=I)
.ENDIF(L1)
*WEOR
.PROC,DEBUG*I
,P[D^E^B^U^G ^M^O^D^E]=(OFF,ON,RESUME,*N=ON)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D DEBUG,^P.

      T^H^E DEBUG ^C^O^M^M^A^N^D ^A^C^T^I^V^A^T^E^S ^O^R ^T^E^R^M^I^N^A^T^E^S ^T^H^E CYBER I^N^T^E^R^A^C^T^I^V^E
      D^E^B^U^G F^A^C^I^L^I^T^Y.  T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^A^C^T^I^V^A^T^E ^T^H^E D^E^B^U^G F^A^C^I^L^I^T^Y.
.ENDHELP
.EX.  $DEBUG,P.
$REVERT(NOLIST)
*WEOR
.PROC,DEFINE*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/CT[F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y]=(P,PR,PRIVATE,S,SPRIV,
                                         PU,PUBLIC,*N=P)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,M[F^I^L^E ^A^C^C^E^S^S]=(E,EXECUTE,R,READ,RA,READAP,M,MODIFY,W,WRITE,
                              RM,READMD,A,APPEND,N,NULL,*N=READ)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K ^N^A^M^E]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,S[I^N^T^E^G^E^R ^N^U^M^B^E^R ^O^F PRU^S ^R^E^Q^U^E^S^T^E^D]=(*S6(0123456789),*N=)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
,AL[S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L]=(*F,LVL0,LVL1,LVL2,LVL3,LVL4,LVL5,LVL6,LVL7,*N=)
,AC[G^R^A^N^T CATLIST ^P^E^R^M^I^S^S^I^O^N]=(YES=Y,Y,NO=N,N,*N=N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DEFINE,^L^F^N=^P^F^N/CT=^C^T,PW=^P^W,M=^M,PN=^P^N,R=^R,NA,S=^S,WB,AL=^L^E^V^E^L,
                 AC=^A^C.

      T^H^E DEFINE ^C^O^M^M^A^N^D ^C^A^N ^C^R^E^A^T^E ^A^N ^E^M^P^T^Y ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E.  I^T ^C^A^N ^A^L^S^O ^C^H^A^N^G^E ^A ^F^I^L^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^Y^P^E ^I^N^T^O ^A
      ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E, ^I^F ^T^H^E ^F^I^L^E ^R^E^S^I^D^E^S ^O^N ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^D^E^V^I^C^E.
      (T^O ^A^S^S^I^G^N ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^O ^Y^O^U^R ^J^O^B, ^U^S^E ^T^H^E ATTACH
      ^C^O^M^M^A^N^D.)
.HELP,LFN,NOLIST

      F^O^R^M^A^T@D  ^L^F^N

      S^P^E^C^I^F^Y ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E (1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S) ^I^F ^Y^O^U
      ^W^I^S^H ^T^O ^R^E^F^E^R^E^N^C^E ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^B^Y ^A ^D^I^F^F^E^R^E^N^T
      ^L^O^C^A^L ^F^I^L^E ^N^A^M^E.

      D^E^F^A^U^L^T@D T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E (^L^F^N) ^W^I^L^L ^B^E ^T^H^E ^S^A^M^E ^A^S ^T^H^E ^P^E^R^M^A^N^E^N^T
               ^F^I^L^E ^N^A^M^E (^P^F^N).
.HELP,PFN,NOLIST

      F^O^R^M^A^T@D  ^P^F^N

      S^P^E^C^I^F^Y ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E (1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S) ^W^H^E^N
      ^Y^O^U ^W^I^S^H ^T^O ^C^R^E^A^T^E ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^O^R ^T^O ^C^H^A^N^G^E ^A^N
      ^E^X^I^S^T^I^N^G ^L^O^C^A^L ^F^I^L^E ^T^O ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E.

      N^O^T^E@D T^H^E DEFINE ^C^O^M^M^A^N^D ^C^A^N ^C^H^A^N^G^E ^A^N ^E^X^I^S^T^I^N^G ^L^O^C^A^L ^F^I^L^E ^T^O ^A
            ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^O^N^L^Y ^I^F ^Y^O^U^R ^S^Y^S^T^E^M ^S^T^O^R^E^S ^L^O^C^A^L ^A^N^D
            ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S ^O^N ^T^H^E ^S^A^M^E ^D^I^S^K ^P^A^C^K.
.HELP,PN,NOLIST

      F^O^R^M^A^T@D  PN=^P^N

      T^H^I^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN=^P^N) ^O^N ^W^H^I^C^H ^T^H^E ^D^I^R^E^C^T
      ^A^C^C^E^S^S ^F^I^L^E ^I^S ^T^O ^R^E^S^I^D^E.  A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E ^M^U^S^T ^B^E
      ^S^P^E^C^I^F^I^E^D ^O^N^L^Y ^I^F ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^I^S ^T^O ^R^E^S^I^D^E ^O^N ^A^N
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^E^N^T^E^R ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E, ^T^H^E ^F^I^L^E
               ^R^E^S^I^D^E^N^C^E ^I^S ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E PR, R, ^A^N^D S ^P^A^R^A^M^E^T^E^R^S.
.HELP,CT,NOLIST

      F^O^R^M^A^T@D  CT=^C^T

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@

      ^C^T                            D^E^S^C^R^I^P^T^I^O^N
      --                            -----------
      P        P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^O^N^L^Y ^B^Y ^T^H^E^I^R ^C^R^E^A^T^O^R
               ^A^N^D ^B^Y ^T^H^O^S^E ^G^R^A^N^T^E^D ^E^X^P^L^I^C^I^T ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N ^B^Y ^T^H^E
               ^F^I^L^E ^C^R^E^A^T^O^R (^U^S^I^N^G ^T^H^E PERMIT ^C^O^M^M^A^N^D).

      S        S^E^M^I^P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A ^U^S^E^R ^W^H^O
               ^K^N^O^W^S ^T^H^E ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E, ^A^N^D ^P^A^S^S^W^O^R^D ^A^N^D ^W^H^O ^H^A^S
               ^N^O^T ^B^E^E^N ^E^X^P^L^I^C^I^T^L^Y ^D^E^N^I^E^D ^P^E^R^M^I^S^S^I^O^N ^T^O ^T^H^E ^F^I^L^E (M=NULL
               ^P^A^R^A^M^E^T^E^R ^O^N ^A PERMIT ^C^O^M^M^A^N^D).

      PU       P^U^B^L^I^C ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A^L^L ^U^S^E^R^S ^W^H^O ^K^N^O^W ^T^H^E
               ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E ^A^N^D ^P^A^S^S^W^O^R^D.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^R^D^S ^T^H^E
               ^N^U^M^B^E^R ^O^F ^T^I^M^E^S ^T^H^E ^F^I^L^E ^W^A^S ^A^C^C^E^S^S^E^D ^A^N^D ^T^H^E ^D^A^T^E ^A^N^D ^T^I^M^E
               ^O^F ^T^H^E ^L^A^S^T ^A^C^C^E^S^S, ^B^U^T ^D^O^E^S ^N^O^T ^R^E^C^O^R^D ^U^S^E^R ^N^A^M^E^S.

      D^E^F^A^U^L^T@D P
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^P^W

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E 1 ^T^O 7 ^C^H^A^R^A^C^T^E^R (^A^L^P^H^A^N^U^M^E^R^I^C)
      ^P^A^S^S^W^O^R^D ^T^H^A^T ^O^T^H^E^R ^U^S^E^R^S ^M^U^S^T ^S^P^E^C^I^F^Y ^T^O ^A^C^C^E^S^S ^T^H^E ^F^I^L^E.

      D^E^F^A^U^L^T@D N^O ^P^A^S^S^W^O^R^D.
.HELP,R,NOLIST

      F^O^R^M^A^T@D  R=^R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^O^N ^W^H^I^C^H ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^I

      ^R^E^S^I^D^E.  ^X ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^D^I^S^K ^S^P^I^N^D^L^E^S ^T^H^E ^P^A^C^K ^O^C^C^U^P^I^E^S.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      D^E^F^A^U^L^T@D  I^F ^N^O ^D^E^V^I^C^E ^T^Y^P^E ^O^R ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E ^I^S ^S^P^E^C^I^F^I^E^D
                ^B^Y ^T^H^E PN ^P^A^R^A^M^E^T^E^R ^O^R ^A ^P^R^E^V^I^O^U^S PACKNAM ^C^O^M^M^A^N^D, ^T^H^E ^F^I^L^E
                ^I^S ^D^E^F^I^N^E^D ^O^N ^A ^F^A^M^I^L^Y ^D^E^V^I^C^E.
.HELP,M,NOLIST

      F^O^R^M^A^T@D  M=^M

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E ^P^E^R^M^I^T^T^E^D ^T^O ^O^T^H^E^R ^U^S^E^R^S.

      E^N^T^E^R   T^O ^A^L^L^O^W ^O^T^H^E^R ^U^S^E^R^S ^T^O ^A^T^T^A^C^H ^F^I^L^E ^I^N ^T^H^E ^F^O^L^L^O^W^I^N^G ^M^O^D^E^S@D

      E        E^X^E^C^U^T^E.
      R        R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RA       R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RM       R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      A        A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      M        M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      W        W^R^I^T^E, ^M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R
               ^E^X^E^C^U^T^E.
      N        N^O^N^E.

      D^E^F^A^U^L^T@D  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D ^A^N^D CT=S ^O^R CT=PU, ^T^H^E^N
                ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^E^F^A^U^L^T^S ^T^O R.
.HELP,AL,NOLIST

      F^O^R^M^A^T@D  AL=^L^E^V^E^L

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U ^W^A^N^T ^A^S^S^I^G^N^E^D
      ^T^O ^Y^O^U^R ^J^O^B.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^T^H^E ^L^E^V^E^L ^M^A^Y ^B^E ^O^N^E ^O^F ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, LVL7.

      D^E^F^A^U^L^T@D  T^H^E ^C^U^R^R^E^N^T ^J^O^B ^A^C^C^E^S^S ^L^E^V^E^L.
.HELP,NA,NOLIST

      F^O^R^M^A^T@D  NA

      S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  I^F NA ^I^S ^S^P^E^C^I^F^I^E^D, ^P^R^O^C^E^S^S^I^N^G
      ^E^R^R^O^R^S ^I^N DEFINE ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.  E^N^T^E^R NA; ^O^T^H^E^R^W^I^S^E
      ^O^M^I^T.

      D^E^F^A^U^L^T@D  E^R^R^O^R^S ^I^N DEFINE ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,S,NOLIST

      F^O^R^M^A^T@D  S=^S

      S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^C^I^M^A^L ^N^U^M^B^E^R ^O^F PRU^S ^R^E^Q^U^E^S^T^E^D ^F^O^R ^T^H^E ^F^I^L^E.  T^H^I^S
      ^E^N^S^U^R^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^I^S ^A^S^S^I^G^N^E^D ^T^O ^A ^D^E^V^I^C^E ^T^H^A^T ^H^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D
      ^S^P^A^C^E ^A^V^A^I^L^A^B^L^E ^A^T ^T^H^E ^T^I^M^E ^T^H^E ^F^I^L^E ^I^S ^D^E^F^I^N^E^D.

      D^E^F^A^U^L^T@D  S^I^Z^E ^N^O^T ^C^O^N^S^I^D^E^R^E^D ^W^H^E^N ^A^S^S^I^G^N^I^N^G ^A ^F^I^L^E ^T^O ^A ^D^E^V^I^C^E.
.HELP,WB,NOLIST

      F^O^R^M^A^T@D  WB

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^A^L^L^O^W^S ^Y^O^U^R ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G
      ^O^F ^A ^D^I^S^K ^P^A^C^K, ^B^U^T ^D^O^E^S ^N^O^T ^P^R^E^V^E^N^T ^Y^O^U^R ^J^O^B ^F^R^O^M ^A^B^O^R^T^I^N^G
      ^O^N ^O^T^H^E^R ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S.  E^N^T^E^R WB ^F^O^R ^W^A^I^T ^I^F ^B^U^S^Y; ^O^T^H^E^R^W^I^S^E
      ^O^M^I^T.  (Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).)

      D^E^F^A^U^L^T@D  Y^O^U^R ^J^O^B ^W^I^L^L ^A^B^O^R^T ^I^F ^T^H^E ^R^E^Q^U^E^S^T^E^D ^D^I^S^K ^P^A^C^K ^I^S
                ^U^N^A^V^A^I^L^A^B^L^E.
.HELP,AC,NOLIST

      F^O^R^M^A^T@D  AC=^A^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^M^A^Y ^O^B^T^A^I^N
      ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^T^H^E ^F^I^L^E ^U^S^I^N^G CATLIST.  V^A^L^U^E^S ^A^R^E Y (^Y^E^S)
      ^A^N^D N (^N^O).

      D^E^F^A^U^L^T@D  N
.ENDHELP
  .IF($LFN$.EQ.$$,L1)
  .EX.  $DEFINE(PFN/#CT=CT,#PW=PW,#M=M,#PN=PN,#R=R,#S=S_NA_WB,#AC=AC,#AL=AL)
.ELSE(L1)
  .EX.  $DEFINE(LFN=PFN/#CT=CT,#PW=PW,#M=M,#PN=PN,#R=R,#S=S_NA_WB,#AC=AC,#AL=AL)
.ENDIF(L1)
*WEOR
.PROC,DELETE*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DELETE,^C1,^C2,...,^C^N,/^S^T^R^I^N^G/

      Y^O^U ^C^A^N ^D^E^L^E^T^E ^S^P^E^C^I^F^I^E^D ^L^I^N^E^S ^F^R^O^M ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^U^S^I^N^G ^T^H^E DELETE
      ^C^O^M^M^A^N^D.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^O^R ^T^H^E ^S^T^R^I^N^G
      ^P^A^R^A^M^E^T^E^R ^O^R ^B^O^T^H.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^D^O ^N^O^T ^E^N^T^E^R ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^

      ^A^L^L ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^R^E ^D^E^L^E^T^E^D.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^N^D ^D^O ^N^O^T ^E^N^T^E^R ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^

      ^A^L^L ^L^I^N^E^S ^I^N ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^S^P^E^C^I^F^I^E^D ^S^T^R^I^N^G ^A^R^E ^D^E^L^E^T^E^D.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^B^O^T^H ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R, ^O^N^L^Y
      ^T^H^O^S^E ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^S^T^R^I^N^G
      ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^R^E ^D^E^L^E^T^E^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DETACH*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^N^C^CD

      T^H^E D^E^T^A^C^H ^C^O^M^M^A^N^D ^D^E^T^A^C^H^E^S ^A ^T^E^R^M^I^N^A^L ^J^O^B ^F^R^O^M ^T^H^E ^T^E^R^M^I^N^A^L.
      T^O ^D^E^T^A^C^H ^T^H^E ^J^O^B ^D^U^R^I^N^G ^O^U^T^P^U^T, ^F^I^R^S^T ^E^N^T^E^R ^T^H^E ^I^N^T^E^R^R^U^P^T^I^O^N
      ^S^E^Q^U^E^N^C^E ^A^N^D ^T^H^E^N ^E^N^T^E^R ^N^C^CD; ^W^H^E^R^E ^N^C^C ^I^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L
      ^C^H^A^R^A^C^T^E^R ^D^E^F^I^N^E^D ^F^O^R ^T^H^E ^T^E^R^M^I^N^A^L.

.ENDHELP.
$REVERT(NOLIST)
*WEOR
.PROC,DIAL*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST
      F^O^R^M^A^T@D  DIAL,^J^S^N,^S^S^S

      T^H^E DIAL ^C^O^M^M^A^N^D ^S^E^N^D^S ^A ^O^N^E-^L^I^N^E ^M^E^S^S^A^G^E ^T^O ^A^N^O^T^H^E^R ^T^E^R^M^I^N^A^L ^U^S^E^R.

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^T^E^R^M^I^N^A^L
      ^T^O ^R^E^C^E^I^V^E ^T^H^E ^M^E^S^S^A^G^E.

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^S^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^N^E-^L^I^N^E ^M^E^S^S^A^G^E.

      T^H^E DIAL ^C^O^M^M^A^N^D ^C^A^N ^B^E ^E^N^T^E^R^E^D ^O^N^L^Y ^I^F ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M ^I^S ^A^C^T^I^V^E.
      T^H^E ^T^E^R^M^I^N^A^L ^T^O ^R^E^C^E^I^V^E ^T^H^E ^M^E^S^S^A^G^E ^C^A^N ^H^A^V^E ^A^N^Y ^S^U^B^S^Y^S^T^E^M ^A^C^T^I^V^E;  ^I^T
      ^N^E^E^D ^N^O^T ^B^E ^U^N^D^E^R ^T^H^E ACCESS ^S^U^B^S^Y^S^T^E^M ^O^R ^H^A^V^E ACCESS ^V^A^L^I^D^A^T^I^O^N.

      Y^O^U ^C^A^N ^D^E^T^E^R^M^I^N^E ^T^H^E ^A^P^P^R^O^P^R^I^A^T^E ^J^S^N ^B^Y ^U^S^I^N^G ^T^H^E WHATJSN ^C^O^M^M^A^N^D.
      I^F ^T^H^E ^T^E^R^M^I^N^A^L ^S^P^E^C^I^F^I^E^D ^I^S ^C^U^R^R^E^N^T^L^Y ^R^E^C^E^I^V^I^N^G ^O^U^T^P^U^T ^O^R ^H^A^S ^A^N ^I^N^P^U^T
      ^R^E^Q^U^E^S^T ^O^U^T^S^T^A^N^D^I^N^G, ^T^H^E ^M^E^S^S^A^G^E ^I^S ^L^O^S^T.  N^O ^F^U^R^T^H^E^R ^A^T^T^E^M^P^T ^T^O
      ^T^R^A^N^S^M^I^T ^T^H^E ^M^E^S^S^A^G^E ^I^S ^M^A^D^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DISPLAY*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DISPLAY,^E^X^P^R^E^S^S^I^O^N1,^E^X^P^R^E^S^S^I^O^N2,...,^E^X^P^R^E^S^S^I^O^N^N

      T^H^E DISPLAY ^C^O^M^M^A^N^D ^E^V^A^L^U^A^T^E^S ^A^N ^E^X^P^R^E^S^S^I^O^N ^A^N^D ^S^E^N^D^S ^T^H^E ^R^E^S^U^L^T^S ^T^O
      ^T^H^E ^J^O^B DAYFILE ^I^N ^B^O^T^H ^D^E^C^I^M^A^L ^A^N^D ^O^C^T^A^L ^F^O^R^M.

      N^O^T^E@D  T^H^I^S ^C^O^M^M^A^N^D ^P^E^R^F^O^R^M^S ^O^N^L^Y ^I^N^T^E^G^E^R ^O^P^E^R^A^T^I^O^N^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DMB*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DMB,^O^R^D^I^N^A^L,^X^M^E^M^O^R^Y.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E DMB ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E DMB ^C^O^M^M^A^N^D ^G^E^N^E^R^A^T^E^S ^A ^B^I^N^A^R^Y ^D^U^M^P ^O^F ^T^H^E ^E^X^C^H^A^N^G^E ^P^A^C^K^A^G^E,
      ^C^E^N^T^R^A^L ^M^E^M^O^R^Y, ^A^N^D ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^W^I^T^H ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.  F^I^L^E
      ZZZZDMB ^R^E^C^E^I^V^E^S ^T^H^E ^D^U^M^P ^A^N^D ^I^S ^N^O^T ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^O^R ^A^F^T^E^R ^T^H^E
      ^D^U^M^P.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DMD*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DMD,^F^W^A,^L^W^A.
               DMD,^L^W^A.
               DMD.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E DMD ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E DMD ^C^O^M^M^A^N^D ^P^R^O^D^U^C^E^S ^A ^D^U^M^P ^S^I^M^I^L^I^A^R ^T^O ^T^H^A^T ^O^F ^T^H^E DMP ^C^O^M^M^A^N^D,
      ^B^U^T ^A^D^D^S ^T^H^E ^D^I^S^P^L^A^Y ^C^O^D^E ^E^Q^U^I^V^A^L^E^N^C^E ^T^O ^T^H^E ^R^I^G^H^T ^O^F ^T^H^E ^O^C^T^A^L
      ^R^E^P^R^E^S^E^N^T^A^T^I^O^N^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DMDECS*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DMDECS,^F^W^A,^L^W^A.
               DMDECS,^L^W^A.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E DMDECS ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E DMDECS ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^A ^D^U^M^P ^O^F ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^O^N ^F^I^L^E OUTPUT.
      T^H^E ^D^U^M^P ^I^S ^F^O^U^R ^W^O^R^D^S ^P^E^R ^L^I^N^E ^W^I^T^H ^D^I^S^P^L^A^Y ^C^O^D^E ^E^Q^U^I^V^A^L^E^N^C^E^S ^T^O ^T^H^E
      ^R^I^G^H^T ^O^F ^T^H^E ^O^C^T^A^L ^R^E^P^R^E^S^E^N^T^A^T^I^O^N^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DMP*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DMP,^F^W^A,^L^W^A.
               DMP,^L^W^A.
               DMP.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E DMP ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E DMP ^C^O^M^M^A^N^D ^P^R^O^D^U^C^E^S ^A ^D^U^M^P ^O^F ^T^H^E ^E^X^C^H^A^N^G^E ^P^A^C^K^A^G^E ^A^N^D ^C^E^N^T^R^A^L
      ^M^E^M^O^R^Y.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DMPECS*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DMPECS,^F^W^A,^L^W^A.
               DMPECS,^L^W^A.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E DMPECS ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E DMPECS ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^A ^D^U^M^P ^O^F ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^O^N ^F^I^L^E OUTPUT.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DOCMENT*I
/I[D^I^R^E^C^T^I^V^E ^I^N^P^U^T ^F^I^L^E]=(*N=0,*K=INPUT,*F)
,S[D^A^T^A ^I^N^P^U^T ^F^I^L^E]=(*N=COMPILE,*K=SOURCE,*F)
,L[O^U^T^P^U^T ^F^I^L^E]=(*N=OUTPUT,*K=OUTPUT,*F)
,N[N^U^M^B^E^R ^O^F ^C^O^P^I^E^S]=(*N=1,*K=1,*S6(0123456789))
,T[D^O^C^U^M^E^N^T^A^T^I^O^N ^T^Y^P^E]=(*N=EXT,*K=INT)
,C[K^E^Y ^C^H^A^R^A^C^T^E^R]=(*N=47,*K=03,*S2(01234567B))
,P[N^U^M^B^E^R ^O^F ^P^R^I^N^T ^L^I^N^E^S]=(*N=60,*K=80,*S2(0123456789))
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,TC[L^I^S^T ^T^A^B^L^E ^O^F ^C^O^N^T^E^N^T^S]=(*K=$,TC$,*N=)
,NT[N^E^G^A^T^E ^T^A^B^L^E ^G^E^N^E^R^A^T^O^R]=(*K=$,NT$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DOCMENT,I=^L^F^N1,S=^L^F^N2,L=^L^F^N3,N=^N^N,T=^T^Y^P^E,C=^C^C,P=^P^P,NR,TC,NT.

      T^H^E DOCMENT ^C^O^M^M^A^N^D ^E^X^T^R^A^C^T^S ^E^I^T^H^E^R ^T^H^E ^E^X^T^E^R^N^A^L ^O^R ^I^N^T^E^R^N^A^L
      ^D^O^C^U^M^E^N^T^A^T^I^O^N ^F^R^O^M ^A^N ^A^P^P^R^O^P^R^I^A^T^E^L^Y ^D^O^C^U^M^E^N^T^E^D ^S^O^U^R^C^E ^F^I^L^E.
.HELP,I,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N1

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^T^H^E ^P^A^G^E
      ^F^O^O^T^I^N^G ^I^N^F^O^R^M^A^T^I^O^N.  F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^M^U^S^T ^B^E ^T^H^E ^N^A^M^E ^O^F ^A^N ^E^X^I^S^T^I^N^G ^F^I^L^E.
.HELP,S,NOLIST

      F^O^R^M^A^T@D  S=^L^F^N2

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^S^O^U^R^C^E
      ^S^T^A^T^E^M^E^N^T ^I^M^A^G^E^S ^F^R^O^M ^W^H^I^C^H ^T^O ^E^X^T^R^A^C^T ^T^H^E ^D^O^C^U^M^E^N^T^A^T^I^O^N.  F^I^L^E ^N^A^M^E
      ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^M^U^S^T ^B^E ^T^H^E ^N^A^M^E
      ^O^F ^A^N ^E^X^I^S^T^I^N^G ^F^I^L^E.
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N3

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^O^U^T^P^U^T.  A ^F^I^L^E ^N^A^M^E ^I^S
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  N=^N^N

      T^H^I^S ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^C^O^P^I^E^S ^T^O ^B^E ^M^A^D^E.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
.HELP,T,NOLIST

      F^O^R^M^A^T@D  T=^T^Y^P^E

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^O^C^U^M^E^N^T^A^T^I^O^N ^T^Y^P^E.

      E^N^T^E^R    T^O ^S^P^E^C^I^F^Y

      E^X^T      E^X^T^E^R^N^A^L
      I^N^T      I^N^T^E^R^N^A^L

      D^E^F^A^U^L^T@D  T=EXT
.HELP,C,NOLIST

      F^O^R^M^A^T@D  C=^C^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^K^E^Y ^C^H^A^R^A^C^T^E^R ^F^O^R ^D^O^C^U^M^E^N^T^A^T^I^O^N.

      E^N^T^E^R              T^O ^S^P^E^C^I^F^Y

      47                  *
      3                   C

      D^E^F^A^U^L^T@D  C=47 (*).
.HELP,P,NOLIST

      F^O^R^M^A^T@D  P=^P^P

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^P^R^I^N^T ^L^I^N^E^S ^P^E^R ^P^A^G^E.

      D^E^F^A^U^L^T@D  60
.HELP,NR,NOLIST

      F^O^R^M^A^T@D  NR

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^P^R^E^V^E^N^T^S ^T^H^E ^R^E^W^I^N^D^I^N^G ^O^F ^T^H^E ^S^O^U^R^C^E ^F^I^L^E (S=^L^F^N2).
      T^O ^P^R^E^V^E^N^T ^R^E^W^I^N^D^I^N^G, ^E^N^T^E^R NR; ^T^O ^H^A^V^E ^T^H^E ^S^O^U^R^C^E ^F^I^L^E ^R^E^W^O^U^N^D, ^D^O
      ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  T^H^E ^S^O^U^R^C^E ^F^I^L^E ^I^S ^R^E^W^O^U^N^D.
.HELP,TC,NOLIST

      F^O^R^M^A^T@D  TC

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^L^I^S^T^S ^T^H^E ^T^A^B^L^E ^O^F ^C^O^N^T^E^N^T^S ^O^F ^T^H^E ^S^O^U^R^C^E ^F^I^L^E.  E^N^T^E^R
      TC ^T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  T^H^E ^T^A^B^L^E ^O^F ^C^O^N^T^E^N^T^S ^I^S ^N^O^T ^L^I^S^T^E^D.
.HELP,NT,NOLIST

      F^O^R^M^A^T@D  NT

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^N^E^G^A^T^E^S ^T^H^E ^T^A^B^L^E ^G^E^N^E^R^A^T^O^R.  T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^E^N^T^E^R NT; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D A ^T^A^B^L^E ^I^S ^G^E^N^E^R^A^T^E^D.
.ENDHELP
.EX.  $DOCMENT(#I=I,#S=S,#L=L,#N=N,#T=T,#C=C,#P=P_NR_TC_NT)
*WEOR
.PROC,DROP*I
,JSN[J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E]=
                    (*S4(0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ),*N=)
,DC[D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E]=(PR,PU,PL,IN,EX,WT,ALL,*N=)
,OP[E^X^I^T ^O^R ^R^E^P^R^I^E^V^E ^P^R^O^C^E^S^S^I^N^G]=(YES=R,Y=R,R,NO=,N=,*N=)
,UJN[U^S^E^R ^J^O^B ^N^A^M^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DROP,JSN=^J^S^N,DC=^D^C,OP=R,UJN=^U^J^N.

      T^H^E DROP ^C^O^M^M^A^N^D ^W^I^L^L ^D^R^O^P ^Y^O^U^R ^E^X^E^C^U^T^I^N^G ^J^O^B^S ^O^R ^Q^U^E^U^E^D ^F^I^L^E^S.
.HELP,JSN,NOLIST

      F^O^R^M^A^T@D  JSN=^J^S^N

      E^N^T^E^R ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E ^O^F ^T^H^E ^J^O^B ^T^O ^B^E ^D^R^O^P^P^E^D.  A ^J^S^N ^I^S
      1- ^T^O 4-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^E^N^T^E^R ^A ^J^S^N, ^N^O^N^E ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,DC,NOLIST

      F^O^R^M^A^T@D  DC=^D^C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^J^O^B ^T^O ^B^E ^D^R^O^P^P^E^D.  Y^O^U
      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y DC ^I^F ^N^E^I^T^H^E^R ^T^H^E JSN ^O^R UJN ^W^E^R^E ^S^P^E^C^I^F^I^E^D.  W^H^E^N DC ^I^S
      ^S^P^E^C^I^F^I^E^D, ^A^L^L ^J^O^B^S ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^D^I^S^P^O^S^I^T^I^O^N ^A^R^E ^D^R^O^P^P^E^D.  V^A^L^U^E^S ^F^O

      ^D^I^S^P^O^S^I^T^I^O^N ^A^R^E@D

       ALL   A^L^L ^Y^O^U^R ^J^O^B^S        PR    P^R^I^N^T
       EX    E^X^E^C^U^T^I^N^G            PU    P^U^N^C^H
       IN    I^N^P^U^T                WT    W^A^I^T
       PL    P^L^O^T

      D^E^F^A^U^L^T@D DC=ALL ^I^F JSN ^O^R UJN ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,OP,NOLIST

      F^O^R^M^A^T@D  OP=R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^D^R^O^P ^T^H^E ^S^P^E^C^I^F^I^E^D ^E^X^E^C^U^T^I^N^G
      ^J^O^B^S ^W^I^T^H^O^U^T EXIT ^P^R^O^C^E^S^S^I^N^G ^B^U^T ^W^I^T^H ^S^I^N^G^L^E-^R^E^P^R^I^E^V^E ^P^R^O^C^E^S^S^I^N^G.
      E^N^T^E^R R ^T^O ^S^P^E^C^I^F^Y ^S^I^N^G^L^E-^R^E^P^R^I^E^V^E ^P^R^O^C^E^S^S^I^N^G; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.
.HELP,UJN,NOLIST

      F^O^R^M^A^T@D  UJN=^U^J^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E ^O^F ^T^H^E ^J^O^B ^T^O ^B^E ^D^R^O^P^P^E^D.
      (O^N ^T^H^E DROP ^C^O^M^M^A^N^D, ^Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^J^S^N, ^U^J^N, ^O^R ^B^O^T^H.) A ^U^S^E^R ^J^O^B
      ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^E^N^T^E^R ^A ^U^J^N, ^N^O^N^E ^I^S ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $DROP(#JSN=JSN,#DC=DC,#UJN=UJN,#OP=OP)
*WEOR
.PROC,DROPDS*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/PN [A^U^X^I^L^I^A^R^Y ^D^I^S^K ^P^A^C^K ^N^A^M^E]=(*F,0,*N=)
,R  [D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA [D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB [W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DROPDS,^L^F^N=^P^F^N/PN=^P^N,R=^R,NA,WB.

      I^F ^T^H^E^R^E ^I^S ^A^N ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^C^O^P^Y ^O^F ^Y^O^U^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E, ^T^H^E
      DROPDS ^C^O^M^M^A^N^D ^C^A^N ^B^E ^U^S^E^D ^T^O ^E^R^A^S^E ^T^H^E ^D^I^S^K ^C^O^P^Y ^A^N^D ^A^N^Y ^L^O^C^A^L
      ^C^O^P^I^E^S ^O^F ^T^H^E ^F^I^L^E, ^T^H^U^S ^M^A^K^I^N^G ^T^H^E ^D^I^S^K ^S^T^O^R^A^G^E ^S^P^A^C^E ^A^V^A^I^L^A^B^L^E ^T^O
      ^T^H^E ^S^Y^S^T^E^M ^W^I^T^H^O^U^T ^E^R^A^S^I^N^G ^Y^O^U^R ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^C^O^P^Y.  M^A^S^S S^T^O^R^A^G^E
      E^X^T^E^N^D^E^D (MSE) ^A^N^D ^T^H^E M^A^S^S S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M (MSS) ^A^R^E ^E^X^A^M^P^L^E^S ^O^F
      ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^S^U^B^S^Y^S^T^E^M^S.

      I^F ^A^N ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^D^O^E^S ^N^O^T ^E^X^I^S^T, ^O^R ^I^F ^T^H^E
      ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^C^O^P^Y ^I^S ^N^O^T ^U^P-^T^O-^D^A^T^E, ^T^H^E DROPDS ^C^O^M^M^A^N^D ^A^B^O^R^T^S
      ^W^I^T^H^O^U^T ^E^R^A^S^I^N^G ^T^H^E ^D^I^S^K ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^A^N^D ^I^S^S^U^E^S ^A^N ^E^R^R^O^R ^M^E^S^S^A^G^E.
.HELP,LFN,NOLIST

      F^O^R^M^A^T@D  ^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^R^E^T^U^R^N^E^D
      (^E^R^A^S^E^D).  I^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^I^S ^T^H^E ^S^A^M^E ^A^S ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^N^A^M^E, ^Y^O^U ^D^O ^N^O^T ^H^A^V^E ^T^O ^S^P^E^C^I^F^Y ^L^O^C^A^L ^F^I^L^E ^N^A^M^E@D ^T^H^E DROPDS ^C^O^M^M^A^N^D
      ^W^I^L^L ^R^E^T^U^R^N ^T^H^E ^L^O^C^A^L ^F^I^L^E ^W^H^E^N ^T^H^E ^D^I^S^K ^C^O^P^Y ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^I^S ^E^R^A^S^E^D. (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^I^S ^A^S^S^U^M^E^D ^T^O ^B^E ^T^H^E ^S^A^M^E ^A^S ^T^H^E
                ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E.
.HELP,PFN,NOLIST

      F^O^R^M^A^T@D  ^P^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R ^P^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^H^O^S^E ^D^I^S^K
      ^S^P^A^C^E ^I^S ^T^O ^B^E ^R^E^L^E^A^S^E^D ^T^O ^T^H^E ^S^Y^S^T^E^M. (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^N^A^M^E ^O^F ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E.
.HELP,PN,NOLIST

      F^O^R^M^A^T@D  PN=^P^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN) ^S^P^E^C^I^F^E^S ^T^H^E ^N^A^M^E ^O^F ^A^N ^A^U^X^I^L^I^A^R^Y ^D^I^S^K ^P^A^C^K.  I^F
      ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^I^S^K ^P^A^C^K, ^E^N^T^E^R ^T^H^E
      ^N^A^M^E ^O^F ^T^H^E ^D^I^S^K ^P^A^C^K.

      D^E^F^A^U^L^T@D  N^O^N^E.
.HELP,R,NOLIST

      F^O^R^M^A^T@D  R=^R

      T^H^E ^P^A^R^A^M^E^T^E^R R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^I^E^D ^A^N ^A^U^X^I^L^I^A^R^Y
      ^P^A^C^K ^N^A^M^E ^I^N ^T^H^E PN=^P^N ^P^A^R^A^M^E^T^E^R, ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S ^N^O^T ^T^H^E
      ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------

      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      F^O^R^M^A^T@D  NA

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^N^O^T ^T^O ^T^E^R^M^I^N^A^T^E ^Y^O^U^R ^J^O^B ^O^R ^P^R^O^C^E^D^U^R^E.
      I^N^S^T^E^A^D, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T, ^I^F ^T^H^E ^F^I^L^E ^I^S
      ^B^U^S^Y, ^Y^O^U^R ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^F^I^L^E ^I^S ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^I^F ^T^H^E
      ^F^I^L^E ^D^O^E^S^N'^T ^E^X^I^S^T, ^Y^O^U^R ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.

      T^O ^S^P^E^C^I^F^Y ^N^O-^A^B^O^R^T-^O^N-^E^R^R^O^R^S, ^E^N^T^E^R NA. O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).

      D^E^F^A^U^L^T@D  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^R^R^O^R^S ^C^A^N ^T^E^R^M^I^N^A^T^E
                ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      F^O^R^M^A^T@D  WB

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^D^I^S^K ^P^A^C^K^S ^T^O ^B^E
      ^M^O^U^N^T^E^D ^O^R ^F^O^R ^B^U^S^Y ^F^I^L^E^S ^T^O ^B^E^C^O^M^E ^A^V^A^I^L^A^B^L^E, ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T
      ^I^F ^T^H^E ^D^I^S^K ^P^A^C^K ^O^R ^F^I^L^E ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.  E^N^T^E^R WB ^F^O^R ^W^A^I^T;
      ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      N^O^T^E@D  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D  Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^T^H^E ^D^I^S^K ^P^A^C^K ^O^R ^F^I^L^E ^I^S^N'^T ^A^V^A^I^L^A^B^L^E.
.ENDHELP
.IF($LFN$.EQ.$$,L1)
.EX.  $DROPDS(PFN/#PN=PN,#R=R_NA_WB)
.ELSE(L1)
.EX.  $DROPDS(LFN=PFN/#PN=PN,#R=R_NA_WB)
.ENDIF(L1)
*WEOR
.PROC,DUP*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  DUP,^Q..^R,^N,^Z.

      DUP ^D^U^P^L^I^C^A^T^E^S ^L^I^N^E^S ^A^N^D ^I^N^S^E^R^T^S ^T^H^E^M ^I^N ^A ^S^P^E^C^I^F^I^E^D ^L^O^C^A^T^I^O^N ^I^N ^T^H^E
      ^P^R^I^M^A^R^Y ^F^I^L^E.

      T^H^E ^P^A^R^A^M^E^T^E^R ^Q..^R ^I^S ^A ^L^I^N^E ^R^A^N^G^E ^T^H^A^T ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D ^A^S ^A ^S^I^N^G^L^E
      ^L^I^N^E ^N^U^M^B^E^R.  T^H^I^S ^I^S ^T^H^E ^L^I^N^E ^O^R ^R^A^N^G^E ^O^F ^L^I^N^E^S ^T^O ^B^E ^C^O^P^I^E^D.

      T^H^E ^N ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^L^I^N^E ^N^U^M^B^E^R ^A^F^T^E^R ^W^H^I^C^H ^T^H^E ^D^U^P^L^I^C^A^T^E^D ^L^I^N^E^S
      ^T^O ^B^E ^I^N^S^E^R^T^E^D.  I^F ^N ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^D^U^P^L^I^C^A^T^E^D ^L^I^N^E^S ^A^R^E ^I^N^S^E^R^T^E^D
      ^A^T ^T^H^E ^E^N^D ^O^F ^T^H^E ^F^I^L^E.  I^F ^N ^I^S ^L^E^S^S ^T^H^A^N ^T^H^E ^F^I^R^S^T ^L^I^N^E ^N^U^M^B^E^R ^I^N ^T^H^E
      ^F^I^L^E, ^T^H^E ^D^U^P^L^I^C^A^T^E^D ^L^I^N^E^S ^A^R^E ^I^N^S^E^R^T^E^D ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E ^F^I^L^E.  I^F
      ^N ^I^S ^B^E^T^W^E^E^N ^T^W^O ^E^X^I^S^T^I^N^G ^L^I^N^E ^N^U^M^B^E^R^S, ^T^H^E ^D^U^P^L^I^C^A^T^E^D ^L^I^N^E^S ^A^R^E ^I^N^S^E^R^T













      ^B^E^T^W^E^E^N ^T^H^E ^A^D^J^A^C^E^N^T ^L^I^N^E^S ^A^N^D ^I^N^C^R^E^M^E^N^T^E^D ^B^Y ^Z.  I^F ^T^H^E ^N^E^W ^L^I^N^E
      ^N^U^M^B^E^R^S ^O^V^E^R^L^A^P ^E^X^I^S^T^I^N^G ^E^D^I^T ^F^I^L^E ^L^I^N^E ^N^U^M^B^E^R^S, ^L^I^N^E ^R^E^S^E^Q^U^E^N^C^I^N^G ^O^C^C

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EDIT*I
,FN[F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D]=(*F)
,M[P^R^O^C^E^S^S^I^N^G ^M^O^D^E@D NORMAL ^O^R ASCII]=(ASCII,AS,NORMAL,N,*N=N)
,I[F^I^L^E ^T^O ^R^E^A^D ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M]=(*F,*N=INPUT)
,L[F^I^L^E ^T^O ^W^R^I^T^E ^O^U^T^P^U^T ^T^O]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EDIT,FN=^F^N,M=^M,I=^I,L=^L.

      T^H^E EDIT ^C^O^M^M^A^N^D ^C^A^L^L^S ^T^H^E TEXT E^D^I^T^O^R U^T^I^L^I^T^Y.  T^H^I^S ^E^D^I^T^O^R ^M^A^N^I^P^U^L^A^T^E^S
      ^D^A^T^A ^O^N ^A ^S^P^E^C^I^F^I^E^D ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E ^T^H^R^O^U^G^H ^U^S^E ^O^F ^S^P^E^C^I^A^L ^I^N^P^U^T
      ^D^I^R^E^C^T^I^V^E^S ^C^A^L^L^E^D ^E^D^I^T ^C^O^M^M^A^N^D^S.
.HELP,FN,NOLIST

      F^O^R^M^A^T@D  FN=^F^N

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D (^A ^F^I^L^E ^N^A^M^E ^I^S 1 ^T^O 7
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).

      D^E^F^A^U^L^T@D  A ^F^I^L^E ^N^A^M^E ^I^S ^R^E^Q^U^I^R^E^D.
.HELP,M,NOLIST

      F^O^R^M^A^T@D  M=^M

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^D^I^T ^M^O^D^E.

      ASCII  = ASCII ^M^O^D^E ^E^D^I^T ^F^I^L^E
      AS     = ^S^A^M^E ^A^S ASCII
      NORMAL = NORMAL ^M^O^D^E ^E^D^I^T ^F^I^L^E (^D^I^S^P^L^A^Y ^C^O^D^E)
      N      = ^S^A^M^E ^A^S NORMAL

      D^E^F^A^U^L^T@D  N
.HELP,I,NOLIST

      F^O^R^M^A^T@D  I=^I

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^D^I^R^E^C^T^I^V^E^S (^E^D^I^T ^C^O^M^M^A^N^D^S)
      ^T^O ^B^E ^R^E^A^D.

      D^E^F^A^U^L^T@D  INPUT
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^O^U^T^P^U^T ^I^S ^T^O ^B^E ^W^R^I^T^T^E^N.

      D^E^F^A^U^L^T@D  OUTPUT
.ENDHELP
.EX. $EDIT(#FN=FN,#M=M,#I=I,#L=L)
*WEOR
.PROC,EFFECT*I
,MODE[D^O ^Y^O^U ^W^A^N^T IAF ^F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S]=(YES=ON,Y=ON,NO=OFF,
                                N=OFF,ON,OFF,*N=ON)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EFFECT,^M^O^D^E.

      T^H^E EFFECT ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^O^U^T^P^U^T ^F^O^R^M^A^T
      ^E^F^F^E^C^T^O^R^S ^S^U^P^P^L^I^E^D ^B^Y IAF.  (F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S ^C^O^N^T^R^O^L ^C^A^R^R^I^A^G^E
      ^P^O^S^I^T^I^O^N^I^N^G ^O^N ^O^U^T^P^U^T ^O^P^E^R^A^T^I^O^N^S.)

      A^L^L^O^W^A^B^L^E ^V^A^L^U^E^S ^A^R^E SYSTEM (^F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S ^A^R^E ^S^U^P^P^L^I^E^D ^B^Y IAF),
      ^A^N^D USER (^E^F^F^E^C^T^O^R^S ^A^R^E ^U^S^E^R ^S^U^P^P^L^I^E^D, ^I^N^T^E^R^P^R^E^T^E^D ^A^S ^T^H^E ^F^I^R^S^T
      ^C^H^A^R^A^C^T^E^R ^O^F ^E^A^C^H ^O^U^T^P^U^T ^L^I^N^E).

      D^E^F^A^U^L^T@D SYSTEM (^F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S ^A^R^E ^S^U^P^P^L^I^E^D ^B^Y IAF).
.HELP,MODE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R IAF ^S^U^P^P^L^I^E^S ^O^U^T^P^U^T ^F^O^R^M^A^T
      ^E^F^F^E^C^T^O^R^S.  A^L^L^O^W^A^B^L^E ^V^A^L^U^E^S ^A^R^E SYSTEM (^F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S ^A^R^E
      ^S^U^P^P^L^I^E^D ^B^Y IAF), ^A^N^D USER (^Y^O^U ^C^O^N^T^R^O^L ^T^E^R^M^I^N^A^L ^O^U^T^P^U^T ^B^Y
      ^S^U^P^P^L^Y^I^N^G ^A^N ^A^P^P^R^O^P^R^I^A^T^E ^E^F^F^E^C^T^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^O^F
      ^E^A^C^H ^L^I^N^E; ^T^H^E ^S^Y^S^T^E^M ^T^H^E^N ^I^N^T^E^R^P^R^E^T^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^O^F
      ^E^A^C^H ^L^I^N^E ^A^S ^A^N ^E^F^F^E^C^T^O^R ^A^N^D ^I^N^H^I^B^I^T^S ^P^R^I^N^T^I^N^G ^O^F ^T^H^A^T ^C^H^A^R^A^C^T^E^R.)

      D^E^F^A^U^L^T@D SYSTEM (^F^O^R^M^A^T ^E^F^F^E^C^T^O^R^S ^A^R^E ^S^U^P^P^L^I^E^D ^B^Y IAF).
.ENDHELP
.EX.   $EFFECT,MODE.
*WEOR
.PROC,ELSE*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ELSE,^L^A^B^E^L.

      T^H^E ELSE ^C^O^M^M^A^N^D ^P^E^R^F^O^R^M^S ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^U^N^C^T^I^O^N^S.

            I^T ^T^E^R^M^I^N^A^T^E^S ^S^K^I^P^P^I^N^G ^I^N^I^T^I^A^T^E^D ^B^Y ^A ^F^A^L^S^E IF ^C^O^M^M^A^N^D
            ^W^H^O^S^E ^L^A^B^E^L ^S^T^R^I^N^G ^M^A^T^C^H^E^S ^T^H^A^T ^O^F ^T^H^E ELSE ^C^O^M^M^A^N^D.
            I^F ^T^H^E ^L^A^B^E^L ^S^T^R^I^N^G ^D^O^E^S ^N^O^T ^M^A^T^C^H, ^T^H^E ELSE ^C^O^M^M^A^N^D ^I^S
            ^S^K^I^P^P^E^D.

            I^T ^I^N^I^T^I^A^T^E^S ^S^K^I^P^P^I^N^G ^F^R^O^M ^T^H^E ELSE ^C^O^M^M^A^N^D ^T^O ENDIF ^C^O^M^M^A^N^D
            ^W^H^O^S^E ^L^A^B^E^L ^S^T^R^I^N^G ^M^A^T^C^H^E^S ^T^H^A^T ^O^F ^T^H^E ELSE ^C^O^M^M^A^N^D.  T^H^I^S
            ^H^A^P^P^E^N^S ^F^O^R ^A ^T^R^U^E IF ^C^O^M^M^A^N^D.

     T^H^E LABEL ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 10-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G.
     T^H^E ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N ^W^I^T^H ^A^N ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,ENDIF*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ENDIF,^L^A^B^E^L.

      T^H^E ENDIF ^C^O^M^M^A^N^D ^T^E^R^M^I^N^A^T^E^S ^S^K^I^P^P^I^N^G ^I^N^I^T^I^A^T^E^D ^B^Y ^A SKIP, IF, ^O^R ELSE
      ^C^O^M^M^A^N^D.  I^N ^A^L^L ^C^A^S^E^S, ^T^H^E ^L^A^B^E^L ^S^T^R^I^N^G ^O^N ^T^H^E ENDIF ^C^O^M^M^A^N^D ^M^U^S^T
      ^M^A^T^C^H ^T^H^E ^L^A^B^E^L ^S^T^R^I^N^G ^O^N ^T^H^E ^C^O^M^M^A^N^D ^T^H^A^T ^I^N^I^T^I^A^T^E^S ^T^H^E ^S^K^I^P^P^I^N^G.
      I^F ^T^H^E ^S^Y^S^T^E^M ^E^N^C^O^U^N^T^E^R^S ^A^N ENDIF ^C^O^M^M^A^N^D ^W^I^T^H ^A ^N^O^N^M^A^T^C^H^I^N^G ^L^A^B^E^L
      ^S^T^R^I^N^G, ^I^T ^I^G^N^O^R^E^S ^T^H^A^T ^C^O^M^M^A^N^D.

      T^H^E ^L^A^B^E^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 10-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G.
      T^H^E ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N ^W^I^T^H ^A^N ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,ENDW*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ENDW,^L^A^B^E^L.

      T^H^E ENDW ^C^O^M^M^A^N^D ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^E^N^D ^O^F ^A WHILE ^C^O^M^M^A^N^D ^L^O^O^P.  A ^C^O^M^M^A^N^D
      ^L^O^O^P ^I^S ^A ^S^E^Q^U^E^N^C^E ^O^F ^C^O^M^M^A^N^D^S ^T^H^A^T ^M^A^Y ^B^E ^R^E^P^E^A^T^E^D^L^Y ^P^R^O^C^E^S^S^E^D.  T^H^E
      ^N^U^M^B^E^R ^O^F ^T^I^M^E^S ^T^H^E ^L^O^O^P ^I^S ^P^R^O^C^E^S^S^E^D ^D^E^P^E^N^D^S ^O^N ^T^H^E ^E^V^A^L^U^A^T^I^O^N ^O^F ^T^H^E
      ^E^X^P^R^E^S^S^I^O^N ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E WHILE ^C^O^M^M^A^N^D ^T^H^A^T ^B^E^G^I^N^S ^T^H^E ^L^O^O^P.

      T^H^E ENDW ^C^O^M^M^A^N^D ^M^U^S^T ^H^A^V^E ^A ^L^A^B^E^L ^S^T^R^I^N^G ^T^H^A^T ^M^A^T^C^H^E^S ^T^H^E ^L^A^B^E^L ^S^T^R^I^N^G
      ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E WHILE ^C^O^M^M^A^N^D ^T^H^A^T ^B^E^G^I^N^S ^T^H^E ^L^O^O^P.

     T^H^E ^L^A^B^E^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 10-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G.
     T^H^E ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N ^W^I^T^H ^A^N ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,ENQUIRE*I
,OP[L^I^S^T O^P^T^I^O^N^S]=(*S7(ABDFJLRSTU),*N=)
,JSN[J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E]=(*S4/A,*N=)
,UJN[U^S^E^R ^J^O^B ^N^A^M^E]=(*S7/AD,*N=)
,FN[S^T^A^T^U^S ^O^F ^T^H^I^S ^F^I^L^E]=(*F,*N=)
,O[O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ENQUIRE,OP=^P1^P2^P3...^P^N,FN=^L^F^N1,O=^L^F^N2.
               ENQUIRE,^P1^P2^P3...^P^N.
               ENQUIRE,JSN=^J^S^N,O=^L^F^N2.
               ENQUIRE,UJN=^U^J^N,O=^L^F^N2.
               ENQUIRE.

      T^H^E ENQUIRE ^C^O^M^M^A^N^D ^G^I^V^E^S ^Y^O^U ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^Y^O^U^R ^J^O^B^S ^I^N ^T^H^E ^S^Y^S^T^E^M.
.HELP,OP,NOLIST

      F^O^R ^T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=^P1^P2...^P^N), ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^O^P^T^I^O^N^S, ^U^P ^T^O 7 (^F^O^R ^E^X^A^M^P^L^E, ENQUIRE,OP=BDFJLRS).

      A    G^I^V^E^S ^L^I^S^T^I^N^G ^O^F ^T^H^E B, D, R, U, J, L, ^A^N^D F ^O^P^T^I^O^N^S.

      B    R^E^T^U^R^N^S ^I^D^E^N^T^I^F^I^C^A^T^I^O^N ^A^N^D ^P^R^I^O^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N.

      D    R^E^T^U^R^N^S ^A ^L^I^S^T^I^N^G ^O^F ^T^H^E ^R^E^S^O^U^R^C^E^S ^Y^O^U ^H^A^V^E ^D^E^M^A^N^D^E^D ^A^N^D ^T^H^O^S^E
           ^W^H^I^C^H ^H^A^V^E ^B^E^E^N ^A^S^S^I^G^N^E^D.

      F    G^I^V^E^S ^T^H^E ^S^T^A^T^U^S ^O^F ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.

      J    R^E^T^U^R^N^S ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^Y^O^U^R ^C^O^N^T^R^O^L ^R^E^G^I^S^T^E^R^S, ^E^R^R^O^R ^F^L^A^G ^F^I^E^L^D,
           ^A^N^D ^S^U^C^C^E^E^D^I^N^G ^C^O^M^M^A^N^D^S.

      L    R^E^T^U^R^N^S ^Y^O^U^R ^L^O^A^D^E^R ^I^N^F^O^R^M^A^T^I^O^N ^I^N^C^L^U^D^I^N^G ^T^H^E ^S^T^A^T^U^S ^O^F CYBER
           I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G ^U^T^I^L^I^T^Y.

      R    R^E^T^U^R^N^S ^Y^O^U^R ^A^M^O^U^N^T ^O^F ^R^E^S^O^U^R^C^E^S ^U^S^E^D.

      S    R^E^T^U^R^N^S ^Y^O^U^R ^A^C^C^U^M^U^L^A^T^E^D SRU^S.  T^H^E SRU^S ^R^E^P^R^E^S^E^N^T ^Y^O^U^R ^T^O^T^A^L
           ^U^S^A^G^E ^O^F ^T^H^E ^S^Y^S^T^E^M.

      T    R^E^T^U^R^N^S ^A^C^C^U^M^U^L^A^T^E^D CPU ^T^I^M^E.

      U    R^E^T^U^R^N^S ^T^H^E ^I^N^I^T^I^A^L ^A^M^O^U^N^T ^O^F ^R^E^S^O^U^R^C^E^S ^A^V^A^I^L^A^B^L^E ^T^O ^Y^O^U ^I^N ^S^E^C^O^N^D^S,
           ^J^O^B ^S^T^E^P SRU^S, ^A^C^C^O^U^N^T ^B^L^O^C^K SRU^S, ^A^N^D ^T^H^E ^R^E^M^A^I^N^I^N^G ^R^E^S^O^U^R^C^E^S
           ^A^V^A^I^L^A^B^L^E ^F^O^R ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E^S, ^C^O^M^M^A^N^D^S, ^A^N^D ^M^A^S^S ^S^T^O^R^A^G^E.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^S^P^E^C^I^F^Y ^N^O ^P^A^R^A^M^E^T^E^R^S, ^O^R ^O^N^L^Y ^T^H^E O=^L^F^N2 ^P^A^R^A^M^E^T^E^R
               ^I^N ^A ^B^A^T^C^H ^J^O^B, ^T^H^E OP=^P1^P2^P3...^P^N ^P^A^R^A^M^E^T^E^R ^D^E^F^A^U^L^T^S ^T^O OP=A.
.HELP,UJN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^R^E^P^O^R^T^S ^O^N ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E, ^S^E^R^V^I^C^E ^C^L^A^S^S,
      ^C^O^N^N^E^C^T^I^O^N ^S^T^A^T^U^S, ^D^E^F^A^U^L^T ^D^E^S^T^I^N^A^T^I^O^N ^O^F ^B^A^T^C^H ^O^U^T^P^U^T, ^L^O^G^I^C^A^L
      ^M^A^I^N^F^R^A^M^E ^T^H^A^T ^I^S ^T^O ^P^R^O^C^E^S^S ^T^H^E ^J^O^B, ^U^S^E^R ^J^O^B ^N^A^M^E, ^T^H^E ^C^U^R^R^E^N^T ^S^T^A^T^U^S
      ^O^F ^T^H^E ^J^O^B ^W^I^T^H ^T^H^E UJN ^Y^O^U ^S^P^E^C^I^F^I^E^D, ^A^N^D ^A^N ^E^X^E^C^U^T^I^N^G ^M^E^S^S^A^G^E.  E^N^T^E^R
      ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E (^A 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^N^A^M^E) ^F^O^R ^W^H^I^C^H ^Y^O^U ^W^O^U^L^D
      ^L^I^K^E ^T^H^E ^A^B^O^V^E ^R^E^P^O^R^T.

      D^E^F^A^U^L^T@D N^O^N^E (^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L).  I^F ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D UJN
               ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^U^R^N^S ^A ^R^E^P^O^R^T ^F^O^R ^E^A^C^H ^J^O^B
               ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,JSN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^R^E^T^U^R^N^S ^A ^R^E^P^O^R^T ^O^N ^T^H^E ^J^O^B ^T^H^A^T ^Y^O^U ^S^P^E^C^I^F^Y (^J^O^B
      ^S^E^Q^U^E^N^C^E ^N^A^M^E).  I^F ^T^H^E ^J^O^B ^I^S ^E^X^E^C^U^T^I^N^G, ^T^H^E ^R^E^P^O^R^T ^I^N^C^L^U^D^E^S ^T^H^E
      JSN, ^S^E^R^V^I^C^E ^C^L^A^S^S, ^U^S^E^R ^J^O^B ^N^A^M^E, ^T^H^E ^C^U^R^R^E^N^T ^S^T^A^T^U^S ^O^F ^T^H^E ^J^O^B,
      ^C^O^N^N^E^C^T^I^O^N ^S^T^A^T^U^S, ^D^E^F^A^U^L^T ^D^E^S^T^I^N^A^T^I^O^N ^O^F ^I^T'^S ^B^A^T^C^H ^O^U^T^P^U^T, ^J^O^B
      ^A^C^C^E^S^S ^L^E^V^E^L (^O^N ^A ^S^E^C^U^R^E^D ^S^Y^S^T^E^M ^O^N^L^Y), ^J^O^B ^R^E^S^O^U^R^C^E ^I^N^F^O^R^M^A^T^I^O^N,
      ^E^X^E^C^U^T^I^N^G ^M^E^S^S^A^G^E, ^A ^D^A^Y^F^I^L^E ^E^X^T^R^A^C^T, ^A^N^D ^A ^L^I^S^T ^O^F ^T^H^E ^N^E^X^T
      ^C^O^M^M^A^N^D^S ^T^O ^B^E ^E^X^E^C^U^T^E^D.  (I^F ^T^H^E ^J^O^B ^I^S ^A ^Q^U^E^U^E^D ^F^I^L^E, ^T^H^E
      ^R^E^P^O^R^T ^P^E^R^T^A^I^N^S ^T^O ^Q^U^E^U^E^D ^F^I^L^E ^S^T^A^T^U^S.)  E^N^T^E^R ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E
      ^N^A^M^E (4 ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R^S).

      D^E^F^A^U^L^T@D N^O^N^E (^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L).  I^F ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D JSN
               ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^R^E^P^O^R^T^S ^O^N ^E^A^C^H ^J^O^B ^A^S^S^O^C^I^A^T^E^D
               ^W^I^T^H ^Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FN=^L^F^N1) ^R^E^T^U^R^N^S ^T^H^E ^S^T^A^T^U^S ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^Y^O^U
      ^S^P^E^C^I^F^Y (^R^E^F^E^R ^T^O ^T^H^E OP=F ^P^A^R^A^M^E^T^E^R).

      D^E^F^A^U^L^T@D N^O^N^E (^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L).
.HELP,O,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (O=^L^F^N2) ^W^R^I^T^E^S ^T^H^E ^O^U^T^P^U^T ^O^N ^F^I^L^E ^L^F^N2.  I^F ^T^H^E
      ^F^I^L^E ^Y^O^U ^S^P^E^C^I^F^Y ^I^S ^N^O^T ^L^O^C^A^L, ENQUIRE ^M^A^K^E^S ^I^T ^L^O^C^A^L.  I^F ^I^T ^I^S
      ^A ^N^E^W ^F^I^L^E (^N^O^T ^I^N ^Y^O^U^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^A^T^A^L^O^G), ENQUIRE ^C^R^E^A^T^E^S
      ^A ^L^O^C^A^L ^F^I^L^E ^B^Y ^T^H^A^T ^N^A^M^E.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.ENDHELP
.IF($OP$ .NE. $$,L1)
  .EX.  $ENQUIRE(#OP=OP,#FN=FN,#O=O)
.ELSE(L1)
   .IF($JSN$ .NE. $$,L2)
     .EX.  $ENQUIRE(#JSN=JSN,#O=O)
   .ELSE(L2)
     .IF($UJN$ .NE. $$,L3)
       .EX.  $ENQUIRE(#UJN=UJN,#O=O)
     .ELSE(L3)
       .IF($FN$.NE.$$,L4)
         .EX. $ENQUIRE(#FN=FN)
       .ELSE(L4)
         .EX.  $ENQUIRE.
       .ENDIF(L4)
     .ENDIF(L3)
   .ENDIF(L2)
.ENDIF(L1)
*WEOR
.PROC,ENTER*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ENTER./^C^O^M^M^A^N^D1/^C^O^M^M^A^N^D2/^C^O^M^M^A^N^D3/.../^C^O^M^M^A^N^D^N

      T^H^E ENTER ^C^O^M^M^A^N^D ^E^N^T^E^R^S ^A ^S^E^R^I^E^S ^O^F ^C^O^M^M^A^N^D^S ^O^N ^O^N^E ^L^I^N^E.  T^H^I^S ^I^S
      ^E^S^P^E^C^I^A^L^L^Y ^U^S^E^F^U^L ^F^O^R ^I^N^T^E^R^A^C^T^I^V^E ^U^S^E^R^S ^O^P^E^R^A^T^I^N^G ^I^N ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^
M.

      T^H^E ^S^Y^S^T^E^M ^S^U^P^P^L^I^E^S ^A ^T^E^R^M^I^N^A^T^O^R (^P^E^R^I^O^D ^O^R ^R^I^G^H^T ^P^A^R^E^N^T^H^E^S^I^S) ^I^F ^I^T
      ^I^S ^M^I^S^S^I^N^G ^F^R^O^M ^A^N^Y ^C^O^M^M^A^N^D.

                   /           D^E^L^I^M^I^T^I^N^G ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^S^E^P^A^R^A^T^E ^T^H^E
                               ^I^N^D^I^V^I^D^U^A^L ^C^O^M^M^A^N^D^S ^O^N ^O^N^E ^L^I^N^E.  I^T ^C^A^N ^B^E ^A^N^Y
                               ^C^H^A^R^A^C^T^E^R ^N^O^T ^U^S^E^D ^W^I^T^H^I^N ^T^H^E ^C^O^M^M^A^N^D^S ^A^N^D ^M^U^S^T
                               ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W ^A ^P^E^R^I^O^D ^O^R ^R^I^G^H^T ^P^A^R^E^N^T^H^E^S^I^S.

                   ^C^O^M^M^A^N^D^I    A^N^Y NOS ^C^O^M^M^A^N^D ^Y^O^U ^A^R^E ^A^U^T^H^O^R^I^Z^E^D ^T^O ^U^S^E.
                               I^N^T^E^R^A^C^T^I^V^E ^C^O^M^M^A^N^D^S ^F^O^R ^W^H^I^C^H ^T^H^E^R^E ^A^R^E ^N^O
                               ^B^A^T^C^H ^C^O^U^N^T^E^R^P^A^R^T^S ^A^R^E ^N^O^T ^A^C^C^E^P^T^A^B^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,ERRMSG*I
,STATUS[D^I^S^P^L^A^Y ^E^R^R^O^R ^M^E^S^S^A^G^E^S ^A^T ^T^E^R^M^I^N^A^L]=(YES=ON,Y=ON,
                      ON,NO=OFF,N=OFF,OFF,*N=ON)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ERRMSG,^S^T^A^T^U^S.

      D^E^F^A^U^L^T@D ON (^M^E^S^S^A^G^E^S ^A^R^E ^D^I^S^P^L^A^Y^E^D ^A^T ^T^H^E ^T^E^R^M^I^N^A^L)

      T^H^E ERRMSG ^C^O^M^M^A^N^D ^C^O^N^T^R^O^L^S ^T^H^E ^D^I^S^P^L^A^Y ^O^F ^E^R^R^O^R ^M^E^S^S^A^G^E^S
      ^G^E^N^E^R^A^T^E^D ^W^I^T^H^I^N NOS ^P^R^O^C^E^D^U^R^E^S.  ERRMSG,OFF ^I^N^H^I^B^I^T^S ^T^H^E ^D^I^S^P^L^A^Y
      ^O^F ^M^E^S^S^A^G^E^S ^A^T ^T^H^E ^T^E^R^M^I^N^A^L, ^A^L^T^H^O^U^G^H ^A^L^L ^M^E^S^S^A^G^E^S ^A^R^E ^S^T^I^L^L
      ^L^I^S^T^E^D ^I^N ^T^H^E ^D^A^Y^F^I^L^E.

      T^H^E ERRMSG ^C^O^M^M^A^N^D ^M^U^S^T ^B^E ^E^X^E^C^U^T^E^D ^F^R^O^M ^W^I^T^H^I^N ^A ^P^R^O^C^E^D^U^R^E.
.HELP,STATUS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^E^R^R^O^R ^M^E^S^S^A^G^E^S ^G^E^N^E^R^A^T^E^D
      ^B^Y NOS ^P^R^O^C^E^D^U^R^E^S ^A^R^E ^D^I^S^P^L^A^Y^E^D ^A^T ^T^H^E ^U^S^E^R'^S ^T^E^R^M^I^N^A^L.
      E^N^T^E^R OFF ^T^O ^D^I^S^A^B^L^E ^M^E^S^S^A^G^E ^D^I^S^P^L^A^Y, ^A^N^D ON ^T^O ^E^N^A^B^L^E
      ^M^E^S^S^A^G^E ^D^I^S^P^L^A^Y.

      D^E^F^A^U^L^T@D ON
.ENDHELP
.EX. $ERRMSG,STATUS.
REVERT,NOLIST.
*WEOR
.PROC,EVICT*I
,LFN[F^I^L^E ^T^O ^B^E ^E^V^I^C^T^E^D]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EVICT,^L^F^N1,^L^F^N2,...,^L^F^N^N.

      T^H^E EVICT ^C^O^M^M^A^N^D ^R^E^L^E^A^S^E^S ^T^H^E ^F^I^L^E ^S^P^A^C^E ^F^O^R ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E^S (^L^F^N^I),
      ^B^U^T ^D^O^E^S ^N^O^T ^R^E^L^E^A^S^E ^F^I^L^E ^A^S^S^I^G^N^M^E^N^T ^T^O ^Y^O^U^R ^J^O^B ^U^N^L^E^S^S ^Y^O^U ^H^A^V^E
      ^T^H^E ^F^I^L^E ^A^S^S^I^G^N^E^D ^T^O ^A ^M^A^G^N^E^T^I^C ^T^A^P^E ^O^R ^D^O ^N^O^T ^H^A^V^E ^W^R^I^T^E ^P^E^R^M^I^S^S^I^O^N.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N^I) ^N^A^M^E^S ^T^H^E ^F^I^L^E(^S) ^T^O ^B^E ^E^V^I^C^T^E^D.  A ^F^I^L^E ^N^A^M^E ^M^A^Y
      ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  F^R^O^M HELPME, ^O^N^L^Y ^O^N^E ^F^I^L^E
      ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D.

      D^E^F^A^U^L^T@D N^O^N^E; ^A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $EVICT(LFN)
*WEOR
.PROC,EXECUTE*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EXECUTE,^C^C^C
               EXECUTE,^E^P^T^N^A^M^E,^P1,...,^P^N.

      T^H^E EXECUTE ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M.  A RUN ^C^O^M^M^A^N^D
      ^U^N^D^E^R ^T^H^I^S ^S^U^B^S^Y^S^T^E^M ^E^X^E^C^U^T^E^S ^A ^P^R^E^V^I^O^U^S^L^Y ^C^O^M^P^I^L^E^D (^O^B^J^E^C^T ^C^O^D^E)
      ^P^R^O^G^R^A^M.  T^H^E RUN ^C^O^M^M^A^N^D ^M^U^S^T ^B^E ^E^N^T^E^R^E^D ^T^O ^I^N^I^T^I^A^T^E ^E^X^E^C^U^T^I^O^N.

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^C^C ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^N^E ^C^O^M^M^A^N^D ^T^O ^B^E ^E^X^E^C^U^T^E^D ^A^F^T^E^R ^T^H^E
      ^S^Y^S^T^E^M ^E^X^E^C^U^T^E^S ^T^H^E EXECUTE ^C^O^M^M^A^N^D.  A^N^Y ^V^A^L^I^D ^C^O^M^M^A^N^D ^I^S ^P^E^R^M^I^T^T^E^D, ^A^S
      ^W^E^L^L ^A^S ^A^L^L ^V^A^L^I^D ^P^A^R^A^M^E^T^E^R^S ^F^O^R ^T^H^A^T ^C^O^M^M^A^N^D.

      O^N^C^E ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M ^H^A^S ^B^E^E^N ^S^E^L^E^C^T^E^D, ^T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^O^F
      ^T^H^E EXECUTE ^C^O^M^M^A^N^D (EXECUTE,^E^P^T^N^A^M^E,^P1,...,^P^N) ^C^A^U^S^E^S ^C^O^M^P^L^E^T^I^O^N ^O^F
      ^L^O^A^D ^A^N^D ^E^X^E^C^U^T^I^O^N ^O^F ^T^H^E ^L^O^A^D^E^R ^P^R^O^G^R^A^M.  T^H^E ^E^P^T^N^A^M^E ^I^S ^T^H^E ^N^A^M^E
      ^O^F ^A^N ^E^N^T^R^Y ^P^O^I^N^T ^I^N ^O^N^E ^O^F ^T^H^E ^L^O^A^D^E^D ^M^O^D^U^L^E^S ^A^T ^W^H^I^C^H ^E^X^E^C^U^T^I^O^N ^I^S ^T^O
      ^B^E^G^I^N.  ^P1,...,^P^N ^S^P^E^C^I^F^I^E^S ^E^X^E^C^U^T^I^O^N-^T^I^M^E ^P^A^R^A^M^E^T^E^R^S ^T^O ^B^E ^P^A^S^S^E^D ^T^O
      ^T^H^E ^L^O^A^D^E^D ^P^R^O^G^R^A^M.

                                     NOTE
                                     ----
      S^O^U^R^C^E ^L^A^N^G^U^A^G^E ^P^R^O^G^R^A^M^S ^C^A^N^N^O^T ^B^E ^E^X^E^C^U^T^E^D ^U^N^D^E^R ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E


      U^S^E ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M ^W^H^E^N^E^V^E^R ^P^O^S^S^I^B^L^E ^T^O ^C^O^N^S^E^R^V^E ^S^Y^S^T^E^M ^R^E^S^O^U^R^C
&l5C      E^F^F^I^C^I^E^N^C^Y ^C^A^N ^B^E ^A^C^H^I^E^V^E^D ^W^H^E^N ^C^E^R^T^A^I^N ^P^R^O^G^R^A^M^S ^A^R^E ^U^S^E^D ^F^R^E^Q^U^E^N^T^L^Y.  F
      ^E^X^A^M^P^L^E, ^A ^S^O^U^R^C^E ^C^O^D^E ^P^R^O^G^R^A^M ^C^R^E^A^T^E^D ^U^N^D^E^R ^T^H^E FORTRAN ^S^U^B^S^Y^S^T^E^M ^M^U^S^T
      ^F^I^R^S^T ^B^E ^C^O^M^P^I^L^E^D ^B^E^F^O^R^E ^I^T ^C^A^N ^B^E ^E^X^E^C^U^T^E^D (^T^H^I^S ^P^R^O^C^E^S^S ^I^S ^A^U^T^O^M^A^T^I^C;
      ^Y^O^U ^N^E^E^D ^O^N^L^Y ^E^N^T^E^R ^T^H^E RUN ^C^O^M^M^A^N^D).  T^H^E ^P^R^O^G^R^A^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^G^O^E^S
      ^T^H^R^O^U^G^H ^A ^C^O^M^P^I^L^A^T^I^O^N ^P^H^A^S^E, ^W^H^I^C^H ^P^R^O^D^U^C^E^S ^A^N ^E^X^E^C^U^T^A^B^L^E ^O^B^J^E^C^T ^C^O^D^E
      ^P^R^O^G^R^A^M, ^A^N^D ^T^H^E ^O^B^J^E^C^T ^P^R^O^G^R^A^M ^I^S ^T^H^E^N ^E^X^E^C^U^T^E^D.  T^H^U^S, ^G^R^E^A^T^E^R
      ^E^F^F^I^C^I^E^N^C^Y ^C^A^N ^B^E ^A^C^H^I^E^V^E^D ^B^Y ^R^E^T^A^I^N^I^N^G ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^P^R^O^G^R^A^M ^I^N ^T^H^E
      ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^S^Y^S^T^E^M ^F^O^R ^L^A^T^E^R ^E^X^E^C^U^T^I^O^N ^U^N^D^E^R ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EXIT*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EXIT.

      T^H^E EXIT ^C^O^M^M^A^N^D ^I^N^D^I^C^A^T^E^S ^T^H^E ^P^O^S^I^T^I^O^N ^I^N ^T^H^E ^C^O^M^M^A^N^D ^R^E^C^O^R^D ^W^H^E^R^E
      ^P^R^O^C^E^S^S^I^N^G ^W^I^L^L ^R^E^S^U^M^E ^I^F ^A^N ^E^R^R^O^R ^I^S ^E^N^C^O^U^N^T^E^R^E^D ^P^R^I^O^R ^T^O ^T^H^E EXIT
      ^C^O^M^M^A^N^D ^O^R ^W^H^E^R^E ^N^O^R^M^A^L ^C^O^M^M^A^N^D ^P^R^O^C^E^S^S^I^N^G ^W^I^L^L ^T^E^R^M^I^N^A^T^E ^I^F ^A^N ^E^R^R^O^R
      ^I^S ^N^O^T ^E^N^C^O^U^N^T^E^R^E^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EXPLAIN*I
,M[M^A^N^U^A^L ^N^A^M^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  EXPLAIN,M=^M^A^N^U^A^L.

      T^H^E EXPLAIN ^C^O^M^M^A^N^D ^R^E^T^R^I^E^V^E^S ^A^N ^O^N^L^I^N^E ^V^E^R^S^I^O^N ^O^F ^A CDC ^M^A^N^U^A^L.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^N^U^A^L ^Y^O^U ^W^A^N^T ^T^O ^R^E^T^R^E^I^V^E.  T^H^E
      ^M^A^N^U^A^L^S ^A^V^A^I^L^A^B^L^E ^T^O ^Y^O^U ^A^R^E ^D^E^T^E^R^M^I^N^E^D ^B^Y ^Y^O^U^R ^S^I^T^E.

      D^E^F^A^U^L^T@D T^H^E S^Y^S^T^E^M I^N^F^O^R^M^A^T^I^O^N M^A^N^U^A^L, ^W^H^I^C^H ^L^I^S^T^S ^T^H^E ^M^A^N^U^A^L^S
               ^T^H^A^T ^C^A^N ^B^E ^A^C^C^E^S^S^E^D.
.ENDHELP
.EX.  $EXPLAIN(#M=M)
*WEOR
.PROC,FCOPY*I
/P[F^I^L^E ^T^O ^C^O^N^V^E^R^T]=(*F,*N=OLD)
,N[C^O^N^V^E^R^T^E^D ^F^I^L^E]=(*F,*N=NEW)
,PC[C^U^R^R^E^N^T ^C^O^D^E ^S^E^T]=(ASCII,ASCII8,ASCII88,ASCII63,ASCII64,DIS,DIS63,DIS64,
               ASCFL,EBCFL,*N=ASCII)
,NC[C^O^D^E ^S^E^T ^T^O ^C^O^N^V^E^R^T ^T^O]=(ASCII,ASCII8,ASCII88,ASCII63,ASCII64,DIS,
                             DIS63,DIS64,ASCFL,EBCFL,*N=ASCII8)
,PL[L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^I^N^P^U^T ^F^I^L^E]=(ZB,CR,FF,LF,US,RS,CRLF,LFCR,N,*N=,
                             *S5(0123456789B))
,NL[L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^O^U^T^P^U^T ^F^I^L^E]=(ZB,CR,FF,LF,US,RS,CRLF,LFCR,N,*N=,
                             *S5(0123456789B))
,FL[I^F S ^O^R L-^F^O^R^M^A^T ^T^A^P^E, ^E^N^T^E^R ^R^E^C^O^R^D ^L^E^N^G^T^H]=(*N=0,*S4(0123456789))
,LB[I^F S ^O^R L-^F^O^R^M^A^T ^T^A^P^E, ^E^N^T^E^R ^L^I^N^E^S ^P^E^R ^B^L^O^C^K]=(*N=0,*S4(0123456789))
,R[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=$,R$,Y=$,R$,*K=$,R$,NO=,N=,*N=)
,A[A^B^O^R^T ^I^F ^E^R^R^O^R^S ^A^R^E ^E^N^C^O^U^N^T^E^R^E^D]=(NO=$,A$,N=$,A$,*K=$,A$,YES=,Y=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D FCOPY,P=^L^F^N1,N=^L^F^N2,PC=^C^S1,NC=^C^S2,PL=^L^T1,NL=^L^T2,FL=^F^L,LB=^L^B,R,A.

      T^H^E FCOPY ^C^O^M^M^A^N^D ^C^O^N^V^E^R^T^S ^A ^F^I^L^E ^F^R^O^M ^O^N^E ^C^O^D^E ^S^E^T ^T^O ^A^N^O^T^H^E^R.
      Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^O^D^E ^S^E^T^S@D ASCII, ASCII8,
      ASCII88, ASCII63, ASCII64, DIS, DIS63, DIS64, ASCFL, ^O^R EBCFL.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (P=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E (^L^F^N1) ^T^O ^B^E
      ^C^O^N^V^E^R^T^E^D.  T^H^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  T^H^E
      ^F^I^L^E ^M^U^S^T ^B^E ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^B^E^F^O^R^E ^Y^O^U ^E^N^T^E^R ^T^H^E FCOPY ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D F^I^L^E OLD
.HELP,PC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PC=^C^S1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^D^E ^S^E^T ^O^F ^L^F^N1.  V^A^L^U^E^S ^F^O^R ^C^S1
      ^A^R^E@D ASCII, ASCII8, ASCII88, ASCII63, ASCII64, DIS, DIS63, DIS64, ASCFL,
           ^O^R EBCFL.

      D^E^F^A^U^L^T@D ASCII
.HELP,PL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PL=^L^T1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^U^S^E^D ^I^N ^F^I^L^E ^L^F^N1
      (^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^N^V^E^R^T^E^D).   V^A^L^U^E^S ^F^O^R ^L^T1 ^A^R^E@D

      ^L^T1    D^E^S^C^R^I^P^T^I^O^N                  ^L^T1   D^E^S^C^R^I^P^T^I^O^N
      ---    -----------                  ---   -----------
      CR     C^A^R^R^I^A^G^E ^R^E^T^U^R^N              ^N     O^C^T^A^L ^V^A^L^U^E ^O^F ^A ^C^H^A^R^A^C^T^E^R
      CRLF   C^A^R^R^I^A^G^E ^R^E^T^U^R^N-^L^I^N^E ^F^E^E^D    RS    R^E^C^O^R^D ^S^E^P^A^R^A^T^O^R
      FF     F^O^R^M ^F^E^E^D                    US    U^N^I^T ^S^E^P^A^R^A^T^O^R
      LF     L^I^N^E ^F^E^E^D                    ZB    Z^E^R^O ^B^Y^T^E
      LFCR   L^I^N^E ^F^E^E^D-^C^A^R^R^I^A^G^E ^R^E^T^U^R^N

      N^O^T^E@D T^H^E ^C^O^D^E ^S^E^T ^O^F ^T^H^E ^F^I^L^E ^D^E^T^E^R^M^I^N^E^S ^W^H^I^C^H ^T^E^R^M^I^N^A^T^O^R^S ^A^R^E
            ^V^A^L^I^D.  F^O^R ^A ^T^A^B^L^E ^S^H^O^W^I^N^G ^C^O^D^E ^S^E^T^S ^A^N^D ^A^L^L^O^W^A^B^L^E ^T^E^R^M^I^N^A^T^O^R^S,
            ^R^E^F^E^R ^T^O ^T^H^E NOS V^E^R^S^I^O^N 2 R^E^F^E^R^E^N^C^E S^E^T, V^O^L^U^M^E 3, ^U^N^D^E^R
            ^T^H^E FCOPY ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D US ^F^O^R ASCII88, ZB ^F^O^R ^A^L^L ^O^T^H^E^R ^C^O^D^E ^S^E^T^S ^E^X^C^E^P^T ASCFL ^A^N^D
               EBCFL, ^W^H^I^C^H ^D^O ^N^O^T ^U^S^E ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R^S.
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (N=^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E (^L^F^N2) ^O^N ^W^H^I^C^H ^T^H^E
      ^C^O^N^V^E^R^T^E^D ^D^A^T^A ^F^R^O^M ^F^I^L^E ^L^F^N1 ^I^S ^W^R^I^T^T^E^N.  T^H^E ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^F^I^L^E ^L^F^N2 ^I^S ^N^O^T ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R
      ^J^O^B, FCOPY ^C^R^E^A^T^E^S ^I^T.

      W^H^E^N ^C^O^P^Y^I^N^G ^F^R^O^M ^L^F^N1, ^T^H^E ^S^Y^S^T^E^M ^N^O^R^M^A^L^L^Y ^R^E^A^D^S ^L^F^N1 ^T^O EOI, ^P^R^E^S^E^R^V^I^N^G
      ^A^L^L EOR ^A^N^D EOF ^M^A^R^K^S ^U^N^L^E^S^S ^L^F^N1 ^O^R ^L^F^N2 ^I^S ^A^N S ^O^R L-^F^O^R^M^A^T ^T^A^P^E.  I^F
      ^A^N S ^O^R L-^F^O^R^M^A^T ^T^A^P^E ^I^S ^S^P^E^C^I^F^I^E^D ^F^O^R ^L^F^N1, ^T^H^E ^S^Y^S^T^E^M ^R^E^A^D^S ^L^F^N1 ^O^N^L^Y
      ^T^O ^T^H^E ^F^I^R^S^T ^T^A^P^E ^M^A^R^K.  I^F ^A^N S ^O^R L-^F^O^R^M^A^T ^T^A^P^E ^I^S ^S^P^E^C^I^F^I^E^D ^F^O^R ^L^F^N2,
      ^T^H^E ^S^Y^S^T^E^M ^R^E^A^D^S ^L^F^N1 ^O^N^L^Y ^T^O ^T^H^E ^F^I^R^S^T EOR, EOF, ^O^R EOI ^E^N^C^O^U^N^T^E^R^E^D.
      I^F ^Y^O^U ^W^A^N^T ^T^O ^C^O^P^Y ^A^N ^E^N^T^I^R^E ^F^I^L^E ^T^O S ^O^R L-^F^O^R^M^A^T ^T^A^P^E, ^Y^O^U ^C^A^N ^D^O ^S^O
      ^B^Y ^F^I^R^S^T ^R^E^M^O^V^I^N^G ^A^L^L EOR^S ^A^N^D EOF^S ^U^S^I^N^G ^T^H^E PACK ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D F^I^L^E NEW
.HELP,NC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NC=^C^S2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^D^E ^S^E^T ^O^F ^L^F^N2.  V^A^L^U^E^S ^F^O^R ^C^S2
      ^A^R^E@D  ASCII, ASCII8, ASCII88, ASCII63, ASCII64, DIS, DIS63, DIS64, ASCFL,
      ^O^R EBCFL.

      D^E^F^A^U^L^T@D ASCII8
.HELP,NL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NL=^L^T2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^U^S^E^D ^I^N ^F^I^L^E ^L^F^N2
      (^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^C^O^N^V^E^R^T^E^D ^D^A^T^A ^F^R^O^M ^L^F^N1 ^I^S ^W^R^I^T^T^E^N).  V^A^L^U^E^S
      ^F^O^R ^L^T2 ^A^R^E@D

      ^L^T2    D^E^S^C^R^I^P^T^I^O^N                  ^L^T2   D^E^S^C^R^I^P^T^I^O^N
      ---    -----------                  ---   -----------
      CR     C^A^R^R^I^A^G^E ^R^E^T^U^R^N              ^N     T^H^E ^O^C^T^A^L ^V^A^L^U^E ^O^F ^A ^C^H^A^R^A^C^T^E^R
      CRLF   C^A^R^R^I^A^G^E ^R^E^T^U^R^N-^L^I^N^E ^F^E^E^D    RS    R^E^C^O^R^D ^S^E^P^A^R^A^T^O^R
      FF     F^O^R^M ^F^E^E^D                    US    U^N^I^T ^S^E^P^A^R^A^T^O^R
      LF     L^I^N^E ^F^E^E^D                    ZB    Z^E^R^O ^B^Y^T^E
      LFCR   L^I^N^E ^F^E^E^D-^C^A^R^R^I^A^G^E ^R^E^T^U^R^N

      N^O^T^E@D T^H^E ^C^O^D^E ^S^E^T ^O^F ^T^H^E ^F^I^L^E ^D^E^T^E^R^M^I^N^E^S ^W^H^I^C^H ^T^E^R^M^I^N^A^T^O^R^S ^A^R^E
            ^V^A^L^I^D.  F^O^R ^A ^T^A^B^L^E ^S^H^O^W^I^N^G ^C^O^D^E ^S^E^T^S ^A^N^D ^A^L^L^O^W^A^B^L^E ^T^E^R^M^I^N^A^T^O^R^S,
            ^R^E^F^E^R ^T^O ^T^H^E NOS V^E^R^S^I^O^N 2 R^E^F^E^R^E^N^C^E S^E^T, V^O^L^U^M^E 3, ^U^N^D^E^R
            ^T^H^E FCOPY ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D US ^F^O^R ASCII88, ZB ^F^O^R ^A^L^L ^O^T^H^E^R ^C^O^D^E ^S^E^T^S ^E^X^C^E^P^T ASCFL ^A^N^D
               EBCFL, ^W^H^I^C^H ^D^O ^N^O^T ^U^S^E ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R^S.
.HELP,FL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FL=^F^L) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^E^N^G^T^H ^O^F ^F^I^X^E^D ^L^E^N^G^T^H ^L^I^N^E^S ^F^O^R
      S ^O^R L-^F^O^R^M^A^T ^T^A^P^E^S, ^A^N^D ^I^S ^V^A^L^I^D ^O^N^L^Y ^I^F ASCFL ^O^R EBCFL ^W^A^S ^S^P^E^C^I^F^I^E^D
      ^A^S ^C^O^D^E ^S^E^T ^F^O^R ^L^F^N1 ^O^R ^L^F^N2.

      D^E^F^A^U^L^T@D 80 ^C^H^A^R^A^C^T^E^R^S.
.HELP,LB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (LB=^L^B) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^L^I^N^E^S ^P^E^R ^B^L^O^C^K ^F^O^R
      S ^O^R L-^F^O^R^M^A^T ^T^A^P^E^S, ^A^N^D ^I^S ^V^A^L^I^D ^O^N^L^Y ^I^F ASCFL ^O^R EBCFL ^W^A^S ^S^P^E^C^I^F^I^E^D
      ^A^S ^T^H^E ^C^O^D^E ^S^E^T ^F^O^R ^L^F^N1 ^O^R ^L^F^N2.

      D^E^F^A^U^L^T@D 3840 ^D^I^V^I^D^E^D ^B^Y ^T^H^E ^F^I^X^E^D ^L^I^N^E ^L^E^N^G^T^H (FL).  (F^O^R ^E^X^A^M^P^L^E, ^I^F
               ^T^H^E ^F^I^X^E^D ^L^I^N^E ^L^E^N^G^T^H (FL=^F^L) ^I^S 80, ^T^H^E ^D^E^F^A^U^L^T ^F^O^R LB
               ^I^S 3840 ^D^I^V^I^D^E^D ^B^Y 80, ^O^R 48 ^L^I^N^E^S ^P^E^R ^B^L^O^C^K
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R) ^R^E^W^I^N^D^S ^F^I^L^E^S ^L^F^N1 ^A^N^D ^L^F^N2 (^T^H^E ^F^I^L^E ^T^O ^C^O^N^V^E^R^T
      ^A^N^D ^T^H^E ^C^O^N^V^E^R^T^E^D ^F^I^L^E) ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^T^H^E FCOPY ^C^O^N^V^E^R^S^I^O^N.  T^O
      ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R R; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D T^H^E ^F^I^L^E^S ^A^R^E ^N^O^T ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^O^R ^A^F^T^E^R ^C^O^N^V^E^R^S^I^O^N.
.HELP,A,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (A) ^S^P^E^C^I^F^I^E^S ^T^O ^A^B^O^R^T ^T^H^E FCOPY ^C^O^M^M^A^N^D ^I^F ^E^R^R^O^R^S ^O^C^C^U^R
      ^D^U^R^I^N^G ^T^H^E ^C^O^N^V^E^R^S^I^O^N.

      D^E^F^A^U^L^T@D N^O^T ^T^O ^A^B^O^R^T ^W^H^E^N ^E^R^R^O^R^S ^O^C^C^U^R.
.ENDHELP
.IF(FL.NE.0.AND.LB.NE.0,L1)
    .EX. $FCOPY(#P=P,#N=N,#PC=PC,#NC=NC,#PL=PL,#NL=NL,#FL=FL,#LB=LB_R_A)
.ELSE(L1)
    .EX.  $FCOPY(#P=P,#N=N,#PC=PC,#NC=NC,#PL=PL,#NL=NL_R_A)
.ENDIF(L1)
*WEOR
.PROC,FORTRAN*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  FORTRAN,^C^C^C

      T^H^E FORTRAN ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E FORTRAN ^S^U^B^S^Y^S^T^E^M.  A RUN ^C^O^M^M^A^N^D ^U^N^D^E^R
      ^T^H^I^S ^S^U^B^S^Y^S^T^E^M ^U^S^E^S ^T^H^E FORTRAN V^E^R^S^I^O^N 5 ^C^O^M^P^I^L^E^R.

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^C^C ^S^P^E^C^I^F^I^E^S ^A ^C^O^M^M^A^N^D ^I^N ^A^D^D^I^T^I^O^N ^T^O ^T^H^E FORTRAN ^C^O^M^M^A^N^D.
      A^N^Y ^V^A^L^I^D ^C^O^M^M^A^N^D ^I^S ^P^E^R^M^I^T^T^E^D, ^A^S ^W^E^L^L ^A^S ^A^L^L ^V^A^L^I^D ^P^A^R^A^M^E^T^E^R^S ^F^O^R ^T^H^A^T
      ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,FSE*I
,FN[F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D]=(*F)
,OP[E^D^I^T ^O^P^T^I^O^N^S]=(*S2(DNA8G),DISPLAY,NORMAL,ASCII,ASCII8,GET,
                   DISPLAYG,NORMALG,ASCIIG,ASCII8G)
,I[I^N^P^U^T ^F^I^L^E ^F^O^R ^D^I^R^E^C^T^I^V^E^S]=(*F,*N=INPUT)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
,IP[F^I^L^E ^F^O^R FSE ^P^R^O^C^E^D^U^R^E ^L^I^B^R^A^R^Y]=(*F,*N=FSEPROC)
,WF[W^O^R^K ^F^I^L^E]=(*F,*N=ZZZWORK)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  FSE,FN=^F^I^L^E^N^A^M^E,OP=^A^C^C^E^S^S,I=^I^N^P^U^T,L=^O^U^T^P^U^T,IP=^P^R^O^C^E^D^U^R^E,
                  WF=^W^O^R^K^F^I^L^E.^D^I^R^E^C^T^I^V^E^S
               FSE,^F^I^L^E^N^A^M^E,^A^C^C^E^S^S,^I^N^P^U^T,^O^U^T^P^U^T,^P^R^O^C^E^D^U^R^E,^W^O^R^K^F^I^L^E.^D^I^R^E^C^T^I^V^E^S

      T^H^E FSE ^C^O^M^M^A^N^D ^C^A^L^L^S ^T^H^E F^U^L^L S^C^R^E^E^N E^D^I^T^O^R (FSE).  F^O^R ^A ^C^O^M^P^L^E^T^E
      ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^T^H^E ^F^E^A^T^U^R^E^S ^O^F ^T^H^I^S ^E^D^I^T^O^R ^A^N^D ^I^T^S ^D^I^R^E^C^T^I^V^E^S,
      ^R^E^F^E^R ^T^O ^T^H^E F^U^L^L S^C^R^E^E^N E^D^I^T^O^R U^S^E^R'^S G^U^I^D^E.
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FN=^F^I^L^E^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^E^D^I^T (^M^A^Y ^B^E
      ^A ^L^O^C^A^L ^O^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E).  A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D T^H^E ^F^I^L^E ^L^A^S^T ^E^D^I^T^E^D ^B^Y FSE ^D^U^R^I^N^G ^Y^O^U^R ^J^O^B.
.HELP,OP,NOLIST
      T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=^A^C^C^E^S^S) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^A^N^D ^L^O^C^A^T^I^O^N
      ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D.  T^H^E ^F^O^L^L^O^W^I^N^G ^E^N^T^R^I^E^S ^A^N^D ^A^B^B^R^E^V^I^A^T^I^O^N^S
      ^A^R^E ^V^A^L^I^D (^O^N^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^A^N^D ^A G ^A^R^E ^A^L^L^O^W^E^D@D ^F^O^R ^E^X^A^M^P^L^E, ASCIIG
      ^O^R AG)@D

      A^C^C^E^S^S  A^B^B^R.                        D^E^S^C^R^I^P^T^I^O^N
      ------  -----                        -----------
      DISPLAY (D)     S^E^L^E^C^T^S ASCII 64-^C^H^A^R^A^C^T^E^R ^S^E^T (^I^N^T^E^R^N^A^L^L^Y ^R^E^P^R^E^S^E^N^T^E^D
        ^O^R            ^I^N 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E).  T^H^I^S ^I^S ^T^H^E ^D^E^F^A^U^L^T ^I^F ^Y^O^U^R
      NORMAL  (N)     ^T^E^R^M^I^N^A^L ^I^S ^I^N NORMAL ^M^O^D^E.

      ASCII   (A)     S^E^L^E^C^T^S ASCII 95-^C^H^A^R^A^C^T^E^R ^S^E^T (^I^N^T^E^R^N^A^L^L^Y ^R^E^P^R^E^S^E^N^T^E^D
                      ^I^N 6/12-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E).  T^H^I^S ^I^S ^T^H^E ^D^E^F^A^U^L^T ^I^F
                      ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^S ^A^L^R^E^A^D^Y ^I^N ASCII ^M^O^D^E.

      ASCII8  (8)     S^E^L^E^C^T^S ASCII 128-^C^H^A^R^A^C^T^E^R ^S^E^T (^I^N^T^E^R^N^A^L^L^Y ^R^E^P^R^E^S^E^N^T^E^D
                      ^I^N 7-^B^I^T ASCII ^C^O^D^E ^R^I^G^H^T-^J^U^S^T^I^F^I^E^D ^I^N ^A 12-^B^I^T ^B^Y^T^E).

      GET     (G)     S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^I^S ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^O^R ^A^N ^I^N^D^I^R^E^C^T
                      ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.

      T^O ^S^P^E^C^I^F^Y ^T^H^E OP=^A^C^C^E^S^S ^P^A^R^A^M^E^T^E^R, ^Y^O^U ^M^U^S^T ^A^L^S^O ^S^P^E^C^I^F^Y ^T^H^E FN=^F^I^L^E^N^A^M^E
      ^P^A^R^A^M^E^T^E^R.
.HELP,I,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (I=^I^N^P^U^T) ^S^P^E^C^I^F^I^E^S ^A^N ^I^N^P^U^T ^F^I^L^E ^O^F FSE ^D^I^R^E^C^T^I^V^E^S.
      (A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D INPUT
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^O^U^T^P^U^T) ^S^P^E^C^I^F^I^E^S ^A^N ^O^U^T^P^U^T ^F^I^L^E.

      D^E^F^A^U^L^T@D OUTPUT
.HELP,IP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (IP=^P^R^O^C^E^D^U^R^E) ^D^E^S^I^G^N^A^T^E^S ^A ^F^I^L^E ^A^S ^T^H^E FSE ^P^R^O^C^E^D^U^R^E
      ^L^I^B^R^A^R^Y.

      D^E^F^A^U^L^T@D ^F^I^L^E FSEPROC
.HELP,WF,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WF=^W^O^R^K^F^I^L^E) ^S^P^E^C^I^F^I^E^S ^A ^W^O^R^K ^F^I^L^E ^F^O^R FSE.

      D^E^F^A^U^L^T@D ^F^I^L^E ZZZWORK
.ENDHELP
.EX.  $FSE(#FN=FN,#OP=OP,#I=I,#L=L,#IP=IP,#WF=WF)
*WEOR
.PROC,FTN*I
,ABR[A^B^O^R^T J^O^B S^T^E^P (A)]=(*A1,*N=0)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=LGO)
,BL[S^E^P^A^R^A^T^E O^U^T^P^U^T L^I^S^T^I^N^G (BL)]=(*A1,*N=0)
,CC[C^O^N^T^R^O^L S^T^A^T^E^M^E^N^T (CC)]=(CC,0,*N=0)
,COM[S^P^E^C^I^F^Y COMPASS A^S^S^E^M^B^L^E^R (C)]=(*A1,*N=0)
,DEB[D^E^B^U^G I^N^P^U^T F^I^L^E (D)]=(*F,*N=INPUT)
,DB[CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G F^A^C^I^L^I^T^Y (DB)]=(*A1,*N=0)
,ELFN[O^B^J^E^C^T C^O^D^E O^U^T^P^U^T F^I^L^E (E)]=(*F,*N=COMPS)
,EL[E^R^R^O^R L^E^V^E^L C^O^N^T^R^O^L (EL)]=(*A1,*N=I)
,ER[O^B^J^E^C^T C^O^D^E T^I^M^E R^E^P^R^I^E^V^E (ER)]=(*A2,*N=ER)
,GLFN[S^Y^S^T^E^M T^E^X^T O^V^E^R^L^A^Y F^I^L^E (G)]=(*F,*N=SYSTEXT)
,GO[B^I^N^A^R^Y L^O^A^D A^N^D E^X^E^C^U^T^E (GO)]=(*A1,*N=0)
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,LIST[L^I^S^T^A^B^L^E C^O^M^P^I^L^E^R O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=OUTPUT)
,LCM[A^D^D^R^E^S^S M^O^D^E (LCM)]=(*A1,*N=D)
,ML[S^P^E^C^I^F^Y MODLEVEL M^I^C^R^O V^A^L^U^E (ML)]=(*A3,*N=)
,OL[O^B^J^E^C^T C^O^D^E L^I^S^T^I^N^G F^I^L^E (OL)]=(*A1,*N=0)
,OPT[O^P^T^I^M^I^Z^A^T^I^O^N L^E^V^E^L (OPT)]=(*A3,*N=1)
,PG[P^A^G^E N^U^M^B^E^R^I^N^G (P)]=(*A1,*N=0)
,PD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A1,*N=8)
,PL[N^U^M^B^E^R O^F R^E^C^O^R^D^S T^O B^E W^R^I^T^T^E^N (PL)]=(*A4,*N=5000)
,PMD[E^N^A^B^L^E P^O^S^T^M^O^R^T^E^M D^U^M^P (PMD)]=(*A1,*N=0)
,PS[C^O^M^P^I^L^E^R O^U^T^P^U^T P^A^G^E S^I^Z^E (PS)]=(*A2,*N=80)
,PW[N^U^M^B^E^R O^F C^H^A^R^A^C^T^E^R^S P^E^R L^I^N^E (PW)]=(*A2,*N=72)
,QK[Q^U^I^C^K M^O^D^E (Q)]=(*A1,*N=0)
,REF[R^E^F^E^R^E^N^C^E M^A^P O^P^T^I^O^N^S (R)]=(*A1,*N=2)
,ROU[O^P^E^R^A^T^I^O^N^S R^O^U^N^D^E^D (ROUND)]=(*A1,*N)
,SYS[S^Y^S^T^E^M T^E^X^T O^V^E^R^L^A^Y (S)]=(*F,*N=SYSTEXT)
,SEQ[S^E^Q^U^E^N^C^E^D S^O^U^R^C^E F^I^L^E (SEQ)]=(*A1,*N=0)
,SL[S^O^U^R^C^E P^R^O^G^R^A^M (L P^A^R^A^M^E^T^E^R) F^I^L^E (SL)]=(*A2,*N=SL)
,STA[D^Y^N^A^M^I^C M^E^M^O^R^Y M^A^N^A^G^E^M^E^N^T (STATIC)]=(*A1,*N=0)
,SYSE[D^I^R^E^C^T/I^N^D^I^R^E^C^T I/O R^E^F^E^R^E^N^C^E^S (SYSEDIT)]=(*A1,*N=0)
,TRAC[F^U^L^L E^R^R^O^R T^R^A^C^E^B^A^C^K (T)]=(*A1,*N=0)
,TS[I^N^T^E^R^A^C^T^I^V^E M^O^D^E (TS)]=(*A1,*N)
,UO[U^N^S^A^F^E O^P^T^I^M^I^Z^A^T^I^O^N^S (UO)]=(*A1,*N=0)
,EXT[E^X^T^E^R^N^A^L T^E^X^T F^O^R XTEXT P^S^E^U^D^O I^N^S^T^R^U^C^T^I^O^N F^I^L^E (X)]=(*F,*N=OPL)
,ZERO[Z^E^R^O-W^O^R^D P^A^R^A^M^E^T^E^R L^I^S^T P^A^S^S^I^N^G (Z)]=(*A1,*N=0)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

     F^O^R^M^A^T@D  FTN,A,B=^L^F^N,BL=^B^L,CC,C=^C,D=^L^F^N,DB=^D^B,E=^L^F^N,EL=^E^L,ER=^E^R,G=^L^F^N/^O^V^L,
                  GO=^G^O,I=^L^F^N,L=^L^F^N,LCM=^M,ML=^N^N^N,OL=^O^L,OPT=^N,P,PD=^N,PL=^N,
                  PMD=^P^M^D,PS=^N,PW=^N,Q=^Q,R=^N,ROUND=^O^P,S=^L^I^B/^O^V^L,SEQ=^S^E^Q,SL=^S^L,
                  STATIC=^S^T^A^T^I^C,SYSEDIT=^S^Y^S^E^D^I^T,T=^T,TS,UO=^U^O,X=^L^F^N,Z.

      T^H^E ^C^O^M^M^A^N^D FTN ^C^A^L^L^S ^T^H^E FORTRAN E^X^T^E^N^D^E^D V^E^R^S^I^O^N 4 ^C^O^M^P^I^L^E^R.
.HELP,ABR,NOLIST

      F^O^R^M^A^T@D  A

      T^H^E ^P^A^R^A^M^E^T^E^R A ^S^P^E^C^I^F^I^E^S ^T^O ^A^B^O^R^T ^T^H^E ^J^O^B ^S^T^E^P ^I^F ^A ^F^A^T^A^L ^C^O^M^P^I^L^A^T^I^O^N
      ^E^R^R^O^R ^O^C^C^U^R^S.  I^F A=0, ^C^O^N^T^R^O^L ^T^R^A^N^S^F^E^R^S ^T^O ^T^H^E ^N^E^X^T ^C^O^M^M^A^N^D, ^R^E^G^A^R^D^L^E^S^S
      ^O^F ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^I^F ^F^A^T^A^L ^C^O^M^P^I^L^A^T^I^O^N ^E^R^R^O^R^S ^O^C^C^U^R.  I^F A ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S A=0.
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O ^B^I^N^A^R^Y
      ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,BL,NOLIST

      F^O^R^M^A^T@D  BL=^B^L

      T^H^E ^P^A^R^A^M^E^T^E^R BL ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^G^E^N^E^R^A^T^E ^A ^S^E^P^A^R^A^T^E ^O^U^T^P^U^T ^L^I^S^T^I^N^

      I^F BL=0, ^L^I^S^T^I^N^G^S ^A^R^E ^G^E^N^E^R^A^T^E^D ^I^N ^C^O^M^P^A^C^T ^F^O^R^M^A^T.  I^F BL ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S BL=0.
.HELP,CC,NOLIST

      F^O^R^M^A^T@D  CC

      T^H^E ^P^A^R^A^M^E^T^E^R CC ^C^A^U^S^E^S ^T^H^E FORTRAN E^X^T^E^N^D^E^D ^C^O^M^P^I^L^E^R ^T^O ^I^N^T^E^R^P^R^E^T ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T ^A^S ^A ^C^O^N^T^I^N^U^A^T^I^O^N ^O^F ^T^H^E FTN ^C^O^N^T^R^O^L
      ^S^T^A^T^E^M^E^N^T, ^T^H^U^S ^A^L^L^O^W^I^N^G ^T^H^E FTN ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T ^T^O ^B^E ^C^O^N^T^I^N^U^E^D ^O^N ^M^O^

      ^T^H^A^N ^O^N^E ^L^I^N^E.  T^H^E CC ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^R^E^P^E^A^T^E^D ^O^N ^E^A^C^H ^S^T^A^T^E^M^E^N^T ^I^N
      ^T^H^E ^S^E^Q^U^E^N^C^E ^W^I^T^H ^T^H^E ^E^X^C^E^P^T^I^O^N ^O^F ^T^H^E ^L^A^S^T ^S^T^A^T^E^M^E^N^T ^I^N ^T^H^E ^S^E^Q^U^E^N^C^E;
      ^T^H^E CC ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^N^O^T ^A^P^P^E^A^R ^O^N ^T^H^E ^L^A^S^T ^S^T^A^T^E^M^E^N^T ^I^N ^T^H^E ^S^E^Q^U^E^N^C^E.
      E^A^C^H ^S^T^A^T^E^M^E^N^T ^I^N ^T^H^E ^S^E^Q^U^E^N^C^E ^O^F ^C^O^N^T^I^N^U^E^D ^S^T^A^T^E^M^E^N^T^S ^M^U^S^T ^B^E ^T^E^R^M^I^N^A^
D
      ^B^Y ^A ^P^E^R^I^O^D ^O^R ^A ^R^I^G^H^T ^P^A^R^E^N^T^H^E^S^I^S.  I^F CC=0, ^T^H^E FTN ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T
      ^A^P^P^E^A^R^S ^O^N ^O^N^E ^L^I^N^E ^O^N^L^Y.  I^F CC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S CC=0.
.HELP,COM,NOLIST

      F^O^R^M^A^T@D  C=^C

      T^H^E ^P^A^R^A^M^E^T^E^R C ^S^P^E^C^I^F^I^E^S ^T^H^E COMPASS ^A^S^S^E^M^B^L^E^R ^U^S^E^D ^F^O^R ^S^Y^M^B^O^L^I^C ^O^B^J^E^C^T
      ^C^O^D^E.  I^F C=0, ^T^H^E FORTRAN ^I^N^T^E^R^N^A^L ^A^S^S^E^M^B^L^E^R ^I^S ^S^E^L^E^C^T^E^D ^R^E^G^A^R^D^L^E^S^S ^O^F
      ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T.  I^F C ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S C=0.
.HELP,DEB,NOLIST

      F^O^R^M^A^T@D  D=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R D ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^B^U^G ^I^N^P^U^T ^F^I^L^E ^O^B^T^A^I^N^E^D ^F^R^O^M ^L^F^N.  I^F D=0,
      ^D^E^B^U^G ^S^T^A^T^E^M^E^N^T^S ^A^R^E ^I^G^N^O^R^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S D=INPUT
      (OPT=0 ^A^N^D T ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D).  I^F D ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S D=0.
.HELP,DB,NOLIST

      F^O^R^M^A^T@D  DB=^D^B

      T^H^E ^P^A^R^A^M^E^T^E^R DB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G F^A^C^I^L^I^T^Y ^B^E
      ^T^U^R^N^E^D ^O^N (DB ^O^R DB=ID); ^L^I^N^E ^N^U^M^B^E^R ^T^A^B^L^E ^A^N^D ^S^Y^M^B^O^L ^T^A^B^L^E ^A^R^E ^G^E^N^E^R^A^T^E^D.
      T^H^E TS ^O^P^T^I^O^N ^I^S ^S^E^L^E^C^T^E^D.  I^F DB=0, ^N^O ^D^E^B^U^G ^T^A^B^L^E^S ^A^R^E ^G^E^N^E^R^A^T^E^D; ^T^H^E
      CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G F^A^C^I^L^I^T^Y ^I^S ^T^U^R^N^E^D ^O^F^F ^I^F ^T^H^E DEBUG ^S^T^A^T^E^M^E^N^T
      ^T^U^R^N^E^D ^I^T ^O^N.  I^F DB ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DB=0.
.HELP,ELFN,NOLIST

      F^O^R^M^A^T@D  E=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^O^U^T^P^U^T ^F^I^L^E ^L^F^N ^A^S ^T^H^E COMPASS
      ^S^T^A^T^E^M^E^N^T ^I^M^A^G^E^S ^F^O^R ^I^N^P^U^T ^T^O U^P^D^A^T^E ^A^N^D M^O^D^I^F^Y.  I^F E=0, ^A ^N^O^R^M^A^L ^B^I^N^A^R^Y
      ^O^B^J^E^C^T ^F^I^L^E ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=COMPS.
      T^H^E ^D^E^F^A^U^L^T ^I^S E=0.
.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R EL ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^E^V^E^L ^C^O^N^T^R^O^L.  I^F EL ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S EL=I.

         ^L^F^N                       M^E^A^N^I^N^G
         ---                       -------
         A       L^I^S^T ^F^A^T^A^L ^A^N^D ^N^O^N-ANSI.  L^I^S^T ^I^N^F^O^R^M^A^T^I^V^E ^F^O^R OPT=0, 1, ^O^R 2.
                 L^I^S^T ^N^O^T^E^S ^A^N^D ^W^A^R^N^I^N^G^S ^F^O^R TS ^M^O^D^E.

         F       L^I^S^T ^F^A^T^A^L.

         I       L^I^S^T ^F^A^T^A^L ^A^N^D ^I^N^F^O^R^M^A^T^I^V^E ^F^O^R OPT=0, 1, ^O^R 2.
                 L^I^S^T ^N^O^T^E^S, ^F^A^T^A^L, ^A^N^D ^W^A^R^N^I^N^G^S ^F^O^R TS ^M^O^D^E.

         N       L^I^S^T ^F^A^T^A^L, ^N^O^T^E^S ^A^N^D ^W^A^R^N^I^N^G^S ^F^O^R TS ^M^O^D^E.
                 L^I^S^T ^F^A^T^A^L ^F^O^R OPT=0, 1, ^O^R 2.

         W       L^I^S^T ^F^A^T^A^L ^A^N^D ^W^A^R^N^I^N^G^S ^F^O^R TS ^M^O^D^E.
                 L^I^S^T ^F^A^T^A^L ^F^O^R OPT=0, 1, ^O^R 2.
.HELP,ER,NOLIST

      F^O^R^M^A^T@D  ER=^E^R

      T^H^E ^P^A^R^A^M^E^T^E^R ER ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^F^O^R ^T^I^M^E ^R^E^P^R^I^E^V^E ^B^E
      ^I^N^C^L^U^D^E^D.  I^F ER=0, ^N^O ^O^B^J^E^C^T ^T^I^M^E ^R^E^P^R^I^E^V^E ^C^O^D^E ^I^S ^I^N^C^L^U^D^E^D.  I^F ER ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ER ^I^F ^I^N TS ^O^R OPT=0 ^M^O^D^E.  I^F OPT=1 ^O^R 2, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ER=0.
.HELP,GLFN,NOLIST

      F^O^R^M^A^T@D  G=^L^F^N/^O^V^L

      T^H^E ^P^A^R^A^M^E^T^E^R G ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y ^W^I^T^H ^N^A^M^E ^O^V^L
      ^L^O^A^D^E^D ^F^R^O^M ^F^I^L^E ^L^F^N.  I^F G=0, ^N^O ^S^Y^S^T^E^M ^T^E^X^T ^I^S ^L^O^A^D^E^D.  I^F /^O^V^L ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y ^I^S ^L^O^A^D^E^D ^F^R^O^M ^F^I^L^E ^L^F^N.  I^F
      ^L^F^N/^O^V^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S G=SYSTEXT.  I^F G ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S G=0.
.HELP,GO,NOLIST

      F^O^R^M^A^T@D  GO=^G^O

      T^H^E ^P^A^R^A^M^E^T^E^R GO ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^B^I^N^A^R^Y ^O^B^J^E^C^T ^F^I^L^E (B ^O^P^T^I^O^N) ^B^E
      ^L^O^A^D^E^D ^A^N^D ^E^X^E^C^U^T^E^D ^A^F^T^E^R ^C^O^M^P^I^L^A^T^I^O^N.  I^F GO=0, ^T^H^E ^B^I^N^A^R^Y ^O^B^J^E^C^T ^F^I^L^E
      ^I^S ^N^O^T ^L^O^A^D^E^D ^A^N^D ^E^X^E^C^U^T^E^D.  I^F GO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S GO=0.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.   I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,LIST,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^A^B^L^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T (BL, EL, OL, R,
      ^A^N^D SL ^O^P^T^I^O^N^S) ^F^I^L^E ^L^F^N.  I^F L=0, ^O^N^L^Y ^F^A^T^A^L ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D ^S^T^A^T^E^M^E^N^T^S
      ^T^H^A^T ^C^A^U^S^E^D ^T^H^E^M ^A^R^E ^L^I^S^T^E^D ^O^N ^F^I^L^E OUTPUT.  I^F L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S L=OUTPUT.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT.
.HELP,LCM,NOLIST

      F^O^R^M^A^T@D  LCM=^M

      T^H^E ^P^A^R^A^M^E^T^E^R LCM ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^D^D^R^E^S^S ^M^O^D^E ^F^O^R ^L^E^V^E^L 3 (^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y)
      ^D^A^T^A.  I^F LCM ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LCM=D.  I^F ^M ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LCM=D.

         ^M                         M^E^A^N^I^N^G
         -                         -------
         D        D^I^R^E^C^T ^M^O^D^E; ^S^E^L^E^C^T 17-^B^I^T ^A^D^D^R^E^S^S.

         I        I^N^D^I^R^E^C^T ^M^O^D^E; ^S^E^L^E^C^T 21-^B^I^T ^A^D^D^R^E^S^S.
.HELP,ML,NOLIST

      F^O^R^M^A^T@D  ML=^N^N^N

      T^H^E ^P^A^R^A^M^E^T^E^R ML ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N^N^N ^B^E ^U^S^E^D ^F^O^R ^T^H^E ^V^A^L^U^E ^O^F ^T^H^E MODLEVEL
      ^M^I^C^R^O.  I^F ML ^O^R ^N^N^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T ^D^A^T^E ^I^N ^T^H^E
      ^F^O^R^M ^Y^Y^D^D^D.
.HELP,OL,NOLIST

      F^O^R^M^A^T@D  OL=^O^L

      T^H^E ^P^A^R^A^M^E^T^E^R OL ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^B^E ^L^I^S^T^E^D ^O^N ^T^H^E ^F^I^L^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E L ^P^A^R^A^M^E^T^E^R.  I^F OL=0, ^T^H^E ^O^B^J^E^C^T ^C^O^D^E ^I^S ^N^O^T ^L^I^S^T^E^D.
      I^F OL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OL=0.
.HELP,OPT,NOLIST

      F^O^R^M^A^T@D  OPT=^N

      T^H^E ^P^A^R^A^M^E^T^E^R OPT ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^E^V^E^L ^O^F ^O^P^T^I^M^I^Z^A^T^I^O^N.  I^F ^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OPT=2.  I^F OPT ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OPT=1.

         ^N                         M^E^A^N^I^N^G
         -                         -------
         0       F^A^S^T ^C^O^M^P^I^L^A^T^I^O^N.  T ^A^N^D ER ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D.

         1       S^T^A^N^D^A^R^D ^C^O^M^P^I^L^A^T^I^O^N ^A^N^D ^E^X^E^C^U^T^I^O^N.

         2       M^A^X^I^M^U^M ^O^P^T^I^M^I^Z^A^T^I^O^N.
.HELP,PG,NOLIST

      F^O^R^M^A^T@D  P

      T^H^E ^P^A^R^A^M^E^T^E^R P ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^P^A^G^E ^N^U^M^B^E^R^I^N^G ^P^R^O^C^E^E^D ^C^O^N^T^I^N^U^A^L^L^Y ^F^R^O^M
      ^S^U^B^P^R^O^G^R^A^M ^T^O ^S^U^B^P^R^O^G^R^A^M.  I^F P=0, ^P^A^G^E ^N^U^M^B^E^R^I^N^G ^B^E^G^I^N^S ^A^T 1 ^F^O^R ^E^A^C^H
      ^S^U^B^P^R^O^G^R^A^M.  I^F P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S P=0.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^T^H^E ^C^O^M^P^I^L^E^R
      ^L^I^S^T^I^N^G^S.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PD=8.  I^F PD ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S PD=6.

         ^N               M^E^A^N^I^N^G
         -               -------
         6        S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         8        E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,PL,NOLIST

      F^O^R^M^A^T@D  PL=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PL ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N ^I^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^E^X^E^C^U^T^I^O^N ^T^I^M^
      ^R^E^C^O^R^D^S ^T^O ^B^E ^W^R^I^T^T^E^N ^O^N ^F^I^L^E OUTPUT@D  ^N<=9999999 ^O^R ^N<777777 ^O^C^T^A^L.  I^F
      PL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PL=5000.
.HELP,PMD,NOLIST

      F^O^R^M^A^T@D  PMD=^P^M^D

      T^H^E ^P^A^R^A^M^E^T^E^R PMD ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^N^A^B^L^I^N^G ^O^F ^T^H^E ^P^O^S^T^M^O^R^T^E^M ^D^U^M^P.  I^F
      PMD=0, ^T^H^E ^P^O^S^T^M^O^R^T^E^M ^D^U^M^P ^I^S ^D^I^S^A^B^L^E^D.  I^F PMD ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S PMD=0.
.HELP,PS,NOLIST

      F^O^R^M^A^T@D  PS=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PS ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^P^A^G^E ^S^I^Z^E ^B^E ^N
      ^P^R^I^N^T^A^B^L^E ^L^I^N^E^S ^P^E^R ^P^A^G^E.  I^F PS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PS=60 ^I^F
      PD=6 ^O^R PS=80 ^I^F PD=8.
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PW ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^I^N ^A ^L^I^N^E
      ^O^F ^P^R^I^N^T^E^D ^O^U^T^P^U^T.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PW=72.  I^F PW ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PW=126 ^I^F ^O^U^T^P^U^T ^G^O^E^S ^T^O ^T^H^E ^P^R^I^N^T^E^R ^O^R PW=72
      ^I^F ^O^U^T^P^U^T ^G^O^E^S ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
.HELP,QK,NOLIST

      F^O^R^M^A^T@D  Q=^Q

      T^H^E ^P^A^R^A^M^E^T^E^R Q ^S^P^E^C^I^F^I^E^S ^T^H^E ^Q^U^I^C^K ^M^O^D^E; ^F^U^L^L ^S^Y^N^T^A^C^T^I^C ^S^C^A^N ^I^S ^P^E^R^F^O^R^M

      ^A^N^D ^O^B^J^E^C^T ^C^O^D^E ^I^S ^S^U^P^P^R^E^S^S^E^D.  I^F Q=0, ^C^O^M^P^I^L^A^T^I^O^N ^I^S ^N^O^R^M^A^L.  I^F Q ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S Q=0.
.HELP,REF,NOLIST

      F^O^R^M^A^T@D  R=^N

      T^H^E ^P^A^R^A^M^E^T^E^R R ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^F^E^R^E^N^C^E ^M^A^P ^O^P^T^I^O^N^S.  I^F ^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S R=2.  I^F R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S R=1.

         ^N                        M^E^A^N^I^N^G
         -                        -------
         0        N^O ^M^A^P.

         1        S^H^O^R^T ^M^A^P.

         2        L^O^N^G^E^R ^M^A^P.

         3        L^O^N^G^E^S^T ^M^A^P ^W^I^T^H ^C^O^M^M^O^N ^B^L^O^C^K ^A^N^D ^E^Q^U^I^V^A^L^E^N^C^E ^G^R^O^U^P^S.
.HELP,ROU,NOLIST

      F^O^R^M^A^T@D  ROUND=^O^P

      T^H^E ^P^A^R^A^M^E^T^E^R ROUND ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N-^L^I^N^E ^M^O^D^E ^C^O^M^P^U^T^A^T^I^O^N ^W^H^I^C^H
      ^I^N^D^I^C^A^T^E^S ^T^H^E ^O^P^E^R^A^T^I^O^N^S ^T^O ^B^E ^R^O^U^N^D^E^D@D  ^O^P= + - * / (^M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S
      ^A^L^L^O^W^E^D ^F^O^R ^E^X^A^M^P^L^E@D  +,-,* ).  I^F ROUND=0, ^C^O^M^P^U^T^A^T^I^O^N ^I^S ^N^O^T ^R^O^U^N^D^E^D.
      I^F ^O^P ^I^S ^O^M^I^T^T^E^D, ^A^L^L ^O^P^E^R^A^T^I^O^N^S ^A^R^E ^R^O^U^N^D^E^D.  I^F ROUND ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ROUND=0.
.HELP,SYS,NOLIST

      F^O^R^M^A^T@D  S=^L^I^B/^O^V^L

      T^H^E ^P^A^R^A^M^E^T^E^R S ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y (^O^V^L), ^I^S ^L^O^A^D^E^D
      ^F^R^O^M ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^O^R ^S^Y^S^T^E^M ^L^I^B^R^A^R^Y, (^L^I^B).  I^F S=0, ^S^Y^S^T^E^M ^T^E^X^T ^F^I^L^E
      ^I^S ^N^O^T ^L^O^A^D^E^D.  I^F ^L^I^B/ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y (^O^V^L), ^I^S
      ^L^O^A^D^E^D ^F^R^O^M ^T^H^E ^L^I^B^R^A^R^Y ^S^E^T ^W^H^E^N COMPASS ^I^S ^C^A^L^L^E^D ^T^O ^A^S^S^E^M^B^L^E ^I^N^T^E^R^M^I^X^E^D
      COMPASS ^P^R^O^G^R^A^M^S.  I^F ^L^I^B/^O^V^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S S=SYSTEXT.  I^F
      S ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S S=SYSTEXT ^I^F G=0; ^O^T^H^E^R^W^I^S^E S=0.
.HELP,SEQ,NOLIST

      F^O^R^M^A^T@D  SEQ=^S^E^Q

      T^H^E ^P^A^R^A^M^E^T^E^R SEQ ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^F^I^L^E ^T^O ^B^E ^I^N ^S^E^Q^U^E^N^C^E^D ^L^I^N^E
      ^F^O^R^M^A^T.  T^H^E TS ^O^P^T^I^O^N ^I^S ^S^E^L^E^C^T^E^D.  I^F SEQ=0, ^T^H^E ^F^I^L^E ^I^S ^I^N ^S^T^A^N^D^A^R^D
      FORTRAN ^F^O^R^M^A^T.  I^F SEQ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SEQ=0.
.HELP,SL,NOLIST

      F^O^R^M^A^T@D  SL=^S^L

      T^H^E ^P^A^R^A^M^E^T^E^R SL ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^O^N ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^B^Y
      ^T^H^E L ^P^A^R^A^M^E^T^E^R.  I^F SL=0, ^N^O ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^I^S ^L^I^S^T^E^D.  I^F SL ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S SL.
.HELP,STA,NOLIST

      F^O^R^M^A^T@D  STATIC=^S^T^A^T^I^C

      T^H^E ^P^A^R^A^M^E^T^E^R STATIC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^D^Y^N^A^M^I^C ^M^E^M^O^R^Y ^M^A^N^A^G^E^M^E^N^T ^A^T
      ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^B^Y CRM ^I^S ^I^N^H^I^B^I^T^E^D.  I^F STATIC=0, ^D^Y^N^A^M^I^C ^M^E^M^O^R^Y
      ^M^A^N^A^G^E^M^E^N^T ^I^S ^U^S^E^D ^A^T ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^B^Y CRM.  I^F STATIC ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S STATIC=0.
.HELP,SYSE,NOLIST

      F^O^R^M^A^T@D  SYSEDIT=^S^Y^S^E^D^I^T

      T^H^E ^P^A^R^A^M^E^T^E^R SYSEDIT ^S^P^E^C^I^F^I^E^S ^T^H^E I/O ^R^E^F^E^R^E^N^C^E^S ^D^O^N^E ^I^N^D^I^R^E^C^T^L^Y ^T^H^R^O^U^G^H
      ^T^H^E ^T^A^B^L^E ^S^E^A^R^C^H ^A^T ^O^B^J^E^C^T ^T^I^M^E.  I^F SYSEDIT=0, I/O ^R^E^F^E^R^E^N^C^E^S ^A^R^E ^D^O^N^E
      ^D^I^R^E^C^T^L^Y.  I^F SYSEDIT ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SYSEDIT=0.
.HELP,TRAC,NOLIST

      F^O^R^M^A^T@D  T=^T

      T^H^E ^P^A^R^A^M^E^T^E^R T ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^U^L^L ^E^R^R^O^R ^T^R^A^C^E^B^A^C^K.  I^F T=0, ^T^H^E^R^E ^I^S ^N^O
      ^E^R^R^O^R ^T^R^A^C^E^B^A^C^K.  I^F T ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S T=0.
.HELP,TS,NOLIST

      F^O^R^M^A^T@D  TS

      T^H^E ^P^A^R^A^M^E^T^E^R TS ^S^P^E^C^I^F^I^E^S ^I^N^T^E^R^A^C^T^I^V^E ^M^O^D^E. C^O^M^P^I^L^A^T^I^O^N ^S^P^E^E^D ^A^N^D ^F^I^E^L^D
      ^L^E^N^G^T^H ^A^R^E ^O^P^T^I^M^I^Z^E^D.  I^F TS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^S^T^A^N^D^A^R^D
      ^C^O^M^P^I^L^A^T^I^O^N ^A^N^D ^E^X^E^C^U^T^I^O^N.
.HELP,UO,NOLIST

      F^O^R^M^A^T@D  UO=^U^O

      T^H^E ^P^A^R^A^M^E^T^E^R UO ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^C^A^N ^P^E^R^F^O^R^M ^P^O^T^E^N^T^I^A^L^L^Y
      ^U^N^S^A^F^E ^O^P^T^I^M^I^Z^A^T^I^O^N^S; ^T^H^I^S ^I^S ^I^G^N^O^R^E^D ^U^N^L^E^S^S OPT=2 ^I^S ^S^P^E^C^I^F^I^E^D.  I^F
      UO=0, ^U^N^S^A^F^E ^O^P^T^I^M^I^Z^A^T^I^O^N ^I^S ^N^O^T ^P^E^R^F^O^R^M^E^D.  I^F UO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S UO=0.
.HELP,EXT,NOLIST

      F^O^R^M^A^T@D  X=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^T^E^R^N^A^L ^T^E^X^T ^F^O^R XTEXT ^P^S^E^U^D^O ^I^N^S^T^R^U^C^T^I^O^N
      ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OPL.  I^F X ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OLDPL.
.HELP,ZERO,NOLIST

      F^O^R^M^A^T@D  Z

      T^H^E ^P^A^R^A^M^E^T^E^R Z ^S^P^E^C^I^F^I^E^S ^T^H^E ^Z^E^R^O-^W^O^R^D ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^P^A^S^S^E^D.  I^F Z=0,
      ^Z^E^R^O-^W^O^R^D ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^I^S ^N^O^T ^P^A^S^S^E^D.  I^F Z ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S Z=0.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,FTN5*I
,AL[C^O^N^T^R^O^L P^L^A^C^E^M^E^N^T ^O^F C^O^M^M^O^N B^L^O^C^K (AL)]=(A,0,AL,*N=AL)
,ANSI[N^O^N-ANSI L^A^N^G^U^A^G^E E^X^T^E^N^S^I^O^N^S (ANSI)]=(*A1,*N=T)
,ARG[F^O^R^M^A^T A^R^G^U^M^E^N^T L^I^S^T^S G^E^N^E^R^A^T^E^D (ARG)]=(*A13,*N=0)
,BIN[B^I^N^A^R^Y O^U^T^P^U^T F^I^L^E (B)]=(*F,*N=BIN)
,BL[S^E^P^A^R^A^T^E O^U^T^P^U^T L^I^S^T^I^N^G (BL)]=(*A1,*N=0)
,CS[W^E^I^G^H^T T^A^B^L^E (CS)]=(*A5,*N=FIXED)
,DB[D^E^B^U^G^G^I^N^G O^P^T^I^O^N^S (DB)]=(*A15,*N=$ER/PMD/SB/SL/TB$)
,DO[S^P^E^C^I^F^Y D^O L^O^O^P C^O^N^T^R^O^L (DO)]=(*A4,*N=OT)
,DS[T^R^E^A^T C$ D^I^R^E^C^T^I^V^E^S A^S C^O^M^M^E^N^T^S (DS)]=(*A1,*N=0)
,EC[E^X^T^E^N^D^E^D M^E^M^O^R^Y U^S^A^G^E (EC)]=(EC,0,*N=EC)
,ERR[E^R^R^O^R L^I^N^E A^N^D D^I^A^G^N^O^S^T^I^C^S F^I^L^E (E)]=(*F,*N=ERRS)
,EL[E^R^R^O^R L^E^V^E^L C^O^N^T^R^O^L (EL)]=(*A2,*N=T)
,ET[A^B^O^R^T J^O^B S^T^E^P (ET)]=(*A1,*N=F)
,GLFN[S^Y^S^T^E^M T^E^X^T O^V^E^R^L^A^Y (G)]=(*F,*N=SYSTEXT)
,GO[B^I^N^A^R^Y L^O^A^D^E^D A^N^D E^X^E^C^U^T^E^D (GO)]=(*A1,*N=0)
,MD[M^A^C^H^I^N^E D^E^P^E^N^D^E^N^T D^I^A^G^N^O^S^T^I^C^S (MD)]=(MD,0,T,F,*N=T)
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,LIST[L^I^S^T^A^B^L^E C^O^M^P^I^L^E^R O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=LIST)
,LCM[A^D^D^R^E^S^S M^O^D^E (LCM)]=(*A1,*N=I)
,LO[L^I^S^T^I^N^G O^P^T^I^O^N^S (LO)]=(*A5,*N=$A/R/S$)
,ML[S^P^E^C^I^F^Y MODLEVEL M^I^C^R^O V^A^L^U^E (ML)]=(*A1,*N=0)
,OPT[O^P^T^I^M^I^Z^A^T^I^O^N L^E^V^E^L (OPT)]=(*A1,*N=2)
,PD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A1,*N=8)
,PL[S^P^E^C^I^F^Y N^U^M^B^E^R O^F T^I^M^E R^E^C^O^R^D^S (PL)]=(*A5,*N=50000)
,PN[P^A^G^E N^U^M^B^E^R^I^N^G (PN)]=(*A1,*N=0)
,PS[P^A^G^E S^I^Z^E (PS)]=(*A2,*N=80)
,PW[C^H^A^R^A^C^T^E^R^S P^E^R L^I^N^E (PW)]=(*A2,*N=72)
,QC[Q^U^I^C^K M^O^D^E (QC)]=(*A1,*N=0)
,REW[R^E^W^I^N^D F^I^L^E (REW)]=(*A3,*N=$B/I$)
,RD[I^N^D^I^C^A^T^E O^P^E^R^A^T^I^O^N^S R^O^U^N^D^E^D (ROUND)]=(*A7,*N=$A/S/M/D$)
,STAT[S^T^A^T^I^C L^O^A^D (STATIC)]=(STATIC,0,*N=STATIC)
,SYS[S^Y^S^T^E^M T^E^X^T O^V^E^R^L^A^Y (S)]=(*A1,*N)
,SEQ[S^E^Q^U^E^N^C^E^D S^O^U^R^C^E F^I^L^E (SEQ)]=(*A1,*N=0)
,TM[T^A^R^G^E^T M^A^C^H^I^N^E (TM)]=(0,TM,LCM,*N=0)
,XLFN[S^P^E^C^I^F^Y COMPASS E^X^T^E^R^N^A^L T^E^X^T F^I^L^E (X)]=(*F,*N=OPL)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  FTN5,AL,ANSI=^S,ARG=^A^R^G,B=^L^F^N,BL,CS=^C^S,DB=^D^B,DO=^D^O,DS,E=^L^F^N,EC,
                 EL=^E^L,ET=^E,G=^L^F^N-^R^E^C^N^A^M^E,GO=^G^O,I=^L^F^N,L=^L^F^N,LCM=^M,LO=^O^P,MD,
                 ML=^S^T^R,OPT=^N,PD=^N,PL=^N,PN,PS=^N,PW=^N,QC,REW=^L^F^N,ROUND=^S,
                 S=^L^I^B-^S^N^A^M^E,SEQ,STATIC,TM,X=^L^F^N.

      T^H^E ^C^O^M^M^A^N^D FTN5 ^C^A^L^L^S ^T^H^E FORTRAN 5 ^C^O^M^P^I^L^E^R.
.HELP,AL,NOLIST

      F^O^R^M^A^T@D  AL

      T^H^E ^P^A^R^A^M^E^T^E^R AL ^S^P^E^C^I^F^I^E^S ^C^O^N^T^R^O^L ^O^F ^T^H^E ^P^L^A^C^E^M^E^N^T ^O^F ^C^O^M^M^O^N ^B^L^O^C^K^S
      ^O^N ^M^A^C^H^I^N^E^S ^W^I^T^H LCM ^O^R UEM (800 S^E^R^I^E^S).  I^F AL ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S ^T^H^E ^S^A^M^E ^A^S AL=0.
.HELP,ANSI,NOLIST

      F^O^R^M^A^T@D  ANSI=^S

      T^H^E ^P^A^R^A^M^E^T^E^R ANSI ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^N^O^N-ANSI ^L^A^N^G^U^A^G^E ^E^X^T^E^N^S^I^O^N^S ^B^E
      ^T^R^E^A^T^E^D ^A^S ^E^R^R^O^R^S ^W^I^T^H ^S^E^V^E^R^I^T^Y ^S^P^E^C^I^F^I^E^D ^B^Y ^S.  I^F ^S ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ANSI=T.  I^F ANSI ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ANSI=0.

         ^S                        M^E^A^N^I^N^G
         -                        -------
         F        F^A^T^A^L ^E^R^R^O^R.

         T        T^R^I^V^I^A^L ^E^R^R^O^R.

         0        N^O ANSI ^D^I^A^G^N^O^S^T^I^C^S ^A^R^E ^G^E^N^E^R^A^T^E^D.
.HELP,ARG,NOLIST

      F^O^R^M^A^T@D  ARG=^A^R^G

      T^H^E ^P^A^R^A^M^E^T^E^R ARG ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^O^R^M^A^T ^T^O ^B^E ^U^S^E^D ^O^N ^T^H^E ^E^X^T^E^R^N^A^L
      ^P^R^O^C^E^D^U^R^E ^A^R^G^U^M^E^N^T ^L^I^S^T^S ^G^E^N^E^R^A^T^E^D ^B^Y ^T^H^E ^C^O^M^P^I^L^E^R.  I^F ^A^R^G ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S ARG=-COMMON/FIXED.  I^F ARG ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      ARG=0.

         ^A^R^G                             M^E^A^N^I^N^G
         ---                             -------
         COMMON         S^P^E^C^I^F^Y ^I^N^T^E^R^L^A^N^G^U^A^G^E ^C^O^M^M^U^N^I^C^A^T^I^O^N ^F^O^R^M^A^T.

         -COMMON        R^E^V^E^R^S^E ^S^P^E^C^I^F^I^C^A^T^I^O^N ^O^F ^I^N^T^E^R^L^A^N^G^U^A^G^E ^C^O^M^M^U^N^I^C^A^T^I^O^N
                        ^F^O^R^M^A^T.

         FIXED          S^P^E^C^I^F^Y ^T^H^A^T ^A^L^L ^R^E^F^E^R^E^N^C^E^S ^H^A^V^E ^T^H^E ^S^A^M^E ^N^U^M^B^E^R ^O^F
                        ^A^R^G^U^M^E^N^T^S.

         -FIXED         R^E^V^E^R^S^E ^S^P^E^C^I^F^I^C^A^T^I^O^N ^S^O ^T^H^A^T ^A^L^L ^R^E^F^E^R^E^N^C^E^S ^H^A^V^E ^T^H^E
                        ^S^A^M^E ^N^U^M^B^E^R ^O^F ^A^R^G^U^M^E^N^T^S.

         0              S^A^M^E ^A^S ARG=-COMMON/-FIXED.
.HELP,BIN,NOLIST

      F^O^R^M^A^T@D  B=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O ^B^I^N^A^R^Y
      ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=BIN.  I^F B ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,BL,NOLIST

      F^O^R^M^A^T@D  BL

      T^H^E ^P^A^R^A^M^E^T^E^R BL ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^S^E^P^A^R^A^T^E ^O^U^T^P^U^T ^L^I^S^T^I^N^G ^B^E ^G^E^N^E^R^A^T^E^D.
      I^F BL=0, ^L^I^S^T^I^N^G^S ^A^R^E ^G^E^N^E^R^A^T^E^D ^I^N ^C^O^M^P^A^C^T ^F^O^R^M^A^T.  I^F BL ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S BL=0.
.HELP,CS,NOLIST

      F^O^R^M^A^T@D  CS=^C^S

      T^H^E ^P^A^R^A^M^E^T^E^R CS ^S^P^E^C^I^F^I^E^S ^W^H^A^T ^W^E^I^G^H^T ^T^A^B^L^E ^I^S ^T^O ^B^E ^U^S^E^D ^F^O^R ^T^H^E
      ^E^V^A^L^U^A^T^I^O^N ^O^F ^T^H^E ^C^H^A^R^A^C^T^E^R ^R^E^L^A^T^I^O^N^A^L ^E^X^P^R^E^S^S^I^O^N^S.  I^F ^C^S ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S CS=FIXED.  I^F CS ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S CS=USER.

         ^C^S                        M^E^A^N^I^N^G
         --                        -------
         USER     U^S^E^R-^S^P^E^C^I^F^I^E^D ^W^E^I^G^H^T ^T^A^B^L^E.

         FIXED    F^I^X^E^D ^W^E^I^G^H^T ^T^A^B^L^E.
.HELP,DB,NOLIST

      F^O^R^M^A^T@D  DB=^D^B

      T^H^E ^P^A^R^A^M^E^T^E^R DB ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S
      ^F^O^R ^T^H^E DB ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, DB=ER/ID).
      I^F ^D^B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DB=ER/PMD/SB/SL/TB.  I^F DB ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^S^A^M^E ^A^S DB=0, ^I^F OPT=1, 2, ^O^R 3; DB=O/ER ^I^F OPT=0.

         ^D^B                        M^E^A^N^I^N^G
         --                        -------
         ER       E^N^A^B^L^E ^E^R^R^O^R ^R^E^C^O^V^E^R^Y.

         ID       T^U^R^N ^O^N CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G F^A^C^I^L^I^T^Y; ^G^E^N^E^R^A^T^E ^L^I^N^E ^N^U^M^B^E^R
                  ^T^A^B^L^E, ^S^Y^M^B^O^L ^T^A^B^L^E, ^A^N^D ^S^P^E^C^I^A^L ^O^B^J^E^C^T ^C^O^D^E.

         PMD      E^N^A^B^L^E ^P^O^S^T^M^O^R^T^E^M ^D^U^M^P.

         SB       C^H^E^C^K ^T^H^A^T ^A^R^R^A^Y ^E^L^E^M^E^N^T ^R^E^F^E^R^E^N^C^E^S ^A^R^E ^W^I^T^H^I^N ^T^H^E ^A^R^R^A^Y.

         SL       C^H^E^C^K ^T^H^A^T ^S^U^B^S^T^R^I^N^G ^R^E^F^E^R^E^N^C^E^S ^A^R^E ^W^I^T^H^I^N ^T^H^E ^S^T^R^I^N^G.

         ST       S^A^M^E ^A^S DB=ID, ^E^X^C^E^P^T ^D^O ^N^O^T ^G^E^N^E^R^A^T^E ^S^P^E^C^I^A^L ^O^B^J^E^C^T ^C^O^D^E.

         TB       E^N^A^B^L^E ^F^U^L^L ^E^R^R^O^R ^T^R^A^C^E^B^A^C^K.

         0        N^O ^D^E^B^U^G^G^I^N^G ^O^P^T^I^O^N^S.
.HELP,DO,NOLIST

      F^O^R^M^A^T@D  DO=^D^O

      T^H^E ^P^A^R^A^M^E^T^E^R DO ^S^P^E^C^I^F^I^E^S DO ^L^O^O^P ^C^O^N^T^R^O^L.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E DO
      ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, DO=LONG/OT).  I^F ^D^O ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DO=OT.  I^F DO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DO=0.

         ^D^O                        M^E^A^N^I^N^G
         --                        -------
         LONG       P^E^R^M^I^T ^T^R^I^P ^C^O^U^N^T ^T^O ^E^X^C^E^E^D 131071.

         OT         S^E^T ^M^I^N^I^M^U^M ^T^R^I^P ^C^O^U^N^T ^T^O 1.

         0          T^R^I^P ^C^O^U^N^T ^I^S ^L^E^S^S ^T^H^A^N 131071 ^A^N^D ^M^I^N^I^M^U^M ^D^E^F^A^U^L^T^S ^T^O ^Z^E^R^O.
.HELP,DS,NOLIST

      F^O^R^M^A^T@D  DS

      T^H^E ^P^A^R^A^M^E^T^E^R DS ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E C$ ^D^I^R^E^C^T^I^V^E^S ^A^R^E ^T^O ^B^E ^T^R^E^A^T^E^D ^A^S
      ^C^O^M^M^E^N^T^S.  I^F DS=0, ^R^E^C^O^G^N^I^Z^E ^A^N^D ^P^R^O^C^E^S^S C$ ^D^I^R^E^C^T^I^V^E^S.  I^F DS ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S DS=0.
.HELP,ERR,NOLIST

      F^O^R^M^A^T@D  E=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^E^R^R^O^R ^L^I^N^E ^A^N^D ^T^H^E ^D^I^A^G^N^O^S^T^I^C^S ^B^E
      ^W^R^I^T^T^E^N ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=ERRS.  I^F
      E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S E=OUTPUT.
.HELP,EC,NOLIST

      F^O^R^M^A^T@D  EC

      T^H^E ^P^A^R^A^M^E^T^E^R EC ^S^P^E^C^I^F^I^E^S ^T^H^A^T OPT=2 ^T^A^B^L^E^S ^W^I^L^L ^U^S^E LCM ^O^R ECS, ^W^H^E^N
      ^A^V^A^I^L^A^B^L^E.  I^F EC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^S^A^M^E ^A^S EC.  I^F EC=0,
      ^T^H^E^N LCM ^O^R ECS ^F^O^R OPT=2 ^T^A^B^L^E^S ^I^S ^N^O^T ^U^S^E^D.
.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^E^L

      T^H^E ^P^A^R^A^M^E^T^E^R EL ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^E^V^E^L ^C^O^N^T^R^O^L.  I^F EL ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S EL=T.  I^F ^E^L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S EL=F.

         ^E^L                        M^E^A^N^I^N^G
         --                        -------
         C        L^I^S^T ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         F        L^I^S^T ^F^A^T^A^L ^E^R^R^O^R^S ^P^L^U^S ^L^E^V^E^L C ^E^R^R^O^R^S.

         T        L^I^S^T ^T^R^I^V^I^A^L ^E^R^R^O^R^S ^P^L^U^S ^L^E^V^E^L C, F, ^A^N^D W ^E^R^R^O^R^S.

         W        L^I^S^T ^W^A^R^N^I^N^G ^E^R^R^O^R^S ^P^L^U^S ^L^E^V^E^L C ^A^N^D F ^E^R^R^O^R^S.
.HELP,ET,NOLIST

      F^O^R^M^A^T@D  ET=^E

      T^H^E ^P^A^R^A^M^E^T^E^R ET ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^A^B^O^R^T ^T^H^E ^J^O^B ^S^T^E^P ^I^F ^T^H^E
      ^E^X^E^C^U^T^A^B^L^E ^C^O^D^E ^C^O^N^T^A^I^N^S ^E^R^R^O^R^S ^O^F ^A^T ^L^E^A^S^T C, F, T, ^O^R W ^S^E^V^E^R^I^T^Y
      ^I^N^D^I^C^A^T^E^D ^B^Y ^E.  I^F ^E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ET=F.  I^F ET ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S ET=0.

         ^E                        M^E^A^N^I^N^G
         -                        -------
         C        C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         F        F^A^T^A^L ^E^R^R^O^R^S ^A^N^D ^A^L^L ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         W        W^A^R^N^I^N^G ^E^R^R^O^R^S, ^F^A^T^A^L ^E^R^R^O^R^S, ^A^N^D ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         T        T^R^I^V^I^A^L ^E^R^R^O^R^S, ^W^A^R^N^I^N^G ^E^R^R^O^R^S, ^F^A^T^A^L ^E^R^R^O^R^S, ^A^N^D
                  ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.

         0        N^E^X^T ^C^O^M^M^A^N^D ^I^N ^T^H^E ^J^O^B ^I^S ^E^X^E^C^U^T^E^D ^A^F^T^E^R ^T^E^R^M^I^N^A^T^I^O^N,
                  ^D^E^S^P^I^T^E ^A^N^Y ^E^R^R^O^R^S ^D^E^T^E^C^T^E^D ^D^U^R^I^N^G ^C^O^M^P^I^L^A^T^I^O^N.
.HELP,GLFN,NOLIST

      F^O^R^M^A^T@D  G=^L^F^N-^R^E^C^N^A^M^E

      T^H^E ^P^A^R^A^M^E^T^E^R G ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y ^W^I^T^H ^R^E^C^O^R^
      ^R^E^C^N^A^M^E ^I^S ^L^O^A^D^E^D ^O^N ^F^I^L^E ^L^F^N.  I^F G=0, ^N^O ^S^Y^S^T^E^M ^T^E^X^T ^I^S ^L^O^A^D^E^D.  I^F
      -^R^E^C^N^A^M^E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^F^I^R^S^T ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y ^I^S ^L^O^A^D^E^D ^F^R^O^M
      ^F^I^L^E ^L^F^N.  I^F ^L^F^N-^R^E^C^N^A^M^E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S G=SYSTEXT.  I^F
      G ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S G=0.
.HELP,GO,NOLIST

      F^O^R^M^A^T@D  GO=^G^O

      T^H^E ^P^A^R^A^M^E^T^E^R GO ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^B^I^N^A^R^Y ^I^S ^T^O ^B^E ^L^O^A^D^E^D ^A^N^D ^E^X^E^C^U^T^E^D
      ^A^F^T^E^R ^C^O^M^P^I^L^A^T^I^O^N.  I^F GO=0, ^T^H^E ^B^I^N^A^R^Y ^I^S ^N^O^T ^L^O^A^D^E^D ^A^N^D ^E^X^E^C^U^T^E^D ^A^F^T^E^R
      ^C^O^M^P^I^L^A^T^I^O^N.  I^F GO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S GO=0.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^I^S ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      I=INPUT.
.HELP,LIST,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^L^I^S^T^A^B^L^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^B^E ^W^R^I^T^T^E^N ^O^N
      ^F^I^L^E ^L^F^N.  I^F L=0, ^O^N^L^Y ^F^A^T^A^L ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D ^S^T^A^T^E^M^E^N^T^S ^T^H^A^T ^C^A^U^S^E^D ^T^H^E^M
      ^A^R^E ^L^I^S^T^E^D ^O^N ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=LIST.  I^F L
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT.
.HELP,LCM,NOLIST

      F^O^R^M^A^T@D  LCM=^M

      T^H^E ^P^A^R^A^M^E^T^E^R LCM ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^D^D^R^E^S^S ^M^O^D^E ^F^O^R ^L^E^V^E^L 3 (^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y)
      ^D^A^T^A.  I^F ^M ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LCM=I.  I^F LCM ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LCM=D.

         ^M                        M^E^A^N^I^N^G
         -                        -------
         D        D^I^R^E^C^T ^M^O^D^E; ^S^E^L^E^C^T 17-^B^I^T ^A^D^D^R^E^S^S.

         G        G^I^A^N^T ^M^O^D^E.

         I        I^N^D^I^R^E^C^T ^M^O^D^E; ^S^E^L^E^C^T 21-^B^I^T ^A^D^D^R^E^S^S.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^O^P

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R
      LO ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, LO=O/S).  I^F ^O^P ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LO=A/R/S.  I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=A/S.

         ^O^P                        M^E^A^N^I^N^G
         --                        -------
         A        W^R^I^T^E ^V^A^R^I^A^B^L^E^S ^A^N^D ^C^O^M^M^O^N ^B^L^O^C^K^S ^W^I^T^H ^T^H^E^I^R ^A^T^T^R^I^B^U^T^E^S ^T^O
                  ^T^H^E ^O^U^T^P^U^T ^F^I^L^E.

         M        W^R^I^T^E ^M^A^P ^T^O ^T^H^E ^O^U^T^P^U^T ^F^I^L^E.

         O        W^R^I^T^E ^O^B^J^E^C^T ^C^O^D^E ^T^O ^T^H^E ^O^U^T^P^U^T ^F^I^L^E.

         R        A ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^M^A^P ^I^S ^W^R^I^T^T^E^N ^T^O ^T^H^E ^O^U^T^P^U^T ^F^I^L^E.

         0        N^O ^L^I^S^T^I^N^G.
.HELP,MD,NOLIST

      F^O^R^M^A^T@D  MD

      T^H^E ^P^A^R^A^M^E^T^E^R MD ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^H^E ^U^S^E ^O^F ^M^A^C^H^I^N^E-^D^E^P^E^N^D^E^N^T
      ^L^A^N^G^U^A^G^E ^F^E^A^T^U^R^E^S ^A^R^E ^T^O ^B^E ^D^I^A^G^N^O^S^E^D, ^A^N^D ^H^O^W ^S^E^V^E^R^E^L^Y.  V^A^L^I^D ^O^P^T^I^O^N^S
      ^A^R^E@D

      O^P^T^I^O^N                        D^E^S^C^R^I^P^T^I^O^N
      ------                        -----------
       MD        S^A^M^E ^A^S MD=T.

       MD=0      M^A^C^H^I^N^E-^D^E^P^E^N^D^E^N^T ^D^I^A^G^N^O^S^T^I^C^S ^A^R^E ^N^O^T ^G^E^N^E^R^A^T^E^D.

       MD=T      M^A^C^H^I^N^E ^D^E^P^E^N^D^E^N^C^I^E^S ^A^R^E ^T^R^E^A^T^E^D ^A^S ^T^R^I^V^I^A^L ^E^R^R^O^R^S.

       MD=F      M^A^C^H^I^N^E-^D^E^P^E^N^D^E^N^T ^L^A^N^G^U^A^G^E ^F^E^A^T^U^R^E ^R^E^S^U^L^T^S ^I^N ^A ^F^A^T^A^L ^E^R^R^O^R.

       ^O^M^I^T^T^E^D   S^A^M^E ^A^S MD=0.
.HELP,ML,NOLIST

      F^O^R^M^A^T@D  ML=^S^T^R

      T^H^E ^P^A^R^A^M^E^T^E^R ML ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^S^T^R ^B^E ^T^H^E ^V^A^L^U^E ^O^F ^T^H^E MODLEVEL
      ^M^I^C^R^O; ^S^T^R ^I^S ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ML=0, ^T^H^E
      ^S^Y^S^T^E^M ^U^S^E^S ^T^H^E ^C^U^R^R^E^N^T ^D^A^T^E ^I^N ^T^H^E ^F^O^R^M ^Y^Y^D^D^D ^F^O^R ^T^H^E MODLEVEL ^M^I^C^R^O.
      I^F ML ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ML=0.  I^F ^S^T^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S ML=0.
 .HELP,OPT,NOLIST

      F^O^R^M^A^T@D  OPT=^N

      T^H^E ^P^A^R^A^M^E^T^E^R OPT ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^E^V^E^L ^O^F ^O^P^T^I^M^I^Z^A^T^I^O^N.  I^F ^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S OPT=2.  I^F OPT ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OPT=0.

         ^N                        M^E^A^N^I^N^G
         -                        -------
         0        F^A^S^T ^C^O^M^P^I^L^A^T^I^O^N.

         1        S^T^A^N^D^A^R^D ^C^O^M^P^I^L^A^T^I^O^N ^A^N^D ^E^X^E^C^U^T^I^O^N.

         2        F^A^S^T ^E^X^E^C^U^T^I^O^N.

         3        F^A^S^T ^E^X^E^C^U^T^I^O^N ^P^L^U^S ^P^O^T^E^N^T^I^A^L^L^Y ^U^N^S^A^F^E ^O^P^T^I^M^I^Z^A^T^I^O^N.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^T^H^E ^C^O^M^P^I^L^E^R
      ^L^I^S^T^I^N^G^S.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PD=8.  I^F PD ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S PD=6.

         ^N              M^E^A^N^I^N^G
         -              -------
         6        S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         8        E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,PL,NOLIST

      F^O^R^M^A^T@D  PL=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PL ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N ^I^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^E^X^E^C^U^T^I^O^N ^T^I^M^
      ^R^E^C^O^R^D^S ^W^R^I^T^T^E^N ^O^N ^F^I^L^E OUTPUT@D  ^N<=9999999999 ^F^O^R NOS/BE ^A^N^D SCOPE 2 ^A^N^D
      ^N<=9999999 ^F^O^R NOS.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PL=50000.  I^F PL
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PL=5000.
.HELP,PN,NOLIST

      F^O^R^M^A^T@D  PN

      T^H^E ^P^A^R^A^M^E^T^E^R PN ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^P^A^G^E ^N^U^M^B^E^R^I^N^G ^P^R^O^C^E^E^D ^C^O^N^T^I^N^U^O^U^S^L^Y
      ^F^R^O^M ^S^U^B^P^R^O^G^R^A^M ^T^O ^S^U^B^P^R^O^G^R^A^M.  I^F PN=0, ^P^A^G^E ^N^U^M^B^E^R^I^N^G ^B^E^G^I^N^S ^A^T 1 ^F^O^R
      ^E^A^C^H ^S^U^B^P^R^O^G^R^A^M.  I^F PN ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PN=0.
.HELP,PS,NOLIST

      F^O^R^M^A^T@D  PS=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PS ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^O^U^T^P^U^T ^P^A^G^E ^S^I^Z^E ^B^E ^N
      ^P^R^I^N^T^A^B^L^E ^L^I^N^E^S ^P^E^R ^P^A^G^E.  T^H^E ^D^E^F^A^U^L^T ^I^S PS=60 ^I^F PD=6; ^A^N^D PS=80 ^I^F
      PD=8.
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PW ^S^P^E^C^I^F^I^E^S ^T^H^E (^P^R^I^N^T^E^D ^L^I^N^E^S ^A^R^E ^T^O ^C^O^N^T^A^I^N ^N) ^M^A^X^I^M^U^M
      ^N^U^M^B^E^R ^O^F ^N ^C^H^A^R^A^C^T^E^R^S ^I^N ^A ^L^I^N^E ^T^O ^B^E ^P^R^I^N^T^E^D ^O^U^T (50<=^N<=136).  I^F ^N ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PW=72. I^F PW ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^F^O^R ^C^O^N^N^E^C^T^E^D
      ^L^I^S^T^I^N^G^S ^O^R ^E^R^R^O^R ^F^I^L^E^S ^I^S PW=72; ^T^H^E ^D^E^F^A^U^L^T ^F^O^R ^O^T^H^E^R ^O^U^T^P^U^T ^F^I^L^E^S ^I^S
      PW=136.
.HELP,QC,NOLIST

      F^O^R^M^A^T@D  QC

      T^H^E ^P^A^R^A^M^E^T^E^R QC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^O^M^P^I^L^E^R ^I^S ^T^O ^P^E^R^F^O^R^M ^A ^Q^U^I^C^K ^S^Y^N^T^A^
      ^C^H^E^C^K ^O^F ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M.  O^B^J^E^C^T ^C^O^D^E ^I^S ^S^U^P^P^R^E^S^S^E^D.  I^F QC=0,
      ^C^O^M^P^I^L^A^T^I^O^N ^I^S ^N^O^R^M^A^L.  I^F QC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S QC=0.
.HELP,REW,NOLIST

      F^O^R^M^A^T@D  REW=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R REW ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^W^I^N^D^I^N^G ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E ^L^F^N
      ^B^E^F^O^R^E ^C^O^M^P^I^L^A^T^I^O^N.  Y^O^U ^C^A^N ^A^L^S^O ^S^P^E^C^I^F^Y ^T^H^A^T ^A^L^L ^F^I^L^E^S ^O^F ^A ^P^A^R^T^I^C^U^L^A^R
      ^T^Y^P^E ^B^E ^R^E^W^O^U^N^D.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R REW ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y
      ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, REW=I/B).  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S
      REW=B/I.  I^F REW ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S REW=0.

         ^L^F^N                M^E^A^N^I^N^G
         ---                -------
         B        R^E^W^I^N^D ^A^L^L B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E^S.

         E        R^E^W^I^N^D ^A^L^L E^R^R^O^R ^F^I^L^E^S.

         I        R^E^W^I^N^D ^A^L^L I^N^P^U^T ^F^I^L^E^S.

         L        R^E^W^I^N^D ^A^L^L O^U^T^P^U^T ^F^I^L^E^S.

         0        D^O ^N^O^T ^R^E^W^I^N^D ^A^N^Y ^F^I^L^E^S.
.HELP,RD,NOLIST

      F^O^R^M^A^T@D  ROUND=^S

      T^H^E ^P^A^R^A^M^E^T^E^R ROUND ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N-^L^I^N^E ^C^O^D^E ^C^O^M^P^U^T^A^T^I^O^N ^F^O^R ^T^H^E
      ^I^N^D^I^C^A^T^E^D ^O^P^E^R^A^T^I^O^N^S ^I^S ^R^O^U^N^D^E^D.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R ^T^H^E ROUND
      ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, ROUND=A/S).  I^F ^S ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ROUND=A/S/M/D.  I^F ROUND ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S ROUND=A/S/M.

         ^S               M^E^A^N^I^N^G
         -               -------
         A        A^D^D^I^T^I^O^N.

         S        S^U^B^S^T^R^A^C^T^I^O^N.

         M        M^U^L^T^I^P^L^I^C^A^T^I^O^N.

         D        D^I^V^I^S^I^O^N.

         0        C^O^M^P^U^T^A^T^I^O^N ^N^O^T ^R^O^U^N^D^E^D.
.HELP,SYS,NOLIST

      F^O^R^M^A^T@D  S=^L^I^B-^S^N^A^M^E

      T^H^E ^P^A^R^A^M^E^T^E^R S ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y, ^S^N^A^M^E, ^T^O ^B^E ^L^O^A^D^E^D
      ^F^R^O^M ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^F^I^L^E ^O^R ^S^Y^S^T^E^M ^L^I^B^R^A^R^Y (^L^I^B) ^W^H^E^N COMPASS  ^I^S ^C^A^L^L^E^D
      ^T^O ^A^S^S^E^M^B^L^E ^I^N^T^E^R^M^I^X^E^D COMPASS ^P^R^O^G^R^A^M^S.  M^U^L^T^I^P^L^E ^N^A^M^E^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D
      ^B^Y ^S^E^P^A^R^A^T^I^N^G ^T^H^E^M ^W^I^T^H ^S^L^A^S^H^E^S.  A ^M^A^X^I^M^U^M ^O^F ^S^E^V^E^N ^N^A^M^E^S ^C^A^N ^B^E
      ^S^P^E^C^I^F^I^E^D.  I^F S=0, ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y ^I^S ^N^O^T ^L^O^A^D^E^D.  I^F ^L^I^B- ^I^S
      ^O^M^I^T^T^E^D, ^S^Y^S^T^E^M ^T^E^X^T ^O^V^E^R^L^A^Y, ^A^N^D ^S^N^A^M^E ^A^R^E ^L^O^A^D^E^D ^F^R^O^M ^T^H^E ^L^I^B^R^A^R^Y ^S^E^T.
      I^F S ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S S=SYSTEXT ^I^F ^T^H^E G ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T
      ^S^P^E^C^I^F^I^E^D, ^O^R S=0 ^I^F ^T^H^E G ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,SEQ,NOLIST

      F^O^R^M^A^T@D  SEQ

      T^H^E ^P^A^R^A^M^E^T^E^R SEQ ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^O^U^R^C^E ^F^I^L^E ^B^E ^I^N ^A ^S^E^Q^U^E^N^C^E^D
      ^L^I^N^E ^F^O^R^M^A^T.  I^F SEQ=0, ^T^H^E ^S^O^U^R^C^E ^F^I^L^E ^I^S ^L^E^F^T ^I^N ^S^T^A^N^D^A^R^D FORTRAN
      ^F^O^R^M^A^T.  I^F SEQ ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SEQ=0.
.HELP,STAT,NOLIST

      F^O^R^M^A^T@D  STATIC

      T^H^E ^P^A^R^A^M^E^T^E^R STATIC ^S^P^E^C^I^F^I^E^S ^S^T^A^T^I^C ^I^N^C^L^U^S^I^O^N ^O^F ^F^I^L^E ^B^U^F^F^E^R^S.
      V^A^L^I^D ^O^P^T^I^O^N^S ^A^R^E@D

        O^P^T^I^O^N                           D^E^S^C^R^I^P^T^I^O^N
        ------                           -----------
        STATIC       I^N^H^I^B^I^T^S ^D^Y^N^A^M^I^C ^F^I^L^E ^A^L^L^O^C^A^T^I^O^N ^A^T ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^B^Y
                     ^R^U^N-^T^I^M^E ^L^I^B^R^A^R^Y.  R^E^Q^U^I^R^E^D ^L^I^B^R^A^R^Y ^P^R^O^G^R^A^M^S ^M^U^S^T ^B^E
                     ^S^E^L^E^C^T^E^D ^B^Y ^C^A^L^L^S ^T^O ^T^H^E STL^X^X^X ^R^O^U^T^I^N^E^S.

        STATIC=0     U^S^E ^O^F ^D^Y^N^A^M^I^C ^M^E^M^O^R^Y ^M^A^N^A^G^E^M^E^N^T ^A^T ^E^X^E^C^U^T^I^O^N ^T^I^M^E ^B^Y
                     ^R^U^N-^T^I^M^E ^L^I^B^R^A^R^Y.

        ^O^M^I^T^T^E^D      S^A^M^E ^A^S STATIC=0.
.HELP,TM,NOLIST

      F^O^R^M^A^T@D  TM

      T^H^E ^P^A^R^A^M^E^T^E^R TM ^S^P^E^C^I^F^I^E^S ^A^T^T^R^I^B^U^T^E^S ^O^F ^T^H^E ^O^B^J^E^C^T ^T^I^M^E ^M^A^C^H^I^N^E.  T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^S ^A^N ^I^N^S^T^A^L^L^A^T^I^O^N ^O^P^T^I^O^N.  V^A^L^I^D ^O^P^T^I^O^N^S ^A^R^E@D

         O^P^T^I^O^N                          D^E^S^C^R^I^P^T^I^O^N
         ------                          -----------
         TM         S^A^M^E ^A^S TM=0.

         TM=0       O^B^J^E^C^T ^T^I^M^E ^M^A^C^H^I^N^E ^I^S ^A^S^S^U^M^E^D ^T^O ^H^A^V^E ^N^O^N^E ^O^F ^T^H^E ^P^O^S^S^I^B^L^E
                    ^A^T^T^R^I^B^U^T^E^S; ^F^O^R ^E^X^A^M^P^L^E, ^N^O LCM.

         TM=LCM     O^B^J^E^C^T ^T^I^M^E ^M^A^C^H^I^N^E ^I^S ^A^S^S^U^M^E^D ^T^O ^H^A^V^E ^L^A^R^G^E ^C^E^N^T^R^A^L ^M^E^M^O^R^Y
                    ^A^V^A^I^L^A^B^L^E.

         ^O^M^I^T^T^E^D    A^T^T^R^I^B^U^T^E^S ^O^F ^T^H^E ^O^B^J^E^C^T ^T^I^M^E ^M^A^C^H^I^N^E ^A^R^E ^A^S^S^U^M^E^D ^T^O ^B^E
                    ^I^D^E^N^T^I^C^A^L ^T^O ^T^H^O^S^E ^O^F ^T^H^E ^C^O^M^P^I^L^E ^T^I^M^E ^M^A^C^H^I^N^E.

.HELP,XLFN,NOLIST

      F^O^R^M^A^T@D  X=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E COMPASS ^A^S^S^E^M^B^L^E^R ^R^E^A^D ^F^R^O^M ^T^H^E
      ^E^X^T^E^R^N^A^L ^T^E^X^T ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OPL.  I^F X
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S X=OLDPL.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,F45*I
,CC[C^H^A^N^G^E $ C^H^A^R^A^C^T^E^R (CC)]=(*A1,*N=*)
,CI[G^E^N^E^R^A^T^E U^P^D^A^T^E/M^O^D^I^F^Y D^I^R^E^C^T^I^V^E (CI)]=(*A1,*N)
,DD[D^E^L^E^T^E S^T^A^T^E^M^E^N^T^S W^I^T^H C$ (DD)]=(*A1,*N)
,ET[S^K^I^P T^O EXIT S^T^A^T^E^M^E^N^T (ET)]=(*A1,*N=0)
,SRC[S^O^U^R^C^E I^N^P^U^T F^I^L^E  (I)]=(*F,*N=COMPILE)
,LIST[L^I^S^T^A^B^L^E O^U^T^P^U^T F^I^L^E  (L)]=(*F,*N=LIST)
,LO[L^I^S^T^I^N^G O^P^T^I^O^N^S (LO)]=(*A1,*N=F)
,MC[M^A^S^T^E^R C^O^N^T^R^O^L C^H^A^R^A^C^T^E^R (MC)]=(*A3,*N=$$$*$$$)
,MD[F^L^A^G M^A^C^H^I^N^E-D^E^P^E^N^D^E^N^T S^T^A^T^E^M^E^N^T^S (MD)]=(*A1,*N)
,PLFN[S^O^U^R^C^E O^U^T^P^U^T F^I^L^E  (P)]=(*F,*N=PUNCH)
,PD[P^R^I^N^T D^E^N^S^I^T^Y C^O^N^T^R^O^L (PD)]=(*A1,*N=8)
,PO[S^O^U^R^C^E O^U^T^P^U^T O^P^T^I^O^N^S (PO)]=(*A1,*N=M)
,SC[S^U^P^P^R^E^S^S H^E^A^D^E^R A^N^D T^R^A^I^L^E^R C^O^M^M^E^N^T^S (SC)]=(*A1,*N=0)
,SI[S^E^Q^U^E^N^C^E^D I^N^P^U^T F^I^L^E (SI)]=(*A1,*N)
,SO[S^E^Q^U^E^N^C^E^D O^U^T^P^U^T F^I^L^E (SO)]=(*A7,*N=$10/10/5$)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  F45,CC=^C,CI=^I^D^N^A^M^E,DD,ET,I=^L^F^N,L=^L^F^N,LO=^L^O,MC=$^C^H^A^R$,MD,P=^L^F^N,
                 PD=^N,PO=^N,SC=^S^C,SI=^S^I,SO=^N1/^N2/^N3.

      T^H^E ^C^O^M^M^A^N^D F45 ^C^A^L^L^S ^T^H^E C^O^N^V^E^R^S^I^O^N A^I^D P^R^O^G^R^A^M ^F^O^R FORTRAN E^X^T^E^N^D^E^D
      V^E^R^S^I^O^N 4 ^T^O FORTRAN V^E^R^S^I^O^N 5.
.HELP,CC,NOLIST

      F^O^R^M^A^T@D  CC=^C

      T^H^E ^P^A^R^A^M^E^T^E^R CC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E $ ^C^H^A^R^A^C^T^E^R ^I^N ^C^O^L^U^M^N 1, ^B^E ^C^H^A^N^G^E^D
      ^T^O C ^O^R *.  I^F ^C ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S CC=*.  I^F CC ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S C.

         ^C                        M^E^A^N^I^N^G
         -                        -------
         *        C^H^A^N^G^E $ ^I^N^D^I^C^A^T^I^N^G ^A ^C^O^M^M^E^N^T ^L^I^N^E ^T^O *.

         C        C^H^A^N^G^E $ ^I^N^D^I^C^A^T^I^N^G ^A ^C^O^M^M^E^N^T ^L^I^N^E ^T^O C.
.HELP,CI,NOLIST

      F^O^R^M^A^T@D  CI=^I^D^N^A^M^E

      T^H^E ^P^A^R^A^M^E^T^E^R CI ^S^P^E^C^I^F^I^E^S ^T^H^E ^G^E^N^E^R^A^T^I^O^N ^O^F ^T^H^E U^P^D^A^T^E/M^O^D^I^F^Y ^D^I^R^E^C^T^I^V^E
      ^O^F ^T^H^E ^F^O^R^M@D *IDENT ^I^D^N^A^M^E, ^W^H^E^R^E ^I^D^N^A^M^E ^I^S ^T^H^E ^C^O^R^R^E^C^T^I^O^N ^I^D^E^N^T^I^F^I^E^R.
      I^F CI=0, ^D^O ^N^O^T ^G^E^N^E^R^A^T^E ^A^N *IDENT ^D^I^R^E^C^T^I^V^E, ^E^V^E^N ^I^F LO=M, LO=F, PO=M,
      ^O^R PO=F ^I^S ^S^P^E^C^I^F^I^E^D.  I^F CI ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^G^E^N^E^R^A^T^E ^A^N
      U^P^D^A^T^E/M^O^D^I^F^Y ^D^I^R^E^C^T^I^V^E ^O^F ^T^H^E ^F^O^R^M@D *IDENT ^D^D^D^H^H^M^M, ^W^H^E^R^E ^D^D^D ^I^S ^T^H^E
      ^N^U^M^B^E^R ^O^F ^D^A^Y^S ^O^F ^T^H^E ^Y^E^A^R, ^H^H ^T^H^E ^H^O^U^R ^O^F ^T^H^E ^D^A^Y, ^A^N^D ^M^M ^T^H^E ^M^I^N^U^T^E^S.
      I^F ^I^D^N^A^M^E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^S^A^M^E ^A^S ^I^F CI ^W^A^S ^O^M^I^T^T^E^D.
.HELP,DD,NOLIST

      F^O^R^M^A^T@D  DD

      T^H^E ^P^A^R^A^M^E^T^E^R DD ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^L^E^T^I^O^N ^O^F ^T^H^E ^S^T^A^T^E^M^E^N^T^S ^W^I^T^H C$ ^I^N
      ^C^O^L^U^M^N^S 1 ^A^N^D 2 (^D^E^F^A^U^L^T).  I^F DD=0, ^C^O^N^V^E^R^T ^T^H^E ^S^T^A^T^E^M^E^N^T^S ^W^I^T^H C$ ^I^N
      ^C^O^L^U^M^N^S 1 ^A^N^D 2 ^T^O ^C^O^M^M^E^N^T^S ^B^Y ^R^E^P^L^A^C^I^N^G $ ^W^I^T^H ^A ^B^L^A^N^K.  I^F DD ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^S^A^M^E ^A^S ^I^F DD ^W^A^S ^S^E^L^E^C^T^E^D.
.HELP,ET,NOLIST

      F^O^R^M^A^T@D  ET

      T^H^E ^P^A^R^A^M^E^T^E^R ET ^S^P^E^C^I^F^I^E^S ^T^O ^S^K^I^P ^T^O ^T^H^E ^J^O^B'^S EXIT ^S^T^A^T^E^M^E^N^T ^I^F ^O^N^E
      ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^O^N^D^I^T^I^O^N^S ^E^X^I^S^T@D

                                  C^O^N^D^I^T^I^O^N^S
                                  ----------
         - FORTRAN ^S^Y^N^T^A^X ^E^R^R^O^R^S.

         - S^T^A^T^E^M^E^N^T^S ^R^E^Q^U^I^R^I^N^G ^M^A^N^U^A^L ^A^C^T^I^O^N.

         - R^E^Q^U^E^S^T^S ^F^O^R U^P^D^A^T^E/M^O^D^I^F^Y ^O^U^T^P^U^T ^F^I^L^E^S ^W^H^E^N ^I^N^P^U^T ^I^S ^N^O^T ^O^N COMPILE
           ^F^I^L^E.

      I^F ET=0, ^T^E^R^M^I^N^A^T^E ^N^O^R^M^A^L^L^Y.  I^F ET ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ET=0.
.HELP,SRC,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S I=COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S I=INPUT.
.HELP,LIST,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^A^B^L^E ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F L=0, ^N^O
      ^O^U^T^P^U^T ^L^I^S^T^I^N^G ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=LIST.
      I^F L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S L=OUTPUT.
.HELP,LO,NOLIST

      F^O^R^M^A^T@D  LO=^L^O

      T^H^E ^P^A^R^A^M^E^T^E^R LO ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^P^T^I^O^N^S.  I^F ^L^O ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LO=F.  I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=S.

         ^L^O                        M^E^A^N^I^N^G
         --                        -------
         E        E^R^R^O^R ^L^I^S^T^I^N^G.

         F        F^U^L^L ^L^I^S^T^I^N^G.

         M        M^O^D^I^F^I^C^A^T^I^O^N ^L^I^S^T^I^N^G.

         S        S^H^O^R^T ^L^I^S^T^I^N^G.
.HELP,MC,NOLIST

      F^O^R^M^A^T@D  MC=$^C^H^A^R$

      T^H^E ^P^A^R^A^M^E^T^E^R MC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^M^A^S^T^E^R ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^I^S ^C^H^A^R.
      I^F MC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S MC=$*$.  I^F $^C^H^A^R$ ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S MC=$*$.
.HELP,MD,NOLIST

      F^O^R^M^A^T@D  MD

      T^H^E ^P^A^R^A^M^E^T^E^R MD ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A^N^Y ^S^T^A^T^E^M^E^N^T^S ^C^O^N^T^A^I^N^I^N^G
      ^M^A^C^H^I^N^E-^D^E^P^E^N^D^E^N^T ^U^S^A^G^E^S ^S^H^O^U^L^D ^B^E ^F^L^A^G^G^E^D.  I^F MD ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^T^O ^I^G^N^O^R^E ^M^A^C^H^I^N^E-^D^E^P^E^N^D^E^N^T ^U^S^A^G^E^S.
.HELP,PLFN,NOLIST

      F^O^R^M^A^T@D  P=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R P ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F P=0, ^N^O
      ^S^O^U^R^C^E ^O^U^T^P^U^T ^I^S ^G^E^N^E^R^A^T^E^D.  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S P=PUNCH.
      I^F P ^I^S ^O^M^I^T^T^E^D, ^N^O ^S^O^U^R^C^E ^O^U^T^P^U^T ^I^S ^G^E^N^E^R^A^T^E^D.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PD ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^C^O^N^T^R^O^L ^F^O^R ^T^H^E ^C^O^M^P^I^L^E^R
      ^L^I^S^T^I^N^G^S.  I^F ^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PD=8.  I^F PD ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S PD=6.

         ^N                        M^E^A^N^I^N^G
         -                        -------
         6        S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

         8        E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,PO,NOLIST

      F^O^R^M^A^T@D  PO=^N

      T^H^E ^P^A^R^A^M^E^T^E^R PO ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^O^U^T^P^U^T ^O^P^T^I^O^N^S.  I^F ^N ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S PO=M.  I^F PO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S PO=S.

         ^N                        M^E^A^N^I^N^G
         -                        -------
         F        F^U^L^L ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E.

         M        M^O^D^I^F^I^C^A^T^I^O^N ^F^I^L^E.

         S        S^H^O^R^T ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E.
.HELP,SC,NOLIST

      F^O^R^M^A^T@D  SC=^S^C

      T^H^E ^P^A^R^A^M^E^T^E^R SC ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^U^P^P^R^E^S^S^I^O^N ^O^F ^T^H^E ^H^E^A^D^E^R ^A^N^D ^T^R^A^I^L^E^R
      ^C^O^M^M^E^N^T^S ^I^N ^A^N ^O^U^T^P^U^T ^L^I^S^T^I^N^G/^M^O^D^I^F^I^C^A^T^I^O^N.  I^F SC=0, ^H^E^A^D^E^R ^A^N^D ^T^R^A^I^L^E^R
      ^C^O^M^M^E^N^T^S ^A^R^E ^A^L^L^O^W^E^D.  I^F SC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SC=0.
.HELP,SI,NOLIST

      F^O^R^M^A^T@D  SI=^S^I

      T^H^E ^P^A^R^A^M^E^T^E^R SI ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^I^N^P^U^T ^F^I^L^E ^B^E ^I^N ^A ^S^E^Q^U^E^N^C^E^D ^L^I^N^E
      ^F^O^R^M^A^T.  I^F SI=0, ^T^H^E ^I^N^P^U^T ^F^I^L^E ^I^S ^I^N ^S^T^A^N^D^A^R^D FORTRAN ^F^O^R^M^A^T.  I^F
      SI ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^D^E^T^E^R^M^I^N^E ^T^H^E ^I^N^P^U^T ^F^I^L^E ^F^O^R^M^A^T ^F^R^O^M
      ^C^O^L^U^M^N^S 1 ^T^H^R^O^U^G^H 5 ^O^F ^T^H^E ^F^I^R^S^T ^L^I^N^E ^O^F ^I^N^P^U^T.
.HELP,SO,NOLIST

      F^O^R^M^A^T@D  SO=^N1/^N2/^N3

      T^H^E ^P^A^R^A^M^E^T^E^R SO ^S^P^E^C^I^F^I^E^S ^A ^S^E^Q^U^E^N^C^E^D ^O^U^T^P^U^T ^F^I^L^E ^W^H^E^R^E ^N1 ^I^S ^T^H^E
      ^F^I^R^S^T ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R, ^N2 ^I^S ^T^H^E ^I^N^C^R^E^M^E^N^T, ^A^N^D ^N3 ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F
      ^D^I^G^I^T^S ^I^N ^T^H^E ^F^I^R^S^T ^O^U^T^P^U^T ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R.  I^F S=0, ^U^N^S^E^Q^U^E^N^C^E^D ^O^U^T^P^U^T
      ^F^I^L^E^S ^A^R^E ^S^P^E^C^I^F^I^E^D.  I^F ^N1/^N2/^N3 ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SO=10/10/5
      ^U^N^L^E^S^S ^T^H^E ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^A^R^E ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E ^F^O^R^M^A^T ^O^F ^T^H^E ^I^N^P^U^T
      ^F^I^L^E.  I^F SO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^M^O^D^E ^O^F ^T^H^E ^I^N^P^U^T ^F^I^L^E.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,FTNTS*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  FTNTS,^C^C^C

      T^H^E FTNTS ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E FTNTS ^S^U^B^S^Y^S^T^E^M.  A RUN ^C^O^M^M^A^N^D ^U^N^D^E^R ^T^H^I^S
      ^S^U^B^S^Y^S^T^E^M ^U^S^E^S ^T^H^E FORTRAN V^E^R^S^I^O^N 4 ^C^O^M^P^I^L^E^R.

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^C^C ^S^P^E^C^I^F^I^E^S ^A ^C^O^M^M^A^N^D ^I^N ^A^D^D^I^T^I^O^N ^T^O ^T^H^E FTNTS ^C^O^M^M^A^N^D.
      A^N^Y ^V^A^L^I^D ^C^O^M^M^A^N^D ^I^S ^P^E^R^M^I^T^T^E^D, ^A^S ^W^E^L^L ^A^S ^A^L^L ^V^A^L^I^D ^P^A^R^A^M^E^T^E^R^S ^F^O^R ^T^H^A^T
      ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,GET*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/UN[U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,RT[D^O ^Y^O^U ^W^A^N^T ^R^E^A^L-^T^I^M^E ^P^R^O^C^E^S^S^I^N^G]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,RT$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  GET,^L^F^N=^P^F^N/UN=^U^S^E^R^N^A^M^E,PW=^P^A^S^S^W^O^R^D,PN=^P^A^C^K^N^A^M^E,R=^R,NA,RT,WB.

      T^H^E GET ^C^O^M^M^A^N^D ^R^E^T^R^I^E^V^E^S ^A ^C^O^P^Y ^O^F ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.

      N^O^T^E@D ^L^F^N ^I^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^W^H^I^C^H GET ^G^I^V^E^S ^T^O ^T^H^E ^R^E^T^R^I^E^V^E^D
            ^C^O^P^Y ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^P^F^N.  Y^O^U ^M^A^Y
            ^S^P^E^C^I^F^Y, ^T^H^E^R^E^F^O^R^E, ^B^O^T^H ^A^N ^L^F^N ^A^N^D ^T^H^E ^P^F^N, ^O^R ^T^H^E ^P^F^N ^A^L^O^N^E
            (^W^H^I^C^H ^B^E^C^O^M^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^A^S ^W^E^L^L).

            I^F ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E^D ^L^F^N ^E^X^I^S^T^S ^W^H^E^N ^T^H^I^S ^C^O^M^M^A^N^D ^I^S ^P^R^O^C^E^S^S^E^D,
            ^I^T ^I^S ^D^I^S^C^A^R^D^E^D (^E^V^E^N ^I^F ^C^O^M^M^A^N^D ^P^R^O^C^E^S^S^I^N^G ^D^O^E^S ^N^O^T ^C^O^M^P^L^E^T^E
            ^D^U^E ^T^O ^A^N ^E^R^R^O^R).
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^R^E^F^E^R^E^N^C^I^N^G ^A
      ^L^O^C^A^L ^C^O^P^Y ^O^F ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.  I^F ^Y^O^U ^W^I^S^H ^T^H^E GET
      ^C^O^M^M^A^N^D ^T^O ^D^E^S^I^G^N^A^T^E ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^W^H^I^C^H ^D^I^F^F^E^R^S ^F^R^O^M ^T^H^E ^P^E^R^M^A^N^E^N^
      ^F^I^L^E ^N^A^M^E, ^E^N^T^E^R ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E (^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S).  I^F ^Y^O^U ^W^A^N^T ^T^H^E ^L^O^C^A^L ^C^O^P^Y ^T^O ^G^O ^B^Y ^T^H^E ^N^A^M^E ^O^F ^T^H^E
      ^P^E^R^M^A^N^E^N^T ^F^I^L^E, ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E.

      D^E^F^A^U^L^T@D T^H^E ^L^O^C^A^L ^C^O^P^Y ^I^S ^G^I^V^E^N ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^O ^B^E ^R^E^T^R^I^E^V^E^D (^M^A^D^E
      ^L^O^C^A^L ^T^O ^Y^O^U^R ^J^O^B).  A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.  (I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E, ^T^H^E ^L^O^C^A^L ^C^O^P^Y
      ^W^I^L^L ^H^A^V^E ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E.)

      D^E^F^A^U^L^T@D  F^R^O^M ^W^I^T^H^I^N HELPME, ^Y^O^U ^M^U^S^T ^E^N^T^E^R ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E.

      W^A^R^N^I^N^G@D  F^R^O^M ^C^O^M^M^A^N^D ^M^O^D^E (^O^U^T^S^I^D^E ^O^F HELPME), ^I^F ^Y^O^U ^E^N^T^E^R GET
                ^W^I^T^H^O^U^T ^A^N^Y ^F^I^L^E ^N^A^M^E^S, ^T^H^E ^S^Y^S^T^E^M ^D^E^F^A^U^L^T^S ^T^O ^T^H^E ^P^R^I^M^A^R^Y
                ^F^I^L^E ^A^N^D ^R^E^T^U^R^N^S (^D^R^O^P^S) ^I^T, ^A^N^D ^R^E^T^R^I^E^V^E^S ^T^H^E ^L^A^T^E^S^T
                ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^V^E^R^S^I^O^N ^O^F ^I^T, ^T^H^U^S ^W^I^P^I^N^G ^O^U^T ^Y^O^U^R ^M^O^S^T
                ^R^E^C^E^N^T ^P^R^I^M^A^R^Y ^F^I^L^E ^W^O^R^K (^I^F ^A^N^Y) ^T^H^A^T ^H^A^D ^N^O^T ^B^E^E^N ^M^A^D^E
                ^P^E^R^M^A^N^E^N^T ^W^I^T^H ^T^H^E REPLACE ^C^O^M^M^A^N^D.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^S^E^R^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  T^H^E ^U^S^E^R ^N^A^M^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^F^I^L^E
      ^B^E^L^O^N^G^S ^T^O ^A^N^O^T^H^E^R ^U^S^E^R.  T^H^E ^O^T^H^E^R ^U^S^E^R ^M^U^S^T ^H^A^V^E ^G^R^A^N^T^E^D ^Y^O^U ^P^E^R^M^I^S^S^I^O

      ^T^O ^U^S^E ^T^H^E ^F^I^L^E ^B^Y ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^M^E^T^H^O^D^S@D

      E^X^P^L^I^C^I^T    O^W^N^E^R ^U^S^E^D PERMIT ^T^O ^G^R^A^N^T ^Y^O^U ^A^C^C^E^S^S.

      I^M^P^L^I^C^I^T    T^H^E ^F^I^L^E ^I^S ^S^E^M^I^P^R^I^V^A^T^E ^O^R ^P^U^B^L^I^C.

      A^U^T^O^M^A^T^I^C   I^F ^Y^O^U^R ^U^S^E^R ^N^A^M^E ^C^O^N^T^A^I^N^S ^A^S^T^E^R^I^S^K^S ^A^N^D ^I^F ^A^L^L ^N^O^N-^A^S^T^E^R^I^S^K
                  ^C^H^A^R^A^C^T^E^R^S ^M^A^T^C^H ^T^H^E ^C^O^R^R^E^S^P^O^N^D^I^N^G ^C^H^A^R^A^C^T^E^R^S ^I^N ^T^H^E ^O^T^H^E^R
                  ^U^S^E^R ^N^A^M^E.

      D^E^F^A^U^L^T@D Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^P^A^S^S^W^O^R^D) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D (PW=^P^A^S^S^W^O^R^D). A
      ^P^A^S^S^W^O^R^D ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^O^N^L^Y ^I^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^R^E^T^R^I^E^V^E ^I^S ^I^N
      ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^N^D ^I^S ^P^A^S^S^W^O^R^D ^P^R^O^T^E^C^T^E^D.

      D^E^F^A^U^L^T@D N^O ^P^A^S^S^W^O^R^D
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^A^C^K^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.
      E^N^T^E^R ^T^H^E ^D^E^V^I^C^E ^N^A^M^E ^O^N^L^Y ^I^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^R^E^T^R^I^E^V^E ^I^S ^N^O^T ^O^N
      ^T^H^E ^D^E^F^A^U^L^T ^F^A^M^I^L^Y ^D^E^V^I^C^E ^F^O^R ^Y^O^U^R ^S^Y^S^T^E^M.

      D^E^F^A^U^L^T@D N^O ^D^E^V^I^C^E ^N^A^M^E.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------

      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DE     E^X^T^E^N^D^E^D ^M^E^M^O^R^Y.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3, 4^K ^S^E^C^T^O^R.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2, 16^K ^S^E^C^T^O^R.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^R^A^M^E^T^E^R PN (^P^A^C^K
      ^N^A^M^E), ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      E^R^R^O^R^S ^I^N GET ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B ^W^H^E^N NA ^I^S ^S^P^E^C^I^F^I^E^D.  W^H^E^N
      NA ^I^S ^S^P^E^C^I^F^I^E^D, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T,
      ^A^S ^A ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S ^B^U^S^Y (^S^O^M^E^O^N^E
      ^E^L^S^E ^I^S ^U^S^I^N^G ^I^T) ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E
      (^N^O^T ^M^O^U^N^T^E^D), ^R^E^S^U^L^T^I^N^G ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^F^I^L^E
      ^F^I^L^E ^B^E^C^O^M^E^S ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R ^E^X^A^M^P^L^E,
      ^T^H^E ^F^I^L^E ^C^A^N^N^O^T ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.  E^N^T^E^R NA ^F^O^R
      ^N^O ^A^B^O^R^T, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      N^O^T^E@D Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).

      D^E^F^A^U^L^T@D E^R^R^O^R^S ^I^N GET ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,RT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RT) ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^A^L-^T^I^M^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N.  I^F
      RT ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^J^O^B ^C^O^N^T^I^N^U^E^S ^P^R^O^C^E^S^S^I^N^G ^A^F^T^E^R ^R^E^Q^U^E^S^T^I^N^G
      ^S^T^A^G^I^N^G ^O^F ^A ^F^I^L^E ^F^R^O^M ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^T^O ^D^I^S^K.  I^F ^S^T^A^G^I^N^G
      ^I^S ^N^O^T ^R^E^Q^U^I^R^E^D (^T^H^E ^F^I^L^E ^I^S ^A^L^R^E^A^D^Y ^R^E^S^I^D^E^N^T ^O^N ^D^I^S^K), ^T^H^E ^F^I^L^E
      ^I^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^J^O^B.  I^F ^T^H^E ^F^I^L^E ^M^U^S^T ^B^E ^S^T^A^G^E^D, ^Y^O^U ^M^U^S^T ^I^S^S^U^E
      ^A ^S^E^C^O^N^D GET ^C^O^M^M^A^N^D ^T^O ^A^S^S^I^G^N ^T^H^E ^F^I^L^E ^T^O ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F
      ^A ^D^I^S^K ^P^A^C^K ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^P^A^C^K ^I^S ^N^O^T ^A^L^R^E^A^D^Y
      ^M^O^U^N^T^E^D.  E^N^T^E^R WB ^F^O^R ^W^A^I^T, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      N^O^T^E@D Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^T^H^E ^R^E^Q^U^E^S^T^E^D ^P^A^C^K ^I^S ^N^O^T ^A^L^R^E^A^D^Y
               ^M^O^U^N^T^E^D.
.ENDHELP
.IF($LFN$.EQ.$$,L1)
   .EX.  $GET(PFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_RT_WB)
.ELSE(L1)
   .EX.  $GET(LFN=PFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_RT_WB)
.ENDIF(L1)
*WEOR
.PROC,GO*I
,JSN[J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  GO,^J^S^N.

      T^H^E GO ^C^O^M^M^A^N^D ^C^L^E^A^R^S ^T^H^E ^P^A^U^S^E ^B^I^T ^O^F ^O^N^E ^O^F ^Y^O^U^R ^E^X^E^C^U^T^I^N^G ^J^O^B^S.
.HELP,JSN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (^J^S^N) ^O^F ^T^H^E ^J^O^B
      ^W^H^O^S^E ^P^A^U^S^E ^B^I^T ^Y^O^U ^W^I^S^H ^T^O ^C^L^E^A^R.

.ENDHELP
.EX.  $GO(JSN)
*WEOR
.PROC,GOODBYE*I
,APPL[A^P^P^L^I^C^A^T^I^O^N ^T^O ^C^O^N^N^E^C^T ^T^O]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  GOODBYE,^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E GOODBYE ^C^O^M^M^A^N^D ^L^O^G^S ^Y^O^U ^O^U^T ^O^F ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E ^C^U^R^R^E^N^T^L^Y
      ^U^S^I^N^G ^A^N^D ^E^I^T^H^E^R ^S^W^I^T^C^H^E^S ^Y^O^U ^T^O ^Y^O^U^R ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N ^O^R ^R^E^I^N^I^T^I^A





^S
      ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E.  T^H^A^T ^I^S, ^I^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N ^W^A^S ^S^E^L^E^C^T^E^D
      ^F^R^O^M (^N^E^S^T^E^D ^W^I^T^H^I^N) ^A ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N, GOODBYE ^W^O^U^L^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^R^E^C^O^N^N^E^C^T ^Y^O^U ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^A^P^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^I^S^H
      ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N, ^Y^O^U ^A^R^E ^L^O^G^G^E^D ^O^U^T ^O^F
               ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N, ^A^N^D ^E^I^T^H^E^R ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E ^I^S
               ^R^E^I^N^I^T^I^A^T^E^D ^O^R ^Y^O^U ^A^R^E ^R^E^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U
               ^W^E^R^E ^U^S^I^N^G ^P^R^I^O^R ^T^O ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
.EX.  $GOODBYE,APPL.
$REVERT(NOLIST)
*WEOR
.PROC,GPSS*I
,ASS[A^S^S^E^M^B^L^Y P^H^A^S^E O^N^L^Y (A)]=(*A1,*N)
,BB[B^L^O^C^K^E^D B^I^N^A^R^Y F^O^R^M^A^T (BB)]=(*A1,*N)
,CLFN[U^P^D^A^T^E P^H^A^S^E O^U^T^P^U^T F^I^L^E (C)]=(*F,*N=COMPILE)
,CL[C^O^M^P^R^E^S^S^E^D L^I^S^T (CL)]=(*A1,*N)
,EC[E^X^T^E^N^D^E^D M^E^M^O^R^Y (EC)]=(*A3,*N=ECS)
,FI[M^I^N^I^M^U^M M^E^M^O^R^Y (FI)]=(*A4,*N=1000)
,ILFN[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=INPUT)
,J1[S^P^E^C^I^F^Y JOBTAPE1 F^I^L^E (J1)]=(*F,*N=JOBTA1)
,J2[S^P^E^C^I^F^Y JOBTAPE2 F^I^L^E (J2)]=(*F,*N=JOBTA2)
,J3[S^P^E^C^I^F^Y JOBTAPE3 F^I^L^E (J3)]=(*F,*N=JOBTA3)
,LLFN[S^Y^S^T^E^M O^U^T^P^U^T F^I^L^E (L)]=(*F,*N=OUTPUT)
,LF[F^I^L^E T^O C^O^N^T^A^I^N B^I^N^A^R^Y H^E^L^P B^L^O^C^K^S (LF)]=(*F,*N)
,L6[P^R^I^N^T L^I^S^T^I^N^G^S - S^I^X L^I^N^E^S (L6)]=(*A1,*N=6)
,L8[P^R^I^N^T L^I^S^T^I^N^G^S - E^I^G^H^T L^I^N^E^S (L8)]=(*A1,*N=6)
,MF[M^A^X^I^M^U^M F^I^E^L^D L^E^N^G^T^H (MF)]=(*A1,*N)
,NLFN[N^E^W P^R^O^G^R^A^M L^I^B^R^A^R^Y F^I^L^E (N)]=(*F,*N=NEWPL)
,NE[N^O E^X^T^E^N^D^E^D C^O^R^E S^T^O^R^A^G^E (NE)]=(*A1,*N)
,NB[N^O S^Y^S^T^E^M B^U^L^L^E^T^I^N (NB)]=(*A1,*N)
,NX[N^O C^R^O^S^S R^E^F^E^R^E^N^C^E M^A^P (NX)]=(*A1,*N)
,PLFN[O^L^D P^R^O^G^R^A^M L^I^B^R^A^R^Y F^I^L^E (P)]=(*F,*N=OLDPL)
,SIM[P^E^R^F^O^R^M S^I^M^U^L^A^T^I^O^N (R)]=(*A1,*N)
,RD[S^P^E^C^I^F^Y R^E^A^D C^O^M^M^A^N^D F^I^L^E (RD)]=(*F,*N=READ)
,RN[B^I^N^A^R^Y F^L^O^A^T^I^N^G P^O^I^N^T N^U^M^B^E^R^S F^I^L^E (RN)]=(*F,*N=)
,SV[S^P^E^C^I^F^Y S^A^V^E C^O^M^M^A^N^D F^I^L^E (SV)]=(*F,*N=SAVE)
,FX[GPSS V F^I^X^E^D F^O^R^M^A^T (FX)]=(*A1,*N)
,FR[GPSS V F^R^E^E F^O^R^M^A^T (FR)]=(*A1,*N)
,RRR[R1,R2,R3 A^L^L^O^C^A^T^I^O^N C^H^O^I^C^E (R1,R2,R3)]=(*A2,*N=R2)
,UPD[P^E^R^F^O^R^M U^P^D^A^T^E P^H^A^S^E O^N^L^Y (U)]=(*A1,*N)
,UB[U^N^B^L^O^C^K^E^D F^O^R^M^A^T (UB)]=(*A1,*N)
.
.PROMPT, N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  GPSS.
               ^O^R
               GPSS,A,BB,C=^L^F^N,CL,EC,FI=BBBBBB,I=^L^F^N,J1=^L^F^N,J2=^L^F^N,J3=^L^F^N,
                 L=^L^F^N, LF=^L^F^N, L6,L8,MF=BBBBBB,N=^L^F^N,NE,NB,NX,P=^L^F^N,R,RD=^L^F^N,
                 RN=^L^F^N,SV=^L^F^N,FX,FR,^0R1,R2,R3^2,U,UB.

      T^H^E ^C^O^M^M^A^N^D GPSS ^C^A^L^L^S ^T^H^E G^E^N^E^R^A^L P^U^R^P^O^S^E S^I^M^U^L^A^T^I^O^N S^Y^S^T^E^M.
.HELP,ASS,NOLIST

      F^O^R^M^A^T@D  A

      T^H^E ^P^A^R^A^M^E^T^E^R A ^S^P^E^C^I^F^I^E^S ^A^S^S^E^M^B^L^Y ^P^H^A^S^E ^O^N^L^Y.  N^O ^E^X^E^C^U^T^I^O^N.
.HELP,BB,NOLIST

      F^O^R^M^A^T@D  BB

      T^H^E ^P^A^R^A^M^E^T^E^R BB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A^L^L ^J^O^B ^T^A^P^E^S ^W^I^L^L ^B^E ^W^R^I^T^T^E^N ^I^N ^T^H^E
      FORTRAN ^B^L^O^C^K^E^D ^B^I^N^A^R^Y ^F^O^R^M^A^T.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^U^N^B^L^O^C^K^E^D.
.HELP,CLFN,NOLIST

      F^O^R^M^A^T@D  C=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R C ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E ^L^F^N ^C^O^N^T^A^I^N ^T^H^E ^O^U^T^P^U^T ^O^F ^T^H^E
      ^U^P^D^A^T^E ^P^H^A^S^E ^A^N^D ^I^S ^S^U^I^T^A^B^L^E ^F^O^R ^I^N^P^U^T ^T^O ^A GPSS ^R^U^N.  I^F C ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S COMPILE.
.HELP,CL,NOLIST

      F^O^R^M^A^T@D  CL

      T^H^E ^P^A^R^A^M^E^T^E^R CL ^S^P^E^C^I^F^I^E^S ^A ^C^O^M^P^R^E^S^S^E^D ^L^I^S^T.  N^O ^C^O^M^M^E^N^T ^C^A^R^D^S ^A^R^E
      ^L^I^S^T^E^D.
.HELP,EC,NOLIST

      F^O^R^M^A^T@D  EC

      T^H^E ^P^A^R^A^M^E^T^E^R EC ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E E^X^T^E^N^D^E^D M^E^M^O^R^Y ^B^E ^U^S^E^D ^F^O^R ^A^L^L
      GPSS ^O^V^E^R^L^A^Y^S.  I^F EC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O E^X^T^E^N^D^E^D M^E^M^O^R^Y.
.HELP,FI,NOLIST

      F^O^R^M^A^T@D  FI=BBBBBB

      T^H^E ^P^A^R^A^M^E^T^E^R FI ^S^P^E^C^I^F^I^E^S ^T^H^A^T BBBBBB ^I^S ^T^H^E ^M^I^N^I^M^U^M ^M^E^M^O^R^Y ^O^B^T^A^I^N^E^D
      ^W^H^E^N ^M^O^R^E ^M^E^M^O^R^Y ^I^S ^R^E^Q^U^E^S^T^E^D (^E^X^P^R^E^S^S^E^D ^I^N ^O^C^T^A^L).  I^F FI ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S 1000 ^O^C^T^A^L.
.HELP,ILFN,NOLIST

      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^I^N^P^U^T ^F^I^L^E.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,J1,NOLIST

      F^O^R^M^A^T@D  J1=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R J1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^S^E^D ^F^O^R JOBTAPE1.  I^F J1 ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S JOBTA1.
.HELP,J2,NOLIST

      F^O^R^M^A^T@D  J2=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R J2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^S^E^D ^F^O^R JOBTAPE2.  I^F J2 ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S JOBTA2.
.HELP,J3,NOLIST

      F^O^R^M^A^T@D  J3=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R J3 ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^S^E^D ^F^O^R JOBTAPE3.  I^F J3 ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S JOBTA3.
.HELP,LLFN,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^S^Y^S^T^E^M ^O^U^T^P^U^T.  I^F L ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,LF,NOLIST

      F^O^R^M^A^T@D  LF=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R LF ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E ^L^F^N ^C^O^N^T^A^I^N ^T^H^E ^R^E^L^O^C^A^T^A^B^L^E ^B^I^N^A^R^I^

      ^F^O^R ^A^L^L ^T^H^E ^H^E^L^P ^B^L^O^C^K^S ^U^S^E^D.
.HELP,L6,NOLIST

      F^O^R^M^A^T@D  L6

      T^H^E ^P^A^R^A^M^E^T^E^R L6 ^S^P^E^C^I^F^I^E^S ^A ^P^R^I^N^T ^L^I^S^T^I^N^G ^O^F ^S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.  T^H^I^S
      ^I^S ^T^H^E ^D^E^F^A^U^L^T.
.HELP,L8,NOLIST

      F^O^R^M^A^T@D  L8

      T^H^E ^P^A^R^A^M^E^T^E^R L8 ^S^P^E^C^I^F^I^E^S ^A ^P^R^I^N^T ^L^I^S^T^I^N^G ^O^F ^E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.  I^F L8
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,MF,NOLIST

      F^O^R^M^A^T@D  MF=BBBBBB

      T^H^E ^P^A^R^A^M^E^T^E^R MF ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H, ^I^N ^O^C^T^A^L, ^T^H^A^T GPSS
      ^C^A^N ^R^E^Q^U^E^S^T.  I^F MF ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H
      ^A^V^A^I^L^A^B^L^E ^T^O ^T^H^E ^J^O^B.
.HELP,NLFN,NOLIST

      F^O^R^M^A^T@D  N=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^F^I^L^E (^U^S^E^D ^W^I^T^H
      ^U^P^D^A^T^E).  I^F N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S NEWPL.
.HELP,NE,NOLIST

      F^O^R^M^A^T@D  NE

      T^H^E ^P^A^R^A^M^E^T^E^R NE ^S^P^E^C^I^F^I^E^S ^T^H^A^T GPSS ^W^I^L^L ^N^O^T ^U^S^E ^T^H^E E^X^T^E^N^D^E^D M^E^M^O^R^Y.
      I^F NE ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O E^X^T^E^N^D^E^D M^E^M^O^R^Y.
.HELP,NB,NOLIST
      F^O^R^M^A^T@D  NB

      T^H^E ^P^A^R^A^M^E^T^E^R NB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M ^B^U^L^L^E^T^I^N ^W^I^L^L ^N^O^T ^B^E ^P^R^I^N^T^E^D.
.HELP,NX,NOLIST

      F^O^R^M^A^T@D  NX

      T^H^E ^P^A^R^A^M^E^T^E^R NX ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^C^R^O^S^S ^R^E^F^E^R^E^N^C^E ^M^A^P ^W^I^L^L ^N^O^T ^B^E
      ^P^R^I^N^T^E^D.
.HELP,PLFN,NOLIST

      F^O^R^M^A^T@D  P=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R P ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^F^I^L^E (^U^S^E^D ^W^I^T^H ^U^P^D^A^T^E

      I^F P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OLDPL.
.HELP,SIM,NOLIST

      F^O^R^M^A^T@D  R

      T^H^E ^P^A^R^A^M^E^T^E^R R ^S^P^E^C^I^F^I^E^S ^T^O ^P^E^R^F^O^R^M ^S^I^M^U^L^A^T^I^O^N, ^E^V^E^N ^W^I^T^H^O^U^T ^A SIMULATE
      ^C^A^R^D.
.HELP,RD,NOLIST

      F^O^R^M^A^T@D  RD=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R RD ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^S^E^D ^F^O^R ^T^H^E READ ^C^O^M^M^A^N^D.  I^F
      RD ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S READ.
.HELP,RN,NOLIST

      F^O^R^M^A^T@D  RN=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R RN ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^C^O^N^T^A^I^N ^T^H^E ^B^I^N^A^R^Y ^F^L^O^A^T^I^N^G-^P^O^I^N^T
      ^N^U^M^B^E^R^S ^W^H^E^N RN9 ^I^S ^R^E^F^E^R^E^N^C^E^D.  I^F RN ^I^S ^O^M^I^T^T^E^D, RN9 ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E.
.HELP,SV,NOLIST

      F^O^R^M^A^T@D  SV=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R SV ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^S^E^D ^F^O^R ^T^H^E SAVE ^C^O^M^M^A^N^D.  I^F
      SV ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SAVE.
.HELP,FX,NOLIST

      F^O^R^M^A^T@D  FX

      T^H^E ^P^A^R^A^M^E^T^E^R FX ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E GPSS V ^I^N^P^U^T ^C^A^R^D^S ^A^R^E ^T^O ^B^E ^P^R^O^C^E^S^S^E^D
      ^W^I^T^H ^T^H^E^I^R ^F^I^X^E^D ^F^I^E^L^D ^F^O^R^M^A^T.  I^F FX ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^F^R^E^E
      ^F^I^E^L^D ^I^N^P^U^T.
.HELP,FR,NOLIST

      F^O^R^M^A^T@D  FR

      T^H^E ^P^A^R^A^M^E^T^E^R FR ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E GPSS V ^I^N^P^U^T ^C^A^R^D^S ^A^R^E ^T^O ^B^E ^P^R^O^C^E^S^S^E^D
      ^W^I^T^H ^T^H^E^I^R ^F^R^E^E ^F^I^E^L^D ^F^O^R^M^A^T.
.HELP,RRR,NOLIST

      F^O^R^M^A^T@D  R1,R2,R3

      T^H^E ^P^A^R^A^M^E^T^E^R R1,R2,R3 ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^N^T^I^T^Y ^A^L^L^O^C^A^T^I^O^N ^S^C^H^E^M^E ^C^H^O^I^C^E.  I^F
      R1,R2,R3, ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S R2.
.HELP,UPD,NOLIST

      F^O^R^M^A^T@D  U

      T^H^E ^P^A^R^A^M^E^T^E^R U ^S^P^E^C^I^F^I^E^S ^T^O ^P^E^R^F^O^R^M ^U^P^D^A^T^E ^P^H^A^S^E ^O^N^L^Y.
.HELP,UB,NOLIST

      F^O^R^M^A^T@D  UB

      T^H^E ^P^A^R^A^M^E^T^E^R UB ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A^L^L ^J^O^B ^T^A^P^E^S ^W^I^L^L ^B^E ^W^R^I^T^T^E^N ^I^N ^U^N^B^L^O^C^K^

      ^F^O^R^M^A^T ^W^I^T^H ^O^N^E ^L^O^G^I^C^A^L ^R^E^C^O^R^D ^P^E^R ^T^R^A^N^S^A^C^T^I^O^N.  I^F UB ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^U^N^B^L^O^C^K^E^D.
  .ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,GTR*I
,LF1[F^I^L^E ^T^O ^B^E ^S^E^A^R^C^H^E^D]=(*A1,*N)
,LF2[F^I^L^E ^T^O ^B^E ^W^R^I^T^T^E^N]=(*A1,*N)
,D[D^I^R^E^C^T^O^R^Y (^D)]=(D=D,*A1,*N)
,NR[N^O R^E^W^I^N^D O^P^T^I^O^N (NR)]=(*A1,*N)
,S[F^I^L^E S^E^A^R^C^H^E^D S^E^Q^U^E^N^T^I^A^L^L^Y (S)]=(S=S,*A1,*N)
,NA[N^O A^B^O^R^T O^P^T^I^O^N (NA)]=(*A1,*N)
,TEXT[TEXT ^R^E^C^O^R^D ^N^A^M^E ^R^E^M^O^V^A^L ^O^P^T^I^O^N (T)]=(*A1,*N)
,DIR[R^E^C^O^R^D^S ^T^O ^B^E ^R^E^T^R^I^E^V^E^D]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T@D  GTR,^L^F^N1,^L^F^N2,^D,NR,S,NA,T.^D^I^R^E^C^T^I^V^E1,...,
                                  ^D^I^R^E^C^T^I^V^E^N
      ^O^R
      O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T@D  GTR,^L^F^N1,^L^F^N2/^P1,^P2,...,^P^N.^D^I^R^E^C^T^I^V^E1,
                                    ^D^I^R^E^C^T^I^V^E2,...,^D^I^R^E^C^T^I^V^E^N

      T^H^E GTR ^C^O^M^M^A^N^D ^E^X^T^R^A^C^T^S ^R^E^C^O^R^D^S ^S^E^L^E^C^T^E^D ^F^R^O^M ^O^N^E ^F^I^L^E ^A^N^D ^W^R^I^T^E^S
      ^T^H^E^M ^T^O ^T^H^E ^E^N^D ^O^F ^A^N^O^T^H^E^R ^F^I^L^E.  T^H^E ^R^E^C^O^R^D^S ^A^R^E ^S^E^L^E^C^T^E^D ^A^C^C^O^R^D^I^N^G
      ^T^O ^D^I^R^E^C^T^I^V^E^S ^S^P^E^C^I^F^Y^I^N^G ^T^H^E^I^R ^T^Y^P^E ^A^N^D ^N^A^M^E.

                                     NOTE
                                     ----
      I^N ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T, ^T^H^E ^P^A^R^A^M^E^T^E^R^S ^M^U^S^T ^B^E ^I^N ^T^H^E ^O^R^D^E^R ^S^H^O^W^N.
      P^A^R^A^M^E^T^E^R^S ^A^R^E ^I^D^E^N^T^I^F^I^E^D ^B^Y ^T^H^E^I^R ^P^O^S^I^T^I^O^N, ^N^O^T ^B^Y ^K^E^Y^W^O^R^D^S.  A^N
      ^O^M^I^T^T^E^D ^P^A^R^A^M^E^T^E^R ^I^S ^D^E^N^O^T^E^D ^B^Y ^C^O^N^S^E^C^U^T^I^V^E ^C^O^M^M^A^S.  I^N ^K^E^Y^W^O^R^D ^F^O^R^M^A^T,
      ^P^A^R^A^M^E^T^E^R^S ^P^R^E^C^E^D^I^N^G ^T^H^E / ^A^R^E ^S^T^I^L^L ^P^R^O^C^E^S^S^E^D ^I^N ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^F^O^R^M^

      ^B^U^T ^T^H^O^S^E ^P^A^R^A^M^E^T^E^R ^W^H^I^C^H ^F^O^L^L^O^W (^P1,^P2,...,^P^N) ^A^R^E ^R^E^C^O^G^N^I^Z^E^D ^B^Y ^K^E^Y^W^O^R^D,
      ^A^N^D ^M^A^Y ^O^C^C^U^R ^I^N ^A^N^Y ^O^R^D^E^R.  T^H^E ^K^E^Y^W^O^R^D^S ^A^R^E ^T^H^E ^S^A^M^E ^A^S ^T^H^E ^S^U^G^G^E^S^T^E^D
      ^V^A^L^U^E^S ^F^O^R ^T^H^E ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T ^P^A^R^A^M^E^T^E^R^S@D  U, D, NR, S, NA ^A^N^D T.
      I^N ^E^I^T^H^E^R ^F^O^R^M^A^T, ^D^O ^N^O^T ^P^L^A^C^E ^B^L^A^N^K^S ^B^E^T^W^E^E^N ^T^H^E ^T^E^R^M^I^N^A^T^O^R (^R^I^G^H^T
      ^P^A^R^E^N^T^H^E^S^I^S ^O^R ^P^E^R^I^O^D) ^A^N^D ^D^I^R^E^C^T^I^V^E1.  A^L^S^O, ^D^O ^N^O^T ^P^L^A^C^E ^A ^T^E^R^M^I^N^A^T^O^R
      ^A^F^T^E^R ^D^I^R^E^C^T^I^V^E^N.
.HELP,LF1,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^W^H^I^C^H ^I^S ^S^E^A^R^C^H^E^D ^F^O^R ^T^H^E
      ^R^E^Q^U^E^S^T^E^D ^R^E^C^O^R^D^S. I^F ^L^F^N1 ^I^S ^O^M^I^T^T^E^D, ^F^I^L^E OLD ^I^S ^A^S^S^U^M^E^D.  ^L^F^N1 ^I^S
      ^A^L^W^A^Y^S ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^T^H^E GTR ^O^P^E^R^A^T^I^O^N.
.HELP,LF2,NOLIST

      F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^S^E^L^E^C^T^E^D ^R^E^C^O^R^D^S ^A^R^E ^W^R^I^T^T^E^N. I^F ^L^F^N2 ^I^S ^O^M^I^T^T^E^D,
      ^F^I^L^E LGO ^I^S ^A^S^S^U^M^E^D.  F^O^R ^D^I^S^K ^F^I^L^E^S, GTR ^A^L^W^A^Y^S ^P^O^S^I^T^I^O^N^S ^L^F^N2 ^A^T
      EOI ^B^E^F^O^R^E ^C^O^P^Y^I^N^G ^T^H^E ^S^E^L^E^C^T^E^D ^R^E^C^O^R^D^S.  GTR ^O^N^L^Y ^A^P^P^E^N^D^S ^R^E^C^O^R^D^S
      ^T^O ^T^A^P^E ^F^I^L^E^S ^W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E NR ^P^A^R^A^M^E^T^E^R.  O^T^H^E^R^W^I^S^E, GTR
      ^S^T^A^R^T^S ^W^R^I^T^I^N^G ^O^N ^T^A^P^E ^F^I^L^E^S ^A^T ^T^H^E^I^R BOI.
.HELP,D,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y ^P^A^R^A^M^E^T^E^R.  I^F ^D ^I^
      ^S^P^E^C^I^F^I^E^D, ^L^F^N2 ^M^U^S^T ^B^E ^A ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E.  GTR ^C^A^N^N^O^T ^A^P^P^E^N^D ^R^E^C^O^R^D^S
      ^A^F^T^E^R ^A ^D^I^R^E^C^T^O^R^Y.

      I^F ^L^F^N1 ^H^A^S ^A ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y ^A^N^D ^I^F ^S^E^Q^U^E^N^T^I^A^L ^A^C^C^E^S^S (^T^H^E S
      ^P^A^R^A^M^E^T^E^R) ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^L^F^N2 ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D ^I^S ^G^I^V^E^N ^T^H^E ^S^A^M^E
      ^N^A^M^E ^A^S ^T^H^E ^L^F^N1 ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D.  O^T^H^E^R^W^I^S^E, ^T^H^E ^L^F^N2 ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D
      ^I^S ^N^A^M^E^D ^L^F^N2.

              ^D                           D^E^S^C^R^I^P^T^I^O^N
              -                           -----------
           ^O^M^I^T^T^E^D             N^O ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y (OPLD) ^I^S ^A^D^D^E^D
                               ^T^O ^L^F^N2.  I^F ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^S^P^E^C^I^F^Y ^T^H^E ^U^S^E^R2
                               ^L^I^B^R^A^R^Y ^R^E^C^O^R^D ^T^Y^P^E (ULIB), ^T^H^E ^F^I^R^S^T ^R^E^C^O^R^D ^O^F
                               ^T^H^E ^L^I^B^R^A^R^Y (ULIB) ^I^S ^N^O^T ^C^O^P^I^E^D ^T^O ^L^F^N2.  T^H^E
                               ^S^E^C^O^N^D ^A^N^D ^S^U^B^S^E^Q^U^E^N^T ^R^E^C^O^R^D^S ^A^R^E ^C^O^P^I^E^D, ^A^N^D
                               ^T^H^E ^L^A^S^T ^R^E^C^O^R^D (OPLD) ^I^S ^C^O^P^I^E^D ^W^I^T^H^O^U^T
                               ^A^L^T^E^R^A^T^I^O^N.  T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T ^W^R^I^T^E ^A^N EOF
                               ^A^T ^T^H^E ^E^N^D ^O^F ^T^H^E ^F^I^L^E.

               U               N^O ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y (OPLD) ^I^S ^A^D^D^E^D
                               ^T^O ^L^F^N2.  I^F ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^S^P^E^C^I^F^Y ^T^H^E ^U^S^E^R2
                               ^L^I^B^R^A^R^Y ^R^E^C^O^R^D ^T^Y^P^E (ULIB), ^T^H^E ^F^I^R^S^T ^R^E^C^O^R^D
                               ^O^F ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y (ULIB) ^I^S ^C^O^P^I^E^D ^W^I^T^H^O^U^T
                               ^A^L^T^E^R^A^T^I^O^N ^T^O ^L^F^N2 ^A^L^O^N^G ^W^I^T^H ^T^H^E ^R^E^M^A^I^N^D^E^R ^O^F
                               ^T^H^E ^L^I^B^R^A^R^Y, ^I^N^C^L^U^D^I^N^G ^T^H^E OPLD.  T^H^E ^S^Y^S^T^E^M
                               ^D^O^E^S ^N^O^T ^W^R^I^T^E ^A^N EOF ^A^T ^T^H^E ^E^N^D ^O^F ^T^H^E ^F^I^L^E.

           D ^O^R ^O^T^H^E^R          W^R^I^T^E^S ^A ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y (OPLD) ^A^T
                               ^T^H^E ^E^N^D ^O^F ^L^F^N2.  I^F ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^S^P^E^C^I^F^Y ^T^H^E
                               ^U^S^E^R ^L^I^B^R^A^R^Y ^R^E^C^O^R^D ^T^Y^P^E (ULIB), ^T^H^E ^F^I^R^S^T
                               ^R^E^C^O^R^D ^O^F ^T^H^E ^L^I^B^R^A^R^Y (ULIB) ^I^S ^C^O^P^I^E^D ^W^I^T^H^O^U^T
                               ^A^L^T^E^R^A^T^I^O^N ^T^O ^L^F^N2 ^A^L^O^N^G ^W^I^T^H ^T^H^E ^R^E^L^O^C^A^T^A^B^L^E
                               ^R^E^C^O^R^D^S ^A^N^D ^T^H^E ^O^L^D ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y
                               (OPLD).  T^H^E ^S^Y^S^T^E^M ^W^R^I^T^E^S ^A^N EOF ^A^F^T^E^R ^T^H^E ^N^E^W
                               ^D^I^R^E^C^T^O^R^Y.



                                     NOTE
                                     ----

     T^H^E ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y ^C^O^N^T^A^I^N^S ^E^N^T^R^I^E^S ^O^N^L^Y ^F^O^R ^R^E^C^O^R^D^S ^S^P^E^C^I
^E^D
     ^O^N ^T^H^E ^C^U^R^R^E^N^T GTR ^C^O^M^M^A^N^D.  T^O ^B^U^I^L^D ^A ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^D^I^R^E^C^T^O^R^Y ^W^H^I^C^H
     ^C^O^N^T^A^I^N^S ^E^N^T^R^I^E^S ^F^O^R ^A^L^L ^R^E^C^O^R^D^S ^O^N ^L^F^N2, ^U^S^E LIBEDIT.
.HELP,NR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NR ^S^P^E^C^I^F^I^E^S ^N^O ^R^E^W^I^N^D ^O^P^T^I^O^N.  ^L^F^N1 ^I^S ^N^O^T ^R^E^W^O^U^N^D ^A^F^T^E^R
      ^T^H^E ^O^P^E^R^A^T^I^O^N; ^L^F^N2 ^I^S ^N^O^T ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^O^R ^A^F^T^E^R ^T^H^E ^O^P^E^R^A^T^I^O^N.  I^F
      ^L^F^N1 ^H^A^S ^A ^D^I^R^E^C^T^O^R^Y, ^T^H^E ^D^I^R^E^C^T^O^R^Y ^I^S ^C^O^P^I^E^D ^T^O ^L^F^N2.

      I^F NR ^I^S ^O^M^I^T^T^E^D, ^B^O^T^H ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D ^A^F^T^E^R ^T^H^E ^O^P^E^R^A^T^I^O^N, ^B^U^T ^O^N^L^Y
      ^W^H^E^N ^L^F^N2 ^I^S ^A ^T^A^P^E ^F^I^L^E ^I^S ^L^F^N2 ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^T^H^E ^O^P^E^R^A^T^I^O^N.

.HELP,S,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R S ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^L^F^N1 ^I^S ^S^E^A^R^C^H^E^D ^S^E^Q^U^E^N^T^I^A^L^L^Y; ^N^O
      ^A^T^T^E^M^P^T ^I^S ^M^A^D^E ^T^O ^R^E^A^D ^A ^D^I^R^E^C^T^O^R^Y.
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^S^P^E^C^I^F^I^E^S ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  I^F ^S^P^E^C^I^F^I^E^D, GTR ^D^O^E^S ^N^O^T
      ^S^E^A^R^C^H ^F^O^R ^A^N EXIT ^C^O^M^M^A^N^D ^W^H^E^N ^A^N ^E^R^R^O^R ^O^C^C^U^R^S.  I^T ^I^S^S^U^E^S ^A ^D^A^Y^F^I^L^E
      ^M^E^S^S^A^G^E ^F^O^R ^T^H^E ^E^R^R^O^R ^A^N^D ^C^O^N^T^I^N^U^E^S GTR ^P^R^O^C^E^S^S^I^N^G ^A^T ^T^H^E ^N^E^X^T ^D^I^R^E^C^T^I^V^E
.HELP,TEXT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R T ^S^P^E^C^I^F^I^E^S ^T^H^E TEXT ^R^E^C^O^R^D ^N^A^M^E ^R^E^M^O^V^A^L ^O^P^T^I^O^N.  I^F
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^R^E^C^O^R^D ^N^A^M^E ^O^F ^T^H^E ^S^E^L^E^C^T^E^D TEXT ^T^Y^P^E ^R^E^C^O^R^D^S ^I^S ^R^E^M^O^V^E^D
      ^W^H^E^N ^T^H^E ^R^E^C^O^R^D ^I^S ^W^R^I^T^T^E^N ^T^O ^L^F^N2.  T^H^E ^E^N^T^I^R^E ^R^E^C^O^R^D ^N^A^M^E ^L^I^N^E ^I^S
      ^R^E^M^O^V^E^D (^U^P ^T^O ^A^N^D ^I^N^C^L^U^D^I^N^G ^T^H^E ^E^N^D ^O^F ^L^I^N^E ^M^A^R^K^E^R), ^W^H^I^C^H ^I^S ^T^H^E ^F^I^R^S^T
      ^W^O^R^D ^C^O^N^T^A^I^N^I^N^G ^A ^Z^E^R^O ^O^N ^T^H^E ^L^O^W ^O^R^D^E^R ^O^F ^T^H^E 12 ^B^I^T^S.
.HELP,DIR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^D^I^R^E^C^T^I^V^E^I ^S^P^E^C^I^F^I^E^S ^A ^R^E^C^O^R^D ^O^R ^G^R^O^U^P ^O^F ^R^E^C^O^R^D^S ^T^O ^B^E
      ^R^E^T^R^I^E^V^E^D.  O^N^E ^O^R ^M^O^R^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^O^R^M^A^T^S ^C^A^N ^B^E ^U^S^E^D.
      T^H^E ^D^E^F^A^U^L^T ^T^Y^P^E ^I^S ^T^H^E ^L^A^S^T ^T^Y^P^E ^S^P^E^C^I^F^I^E^D ^O^N ^A ^D^I^R^E^C^T^I^V^E, ^O^R ^I^F ^N^O^N^E
      ^I^S ^S^P^E^C^I^F^I^E^D, TEXT ^I^S ^U^S^E^D.  T^H^E ^R^E^C^O^R^D ^N^A^M^E ^I^S ^T^H^E ^F^I^R^S^T ^S^E^V^E^N
      ^C^H^A^R^A^C^T^E^R^S ^O^F ^T^H^E ^R^E^C^O^R^D, ^O^R ^I^F ^A ^P^R^E^F^I^X ^T^A^B^L^E ^I^S ^P^R^E^S^E^N^T, ^T^H^E ^C^O^N^T^E^N^T^S
      ^O^F ^T^H^E ^N^A^M^E ^F^I^E^L^D ^I^N ^I^T^S ^S^E^C^O^N^D ^W^O^R^D.

              D^I^R^E^C^T^I^V^E^S                                M^E^A^N^I^N^G
              ----------                                -------
              ^T^Y^P^E/^N^A^M^E               R^E^C^O^R^D ^W^I^T^H ^T^H^E ^S^P^E^C^I^F^I^E^D ^T^Y^P^E ^A^N^D ^N^A^M^E.

              ^N^A^M^E                    R^E^C^O^R^D ^W^I^T^H ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^A^M^E ^A^N^D ^T^H^E
                                      ^D^E^F^A^U^L^T ^T^Y^P^E.

      ^T^Y^P^E1/^N^A^M^E1-^T^Y^P^E2/^N^A^M^E2         G^R^O^U^P ^O^F ^R^E^C^O^R^D^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^N^A^M^E1 ^O^F
                                      ^T^Y^P^E1 ^A^N^D ^E^N^D^I^N^G ^W^I^T^H ^N^A^M^E2 ^O^F ^T^Y^P^E2.

      ^T^Y^P^E1/^N^A^M^E1-^N^A^M^E2               G^R^O^U^P ^O^F ^R^E^C^O^R^D^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^N^A^M^E1
                                      ^O^F ^T^Y^P^E1 ^A^N^D ^E^N^D^I^N^G ^W^I^T^H ^N^A^M^E2 ^O^F ^T^Y^P^E1.

      ^N^A^M^E1-^N^A^M^E2                     G^R^O^U^P ^O^F ^R^E^C^O^R^D^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^N^A^M^E1
                                      ^O^F ^T^H^E ^D^E^F^A^U^L^T ^T^Y^P^E ^A^N^D ^E^N^D^I^N^G ^W^I^T^H
                                      ^N^A^M^E2 ^O^F ^T^H^E ^D^E^F^A^U^L^T ^T^Y^P^E.

      ^T^Y^P^E/^N^A^M^E-*                     A^L^L ^R^E^C^O^R^D^S ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^T^Y^P^E
                                      ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^T^H^E ^N^A^M^E^D ^R^E^C^O^R^D.

      ^N^A^M^E-*                          A^L^L ^R^E^C^O^R^D^S ^O^F ^T^H^E ^D^E^F^A^U^L^T ^T^Y^P^E ^B^E^G^I^N^N^I^N^G
                                      ^W^I^T^H ^T^H^E ^N^A^M^E^D ^R^E^C^O^R^D.

      ^T^Y^P^E/*                          A^L^L ^R^E^C^O^R^D^S ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^T^Y^P^E.

      *                               A^L^L ^R^E^C^O^R^D^S ^O^F ^T^H^E ^D^E^F^A^U^L^T ^T^Y^P^E.

      0                               A ^Z^E^R^O-^L^E^N^G^T^H ^R^E^C^O^R^D ^I^S ^I^N^S^E^R^T^E^D.

       GTR ^S^E^A^R^C^H^E^S ^F^I^L^E ^L^F^N1 ^F^O^R ^T^H^E ^R^E^C^O^R^D^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^S^E^L^E^C^T^I^O^N
       ^D^I^R^E^C^T^I^V^E^S.  I^F GTR ^C^A^N^N^O^T ^F^I^N^D ^A ^R^E^C^O^R^D ^S^P^E^C^I^F^I^E^D ^B^Y ^T^Y^P^E ^A^N^D ^N^A^M^E,
       ^I^T ^I^S^S^U^E^S ^T^H^E ^F^O^L^L^O^W^I^N^G ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E.

           GTR ERRORS.

       I^T ^A^L^S^O ^I^S^S^U^E^S ^T^H^I^S ^M^E^S^S^A^G^E ^W^H^E^N ^T^H^E ^R^E^C^O^R^D ^S^P^E^C^I^F^I^E^D ^I^S ^W^I^T^H^I^N ^A ^U^S^E^R
       ^L^I^B^R^A^R^Y ^A^N^D ^W^H^E^N ^T^H^E GTR ^C^O^M^M^A^N^D ^S^Y^N^T^A^X ^I^S ^I^N^C^O^R^R^E^C^T.

       I^F ^L^F^N1 ^H^A^S ^A ^D^I^R^E^C^T^O^R^Y (OPLD) ^R^E^C^O^R^D, GTR ^W^R^I^T^E^S ^T^H^E ^S^E^L^E^C^T^E^D ^R^E^C^O^R^D^S
       ^O^N ^L^F^N2 ^I^N ^T^H^E ^O^R^D^E^R ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E GTR ^C^O^M^M^A^N^D.  I^F ^L^F^N2 ^D^O^E^S ^N^O^T
       ^H^A^V^E ^A ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D, GTR ^W^R^I^T^E^S ^T^H^E ^S^E^L^E^C^T^E^D ^R^E^C^O^R^D^S ^I^N ^T^H^E ^O^R^D^E^R
       ^T^H^A^T ^I^T ^F^I^N^D^S ^T^H^E^M ^O^N ^L^F^N1, ^R^A^T^H^E^R ^T^H^A^N ^I^N ^T^H^E ^O^R^D^E^R ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E
       ^C^O^M^M^A^N^D.

       I^F ^L^F^N2 ^I^S ^O^N ^T^A^P^E, ^T^H^E ^S^E^L^E^C^T^E^D ^R^E^C^O^R^D^S ^A^R^E ^C^O^P^I^E^D ^F^R^O^M ^T^H^E ^C^U^R^R^E^N^T
       ^F^I^L^E ^P^O^S^I^T^I^O^N; ^I^F ^L^F^N2 ^I^S ^O^N ^M^A^S^S ^S^T^O^R^A^G^E, ^T^H^E ^C^O^P^Y ^S^T^A^R^T^S ^A^T ^T^H^E ^C^U^R^R^E^N^
       EOI ^O^F ^T^H^E ^F^I^L^E. I^F ^A^N EOF ^E^X^I^S^T^S ^B^E^F^O^R^E ^T^H^E EOI, GTR ^A^P^P^E^N^D^S ^T^H^E ^R^E^C^O^R^D^S
       ^A^S ^A ^F^I^L^E ^F^O^L^L^O^W^I^N^G ^T^H^E ^E^X^I^S^T^I^N^G EOF.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HELLO*I
,APPL[A^P^P^L^I^C^A^T^I^O^N ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  HELLO,^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E HELLO ^C^O^M^M^A^N^D ^L^O^G^S ^Y^O^U ^O^U^T ^O^F ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E ^C^U^R^R^E^N^T^L^Y
      ^U^S^I^N^G ^A^N^D ^E^I^T^H^E^R ^S^W^I^T^C^H^E^S ^Y^O^U ^T^O ^Y^O^U^R ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N ^O^R ^R^E^I^N^I^T^I^A
^S
      ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E.  T^H^A^T ^I^S, ^I^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N ^W^A^S ^S^E^L^E^C^T^E^D
      ^F^R^O^M (^N^E^S^T^E^D ^W^I^T^H^I^N) ^A ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N, HELLO ^W^O^U^L^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^R^E^C^O^N^N^E^C^T ^Y^O^U ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^I^S^H
      ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N, ^Y^O^U ^A^R^E ^L^O^G^G^E^D ^O^U^T ^O^F
               ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N, ^A^N^D ^E^I^T^H^E^R ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E ^I^S
               ^R^E^I^N^I^T^I^A^T^E^D ^O^R ^Y^O^U ^A^R^E ^R^E^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^E^R^E
               ^U^S^I^N^G ^P^R^I^O^R ^T^O ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
.EX. $HELLO(APPL)
$REVERT(NOLIST)
*WEOR
.PROC,HELLO7*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  HELLO7.

      T^H^E HELLO7 ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^S^U^B^M^I^T ^A ^J^O^B ^T^H^A^T ^R^E^Q^U^I^R^E^S ^T^E^R^M^I^N^A^L
      ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^T^O ^A ^L^I^N^K^E^D SCOPE 2 ^S^Y^S^T^E^M ^A^N^D ^T^O ^C^O^M^M^U^N^I^C^A^T^E
      ^I^N^T^E^R^A^C^T^I^V^E^L^Y ^W^I^T^H ^A^N ^E^X^E^C^U^T^I^N^G SCOPE 2 ^J^O^B.  I^F ^Y^O^U^R SCOPE 2 ^J^O^B ^D^O^E^S ^N^O^T
      ^R^E^Q^U^I^R^E ^I^N^T^E^R^A^C^T^I^V^E ^P^A^R^T^I^C^I^P^A^T^I^O^N, ^Y^O^U ^C^A^N ^R^O^U^T^E ^I^T ^T^O SCOPE 2 ^W^I^T^H ^T^H^E
      ROUTE ^C^O^M^M^A^N^D.

      A ^J^O^B ^Y^O^U ^S^U^B^M^I^T ^T^H^R^O^U^G^H HELLO7 (^O^R ^T^H^E ROUTE ^C^O^M^M^A^N^D) ^M^U^S^T ^B^E ^A ^S^T^A^N^D^A^R^D
      SCOPE 2 ^J^O^B ^U^S^I^N^G SCOPE 2 ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T^S.  T^H^E ^J^O^B ^I^N^I^T^I^A^T^E^S ^T^E^R^M^I^N^A^L
      ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^O^P^E^R^A^T^I^O^N^S ^B^Y ^S^P^E^C^I^F^Y^I^N^G CNF=YES ^O^N ^A FILE ^C^O^N^T^R^O^L
      ^S^T^A^T^E^M^E^N^T ^O^R ^M^A^C^R^O ^O^R ^B^Y ^I^S^S^U^I^N^G ^A CONNECT ^M^A^C^R^O ^F^O^R ^A ^F^I^L^E.

      T^H^E^R^E ^A^R^E ^T^W^O ^M^O^D^E^S ^O^F ^O^P^E^R^A^T^I^O^N ^U^N^D^E^R HELLO7@D ^C^O^N^T^R^O^L ^M^O^D^E ^A^N^D ^R^U^N ^M^O^D^E.
      I^N ^C^O^N^T^R^O^L ^M^O^D^E, ^T^H^E ^I^N^I^T^I^A^L ^M^O^D^E ^O^N ^E^N^T^E^R^I^N^G HELLO7, ^Y^O^U ^A^R^E ^C^O^M^M^U^N^I^C^A^T-
      ^I^N^G ^W^I^T^H ^T^H^E HELLO7 ^U^T^I^L^I^T^Y.  I^N ^C^O^N^T^R^O^L ^M^O^D^E ^Y^O^U ^C^A^N ^S^U^B^M^I^T ^A ^J^O^B ^T^O
      SCOPE 2, ^D^R^O^P ^A ^J^O^B, ^O^R ^O^B^T^A^I^N ^S^T^A^T^U^S ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^A ^J^O^B.  O^N^C^E ^Y^O^U
      ^S^U^B^M^I^T ^A ^J^O^B ^T^O SCOPE 2 (^B^Y ^E^N^T^E^R^I^N^G ^A SUBMIT ^D^I^R^E^C^T^I^V^E), ^Y^O^U ^E^N^T^E^R
      ^R^U^N ^M^O^D^E, ^I^N ^W^H^I^C^H ^Y^O^U ^I^N^T^E^R^A^C^T ^D^I^R^E^C^T^L^Y ^W^I^T^H ^Y^O^U^R ^J^O^B ^A^S ^I^T ^E^X^E^C^U^T^E^S ^O^N
      ^T^H^E SCOPE 2 ^S^Y^S^T^E^M.  Y^O^U ^R^E^M^A^I^N ^I^N ^R^U^N ^M^O^D^E ^U^N^T^I^L ^Y^O^U ^E^N^T^E^R ^A ^T^E^R^M^I^N^A^T^I^O^N
      ^D^I^R^E^C^T^I^V^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HELP*M"H^E^L^P A^V^A^I^L^A^B^L^E ^O^N NOS"
,OPTION=
(1"HELPME -- H^E^L^P^S ^Y^O^U ^E^X^E^C^U^T^E ^C^O^M^M^A^N^D^S."
,2"EXPLAIN -- A^C^C^E^S^S^E^S ^O^N^L^I^N^E ^M^A^N^U^A^L^S."
,3"L^I^S^T^S ^O^P^E^R^A^T^I^N^G ^S^Y^S^T^E^M ^C^O^M^M^A^N^D^S."
,4"L^I^S^T^S ^N^E^T^W^O^R^K ^C^O^M^M^A^N^D^S."
).

.IF(OPTION .EQ. 1,L1)
  .EX. HELPME.
.ENDIF(L1)
.IF(OPTION .EQ. 2,L2)
  .EX. EXPLAIN.
.ENDIF(L2)
.IF(OPTION .EQ. 3,L3)
  .IF(CSET=NORMAL)$CSET(ASCII)
  $COPYBF(ZZZHLPF,OUTPUT)
  .IF(CSET=NORMAL)$CSET(NORMAL)
  $REVERT(NOLIST)
  $EXIT.
  .IF(CSET=NORMAL)$CSET(NORMAL)
  $REVERT(NOLIST)
.ENDIF(L3)
.IF(OPTION .EQ. 4,L4)
  .IF(CSET=NORMAL)$CSET(ASCII)
  $COPYBF(ZZZCCP,OUTPUT)
  $REVERT(NOLIST)
  .IF(CSET=NORMAL)$CSET(NORMAL)
  $REVERT(NOLIST)
  $EXIT.
  .IF(CSET=NORMAL)$CSET(NORMAL)
  $REVERT(NOLIST)
.ENDIF(L4)
.DATA,ZZZHLPF
                         O^P^E^R^A^T^I^N^G S^Y^S^T^E^M C^O^M^M^A^N^D^S

   ACCESS     ALTER      APL        APPEND     APPSW      ASCII      ASSIGN
   ATTACH     AUTO       BASIC      BATCH      BEGIN      BKSP       BLANK
   BLOCK      BRIEF      BYE        CATALOG    CATLIST    CFO        CHANGE
   CHARGE     CHVAL      CKP        CLASS      CLEAR      COBOL5     COMMENT
   COMPASS    COMMON     COPY       COPYBF     COPYBR     COPYCF     COPYCR
   COPYEI     COPYL      COPYLM     COPYSBF    COPYX      CSET       CTIME
   CYBIL      DAYFILE    DEBUG      DEFINE     DELETE     DETACH     DIAL
   DISPLAY    DMB        DMD        DMDECS     DMP        DMPECS     DOCMENT
   DROP       DROPDS     DUP        EDIT       EFFECT     ELSE       ENDIF
   ENDW       ENQUIRE    ENTER      ERRMSG     EVICT      EXECUTE    EXIT
   EXPLAIN    FCOPY      FORTRAN    FSE        FTN        FTNTS      FTN5
   F45        GET        GO         GOODBYE    GPSS       GTR        HELLO
   HELLO7     HELP       HELPME     HTIME      IF         IFE        ITEMIZE
   JOB        KEY        KRONREF    LABEL      LBC        LDI        LDSET
   LENGTH     LIB        LIBEDIT    LIBGEN     LIBLOAD    LIBRARY    LIMITS
   LINE       LIST       LISTLB     LISTLID    LIST80     LOAD       LOC
   LOCK       LOGIN      LOGOUT     LO72       MACHINE    MAP        MFL
   MFLINK     MFQUEUE    MODE       MODIFY     MOVE       NEW        NOEXIT
   NOGO       NORERUN    NORMAL     NOSORT     NOTE       NULL       OFFSW
   OLD        ONEXIT     ONSW       OPLEDIT    OUT        OVWRITE    PACK
   PACKNAM    PASCAL     PASSWOR    PAUSE      PBC        PDU        PERMIT
   PRIMARY    PROFILE    PROTECT    PURGALL    PURGE      QGET       QUEUE7
   RBR        READ       RECLAIM    RECOVER    REDO       REDUCE     RENAME
   REPLACE    REQUEST    RERUN      RESEQ      RESOURC    RESTART    RETURN
   REVERT     REWIND     RFL        ROLLOUT    ROUTE      RTIME      RUN
   SATISFY    SAVE       SCOPY      SCREEN     SECHDR     SEGLOAD    SET
   SETASL     SETCORE    SETFAL     SETFS      SETJAL     SETJOB     SETJSL
   SETPFAC    SETPFAL    SETPR      SETTL      SHELL      SHOW       SKIP
   SKIPEI     SKIPF      SKIPFB     SKIPR      SLOAD      SORT       STIME
   SUBMIT     SWITCH     SYMPL      TCOPY      TDU        TDUMP      TEXT
   TIMEOUT    TRMDEF     ULIB       UNLOAD     UNLOCK     UPDATE     UPROC
   USECPU     USER       VERIFY     VFYLIB     VSN        WBR        WHATJSN
   WHILE      WRITE      WRITEF     WRITEN     WRITER     XEDIT      X
   XMODEM

.DATA,ZZZCCP
                      N^E^T^W^O^R^K C^O^M^M^A^N^D^S (NAM/CCP)


   <^C^T> AB      <^C^T> AR      <^C^T> BF      <^C^T> BR      <^C^T> BS
   <^C^T> B1      <^C^T> B2      <^C^T> CH      <^C^T> CI      <^C^T> CN
   <^C^T> CP      <^C^T> CT      <^C^T> DL      <^C^T> EB      <^C^T> EL
   <^C^T> EP      <^C^T> FA      <^C^T> HC      <^C^T> HD      <^C^T> HN
   <^C^T> HS      <^C^T> IC      <^C^T> IN      <^C^T> LI      <^C^T> LK
   <^C^T> MS      <^C^T> OC      <^C^T> OP      <^C^T> PA      <^C^T> PG
   <^C^T> PL      <^C^T> PW      <^C^T> RC      <^C^T> SE      <^C^T> TC
   <^C^T> TM      <^C^T> XL


            F^O^R CDCNET ^C^O^M^M^A^N^D^S, ^E^N^T^E^R ^T^H^E ^F^O^L^L^O^W^I^N^G@D

                        EXPLAIN,M=CDCNET
*WEOR
.PROC,HELPME*I
,COMMAND[E^N^T^E^R ^C^O^M^M^A^N^D]=(
   ACCESS ,   ALTER  ,   APL    ,   APPEND ,   APPSW  ,   ASCII  ,   ASSIGN ,
   ATTACH ,   AUTO   ,   BASIC  ,   BATCH  ,   BEGIN  ,   BKSP   ,   BLANK  ,
   BLOCK  ,   BRIEF  ,   BYE    ,   CATALOG,   CATLIST,   CFO    ,   CHANGE ,
   CHARGE ,   CHVAL  ,   CKP    ,   CLASS  ,   CLEAR  ,   COBOL5 ,   COMMENT,
   COMPASS,   COMMON ,   COPY   ,   COPYBF ,   COPYBR ,   COPYCF ,   COPYCR ,
   COPYEI ,   COPYL  ,   COPYLM ,   COPYSBF,   COPYX  ,   CSET   ,   CTIME  ,
   CYBIL  ,   DAYFILE,   DEBUG  ,   DEFINE ,   DELETE ,   DETACH ,   DIAL   ,
   DISPLAY,   DMB    ,   DMD    ,   DMDECS ,   DMP    ,   DMPECS ,   DOCMENT,
   DROP   ,   DROPDS ,   DUP    ,   EDIT   ,   EFFECT ,   ELSE   ,   ENDIF  ,
   ENDW   ,   ENQUIRE,   ENTER  ,   ERRMSG ,   EVICT  ,   EXECUTE,   EXIT   ,
   EXPLAIN,   FCOPY  ,   FORTRAN,   FSE    ,   FTN    ,   FTNTS  ,   FTN5   ,
   F45    ,   GET    ,   GO     ,   GOODBYE,   GPSS   ,   GTR    ,   HELLO  ,
   HELLO7 ,   HELP   ,   HELPME ,   HTIME  ,   IF     ,   IFE    ,   ITEMIZE,
   JOB    ,   KEY    ,   KRONREF,   LABEL  ,   LBC    ,   LDI    ,   LDSET  ,
   LENGTH ,   LIB    ,   LIBEDIT,   LIBGEN ,   LIBLOAD,   LIBRARY,   LIMITS ,
   LINE   ,   LIST   ,   LISTLB ,   LISTLID,   LIST80 ,   LOAD   ,   LOC    ,
   LOCK   ,   LOGIN  ,   LOGOUT ,   LO72   ,   MACHINE,   MAP    ,   MFL    ,
   MFLINK ,   MFQUEUE,   MODE   ,   MODIFY ,   MOVE   ,   NEW    ,   NOEXIT ,
   NOGO   ,   NORERUN,   NORMAL ,   NOSORT ,   NOTE   ,   NULL   ,   OFFSW  ,
   OLD    ,   ONEXIT ,   ONSW   ,   OPLEDIT,   OUT    ,   OVWRITE,   PACK   ,
   PACKNAM,   PASCAL ,   PASSWOR,   PAUSE  ,   PBC    ,   PDU    ,   PERMIT ,
   PRIMARY,   PROFILE,   PROTECT,   PURGALL,   PURGE  ,   QGET   ,   QUEUE7 ,
   RBR    ,   READ   ,   RECLAIM,   RECOVER,   REDO   ,   REDUCE ,   RENAME ,
   REPLACE,   REQUEST,   RERUN  ,   RESEQ  ,   RESOURC,   RESTART,   RETURN ,
   REVERT ,   REWIND ,   RFL    ,   ROLLOUT,   ROUTE  ,   RTIME  ,   RUN    ,
   SATISFY,   SAVE   ,   SCOPY  ,   SCREEN ,   SECHDR ,   SEGLOAD,   SET    ,
   SETASL ,   SETCORE,   SETFAL ,   SETFS  ,   SETJAL ,   SETJOB ,   SETJSL ,
   SETPFAC,   SETPFAL,   SETPR  ,   SETTL  ,   SHELL  ,   SHOW   ,   SKIP   ,
   SKIPEI ,   SKIPF  ,   SKIPFB ,   SKIPR  ,   SLOAD  ,   SORT   ,   STIME  ,
   SUBMIT ,   SWITCH ,   SYMPL  ,   TCOPY  ,   TDU    ,   TDUMP  ,   TEXT   ,
   TIMEOUT,   TRMDEF ,   ULIB   ,   UNLOAD ,   UNLOCK ,   UPDATE ,   UPROC  ,
   USECPU ,   USER   ,   VERIFY ,   VFYLIB ,   VSN    ,   WBR    ,   WHATJSN,
   WHILE  ,   WRITE  ,   WRITEF ,   WRITEN ,   WRITER ,   XEDIT  ,   X      ,
   XMODEM ,


   AB ,       AR ,       BF ,       BR ,       BS ,       B1 ,       B2 ,
   CH ,       CI ,       CN ,       CP ,       CT ,       DL ,       EB ,
   EL ,       EP ,       FA ,       HC ,       HD ,       HN ,       HS ,
   IC ,       IN ,       LI ,       LK ,       MS ,       OC ,       OP ,
   PA ,       PG ,       PL ,       PW ,       RC ,       SE ,       TC ,
   TM ,       XL ,

   *N=HELPME).
.HELP,,NOLIST

HELPME ^O^P^E^R^A^T^E^S ^I^N ^B^O^T^H ^L^I^N^E ^M^O^D^E ^A^N^D ^S^C^R^E^E^N ^M^O^D^E.  S^C^R^E^E^N ^M^O^D^E ^P^R^O^V^I^D^E^S
^A ^L^I^S^T ^O^F ^P^R^O^M^P^T^S ^F^O^R ^A^L^L ^O^F ^T^H^E ^P^A^R^A^M^E^T^E^R^S ^O^F ^A ^C^O^M^M^A^N^D ^I^N ^T^H^E ^T^O^P-^C^E^N^T^E^R
^O^F ^T^H^E ^S^C^R^E^E^N.  (I^F ^T^H^E ^L^I^S^T ^O^F ^P^R^O^M^P^T^S ^I^S ^T^O^O ^L^O^N^G ^F^O^R ^O^N^E ^D^I^S^P^L^A^Y
^S^C^R^E^E^N, ^P^R^E^S^S ^F^U^N^C^T^I^O^N ^K^E^Y 1 ^T^O ^P^A^G^E ^F^O^R^W^A^R^D ^T^O ^T^H^E ^R^E^M^A^I^N^I^N^G ^P^R^O^M^P^T^S.)

B^E^L^O^W ^T^H^E ^L^I^S^T ^I^S ^A ^F^U^N^C^T^I^O^N^A^L ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^I^T^S
^F^O^R^M^A^T.  Y^O^U ^M^A^Y ^E^I^T^H^E^R ^E^N^T^E^R ^A ^V^A^L^U^E ^F^O^R ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^A^F^T^E^R
^P^O^S^I^T^I^O^N^I^N^G ^T^H^E ^C^U^R^S^O^R ^O^P^P^O^S^I^T^E ^T^H^E ^P^R^O^M^P^T, ^O^R ^Y^O^U ^M^A^Y ^S^K^I^P ^T^H^E ^P^A^R^A^M^E^T^E^R
^T^O ^G^E^T ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E (^I^F ^T^H^E^R^E ^I^S ^O^N^E).  T^H^E^N ^T^A^B ^D^O^W^N ^T^O ^T^H^E ^N^E^X^T
^P^R^O^M^P^T.

F^O^R ^H^E^L^P ^O^N ^A ^P^R^O^M^P^T, ^P^O^S^I^T^I^O^N ^T^H^E ^C^U^R^S^O^R ^O^P^P^O^S^I^T^E ^T^H^E ^P^R^O^M^P^T ^A^N^D ^P^R^E^S^S
^F^U^N^C^T^I^O^N ^K^E^Y 5 (HELP).  I^F ^T^H^E ^H^E^L^P ^T^E^X^T ^E^X^C^E^E^D^S ^T^H^E ^A^V^A^I^L^A^B^L^E ^S^C^R^E^E^N
^S^P^A^C^E, ^P^R^E^S^S ^F^U^N^C^T^I^O^N ^K^E^Y 3 (HELP FWD); ^C^H^O^O^S^E F4 (HELP BKW) ^T^O ^G^O ^B^A^C^K.

T^O ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E ^V^A^L^U^E^S ^Y^O^U'^V^E ^S^U^P^P^L^I^E^D, ^E^N^T^E^R ^A ^C^A^R^R^I^A^G^E
^R^E^T^U^R^N.  T^O ^L^E^A^V^E HELPME ^W^I^T^H^O^U^T ^E^X^E^C^U^T^I^N^G ^T^H^E ^C^O^M^M^A^N^D, ^P^R^E^S^S F6 (QUIT).

I^N ^L^I^N^E ^M^O^D^E, ^Y^O^U ^W^I^L^L ^B^E ^P^R^O^M^P^T^E^D ^F^O^R ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^O^N^E ^A^T ^A ^T^I^M^E. E^N^T^E^R
^A ^V^A^L^U^E, ^O^R ^P^R^E^S^S NEXT (RETURN) ^F^O^R ^T^H^E ^D^E^F^A^U^L^T.  F^O^R ^H^E^L^P, ^E^N^T^E^R ^A ^Q^U^E^S^T^I^O^N
^M^A^R^K.  T^O ^L^E^A^V^E HELPME ^W^I^T^H^O^U^T ^E^X^E^C^U^T^I^N^G ^T^H^E ^C^O^M^M^A^N^D, ^P^R^E^S^S ^C^O^N^T^R^O^L T (CTRL/T).
E^N^T^E^R ^A ^P^E^R^I^O^D ^T^O ^S^T^O^P ^P^R^O^M^P^T^I^N^G ^A^N^D ^T^O ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E ^V^A^L^U^E^S
^Y^O^U'^V^E ^E^N^T^E^R^E^D.
.HELP,COMMAND,NOLIST

                         O^P^E^R^A^T^I^N^G S^Y^S^T^E^M C^O^M^M^A^N^D^S

   ACCESS     ALTER      APL        APPEND     APPSW      ASCII      ASSIGN
   ATTACH     AUTO       BASIC      BATCH      BEGIN      BKSP       BLANK
   BLOCK      BRIEF      BYE        CATALOG    CATLIST    CFO        CHANGE
   CHARGE     CHVAL      CKP        CLASS      CLEAR      COBOL5     COMMENT
   COMPASS    COMMON     COPY       COPYBF     COPYBR     COPYCF     COPYCR
   COPYEI     COPYL      COPYLM     COPYSBF    COPYX      CSET       CTIME
   CYBIL      DAYFILE    DEBUG      DEFINE     DELETE     DETACH     DIAL
   DISPLAY    DMB        DMD        DMDECS     DMP        DMPECS     DOCMENT
   DROP       DROPDS     DUP        EDIT       EFFECT     ELSE       ENDIF
   ENDW       ENQUIRE    ENTER      ERRMSG     EVICT      EXECUTE    EXIT
   EXPLAIN    FCOPY      FORTRAN    FSE        FTN        FTNTS      FTN5
   F45        GET        GO         GOODBYE    GPSS       GTR        HELLO
   HELLO7     HELP       HELPME     HTIME      IF         IFE        ITEMIZE
   JOB        KEY        KRONREF    LABEL      LBC        LDI        LDSET
   LENGTH     LIB        LIBEDIT    LIBGEN     LIBLOAD    LIBRARY    LIMITS
   LINE       LIST       LISTLB     LISTLID    LIST80     LOAD       LOC
   LOCK       LOGIN      LOGOUT     LO72       MACHINE    MAP        MFL
   MFLINK     MFQUEUE    MODE       MODIFY     MOVE       NEW        NOEXIT
   NOGO       NORERUN    NORMAL     NOSORT     NOTE       NULL       OFFSW
   OLD        ONEXIT     ONSW       OPLEDIT    OUT        OVWRITE    PACK
   PACKNAM    PASCAL     PASSWOR    PAUSE      PBC        PDU        PERMIT
   PRIMARY    PROFILE    PROTECT    PURGALL    PURGE      QGET       QUEUE7
   RBR        READ       RECLAIM    RECOVER    REDO       REDUCE     RENAME
   REPLACE    REQUEST    RERUN      RESEQ      RESOURC    RESTART    RETURN
   REVERT     REWIND     RFL        ROLLOUT    ROUTE      RTIME      RUN
   SATISFY    SAVE       SCOPY      SCREEN     SECHDR     SEGLOAD    SET
   SETASL     SETCORE    SETFAL     SETFS      SETJAL     SETJOB     SETJSL
   SETPFAC    SETPFAL    SETPR      SETTL      SHELL      SHOW       SKIP
   SKIPEI     SKIPF      SKIPFB     SKIPR      SLOAD      SORT       STIME
   SUBMIT     SWITCH     SYMPL      TCOPY      TDU        TDUMP      TEXT
   TIMEOUT    TRMDEF     ULIB       UNLOAD     UNLOCK     UPDATE     UPROC
   USECPU     USER       VERIFY     VFYLIB     VSN        WBR        WHATJSN
   WHILE      WRITE      WRITEF     WRITEN     WRITER     XEDIT      X
   XMODEM
                      N^E^T^W^O^R^K C^O^M^M^A^N^D^S (NAM/CCP)


   <^C^T> AB      <^C^T> AR      <^C^T> BF      <^C^T> BR      <^C^T> BS
   <^C^T> B1      <^C^T> B2      <^C^T> CH      <^C^T> CI      <^C^T> CN
   <^C^T> CP      <^C^T> CT      <^C^T> DL      <^C^T> EB      <^C^T> EL
   <^C^T> EP      <^C^T> FA      <^C^T> HC      <^C^T> HD      <^C^T> HN
   <^C^T> HS      <^C^T> IC      <^C^T> IN      <^C^T> LI      <^C^T> LK
   <^C^T> MS      <^C^T> OC      <^C^T> OP      <^C^T> PA      <^C^T> PG
   <^C^T> PL      <^C^T> PW      <^C^T> RC      <^C^T> SE      <^C^T> TC
   <^C^T> TM      <^C^T> XL


            F^O^R CDCNET ^C^O^M^M^A^N^D^S, ^E^N^T^E^R ^T^H^E ^F^O^L^L^O^W^I^N^G@D

                        EXPLAIN,M=CDCNET




HELPME ^O^P^E^R^A^T^E^S ^I^N ^B^O^T^H ^L^I^N^E ^M^O^D^E ^A^N^D ^S^C^R^E^E^N ^M^O^D^E.  S^C^R^E^E^N ^M^O^D^E ^P^R^O^V^I^D^E^S
^A ^L^I^S^T ^O^F ^P^R^O^M^P^T^S ^F^O^R ^A^L^L ^O^F ^T^H^E ^P^A^R^A^M^E^T^E^R^S ^O^F ^A ^C^O^M^M^A^N^D ^I^N ^T^H^E ^T^O^P-^C^E^N^T^E^R
^O^F ^T^H^E ^S^C^R^E^E^N.  (I^F ^T^H^E ^L^I^S^T ^O^F ^P^R^O^M^P^T^S ^I^S ^T^O^O ^L^O^N^G ^F^O^R ^O^N^E ^D^I^S^P^L^A^Y
^S^C^R^E^E^N, ^P^R^E^S^S ^F^U^N^C^T^I^O^N ^K^E^Y 1 ^T^O ^P^A^G^E ^F^O^R^W^A^R^D ^T^O ^T^H^E ^R^E^M^A^I^N^I^N^G ^P^R^O^M^P^T^S.)

B^E^L^O^W ^T^H^E ^L^I^S^T ^I^S ^A ^F^U^N^C^T^I^O^N^A^L ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^I^T^S
^F^O^R^M^A^T.  Y^O^U ^M^A^Y ^E^I^T^H^E^R ^E^N^T^E^R ^A ^V^A^L^U^E ^F^O^R ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^A^F^T^E^R
^P^O^S^I^T^I^O^N^I^N^G ^T^H^E ^C^U^R^S^O^R ^O^P^P^O^S^I^T^E ^T^H^E ^P^R^O^M^P^T, ^O^R ^Y^O^U ^M^A^Y ^S^K^I^P ^T^H^E ^P^A^R^A^M^E^T^E^R
^T^O ^G^E^T ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E (^I^F ^T^H^E^R^E ^I^S ^O^N^E).  T^H^E^N ^T^A^B ^D^O^W^N ^T^O ^T^H^E ^N^E^X^T
^P^R^O^M^P^T.

F^O^R ^H^E^L^P ^O^N ^A ^P^R^O^M^P^T, ^P^O^S^I^T^I^O^N ^T^H^E ^C^U^R^S^O^R ^O^P^P^O^S^I^T^E ^T^H^E ^P^R^O^M^P^T ^A^N^D ^P^R^E^S^S
^F^U^N^C^T^I^O^N ^K^E^Y 5 (HELP).  I^F ^T^H^E ^H^E^L^P ^T^E^X^T ^E^X^C^E^E^D^S ^T^H^E ^A^V^A^I^L^A^B^L^E ^S^C^R^E^E^N
^S^P^A^C^E, ^P^R^E^S^S ^F^U^N^C^T^I^O^N ^K^E^Y 3 (HELP FWD); ^C^H^O^O^S^E F4 (HELP BKW) ^T^O ^G^O ^B^A^C^K.

T^O ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E ^V^A^L^U^E^S ^Y^O^U'^V^E ^S^U^P^P^L^I^E^D, ^E^N^T^E^R ^A ^C^A^R^R^I^A^G^E
^R^E^T^U^R^N.  T^O ^L^E^A^V^E HELPME ^W^I^T^H^O^U^T ^E^X^E^C^U^T^I^N^G ^T^H^E ^C^O^M^M^A^N^D, ^P^R^E^S^S F6 (QUIT).

I^N ^L^I^N^E ^M^O^D^E, ^Y^O^U ^W^I^L^L ^B^E ^P^R^O^M^P^T^E^D ^F^O^R ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^O^N^E ^A^T ^A ^T^I^M^E. E^N^T^E^R
^A ^V^A^L^U^E, ^O^R ^P^R^E^S^S NEXT (RETURN) ^F^O^R ^T^H^E ^D^E^F^A^U^L^T.  F^O^R ^H^E^L^P, ^E^N^T^E^R ^A ^Q^U^E^S^T^I^O^N
^M^A^R^K.  T^O ^L^E^A^V^E HELPME ^W^I^T^H^O^U^T ^E^X^E^C^U^T^I^N^G ^T^H^E ^C^O^M^M^A^N^D, ^P^R^E^S^S ^C^O^N^T^R^O^L T (CTRL/T).
E^N^T^E^R ^A ^P^E^R^I^O^D ^T^O ^S^T^O^P ^P^R^O^M^P^T^I^N^G ^A^N^D ^T^O ^E^X^E^C^U^T^E ^T^H^E ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E ^V^A^L^U^E^S
^Y^O^U'^V^E ^E^N^T^E^R^E^D.
.ENDHELP
.IF(.NOT. FILE(ZZZHELP, AS),ATTACH)
   $ATTACH(ZZZHELP=HELPLIB/UN=LIBRARY,PN=0)
   .IF($COMMAND$.EQ.$BEGIN$,BEG1)
      $BEGIN(XXXXXX,ZZZHELP,?)
      $REVERT(NOLIST)
      EXIT.
      $REVERT(NOLIST)
   .ELSE(BEG1)
      $BEGIN(COMMAND,ZZZHELP,?)
      $REVERT(NOLIST)
      EXIT.
      $REVERT(NOLIST)
   .ENDIF(BEG1)
.ELSE(ATTACH)
   .IF($COMMAND$.EQ.$BEGIN$,BEG2)
      .EX. $BEGIN(XXXXXX,ZZZHELP,?)
      $REVERT(NOLIST)
      EXIT.
      $REVERT(NOLIST)
   .ELSE(BEG2)
      .EX. $BEGIN(COMMAND,ZZZHELP,?)
      $REVERT(NOLIST)
      EXIT.
      $REVERT(NOLIST)
   .ENDIF(BEG2)
.ENDIF(ATTACH)


*WEOR
.PROC,HTIME*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  HTIME.

      T^H^E HTIME ^C^O^M^M^A^N^D ^I^S^S^U^E^S ^A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^G^I^V^I^N^G ^T^H^E ^M^O^D^E^L 176
      ^A^C^C^U^M^U^L^A^T^E^D ^C^L^O^C^K ^C^Y^C^L^E ^C^O^U^N^T ^F^O^R ^T^H^E ^J^O^B.  A ^C^L^O^C^K ^C^Y^C^L^E ^O^N
      ^T^H^E ^M^O^D^E^L 176 ^I^S 27.5 ^N^A^N^O^S^E^C^O^N^D^S.
.ENDHELP.
.EX.  $HTIME.
*WEOR
.PROC,IF*I
,CO[C^O^N^D^I^T^I^O^N]=(*A,$($,$)$,$.$,$,$,$$$$,$*$)
,CM[C^O^M^M^A^N^D]=(*A,$($,$)$,$.$,$,$,$?$,$$$$,$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  IF,^C^O^N^D^I^T^I^O^N.^C^O^M^M^A^N^D.
               IF,^C^O^N^D^I^T^I^O^N,^L^A^B^E^L.

      T^H^E IF ^C^O^M^M^A^N^D ^C^O^N^D^I^T^I^O^N^A^L^L^Y ^S^K^I^P^S ^O^N^E ^O^R ^M^O^R^E ^C^O^M^M^A^N^D^S.
      O^N^L^Y ^T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^I^S ^S^U^P^P^O^R^T^E^D ^B^Y HELPME.
.HELP,CO,NOLIST

      E^N^T^E^R ^A ^T^R^U^E ^O^R ^F^A^L^S^E ^E^X^P^R^E^S^S^I^O^N ^T^O ^B^E ^E^V^A^L^U^A^T^E^D ^B^Y ^T^H^E IF ^C^O^M^M^A^N^D.
      W^H^E^N ^E^X^E^C^U^T^I^N^G ^T^H^E IF ^C^O^M^M^A^N^D ^F^R^O^M HELPME, ^D^O ^N^O^T ^F^O^L^L^O^W ^T^H^E
      ^C^O^N^D^I^T^I^O^N^A^L ^E^X^P^R^E^S^S^I^O^N ^W^I^T^H ^A ^T^E^R^M^I^N^A^T^O^R (.).  F^R^O^M ^W^I^T^H^I^N HELPME,
      ^Y^O^U ^M^A^Y ^E^N^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^P^E^C^I^A^L
      ^C^H^A^R^A^C^T^E^R^S@D  ( ) , . $ *   N^O^T^E@D T^H^E IF ^C^O^M^M^A^N^D ^I^S ^S^U^P^P^L^I^E^D ^B^Y
      HELPME; ^D^O ^N^O^T ^I^N^C^L^U^D^E ^I^T ^I^N ^T^H^E ^E^X^P^R^E^S^S^I^O^N.
.HELP,CM,NOLIST

      E^N^T^E^R ^A ^V^A^L^I^D ^C^O^M^M^A^N^D.   F^R^O^M ^W^I^T^H^I^N HELPME, ^Y^O^U ^M^A^Y ^E^N^T^E^R
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S@D
      ( ) , . ? $ *
.ENDHELP
.EX.  $IF(CO.CM)
*WEOR
.PROC,IFE*I
,CO[C^O^N^D^I^T^I^O^N]=(*A,$($,$)$,$.$,$,$,$$$$,$*$)
,CM[C^O^M^M^A^N^D]=(*A,$($,$)$,$.$,$,$,$?$,$$$$,$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  IFE,^C^O^N^D^I^T^I^O^N.^C^O^M^M^A^N^D.
               IFE,^C^O^N^D^I^T^I^O^N,^L^A^B^E^L.

      T^H^E IFE ^C^O^M^M^A^N^D ^C^O^N^D^I^T^I^O^N^A^L^L^Y ^S^K^I^P^S ^O^N^E ^O^R ^M^O^R^E ^C^O^M^M^A^N^D^S.
      O^N^L^Y ^T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^I^S ^S^U^P^P^O^R^T^E^D ^B^Y HELPME.
.HELP,CO,NOLIST

      E^N^T^E^R ^A ^T^R^U^E ^O^R ^F^A^L^S^E ^E^X^P^R^E^S^S^I^O^N ^T^O ^B^E ^E^V^A^L^U^A^T^E^D ^B^Y ^T^H^E IFE ^C^O^M^M^A^N^D.
      W^H^E^N ^E^X^E^C^U^T^I^N^G ^T^H^E IF ^C^O^M^M^A^N^D ^F^R^O^M HELPME, ^D^O ^N^O^T ^F^O^L^L^O^W ^T^H^E
      ^C^O^N^D^I^T^I^O^N^A^L ^E^X^P^R^E^S^S^I^O^N ^W^I^T^H ^A ^T^E^R^M^I^N^A^T^O^R (.).  F^O^R ^T^H^E ^E^X^P^R^E^S^S^I^O^N, ^Y^O^U
      ^M^A^Y ^E^N^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^P^E^C^I^A^L
      ^C^H^A^R^A^C^T^E^R^S@D  ( ) , . $ *    N^O^T^E@D T^H^E IFE ^C^O^M^M^A^N^D ^I^S ^S^U^P^P^L^I^E^D ^B^Y
      HELPME; ^D^O ^N^O^T ^I^N^C^L^U^D^E ^I^T ^I^N ^T^H^E ^E^X^P^R^E^S^S^I^O^N.
.HELP,CM,NOLIST

      E^N^T^E^R ^A ^V^A^L^I^D ^C^O^M^M^A^N^D.   Y^O^U ^M^A^Y ^E^N^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S
      ^A^N^D ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^P^E^C^I^A^L ^C^H^A^R^A^C^T^E^R^S@D  ( ) , . ? $ *
.ENDHELP
.EX. $IFE(CO.CM)
*WEOR
.PROC,ITEMIZE*I
,LFN[F^I^L^E ^T^O ^B^E ^I^T^E^M^I^Z^E^D]=(*F,*N=LGO)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
,BL[B^U^R^S^T^A^B^L^E ^L^I^S^T^I^N^G]=(YES=$,BL$,Y=$,BL$,NO=,N=,*K=$,BL$,*N=)
,PW[P^A^G^E ^W^I^D^T^H]=(*S3(0123456789),*K=72,*N=72)
,PD[P^R^I^N^T ^D^E^N^S^I^T^Y]=(6=,8=$,PD$,PD=$,PD$,*N=)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,N[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^I^T^E^M^I^Z^E]=(*S5(0123456789),*N=1,*K)
,E[E^X^P^A^N^D ^O^U^T^P^U^T ^T^O ^L^I^S^T ^F^U^R^T^H^E^R ^I^N^F^O]=(YES=$,E$,Y=$,E$,*K=$,E$,NO=,N=,*N=)
,U[I^T^E^M^I^Z^E ULIB ^R^E^C^O^R^D^S]=(YES=$,U$,Y=$,U$,*K=$,U$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ITEMIZE,^L^F^N,L=^L^I^S^T^L^F^N,BL,PW=^N,PD,NR,N=^N,E,U.

      T^H^E ITEMIZE ^C^O^M^M^A^N^D ^L^I^S^T^S ^P^E^R^T^I^N^E^N^T ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^E^A^C^H ^R^E^C^O^R^D ^O^F ^A
      ^B^I^N^A^R^Y ^F^I^L^E ^I^N ^A ^F^O^R^M^A^T ^S^U^I^T^A^B^L^E ^F^O^R ^P^R^I^N^T^I^N^G.
.HELP,LFN,NOLIST

      T^H^I^S ^I^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^I^T^E^M^I^Z^E^D.

      D^E^F^A^U^L^T@D F^I^L^E LGO.
.HELP,L,NOLIST

      O^U^T^P^U^T ^F^R^O^M ITEMIZE ^I^S ^L^I^S^T^E^D ^O^N ^T^H^I^S ^F^I^L^E.  T^H^E ^F^I^L^E ^Y^O^U ^S^P^E^C^I^F^Y
      ^M^U^S^T ^B^E ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.HELP,BL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (BL) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^E^A^C^H ^F^I^L^E ^O^U^T^P^U^T ^S^T^A^R^T^S ^A^T ^T^H^E
      ^T^O^P ^O^F ^A ^P^A^G^E.  E^N^T^E^R BL ^T^O ^S^P^E^C^I^F^Y ^T^O^P-^O^F-^P^A^G^E ^F^O^R ^E^A^C^H ^F^I^L^E
      ^O^U^T^P^U^T; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D A ^C^O^M^P^A^C^T ^L^I^S^T^I^N^G ^I^N ^W^H^I^C^H ^A ^P^A^G^E ^E^J^E^C^T ^O^C^C^U^R^S ^O^N^L^Y ^W^H^E^N ^T^H^E
               ^C^U^R^R^E^N^T ^P^A^G^E ^I^S ^N^E^A^R^L^Y ^F^U^L^L.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^N) ^P^R^I^N^T^S ^E^I^T^H^E^R 136-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S ^O^R 72-^C^H^A^R^A^C^T^E^R
      ^L^I^N^E^S ^D^E^P^E^N^D^I^N^G ^O^N ^T^H^E ^V^A^L^U^E ^O^F ^T^H^E ^D^E^C^I^M^A^L ^I^N^T^E^G^E^R ^N.  I^F ^N ^I^S ^G^R^E^A^T^E^R
      ^T^H^A^N ^O^R ^E^Q^U^A^L ^T^O 136, ^T^H^E^N ^I^T ^P^R^I^N^T^S 136-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S.  I^F ^N ^I^S ^L^E^S^S
      ^T^H^A^N 136, ^I^T ^P^R^I^N^T^S 72-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S.  I^F ^J^U^S^T PW ^I^S ^S^P^E^C^I^F^I^E^D, ^I^T
      ^P^R^I^N^T^S 72-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S ^R^E^G^A^R^D^L^E^S^S ^O^F ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^D^E^V^I^C^E.

      D^E^F^A^U^L^T@D 72-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S ^I^F ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^I^S ^A ^T^E^R^M^I^N^A^L;
               ^O^T^H^E^R^W^I^S^E 136-^C^H^A^R^A^C^T^E^R ^L^I^N^E^S.
.HELP,PD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PD) ^S^P^E^C^I^F^I^E^S ^P^R^I^N^T ^D^E^N^S^I^T^Y ^A^T 8 ^L^I^N^E^S ^P^E^R ^I^N^C^H.
      E^N^T^E^R PD ^F^O^R 8 ^L^I^N^E^S ^P^E^R ^I^N^C^H (^M^A^K^E ^S^U^R^E ^T^H^E ^P^R^I^N^T^E^R ^I^S ^C^A^P^A^B^L^E ^O^F
      ^T^H^I^S ^D^E^N^S^I^T^Y); ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D 6 ^L^I^N^E^S ^P^E^R ^I^N^C^H.
.HELP,NR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^N^O ^R^E^W^I^N^D ^O^F ^T^H^E ^F^I^L^E ^L^F^N ^B^E^F^O^R^E ^O^R ^A^F^T^E^R
      ^P^R^O^C^E^S^S^I^N^G.   E^N^T^E^R NR ^F^O^R ^N^O ^R^E^W^I^N^D; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D R^E^W^I^N^D ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^P^R^O^C^E^S^S^I^N^G.
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (N=^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^B^E ^I^T^E^M^I^Z^E^D.
      I^F ^Y^O^U ^E^N^T^E^R ^J^U^S^T N, ^T^H^E ^S^Y^S^T^E^M ^I^T^E^M^I^Z^E^S ^U^N^T^I^L ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N.
      I^F ^Y^O^U ^E^N^T^E^R N=0, ^I^T ^I^T^E^M^I^Z^E^S ^U^N^T^I^L ^A^N ^E^M^P^T^Y ^F^I^L^E ^I^S ^P^R^O^C^E^S^S^E^D.

      D^E^F^A^U^L^T@D 1.
.HELP,E,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (E) ^E^X^P^A^N^D^S ^O^U^T^P^U^T ^T^O ^L^I^S^T ^F^U^R^T^H^E^R ^I^N^F^O^R^M^A^T^I^O^N.
      F^O^R ^R^E^C^O^R^D ^T^Y^P^E^S CAP ^A^N^D REL, ^I^T ^L^I^S^T^S ^E^N^T^R^Y ^P^O^I^N^T^S.  F^O^R ^R^E^C^O^R^D
      ^T^Y^P^E^S OPL ^A^N^D OPLC, ^I^T ^L^I^S^T^S ^M^O^D^I^F^I^C^A^T^I^O^N^S ^S^E^T ^N^A^M^E^S ^A^N^D ^T^H^E^I^R
      YANK ^S^T^A^T^U^S.  F^O^R ^R^E^C^O^R^D ^T^Y^P^E^S UPL, ^I^T ^L^I^S^T^S ^C^O^R^R^E^C^T^I^O^N ^I^D^E^N^T^I^F^I^E^R ^N^A^M^E^S.
      T^O ^S^P^E^C^I^F^Y ^E^X^P^A^N^D ^O^U^T^P^U^T, ^E^N^T^E^R E; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D N^O ^E^X^P^A^N^S^I^O^N.
.HELP,U,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^T^E^M^I^Z^E^S ^A^L^L ^R^E^C^O^R^D^S ^W^I^T^H^I^N ^A ^U^S^E^R ^L^I^B^R^A^R^Y.  E^N^T^E^R
      U ^T^O ^I^T^E^M^I^Z^E ^A^L^L ^R^E^C^O^R^D^S ^I^N ^A ^U^S^E^R ^L^I^B^R^A^R^Y; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D L^I^S^T^S ^O^N^L^Y ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^D^I^R^E^C^T^O^R^Y (ULIB ^T^Y^P^E ^R^E^C^O^R^D).
.ENDHELP
.IF($N$.EQ.$#N$,L1)
  .EX.  $ITEMIZE(LFN,#L=L,#PW=PW,N_BL_PD_E_U)
.ELSE(L1)
  .EX.  $ITEMIZE(LFN,#L=L,#PW=PW,#N=N_BL_PD_E_U)
.ENDIF(L1)
*WEOR
.PROC,JOB*I
,UJN[U^S^E^R J^O^B N^A^M^E]=(*A1,*N)
,P[P^R^I^O^R^I^T^Y L^E^V^E^L (P)]=(P=P,*A1,*N)
,SC[S^E^R^V^I^C^E C^L^A^S^S (SC)]=(*A1,*N)
,T[T^I^M^E^L^I^M^I^T (T)]=(T=T,*A1,*N)
,CM[C^E^N^T^R^A^L M^E^M^O^R^Y (CM)]=(*A1,*N)
,EC[E^X^T^E^N^D^E^D M^E^M^O^R^Y (EC)]=(*A1,*N)
,ST[L^O^G^I^C^A^L I^D^E^N^T^I^F^I^E^R (ST)]=(*A1,*N)
,AL[M^A^X^I^M^U^M S^E^C^U^R^I^T^Y L^E^V^E^L (AL)]=(*A1,*N)
,PUN[C^O^N^V^E^R^S^I^O^N M^O^D^E]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^U^J^N,^0P=^P^R^I^O^R^I^T^Y ^O^R SC=^C^L^A^S^S^2,T=^T^I^M^E^L^I^M^I^T,CM=^M^E^M^O^R^Y,EC=^X^M^E^M^O^R^Y,
                 ST=^L^I^D,AL=^L^E^V^E^L.^P^U^N^C^H^M^O^D^E

      T^H^E JOB ^C^O^M^M^A^N^D, ^A^L^S^O ^K^N^O^W^N ^A^S ^T^H^E ^J^O^B ^C^A^R^D, ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E
      ^A^N^D ^M^A^Y ^S^P^E^C^I^F^Y ^J^O^B ^P^R^O^C^E^S^S^I^N^G ^P^A^R^A^M^E^T^E^R^S.  T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^O^F ^A ^B^A^T^C^H
      ^J^O^B ^M^U^S^T ^B^E ^A JOB ^C^O^M^M^A^N^D.
.HELP,UJN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^U^J^N ^S^P^E^C^I^F^I^E^S ^A^N ^A^L^P^H^A^N^U^M^E^R^I^C ^U^S^E^R ^J^O^B ^N^A^M^E (UJN) ^O^F 1-
      ^T^O 7-^C^H^A^R^A^C^T^E^R^S.  T^H^I^S ^N^A^M^E ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^I^N^D^I^V^I^D^U^A^L ^J^O^B^S ^B^E^I^N^G ^R^U^N
      ^U^N^D^E^R ^T^H^E ^S^A^M^E ^U^S^E^R ^N^A^M^E.
.HELP,P,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R P=^P^R^I^O^R^I^T^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^O^R^I^T^Y ^L^E^V^E^L ^A^T ^W^H^I^C^H ^T^H^E ^J^O^B
      ^E^N^T^E^R^S ^T^H^E ^S^Y^S^T^E^M.  U^S^I^N^G ^T^H^I^S ^P^R^I^O^R^I^T^Y ^L^E^V^E^L, ^T^H^E ^S^Y^S^T^E^M ^A^S^S^I^G^N^S ^T^H^E
      ^J^O^B ^A ^S^E^R^V^I^C^E ^C^L^A^S^S ^A^C^C^O^R^D^I^N^G ^T^O ^A ^S^I^T^E-^D^E^F^I^N^E^D ^A^L^G^O^R^I^T^H^M.  T^H^E ^V^A^L^U^E
      ^Y^O^U ^S^P^E^C^I^F^Y ^M^U^S^T ^B^E ^A^N ^I^N^T^E^G^E^R ^I^N ^T^H^E ^R^A^N^G^E ^O^F 0 ^T^H^R^O^U^G^H 7.  T^H^E ^D^E^F^A^U^L^T
      ^F^O^R P=^P^R^I^O^R^I^T^Y ^D^E^P^E^N^D^S ^O^N ^Y^O^U^R ^D^E^F^A^U^L^T ^S^E^R^V^I^C^E ^C^L^A^S^S ^A^S^S^I^G^N^M^E^N^T^S ^A^N^D ^Y^O
      ^S^I^T^E-^D^E^F^I^N^E^D ^A^L^G^O^R^I^T^H^M ^F^O^R ^M^A^P^P^I^N^G ^P^R^I^O^R^I^T^Y ^L^E^V^E^L^S ^A^N^D ^S^E^R^V^I^C^E ^C^L^A^S^S^E^

      T^O ^A^S^S^I^G^N ^A ^S^E^R^V^I^C^E ^C^L^A^S^S ^T^O ^Y^O^U^R ^J^O^B ^D^I^R^E^C^T^L^Y, ^U^S^E ^T^H^E SC=^C^L^A^S^S
      ^P^A^R^A^M^E^T^E^R.
.HELP,SC,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R SC=^C^L^A^S^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S ^T^O ^B^E ^A^S^S^I^G^N^E^D ^T^O ^T^H^E
      ^J^O^B.  T^H^E ^V^A^L^U^E ^C^L^A^S^S ^M^U^S^T ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S@D

        ^C^L^A^S^S         D^E^S^C^R^I^P^T^I^O^N
        -----         -----------
        SY            S^Y^S^T^E^M
        BC            L^O^C^A^L ^B^A^T^C^H
        RB            R^E^M^O^T^E ^B^A^T^C^H
        TS            I^N^T^E^R^A^C^T^I^V^E
        DI            D^E^T^A^C^H^E^D ^I^N^T^E^R^A^C^T^I^V^E
        NS            N^E^T^W^O^R^K ^S^U^P^E^R^V^I^S^O^R
        SS            S^U^B^S^Y^S^T^E^M
        MA            M^A^I^N^T^E^N^A^N^C^E
        CT            C^O^M^M^U^N^I^C^A^T^I^O^N ^T^A^S^K
        I^N            I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^C^L^A^S^S ^N (0<=^N<=3)

      T^H^E ^D^E^F^A^U^L^T ^F^O^R SC=^C^L^A^S^S ^D^E^P^E^N^D^S ^O^N ^Y^O^U^R ^D^E^F^A^U^L^T ^S^E^R^V^I^C^E ^C^L^A^S^S
      ^A^S^S^I^G^N^M^E^N^T^S.
.HELP,T,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R T=^T^I^M^E^L^I^M^I^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^E^N^T^R^A^L ^P^R^O^C^E^S^S^O^R ^J^O^B ^S^T^E^P ^T^I^M^E
      ^L^I^M^I^T ^I^N ^S^E^C^O^N^D^S.  V^A^L^U^E^S ^C^A^N ^R^A^N^G^E ^F^R^O^M 1 ^T^O 99999.  D^E^C^I^M^A^L ^I^S ^T^H^E
      ^D^E^F^A^U^L^T ^B^A^S^E.  O^C^T^A^L ^V^A^L^U^E^S ^F^R^O^M 1 ^T^O 77777(8) (1 ^T^O 32767) ^C^A^N ^B^E ^E^N^T^E^R^E^D
      ^I^F ^F^O^L^L^O^W^E^D ^B^Y ^A B ^S^U^F^F^I^X.  T^H^E ^D^E^F^A^U^L^T ^L^I^M^I^T ^I^S 64 (100(8)).  D^E^C^I^M^A^L
      ^V^A^L^U^E^S ^F^R^O^M 32767 ^T^O 99999, ^O^R ^V^A^L^U^E^S ^T^H^A^T ^A^R^E ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R ^V^A^L^I^D^A^T^E^D
      ^T^I^M^E ^L^I^M^I^T, ^S^E^T ^T^H^E ^T^I^M^E ^L^I^M^I^T ^A^T ^I^T^S ^M^A^X^I^M^U^M.  T^H^E ^T^I^M^E ^L^I^M^I^T ^S^E^T ^B^Y
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^S^U^F^F^I^C^I^E^N^T ^F^O^R ^C^O^M^P^L^E^T^I^O^N ^O^F ^E^A^C^H ^O^F ^T^H^E ^S^T^E^P^S
      ^I^N ^T^H^E ^J^O^B.
.HELP,CM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CM=^M^E^M^O^R^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^O^C^T^A^L ^F^I^E^L^D ^L^E^N^G^T^H ^F^O^R
      ^T^H^E ^J^O^B.  T^H^E ^S^Y^S^T^E^M ^R^O^U^N^D^S ^T^H^E ^V^A^L^U^E ^T^O ^T^H^E ^N^E^X^T ^H^I^G^H^E^S^T ^M^U^L^T^I^P^L^E
      ^O^F 100(8).  T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E ^I^S ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H ^F^O^R ^W^H^I^C^H
      ^Y^O^U ^A^R^E ^A^U^T^H^O^R^I^Z^E^D ^O^R ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^A^V^A^I^L^A^B^L^E ^F^O^R ^U^S^E^R ^J^O^B^S,
      ^W^H^I^C^H^E^V^E^R ^I^S ^S^M^A^L^L^E^R.  T^H^E ^F^I^E^L^D ^L^E^N^G^T^H ^C^A^N^N^O^T ^E^X^C^E^E^D 376500(8).  T^H^I^S
      ^I^S ^T^H^E ^A^B^S^O^L^U^T^E ^U^P^P^E^R ^L^I^M^I^T; ^H^O^W^E^V^E^R, ^Y^O^U^R ^S^I^T^E ^M^A^Y ^C^H^O^O^S^E ^A ^L^O^W^E^R ^L^I^M^I^T
      A ^V^A^L^U^E ^C^O^N^T^A^I^N^I^N^G ^A^N 8 ^O^R 9 ^O^R ^T^H^E ^S^U^F^F^I^X D ^I^S ^I^N^T^E^R^P^R^E^T^E^D ^A^S ^D^E^C^I^M^A^L.
.HELP,EC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R EC=^X^M^E^M^O^R^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^O^C^T^A^L ^N^U^M^B^E^R ^O^F 1000(8),
      2000(8), ^O^R 4000(8) ^W^O^R^D ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^B^L^O^C^K^S ^R^E^Q^U^I^R^E^D ^B^Y ^T^H^E ^J^O^B.
      T^H^I^S ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H ^C^A^N^N^O^T ^E^X^C^E^E^D ^T^H^E ^A^M^O^U^N^T ^O^F ^U^S^E^R
      ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^A^L^L^O^W^E^D ^B^Y ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N (^R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D).
      Y^O^U^R ^J^O^B ^M^U^S^T ^R^E^Q^U^E^S^T ^T^H^E ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y (^R^E^F^E^R ^T^O ^T^H^E RFL ^C^O^M^M^A^N^D)
      ^B^E^F^O^R^E ^I^T ^C^A^N ^B^E ^U^S^E^D.  A ^V^A^L^U^E ^C^O^N^T^A^I^N^I^N^G ^A^N 8 ^O^R 9 ^O^R ^T^H^E ^S^U^F^F^I^X D ^I^S
      ^I^N^T^E^R^P^R^E^T^E^D ^A^S ^D^E^C^I^M^A^L.  T^H^E ^D^E^F^A^U^L^T ^B^L^O^C^K ^S^I^Z^E ^I^S 1000(8) ^W^O^R^D^S.
.HELP,ST,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ST=^L^I^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^G^I^C^A^L ^I^D^E^N^T^I^F^I^E^R (LID) ^O^F ^T^H^E
      ^H^O^S^T ^T^O ^W^H^I^C^H ^Y^O^U ^A^R^E ^R^O^U^T^I^N^G ^T^H^E ^S^P^E^C^I^F^I^E^D ^J^O^B.  T^H^E LID ^M^U^S^T ^B^E ^A
      ^T^H^R^E^E-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G ^D^E^F^I^N^E^D ^B^Y ^S^I^T^E ^P^E^R^S^O^N^N^E^L.  T^H^E
      ^L^O^C^A^L ^H^O^S^T ^I^S ^T^H^E ^D^E^F^A^U^L^T.  Y^O^U ^M^U^S^T ^H^A^V^E ^S^P^E^C^I^A^L ^A^U^T^H^O^R^I^Z^A^T^I^O^N
      ^T^O ^U^S^E ^T^H^I^S ^P^A^R^A^M^E^T^E^R (^R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D).
.HELP,PUN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^P^U^N^C^H^M^O^D^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^N^V^E^R^S^I^O^N ^M^O^D^E ^F^O^R ^C^A^R^D ^D^E^C^K^S.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^E^N^T^E^R^E^D ^I^N ^C^O^L^U^M^N^S 79 ^A^N^D 80.  A 26 ^I^N^D^I^C^A^T^E^S
      ^T^H^A^T ^C^O^D^E^D ^C^A^R^D^S ^A^R^E ^T^O ^B^E ^C^O^N^V^E^R^T^E^D ^I^N 026 ^M^O^D^E; 29 ^I^N^D^I^C^A^T^E^S
      ^C^A^R^D^S ^A^R^E ^C^O^N^V^E^R^T^E^D ^I^N 029 ^M^O^D^E.  T^H^I^S ^I^N^I^T^I^A^L ^K^E^Y^P^U^N^C^H ^M^O^D^E ^C^A^N ^B^E
      ^C^H^A^N^G^E^D ^W^I^T^H^I^N ^T^H^E ^J^O^B ^B^Y ^A ^C^O^N^V^E^R^S^I^O^N ^C^H^A^N^G^E ^C^A^R^D ^W^H^E^N ^R^E^A^D^I^N^G ^C^A^R^D^S
      ^O^R ^A ROUTE ^C^O^M^M^A^N^D ^W^H^E^N ^P^U^N^C^H^I^N^G ^C^A^R^D^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^K^E^Y^P^U^N^C^H ^M^O^D^E ^I^S ^U^S^E^D.  T^H^I^S ^C^O^N^V^E^R^S^I^O^N
      ^M^O^D^E ^I^N^D^I^C^A^T^O^R ^I^S ^I^N^E^F^F^E^C^T^I^V^E ^F^O^R ^R^E^M^O^T^E ^B^A^T^C^H ^J^O^B^S ^E^N^T^E^R^E^D ^W^I^T^H ^M^O^D^E
      4 ^C^A^R^D ^R^E^A^D^E^R^S; ^I^T ^I^S ^E^F^F^E^C^T^I^V^E ^F^O^R ^R^E^M^O^T^E ^B^A^T^C^H ^J^O^B^S ^E^N^T^E^R^E^D ^W^I^T^H
      HASP, 2780, ^A^N^D 3780 ^C^A^R^D ^R^E^A^D^E^R^S.
.HELP,AL,NOLIST

     S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U^R ^J^O^B ^C^A^N ^A^T^T^A^I^N.
     U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D

     LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, ^O^R LVL7

     Y^O^U ^M^A^Y ^N^O^T ^B^E ^A^U^T^H^O^R^I^Z^E^D ^T^O ^U^S^E ^A^L^L ^O^F ^T^H^E^S^E ^A^C^C^E^S^S ^L^E^V^E^L^S (^R^E^F^E^R ^T^O
     LIMITS ^C^O^M^M^A^N^D).  T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^L^O^W^E^S^T ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U ^A^R^E
     ^A^U^T^H^O^R^I^Z^E^D ^T^O ^U^S^E.  O^N ^A^N ^U^N^S^E^C^U^R^E^D ^S^Y^S^T^E^M, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^H^A^S ^N^O
     ^E^F^F^E^C^T, ^B^U^T ^T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^E^N^S^U^R^E ^T^H^A^T ^Y^O^U ^S^P^E^C^I^F^Y ^A ^V^A^L^I^D ^L^E^V^E^L
     ^N^A^M^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,KEY*I
,OPT[E^N^T^E^R KEY ^O^P^T^I^O^N]=(HELP,CHECK,DEFAULT,DISPLAY,EDIT,LOAD,PRINT,$,?$,*N=)
,LFN[E^N^T^E^R ^N^A^M^E ^O^F KEY ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E]=(*F,*N=KEYDEFS)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D KEY,^O^P^T^I^O^N,^L^F^N.
              KEY,?

      T^H^E KEY ^C^O^M^M^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^P^R^O^G^R^A^M^M^A^B^L^E ^F^U^N^C^T^I^O^N ^K^E^Y^S ^F^O^R ^A CDC
      721 ^T^E^R^M^I^N^A^L. (KEY ^I^S ^V^A^L^I^D ^O^N^L^Y ^F^O^R ^A CDC 721 ^T^E^R^M^I^N^A^L ^O^P^E^R^A^T^I^N^G
      ^I^N ^S^C^R^E^E^N ^M^O^D^E ^A^N^D ^C^A^N^N^O^T ^B^E ^E^X^E^C^U^T^E^D ^F^R^O^M ^A^N^Y ^O^T^H^E^R ^K^I^N^D ^O^F
      ^T^E^R^M^I^N^A^L.)
.HELP,OPT,NOLIST

      E^N^T^E^R ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^O^P^T^I^O^N^S@D

      O^P^T^I^O^N                          D^E^S^C^R^I^P^T^I^O^N
      ------                          -----------
      HELP      G^I^V^E^S ^A ^B^R^I^E^F ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^E^A^C^H ^A^V^A^I^L^A^B^L^E ^O^P^T^I^O^N. T^H^E
                ^F^I^L^E ^N^A^M^E ^Y^O^U ^S^P^E^C^I^F^I^E^D ^I^S ^I^G^N^O^R^E^D.

      CHECK     C^H^E^C^K^S ^W^H^E^T^H^E^R ^T^H^E ^F^U^N^C^T^I^O^N ^K^E^Y^S ^I^N ^T^H^E ^F^I^L^E ^Y^O^U ^S^P^E^C^I^F^I^E^D
                ^A^R^E ^A^L^R^E^A^D^Y ^L^O^A^D^E^D ^I^N^T^O ^T^H^E ^T^E^R^M^I^N^A^L. I^F ^N^O^T, ^T^H^E ^F^I^L^E ^I^S
                ^L^O^A^D^E^D.

      DEFAULT   S^E^T^S ^K^E^Y ^D^E^F^I^N^I^T^I^O^N^S ^T^O ^T^H^E NOS ^S^Y^S^T^E^M ^D^E^F^A^U^L^T ^K^E^Y^S. T^H^E
                ^F^I^L^E^N^A^M^E ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D.

      DISPLAY   D^I^S^P^L^A^Y^S ^T^H^E ^K^E^Y ^L^A^B^E^L^S ^F^O^R ^A^L^L ^F^U^N^C^T^I^O^N ^K^E^Y^S ^C^U^R^R^E^N^T^L^Y
                ^L^O^A^D^E^D ^I^N^T^O ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      EDIT      I^N^I^T^I^A^T^E^S ^C^R^E^A^T^I^O^N ^O^R ^E^D^I^T^I^N^G ^O^F ^A ^K^E^Y ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E.

      LOAD      L^O^A^D^S ^K^E^Y ^D^E^F^I^N^I^T^I^O^N^S ^I^N^T^O ^T^H^E ^T^E^R^M^I^N^A^L ^F^R^O^M ^T^H^E ^F^I^L^E
                ^Y^O^U ^S^P^E^C^I^F^I^E^D.

      PRINT     C^R^E^A^T^E^S ^A ^L^O^C^A^L ^F^I^L^E ^C^A^L^L^E^D KEYPRNT ^O^N ^W^H^I^C^H ^T^H^E ^K^E^Y
                ^D^E^F^I^N^I^T^I^O^N^S ^A^R^E ^L^I^S^T^E^D ^F^R^O^M ^T^H^E ^F^I^L^E ^Y^O^U ^S^P^E^C^I^F^I^E^D.

      ?         A ^Q^U^E^S^T^I^O^N ^M^A^R^K ^L^I^S^T^S ^T^H^E ^O^P^T^I^O^N^S ^A^N^D ^P^R^O^M^P^T^S ^Y^O^U ^F^O^R ^A^N
                ^O^P^T^I^O^N ^A^N^D ^F^I^L^E ^N^A^M^E.  T^O ^E^N^T^E^R ^T^H^I^S ^O^P^T^I^O^N ^F^R^O^M HELPME,
                ^T^Y^P^E  ,?
.HELP,LFN,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^Y^O^U^R ^K^E^Y ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E, ^W^H^I^C^H ^M^U^S^T ^B^E ^A^N
      ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E.

      D^E^F^A^U^L^T@D KEYDEFS
.ENDHELP
.EX.  $KEY(OPT,LFN)
$REVERT(NOLIST)
*WEOR
.PROC,KRONREF*I
,P[P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*F,*K=OPL,*N=)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,*K=OUTPUT,*N=OUTPUT)
,S[S^Y^S^T^E^M ^T^E^X^T]=(*F,*K=NOSTEXT,*N=NOSTEXT,0)
,G[L^O^C^A^L ^T^E^X^T]=(*F,*K=TEXT,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  KRONREF,P=^L^F^N1,L=^L^F^N2,S=^L^F^N3,G=^L^F^N4.

      T^H^E KRONREF ^C^O^M^M^A^N^D ^G^E^N^E^R^A^T^E^S ^A ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^L^I^S^T^I^N^G ^O^F ^S^Y^S^T^E^M
      ^S^Y^M^B^O^L^S ^U^S^E^D ^O^N ^A^N OPL.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (P=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E OPL ^I^N^P^U^T ^F^I^L^E.  I^F ^T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D ^O^R P ^A^L^O^N^E ^I^S ^S^P^E^C^I^F^I^E^D, ^F^I^L^E OPL ^I^S ^A^S^S^U^M^E^D.

      D^E^F^A^U^L^T@D F^I^L^E OPL.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^F^I^L^E (^L^I^S^T^I^N^G ^F^I^L^E).   I^F
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D ^O^R L ^A^L^O^N^E ^I^S ^S^P^E^C^I^F^I^E^D, ^F^I^L^E OUTPUT ^I^S
      ^A^S^S^U^M^E^D.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.HELP,S,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (S=^L^F^N3) ^S^P^E^C^I^F^I^E^S ^S^Y^S^T^E^M ^T^E^X^T ^F^R^O^M ^O^V^E^R^L^A^Y ^L^F^N3.  T^H^E
      ^S^Y^S^T^E^M ^T^E^X^T ^M^U^S^T ^C^O^N^T^A^I^N ^S^Y^M^B^O^L ^D^E^F^I^N^I^T^I^O^N^S.  I^F S=0 ^I^S ^S^P^E^C^I^F^I^E^D, ^O^N^L^Y
      ^T^H^E ^C^O^M^M^O^N ^D^E^C^K ^R^E^F^E^R^E^N^C^E^S ^A^N^D ^S^T^A^T^I^S^T^I^C^S ^A^R^E ^L^I^S^T^E^D.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^
      ^I^S ^O^M^I^T^T^E^D ^O^R S ^A^L^O^N^E ^I^S ^S^P^E^C^I^F^I^E^D, ^F^I^L^E NOSTEXT ^I^S ^A^S^S^U^M^E^D.

      D^E^F^A^U^L^T@D F^I^L^E NOSTEXT.
.HELP,G,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (G=^L^F^N4) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^F^R^O^M ^L^O^C^A^L ^F^I^L^E ^L^F^N4.
      T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^M^U^S^T ^C^O^N^T^A^I^N ^S^Y^M^B^O^L ^D^E^F^I^N^I^T^I^O^N^S.   E^N^T^E^R G ^T^O ^S^P^E^C^I^F^Y
      ^L^O^C^A^L ^F^I^L^E TEXT.  U^S^E ^O^F ^T^H^E G ^O^P^T^I^O^N ^O^V^E^R^R^I^D^E^S ^A^N^Y S ^S^P^E^C^I^F^I^C^A^T^I^O^N^S.

      D^E^F^A^U^L^T@D S^Y^S^T^E^M ^T^E^X^T ^I^S ^A^C^Q^U^I^R^E^D ^A^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E S ^P^A^R^A^M^E^T^E^R.
.ENDHELP
.EX.  $KRONREF(#P=P,#L=L,#S=S,#G=G)
*WEOR
.PROC,LABEL*I
,LFN[L^O^C^A^L F^I^L^E N^A^M^E]=(*A1,*N)
,VSN[V^O^L^U^M^E S^E^R^I^A^L N^U^M^B^E^R]=(*A1,*N)
,MT[N^U^M^B^E^R ^O^F T^R^A^C^K^S (MT ^O^R NT)]=(*A1,*N)
,D[T^A^P^E D^E^N^S^I^T^Y (D)]=(D=D,*A1,*N)
,F[D^A^T^A F^O^R^M^A^T (F)]=(F=F,*A1,*N)
,PO[P^R^O^C^E^S^S^I^N^G O^P^T^I^O^N^S (PO)]=(*A1,*N)
,LB[L^A^B^E^L^E^D ^O^R U^N^L^A^B^E^L^E^D T^A^P^E (LB)]=(*A1,*N)
,FC[F^R^A^M^E C^O^U^N^T (FC ^O^R C)]=(*A1,*N)
,CV[C^O^N^V^E^R^S^I^O^N M^O^D^E (CV ^O^R N)]=(*A1,*N)
,NS[N^O^I^S^E ^S^I^Z^E (NS)]=(*A1,*N)
,CK[C^H^E^C^K^P^O^I^N^T ^F^I^L^E (CB ^O^R CK)]=(*A1,*N)
,SI[S^E^T I^D^E^N^T^I^F^I^E^R (SI ^O^R M)]=(*A1,*N)
,SN[S^E^C^T^I^O^N N^U^M^B^E^R (SN ^O^R V)]=(*A1,*N)
,QN[S^E^Q^U^E^N^C^E N^U^M^B^E^R (QN ^O^R P)]=(*A1,*N)
,FI[F^I^L^E I^D^E^N^T^I^F^I^E^R (FI ^O^R L)]=(*A1,*N)
,FA[F^I^L^E A^C^C^E^S^S^I^B^I^L^I^T^Y (FA)]=(*A1,*N)
,G[G^E^N^E^R^A^T^I^O^N N^U^M^B^E^R (G)]=(G=G,*A1,*N)
,EE[G^E^N^E^R^A^T^I^O^N N^U^M^B^E^R (E)]=(*A1,*N)
,CR[C^R^E^A^T^I^O^N D^A^T^E (CR ^O^R C)]=(*A1,*N)
,RT[E^X^P^I^R^A^T^I^O^N D^A^T^E (RT ^O^R T)]=(*A1,*N)
,RW[R^E^A^D ^O^R W^R^I^T^E M^O^D^E (R ^O^R W)]=(*A1,*N)
,AL[S^E^C^U^R^I^T^Y A^C^C^E^S^S L^E^V^E^L (AL)]=(*A1,*N)
,AC[A^L^T^E^R^N^A^T^E A^U^D^I^T^A^B^I^L^I^T^Y (AC)(TMS ^O^N^L^Y)]=(*A1,*N)
,CT[F^I^L^E C^A^T^E^G^O^R^Y (CT)(TMS ^O^N^L^Y)]=(*A1,*N)
,MD[F^I^L^E M^O^D^E (MD)(TMS ^O^N^L^Y)]=(*A1,*N)
,PW[P^A^S^S^W^O^R^D (PW)(TMS ^O^N^L^Y)]=(*A1,*N)
,TO[TMS T^A^P^E O^P^T^I^O^N^S (TO)(TMS ^O^N^L^Y)]=(*A1,*N)
,UN[A^L^T^E^R^N^A^T^E U^S^E^R N^A^M^E (UN)(TMS ^O^N^L^Y)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LABEL,^L^F^N,VSN=^V^S^N,^0MT ^O^R NT^2,D=^D,F=^F,PO=^P^O,LB=^L^B,^0FC=^F^C^O^U^N^T ^O^R
                   C=^C^C^O^U^N^T^2,^0CV=^C^V ^O^R N=^C^V^2,NS=^N^S,^0CB ^O^R CK^2,^0SI=^S^E^T^I^D ^O^R
                   M=^S^E^T^I^D^2,^0SN=^S^E^C^N^O ^O^R V=^S^E^C^N^O^2,^0QN=^S^E^Q^N^O ^O^R P=^S^E^Q^N^O^2,
                   ^0FI=^F^I^L^E^I^D ^O^R L=^F^I^L^E^I^D^2,FA=^F^A,G=^G,E=^G^V^N,^0CR=^C^D^A^T^E ^O^R
                   C=^C^D^A^T^E^2,^0RT=^Y^Y^D^D^D ^O^R T=^D^D^D^2,^0W ^O^R R^2,AL=^A^L,AC=^A^C,CT=^C^T,
                   MD=^M^D,PW=^P^W,TO=^T^O,UN=^U^N.

      T^H^E LABEL ^C^O^M^M^A^N^D ^A^S^S^O^C^I^A^T^E^S ^A ^F^I^L^E ^N^A^M^E ^L^F^N ^W^I^T^H ^A ^M^A^G^N^E^T^I^C ^T^A^P^E,
      ^U^S^U^A^L^L^Y ^I^D^E^N^T^I^F^I^E^D ^B^Y ^I^T^S VSN.
.HELP,LFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^H^A^T ^R^E^S^I^D^E^S ^O^R ^I^S ^T^O
      ^R^E^S^I^D^E ^O^N ^M^A^G^N^E^T^I^C ^T^A^P^E.  I^F ^L^F^N ^I^S ^A^L^R^E^A^D^Y ^A^S^S^I^G^N^E^D ^T^O ^A ^M^A^S^S ^S^T^O^R^A^G^E
      ^F^I^L^E, ^P^R^O^C^E^S^S^I^N^G ^C^O^N^T^I^N^U^E^S ^W^I^T^H ^T^H^E ^N^E^X^T ^C^O^M^M^A^N^D.  T^O ^A^S^S^I^G^N ^A ^P^R^E^V^I^O^U^S^L

      ^A^S^S^I^G^N^E^D ^L^F^N, ^Y^O^U ^M^U^S^T ^R^E^T^U^R^N ^L^F^N ^B^E^F^O^R^E ^I^T^S ^R^E^A^S^S^I^G^N^M^E^N^T.  I^F ^L^F^N ^I^S
      ^A^L^R^E^A^D^Y ^A^S^S^I^G^N^E^D ^T^O ^A ^T^A^P^E ^A^N^D ^T^H^E R ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^C^O^N^T^E^N^T

      ^O^F ^T^H^E ^T^A^P^E ^L^A^B^E^L^S ^A^R^E ^C^O^M^P^A^R^E^D ^T^O ^T^H^E ^C^O^M^M^A^N^D ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^C^A^T^I^O^N

      I^F ^T^H^E ^L^A^B^E^L ^V^E^R^I^F^I^C^A^T^I^O^N ^F^A^I^L^S, ^T^H^E ^J^O^B ^A^B^O^R^T^S.  O^M^I^S^S^I^O^N ^O^F ^L^F^N ^R^E^S^U^L^T^S
      ^I^N ^A^N ^E^R^R^O^R.
.HELP,VSN,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R VSN=^V^S^N ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 6-^C^H^A^R^A^C^T^E^R ^V^O^L^U^M^E ^S^E^R^I^A^L ^N^U^M^B^E^R
      ^T^H^A^T ^U^N^I^Q^U^E^L^Y ^I^D^E^N^T^I^F^I^E^S ^A ^R^E^E^L ^O^F ^T^A^P^E.  I^F VSN ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^O^P^E^R^A^T^O^R
      ^A^S^S^I^G^N^S ^A^N ^A^V^A^I^L^A^B^L^E ^U^N^I^T ^T^O ^L^F^N.  M^U^L^T^I^P^L^E VSN^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^I^F
      ^S^E^P^A^R^A^T^E^D ^B^Y / ^O^R = ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^E VSN^S ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^T^H^E =
      ^C^H^A^R^A^C^T^E^R, LABEL ^A^S^S^I^G^N^S ^L^F^N ^T^O ^T^H^E ^F^I^R^S^T ^A^V^A^I^L^A^B^L^E VSN ^I^N ^T^H^E ^L^I^S^T.  I^F
      ^T^H^E VSN^S ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^T^H^E / ^C^H^A^R^A^C^T^E^R, ^L^F^N ^I^S ^A ^M^U^L^T^I^V^O^L^U^M^E ^F^I^L^E ^S^E^T,
      ^A^N^D LABEL ^A^S^S^I^G^N^S ^T^H^E ^V^O^L^U^M^E^S ^I^N ^T^H^E ^S^E^Q^U^E^N^C^E ^G^I^V^E^N.  I^F VSN=, VSN=0, ^O^R
      VSN=SCRATCH ^I^S ^S^P^E^C^I^F^I^E^D, ^A ^S^C^R^A^T^C^H ^T^A^P^E ^I^S ^A^S^S^I^G^N^E^D.  I^F ^A ^S^C^R^A^T^C^H ^T^A^P^E
      ^I^S ^U^N^A^V^A^I^L^A^B^L^E, ^T^H^E ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^A ^T^A^P^E ^I^S ^A^V^A^I^L^A^B^L^E.
 .HELP,MT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R^S MT ^O^R NT ^R^E^Q^U^E^S^T^S ^A ^S^E^V^E^N-^T^R^A^C^K (MT) ^O^R ^N^I^N^E-^T^R^A^C^K (NT)
      ^T^A^P^E ^D^R^I^V^E.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^I^N^E^D.  M^U^S^T ^N^O^T ^C^O^N^F^L^I^C^T ^W^I^T^H
      D=^D^E^N ^S^P^E^C^I^F^I^C^A^T^I^O^N.
.HELP,D,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R D=^D^E^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^A^P^E ^D^E^N^S^I^T^Y.  T^A^P^E ^D^E^N^S^I^T^Y; ^M^U^S^T ^N^O^T
     ^C^O^N^F^L^I^C^T ^W^I^T^H MT ^O^R NT ^S^P^E^C^I^F^I^C^A^T^I^O^N.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D
     T^H^E ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D ^F^O^R ^N^I^N^E-^T^R^A^C^K ^T^A^P^E ^N^O^T ^P^O^S^I^T^I^O^N^E^D ^A^T ^L^O^A^D ^P^O^I^N

     C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      S^E^V^E^N-^T^R^A^C^K (MT)            N^I^N^E-^T^R^A^C^K (NT)
      ^D^E^N      D^E^N^S^I^T^Y            ^D^E^N     D^E^N^S^I^T^Y
      ---      -------            ---     -------
      LO       200 ^C^P^I            HD       800 ^C^P^I
      HI       556 ^C^P^I            PE      1600 ^C^P^I
      HY       800 ^C^P^I            GE      6250 ^C^P^I
      200      200 ^C^P^I            800      800 ^C^P^I
      556      556 ^C^P^I            1600    1600 ^C^P^I
      800      800 ^C^P^I            6250    6250 ^C^P^I
.HELP,F,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R F=^F^O^R^M^A^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^A^T^A ^F^O^R^M^A^T.  I^F F ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S I.

      ^F^O^R^M^A^T         D^E^S^C^R^I^P^T^I^O^N
      ------         -----------
        I            I^N^T^E^R^N^A^L.
        SI           S^Y^S^T^E^M ^I^N^T^E^R^N^A^L.
        S            S^T^R^A^N^G^E^R.
        L            L^O^N^G ^B^L^O^C^K ^S^T^R^A^N^G^E^R.
        F            F^O^R^E^I^G^N (^D^E^S^I^G^N^E^D ^F^O^R ^T^A^P^E^S ^O^F ^U^N^K^N^O^W^N ^D^A^T^A ^F^O^R^M^A^T).

T^H^E SI ^F^O^R^M^A^T ^I^S ^T^H^E NOS/BE ^S^Y^S^T^E^M ^D^E^F^A^U^L^T ^T^A^P^E ^F^O^R^M^A^T (^B^I^N^A^R^Y ^M^O^D^E ^O^N^L^Y); ^U^S^E^D
^F^O^R ^T^A^P^E ^I^N^T^E^R^C^H^A^N^G^E ^W^I^T^H NOS/BE ^S^Y^S^T^E^M^S.
.HELP,LB,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R LB=^L^B ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^A^P^E ^I^S ^L^A^B^E^L^E^D ^O^R ^U^N^L^A^B^E^L^E^D.
      I^F LB ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S KL.  R^E^F^E^R ^T^O ^T^H^E ^F^O^L^L^O^W^I^N^G ^L^I^S^T@D

      ^L^B          D^E^S^C^R^I^P^T^I^O^N
      --          -----------
      KL          ANSI-^L^A^B^E^L^E^D.
      KU          U^N^L^A^B^E^L^E^D.
      NS          N^O^N^S^T^A^N^D^A^R^D-^L^A^B^E^L^E^D.  A^S^S^U^M^E^S ^D^A^T^A
                  ^B^E^G^I^N^S ^I^M^M^E^D^I^A^T^E^L^Y ^A^F^T^E^R ^T^H^E ^F^I^R^S^T ^T^A^P^E
                  ^M^A^R^K.
.HELP,PO,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PO=^P1^P2...^P^N ^S^P^E^C^I^F^I^E^S ^A ^S^T^R^I^N^G ^O^F ^C^H^A^R^A^C^T^E^R^S (^N^O^T
      ^S^E^P^A^R^A^T^E^D ^B^Y ^C^O^M^M^A^S) ^T^H^A^T ^S^P^E^C^I^F^I^E^S ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S.
.HELP,FC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R FC=^F^C^O^U^N^T ^O^R C=^C^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K
      ^S^I^Z^E ^I^N ^F^R^A^M^E^S (^N^O ^D^E^F^A^U^L^T ^V^A^L^U^E).  W^H^E^N^E^V^E^R ^T^A^P^E ^F^O^R^M^A^T F ^I^S
      ^S^P^E^C^I^F^I^E^D, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.  N^O^T ^A^P^P^L^I^C^A^B^L^E ^F^O^R
      ^T^A^P^E ^F^O^R^M^A^T^S ^O^T^H^E^R ^T^H^A^N F.
.HELP,SN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R SN=^S^E^C^N^O ^O^R V=^S^E^C^N^O ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 4-^D^I^G^I^T ^F^I^L^E
      ^S^E^C^T^I^O^N ^N^U^M^B^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^V^O^L^U^M^E ^W^I^T^H^I^N ^A ^M^U^L^T^I^V^O^L
^E
      ^S^E^T (^N^U^M^B^E^R^E^D ^C^O^N^S^E^C^U^T^I^V^E^L^Y ^F^R^O^M 0001).  I^F SN ^O^R V ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S 1.
.HELP,SI,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R SI=^S^E^T^I^D ^O^R M=^S^E^T^I^D ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 6-^C^H^A^R^A^C^T^E^R
      ^F^I^L^E ^S^E^T ^I^D^E^N^T^I^F^I^E^R; ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^F^O^R ^F^I^L^E ^P^O^S^I^T^I^O^N^I^N^G ^W^I^T^H^I^N ^A
      ^A ^M^U^L^T^I^F^I^L^E ^S^E^T.

      T^H^E ^S^Y^S^T^E^M ^L^E^A^V^E^S ^T^H^E ^S^E^T ^I^D^E^N^T^I^F^I^E^R ^F^I^E^L^D ^I^N ^T^H^E HDR1 ^L^A^B^E^L ^B^L^A^N^K ^I^F ^Y^O^U
      ^O^M^I^T ^T^H^E SI=^S^E^T^I^D ^P^A^R^A^M^E^T^E^R ^O^R ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^B^L^A^N^K^S ^F^O^R ^S^E^T^I^D.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^N^O^N^B^L^A^N^K ^F^I^L^E ^S^E^T ^I^D^E^N^T^I^F^I^E^R ^T^O ^B^U^I^L^D ^A ^M^U^L^T^I^F^I^L^E ^S^E^

      H^E^N^C^E, ^I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^W^H^E^N ^Y^O^U ^W^R^I^T^E ^T^H^E ^F^I^R^S^T ^F^I^L^E ^O^N ^T^H^E
      ^T^A^P^E, ^T^H^E ^T^A^P^E ^C^A^N^N^O^T ^T^H^E^N ^B^E ^A ^M^U^L^T^I^F^I^L^E ^S^E^T ^T^A^P^E.  W^H^E^N ^Y^O^U ^A^P^P^E^N^D ^A
      ^F^I^L^E ^T^O ^A ^M^U^L^T^I^F^I^L^E ^S^E^T ^T^A^P^E, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^T^O ^P^O^S^I^T^I^

      ^T^H^E ^T^A^P^E.  A^L^S^O, ^T^H^E ^S^P^E^C^I^F^I^E^D ^S^E^T ^I^D^E^N^T^I^F^I^E^R ^M^U^S^T ^B^E ^T^H^E ^S^A^M^E ^A^S ^T^H^A^T ^O^F
      ^T^H^E ^F^I^R^S^T ^F^I^L^E ^I^N ^T^H^E ^M^U^L^T^F^I^L^E ^S^E^T.
.HELP,CV,NOLIST
     T^H^E ^P^A^R^A^M^E^T^E^R CV=^C^V ^O^R N=^C^V ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^N^V^E^R^S^I^O^N ^M^O^D^E ^F^O^R ^N^I^N^E-^T^R^A^C^K
     ^T^A^P^E^S; ^A^P^P^L^I^E^S ^T^O ^B^O^T^H ^L^A^B^E^L^S ^A^N^D ^D^A^T^A ^O^N ^C^O^D^E^D ^T^A^P^E^S; ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O
     ^L^A^B^E^L^S ^O^N ^B^I^N^A^R^Y ^T^A^P^E^S.  I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T.  I^G^N^O^R^E^D ^F^O^R
     ^U^N^L^A^B^E^L^E^D I ^O^R SI ^F^O^R^M^A^T ^B^I^N^A^R^Y ^T^A^P^E^S ^W^H^O^S^E ^T^R^A^I^L^E^R ^L^A^B^E^L^S ^A^R^E ^A^L^W^A^Y^S
     ASCII.  M^U^S^T ^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H MT ^O^R ^S^E^V^E^N-^T^R^A^C^K ^D^E^N^S^I^T^Y ^S^P^E^C^I^F^I^C^A^T^I^O^N.

     ^C^V                     M^E^A^N^I^N^G
     --                     -------
     AS        ASCII/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.

     US        S^A^M^E ^A^S AS.

     EB        EBCDIC/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.
.HELP,NS,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NS=^N^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O^I^S^E ^S^I^Z^E; ^A^N^Y ^B^L^O^C^K ^C^O^N^T^A^I^N^I^N^G ^F^E^W^E^R
      ^T^H^A^N ^N^S ^F^R^A^M^E^S ^I^S ^C^O^N^S^I^D^E^R^E^D ^N^O^I^S^E ^A^N^D ^I^S ^D^I^S^C^A^R^D^E^D.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^N^O^T ^V^A^L^I^D ^F^O^R I ^O^R SI ^F^O^R^M^A^T ^T^A^P^E^S ^O^R ^F^O^R ^O^T^H^E^R ^T^A^P^E ^F^O^R^M^A^T^S ^W^H^E^N ^E^I^T^H^E^R
      PE (9-^T^R^A^C^K, 1600 ^C^P^I) ^O^R GE (9-^T^R^A^C^K, 6250 ^C^P^I) ^D^E^N^S^I^T^Y ^I^S ^S^P^E^C^I^F^I^E^D.
      F^O^R PE ^A^N^D GE ^D^E^N^S^I^T^I^E^S, ^T^H^E ^N^O^I^S^E ^B^L^O^C^K ^S^I^Z^E ^I^S ^Z^E^R^O.  D^E^F^A^U^L^T ^I^S 18
      ^F^R^A^M^E^S ^F^O^R ^O^T^H^E^R ^F^O^R^M^A^T^S.  M^A^X^I^M^U^M ^V^A^L^U^E ^I^S 31 ^F^R^A^M^E^S.  I^F NS=0 ^I^S
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^U^S^E^D.
.HELP,CK,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R^S CB ^O^R CK ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^L^F^N ^I^S ^T^O ^B^E ^U^S^E^D ^A^S ^A ^C^H^E^C^K^P^O^I^N^T
      ^F^I^L^E.

      CK        E^A^C^H ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T ^T^H^E ^P^R^E^V^I^O^U^S EOI ^O^F ^L^F^N.
      CB        E^A^C^H ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T ^T^H^E BOI ^O^F ^L^F^N.
.HELP,QN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R QN=^S^E^Q^N^O ^O^R P=^S^E^Q^N^O ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 4-^D^I^G^I^T ^F^I^L^E
      ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^F^I^L^E ^W^I^T^H^I^N ^T^H^E ^M^U^L^T^I^F^I










      ^S^E^T (^N^U^M^B^E^R^E^D ^C^O^N^S^E^C^U^T^I^V^E^L^Y ^F^R^O^M 0001).  I^F QN ^O^R P ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S 1.  QN ^M^U^S^T ^B^E ^S^E^T ^T^O 9999 ^T^O ^A^P^P^E^N^D ^A ^N^E^W ^F^I^L^E ^T^O ^A
      ^M^U^L^T^I^F^I^L^E ^S^E^T.
.HELP,FI,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R FI=^F^I^L^E^I^D ^O^R L=^F^I^L^E^I^D ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 17-^C^H^A^R^A^C^T^E^R ^F^I^L^E
      ^I^D^E^N^T^I^F^I^E^R ^R^E^C^O^R^D^E^D ^I^N ^T^H^E HDR1 ^L^A^B^E^L.  I^F FI ^O^R L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S ^B^L^A^N^K.
.HELP,FA,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R FA=^F^A ^S^P^E^C^I^F^I^E^S ^A ^F^I^L^E ^A^C^C^E^S^S^I^B^I^L^I^T^Y ^C^H^A^R^A^C^T^E^R, ^I^N^D^I^C^A^T^I^N^
      ^W^H^O ^H^A^S ^A^C^C^E^S^S ^T^O ^T^H^E ^L^A^B^E^L^E^D ^T^A^P^E.

      ^F^A          D^E^S^C^R^I^P^T^I^O^N
      --          -----------
      B^L^A^N^K       U^N^I^M^I^T^E^D ^A^C^C^E^S^S (^D^E^F^A^U^L^T).

      A           O^N^L^Y ^T^H^E ^O^W^N^E^R ^O^F ^T^H^E ^T^A^P^E ^C^A^N ^A^C^C^E^S^S ^I^T.

      O^T^H^E^R       T^O ^A^C^C^E^S^S ^T^H^E ^T^A^P^E, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E
                  ^C^H^A^R^A^C^T^E^R ^I^N ^T^H^E FA ^F^I^E^L^D ^O^F ^T^H^E HDR1 ^L^A^B^E^L.
.HELP,G,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R G=^G^E^N^N^O ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 4-^D^I^G^I^T ^G^E^N^E^R^A^T^I^O^N ^N^U^M^B^E^R.
      T^H^E ^N^U^M^B^E^R ^Z^E^R^O ^C^A^N^N^O^T ^B^E ^U^S^E^D.  I^F G ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 1.
 .HELP,EE,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R E=^G^V^N ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 2-^D^I^G^I^T ^G^E^N^E^R^A^T^I^O^N ^V^E^R^S^I^O^N
      ^N^U^M^B^E^R.  I^F E ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S 0.
.HELP,CR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CR=^C^D^A^T^E ^O^R C=^C^D^A^T^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^R^E^A^T^I^O^N ^D^A^T^E ^I^N ^T^H^E ^F^O^R^M
      ^Y^Y^D^D^D ^W^H^E^R^E 1<=^D^D^D <=366. U^S^E^D ^O^N^L^Y ^O^N ^R^E^A^D ^O^P^E^R^A^T^I^O^N^S; ^W^R^I^T^E ^O^P^E^R^A^T^I^O^N^S
      ^A^L^W^A^Y^S ^U^S^E ^T^H^E ^C^U^R^R^E^N^T ^D^A^T^E.
.HELP,RT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R RT=^Y^Y^D^D^D ^O^R T=^D^D^D ^W^H^E^R^E RT=^Y^Y^D^D^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^P^I^R^A^T^I^O^N
      ^D^A^T^E ^A^N^D ^Y^Y ^I^S ^T^H^E ^L^A^S^T ^T^W^O ^D^I^G^I^T^S ^O^F ^T^H^E ^Y^E^A^R, ^A^N^D ^D^D^D ^I^S ^T^H^E ^D^A^Y ^O^F
      ^T^H^E ^Y^E^A^R (1<=^D^D^D <=366).  T=^D^D^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^D^A^Y^S ^T^H^E ^F^I^L^E
      ^I^S ^T^O ^B^E ^R^E^T^A^I^N^E^D (0<=^D^D^D <=999).  T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^I^S ^E^N^T^E^R^E^D ^I^N
      ^T^H^E HDR1 ^L^A^B^E^L.  O^N ^O^R ^A^F^T^E^R ^T^H^I^S ^D^A^T^E ^T^H^E ^L^A^B^E^L ^A^N^D ^T^H^E ^F^I^L^E ^C^A^N ^B^E
      ^O^V^E^R^W^R^I^T^T^E^N.
.HELP,RW,NOLIST

      I^F ^T^H^E ^P^A^R^A^M^E^T^E^R R ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^C^O^M^P^A^R^E^S ^T^H^E ^V^A^L^U^E^S ^R^E^C^O^R^D^E^D
      ^O^N ^T^H^E ^F^I^L^E ^L^A^B^E^L^S ^W^I^T^H ^T^H^E LABEL ^C^O^M^M^A^N^D ^P^A^R^A^M^E^T^E^R ^V^A^L^U^E^S.  I^F ^T^H^E
      ^C^O^M^P^A^R^I^S^O^N ^F^A^I^L^S, ^I^T ^T^E^R^M^I^N^A^T^E^S ^T^H^E ^J^O^B.  I^F RW ^I^S ^O^M^I^T^T^E^D, R ^I^S ^T^H^E
      ^D^E^F^A^U^L^T.

      I^F ^T^H^E ^P^A^R^A^M^E^T^E^R W ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^W^R^I^T^E^S ANSI ^S^T^A^N^D^A^R^D ^L^A^B^E^L^S
      ^O^N ^T^H^E ^T^A^P^E.  T^H^E ^L^A^B^E^L^S ^C^O^N^T^A^I^N ^T^H^E ^V^A^L^U^E^S ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E LABEL
      ^C^O^M^M^A^N^D ^P^A^R^A^M^E^T^E^R^S ^O^R ^T^H^E^I^R ^D^E^F^A^U^L^T ^V^A^L^U^E^S.  I^F ^T^H^E ^T^A^P^E ^I^S ^M^O^U^N^T^E^D
      ^W^I^T^H^O^U^T ^T^H^E ^W^R^I^T^E ^R^I^N^G, ^J^O^B ^P^R^O^C^E^S^S^I^N^G ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^O^P^E^R^A^T^O^R
      ^R^E^M^O^U^N^T^S ^T^H^E ^T^A^P^E ^C^O^R^R^E^C^T^L^Y.  I^F ^B^O^T^H ^T^H^E W ^A^N^D ^T^H^E PO=R ^P^A^R^A^M^E^T^E^R^S ^A^R^E
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^J^O^B ^S^T^E^P ^A^B^O^R^T^S.

      W ^A^N^D R ^A^R^E ^I^G^N^O^R^E^D ^W^H^E^N SI ^I^S ^S^P^E^C^I^F^I^E^D ^A^N^D QN>1.  W^H^E^N QN=1 (^D^E^F^A^U^L^T
      ^V^A^L^U^E) ^A^N^D W ^A^R^E ^S^P^E^C^I^F^I^E^D, ^T^H^E ^I^N^I^T^I^A^L ^H^E^A^D^E^R ^L^A^B^E^L ^I^S ^R^E^W^R^I^T^T^E^N.
.HELP,AL,NOLIST

    T^H^E ^P^A^R^A^M^E^T^E^R AL=^L^E^V^E^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^T^O ^A^S^S^I^G^N ^T^O ^T^

    ^F^I^L^E.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^N^A^M^E^


    LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, ^O^R LVL7

    T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^J^O^B.
.HELP,AC,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R AC=^A^C ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^F^I^L^E ^O^R^I^G^I^N^A^T^O^R ^A^L^L^O^W^S ^A^L^T^E^R^N^A





     ^U^S^E^R^S ^T^O ^O^B^T^A^I^N ^S^T^A^T^U^S ^I^N^F^O^R^M^A^T^I^O^N (^V^I^A ^T^H^E AUDIT ^C^O^M^M^A^N^D) ^A^B^O^U^T ^T^H^E ^T^A^P^E
     ^F^I^L^E.  V^A^L^I^D ^E^N^T^R^I^E^S ^A^R^E@D

     ^A^C          D^E^S^C^R^I^P^T^I^O^N
     --          -----------
     Y              Y^E^S
     N              N^O

     I^F ^Y^O^U ^O^M^I^T ^T^H^E AC=^A^C ^P^A^R^A^M^E^T^E^R, ^A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^C^A^N^N^O^T ^O^B^T^A^I^N ^S^T^A^T^U^S
     ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^T^H^E ^F^I^L^E.
.HELP,CT,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R CT=^C^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y. V^A^L^I^D ^E^N^T^R^I^E^S ^A^R^E@

     ^C^T          D^E^S^C^R^I^P^T^I^O^N
     --          -----------
     P ^O^R PR     P^R^I^V^A^T^E
     S ^O^R SP     S^E^M^I^P^R^I^V^A^T^E
     PU          P^U^B^L^I^C

     I^F ^Y^O^U ^O^M^I^T ^T^H^E CT ^P^A^R^A^M^E^T^E^R ^W^H^E^N ^T^H^E ^F^I^L^E ^I^S ^C^R^E^A^T^E^D, ^T^H^E ^F^I^L^E
     ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y ^I^S P (^P^R^I^V^A^T^E).
.HELP,MD,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R MD=^M^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E ^P^E^R^M^I^T^T^E^D ^T^O ^O^T^H^E^R
     ^U^S^E^R^S ^I^F ^T^H^E ^T^A^P^E ^F^I^L^E ^I^S ^P^U^B^L^I^C ^O^R ^S^E^M^I^P^R^I^V^A^T^E ^A^N^D ^E^X^P^L^I^C^I^T ^A^C^C^E^S^S
     ^P^E^R^M^I^S^S^I^O^N ^H^A^S ^N^O^T ^B^E^E^N ^G^R^A^N^T^E^D ^T^O ^T^H^A^T ^U^S^E^R.  V^A^L^I^D ^E^N^T^R^I^E^S ^A^R^E@D

      ^M^D          D^E^S^C^R^I^P^T^I^O^N
      --          -----------
      R           R^E^A^D
      W           W^R^I^T^E

     I^F ^Y^O^U ^O^M^I^T ^T^H^E MD=^M^D ^P^A^R^A^M^E^T^E^R, ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E ^I^S R (^R^E^A^D).
.HELP,PW,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R PW=^P^A^S^S^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^P^A^S^S^W^O^R^D ^T^H^A^T
     ^C^O^N^T^R^O^L^S ^A^C^C^E^S^S ^T^O ^T^H^E ^M^O^U^N^T^E^D ^T^A^P^E.  Y^O^U ^N^E^E^D ^T^O ^E^N^T^E^R ^T^H^I^S ^P^A^S^S^W^O^R^D ^O^N^L

     ^I^F ^Y^O^U ^A^R^E ^R^E^Q^U^E^S^T^I^N^G ^A^N ^A^L^T^E^R^N^A^T^E ^T^A^P^E (^A ^T^A^P^E ^R^E^S^E^R^V^E^D ^U^N^D^E^R ^S^O^M^E^O^N^E
     ^E^L^S^E'^S ^U^S^E^R ^N^A^M^E) ^A^N^D ^I^F ^T^H^E ^T^A^P^E ^O^R^I^G^I^N^A^T^O^R ^A^S^S^I^G^N^E^D ^A ^P^A^S^S^W^O^R^D ^T^O ^T^H^E
     ^T^A^P^E.  I^F ^Y^O^U ^O^M^I^T ^T^H^E PW=^P^A^S^S^W^O^R^D ^P^A^R^A^M^E^T^E^R ^W^H^I^L^E ^T^R^Y^I^N^G ^T^O ^R^E^Q^U^E^S^T ^A^N
     ^A^L^T^E^R^N^A^T^E ^T^A^P^E ^A^N^D ^I^F ^T^H^I^S ^T^A^P^E ^I^S ^R^E^S^E^R^V^E^D ^W^I^T^H ^A ^P^A^S^S^W^O^R^D ^I^N ^E^F^F^E^C^T,
     NOS ^D^E^N^I^E^S ^A^C^C^E^S^S ^A^N^D ^T^E^R^M^I^N^A^T^E^S ^Y^O^U^R ^J^O^B.

     F^O^R ^A^D^D^E^D ^S^E^C^U^R^I^T^Y, ^Y^O^U ^C^A^N ^E^N^T^E^R ^T^H^E PW ^P^A^R^A^M^E^T^E^R, ^I^N ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^O^R^M@D

        PW

     I^N ^T^H^I^S ^C^A^S^E, NOS ^E^X^P^E^C^T^S ^Y^O^U ^T^O ^S^U^P^P^L^Y ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^P^A^S^S^W^O^R^D ^I^N
     ^T^H^E ^N^E^X^T ^R^E^C^O^R^D ^O^F ^T^H^E INPUT ^F^I^L^E ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M ^W^I^L^L ^R^E^A^D.  T^H^I^S
     ^R^E^C^O^R^D ^M^U^S^T ^B^E ^A ^S^I^N^G^L^E ^L^I^N^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^T^H^E ^P^A^S^S^W^O^R^D ^B^E^G^I^N^N^I^N^G ^I^N
     ^C^O^L^U^M^N 1.
.HELP,TO,NOLIST

     T^H^E ^P^A^R^A^M^E^T^E^R TO=^T^O ^S^P^E^C^I^F^I^E^S ^T^A^P^E ^M^A^N^A^G^E^M^E^N^T ^O^P^T^I^O^N^S.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y
     ^O^N^E ^O^R ^M^O^R^E ^S^P^E^C^I^A^L ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S ^T^H^A^T ^S^H^O^U^L^D ^B^E ^I^M^P^L^E^M^E^N^T^E^D
     ^W^H^E^N ^T^H^E ^S^Y^S^T^E^M ^E^X^E^C^U^T^E^S ^T^H^E LABEL ^C^O^M^M^A^N^D.  Y^O^U ^C^A^N ^C^O^N^C^A^T^E^N^A^T^E ^T^W^O
     ^O^R ^M^O^R^E ^O^P^T^I^O^N^S ^B^Y ^O^M^I^T^T^I^N^G ^P^A^R^A^M^E^T^E^R ^S^E^P^A^R^A^T^O^R^S/^D^E^L^I^M^I^T^E^R^S.
     V^A^L^I^D ^E^N^T^R^I^E^S ^A^R^E@D

     ^T^O                                   D^E^S^C^R^I^P^T^I^O^N
     --                                   -----------

      A           T^H^I^S ^O^P^T^I^O^N ^C^A^N ^B^E ^U^S^E^D ^I^N ^P^L^A^C^E ^O^F ^T^H^E QN=9999 ^P^A^R^A^M^E^T^E^R ^I^F
                  ^Y^O^U ^A^R^E ^G^O^I^N^G ^T^O ^A^P^P^E^N^D ^A ^F^I^L^E ^O^N^T^O ^A ^M^U^L^T^I^F^I^L^E ^S^E^T.

      C           C^H^E^C^K^S ^F^O^R ^C^A^T^A^L^O^G ^E^R^R^O^R.  I^F ^Y^O^U ^R^E^Q^U^E^S^T ^A ^T^A^P^E ^T^H^A^T TMS ^H^A^S
                  ^I^D^E^N^T^I^F^I^E^D ^A^S ^H^A^V^I^N^G ^A ^D^A^T^A ^E^R^R^O^R ^A^N^D ^Y^O^U ^U^S^E ^T^H^I^S ^O^P^T^I^O^N, ^T^H^E
                  LABEL ^C^O^M^M^A^N^D ^A^B^O^R^T^S ^W^I^T^H ^T^H^E ERROR IN FILE DATA ^M^E^S^S^A^G^E.

                  Y^O^U ^C^A^N ^U^S^E ^T^H^E E ^O^P^T^I^O^N ^I^F ^Y^O^U ^W^A^N^T ^T^O ^I^G^N^O^R^E ^P^R^E^V^I^O^U^S ^D^A^T^A
                  ^E^R^R^O^R^S.

      D           U^S^E^R-^S^U^P^P^L^I^E^D ^P^A^R^A^M^E^T^E^R^S.  T^H^I^S ^O^P^T^I^O^N ^A^P^P^L^I^E^S ^O^N^L^Y ^I^F ^Y^O^U
                  ^W^A^N^T ^T^O ^C^H^A^N^G^E ^T^H^E ^P^H^Y^S^I^C^A^L ^P^A^R^A^M^E^T^E^R^S ^O^N ^A^N ^E^X^I^S^T^I^N^G ^F^I^L^E
                  ^I^N READ ^M^O^D^E.  I^N ^O^T^H^E^R ^W^O^R^D^S, ^I^T ^A^L^L^O^W^S ^Y^O^U ^T^O ^C^H^A^N^G^E ^T^H^E
                  CV=^C^V, D=^D^E^N, F=^F^O^R^M^A^T FI=^F^I^L^E^I^D, ^A^N^D LB=^L^B ^P^A^R^A^M^E^T^E^R^S.

                  I^F ^Y^O^U ^O^M^I^T ^T^H^E D ^O^P^T^I^O^N, ^T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^T^H^E ^P^A^R^A^M^E^T^E^R^S
                  ^S^P^E^C^I^F^I^E^D ^W^H^E^N ^T^H^E ^F^I^L^E ^W^A^S ^C^R^E^A^T^E^D ^O^R ^L^A^S^T ^M^O^D^I^F^I^E^D.

      E           I^G^N^O^R^E^S ^C^A^T^A^L^O^G ^E^R^R^O^R.  I^F ^Y^O^U ^R^E^Q^U^E^S^T ^A ^T^A^P^E ^T^H^A^T TMS ^H^A^S
                  ^I^D^E^N^T^I^F^I^E^D ^A^S ^H^A^V^I^N^G ^A ^D^A^T^A ^E^R^R^O^R ^A^N^D ^Y^O^U ^U^S^E ^T^H^I^S ^O^P^T^I^O^N,
                  ^T^H^E LABEL ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^B^O^R^T ^W^I^T^H ^T^H^E ERROR IN FILE
                  DATA ^M^E^S^S^A^G^E.

                  Y^O^U ^C^A^N ^U^S^E ^T^H^E C ^O^P^T^I^O^N ^I^F ^Y^O^U ^W^A^N^T ^T^O ^C^H^E^C^K ^F^O^R ^P^R^E^V^I^O^U^S
                  ^D^A^T^A ^E^R^R^O^R^S.

      F           N^O^N-TMS ^T^A^P^E ^R^E^Q^U^E^S^T.  R^E^Q^U^E^S^T^S ^A ^T^A^P^E (^F^O^R^E^I^G^N) ^T^H^A^T ^I^S
                  ^N^O^T ^C^O^N^T^R^O^L^L^E^D ^B^Y TMS.  T^H^E ^O^P^E^R^A^T^O^R ^M^U^S^T ^A^S^S^I^G^N ^T^H^E ^F^I^L^E.

      R           R^E^S^E^R^V^E^S ^A^S^S^I^G^N^E^D ^S^C^R^A^T^C^H ^V^O^L^U^M^E^S.  W^H^E^N ^Y^O^U ^C^R^E^A^T^E ^A ^T^A^P^E
                  ^F^I^L^E, ^T^H^E ^S^Y^S^T^E^M ^R^E^S^E^R^V^E^S ^A^L^L ^S^C^R^A^T^C^H ^T^A^P^E^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E
                  ^F^I^L^E.  I^F ^Y^O^U ^A^R^E ^C^R^E^A^T^I^N^G ^A ^N^E^W ^T^A^P^E ^F^I^L^E ^A^N^D ^O^M^I^T ^T^H^E R
                  ^O^P^T^I^O^N, ^T^H^E ^S^Y^S^T^E^M ^R^E^L^E^A^S^E^S ^S^C^R^A^T^C^H ^V^O^L^U^M^E^S.  I^F ^Y^O^U ^A^R^E
                  ^W^R^I^T^I^N^G ^T^O ^A^N ^E^X^I^S^T^I^N^G ^F^I^L^E, ^T^H^E ^S^Y^S^T^E^M ^A^S^S^U^M^E^S R.

      S           S^Y^M^B^O^L^I^C ^T^A^P^E ^A^C^C^E^S^S; ^M^A^N^D^A^T^O^R^Y ^E^N^T^R^Y ^W^H^E^N ^Y^O^U ^M^A^N^I^P^U^L^A^T^E ^A
                  ^T^A^P^E ^F^I^L^E ^B^Y ^I^T^S ^S^Y^M^B^O^L^I^C ^N^A^M^E.
.HELP,UN,NOLIST

      S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^U^N^D^E^R ^W^H^I^C^H ^T^H^E ^M^O^U^N^T^E^D ^T^A^P^E ^I^S ^R^E^S^E^R^V^E^D.  I^F
      ^Y^O^U ^O^M^I^T ^T^H^E UN=^U^S^E^R^N^A^M^E ^P^A^R^A^M^E^T^E^R, NOS ^A^S^S^U^M^E^S ^T^H^E ^M^O^U^N^T^E^D ^T^A^P^E ^I^S
      ^R^E^S^E^R^V^E^D ^U^N^D^E^R ^Y^O^U^R ^O^W^N ^U^S^E^R ^N^A^M^E.  I^F ^T^H^E ^R^E^Q^U^E^S^T^E^D ^T^A^P^E ^I^S ^N^O^T
      ^R^E^S^E^R^V^E^D ^U^N^D^E^R ^Y^O^U^R ^O^W^N ^U^S^E^R ^N^A^M^E ^A^N^D ^Y^O^U ^O^M^I^T ^T^H^E UN ^P^A^R^A^M^E^T^E^R, NOS
      ^I^N^I^T^I^A^T^E^S ^E^R^R^O^R ^P^R^O^C^E^S^S^I^N^G.  O^N^L^Y ^E^N^T^E^R ^T^H^E UN=^U^S^E^R^N^A^M^E ^P^A^R^A^M^E^T^E^R
      ^T^O ^R^E^Q^U^E^S^T ^A ^T^A^P^E ^T^H^A^T ^I^S ^R^E^S^E^R^V^E^D ^U^N^D^E^R ^S^O^M^E^O^N^E ^E^L^S^E'^S ^U^S^E^R ^N^A^M^E.
      A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^M^U^S^T ^H^A^V^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^P^E^R^M^I^S^S^I^O^N^S ^I^N ^O^R^D^E^R
      ^T^O ^A^C^C^E^S^S ^A ^F^I^L^E.

      E^X^P^L^I^C^I^T ^P^E^R^M^I^S^S^I^O^N - T^H^E ^O^W^N^E^R ^O^F ^T^H^E ^F^I^L^E ^G^R^A^N^T^S ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N
      ^T^O ^Y^O^U ^W^I^T^H ^A^N ADMIT ^C^O^M^M^A^N^D.

      I^M^P^L^I^C^I^T ^P^E^R^M^I^S^S^I^O^N - T^H^E ^F^I^L^E ^I^S ^S^E^M^I^P^R^I^V^A^T^E ^O^R ^P^U^B^L^I^C ^A^N^D ^C^A^N ^B^E
      ^A^C^C^E^S^S^E^D ^B^Y ^U^S^E^R^S ^W^H^O ^K^N^O^W ^T^H^E ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E, ^A^N^D ^F^I^L^E ^P^A^S^S^W^O^R^D,
      ^A^N^D ^W^H^O ^H^A^V^E ^N^O^T ^B^E^E^N ^E^X^P^L^I^C^I^T^L^Y ^D^E^N^I^E^D ^P^E^R^M^I^S^S^I^O^N.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LBC*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LBC,^A^D^D^R.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E LBC ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      LBC ^C^O^M^M^A^N^D ^I^S ^I^N^T^E^N^D^E^D ^F^O^R ^L^O^A^D^I^N^G ^B^I^N^A^R^Y ^D^A^T^A ^O^F ^U^N^K^N^O^W^N ^F^O^R^M^A^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LDI*I
,FN[F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^J^O^B^S]=(*F,*N=LOAD)
,ID[I^D^E^N^T^I^F^I^E^R ^O^F ^J^O^B'^S ^O^U^T^P^U^T ^D^E^V^I^C^E]=(*S2(01234567B),*N=,*K=)
,OP[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S]=(OP,*N=)
,DC[D^I^S^P^O^S^I^T^I^O^N ^O^F ^O^U^T^P^U^T]=(IN,NO,TO,*N=)
,UN[U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^R^E^M^O^T^E ^B^A^T^C^H ^U^S^E^R]=(*A1..7,*N=,*K=)
,FM[F^A^M^I^L^Y ^N^A^M^E]=(*F,*N=,*K=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LDI,F^N=^L^F^N,ID=^I^D,OP=OP,DC=^D^C,UN=^U^N,FM=^F^M.

      T^H^E LDI ^C^O^M^M^A^N^D ^Q^U^E^U^E^S ^O^N^E ^O^R ^M^O^R^E ^J^O^B^S ^F^O^R ^I^N^P^U^T ^A^N^D ^O^P^T^I^O^N^A^L^L^Y ^E^N^T^E^R^S
      ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^E^A^C^H ^J^O^B ^I^N ^T^H^E ^D^A^Y^F^I^L^E ^O^F ^T^H^E ^J^O^B ^T^H^A^T
      ^E^N^T^E^R^E^D ^T^H^E LDI ^C^O^M^M^A^N^D.
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^J^O^B^S(^S) ^T^O
      ^B^E ^S^U^B^M^I^T^T^E^D.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^I^L^E LOAD.
.HELP,ID,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ID=^I^D) ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^D^E^N^T^I^F^I^E^R ^O^F ^T^H^E ^L^O^C^A^L ^D^E^V^I^C^E ^W^H^I^C^H
      ^W^I^L^L ^R^E^C^E^I^V^E ^J^O^B ^O^U^T^P^U^T.  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^T^H^E ID ^P^A^R^A^M^E^T^E^R ^I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^T^H^E UN ^O^R FM ^P^A^R^A^M^E^T^E^R.  T^H^E ^I^D^E^N^T^I^F^I^E^R ^M^U^S^T ^B^E ^O^C^T^A^L ^A^N^D
      ^I^N ^T^H^E ^R^A^N^G^E 0 ^T^H^R^O^U^G^H 67B.  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^E^N^T^E^R
      ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D ID, ^I^M^P^L^I^C^I^T ^C^E^N^T^R^A^L ^S^I^T^E ^R^O^U^T^I^N^G ^O^C^C^U^R^S.
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=OP) ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^E^N^T^E^R ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E
      (JSN) ^O^F ^E^A^C^H ^J^O^B ^I^N ^T^H^E ^D^A^Y^F^I^L^E ^O^F ^T^H^E ^J^O^B ^T^H^A^T ^I^S^S^U^E^D ^T^H^E LDI ^C^O^M^M^A^N^D.
      E^N^T^E^R OP; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.
.HELP,DC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (DC=^D^C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^O^U^T^P^U^T ^F^O^R ^E^A^C^H ^J^O^B
      ^T^H^A^T ^I^S ^Q^U^E^U^E^D ^F^O^R ^I^N^P^U^T.

      ^D^C                          D^E^S^C^R^I^P^T^I^O^N
      --                          -----------
      IN= D^I^S^P^O^S^E^S ^O^F ^J^O^B ^O^U^T^P^U^T ^A^C^C^O^R^D^I^N^G ^T^O ^T^H^E ^D^E^F^A^U^L^T ^O^P^T^I^O^N ^F^O^R ^T^H^E
          ^J^O^B'^S ^O^R^I^G^I^N ^T^Y^P^E.
      NO= D^I^S^C^A^R^D^S ^A^L^L ^O^U^T^P^U^T.
      TO= Q^U^E^U^E^S ^T^H^E ^O^U^T^P^U^T ^W^I^T^H ^A ^W^A^I^T ^D^I^S^P^O^S^I^T^I^O^N.

      D^E^F^A^U^L^T@D DC=IN.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^R^E^M^O^T^E ^B^A^T^C^H ^U^S^E^R
      ^T^O ^W^H^O^M ^T^H^E ^S^Y^S^T^E^M ^R^O^U^T^E^S ^E^A^C^H ^J^O^B'^S ^O^U^T^P^U^T.  S^P^E^C^I^F^Y ^A 1- ^T^O 7-
      ^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^U^S^E^R ^N^A^M^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D UN,
      ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^O^C^C^U^R^S.  (Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^F
      ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ID ^P^A^R^A^M^E^T^E^R.)

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^O^C^C^U^R^S.
.HELP,FM,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FM=^F^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^A^M^I^L^Y ^N^A^M^E ^O^F ^T^H^E ^R^E^M^O^T^E ^B^A^T^C^H
      ^U^S^E^R ^T^O ^W^H^O^M ^T^H^E ^S^Y^S^T^E^M ^R^O^U^T^E^S ^E^A^C^H ^J^O^B'^S ^O^U^T^P^U^T.  A ^F^A^M^I^L^Y ^N^A^M^E
      ^M^A^Y ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^O^R ^E^N^T^E^R ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D FM, ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^O^C^C^U^R^S.  Y^O^U
      ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ID ^P^A^R^A^M^E^T^E^R.
.ENDHELP
.EX.  $LDI,#FN=FN,#ID=ID,#OP=OP,#DC=DC,#UN=UN,#FM=FM.
*WEOR
.PROC,LDSET*I
,COMMON[C^O^M^M^O^N ^B^L^O^C^K^S ^T^O ^B^E ^M^O^V^E^D]=(*A40,*N=)
,EPT[C^A^P^S^U^L^E/^O^V^E^R^L^A^Y ^E^N^T^R^Y ^P^O^I^N^T^S]=(*A40,*N=)
,ERR[M^E^T^H^O^D ^O^F ^H^A^N^D^L^I^N^G ^L^O^A^D^E^R ^E^R^R^O^R^S]=(ALL,FATAL,NONE,*N=)
,FILES[F^I^L^E^S ^T^O ^B^E ^P^R^O^C^E^S^S^E^D]=(*A40,*N=)
,LIB[L^I^B^R^A^R^Y ^F^I^L^E^S]=(*A40,*N=)
,MAP[F^I^L^E ^A^N^D ^C^O^N^T^E^N^T ^O^F ^L^O^A^D ^M^A^P]=(*A9,*N=)
,OMIT[E^N^T^R^Y ^P^O^I^N^T^S ^T^O ^R^E^M^A^I^N ^U^N^S^A^T^I^S^F^I^E^D]=(*A40,*N=)
,PD[L^O^A^D ^M^A^P ^P^R^I^N^T ^D^E^N^S^I^T^Y]=(6,8,*N=)
,PRESET[U^N^U^S^E^D ^M^E^M^O^R^Y ^V^A^L^U^E^S ^B^E^F^O^R^E ^L^O^A^D]=(NONE,ZERO,ONES,INDEF,INF,
        NGINDEF,NGINF,ALTZERO,ALTONES,DEBUG,*N=)
,PS[L^O^A^D ^M^A^P ^P^A^G^E ^S^I^Z^E]=(*S2..7/D,*N=)
,REWIND[D^E^F^A^U^L^T ^F^O^R ^R^E^W^I^N^D^I^N^G ^F^I^L^E^S]=(REWIND,NOREWIN,*N=)
,SUBST[E^N^T^R^Y ^P^O^I^N^T ^R^E^F^E^R^E^N^C^E^S ^T^O ^C^H^A^N^G^E]=(*A40,*N=)
,USE[E^N^T^R^Y ^P^O^I^N^T^S ^T^O ^B^E ^I^N^C^L^U^D^E^D ^I^N ^L^O^A^D]=(*A40,*N=)
,USEP[O^B^J^E^C^T ^M^O^D^U^L^E^S ^T^O ^B^E ^L^O^A^D^E^D]=(*A40,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D LDSET,COMMON=1^C^B^N^A^M^E1/../1^C^B^N^A^M^E^N,EPT=^E^P^T^N^A^M^E1/../^E^P^T^N^A^M^E^N,
                ERR=^P3,FILES=^L^F^N1/../^L^F^N^N,LIB=^F^I^L^E1/../^F^I^L^E^N,MAP=
                ^P1/^L^F^N1,OMIT=^E^P^T^N^A^M^E1/../^E^P^T^N^A^M^E^N,PD=^P,PRESET=^P2,
                PS=^P,REWIND,SUBST=^P^A^I^R1/../^P^A^I^R^N,USE=^E^P^T^N^A^M^E1/..
                /^E^P^T^N^A^M^E^N,USEP=^P^N^A^M^E1/../^P^N^A^M^E^N.

      T^H^E LDSET ^C^O^M^M^A^N^D ^C^O^N^T^R^O^L^S ^L^O^A^D ^O^P^E^R^A^T^I^O^N^S. M^U^L^T^I^P^L^E ^P^A^R^A^M^E^T^E^R^S ^F^O^R
      ^A^N ^O^P^T^I^O^N ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S (^F^O^R ^E^X^A^M^P^L^E, LIB=LIB1/LIB2/LIB3).
.HELP,COMMON,NOLIST

      F^O^R^M^A^T@D  COMMON
               COMMON=^L^C^B^N^A^M^E1/.../^L^C^B^N^A^M^E^N

      N^A^M^E^D-^L^A^B^E^L^E^D ^C^O^M^M^O^N ^B^L^O^C^K^S ^A^R^E ^M^O^V^E^D ^T^O ^T^H^E ^N^E^A^R^E^S^T ^C^O^M^M^O^N ^A^N^C^E^S^T^O^R
      ^O^F ^A^L^L ^S^E^G^M^E^N^T^S ^T^H^A^T ^R^E^F^E^R^E^N^C^E ^T^H^E^M.  T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^O^F COMMON
      (^W^I^T^H^O^U^T ^P^A^R^A^M^E^T^E^R^S) ^C^A^U^S^E^S ^A^L^L ^L^A^B^E^L^E^D ^C^O^M^M^O^N ^B^L^O^C^K^S ^T^O ^B^E ^M^O^V^E^D.
.HELP,EPT,NOLIST

      F^O^R^M^A^T@D  EPT=^E^P^T^N^A^M^E1/.../^E^P^T^N^A^M^E^N
               NOEPT=^E^P^T^N^A^M^E1/.../^E^P^T^N^A^M^E^N

      P^R^O^V^I^D^E^S ^C^O^N^T^R^O^L ^O^V^E^R ^E^N^T^R^Y ^P^O^I^N^T^S ^O^F ^C^A^P^S^U^L^E^S, ^O^V^E^R^L^A^Y^S, ^A^N^D
      OVCAP^S.
.HELP,ERR,NOLIST

      F^O^R^M^A^T@D  ERR=^P3

      S^E^L^E^C^T^S ^O^N^E ^O^F ^T^H^R^E^E ^M^E^T^H^O^D^S ^O^F ^H^A^N^D^L^I^N^G ^L^O^A^D^E^R ^E^R^R^O^R^S.

         ^P3               M^E^A^N^I^N^G

         ALL      P^R^O^G^R^A^M ^A^B^O^R^T^E^D ^F^O^R ^F^A^T^A^L, ^N^O^N^F^A^T^A^L, ^A^N^D
                  ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.
         FATAL    P^R^O^G^R^A^M ^A^B^O^R^T^E^D ^F^O^R ^F^A^T^A^L ^A^N^D ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.
         NONE     O^N^L^Y ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S ^C^A^U^S^E ^J^O^B ^A^B^O^R^T^I^O^N.
.HELP,FILES,NOLIST

      F^O^R^M^A^T@D  FILES=^L^F^N1/.../^L^F^N^N
               STAT=^L^F^N1/.../^L^F^N^N

      P^E^R^M^I^T^S CYBER R^E^C^O^R^D M^A^N^A^G^E^R ^U^S^E^R^S ^T^O ^E^N^S^U^R^E ^T^H^A^T ^L^I^B^R^A^R^Y ^P^R^O^G^R^A^M^S
      ^A^R^E ^L^O^A^D^E^D ^F^O^R ^P^R^O^C^E^S^S^I^N^G ^O^F ^S^P^E^C^I^F^I^E^D ^F^I^L^E^S.
  .HELP,LIB,NOLIST

      F^O^R^M^A^T@D  LIB=^F^I^L^E1/.../^F^I^L^E^N

      S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^L^I^B^R^A^R^Y ^F^I^L^E^S ^I^N ^L^O^C^A^L ^L^I^B^R^A^R^Y ^S^E^T.  I^F
      ^F^I^L^E1/.../^F^I^L^E^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^C^L^E^A^R^S ^T^H^E ^L^O^C^A^L ^L^I^B^R^A^R^Y
      ^S^E^T.

  .HELP,MAP,NOLIST

      F^O^R^M^A^T@D  MAP=^P1/^L^F^N1
               MAP=/^L^F^N1
               MAP=^P1

      C^O^N^T^R^O^L^S ^G^E^N^E^R^A^T^I^O^N ^O^F ^T^H^E ^L^O^A^D ^M^A^P.  M^A^P ^I^S ^W^R^I^T^T^E^N ^T^O ^F^I^L^E
      ^L^F^N1.  M^A^P ^C^O^N^T^E^N^T ^I^S ^S^P^E^C^I^F^I^E^D ^B^Y ^P1.  I^F ^P1 ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^T^H^E ^V^A^L^U^E ^O^F ^P1 ^F^O^R ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.  I^F ^L^F^N1 ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.

        ^P1       M^E^A^N^I^N^G
        --       -------
        N        N^O ^M^A^P.
        S        S^T^A^T^I^S^T^I^C^S.
        B        B^L^O^C^K ^M^A^P.
        E        E^N^T^R^Y ^P^O^I^N^T ^M^A^P.
        X        E^N^T^R^Y ^P^O^I^N^T ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S.
.HELP,OMIT,NOLIST

      F^O^R^M^A^T@D  OMIT=^E^P^T^N^A^M^E1/.../^E^P^T^N^A^M^E^N

      D^I^R^E^C^T^S ^T^H^A^T ^S^P^E^C^I^F^I^E^D ^E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S ^A^R^E ^T^O ^R^E^M^A^I^N ^U^N^S^A^T^I^S^F^I^E^D,
      ^R^E^G^A^R^D^L^E^S^S ^O^F ^W^H^E^T^H^E^R ^T^H^E ^M^O^D^U^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E^S^E ^E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S
      ^I^S ^L^O^A^D^E^D.
.HELP,PD,NOLIST

      F^O^R^M^A^T@D  PD=^P

      S^E^T^S ^T^H^E ^P^R^I^N^T ^D^E^N^S^I^T^Y ^O^F ^T^H^E ^L^O^A^D ^M^A^P.  V^A^L^I^D ^D^E^N^S^I^T^I^E^S ^A^R^E 6 ^A^N^D 8
      ^L^I^N^E^S ^P^E^R ^I^N^C^H (^D^E^F^A^U^L^T ^S^E^T ^B^Y ^I^N^S^T^A^L^L^A^T^I^O^N).
.HELP,PRESET,NOLIST

      F^O^R^M^A^T@D  PRESET=^P2
               PRESETA=^P2

      S^P^E^C^I^F^I^E^S ^V^A^L^U^E^S ^F^O^R ^U^N^U^S^E^D ^M^E^M^O^R^Y ^P^R^I^O^R ^T^O ^E^X^E^C^U^T^I^O^N ^O^F ^L^O^A^D
      ^P^R^O^G^R^A^M.  F^O^R PRESETA, ^T^H^E ^L^O^W^E^R 17 ^B^I^T^S (CM) ^O^R ^L^O^W^E^R 24 ^B^I^T^S
      (^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y) ^O^F ^E^A^C^H ^W^O^R^D ^C^O^N^T^A^I^N ^I^T^S ^A^D^D^R^E^S^S.

        ^P2              O^C^T^A^L P^R^E^S^E^T V^A^L^U^E ^F^O^R PRESET

        NONE        N^O ^P^R^E^S^E^T ^F^O^R ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y; ^S^A^M^E ^A^S 0 ^F^O^R CM.
        ZERO        00...0
        ONES        77...7
        INDEF       177700...0
        INF         377700...0

        NGINDEF     600...0
        NGINF       400...0
        ALTZERO     2525...2525
        ALTONES     5252...5252
        DEBUG       600...040040...0

      F^O^R PRESETA=^P2@D

        ^P2             O^C^T^A^L P^R^E^S^E^T V^A^L^U^E ^F^O^R PRESETA

        NONE        N^O ^P^R^E^S^E^T ^F^O^R ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y; ^S^A^M^E ^A^S 0 ^F^O^R CM.
        ZERO        00...0^A^D^D^R
        ONES        77...7^A^D^D^R
        INDEF       177700...0^A^D^D^R
        INF         377700...0^A^D^D^R

        NGINDEF     600...0^A^D^D^R
        NGINF       400...0^A^D^D^R
        ALTZERO     2525...2525^A^D^D^R
        ALTONES     5252...5252^A^D^D^R
        DEBUG       600...04004^A^D^D^R
.HELP,PS,NOLIST

      F^O^R^M^A^T@D  PS=^P

      P^R^O^V^I^D^E^S ^C^O^N^T^R^O^L ^O^V^E^R ^T^H^E ^P^A^G^E ^S^I^Z^E ^O^F ^T^H^E ^L^O^A^D ^M^A^P.  ^P ^C^A^N ^R^A^N^G^E
      ^F^R^O^M 10 ^T^O 1,000,000 ^L^I^N^E^S ^P^E^R ^P^A^G^E (^D^E^F^A^U^L^T ^S^E^T ^B^Y ^I^N^S^T^A^L^L^A^T^I^O^N).

.HELP,REWIND,NOLIST

      F^O^R^M^A^T@D  REWIND
               NOREWIN

      A^L^T^E^R^S ^T^H^E ^D^E^F^A^U^L^T ^O^P^T^I^O^N ^F^O^R ^R^E^W^I^N^D^I^N^G ^F^I^L^E^S ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G.
.HELP,SUBST,NOLIST

      F^O^R^M^A^T@D  SUBST=^P^A^I^R1/.../^P^A^I^R^N

      C^H^A^N^G^E^S ^E^X^T^E^R^N^A^L ^R^E^F^E^R^E^N^C^E^S ^T^O ^E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S ^T^O ^O^T^H^E^R ^E^N^T^R^Y
      ^P^O^I^N^T ^N^A^M^E^S.  ^P^A^I^R ^I^S ^A ^P^A^I^R ^O^F ^E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S ^I^N ^T^H^E ^F^O^R^M
      ^E^P^T^N^A^M^E1-^E^P^T^N^A^M^E2.  A^S ^A ^R^E^S^U^L^T ^O^F SUBST, ^A ^R^E^F^E^R^E^N^C^E ^T^O ^E^P^T^N^A^M^E1
      ^B^E^C^O^M^E^S ^A ^R^E^F^E^R^E^N^C^E ^T^O ^E^P^T^N^A^M^E2.
.HELP,USE,NOLIST

      F^O^R^M^A^T@D  USE=^E^P^T^N^A^M^E1/.../^E^P^T^N^A^M^E^N

      F^O^R^C^E^S ^L^O^A^D^I^N^G ^O^F ^O^B^J^E^C^T ^M^O^D^U^L^E^S ^T^O ^E^N^S^U^R^E ^T^H^A^T ^S^P^E^C^I^F^I^E^D ^E^N^T^R^Y
      ^P^O^I^N^T^S ^A^R^E ^I^N^C^L^U^D^E^D ^I^N ^T^H^E ^L^O^A^D.
.HELP,USEP,NOLIST

      F^O^R^M^A^T@D  USEP=^P^N^A^M^E1/.../^P^N^A^M^E^N

      C^A^U^S^E^S ^I^N^D^I^C^A^T^E^D ^O^B^J^E^C^T ^M^O^D^U^L^E^S ^T^O ^B^E ^L^O^A^D^E^D ^R^E^G^A^R^D^L^E^S^S ^O^F ^W^H^E^T^H^E^R
      ^O^R ^N^O^T ^T^H^E^Y ^A^R^E ^N^E^E^D^E^D ^T^O ^S^A^T^I^S^F^Y ^E^X^T^E^R^N^A^L ^R^E^F^E^R^E^N^C^E^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LENGTH*I
,LFN[S^T^A^T^U^S ^O^F ^W^H^I^C^H ^F^I^L^E]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LENGTH,^L^F^N.

      T^H^E LENGTH ^C^O^M^M^A^N^D ^G^I^V^E^S ^T^H^E ^C^U^R^R^E^N^T ^S^T^A^T^U^S ^O^F ^O^N^E ^O^F ^Y^O^U^R ^L^O^C^A^L
      ^F^I^L^E^S.
.HELP,LFN

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^A ^L^O^C^A^L ^F^I^L^E ^F^O^R ^W^H^I^C^H ^Y^O^U ^W^O^U^L^D ^L^I^K^E ^A ^S^T^A^T^U^S
      ^R^E^P^O^R^T.  T^H^E ^I^N^F^O^R^M^A^T^I^O^N ^G^I^V^E^N ^F^O^R ^T^H^E ^L^O^C^A^L ^F^I^L^E ^I^N^C^L^U^D^E^S ^I^T^S ^L^E^N^G^T^H
      ^I^N PRU^S, ^T^Y^P^E, ^A^N^D ^C^U^R^R^E^N^T ^S^T^A^T^U^S.  T^H^E ^S^A^M^E ^I^N^F^O^R^M^A^T^I^O^N ^C^A^N ^B^E
      ^O^B^T^A^I^N^E^D ^W^I^T^H ^T^H^E ENQUIRE ^C^O^M^M^A^N^D.

.ENDHELP
.EX.  $LENGTH(LFN)
*WEOR
.PROC,LIB*I
,LFN[L^O^C^A^L ^T^O P^E^R^M^A^N^E^N^T F^I^L^E]=(*A1,*N)
,PW[P^A^S^S^W^O^R^D (PW)]=(*A1,*N)
,PN[A^U^X^I^L^I^A^R^Y D^E^V^I^C^E (PN)]=(*A1,*N)
,R[D^E^V^I^C^E T^Y^P^E (R)]=(R=R,*A1,*N)
,NA[N^O-A^B^O^R^T O^P^T^I^O^N (NA)]=(*A1,*N)
,ND[N^O-D^R^O^P O^P^T^I^O^N (ND)]=(*A1,*N)
,WB[W^A^I^T-^I^F-^B^U^S^Y (WB)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIB,^L^F^N=^P^F^N/PW=^P^A^S^S^W^O^R^D,PN=^P^A^C^K^N^A^M^E,R=^R,NA,ND,WB.

      T^H^E LIB ^C^O^M^M^A^N^D ^R^E^T^R^I^E^V^E^S ^A ^C^O^P^Y ^O^F ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^F^R^O^M ^T^H^E ^C^A^T^A^L^O^G ^O^F ^S^P^E^C^I^A^L ^U^S^E^R ^N^A^M^E LIBRARY ^A^N^D ^M^A^K^E^S ^I^T ^T^H^E
      ^P^R^I^M^A^R^Y ^F^I^L^E.
.HELP,LFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N=^P^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^L^F^N ^G^I^V^E^N ^T^H^E
      ^R^E^T^R^I^E^V^E^D ^C^O^P^Y ^O^F ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^P^F^N.  I^F ^L^F^N= ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^L^O^C^A^L ^C^O^P^Y ^I^S ^C^A^L^L^E^D ^P^F^N.
.HELP,PW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PW=^P^A^S^S^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^S^S^W^O^R^D ^N^E^E^D^E^D ^T^O ^R^E^T^R^I^E^V^E
      ^F^I^L^E ^P^F^N ^I^F ^O^N^E ^E^X^I^S^T^S.
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN=^P^A^C^K^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^O^N ^W^H^I^C^H ^P^F^N
      ^R^E^S^I^D^E^S ^I^F ^P^F^N ^R^E^S^I^D^E^S ^O^N ^O^N^E.
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^O^F ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E
      ^O^N ^W^H^I^C^H ^P^F^N ^R^E^S^I^D^E^S, ^O^N^L^Y ^I^F ^D^I^F^F^E^R^E^N^T ^F^R^O^M ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D
      ^D^E^F^A^U^L^T.
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O-^A^B^O^R^T ^O^P^T^I^O^N.  LIB ^P^R^O^C^E^S^S^I^N^G
      ^E^R^R^O^R^S ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.  T^H^E ^J^O^B ^W^A^I^T^S ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F
      ^D^I^S^K ^P^A^C^K^S.
.HELP,ND,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ND ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O-^D^R^O^P ^O^P^T^I^O^N.  L^O^C^A^L ^F^I^L^E^S ^A^R^E ^N^O^T
      ^R^E^L^E^A^S^E^D.
.HELP,WB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R WB ^S^P^E^C^I^F^I^E^S ^T^H^E ^W^A^I^T-^I^F-^B^U^S^Y ^O^P^T^I^O^N.  T^H^E ^J^O^B ^W^A^I^T^S ^F^O^R
      ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K ^P^A^C^K^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LIBEDIT*I
/P[O^L^D ^F^I^L^E]=(*F,*N=)
,N[N^E^W ^F^I^L^E]=(*F,*N=)
,I[D^I^R^E^C^T^I^V^E ^I^N^P^U^T ^F^I^L^E]=(*F,*N=INPUT)
,B[R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E]=(*F,0,*N=LGO)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,0,*N=OUTPUT)
,LO[L^I^S^T ^O^P^T^I^O^N^S]=(*S3(ECMNF),*N=)
,V[C^A^L^L VFYLIB ^A^F^T^E^R ^P^R^O^C^E^S^S^I^N^G]=(*K=$,V$,YES=$,V$,Y=$,V$,NO=,N=,*N=)
,U[N^A^M^E ^F^O^R ^N^E^W ULIB ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D]=(*K=$,U$,*F,*N=)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,C[C^O^P^Y ^N^E^W ^O^V^E^R ^O^L^D ^F^I^L^E]=(*K=$,C$,YES=$,C$,Y=$,C$,N=,NO=,*N=)
,D[I^G^N^O^R^E ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S]=(*K=$,D$,YES=$,D$,Y=$,D$,NO=,N=,*N=)
,NA[A^B^O^R^T ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,NX[I^N^C^L^U^D^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E]=(*K=0,*S1(0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ),
                                YES=0,Y=0,NO=1,N=1,*N=0)
,NI[I^N^S^E^R^T ^U^N^R^E^P^L^A^C^E^A^B^L^E ^R^E^C^O^R^D^S]=(YES=,Y=,NO=$,NI$,N=$,NI$,*K=$,NI$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIBEDIT,P=^L^F^N1,N=^L^F^N2,I=^L^F^N3,B=^L^F^N4,L=^L^F^N5,LO=^L^I^S^T^O^P^T,V,
                  U=^R^E^C^O^R^D,NR,C,NA,NX,NI,Z.^D^I^R^E^C^T^I^V^E^S.

      T^H^E LIBEDIT ^C^O^M^M^A^N^D ^I^S ^A ^G^E^N^E^R^A^L ^P^U^R^P^O^S^E ^F^I^L^E ^M^A^N^A^G^E^R ^U^T^I^L^I^T^Y.

      N^O^T^E@D T^H^E Z.^D^I^R^E^C^T^I^V^E ^O^P^T^I^O^N, ^W^H^I^C^H ^T^E^L^L^S LIBEDIT ^T^O ^T^A^K^E ^T^H^E
            ^E^D^I^T^I^N^G ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^T^H^E ^C^O^M^M^A^N^D ^L^I^N^E, ^I^S ^N^O^T ^S^U^P^P^O^R^T^E^D
            ^B^Y HELPME.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (P=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D (^A ^F^I^L^E ^N^A^M^E ^M^A^Y
      ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I^F ^Y^O^U ^S^P^E^C^I^F^Y P=0, ^T^H^E
      ^S^Y^S^T^E^M ^C^R^E^A^T^E^S ^T^H^E ^N^E^W ^F^I^L^E (N=^L^F^N2) ^F^R^O^M ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E (B=^L^F^N4).

      D^E^F^A^U^L^T@D F^I^L^E OLD.
.HELP,N,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (N=^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^N^E^W ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E
      ^M^A^Y ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^I^L^E NEW.
.HELP,I,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (I=^L^F^N3) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^T^H^E ^D^I^R^E^C^T^I^V^E^S.
      LIBEDIT ^T^A^K^E^S ^T^H^E ^N^E^W ^E^D^I^T^I^N^G ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^T^H^E ^N^E^X^T ^R^E^C^O^R^D ^O^F ^T^H^I^S
      ^F^I^L^E (I=^L^F^N3).  E^N^T^E^R ^T^H^E ^D^I^R^E^C^T^I^V^E ^F^I^L^E ^N^A^M^E (^A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I=0 (^Z^E^R^O) ^T^H^I^S ^I^N^D^I^C^A^T^E^S
      ^T^H^A^T ^T^H^E^R^E ^A^R^E ^N^O ^D^I^R^E^C^T^I^V^E^S.

      D^E^F^A^U^L^T@D F^I^L^E INPUT.
.HELP,B,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (B=^L^F^N4) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^T^H^E ^R^E^C^O^R^D^S
      ^F^O^R ^I^N^S^E^R^T^I^O^N^S ^A^N^D ^R^E^P^L^A^C^E^M^E^N^T^S.  T^O ^I^N^D^I^C^A^T^E ^T^H^A^T ^T^H^E^R^E ^I^S ^N^O
      ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E, ^E^N^T^E^R B=0 (^Z^E^R^O).

      D^E^F^A^U^L^T@D LGO
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N5) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^O^U^T^P^U^T.
      T^O ^I^N^D^I^C^A^T^E ^T^H^A^T ^T^H^E^R^E ^I^S ^N^O ^O^U^T^P^U^T, ^E^N^T^E^R L=0 (^Z^E^R^O).

      D^E^F^A^U^L^T@D OUTPUT
.HELP,V,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (V) ^D^I^R^E^C^T^S LIBEDIT ^T^O ^V^E^R^I^F^Y ^T^H^E ^N^E^W ^F^I^L^E ^L^F^N2 ^A^G^A^I^N^S^T
      ^T^H^E ^O^L^D ^F^I^L^E ^L^F^N1 ^B^Y ^C^A^L^L^I^N^G VFYLIB ^A^F^T^E^R LIBEDIT ^P^R^O^C^E^S^S^I^N^G.  E^N^T^E^R V
      ^T^O ^V^E^R^I^F^Y ^L^F^N2 ^A^G^A^I^N^S^T ^L^F^N1; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  (T^H^E U ^P^A^R^A^M^E^T^E^R ^O^V^E^R^R^I^D^E^S
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R.)

      D^E^F^A^U^L^T@D N^O ^C^A^L^L ^T^O VFYLIB.
.HELP,NR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NR) ^S^P^E^C^I^F^I^E^S ^N^O ^R^E^W^I^N^D ^O^F ^T^H^E ^O^L^D ^O^R ^N^E^W ^F^I^L^E^S
      ^B^E^F^O^R^E ^O^R ^A^F^T^E^R LIBEDIT ^P^R^O^C^E^S^S^I^N^G.  E^N^T^E^R NR ^T^O ^S^P^E^C^I^F^Y ^N^O ^R^E^W^I^N^D.

      D^E^F^A^U^L^T@D F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D.
.HELP,C,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (C) ^D^I^R^E^C^T^S LIBEDIT ^T^O ^C^O^P^Y ^T^H^E ^N^E^W ^F^I^L^E (^L^F^N2) ^O^V^E^R
      ^T^H^E ^O^L^D ^F^I^L^E (^L^F^N1) ^A^F^T^E^R LIBEDIT ^P^R^O^C^E^S^S^I^N^G.  E^N^T^E^R C ^T^O ^D^I^R^E^C^T
      ^C^O^P^Y^I^N^G ^L^F^N2 ^O^V^E^R ^L^F^N1; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D C^O^P^Y^I^N^G ^O^F ^L^F^N2 ^O^V^E^R ^L^F^N1 ^D^O^E^S ^N^O^T ^O^C^C^U^R.
.HELP,D,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (D) ^P^R^E^V^E^N^T^S LIBEDIT ^F^R^O^M ^A^B^O^R^T^I^N^G ^O^N ^E^R^R^O^R^S.  E^N^T^E^R
      D ^T^O ^P^R^E^V^E^N^T ^A^B^O^R^T^I^N^G ^O^N ^E^R^R^O^R^S; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D  LIBEDIT ^A^B^O^R^T^S ^O^N ^E^R^R^O^R^S.
.HELP,NI,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NI) ^D^I^S^A^B^L^E^S ^T^H^E ^A^U^T^O^M^A^T^I^C ^I^N^S^E^R^T^I^O^N ^O^F ^U^N^R^E^P^L^A^C^E^A^B^L^E
      ^R^E^C^O^R^D^S ^A^T EOF ^O^F ^T^H^E ^N^E^W ^F^I^L^E. E^N^T^E^R NI ^T^O ^D^I^S^A^B^L^E ^A^U^T^O^M^A^T^I^C
      ^I^N^S^E^R^T^I^O^N; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D U^N^R^E^P^L^A^C^E^A^B^L^E ^R^E^C^O^R^D^S ^A^R^E ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^I^N^S^E^R^T^E^D
               ^A^T EOF ^O^F ^T^H^E ^N^E^W ^F^I^L^E.
.HELP,LO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (LO=^L^I^S^T^O^P^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T ^O^P^T^I^O^N^S, ^W^H^I^C^H ^M^A^Y
      ^B^E ^C^O^M^B^I^N^E^D (^F^O^R ^E^X^A^M^P^L^E, CM ^O^R CE).  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ^L^I^S^T^O^P^T                     M^E^A^N^I^N^G
      -------                     -------
      C       L^I^S^T ^D^I^R^E^C^T^I^V^E^S.
      M       L^I^S^T ^M^O^D^I^F^I^C^A^T^I^O^N^S.
      N       L^I^S^T ^R^E^C^O^R^D^S ^W^R^I^T^T^E^N ^T^O ^N^E^W ^F^I^L^E.
      F       F^U^L^L ^L^I^S^T (^E^R^R^O^R^S, ^D^I^R^E^C^T^I^V^E^S, ^M^O^D^I^F^I^C^A^T^I^O^N^S, ^A^N^D ^R^E^C^O^R^D^S)
      E       L^I^S^T ^O^N^L^Y ^E^R^R^O^R^S.

      D^E^F^A^U^L^T@D LO=EM ^F^O^R ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S, LO=F ^F^O^R ^A^L^L ^O^T^H^E^R ^J^O^B^S.
.HELP,U,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (U=^R^E^C^O^R^D) ^R^E^Q^U^I^R^E^S ^T^H^E ^O^L^D ^F^I^L^E ^L^F^N1 ^T^O ^B^E ^A ^U^S^E^R
      ^L^I^B^R^A^R^Y, ^A^D^D^S ^A^N^Y ^N^E^W ^B^I^N^A^R^I^E^S ^F^R^O^M ^T^H^E ^R^E^P^L^A^C^E^M^E^N^T ^F^I^L^E ^L^F^N4 ^T^O
      ^T^H^E ^N^E^W ^F^I^L^E ^L^F^N2, ^A^N^D ^M^A^K^E^S ^T^H^E ^N^E^W ^F^I^L^E ^A ^U^S^E^R ^L^I^B^R^A^R^Y ^B^Y ^C^A^L^L^I^N^G
      LIBGEN.  E^N^T^E^R ^A ^V^A^L^U^E ^F^O^R ^R^E^C^O^R^D (1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S);
      ^T^H^I^S ^V^A^L^U^E ^B^E^C^O^M^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^D^I^R^E^C^T^O^R^Y ^R^E^C^O^R^D ^O^F
      ^T^H^E ^N^E^W ^U^S^E^R ^L^I^B^R^A^R^Y ^F^I^L^E ^G^E^N^E^R^A^T^E^D ^B^Y LIBGEN.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^E^N^T^E^R U ^O^R ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^O^M^P^L^E^T^E^L^Y, ^T^H^E
               ^D^E^F^A^U^L^T ^R^E^C^O^R^D ^N^A^M^E ^I^S ULIB.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^P^R^E^V^E^N^T^S ^A^B^O^R^T ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S.  E^N^T^E^R NA
      ^T^O ^P^R^E^V^E^N^T ^A^B^O^R^T ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D LIBEDIT ^A^B^O^R^T^S ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S.
.HELP,NX,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NX=^N) ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S
      ^A^R^E ^I^N^C^L^U^D^E^D ^I^N ^T^H^E ^L^I^B^R^A^R^Y ^D^I^R^E^C^T^O^R^Y ^O^F ^T^H^E ^N^E^W ^U^S^E^R ^L^I^B^R^A^R^Y.
      E^N^T^E^R NX=0 (^Z^E^R^O) ^T^O ^I^N^C^L^U^D^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S, ^O^R ^A ^N^O^N-^Z^E^R^O ^C^H^A^R^A^C^T^E^R
      ^T^O ^N^O^T ^I^N^C^L^U^D^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^N^E^E^D^E^D ^O^N^L^Y ^I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^T^H^E U ^P^A^R^A^M^E^T^E^R ^O^R, ^F^R^O^M ^O^U^T^S^I^D^E ^O^F HELPME ^I^N ^C^O^M^M^A^N^D ^M^O^D^E, ^T^H^E
      *LIBGEN ^D^I^R^E^C^T^I^V^E.

      D^E^F^A^U^L^T@D NX=0 (^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S ^A^R^E ^I^N^C^L^U^D^E^D).
.ENDHELP
.IF($U$.NE.$$.AND.$U$.NE.$,#U$,L1)
.EX.  $LIBEDIT(#P=P,#N=N,#I=I,#B=B,#L=L,#LO=LO,#NX=NX,#U=U_V_NR_C_D_NA_NI)
.ELSE(L1)
.EX.  $LIBEDIT(#P=P,#N=N,#I=I,#B=B,#L=L,#LO=LO,#NX=NX_V_NR_C_D_U_NA_NI)
.ENDIF(L1)
*WEOR
.PROC,LIBGEN*I
,F [D^A^T^A ^I^N^P^U^T ^F^I^L^E]=(*F,*K=LGO,*N=LGO)
,P [N^E^W ^L^I^B^R^A^R^Y ^F^I^L^E]=(*F,*K=ULIB,*N=ULIB)
,N [N^A^M^E ^E^N^T^E^R^E^D ^I^N^T^O ULIB]=(*F,*K=,*N=)
,NX[I^N^C^L^U^D^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E]=(*S1(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=0,
                                 YES=0,Y=0,NO=N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIBGEN,F=^L^F^N1,P=^L^F^N2,N=^N^A^M^E,NX=^N.

      T^H^E LIBGEN ^C^O^M^M^A^N^D ^G^E^N^E^R^A^T^E^S ^A ^U^S^E^R ^L^I^B^R^A^R^Y ^O^F ^P^R^O^G^R^A^M^S ^A^N^D ^P^R^O^C^E^D^U^R^E^S.
.HELP,F,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (F=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^O^U^R^C^E ^F^I^L^E ^F^O^R ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y. I^T
      ^M^A^Y ^C^O^N^T^A^I^N ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^R^E^C^O^R^D ^T^Y^P^E^S@D ^A^B^S^O^L^U^T^E (ABS), ^O^V^E^R^L^A^Y
      (OVL), ^P^R^O^C^E^D^U^R^E (PROC), ^R^E^L^O^C^A^T^A^B^L^E (REL), ^O^R ^C^A^P^S^U^L^E (CAP).  O^T^H^E^R
      ^R^E^C^O^R^D ^T^Y^P^E^S ^A^R^E ^I^G^N^O^R^E^D.

      D^E^F^A^U^L^T@D F^I^L^E LGO
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (P=^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^I^S
      ^T^O ^B^E ^W^R^I^T^T^E^N.

      D^E^F^A^U^L^T@D F^I^L^E ULIB.
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (N=^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^G^E^N^E^R^A^T^E^D
      (^T^H^E ^N^A^M^E ^I^S ^E^N^T^E^R^E^D ^I^N ULIB ^A^N^D OPLD ^R^E^C^O^R^D^S).

      D^E^F^A^U^L^T@D T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^N^A^M^E ^W^I^L^L ^B^E ^T^H^E ^S^A^M^E ^A^S ^T^H^E ^F^I^L^E ^N^A^M^E ^O^N
               ^W^H^I^C^H ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^I^S ^W^R^I^T^T^E^N (^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E ^P^R^E^V^I^O^U^S
               ^P^A^R^A^M^E^T^E^R, P=^L^F^N2).
.HELP,NX,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NX=^N) ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S ^A^R^E ^I^N^C^L^U^D^E^D ^I^N
      ^T^H^E ULIB ^D^I^R^E^C^T^O^R^Y.  I^F ^N ^I^S ^N^O^T ^Z^E^R^O (NX=N), ^N^O ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S ^A^R^E
      ^I^N^C^L^U^D^E^D ^I^N ^T^H^E ULIB ^D^I^R^E^C^T^O^R^Y; ^I^F ^N ^I^S ^Z^E^R^O (NX=0), ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S
      ^A^R^E ^I^N^C^L^U^D^E^D.

      D^E^F^A^U^L^T@D NX=0 (^C^R^O^S^S-^R^E^F^E^R^E^N^C^E^S ^A^R^E ^I^N^C^L^U^D^E^D).
.ENDHELP
.EX.  $LIBGEN(#F=F,#P=P,#N=N,#NX=NX)
*WEOR
.PROC,LIBLOAD*I
,LIBNAME[L^I^B^R^A^R^Y ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^O^B^J^E^C^T ^M^O^D^U^L^E^S]=(*F,*N=)
,EPTNAME[E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S]=(*A40,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIBLOAD,^L^I^B^N^A^M^E,^E^P^T^N^A^M^E1,^E^P^T^N^A^M^E2,...,^E^P^T^N^A^M^E^N.

      T^H^E LIBLOAD ^C^O^M^M^A^N^D ^L^O^A^D^S ^M^O^D^U^L^E^S ^F^R^O^M ^A ^L^I^B^R^A^R^Y.
.HELP,LIBNAME,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^I^B^R^A^R^Y ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^O^B^J^E^C^T ^M^O^D^U^L^E^S ^T^O
      ^B^E ^L^O^A^D^E^D.
.HELP,EPTNAME,NOLIST

      S^P^E^C^I^F^Y ^E^N^T^R^Y ^P^O^I^N^T ^N^A^M^E^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LIBRARY*I
,LIBNAME[L^I^B^R^A^R^Y ^T^O ^B^E ^S^E^A^R^C^H^E^D]=(*F)
/P[A^D^D, ^D^E^L^E^T^E, ^O^R ^R^E^P^L^A^C^E ^L^I^B^R^A^R^Y]=(A,D,R,*N=R)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIBRARY,^L^I^B^N^A^M^E1,...,^L^I^B^N^A^M^E^N/^D^I^R^E^C^T^I^V^E.
               LIBRARY.

      T^H^E LIBRARY ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^A ^S^E^T ^O^F ^G^L^O^B^A^L ^L^I^B^R^A^R^I^E^S ^T^H^A^T ^A^R^E ^T^O
      ^B^E ^S^E^A^R^C^H^E^D ^F^O^R ^E^X^T^E^R^N^A^L^S ^A^N^D ^N^A^M^E ^C^A^L^L ^S^T^A^T^E^M^E^N^T^S.  I^T ^A^L^S^O
      ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^R^D^E^R ^I^N ^W^H^I^C^H ^T^H^E ^L^I^B^R^A^R^I^E^S ^A^R^E ^S^E^A^R^C^H^E^D.  S^P^E^C^I^F^Y^I^N^G
      ^T^H^E LIBRARY ^S^T^A^T^E^M^E^N^T ^W^I^T^H ^N^O ^P^A^R^A^M^E^T^E^R^S ^C^L^E^A^R^S ^T^H^E ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T.

.HELP,LIBNAME,NOLIST

      E^N^T^E^R ^T^H^E ^L^I^B^R^A^R^Y ^F^I^L^E ^N^A^M^E(^S).

      D^E^F^A^U^L^T@D  F^R^O^M HELPME, ^O^N^L^Y ^O^N^E ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^E^N^T^E^R^E^D.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^D^I^R^E^C^T^I^V^E) ^S^P^E^C^I^F^I^E^S ^I^F ^F^I^L^E1,^F^I^L^E2,...^F^I^L^E^N ^A^R^E
      ^T^O ^B^E ^A^D^D^E^D ^T^O, ^D^E^L^E^T^E^D ^F^R^O^M, ^O^R ^T^O ^R^E^P^L^A^C^E ^T^H^E ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T.

      ^D^I^R^E^C^T^I^V^E                   D^E^S^C^R^I^P^T^I^O^N
      ---------                   -----------

        A     A^D^D ^T^H^E ^S^P^E^C^I^F^I^E^D ^L^I^B^R^A^R^Y ^O^R ^L^I^B^R^A^R^I^E^S ^T^O ^T^H^E ^G^L^O^B^A^L
              ^L^I^B^R^A^R^Y ^S^E^T

        D     D^E^L^E^T^E ^T^H^E ^S^P^E^C^I^F^I^E^D ^L^I^B^R^A^R^Y ^O^R ^L^I^B^R^A^R^I^E^S ^F^R^O^M ^T^H^E
              ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T.

        R     R^E^P^L^A^C^E ^T^H^E ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T ^W^I^T^H ^T^H^E ^L^I^B^R^A^R^Y ^S^E^T
              ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D I^F ^T^H^E ^D^I^R^E^C^T^I^V^E ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S R.
.ENDHELP
.EX. $LIBRARY(LIBNAME/P)
*WEOR
.PROC,LIMITS*I
,L[F^I^L^E ^T^O ^R^E^C^E^I^V^E LIMITS ^O^U^T^P^U^T]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIMITS,L=^L^F^N.

      T^H^E LIMITS ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^L^I^S^T ^Y^O^U^R ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T^S.
      I^T ^A^L^W^A^Y^S ^L^I^S^T^S ^T^H^E ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^J^O^B'^S
      ^C^U^R^R^E^N^T ^U^S^E^R ^N^A^M^E.
.HELP,L,NOLIST

      T^H^I^S ^I^S ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^V^A^L^I^D^A^T^I^O^N ^I^N^F^O^R^M^A^T^I^O^N ^P^R^O^D^U^C^E^D
      ^B^Y ^T^H^E LIMITS ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.ENDHELP
.EX.  $LIMITS(#L=L)
*WEOR
.PROC,LINE*I
,TM[T^E^R^M^I^N^A^L M^O^D^E^L]=(721,721V3,722,72230,3270,VT100,Z19,ADM3A,ADM5,T4115,
                  721T,721V3T,722T,72230T,VT100T,Z19T,ADM3AT,ADM5T,T4115T,
                  TV924,TV924T,TV950,TV950T,TV955,TV955T,
                  *S6(0123456789PCON),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LINE,TM=^M^O^D^E^L.
               LINE,^M^O^D^E^L.

      T^H^E LINE ^C^O^M^M^A^N^D ^S^E^T^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^N ^L^I^N^E ^M^O^D^E (^A^S ^O^P^P^O^S^E^D ^T^O
      ^F^U^L^L ^S^C^R^E^E^N ^M^O^D^E).  I^T ^A^L^S^O ^I^D^E^N^T^I^F^I^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^M^O^D^E^L ^T^O ^T^H^E
      ^S^Y^S^T^E^M.
.HELP,TM,NOLIST
      E^N^T^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L.  F^O^R ^M^O^S^T ^O^F ^T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L^S ^L^I^S^T^E^D
      ^B^E^L^O^W, ^A ^T^Y^P^E-^A^H^E^A^D ^V^E^R^S^I^O^N ^I^S ^A^V^A^I^L^A^B^L^E.  T^Y^P^E-^A^H^E^A^D ^A^L^L^O^W^S ^Y^O^U
      ^T^O ^S^T^R^I^K^E ^F^U^N^C^T^I^O^N ^K^E^Y^S ^R^A^P^I^D^L^Y, ^W^I^T^H^O^U^T ^H^A^V^I^N^G ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^F^I^R^S^T
      ^F^U^N^C^T^I^O^N ^K^E^Y ^T^O ^B^E ^E^X^E^C^U^T^E^D ^B^E^F^O^R^E ^P^R^E^S^S^I^N^G ^A^N^O^T^H^E^R ^F^U^N^C^T^I^O^N ^K^E^Y.
      Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^T^H^E ^M^O^D^E^L ^O^R ^T^H^E ^M^O^D^E^L ^W^I^T^H ^T^Y^P^E-^A^H^E^A^D.

                M^O^D^E^L ^W^I^T^H
      M^O^D^E^L     T^Y^P^E-^A^H^E^A^D                 D^E^S^C^R^I^P^T^I^O^N
      -----     ----------                 -----------

      ADM3A     ADM3AT              L^E^A^R S^I^E^G^L^E^R ADM3A ^T^E^R^M^I^N^A^L.
      ADM5      ADM5T               L^E^A^R S^I^E^G^L^E^R ADM5 ^T^E^R^M^I^N^A^L.
      PCON^X^X    ^N^O^N^E                IBM PC ^W^I^T^H CDC CONNECT (^F^O^R ^X^X, ^E^N^T^E^R
                                    ^Y^O^U^R ^C^U^R^R^E^N^T ^R^E^L^E^A^S^E ^L^E^V^E^L ^O^F CDC CONNECT).
      T4115     T4115T              T^E^K^T^R^O^N^I^X 4115 ^T^E^R^M^I^N^A^L.
      VT100     VT100T              DEC VT100 ^T^E^R^M^I^N^A^L.
      Z19       Z19T                Z^E^N^I^T^H Z19 ^O^R Z29 ^T^E^R^M^I^N^A^L.
      3270      ^N^O^N^E                IBM 3270 ^T^E^R^M^I^N^A^L.
      721       721T                CDC 721 ^T^E^R^M^I^N^A^L.
      721V3     721V3T              CDC 721 ^T^E^R^M^I^N^A^L V^E^R^S^I^O^N 3.
      722       722T                CDC 722 ^T^E^R^M^I^N^A^L.
      72230     72230T              CDC 722-30 ^T^E^R^M^I^N^A^L.
      TV924     TV924T              T^E^L^E^V^I^D^E^O 924 ^T^E^R^M^I^N^A^L.
      TV950     TV950T              T^E^L^E^V^I^D^E^O 950 ^T^E^R^M^I^N^A^L.
      TV955     TV955T              T^E^L^E^V^I^D^E^O 955 ^T^E^R^M^I^N^A^L.

      D^E^F^A^U^L^T@D T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L ^I^S ^L^E^F^T ^U^N^C^H^A^N^G^E^D.
.ENDHELP
.IF($TM$.EQ.$$,L1)
.EX.  $LINE.
.ELSE(L1)
.EX.  $LINE,TM.
.ENDIF(L1)
*WEOR
.PROC,LIST*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIST,F=^L^F^N.

      T^H^E LIST ^C^O^M^M^A^N^D ^L^I^S^T^S ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^A ^L^O^C^A^L ^F^I^L^E.

      T^H^E ^P^A^R^A^M^E^T^E^R F=^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^L^I^S^T^E^D.  T^H^E
      ^D^E^F^A^U^L^T ^I^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LISTLB*I
,FN[T^A^P^E ^F^I^L^E ^N^A^M^E]=(*F,*N=TAPE)
,SI[F^I^L^E ^S^E^T ^I^D^E^N^T^I^F^I^E^R (SI ^O^R M)]=(*S6(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,QN[F^I^L^E ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R (QN ^O^R P)]=(*S4(0123456789),*N=)
,LO[L^A^B^E^L ^T^Y^P^E^S]=(*S8(AROVHFEU),*N=R)
,L [O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LISTLB,^L^F^N,^0SI=^S^E^T^I^D ^O^R M=^S^E^T^I^D^2,^0QN=^S^E^Q^N^O ^O^R P=^S^E^Q^N^O^2,LO=^L^T^Y^P^E,
                  L=^O^U^T.

      T^H^E LISTLB ^C^O^M^M^A^N^D ^L^I^S^T^S ^T^H^E ^L^A^B^E^L^S ^O^F ^A^N ANSI-^L^A^B^E^L^E^D ^T^A^P^E ^F^I^L^E.
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^N^A^M^E ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ANSI-^L^A^B^E^L^E^D
      ^T^A^P^E ^F^I^L^E ^W^H^O^S^E ^L^A^B^E^L^S ^A^R^E ^T^O ^B^E ^L^I^S^T^E^D. A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E TAPE
.HELP,SI,NOLIST

      I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R (SI=^S^E^T^I^D ^O^R M=^S^E^T^I^D) ^I^S ^S^P^E^C^I^F^I^E^D, ^O^N^L^Y ^L^A^B^E^L ^G^R^O^U^P^S
      ^W^I^T^H ^A^N HDR1 ^L^A^B^E^L ^O^F ^T^H^I^S ^V^A^L^U^E ^A^R^E ^L^I^S^T^E^D.  E^N^T^E^R ^T^H^E ^F^I^L^E ^S^E^T
      ^I^D^E^N^T^I^F^I^E^R, 1- ^T^O 6-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  (T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^O^P^T^I^O^N^A^L.)
.HELP,QN,NOLIST

      I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R (QN=^S^E^Q^N^O ^O^R P=^S^E^Q^N^O) ^I^S ^S^P^E^C^I^F^I^E^D, ^O^N^L^Y ^T^H^E ^L^A^B^E^L ^G^R^O^U^P
      ^W^I^T^H ^A^N HDR1 ^L^A^B^E^L ^O^F ^T^H^I^S ^V^A^L^U^E ^I^S ^L^I^S^T^E^D.  E^N^T^E^R ^T^H^E ^F^I^L^E ^S^E^Q^U^E^N^C^E
      ^N^U^M^B^E^R (1- ^T^O 4-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  T^H^E ^F^I^L^E ^S^E^T ^I^D^E^N^T^I^F^I^E^R
      (SI=^S^E^T^I^D) ^M^U^S^T ^A^L^S^O ^B^E ^S^P^E^C^I^F^I^E^D; ^O^T^H^E^R^W^I^S^E, LISTLB ^T^E^R^M^I^N^A^T^E^S.  (T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L.)
.HELP,LO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (LO=^L^T^Y^P^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^B^E^L ^T^Y^P^E^S ^T^O ^B^E ^L^I^S^T^E^D.
      C^O^M^B^I^N^A^T^I^O^N^S ^O^F ^T^H^E^S^E ^V^A^L^U^E^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D (^F^O^R ^E^X^A^M^P^L^E, LO=VH).
      I^F LO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S R.

      ^L^O      M^E^A^N^I^N^G
      --      -------

      A    L^I^S^T ^A^L^L ^L^A^B^E^L^S.
      R    L^I^S^T ^R^E^Q^U^I^R^E^D ^L^A^B^E^L^S.
      O    L^I^S^T ^O^P^T^I^O^N^A^L ^L^A^B^E^L^S.
      V    L^I^S^T VOL^N ^L^A^B^L^E^S.
      H    L^I^S^T HDR^N ^L^A^B^L^E^S.
      F    L^I^S^T EOF^N ^L^A^B^L^E^S.
      E    L^I^S^T EOV^S ^L^A^B^L^E^S.
      U    L^I^S^T UVL^N, UHL^N, ^A^N^D UTL^N ^L^A^B^L^E^S.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^O^U^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^L^A^B^E^L^S ^A^R^E ^T^O ^B^E
      ^L^I^S^T^E^D.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT.
.ENDHELP
.EX. $LISTLB(FN,#SI=SI,#QN=QN,#LO=LO,#L=L)
*WEOR
.PROC,LISTLID*I
,LID[E^N^T^E^R ^M^A^I^N^F^R^A^M^E LID]=(*N=,*S3/AD)
,PID[E^N^T^E^R ^M^A^I^N^F^R^A^M^E PID]=(*N=,*S3/AD)
,L[F^I^L^E ^T^O ^R^E^C^E^I^V^E LISTLID ^O^U^T^P^U^T]=(*F,*N=OUTPUT)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D LISTLID,^0LID=^L^I^D ^O^R ST=^L^I^D^2,PID=^P^I^D,L=^L^F^N.

      T^H^E LISTLID ^C^O^M^M^A^N^D ^L^I^S^T^S ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^T^H^E ^C^O^N^F^I^G^U^R^A^T^I^O^N
      ^O^F ^Y^O^U^R ^N^E^T^W^O^R^K ^A^N^D ^O^N ^T^H^E ^A^V^A^I^L^A^B^I^L^I^T^Y ^O^F ^M^A^I^N^F^R^A^M^E^S ^T^H^E^R^E^I^N.

      N^O^T^E@D I^F ^Y^O^U ^E^N^T^E^R LISTLID ^W^I^T^H^O^U^T ^P^A^R^A^M^E^T^E^R^S, ^T^H^E ^S^Y^S^T^E^M ^L^I^S^T^S
            ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^A^L^L LID^S ^I^N ^T^H^E ^N^E^T^W^O^R^K ^F^O^R ^W^H^I^C^H ^T^H^E ^S^I^T^E
            ^A^L^L^O^W^S ^I^N^F^O^R^M^A^T^I^O^N ^T^O ^B^E ^L^I^S^T^E^D.
.HELP,LID,NOLIST
      T^H^I^S ^P^A^R^A^M^E^T^E^R (LID=^L^I^D ^O^R ST=^L^I^D) ^S^P^E^C^I^F^I^E^S ^T^H^E LID ^F^O^R ^W^H^I^C^H ^I^N^F^O^R^M^A^T^I^O^N
      ^I^S ^T^O ^B^E ^D^I^S^P^L^A^Y^E^D.

      D^E^F^A^U^L^T@D I^F ^P^A^R^A^M^E^T^E^R^S LID=^L^I^D ^A^N^D PID=^P^I^D ^A^R^E ^B^O^T^H ^O^M^I^T^T^E^D, ^I^N^F^O^R^M^A^T^I^O^N
               ^I^S ^L^I^S^T^E^D ^F^O^R ^A^L^L ^L^I^S^T^A^B^L^E LID^S ^I^N ^T^H^E ^N^E^T^W^O^R^K.  I^F ^T^H^E PID=^P^I^D
               ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D ^A^N^D ^T^H^E LID=^L^I^D ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
               ^I^N^F^O^R^M^A^T^I^O^N ^I^S ^L^I^S^T^E^D ^F^O^R ^A^L^L LID^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^S^P^E^C^I^F^I^E^D
               PID.
.HELP,PID,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PID=^P^I^D) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^O^U^T^P^U^T ^I^S ^T^O ^B^E ^L^I^S^T^E^D ^O^N^L^Y ^F^O^R
      LID^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E PID ^Y^O^U ^S^P^E^C^I^F^Y.

      D^E^F^A^U^L^T@D I^F ^N^E^I^T^H^E^R PID ^N^O^R LID ^W^A^S ^S^P^E^C^I^F^I^E^D, ^T^H^E LISTLID ^C^O^M^M^A^N^D
               ^L^I^S^T^S ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^A^L^L ^L^I^S^T^A^B^L^E LID^S ^I^N ^T^H^E ^N^E^T^W^O^R^K.  I^F
               ^T^H^E LID ^I^S ^A^L^S^O ^S^P^E^C^I^F^I^E^D, ^I^N^F^O^R^M^A^T^I^O^N ^I^S ^L^I^S^T^E^D ^O^N^L^Y ^F^O^R
               ^T^H^A^T LID.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^R^E^S^U^L^T^S
      ^O^F ^T^H^E LISTLID ^C^O^M^M^A^N^D (^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^M^U^S^T ^B^E ^L^O^C^A^L ^T^O ^Y^O^U^R ^J^O^B).

      D^E^F^A^U^L^T@D L^I^S^T^I^N^G ^W^I^L^L ^B^E ^W^R^I^T^T^E^N ^T^O ^F^I^L^E OUTPUT.
.ENDHELP
.EX. $LISTLID(#LID=LID,#PID=PID,#L=L)
*WEOR
.PROC,LIST80*I
,LFN1[D^A^T^A ^I^N^P^U^T  ^F^I^L^E]=(*F,*N=LIST)
,LFN2[D^A^T^A ^O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LIST80,^L^F^N1,^L^F^N2,NR.

      T^H^E LIST80 ^C^O^M^M^A^N^D ^C^O^M^P^R^E^S^S^E^S ^A COMPASS-^P^R^O^D^U^C^E^D ^L^I^S^T^I^N^G ^T^O 80 ^C^O^L^U^M^N^S.
.HELP,LFN1,NOLIST

      E^N^T^E^R ^T^H^E ^F^I^L^E ^N^A^M^E ^O^F ^T^H^E COMPASS ^L^I^S^T^I^N^G ^T^O ^B^E ^C^O^M^P^R^E^S^S^E^D.  A ^F^I^L^E
      ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E LIST
.HELP,LFN2,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E (^L^F^N2) ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^M^P^R^E^S^S^E^D ^L^I^S^T^I^N^G.
      A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E OUTPUT
.HELP,NR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NR) ^P^R^E^V^E^N^T^S ^T^H^E COMPASS ^L^I^S^T^I^N^G (^L^F^N1) ^F^R^O^M ^B^E^I^N^G
      ^R^E^W^O^U^N^D.  T^O ^P^R^E^V^E^N^T ^R^E^W^I^N^D^I^N^G, ^E^N^T^E^R NR; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D F^I^L^E ^L^F^N1 ^I^S ^R^E^W^O^U^N^D.
.ENDHELP
.EX.  $LIST80(LFN1,LFN2_NR)
*WEOR
.PROC,LOAD*I
,LFN[N^A^M^E ^O^F ^F^I^L^E ^T^O ^B^E ^L^O^A^D^E^D]=(*F,*N=)
,R[R^E^W^I^N^D ^F^I^L^E ^B^E^F^O^R^E ^L^O^A^D^I^N^G]=(YES=$/R$,Y=$/R$,*K=$/R$,NO=$/NR$,N=$/NR$,
         NR=$/NR$,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LOAD,^L^F^N1,...,^L^F^N^N.

      T^H^E LOAD ^C^O^M^M^A^N^D ^L^O^A^D^S ^O^B^J^E^C^T ^M^O^D^U^L^E^S.  T^O ^S^P^E^C^I^F^Y ^R^E^W^I^N^D ^O^R ^N^O
      ^R^E^W^I^N^D ^F^O^R ^A ^F^I^L^E, ^E^N^T^E^R ^L^F^N/R ^O^R ^L^F^N/NR.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^L^O^A^D^E^D.
.HELP,R,NOLIST

      F^O^R ^E^A^C^H ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E LOAD ^C^O^M^M^A^N^D, ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^R^E^W^I^N^D
      ^O^R ^N^O ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G@D

        R     F^O^R^C^E^S ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G (^D^E^F^A^U^L^T).

        NR    I^N^H^I^B^I^T^S ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LOC*I
,FWA[F^I^R^S^T W^O^R^D A^D^D^R^E^S^S T^O C^L^E^A^R]=(*A1,*N=)
,LWA[L^A^S^T W^O^R^D A^D^D^R^E^S^S]=(*A1,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LOC,^F^W^A,^L^W^A.
               LOC,^F^W^A.
               LOC.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E LOC ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E LOC ^C^O^M^M^A^N^D ^R^E^A^D^S ^O^C^T^A^L ^L^I^N^E ^I^M^A^G^E^S ^F^R^O^M ^F^I^L^E INPUT ^A^N^D ^E^N^T^E^R^S ^T^H^E^M
      ^I^N ^T^H^E ^J^O^B'^S ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H.
.HELP,FWA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^F^W^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^R^S^T ^W^O^R^D ^A^D^D^R^E^S^S ^O^F ^A^N ^A^R^E^A ^T^O ^C^L^E^A^R
      (^Z^E^R^O) ^B^E^F^O^R^E ^L^O^A^D^I^N^G ^C^O^R^R^E^C^T^I^O^N ^S^T^A^T^E^M^E^N^T^S.  I^F ^F^W^A ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S LOC=0.
.HELP,LWA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^W^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^W^O^R^D ^A^D^D^R^E^S^S ^P^L^U^S 1 ^O^F ^T^H^E ^A^R^E^A ^T^O
      ^B^E ^C^L^E^A^R^E^D.  I^F ^L^W^A ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LOC=0.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LOCK*I
,LFN[F^I^L^E ^T^O ^L^O^C^K]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LOCK,^L^F^N1,^L^F^N2,...,^L^F^N^N.

      T^H^E LOCK ^C^O^M^M^A^N^D ^P^R^E^V^E^N^T^S ^W^R^I^T^I^N^G ^O^N ^A ^F^I^L^E.
.HELP,LFN,NOLIST

      T^H^E ^F^I^L^E ^T^O ^L^O^C^K ^M^U^S^T ^B^E ^A ^L^O^C^A^L ^F^I^L^E (^A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  F^R^O^M ^W^I^T^H^I^N HELPME, ^Y^O^U ^C^A^N
      ^S^P^E^C^I^F^Y ^O^N^L^Y ^O^N^E ^F^I^L^E ^T^O ^L^O^C^K.
.ENDHELP
.EX.  $LOCK(LFN)
*WEOR
.PROC,LOGIN*I
,APPL[A^P^P^L^I^C^A^T^I^O^N ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LOGIN,^A^P^P^I^C^A^T^I^O^N.

      T^H^E LOGIN ^C^O^M^M^A^N^D ^L^O^G^S ^Y^O^U ^O^U^T ^O^F ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E ^C^U^R^R^E^N^T^L^Y
      ^U^S^I^N^G ^A^N^D ^E^I^T^H^E^R ^S^W^I^T^C^H^E^S ^Y^O^U ^T^O ^Y^O^U^R ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N ^O^R ^R^E^I^N^I^T^I^A









^S
      ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E.  T^H^A^T ^I^S, ^I^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N ^W^A^S ^S^E^L^E^C^T^E^D
      ^F^R^O^M (^N^E^S^T^E^D ^W^I^T^H^I^N) ^A ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N, LOGIN ^W^O^U^L^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^R^E^C^O^N^N^E^C^T ^Y^O^U ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^T^O ^W^H^I^C^H ^Y^O^U ^W
&l5C      ^T^O ^B^E ^C^O^N^N^E^C^T^E^D.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N, ^Y^O^U ^A^R^E ^L^O^G^G^E^D ^O^U^T ^O^F
               ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N, ^A^N^D ^E^I^T^H^E^R ^T^H^E ^L^O^G^I^N ^S^E^Q^U^E^N^C^E ^I^S
               ^R^E^I^N^I^T^I^A^T^E^D ^O^R ^Y^O^U ^A^R^E ^R^E^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^E^R^E
               ^U^S^I^N^G ^P^R^I^O^R ^T^O ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
.EX. $LOGIN(APPL)
$REVERT(NOLIST)
*WEOR
.PROC,LOGOUT*I
,APPL[A^P^P^L^I^C^A^T^I^O^N ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LOGOUT,^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E LOGOUT ^C^O^M^M^A^N^D ^L^O^G^S ^Y^O^U ^O^U^T ^O^F ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^A^R^E ^C^U^R^R^E^N^T^L^Y
      ^U^S^I^N^G ^A^N^D ^E^I^T^H^E^R ^S^W^I^T^C^H^E^S ^Y^O^U ^T^O ^Y^O^U^R ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N ^O^R ^D^I^S^C^O^N^N^E
&l4C      ^Y^O^U^R ^T^E^R^M^I^N^A^L.  T^H^A^T ^I^S, ^I^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N ^W^A^S ^S^E^L^E^C^T^E^D ^F^R^O^M
      (^N^E^S^T^E^D ^W^I^T^H^I^N) ^A ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N, LOGOUT ^W^O^U^L^D ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^R^E^C^O^N^N^E^C^T ^Y^O^U ^T^O ^T^H^E ^P^R^E^V^I^O^U^S ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,APPL,NOLIST

      T^H^I^S ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^Y^I^N^G ^T^H^E ^A^P^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^I^S^H
      ^T^O ^B^E ^C^O^N^N^E^C^T^E^D ^T^O.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N, ^Y^O^U ^A^R^E ^L^O^G^G^E^D ^O^U^T
               ^O^F ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N, ^A^N^D ^E^I^T^H^E^R ^Y^O^U ^A^R^E ^D^I^S^C^O^N^N^E^C^T^E^D
               ^F^R^O^M ^T^H^E ^N^E^T^W^O^R^K ^O^R ^R^E^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N ^Y^O^U ^W^E^R^E
               ^U^S^I^N^G ^P^R^I^O^R ^T^O ^Y^O^U^R ^C^U^R^R^E^N^T ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
.EX. $LOGOUT(APPL)
$REVERT(NOLIST)
*WEOR
.PROC,LO72*I
,IFN[P^A^R^A^M^E^T^E^R S^O^U^R^C^E F^I^L^E]=(*F,*N=0)
,SFN[R^E^F^O^R^M^A^T^T^E^D S^O^U^R^C^E F^I^L^E]=(*F,*N=SCR)
,LFN[F^I^L^E T^O R^E^C^E^I^V^E R^E^F^O^R^M^A^T^T^E^D D^A^T^A]=(*F,*N=OUTPUT)
,TB[S^P^E^C^I^F^I^E^S F^I^L^E R^E^F^O^R^M^A^T^T^E^D T^Y^P^E]=(*S1(MCB),*N=B)
,HH[C^H^A^R^A^C^T^E^R^S P^E^R O^U^T^P^U^T L^I^N^E]=(*S3/D,*N=72)
,LP[R^E^F^O^R^M^A^T^T^E^D F^O^R L^I^N^E P^R^I^N^T^E^R]=(NO=$,LP$,N=$,LP$,YES=,Y=,*K=$,LP$,*N=)
,NR[N^O R^E^W^I^N^D]=(YES=$,NR$,Y=$,NR$,NO=,N=,*K=$,NR$,*N=)
,NX[N^U^M^B^E^R O^F C^H^A^R^A^C^T^E^R^S T^O B^E M^O^V^E^D]=(*S3(1234567890),*N=)
,IX[F^I^E^L^D D^A^T^A O^R^I^G^I^N^A^T^E^S F^R^O^M]=(*S3(1234567890),*N=)
,OX[D^E^S^T^I^N^A^T^I^O^N F^I^E^L^D]=(*S3(1234567890),*N=)
,IT[C^H^A^N^G^E I^N^P^U^T P^A^R^A^M^E^T^E^R^S B^E^F^O^R^E P^R^O^C^E^S^S^I^N^G]=(*F,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  LO72,I=^L^F^N1,S=^L^F^N2,L=^L^F^N3,T=^X,H=^X^X^X,LP,NR,N^X=^Y,I^X=^Y,O^X=^Y,IT.

      T^H^E LO72 ^C^O^M^M^A^N^D ^R^E^F^O^R^M^A^T^S ^P^R^I^N^T^E^D ^F^I^L^E^S.
.HELP,IFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^R^E^F^O^R^M^A^T ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^N ^F^I^L^E
      ^L^F^N1.  I^F ^L^F^N1 ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S INPUT.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S I=0.
.HELP,SFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R S=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^D^A^T^A ^T^O ^B^E ^R^E^F^O^R^M^A^T^T^E^D ^I^S ^O^N
      ^F^I^L^E ^L^F^N2.  I^F ^L^F^N2 ^O^R S ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S SCR.
.HELP,LFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^L^F^N3 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^R^E^F^O^R^M^A^T^T^E^D ^D^A^T^A ^I^S ^L^I^S^T^E^D ^O^N
      ^F^I^L^E ^L^F^N3.  I^F ^L^F^N3 ^O^R L ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,TB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R T=^X ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^T^O ^B^E ^R^E^F^O^R^M^A^T^T^E^D ^I^S ^O^F ^T^Y^P^E ^X.
      I^F T ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^F^O^R ^X ^A^R^E@D

         ^X         D^E^S^C^R^I^P^T^I^O^N
         -         -----------
         M     M^O^D^I^F^Y ^S^O^U^R^C^E ^D^A^T^A.
         C     COMPASS ^S^O^U^R^C^E ^D^A^T^A.
         B     O^T^H^E^R ^S^O^U^R^C^E ^D^A^T^A.
.HELP,HH,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R H=^X^X^X ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^P^E^R ^O^U^T^P^U^T
      ^L^I^N^E ^I^S ^X^X^X (^M^A^X^I^M^U^M ^A^L^L^O^W^E^D ^I^S 150 ^C^H^A^R^A^C^T^E^R^S).  ^X^X^X ^M^U^S^T ^B^E ^G^R^E^A^T^E^R
      ^T^H^A^N ^O^R ^E^Q^U^A^L ^T^O ^T^H^E ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^B^E^I^N^G ^M^O^V^E^D (N^X) ^P^L^U^S ^T^H^E
      ^S^T^A^R^T^I^N^G ^C^O^L^U^M^N ^N^U^M^B^E^R ^O^F ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^E^L^D (O^X).  I^F H ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S 72.
.HELP,LP,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R LP ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^O^U^T^P^U^T ^I^S ^F^O^R^M^A^T^T^E^D ^F^O^R ^T^H^E ^L^I^N^E
      ^P^R^I^N^T^E^R.
.HELP,NR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NR ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^O^U^T^P^U^T ^F^I^L^E ^I^S ^N^O^T ^R^E^W^O^U^N^D.
.HELP,NX,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R N^X=^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^T^O ^B^E ^M^O^V^E^D
      (^U^P ^T^O ^S^I^X ^F^I^E^L^D^S).

         N^U^M^B^E^R               D^E^S^C^R^I^P^T^I^O^N
         ------               -----------
           ^X     N^U^M^B^E^R ^O^F ^F^I^E^L^D ^B^E^I^N^G ^M^O^V^E^D (1 ^T^O 6).
           ^Y     N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^B^E^I^N^G ^M^O^V^E^D.
.HELP,IX,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I^X=^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^E^L^D ^F^R^O^M ^W^H^I^C^H ^T^H^E ^D^A^T^A ^O^R^I^G^I^N^A^T^E^S.

         F^I^E^L^D                D^E^S^C^R^I^P^T^I^O^N
         -----                -----------
           ^X     N^U^M^B^E^R ^O^F ^F^I^E^L^D ^B^E^I^N^G ^M^O^V^E^D (1 ^T^O 6).
           ^Y     S^T^A^R^T^I^N^G ^C^O^L^U^M^N ^O^F ^O^R^I^G^I^N^A^T^I^N^G ^F^I^E^L^D.
.HELP,OX,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R O^X=^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^E^L^D ^T^O ^W^H^I^C^H ^T^H^E ^D^A^T^A ^I^S
      ^G^O^I^N^G.

         F^I^E^L^D                D^E^S^C^R^I^P^T^I^O^N
         -----                -----------
           ^X     N^U^M^B^E^R ^O^F ^F^I^E^L^D ^T^O ^R^E^C^E^I^V^E ^D^A^T^A (1 ^T^O 6).
           ^Y     S^T^A^R^T^I^N^G ^C^O^L^U^M^N ^O^F ^D^E^S^T^I^N^A^T^I^O^N ^F^I^E^L^D.
.HELP,IT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R IT ^S^P^E^C^I^F^I^E^S ^T^O ^S^U^P^P^R^E^S^S ^Q^U^E^R^Y ^T^O ^T^H^E ^T^E^R^M^I^N^A^L, ^A^S^K^I^N^G ^I^F
      ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E ^A^N^Y ^O^F ^T^H^E ^I^N^P^U^T ^P^A^R^A^M^E^T^E^R^S ^B^E^F^O^R^E ^P^R^O^C^E^S^S^I^N^G ^B^E^G^I^N^

      I^F ^O^M^I^T^T^E^D, ^Q^U^E^R^Y ^I^S ^I^S^S^U^E^D.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^F^F^E^C^T^I^V^E ^O^N^L^Y ^F^R^O^M
      ^I^N^T^E^R^A^C^T^I^V^E ^O^R^I^G^I^N ^J^O^B^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,MACHINE*I
,EP[S^T^A^C^K ^P^U^R^G^I^N^G]=(YES=ON,Y=ON,NO=OFF,N=OFF,ON,OFF)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MACHINE,EP=^S^T^A^T^E.

      S^O^M^E ^P^R^O^G^R^A^M^S (^E^S^P^E^C^I^A^L^L^Y COMPASS ^P^R^O^G^R^A^M^S ^W^I^T^H ^T^I^G^H^T ^I^N^S^T^R^U^C^T^I^O^N
      ^M^O^D^I^F^I^C^A^T^I^O^N ^L^O^O^P^S) ^W^E^R^E ^N^O^T ^D^E^S^I^G^N^E^D ^T^O ^R^U^N ^O^N CYBER 180-800 ^A^N^D 900
      ^S^E^R^I^E^S ^M^A^I^N^F^R^A^M^E^S.  T^H^E MACHINE ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^S^O^M^E ^O^F ^T^H^E^S^E ^P^R^O^G^R^A^M^S
      ^T^O ^R^U^N ^O^N ^T^H^E ^A^B^O^V^E ^M^A^I^N^F^R^A^M^E^S.
.HELP,EP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (EP=^S^T^A^T^E) ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^E^X^T^E^N^D^E^D ^S^T^A^C^K ^P^U^R^G^I^N^G ^I^S
      ^S^E^L^E^C^T^E^D.  E^N^T^E^R ON ^T^O ^S^E^L^E^C^T ^I^T, OFF ^T^O ^D^I^S^A^B^L^E ^I^T ^A^F^T^E^R ^I^T ^H^A^S ^B^E^E^N
      ^S^E^L^E^C^T^E^D.  T^H^E ^I^N^I^T^I^A^L ^S^T^A^T^U^S ^O^F ^S^T^A^C^K ^P^U^R^G^I^N^G ^I^S ^S^I^T^E-^S^E^L^E^C^T^A^B^L^E.
.ENDHELP
.EX.  $MACHINE(#EP=EP)
*WEOR
.PROC,MAP*I
,P[T^Y^P^E ^O^F ^L^O^A^D ^M^A^P]=(OFF,PART,ON,FULL,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MAP,^P.

      T^H^E MAP ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^D^E^F^A^U^L^T ^O^P^T^I^O^N^S ^F^O^R ^L^O^A^D ^M^A^P^S.
.HELP,P,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^P ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

         ^P                     D^E^S^C^R^I^P^T^I^O^N
         -                     -----------
        OFF      N^O ^M^A^P.

        PART     B^L^O^C^K ^M^A^P.  S^T^A^T^I^S^T^I^C^S.

        ON       S^T^A^T^I^S^T^I^C^S.  B^L^O^C^K ^M^A^P.  E^N^T^R^Y ^P^O^I^N^T
                 ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^M^A^P.

        FULL     B^L^O^C^K ^M^A^P.  S^T^A^T^I^S^T^I^C^S.  E^N^T^R^Y ^P^O^I^N^T ^M^A^P, ^E^N^T^R^Y
                 ^P^O^I^N^T ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^M^A^P.

      D^E^F^A^U^L^T@D I^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^I^S ^U^S^E^D
.ENDHELP
.EX. $MAP,P.
*WEOR
.PROC,MFL*I
,CM[M^A^X^I^M^U^M ^C^E^N^T^R^A^L ^M^E^M^O^R^Y]=(*S7(01234567B),*S7(0123456789D))
,EC[M^A^X^I^M^U^M ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y]=(*S7(01234567B),*S7(0123456789D),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MFL,CM=^N^N^N^N^N^N,EC=^M^M^M^M.
                   ^O^R
               MFL,^N^N^N^N^N^N,^M^M^M^M

      T^H^E MFL ^C^O^M^M^A^N^D ^R^E^S^E^T^S ^T^H^E ^M^A^X^I^M^U^M ^F^I^E^L^D ^L^E^N^G^T^H ^F^O^R ^E^A^C^H ^S^U^B^S^E^Q^U^E^N^T ^J^O^B
      ^S^T^E^P.
.HELP,CM,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CM=^N^N^N^N^N^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^F^I^E^L^D
      ^L^E^N^G^T^H (^O^C^T^A^L ^I^S ^A^S^S^U^M^E^D ^U^N^L^E^S^S ^D^E^C^I^M^A^L ^I^S ^S^P^E^C^I^F^I^E^D ^B^Y ^A D ^S^U^F^F^I^X ^O^R ^U^S^
      ^O^F ^T^H^E ^D^I^G^I^T^S 8 ^O^R 9).   E^N^T^E^R ^T^H^E ^M^A^X^I^M^U^M ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H.
.HELP,EC,NOLIST

       T^H^I^S ^P^A^R^A^M^E^T^E^R (EC=^M^M^M^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^F^I^E^L^D
       ^L^E^N^G^T^H.  T^H^E ^V^A^L^U^E ^O^F ^M^M^M^M ^I^S ^T^H^E ^A^C^T^U^A^L ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H
       ^D^I^V^I^D^E^D ^B^Y 1000B (^O^C^T^A^L).
.ENDHELP
.EX.  $MFL(#CM=CM,#EC=EC)
*WEOR
.PROC,MFLINK*I
,LFN[L^O^C^A^L ^F^I^L^E ^F^O^R ^T^H^E ^F^I^L^E ^T^R^A^N^S^F^E^R]=(*F,*N=LFILE)
,ST [R^E^M^O^T^E ^H^O^S^T ID (^L^I^D)]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,I  [F^I^L^E ^F^O^R ^D^I^R^E^C^T^I^V^E^S]=(*F,*N=INPUT)
,DD [D^A^T^A ^F^O^R^M^A^T ^T^O ^B^E ^U^S^E^D]=(C6,C8,US,UU,*N=)
,EP [R^E^T^R^Y ^O^N ^E^R^R^O^R^S]=(YES=,Y=,NO=$,EP$,N=$,EP$,*K=$,EP$,*N=)
,RT [R^E^T^R^Y ^I^F ^R^E^S^O^U^R^C^E^S ^N^O^T ^A^V^A^I^L^A^B^L^E]=(YES=,Y=,NO=$,RT$,N=$,RT$,*K=$,RT$,*N=)
,PC[P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^F^O^R ^D^I^R^E^C^T^I^V^E^S]=(*S1($#$$*$$+$$?$$/$$@A$$&$),*N=$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MFLINK,^L^F^N,ST=^L^I^D,I=^D^I^R^F^I^L^E,DD=^D^D,PC=^C,EP,RT.

      T^H^E MFLINK ^C^O^M^M^A^N^D ^T^R^A^N^S^F^E^R^S ^A ^F^I^L^E ^T^O ^O^R ^F^R^O^M ^A^N^O^T^H^E^R ^M^A^I^N^F^R^A^M^E, ^O^R
      ^C^R^E^A^T^E^S, ^P^U^R^G^E^S, ^O^R ^O^T^H^E^R^W^I^S^E ^C^H^A^N^G^E^S ^T^H^E ^A^T^T^R^I^B^U^T^E^S ^O^F ^A ^P^E^R^M^A^N^E^N^T ^F^I^L

      ^O^N ^A^N^O^T^H^E^R ^M^A^I^N^F^R^A^M^E.

.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^E^I^T^H^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E
      ^T^R^A^N^S^F^E^R^R^E^D ^T^O ^A ^R^E^M^O^T^E ^H^O^S^T, ^O^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^W^R^I^T^T^E^
      ^O^V^E^R ^W^I^T^H ^A ^F^I^L^E ^T^H^A^T ^I^S ^T^R^A^N^S^F^E^R^R^E^D ^F^R^O^M ^A ^R^E^M^O^T^E ^H^O^S^T.  T^H^E ^F^I^L^E ^N^A^M^E
      ^M^U^S^T ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^T^H^E ^L^O^C^A^L ^F^I^L^E ^M^U^S^T ^R^E^S^I^D^E
      ^O^N ^D^I^S^K.  I^F ^Y^O^U ^O^M^I^T ^L^F^N, ^Y^O^U ^M^U^S^T ^H^A^V^E ^T^W^O ^C^O^N^S^E^C^U^T^I^V^E ^D^E^L^I^M^I^T^E^R^S
      ^A^F^T^E^R MFLINK.

      D^E^F^A^U^L^T@D I^F ^T^H^E ^F^I^L^E ^N^A^M^E ^I^S ^O^M^I^T^T^E^D ^A^N^D ^S^U^B^S^E^Q^U^E^N^T ^D^I^R^E^C^T^I^V^E^S
               ^C^A^L^L ^F^O^R ^A ^F^I^L^E ^T^R^A^N^S^F^E^R, MFLINK ^U^S^E^S ^F^I^L^E LFILE.
.HELP,ST,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ST=^L^I^D) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^G^I^C^A^L ^I^D^E^N^T^I^F^I^E^R ^O^F ^T^H^E ^R^E^M^O^T^E
      ^H^O^S^T ^T^O ^W^H^I^C^H ^T^H^E ^F^I^L^E ^I^S ^S^E^N^T (^A ^L^I^D ^I^S 3-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).

      D^E^F^A^U^L^T@D Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ST=^L^I^D ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^O^N ^T^H^E ^F^I^R^S^T MFLINK
               ^C^O^M^M^A^N^D ^O^F ^A ^S^E^R^I^E^S ^O^F MFLINK ^C^O^M^M^A^N^D^S. O^N^C^E ^Y^O^U ^H^A^V^E
               ^E^X^E^C^U^T^E^D ^T^H^E MFLINK ^C^O^M^M^A^N^D ^W^I^T^H ^T^H^E ST=^L^I^D ^P^A^R^A^M^E^T^E^R,
               ^Y^O^U^R ^S^U^B^S^E^Q^U^E^N^T MFLINK ^C^O^M^M^A^N^D^S ^I^N ^T^H^E ^S^A^M^E ^S^E^S^S^I^O^N
               ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^D^E^F^A^U^L^T ^T^O ^T^H^A^T ^L^I^D.
.HELP,I,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (I=^D^I^R^F^I^L^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E
      ^D^I^R^E^C^T^I^V^E^S ^T^O ^B^E ^S^E^N^T ^T^O ^T^H^E ^R^E^M^O^T^E ^H^O^S^T (^A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I^F ^D^I^R^F^I^L^E ^I^S ^O^M^I^T^T^E^D, ^F^I^L^E INPUT ^I^S ^T^H^E
      ^D^I^R^E^C^T^I^V^E^S ^F^I^L^E.

      D^E^F^A^U^L^T@D I^F ^T^H^E I ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^S^Y^S^T^E^M ^P^R^O^M^P^T^S ^Y^O^U ^T^O
               ^E^N^T^E^R ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^O^N ^T^H^E ^L^I^N^E^S ^F^O^L^L^O^W^I^N^G ^T^H^E MFLINK
               ^C^O^M^M^A^N^D.
.HELP,DD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DD=^D^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^A^T^A ^F^O^R^M^A^T ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E
      ^T^R^A^N^S^F^E^R^R^E^D.  I^F ^T^H^E ^F^I^L^E ^I^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A, ^Y^O^U ^D^O ^N^O^T ^N^E^E^D ^T^O ^S^P^E^C^I^F^Y
      ^T^H^E DD ^P^A^R^A^M^E^T^E^R.

      T^H^E ^F^O^L^L^O^W^I^N^G ^D^A^T^A ^T^Y^P^E^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D@D

      ^D^D                             D^E^S^C^R^I^P^T^I^O^N
      --                             -----------

      C6   T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A ^I^N ^A 64-^C^H^A^R^A^C^T^E^R ^O^R ^L^E^S^S ^S^U^B^S^E^T
           ^O^F ^T^H^E ASCII 128-^C^H^A^R^A^C^T^E^R ^S^E^T.  T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^O^F ^T^H^E ^F^I^L^E
           ^L^F^N ^I^S 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E ^A^N^D ^I^T^S ^L^I^N^E^S ^A^R^E ^Z^E^R^O-^B^Y^T^E ^T^E^R^M^I^N^A^T^E^D.

      C8   T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A ^I^N ^A ^L^A^R^G^E^R ^T^H^A^N 64-^C^H^A^R^A^C^T^E^R
           ^S^U^B^S^E^T ^O^F ^T^H^E ASCII 128-^C^H^A^R^A^C^T^E^R ^S^E^T.  T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E
           ^O^F ^T^H^E ^F^I^L^E (^L^F^N) ^I^S ^T^H^E 7-^B^I^T ASCII ^C^O^D^E (^R^I^G^H^T-^J^U^S^T^I^F^I^E^D ^I^N
           12-^B^I^T ^F^I^E^L^D^S) ^A^N^D ^I^T^S ^L^I^N^E^S ^A^R^E ^Z^E^R^O-^B^Y^T^E ^T^E^R^M^I^N^A^T^E^D.

      US   S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^B^I^N^A^R^Y ^D^A^T^A ^I^N ^S^T^R^U^C^T^U^R^E^D ^F^O^R^M^A^T
           ^W^I^T^H EOR^S ^A^N^D EOF^S.  T^H^E ^F^I^L^E ^I^S ^T^R^A^N^S^M^I^T^T^E^D ^A^S ^A ^C^O^N^T^I^N^U^O^U^S ^S^T^R^I^N^G
           ^O^F ^B^I^N^A^R^Y ^D^A^T^A, ^B^R^O^K^E^N ^O^N^L^Y ^B^Y EOR^S ^A^N^D EOF^S ^A^S ^A^P^P^R^O^P^R^I^A^T^E.

      UU   S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^B^I^N^A^R^Y ^D^A^T^A ^W^I^T^H^O^U^T EOR^S ^A^N^D EOF^S.
           NOS ^T^R^E^A^T^S UU ^A^S US.

      I^F ^T^H^E ^F^I^L^E ^I^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A, ^Y^O^U ^D^O ^N^O^T ^N^E^E^D ^T^O ^S^P^E^C^I^F^Y ^A DD ^P^A^R^A^M^E^T^E^R.
.HELP,EP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (EP) ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^P^R^O^C^E^S^S^I^N^G ^T^H^A^T ^E^N^S^U^E^S ^I^F ^N^E^T^W^O^R^
      ^P^R^O^B^L^E^M^S ^C^A^U^S^E ^A ^L^O^S^S ^O^F ^T^H^E ^C^O^N^N^E^C^T^I^O^N ^D^U^R^I^N^G ^A ^F^I^L^E ^T^R^A^N^S^F^E^R.  I^F
      ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^R^I^E^S ^T^H^E ^T^R^A^N^S^F^E^R.  I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R (^E^N^T^E^R EP), ^I^T ^I^N^H^I^B^I^T^S ^T^H^E ^R^E^T^R^Y.  (T^H^E ^S^Y^S^T^E^M
      ^A^T^T^E^M^P^T^S ^T^O ^C^O^R^R^E^C^T ^D^A^T^A ^T^R^A^N^S^M^I^S^S^I^O^N ^E^R^R^O^R^S ^R^E^G^A^R^D^L^E^S^S ^O^F ^T^H^I^S
      ^P^A^R^A^M^E^T^E^R.)
.HELP,RT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RT) ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^A^L-^T^I^M^E ^A^C^T^I^O^N ^T^H^E ^S^Y^S^T^E^M ^I^S ^T^O ^T^A^K^E
      ^W^H^E^N ^N^E^T^W^O^R^K ^R^E^S^O^U^R^C^E^S ^A^R^E ^T^E^M^P^O^R^A^R^I^L^Y ^U^N^A^V^A^I^L^A^B^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^I

      ^P^A^R^A^M^E^T^E^R (^E^N^T^E^R RT) ^A^N^D ^S^O^M^E ^N^E^T^W^O^R^K ^R^E^S^O^U^R^C^E^S ^N^E^C^E^S^S^A^R^Y ^F^O^R ^Y^O^U ^T^O
      ^C^O^N^N^E^C^T ^T^O ^A ^R^E^M^O^T^E ^H^O^S^T ^A^R^E ^U^N^A^V^A^I^L^A^B^L^E, MFLINK ^A^B^O^R^T^S ^W^I^T^H^O^U^T ^A^N^Y
      ^R^E^T^R^I^E^S.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^A^F^T^E^R ^A^N
      ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^P^E^R^I^O^D ^O^F ^T^I^M^E MFLINK ^W^I^L^L ^R^E^T^R^Y ^U^N^T^I^L ^T^H^E
      ^C^O^N^N^E^C^T^I^O^N ^I^S ^S^U^C^C^E^S^S^F^U^L.
.HELP,PC,NOLIST

      W^H^E^N ^T^H^E I=^D^I^R^F^I^L^E ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^R^E^A^D^S
      ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^T^H^E ^L^I^N^E^S ^F^O^L^L^O^W^I^N^G ^T^H^E MFLINK ^C^O^M^M^A^N^D.  E^A^C^H ^O^F ^T^H^E^S^E
      ^L^I^N^E^S ^M^U^S^T ^H^A^V^E ^A ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E PC=^P^C ^P^A^R^A^M^E^T^E^R.
      (T^H^E ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^C^A^N ^B^E ^A^N^Y 6-12 ^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E ^C^H^A^R^A^C^T^E^R, ^E^X^C^E^P^T
      ^A ^C^L^O^S^I^N^G ^P^A^R^E^N^T^H^E^S^I^S, ^C^O^M^M^A, ^C^O^L^O^N, ^D^O^L^L^A^R ^S^I^G^N, ^O^R ^A ^P^E^R^I^O^D.)
      S^U^G^G^E^S^T^E^D ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R^S ^C^A^N ^B^E@D * & # + ? / @A

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M-^S^U^P^P^L^I^E^D ^P^R^E^F^I^X
               ^C^H^A^R^A^C^T^E^R ^I^S ^A^N ^A^S^T^E^R^I^S^K (*).
.ENDHELP
.IF($DD$.EQ.$$,L1)
 .EX.  $MFLINK(LFN,#ST=ST,#I=I_EP_RT,#PC=PC)
.ELSE(L1)
.EX.  $MFLINK(LFN,#ST=ST,#I=I,#DD=DD_EP_RT,#PC=PC)
.ENDIF(L1)
*WEOR
.PROC,MFQUEUE*I
,LFN[L^O^C^A^L ^F^I^L^E ^T^O ^T^R^A^N^S^F^E^R]=(*F,*N=)
,ST [R^E^M^O^T^E ^H^O^S^T ID (LID)]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789))
,I  [F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^D^I^R^E^C^T^I^V^E^S]=(*F,*N=INPUT)
,DD [D^A^T^A ^F^O^R^M^A^T ^T^O ^B^E ^U^S^E^D]=(C6,C8,US,UU)
,DC[D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E]=(CP,IN,IX,LP,PB,PH,PR,PU,P8,SB,SP,*N=)
,PC[P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^F^O^R ^D^I^R^E^C^T^I^V^E^S]=(*S1($#$$*$$+$$?$$/$$@A$$&$),*N=$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MFQUEUE,^L^F^N,ST=^L^I^D,DD=^D^D,I=^D^I^R^F^I^L^E,PC=^C,DC=^D^C.

      T^H^E MFQUEUE ^C^O^M^M^A^N^D ^S^E^N^D^S ^A ^L^O^C^A^L ^F^I^L^E ^F^R^O^M ^Y^O^U^R ^H^O^S^T ^T^O ^T^H^E ^I^N^P^U^T ^O^R
      ^O^U^T^P^U^T ^Q^U^E^U^E ^O^F ^A ^R^E^M^O^T^E ^H^O^S^T.  MFQUEUE ^F^U^N^C^T^I^O^N^S ^M^U^C^H ^L^I^K^E ^T^H^E ROUTE
      ^C^O^M^M^A^N^D.

      N^O^T^E@D W^H^E^N ^A ^D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E ^I^S ^S^P^E^C^I^F^I^E^D (DC=^D^C), ^N^E^I^T^H^E^R ^A ^D^I^R^E^C^T^I^V^E
            ^F^I^L^E (I=^D^I^R^F^I^L^E) ^N^O^R ^R^O^U^T^I^N^G ^D^I^R^E^C^T^I^V^E^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^R^O^U^T^E^D ^T^O
      ^T^H^E ^R^E^M^O^T^E ^H^O^S^T (^A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E.
.HELP,ST,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (ST=^L^I^D) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^G^I^C^A^L ^I^D^E^N^T^I^F^I^E^R ^O^F ^T^H^E ^R^E^M^O^T^E
      ^H^O^S^T ^T^O ^W^H^I^C^H ^T^H^E ^F^I^L^E ^I^S ^S^E^N^T (^A ^L^I^D ^I^S 3 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y ^T^H^E ^L^O^C^A^L ^H^O^S^T.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^R^E^M^O^T^E ^H^O^S^T ^L^I^D.
.HELP,I,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (I=^D^I^R^F^I^L^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^R^O^U^T^I^N

      ^D^I^R^E^C^T^I^V^E^S ^T^O ^B^E ^S^E^N^T ^T^O ^T^H^E ^R^E^M^O^T^E ^H^O^S^T (^A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y I, ^F^I^L^E INPUT ^I^S ^T^H^E
      ^D^I^R^E^C^T^I^V^E^S ^F^I^L^E.

      D^E^F^A^U^L^T@D T^H^E ^S^Y^S^T^E^M ^P^R^O^M^P^T^S ^Y^O^U ^T^O ^E^N^T^E^R ^T^H^E ^R^O^U^T^I^N^G ^D^I^R^E^C^T^I^V^E ^O^N
               ^T^H^E ^L^I^N^E^S ^F^O^L^L^O^W^I^N^G ^T^H^E MFQUEUE ^C^O^M^M^A^N^D.
.HELP,DD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DD=^D^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^A^T^A ^F^O^R^M^A^T ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E
      ^T^R^A^N^S^F^E^R^R^E^D.  T^H^E ^F^O^L^L^O^W^I^N^G ^D^A^T^A ^T^Y^P^E^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D@D

      ^D^D                            M^E^A^N^I^N^G
      --                            -------

      C6   T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A ^I^N ^A 64-^C^H^A^R^A^C^T^E^R (^O^R ^L^E^S^S)
           ^S^U^B^S^E^T ^O^F ^T^H^E ASCII 128-^C^H^A^R^A^C^T^E^R ^S^E^T.  T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E
           ^O^F ^T^H^E ^F^I^L^E (^L^F^N) ^I^S 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E ^A^N^D ^I^T^S ^L^I^N^E^S ^A^R^E ^Z^E^R^O-^B^Y^T^E
           ^T^E^R^M^I^N^A^T^E^D.

      C8   T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A ^I^N ^A ^L^A^R^G^E^R ^T^H^A^N 64-^C^H^A^R^A^C^T^E^R
           ^S^U^B^S^E^T ^O^F ^T^H^E ASCII 128-^C^H^A^R^A^C^T^E^R ^S^E^T.  T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E
           ^O^F ^T^H^E ^F^I^L^E (^L^F^N) ^I^S ^T^H^E 7-^B^I^T ASCII ^C^O^D^E (^R^I^G^H^T-^J^U^S^T^I^F^I^E^D ^I^N
           12-^B^I^T ^F^I^E^L^D^S) ^A^N^D ^I^T^S ^L^I^N^E^S ^A^R^E ^Z^E^R^O-^B^Y^T^E ^T^E^R^M^I^N^A^T^E^D.

      US   S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^B^I^N^A^R^Y ^D^A^T^A ^I^N ^S^T^R^U^C^T^U^R^E^D ^F^O^R^M^A^T
           ^W^I^T^H EOR^S ^A^N^D EOF^S.  T^H^E ^F^I^L^E ^I^S ^T^R^A^N^S^M^I^T^T^E^D ^A^S ^A ^C^O^N^T^I^N^U^O^U^S ^S^T^R^I^N^G
           ^O^F ^B^I^N^A^R^Y ^D^A^T^A, ^B^R^O^K^E^N ^O^N^L^Y ^B^Y EOR^S ^A^N^D EOF^S ^A^S ^A^P^P^R^O^P^R^I^A^T^E.

      UU   S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^B^I^N^A^R^Y ^D^A^T^A ^W^I^T^H^O^U^T EOR^S ^A^N^D EOF^S.
           NOS ^T^R^E^A^T^S UU ^A^S US.


      D^E^F^A^U^L^T@D  I^F NOS ^I^S ^T^H^E ^R^E^M^O^T^E ^H^O^S^T ^A^N^D ^T^H^E DD ^P^A^R^A^M^E^T^E^R ^H^A^S ^N^O^T ^B^E^E^N
                ^S^P^E^C^I^F^I^E^D, NOS ^A^S^S^U^M^E^S ^C^H^A^R^A^C^T^E^R ^D^A^T^A ^A^N^D ^R^E^A^D^S/^W^R^I^T^E^S ^T^H^E
                ^F^I^L^E ^I^N C6 ^F^O^R^M^A^T.  F^R^O^M ^W^I^T^H^I^N HELPME, ^H^O^W^E^V^E^R, ^T^H^E^R^E ^I^S
                ^N^O ^D^E^F^A^U^L^T ^F^O^R DD ^O^N MFQUEUE@D ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E DD
                ^P^A^R^A^M^E^T^E^R.
.HELP,DC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (DC=^D^C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E ^F^O^R ^T^H^E ^F^I^L^E ^T^O ^B^E
      ^T^R^A^N^S^F^E^R^R^E^D; ^P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ^D^C                         M^E^A^N^I^N^G
      --                         -------

      CP, PH, ^O^R PU  P^U^N^C^H ^T^H^E ^F^I^L^E ^I^N ^C^O^D^E^D ^F^O^R^M^A^T.
      IN             Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^I^N^P^U^T.
      IX             Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^I^N^P^U^T ^B^U^T ^D^O ^N^O^T ^R^E^T^U^R^N ^T^H^E ^O^U^T^P^U^T
                     ^U^N^L^E^S^S ^S^O ^D^I^R^E^C^T^E^D.
      LP ^O^R PR       P^R^I^N^T ^T^H^E ^F^I^L^E.
      PB ^O^R SB       P^U^N^C^H ^T^H^E ^F^I^L^E ^I^N ^S^Y^S^T^E^M ^B^I^N^A^R^Y ^F^O^R^M^A^T.
      P8             P^U^N^C^H ^I^N 80-^C^O^L^U^M^N ^B^I^N^A^R^Y ^F^O^R^M^A^T.
      SP             P^L^O^T ^I^N ^B^I^N^A^R^Y ^F^O^R^M^A^T.

      D^E^F^A^U^L^T@D I^F ^T^H^E DC ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^N^O ^D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E ^I^S
               ^S^P^E^C^I^F^I^E^D.

      N^O^T^E@D  W^H^E^N ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D, ^A ^D^I^R^E^C^T^I^V^E ^F^I^L^E ^C^A^N^N^O^T ^B^E
             ^S^P^E^C^I^F^I^E^D, ^N^O^R ^C^A^N ^D^I^R^E^C^T^I^V^E^S ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W ^T^H^E MFQUEUE
             ^C^O^M^M^A^N^D.
.HELP,PC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (PC=^C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^F^O^R ^T^H^E ^L^I^N^E^S ^O^F ^T^H^E
      ^R^O^U^T^I^N^G ^D^I^R^E^C^T^I^V^E^S.  W^H^E^N ^T^H^E I=^D^I^R^F^I^L^E ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E
      ^S^Y^S^T^E^M ^R^E^A^D^S ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^T^H^E ^L^I^N^E^S ^F^O^L^L^O^W^I^N^G ^T^H^E MFQUEUE ^C^O^M^M^A^N^D.
      E^A^C^H ^O^F ^T^H^E^S^E ^L^I^N^E^S ^M^U^S^T ^H^A^V^E ^A ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E PC=^P^C
      ^P^A^R^A^M^E^T^E^R.  (T^H^E ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^C^A^N ^B^E ^A^N^Y 6-12 ^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E
      ^C^H^A^R^A^C^T^E^R, ^E^X^C^E^P^T ^A ^C^L^O^S^I^N^G ^P^A^R^E^N^T^H^E^S^I^S, ^C^O^M^M^A, ^C^O^L^O^N, ^D^O^L^L^A^R ^S^I^G^N, ^O^R ^A
      ^P^E^R^I^O^D.)  S^U^G^G^E^S^T^E^D ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R^S ^C^A^N ^B^E@D * & # + ? / @A

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M-^S^U^P^P^L^I^E^D ^P^R^E^F^I^X
               ^C^H^A^R^A^C^T^E^R ^I^S ^A^N ^A^S^T^E^R^I^S^K (*).
.ENDHELP
.IF($DC$.EQ.$$,L1)
  .EX.  $MFQUEUE(LFN,#ST=ST,#I=I,#DD=DD,#PC=PC)
.ELSE(L1)
  .EX.  $MFQUEUE(LFN,#ST=ST,#DD=DD,#DC=DC)
.ENDIF(L1)
*WEOR
.PROC,MODE*I
,M[P^R^O^G^R^A^M ^E^R^R^O^R ^M^O^D^E]=(*S2(01234567B),*N=7)
,N[NOS ^C^O^M^P^A^T^I^B^I^L^I^T^Y]=(*A1,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MODE,^M,^N.

      T^H^E MODE ^C^O^M^M^A^N^D ^D^E^F^I^N^E^S ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S ^T^H^A^T ^C^A^U^S^E ^T^H^E ^S^Y^S^T^E^M ^T^O ^E^X^I^T
      ^F^R^O^M ^N^O^R^M^A^L ^P^R^O^C^E^S^S^I^N^G.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^M) ^S^E^L^E^C^T^S ^T^H^E ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N(^S) ^F^O^R ^W^H^I^C^H ^N^O^R^M^A^L ^E^R^R^O^R
      ^P^R^O^C^E^S^S^I^N^G ^D^O^E^S ^A^N^D ^D^O^E^S ^N^O^T ^O^C^C^U^R.  T^H^E ^E^R^R^O^R ^E^X^I^T ^M^O^D^E ^R^A^N^G^E ^I^S
      0<=^M<=17B (^O^C^T^A^L).  ^M=10B ^T^H^R^O^U^G^H 17B ^A^R^E ^O^N^L^Y ^V^A^L^I^D ^F^O^R ^T^H^E CYBER 170
      ^M^O^D^E^L 176.  E^N^T^E^R ^A^N ^O^C^T^A^L ^V^A^L^U^E.

      D^E^F^A^U^L^T@D 7.
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^N) ^I^S ^I^N^C^L^U^D^E^D ^F^O^R ^C^O^M^P^A^T^I^B^I^L^I^T^Y ^W^I^T^H ^E^A^R^L^I^E^R ^V^E^R^S^I^O^N^S
      ^O^F NOS.  T^H^E ^S^Y^S^T^E^M ^N^O^W ^I^G^N^O^R^E^S ^T^H^E ^V^A^L^U^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E ^C^O^M^M^A^N^D.
.ENDHELP
.EX.  $MODE(M)
*WEOR
.PROC,MODIFY*I
,P[P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*F,*K=OPL,0)
,CB[B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E]=(*F,*K=LGO,*N=LGO,0)
,CG[L^O^A^D ^S^Y^S^T^E^M ^T^E^X^T ^F^I^L^E]=(*F,*K=SYSTEXT,*N=SYSTEXT,0)
,CL[F^U^L^L ^L^I^S^T^I^N^G^S ^F^I^L^E]=(*F,*K=OUTPUT,*N=OUTPUT,0)
,CS[T^A^K^E ^S^Y^S^T^E^M ^T^E^X^T ^F^I^L^E]=(*F,*K=SYSTEXT,*N=SYSTEXT,0)
,CV[C^H^A^R^A^C^T^E^R ^S^E^T ^C^O^N^V^E^R^S^I^O^N]=(63,64,0,*N=)
,Q[S^P^E^C^I^F^Y ^C^O^M^P^I^L^E^R ^P^R^O^C^E^S^S^O^R]=(*F,*K=COMPASS,*N=COMPASS,0)
,N[N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*F,*K=NPL,0,*N=)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,*K=OUTPUT,*N=OUTPUT,0)
,LO[L^I^S^T ^O^P^T^I^O^N^S]=(*S7(ACDEIMSTW),*K=,*N=)
,I[D^I^R^E^C^T^I^V^E ^I^N^P^U^T ^F^I^L^E]=(*F,*K=INPUT,*N=INPUT,0)
,C[C^O^M^P^I^L^E ^F^I^L^E]=(*K=COMPILE,*F,*N=COMPILE,0)
,S[S^O^U^R^C^E ^F^I^L^E]=(*F,*K=SOURCE,0,*N=)
,A[C^O^M^P^R^E^S^S^E^D ^C^O^M^P^I^L^E ^F^I^L^E]=(YES=$,A$,Y=$,A$,*K=$,A$,NO=,N=,*N=)
,D[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,D$,N=$,D$,*K=$,D$)
,F[E^D^I^T ^A^L^L ^D^E^C^K^S ^O^N ^L^I^B^R^A^R^Y]=(YES=$,F$,Y=$,F$,*K=$,F$,NO=,N=,*N=)
,U[U^P^D^A^T^E ^E^D^I^T]=(YES=$,U$,Y=$,U$,*K=$,U$,NO=,N=,*N=)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,X[P^R^O^C^E^S^S Q ^P^A^R^A^M^E^T^E^R]=(YES=,Y=,*N=,NO=$,X$,N=$,X$,*K=$,X$)
,Z[R^E^A^D ^I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S ^F^O^L^L^O^W^I^N^G ^T^E^R^M^I^N^A^T^O^R]=(YES=,Y=,*N=,NO=$,X$,N=$,X$,
*K=$,X$)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MODIFY,P=^L^F^N9,CB=^L^F^N2,CG=^L^F^N3,CL=^L^F^N4,CS=^L^F^N5,Q=^P^R^O^C^E^S^S^O^R,CV=^C^V,
                 N=^L^F^N8, L=^L^F^N7,LO=^C1,^C2..^C^N,I=^L^F^N6,C=^L^F^N1,S=^L^F^N10,A,D,F,U,NR,X,
                 Z.

      T^H^E MODIFY ^C^O^M^M^A^N^D ^P^E^R^F^O^R^M^S ^E^D^I^T ^F^U^N^C^T^I^O^N^S ^O^N ^A ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
.HELP,P,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (P=^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E
      ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^T^O ^B^E ^E^D^I^T^E^D ^B^Y MODIFY. (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.) P=0 (^Z^E^R^O) ^R^E^S^U^L^T^S ^I^N ^N^O ^I^N^P^U^T ^F^I^L^E ^F^O^R ^T^H^E
      ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.

      D^E^F^A^U^L^T@D F^I^L^E OPL
.HELP,CB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CB=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^O ^W^R^I^T^E ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^O^N ^F^I^L^E
      ^L^F^N2.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O ^T^H^E B=^L^F^N ^P^A^R^A^M^E^T^E^R ^O^N ^A ^C^O^M^P^I^L^E^R
      ^O^R ^A^S^S^E^M^B^L^E^R ^C^A^L^L ^C^O^M^M^A^N^D.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y CB ^O^R ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R,
      LGO ^I^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E.  CB=0 ^P^R^O^D^U^C^E^S ^N^O ^B^I^N^A^R^Y ^O^U^T^P^U^T.  T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^S ^M^E^A^N^I^N^G^F^U^L ^O^N^L^Y ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E Q=^P^R^O^C^E^S^S^O^R ^O^R
      X=^P^R^O^C^E^S^S^O^R ^P^A^R^A^M^E^T^E^R.
.HELP,CG,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CG=^L^F^N3 ^S^P^E^C^I^F^I^E^S ^T^O ^L^O^A^D ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^F^R^O^M ^F^I^L^E ^L^F^N3.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O ^T^H^E G=^L^F^N ^P^A^R^A^M^E^T^E^R ^O^N ^A ^C^O^M^P^I^L^E^R ^O^R
      ^A^S^S^E^M^B^L^E^R ^C^A^L^L ^C^O^M^M^A^N^D.  L^O^A^D ^S^Y^S^T^E^M ^T^E^X^T ^F^R^O^M SYSTEXT.  CG=0 ^L^O^A^D^S
      ^N^O ^S^Y^S^T^E^M ^T^E^X^T.  B^Y ^D^E^F^A^U^L^T, ^T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^T^H^E CS=^L^F^N5 ^P^A^R^A^M^E^T^E^R.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^M^E^A^N^I^N^G^F^U^L ^O^N^L^Y ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E Q=^P^R^O^C^E^S^S^O^R ^O^R
      X=^P^R^O^C^E^S^S^O^R ^P^A^R^A^M^E^T^E^R.
.HELP,CL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CL=^L^F^N4 ^S^P^E^C^I^F^I^E^S ^T^O ^W^R^I^T^E ^A ^F^U^L^L ^L^I^S^T^I^N^G ^O^N ^F^I^L^E ^L^F^N4.
      CL=^L^F^N4 ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O ^T^H^E L=^L^F^N ^P^A^R^A^M^E^T^E^R ^O^N ^A ^C^O^M^P^I^L^E^R ^O^R ^A^S^S^E^M^B^L^E^R
      ^C^A^L^L ^C^O^M^M^A^N^D.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y CL, OUTPUT ^I^S ^T^H^E ^L^I^S^T ^F^I^L^E.  I^F ^Y^O^U
      ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^S^P^E^C^I^F^Y CL=0, ^A ^S^H^O^R^T ^L^I^S^T^I^N^G ^I^S ^W^R^I^T^T^E^N ^O^N OUTPUT.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^M^E^A^N^I^N^G^F^U^L ^O^N^L^Y ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E Q=^P^R^O^C^E^S^S^O^R ^O^R
      X=^P^R^O^C^E^S^S^O^R ^P^A^R^A^M^E^T^E^R.
.HELP,CS,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CS=^L^F^N5 ^S^P^E^C^I^F^I^E^S ^T^O ^T^A^K^E ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^F^R^O^M ^F^I^L^E ^L^F^N5.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O ^T^H^E S=^L^F^N ^P^A^R^A^M^E^T^E^R ^O^N ^A ^C^O^M^P^I^L^E^R ^O^R
      ^A^S^S^E^M^B^L^E^R ^C^A^L^L ^C^O^M^M^A^N^D.  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^S^P^E^C^I^F^Y ^O^N^L^Y CS,
      ^T^H^E ^S^Y^S^T^E^M ^T^E^X^T ^I^S ^T^A^K^E^N ^F^R^O^M SYSTEXT ^O^V^E^R^L^A^Y.  CS=0 ^P^R^O^D^U^C^E^S ^N^O ^S^Y^S^T^E^M
      ^T^E^X^T.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^M^E^A^N^I^N^G^F^U^L ^O^N^L^Y ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E Q=^P^R^O^C^E^S^S^O^R
      ^O^R X=^P^R^O^C^E^S^S^O^R ^P^A^R^A^M^E^T^E^R.
.HELP,Q,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R Q=^P^R^O^C^E^S^S^O^R ^S^P^E^C^I^F^I^E^S ^T^O ^S^E^T LO=E ^A^N^D ^T^H^E A ^P^A^R^A^M^E^T^E^R ^A^T ^T^H^E
      ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E M^O^D^I^F^Y ^R^U^N, ^A^N^D ^C^A^L^L ^T^H^E ^A^S^S^E^M^B^L^E^R ^O^R ^C^O^M^P^I^L^E^R ^S^P^E^C^I^F^I^

      ^B^Y ^T^H^E ^P^R^O^C^E^S^S^O^R ^A^T ^T^H^E ^E^N^D ^O^F ^T^H^E ^R^U^N.  T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T ^R^E^W^I^N^D ^T^H^E
      ^D^I^R^E^C^T^I^V^E^S ^F^I^L^E ^O^R ^T^H^E ^L^I^S^T ^O^U^T^P^U^T ^F^I^L^E.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^O^R ^S^P^E^C^I^F^Y Q=0, ^N^O ^C^A^L^L ^I^S ^M^A^D^E ^T^O ^A^N ^A^S^S^E^M^B^L^E^R ^O^R ^C^O^M^P^I^L^E^R.
.HELP,N,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R (N=^L^F^N8) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E
      ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^T^O ^B^E ^W^R^I^T^T^E^N.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D N, ^T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^F^I^L^E NPL.

      D^E^F^A^U^L^T@D  I^F N ^I^S ^O^M^I^T^T^E^D ^O^R N=0, ^N^O ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^C^R^E^A^T^E^D.
.HELP,I,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (I=^L^F^N6) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G MODIFY
      ^D^I^R^E^C^T^I^V^E^S. T^H^E ^S^Y^S^T^E^M ^R^E^A^D^S ^N^O ^D^I^R^E^C^T^I^V^E^S ^I^F ^Y^O^U ^E^N^T^E^R I=0 (^Z^E^R^O).  (A
      ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  F^I^L^E ^N^A^M^E INPUT
.HELP,C,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (C=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^A^T MODIFY ^W^R^I^T^E ^T^H^E ^C^O^M^P^I^L^E ^O^U^T^P^U^T ^O^N
      ^T^H^I^S ^F^I^L^E.  I^F ^Y^O^U ^E^N^T^E^R C=0 (^Z^E^R^O), ^N^O ^C^O^M^P^I^L^E ^O^U^T^P^U^T ^I^S ^W^R^I^T^T^E^N.  (A
      ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  I^F ^O^N^L^Y C ^I^S ^S^P^E^C^I^F^I^E^D ^O^R ^O^M^I^T^T^E^D, ^L^F^N1 ^I^S COMPILE.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N7) ^S^P^E^C^I^F^I^E^S ^T^H^A^T MODIFY ^W^R^I^T^E ^O^U^T^P^U^T ^T^O ^T^H^I^S ^F^I^L^E.
      I^F ^Y^O^U ^S^P^E^C^I^F^Y L=0 (^Z^E^R^O), ^N^O ^O^U^T^P^U^T ^F^I^L^E ^I^S ^G^E^N^E^R^A^T^E^D.  (A ^F^I^L^E ^N^A^M^E ^M^U^S^T
      ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  F^I^L^E OUTPUT.
.HELP,LO,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R LO=^C1,^C2...^C^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T ^O^P^T^I^O^N ^F^O^R ^C1.  I^N ^A^N
      ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=E ^I^F ^T^H^E ^L^I^S^T ^O^U^T^P^U^T ^F^I^L^E ^I^S ^A^S^S^I^G^N^E^D
      ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.  O^T^H^E^R^W^I^S^E, ^T^H^E ^D^E^F^A^U^L^T ^I^S LO=ECTMWD.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^A
      ^M^A^X^I^M^U^M ^O^F ^S^E^V^E^N ^L^I^S^T ^O^P^T^I^O^N^S ^F^O^R ^C^I (^F^O^R ^E^X^A^M^P^L^E@D LO=EMS).

                ^C^I             S^I^G^N^I^F^I^C^A^N^C^E
                --             ------------

                 A       A^C^T^I^V^E ^L^I^N^E^S ^I^N ^D^E^C^K.
                 C       D^I^R^E^C^T^I^V^E^S ^O^T^H^E^R ^T^H^A^N INSERT, DELETE,
                         RESTORE, MODNAME, I, ^O^R D.
                 D       D^E^C^K ^S^T^A^T^U^S.
                 E       E^R^R^O^R^S.
                 I       I^N^A^C^T^I^V^E ^L^I^N^E^S ^I^N ^D^E^C^K.
                 M       M^O^D^I^F^I^C^A^T^I^O^N^S ^P^E^R^F^O^R^M^E^D.
                 S       S^T^A^T^I^S^T^I^C^S.
                 T       T^E^X^T ^I^N^P^U^T.
                 W       C^O^M^P^I^L^E ^F^I^L^E ^D^I^R^E^C^T^I^V^E^S.
.HELP,S,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (S=^L^F^N10) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E.
      (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.) I^F ^Y^O^U ^S^P^E^C^I^F^Y
      ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D (S), ^T^H^E ^F^I^L^E SOURCE ^I^S ^U^S^E^D.  I^F ^Y^O^U ^S^P^E^C^I^F^Y S=0
      (^Z^E^R^O), ^N^O ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E ^I^S ^G^E^N^E^R^A^T^E^D.

      D^E^F^A^U^L^T@D  I^F S ^I^S ^O^M^I^T^T^E^D, ^N^O ^S^O^U^R^C^E ^O^U^T^P^U^T ^F^I^L^E ^I^S ^G^E^N^E^R^A^T^E^D.
.HELP,A,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (A) ^W^R^I^T^E^S ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^N ^C^O^M^P^R^E^S^S^E^D ^F^O^R^M^A^T.
      T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R A; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^S ^N^O^T ^W^R^I^T^T^E^N ^I^N ^C^O^M^P^R^E^S^S^E^D ^F^O^R^M^A^T.
.HELP,D,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (D) ^C^A^U^S^E^S MODIFY ^N^O^T ^T^O ^A^B^O^R^T ^Y^O^U^R ^J^O^B ^I^F ^A
      ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R ^O^C^C^U^R^S.  E^N^T^E^R D ^T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R;
      ^O^M^I^T ^I^T ^T^O ^A^B^O^R^T ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S.

      D^E^F^A^U^L^T@D  Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^O^N ^A ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R.
.HELP,F,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (F) ^E^D^I^T^S ^A^L^L ^D^E^C^K^S ^O^N ^T^H^E ^L^I^B^R^A^R^Y ^A^N^D ^W^R^I^T^E^S ^T^H^E^M
      ^O^N ^A ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y, ^C^O^M^P^I^L^E ^F^I^L^E, ^A^N^D ^S^O^U^R^C^E ^F^I^L^E ^I^F ^T^H^E^S^E
      ^O^P^T^I^O^N^S ^W^E^R^E ^S^E^L^E^C^T^E^D.  T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^N^T^E^R F; ^O^T^H^E^R^W^I^S^E
      ^O^M^I^T.

      D^E^F^A^U^L^T@D  I^F F ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E U ^P^A^R^A^M^E^T^E^R ^O^R ^T^H^E EDIT
                ^D^I^R^E^C^T^I^V^E^S ^D^E^T^E^R^M^I^N^E ^T^H^E ^D^E^C^K^S ^T^O ^B^E ^E^D^I^T^E^D.
.HELP,U,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (U) ^C^A^U^S^E^S MODIFY ^T^O ^E^D^I^T ^O^N^L^Y ^D^E^C^K^S ^F^O^R ^W^H^I^C^H
      ^T^H^E ^D^I^R^E^C^T^I^V^E ^F^I^L^E ^C^O^N^T^A^I^N^S ^D^E^C^K ^D^I^R^E^C^T^I^V^E^S, ^A^N^D ^T^O ^W^R^I^T^E ^T^H^E^M
      ^O^N ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E, ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y, ^A^N^D ^S^O^U^R^C^E ^F^I^L^E (^I^F
      ^T^H^O^S^E ^P^A^R^A^M^E^T^E^R^S ^W^E^R^E ^S^P^E^C^I^F^I^E^D). T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R
      U; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  (T^H^E F ^P^A^R^A^M^E^T^E^R ^T^A^K^E^S ^P^R^E^C^E^D^E^N^C^E
      ^O^V^E^R U.)

      D^E^F^A^U^L^T@D  I^F U ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^D^E^C^K^S ^T^O ^B^E ^E^D^I^T^E^D ^A^R^E
                ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E EDIT ^D^I^R^E^C^T^I^V^E^S ^O^R ^B^Y ^T^H^E F ^P^A^R^A^M^E^T^E^R.
.HELP,NR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NR) ^S^P^E^C^I^F^I^E^S ^N^O ^R^E^W^I^N^D ^O^N ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E.  T^O
      ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R NR; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^S ^R^E^W^O^U^N^D ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^A^N^D ^E^N^D ^O^F
                MODIFY ^E^X^E^C^U^T^I^O^N.
.HELP,CV,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CV=^C^V) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^C^O^N^V^E^R^S^I^O^N.

       ^C^V                   D^E^S^C^R^I^P^T^I^O^N
       --                   -----------
        0         N^O ^C^O^N^V^E^R^S^I^O^N ^T^A^K^E^S ^P^L^A^C^E.
       63         C^O^N^V^E^R^T ^L^I^B^R^A^R^Y ^U^S^I^N^G 64-^C^H^A^R^A^C^T^E^R ^S^E^T ^T^O
                  63-^C^H^A^R^A^C^T^E^R ^S^E^T.
       64         C^O^N^V^E^R^T ^L^I^B^R^A^R^Y ^U^S^I^N^G 63-^C^H^A^R^A^C^T^E^R ^S^E^T ^T^O
                  64-^C^H^A^R^A^C^T^E^R ^S^E^T.

      D^E^F^A^U^L^T@D  CV=0 ^I^F ^C^V ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,X,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^O ^P^R^O^C^E^S^S ^T^H^E ^S^A^M^E ^A^S Q=^P^R^O^C^E^S^S^O^R ^P^A^R^A^M^E^T^E^R,
      ^E^X^C^E^P^T ^T^H^A^T ^M^O^D^I^F^Y ^D^I^R^E^C^T^I^V^E^S ^I^N^P^U^T (I ^P^A^R^A^M^E^T^E^R) ^A^N^D ^L^I^S^T ^O^U^T^P^U^T
      (L ^P^A^R^A^M^E^T^E^R) ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^P^R^O^C^E^S^S^I^N^G.
.HELP,Z,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R Z ^S^P^E^C^I^F^I^E^S ^T^O ^R^E^A^D ^T^H^E ^I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S ^F^O^L^L^O^W^I^N^G ^T^H^E
      ^T^E^R^M^I^N^A^T^O^R ^O^F ^T^H^E MODIFY ^C^O^M^M^A^N^D; ^T^H^E ^I^N^P^U^T ^F^I^L^E ^I^S ^N^O^T ^R^E^A^D.  T^H^I^S
      ^E^L^I^M^I^N^A^T^E^S ^T^H^E ^N^E^E^D ^F^O^R ^A ^S^E^P^A^R^A^T^E ^I^N^P^U^T ^F^I^L^E ^F^O^R ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^W^H^E^N
      ^O^N^L^Y ^A ^F^E^W ^D^I^R^E^C^T^I^V^E^S ^A^R^E ^N^E^E^D^E^D.  T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^I^N^G ^T^H^E
      ^C^O^M^M^A^N^D ^T^E^R^M^I^N^A^T^O^R ^I^S ^T^H^E ^S^E^P^A^R^A^T^O^R ^C^H^A^R^A^C^T^E^R ^F^O^R ^A^L^L ^D^I^R^E^C^T^I^V^E^S ^O^N
      ^T^H^E ^C^O^M^M^A^N^D.  A^N^Y ^D^I^S^P^L^A^Y ^C^O^D^E ^C^H^A^R^A^C^T^E^R ^T^H^A^T ^I^S ^N^O^T ^U^S^E^D ^I^N ^A^N^Y ^O^F
      ^T^H^E ^D^I^R^E^C^T^I^V^E^S, ^I^N^C^L^U^D^I^N^G ^A ^S^P^A^C^E, ^C^A^N ^B^E ^U^S^E^D ^A^S ^T^H^E ^S^E^P^A^R^A^T^O^R
      ^C^H^A^R^A^C^T^E^R.  C^O^N^T^I^N^U^A^T^I^O^N ^L^I^N^E^S ^A^R^E ^N^O^T ^P^E^R^M^I^T^T^E^D.  I^F Z ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^C^O^N^T^A^I^N ^T^H^E ^I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S.

      NOTE@D  D^O ^N^O^T ^P^L^A^C^E ^A^N^O^T^H^E^R ^T^E^R^M^I^N^A^T^O^R ^A^F^T^E^R ^T^H^E ^D^I^R^E^C^T^I^V^E^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,MOVE*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  MOVE,^Q..^R,^N,^Z.

      T^H^E MOVE ^C^O^M^M^A^N^D ^M^O^V^E^S ^L^I^N^E^S ^F^R^O^M ^O^N^E ^L^O^C^A^T^I^O^N ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^T^O
      ^A^N^O^T^H^E^R ^L^O^C^A^T^I^O^N.

      T^H^E ^L^I^N^E ^R^A^N^G^E ^P^A^R^A^M^E^T^E^R ^Q..^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E^S ^T^O ^B^E ^M^O^V^E^D ^A^N^D ^M^A^Y ^B^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^A ^S^I^N^G^L^E ^L^I^N^E ^N^U^M^B^E^R.

      T^H^E ^N ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E ^N^U^M^B^E^R ^A^F^T^E^R ^W^H^I^C^H ^T^H^E ^M^O^V^E^D ^L^I^N^E^S
      ^A^R^E ^T^O ^B^E ^I^N^S^E^R^T^E^D.  I^F ^T^H^E ^N ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^L^I^N^E^S ^A^R^E ^M^O^V^E^D
      ^T^O ^T^H^E ^E^N^D ^O^F ^T^H^E ^F^I^L^E ^A^N^D ^S^U^C^C^E^S^S^I^V^E ^L^I^N^E ^N^U^M^B^E^R^S ^A^R^E ^G^E^N^E^R^A^T^E^D
      ^I^N ^I^N^C^R^E^M^E^N^T^S ^O^F ^Z, ^I^F ^S^P^E^C^I^F^I^E^D, ^F^R^O^M ^T^H^E ^L^A^S^T ^L^I^N^E ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
      T^H^E ^L^I^N^E ^N^U^M^B^E^R (^N) ^A^N^D ^L^I^N^E ^N^U^M^B^E^R ^I^N^C^R^E^M^E^N^T (^Z) ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^P^T^I^O^N^A^L

      I^F ^T^H^E ^N^E^W ^L^I^N^E ^N^U^M^B^E^R^S ^O^V^E^R^L^A^P ^E^X^I^S^T^I^N^G ^L^I^N^E ^N^U^M^B^E^R^S ^I^N ^T^H^E ^P^R^I^M^A^R^Y
      ^F^I^L^E, ^L^I^N^E ^R^E^S^E^Q^U^E^N^C^I^N^G ^O^C^C^U^R^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,NEW*I
,LFN[P^R^I^M^A^R^Y ^F^I^L^E ^N^A^M^E]=(*F)
,ND[D^R^O^P ^A^L^L ^C^U^R^R^E^N^T ^F^I^L^E^S]=(YES=,Y=,NO=$/ND$,N=$/ND$,*K=$/ND$,*N=$/ND$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NEW,^L^F^N/ND.

      T^H^E NEW ^C^O^M^M^A^N^D ^C^R^E^A^T^E^S ^A^N ^E^M^P^T^Y ^F^I^L^E (^L^F^N) ^A^N^D ^M^A^K^E^S ^I^T ^Y^O^U^R ^P^R^I^M^A^R^Y
      ^F^I^L^E.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^E ND ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^W^I^L^L ^R^E^L^E^A^S^E
      ^A^L^L ^T^H^E ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B, ^E^X^C^E^P^T ^F^O^R ^T^H^O^S^E ^W^I^T^H ^A ^N^O-^A^U^T^O-^D^R^O^P
      ^S^T^A^T^U^S.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^M^A^D^E ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.  A ^F^I^L^E
      ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,ND,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ND) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N^O ^F^I^L^E^S ^C^U^R^R^E^N^T^L^Y ^A^S^S^I^G^N^E^D
      ^T^O ^Y^O^U^R ^J^O^B ^A^R^E ^R^E^L^E^A^S^E^D (^D^R^O^P^P^E^D) ^W^H^E^N ^T^H^E NEW ^C^O^M^M^A^N^D ^I^S ^E^X^E^C^U^T^E^D.
      T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R ND; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ND, ^T^H^E ^S^Y^S^T^E^M ^R^E^L^E^A^S^E^S ^A^L^L
               ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^E^X^C^E^P^T ^T^H^O^S^E ^W^I^T^H ^C^H^E^C^K^P^O^I^N^T
               ^O^R ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S. (F^R^O^M HELPME, ^H^O^W^E^V^E^R, ^T^H^E ND
               ^P^A^R^A^M^E^T^E^R ^I^S ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^P^E^C^I^F^I^E^D.)
.ENDHELP
.EX.  $NEW(LFN_ND)
*WEOR
.PROC,NOEXIT*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NOEXIT.

      T^H^E NOEXIT ^C^O^M^M^A^N^D ^S^U^P^P^R^E^S^S^E^S EXIT ^C^O^M^M^A^N^D ^P^R^O^C^E^S^S^I^N^G.  I^F ^A^N ^E^R^R^O^R
      ^O^C^C^U^R^S, ^C^O^N^T^R^O^L ^I^S ^N^O^T ^T^R^A^N^S^F^E^R^R^E^D ^T^O ^T^H^E ^C^O^M^M^A^N^D ^F^O^L^L^O^W^I^N^G
      ^T^H^E EXIT ^C^O^M^M^A^N^D, ^B^U^T ^I^S ^T^R^A^N^S^F^E^R^R^E^D ^I^N^S^T^E^A^D ^T^O ^T^H^E ^N^E^X^T ^C^O^M^M^A^N^D.
.ENDHELP
.EX.  $NOEXIT.
*WEOR
.PROC,NOGO*I
,LFN[F^I^L^E ^T^O ^R^E^C^E^I^V^E ^C^O^R^E ^I^M^A^G^E ^M^O^D^U^L^E]=(*F,*N=)
,EPTNAME[E^N^T^R^Y ^P^O^I^N^T^S ^T^O ^I^N^C^L^U^D^E ^I^N ^H^E^A^D^E^R]=(*A40,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NOGO,^L^F^N,^E^P^T^N^A^M^E1,...,^E^P^T^N^A^M^E^N.
               NOGO,^L^F^N.
               NOGO.

      T^H^E NOGO ^C^O^M^M^A^N^D ^C^A^U^S^E^S ^C^O^M^P^L^E^T^I^O^N ^O^F ^L^O^A^D.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^C^O^R^E ^I^M^A^G^E ^M^O^D^U^L^E ^I^S ^T^O ^B^E
      ^W^R^I^T^T^E^N.
.HELP,EPTNAME,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E^S ^O^F ^E^N^T^R^Y ^P^O^I^N^T^S ^T^O ^B^E ^I^N^C^L^U^D^E^D ^I^N ^T^H^E ^H^E^A^D^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,NORERUN*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NORERUN.

      T^H^E NORERUN ^C^O^M^M^A^N^D ^C^L^E^A^R^S ^T^H^E ^J^O^B ^R^E^R^U^N ^S^T^A^T^U^S.
.ENDHELP
.EX.  $NORERUN.
*WEOR
.PROC,NORMAL*I
,P[D^O ^Y^O^U ^W^A^N^T NORMAL ^M^O^D^E]=(Y,YES=Y,N,NO=N,*N=N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NORMAL

      T^H^E NORMAL ^C^O^M^M^A^N^D ^P^U^T^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^N ^U^P^P^E^R^C^A^S^E ^O^N^L^Y ^M^O^D^E.  (T^H^E
      ASCII ^C^O^M^M^A^N^D, ^O^N ^T^H^E ^O^T^H^E^R ^H^A^N^D, ^P^R^O^V^I^D^E^S ^U^P^P^E^R^C^A^S^E ^A^N^D ^L^O^W^E^R^C^A^S^E
      ^C^H^A^R^A^C^T^E^R^S.)
.HELP,P,NOLIST

      E^N^T^E^R          T^O ^S^P^E^C^I^F^Y
      -----          ----------

      Y              U^P^P^E^R^C^A^S^E ^M^O^D^E ^O^N^L^Y
      N              U^P^P^E^R ^A^N^D ^L^O^W^E^R ^C^A^S^E (ASCII)

      D^E^F^A^U^L^T@D U^P^P^E^R ^A^N^D ^L^O^W^E^R ^C^A^S^E (ASCII).
.ENDHELP
.IF($P$.EQ.$Y$,L1)
  .EX.  $CSET,NORMAL.
.ENDIF(L1)
*WEOR
.PROC,NOSORT*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NOSORT

      T^H^E NOSORT ^C^O^M^M^A^N^D ^P^R^E^V^E^N^T^S ^T^H^E ^S^Y^S^T^E^M ^F^R^O^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^O^R^T^I^N^G ^T^H^E
      ^P^R^I^M^A^R^Y ^F^I^L^E ^B^Y ^C^L^E^A^R^I^N^G ^A^N ^I^N^T^E^R^N^A^L ^I^N^D^I^C^A^T^O^R ^C^A^L^L^E^D ^T^H^E ^S^O^R^T ^F^L^A^G.
      N^O^R^M^A^L^L^Y, ^T^H^E ^S^Y^S^T^E^M ^S^O^R^T^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E, ^I^F ^N^E^E^D^E^D, ^W^H^E^N^E^V^E^R ^T^H^E
      ^C^U^R^R^E^N^T ^C^O^M^M^A^N^D ^C^A^U^S^E^S ^I^T ^T^O ^R^E^A^D ^T^H^E ^F^I^L^E.

      T^H^I^S ^C^O^M^M^A^N^D ^C^A^N ^B^E ^U^S^E^D ^W^H^E^N ^M^A^K^I^N^G ^A^D^D^I^T^I^O^N^S ^O^R ^O^T^H^E^R ^M^O^D^I^F^I^C^A^T^I^O^N^S ^T

      ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.  W^H^E^N ^F^O^L^L^O^W^E^D ^B^Y ^T^H^E NOSORT ^C^O^M^M^A^N^D, ^T^H^E ^M^O^D^I^F^I^C^A^T^I^O^N^S
      ^C^R^E^A^T^E ^A ^N^E^W ^L^O^G^I^C^A^L ^R^E^C^O^R^D ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.  T^H^E NOSORT ^C^O^M^M^A^N^D
      ^R^E^M^A^I^N^S ^I^N ^E^F^F^E^C^T ^O^N^L^Y ^U^N^T^I^L ^T^H^E ^N^E^X^T ^N^U^M^B^E^R^E^D ^L^I^N^E ^O^F ^S^O^U^R^C^E ^C^O^D^E ^I^S
      ^E^N^T^E^R^E^D.  T^H^I^S ^C^A^U^S^E^S ^T^H^E ^S^O^R^T ^F^L^A^G ^T^O ^B^E ^T^U^R^N^E^D ^O^N ^A^G^A^I^N.
.ENDHELP.
$REVERT(NOLIST)
*WEOR
.PROC,NOTE*I
,LFN[L^O^C^A^L F^I^L^E N^A^M^E]=(*A1,*N)
,NR[I^N^H^I^B^I^T R^E^W^I^N^D (NR)]=(*A1,*N)
,LIN[C^H^A^R^A^C^T^E^R S^T^R^I^N^G]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  NOTE,^L^F^N,NR./^L^I^N^E1/^L^I^N^E2/.../^L^I^N^E^N.

      T^H^E NOTE ^C^O^M^M^A^N^D ^C^R^E^A^T^E^S ^A ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^L^I^N^E^S ^O^F ^D^A^T^A ^E^N^T^E^R^E^D ^A^S ^A
      ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G ^O^N ^T^H^E ^S^A^M^E ^L^I^N^E ^A^S ^T^H^E NOTE ^C^O^M^M^A^N^D.

      T^H^E ^P^A^R^A^M^E^T^E^R / ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^L^I^M^I^T^I^N^G ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^S^E^P^A^R^A^T^E ^T^H^E
      ^I^N^D^I^V^I^D^U^A^L ^E^N^T^R^I^E^S ^T^H^A^T ^B^E^C^O^M^E ^L^I^N^E^S ^I^N ^T^H^E ^F^I^L^E.  I^T ^C^A^N ^B^E ^A^N^Y
      ^C^H^A^R^A^C^T^E^R.  I^T ^M^U^S^T ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W ^A ^P^E^R^I^O^D ^O^R ^R^I^G^H^T ^P^A^R^E^N^T^H^E^S^I^S.
      M^U^L^T^I^P^L^E ^D^E^L^I^M^I^T^E^R^S ^G^E^N^E^R^A^T^E ^B^L^A^N^K ^L^I^N^E^S.
.HELP,LFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^W^H^I^C^H ^C^O^N^T^A^I^N^S ^T^H^E
      ^S^P^E^C^I^F^I^E^D ^L^I^N^E^S.  D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,NR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NR ^I^N^H^I^B^I^T^S ^T^H^E ^R^E^W^I^N^D^I^N^G ^O^F ^L^F^N.  D^E^F^A^U^L^T ^I^S ^T^O ^R^E^W^I^N^D
      ^T^H^E ^F^I^L^E ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^A^N^D ^E^N^D ^O^F NOTE ^C^O^M^M^A^N^D ^E^X^E^C^U^T^I^O^N.
.HELP,LIN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^I^N^E^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G ^W^H^I^C^H ^C^O^N^S^T^I^T^U^T^E^S ^O












      ^L^I^N^E ^O^F ^D^A^T^A ^I^N ^L^F^N.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,NULL*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST
      F^O^R^M^A^T@D  NULL

      T^H^E NULL ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^H^E ^N^U^L^L ^S^U^B^S^Y^S^T^E^M.  Y^O^U ^C^A^N^N^O^T ^U^S^E ^T^H^E RUN
      ^C^O^M^M^A^N^D ^U^N^D^E^R ^T^H^I^S ^S^U^B^S^Y^S^T^E^M.  T^H^I^S ^C^O^M^M^A^N^D ^I^S ^E^N^T^E^R^E^D ^B^E^F^O^R^E ^S^A^V^I^N^G ^T^H^
      ^P^R^I^M^A^R^Y ^F^I^L^E ^I^F ^Y^O^U ^D^O ^N^O^T ^W^A^N^T ^A ^S^P^E^C^I^F^I^C ^S^U^B^S^Y^S^T^E^M ^F^L^A^G ^T^O ^B^E
      ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^F^I^L^E.  N^O^R^M^A^L^L^Y, ^W^H^E^N ^Y^O^U ^S^A^V^E ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E,
      ^A^N ^I^N^T^E^R^N^A^L ^I^N^D^I^C^A^T^O^R ^C^A^L^L^E^D ^T^H^E ^S^U^B^S^Y^S^T^E^M ^F^L^A^G ^I^S ^S^E^T ^T^O ^I^N^D^I^C^A^T^E ^T^H^E
      ^S^U^B^S^Y^S^T^E^M ^C^U^R^R^E^N^T^L^Y ^I^N ^U^S^E.  T^H^A^T ^S^U^B^S^Y^S^T^E^M ^I^S ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^E^L^E^C^T^E^D
      ^I^N ^E^A^C^H ^S^U^C^C^E^E^D^I^N^G ^R^E^Q^U^E^S^T ^F^O^R ^T^H^E ^F^I^L^E ^U^S^I^N^G ^T^H^E OLD ^C^O^M^M^A^N^D.
      A^N ^A^L^T^E^R^N^A^T^I^V^E ^W^A^Y ^O^F ^S^A^V^I^N^G ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^W^I^T^H ^N^O ^S^U^B^S^Y^S^T^E^M
      ^A^S^S^O^C^I^A^T^I^O^N ^I^S ^T^O ^S^P^E^C^I^F^Y ^T^H^E SS=NULL ^P^A^R^A^M^E^T^E^R ^O^N ^T^H^E SAVE ^C^O^M^M^A^N^D.
      N^O ^A^U^T^O^M^A^T^I^C ^S^U^B^S^Y^S^T^E^M ^A^S^S^O^C^I^A^T^I^O^N ^O^C^C^U^R^S ^W^H^E^N ^S^A^V^I^N^G ^T^E^M^P^O^R^A^R^Y
      ^F^I^L^E^S ^O^T^H^E^R ^T^H^A^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.

      I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^S^U^B^S^Y^S^T^E^M ^A^T ^L^O^G^I^N ^T^I^M^E, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S ^T^H^E
      ^S^U^B^S^Y^S^T^E^M ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E ^V^A^L^I^D^A^T^I^O^N ^F^I^L^E ^D^U^R^I^N^G ^L^O^G^I^N (^S^E^E LIMITS
      ^C^O^M^M^A^N^D).  N^U^L^L ^I^S ^T^H^E ^D^E^F^A^U^L^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,OFFSW*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  OFFSW,^S^W^I^T^C^H1,^S^W^I^T^C^H2,...,^S^W^I^T^C^H^N,^J^S^N.

      T^H^E OFFSW ^C^O^M^M^A^N^D ^C^L^E^A^R^S ^T^H^E ^S^E^N^S^E ^S^W^I^T^C^H^E^S ^F^O^R ^R^E^F^E^R^E^N^C^E ^B^Y ^O^N^E ^O^F
      ^Y^O^U^R ^J^O^B^S.

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^W^I^T^C^H(^I) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^W^I^T^C^H(^E^S) ^T^O ^B^E ^C^L^E^A^R^E^D.
      Y^O^U ^M^U^S^T ^D^E^N^O^T^E ^E^A^C^H ^S^W^I^T^C^H ^S^W^I^T^C^H(^I) ^B^Y ^A^N ^I^N^T^E^G^E^R ^I^N ^T^H^E ^R^A^N^G^E ^O^F 1
      ^T^H^R^O^U^G^H 6.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 0 ^F^O^R ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^C^L^E^A^R^S
      ^A^L^L ^S^E^N^S^E ^S^W^I^T^C^H^E^S.

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^J^O^B ^W^H^O^S^E
      ^S^E^N^S^E ^S^W^I^T^C^H(^E^S) ^W^I^L^L ^B^E ^C^H^A^N^G^E^D.  ^J^S^N ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R; ^I^T^S
      ^D^E^F^A^U^L^T ^I^S ^T^H^E JSN ^O^F ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^G^N^I^Z^E^S ^T^H^E ^J^S^N
      ^P^A^R^A^M^E^T^E^R ^B^Y ^I^T^S ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R^S; ^T^H^E^R^E^F^O^R^E, ^J^S^N ^C^A^N ^A^P^P^E^A^R ^A^N^Y^W^
R^E
      ^I^N ^T^H^E ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^A^N^D ^C^A^N ^B^E ^O^M^I^T^T^E^D ^W^I^T^H^O^U^T ^L^E^A^V^I^N^G ^A ^B^L^A^N^K
      ^P^A^R^A^M^E^T^E^R ^F^I^E^L^D.
.ENDHELP.
$REVERT(NOLIST)
*WEOR
.PROC,OLD*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/ND[S^A^V^E ^L^O^C^A^L ^F^I^L^E^S]=(*K=$,ND$,YES=$,ND$,Y=$,ND$,NO=,N=,*N=$,ND$)
,UN[U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
,RT[R^E^A^L-^T^I^M^E ^P^R^O^C^E^S^S^I^N^G]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  OLD,^L^F^N=^P^F^N/ND,UN=^U^S^E^R^N^A^M^E,PW=^P^A^S^S^W^O^R^D,PN=^P^A^C^K^N^A^M^E,
                 R=^R,NA,WB,RT.

      T^H^E OLD ^C^O^M^M^A^N^D ^R^E^T^R^I^E^V^E^S ^A ^C^O^P^Y ^O^F ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^A^N^D ^M^A^K^E^S ^I^T ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^F^I^L^E ^N^A^M^E
      (^L^F^N) ^G^I^V^E^N ^T^O ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^C^O^P^Y ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E (^P^F^N).  I^F ^L^F^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^P^R^I^M^A^R^Y ^N^A^M^E ^B^E^C^O^M^E^S ^P^F^N.

      I^F ^A ^L^O^C^A^L ^F^I^L^E ^N^A^M^E^D ^L^F^N ^E^X^I^S^T^S ^W^H^E^N ^T^H^I^S ^C^O^M^M^A^N^D ^I^S ^P^R^O^C^E^S^S^E^D,
      ^I^T ^I^S ^D^I^S^C^A^R^D^E^D (^E^V^E^N ^I^F ^C^O^M^M^A^N^D ^P^R^O^C^E^S^S^I^N^G ^D^O^E^S ^N^O^T ^C^O^M^P^L^E^T^E
      ^D^U^E ^T^O ^A^N ^E^R^R^O^R).

.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^F^I^L^E ^N^A^M^E (^P^F^N)
      ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^H^A^T ^Y^O^U ^W^I^S^H ^T^O ^R^E^T^R^I^E^V^E ^A^S
      ^A ^P^R^I^M^A^R^Y ^F^I^L^E ^C^O^P^Y.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^P^F^N.
.HELP,ND,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ND) ^P^R^E^V^E^N^T^S ^T^H^E OLD ^C^O^M^M^A^N^D ^F^R^O^M ^R^E^L^E^A^S^I^N^G
      (^D^R^O^P^P^I^N^G) ^Y^O^U^R ^L^O^C^A^L ^F^I^L^E^S.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ND, OLD ^M^A^K^E^S
      ^A ^P^R^I^M^A^R^Y ^F^I^L^E ^C^O^P^Y ^O^F ^T^H^E ^P^F^N ^Y^O^U ^S^P^E^C^I^F^Y; ^B^U^T ^R^E^L^E^A^S^E^S ^A^L^L ^O^T^H^E^R
      ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^E^X^C^E^P^T ^T^H^O^S^E ^W^I^T^H ^C^H^E^C^K^P^O^I^N^T ^S^T^A^T^U^S ^O^R
      ^W^I^T^H ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S. (F^R^O^M HELPME, ^H^O^W^E^V^E^R, ^T^H^E ND ^P^A^R^A^M^E^T^E^R ^I^S
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^P^E^C^I^F^I^E^D.)
.HELP,UN,NOLIST

      S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^S^E^R^N^A^M^E) ^W^H^E^N ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H
      ^T^O ^R^E^T^R^I^E^V^E ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.

      D^E^F^A^U^L^T@D N^O ^U^S^E^R^N^A^M^E ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,PW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PW=^P^A^S^S^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^S^S^W^O^R^D ^W^H^E^N ^T^H^E
      ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^R^E^T^R^I^E^V^E ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^N^D
      ^A^N^D ^I^S ^P^A^S^S^W^O^R^D ^P^R^O^T^E^C^T^E^D.

      D^E^F^A^U^L^T@D N^O ^P^A^S^S^W^O^R^D ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^A^C^K^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.
      S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^W^H^E^N ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^R^E^T^R^I^E^V^E ^I^S ^O^N ^A^N
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.

      D^E^F^A^U^L^T@D N^O ^P^A^C^K^N^A^M^E ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,R,NOLIST
      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E
      -----  ----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^T^H^E PN (^P^A^C^K ^N^A^M^E) ^Y^O^U
      ^S^P^E^C^I^F^I^E^D ^I^S ^N^O^T ^O^N ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E ^A^N^D
      ^T^H^E ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^P^R^O^C^E^S^S^I^N^G ^E^R^R^O^R^S ^D^O ^N^O^T
      ^T^E^R^M^I^N^A^T^E ^Y^O^U^R ^J^O^B.  T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^N^T^E^R
      NA; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D P^R^O^C^E^S^S^I^N^G ^E^R^R^O^R^S ^T^E^R^M^I^N^A^T^E ^Y^O^U^R ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^C^A^U^S^E^S ^Y^O^U^R ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F
      ^D^I^S^K ^P^A^C^K^S ^R^A^T^H^E^R ^T^H^A^N ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^P^A^C^K^S ^A^R^E ^N^O^T ^A^L^R^E^A^D^Y
      ^M^O^U^N^T^E^D.  E^N^T^E^R WB ^F^O^R ^W^A^I^T, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  Y^O^U ^M^A^Y ^N^O^T ^S^P^E^C^I^F^Y
      ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^I^F ^A ^R^E^Q^U^E^S^T^E^D ^D^I^S^K ^P^A^C^K ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E.
.HELP,RT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RT) ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^A^L-^T^I^M^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N.  I^F RT ^I^S
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^J^O^B ^C^O^N^T^I^N^U^E^S ^P^R^O^C^E^S^S^I^N^G ^A^F^T^E^R ^R^E^Q^U^E^S^T^I^N^G ^S^T^A^G^I^N^G ^O^F ^A ^
L^E
      ^F^R^O^M ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^T^O ^D^I^S^K.  I^F ^S^T^A^G^I^N^G ^I^S ^N^O^T ^R^E^Q^U^I^R^E^D (^T^H^E ^F^I^L^E ^I^S
      ^A^L^R^E^A^D^Y ^R^E^S^I^D^E^N^T ^O^N ^D^I^S^K), ^T^H^E ^F^I^L^E ^I^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^J^O^B.  I^F ^T^H^E ^F^I^L^E
      ^M^U^S^T ^B^E ^S^T^A^G^E^D, ^Y^O^U ^M^U^S^T ^I^S^S^U^E ^A ^S^E^C^O^N^D OLD ^C^O^M^M^A^N^D ^T^O ^A^S^S^I^G^N ^T^H^E ^F^I^L^E
      ^T^O ^T^H^E ^J^O^B.

      I^F RT ^I^S ^O^M^I^T^T^E^D ^A^N^D ^T^H^E ^F^I^L^E ^R^E^S^I^D^E^S ^O^N^L^Y ^O^N ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E, ^J^O^B
      ^P^R^O^C^E^S^S^I^N^G ^I^S ^S^U^S^P^E^N^D^E^D ^W^H^I^L^E ^T^H^E ^F^I^L^E ^I^S ^S^T^A^G^E^D ^T^O ^D^I^S^K ^A^N^D ^A^S^S^I^G^N^E^D
      ^T^O ^T^H^E ^J^O^B.
.ENDHELP
.IF($LFN$.EQ.$$,L1)
  .EX.  $OLD(PFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_ND_WB_RT)
.ELSE(L1)
  .EX.  $OLD(LFN=PFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_ND_WB_RT)
.ENDIF(L1)
*WEOR
.PROC,ONEXIT*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ONEXIT

      T^H^E ONEXIT ^C^O^M^M^A^N^D ^R^E^V^E^R^S^E^S ^T^H^E ^E^F^F^E^C^T ^O^F ^A NOEXIT ^C^O^M^M^A^N^D.  I^F ^A^N ^E^R^R^O^R
      ^O^C^C^U^R^S ^P^R^O^C^E^S^S^I^N^G ^T^H^E ^C^O^M^M^A^N^D^S ^F^O^L^L^O^W^I^N^G ^T^H^E ONEXIT, ^C^O^N^T^R^O^L ^T^R^A^N^S^F^E^R^S
      ^T^O ^T^H^E ^C^O^M^M^A^N^D ^F^O^L^L^O^W^I^N^G ^T^H^E ^N^E^X^T EXIT ^C^O^M^M^A^N^D.
.ENDHELP
.EX.  $ONEXIT.
*WEOR
.PROC,ONSW*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ONSW,^S^W^I^T^C^H1,^S^W^I^T^C^H2,...,^S^W^I^T^C^H^N,^J^S^N.

      T^H^E ONSW ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^S^E^N^S^E ^S^W^I^T^C^H^E^S ^F^O^R ^R^E^F^E^R^E^N^C^E ^B^Y ^O^N^E ^O^F
      ^Y^O^U^R ^J^O^B^S.  T^H^E ^S^Y^S^T^E^M ^S^T^O^R^E^S ^T^H^E ^S^E^N^S^E ^S^W^I^T^C^H ^S^E^T^T^I^N^G^S ^I^N ^Y^O^U^R ^C^O^N^T^R^O^L
      ^P^O^I^N^T ^A^R^E^A ^A^N^D ^C^O^P^I^E^S ^T^H^E^M ^T^O RA ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^E^A^C^H ^J^O^B ^S^T^E^P ^F^O^R
      ^U^S^E ^B^Y ^T^H^E ^C^E^N^T^R^A^L ^P^R^O^G^R^A^M.  T^H^E ^S^E^N^S^E ^S^W^I^T^C^H ^F^I^E^L^D ^I^N ^T^H^E ^C^O^N^T^R^O^L ^P^O^I^N^T
      ^A^R^E^A ^A^N^D ^T^H^E ^O^N^E ^I^N RA ^A^R^E ^U^P^D^A^T^E^D ^S^E^P^A^R^A^T^E^L^Y.

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^W^I^T^C^H(^I) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^W^I^T^C^H(^E^S) ^T^O ^B^E ^S^E^T.
      Y^O^U ^M^U^S^T ^D^E^N^O^T^E ^E^A^C^H ^S^W^I^T^C^H ^S^W^I^T^C^H(^I) ^B^Y ^A^N ^I^N^T^E^G^E^R ^I^N ^T^H^E ^R^A^N^G^E ^O^F 1
      ^T^H^R^O^U^G^H 6.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 0 ^F^O^R ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S
      ^A^L^L ^S^E^N^S^E ^S^W^I^T^C^H^E^S.

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^J^O^B ^W^H^O^S^E
      ^S^E^N^S^E ^S^W^I^T^C^H(^E^S) ^W^I^L^L ^B^E ^C^H^A^N^G^E^D.  ^J^S^N ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R; ^I^T^S
      ^D^E^F^A^U^L^T ^I^S ^T^H^E JSN ^O^F ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^G^N^I^Z^E^S ^T^H^E ^J^S^N
      ^P^A^R^A^M^E^T^E^R ^B^Y ^I^T^S ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R^S; ^T^H^E^R^E^F^O^R^E, ^J^S^N ^C^A^N ^A^P^P^E^A^R ^A^N^Y^W^
R^E
      ^I^N ^T^H^E ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^A^N^D ^C^A^N ^B^E ^O^M^I^T^T^E^D ^W^I^T^H^O^U^T ^L^E^A^V^I^N^G ^A ^B^L^A^N^K
      ^P^A^R^A^M^E^T^E^R ^F^I^E^L^D.
.ENDHELP.
$REVERT(NOLIST)
*WEOR
.PROC,OPLEDIT*I
,P[P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^F^I^L^E]=(*F,*K=OPL,0)
,L[O^U^T^P^U^T ^F^I^L^E]=(*F,*K=OUTPUT,*N=OUTPUT,0)
,LO[L^I^S^T ^O^P^T^I^O^N^S]=(*S5(ECMDS),*K=,*N=)
,N[N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*F,*K=NPL,0,*N=)
,I[D^I^R^E^C^T^I^V^E ^I^N^P^U^T ^F^I^L^E]=(*F,*K=INPUT,*N=INPUT,0)
,M[P^U^L^L^M^O^D ^O^U^T^P^U^T ^F^I^L^E]=(*F,*N=MODSETS)
,F[F^U^L^L ^E^D^I^T]=(YES=$,F$,Y=$,F$,NO=,N=,*K=$,F$,*N=)
,D[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,D$,N=$,D$,*K=$,D$)
,U[U^P^D^A^T^E ^E^D^I^T]=(YES=$,U$,Y=$,U$,NO=,N=,*K=$,U$,0,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  OPLEDIT,P=^P,L=^L,LO=^L^O,N=^N,I=^I,M=^M,F,D,U.

      T^H^E OPLEDIT ^C^O^M^M^A^N^D ^R^E^M^O^V^E^S ^M^O^D^I^F^I^C^A^T^I^O^N ^D^E^C^K^S ^A^N^D ^I^D^E^N^T^I^F^I^E^R^S ^F^R^O^M
      ^T^H^E M^O^D^I^F^Y-^F^O^R^M^A^T^T^E^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^F^I^L^E.
.HELP,P,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y. (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)  0 (^Z^E^R^O) ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^T^H^E^R^E ^I^S ^N^O
      ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.

      D^E^F^A^U^L^T@D F^I^L^E OPL
.HELP,N,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y
      ^I^S ^T^O ^B^E ^W^R^I^T^T^E^N.  (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D N, ^T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^F^I^L^E NPL.

      D^E^F^A^U^L^T@D N^O ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^C^R^E^A^T^E^D.
.HELP,I,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S. T^H^E
      ^S^Y^S^T^E^M ^R^E^A^D^S ^N^O ^D^I^R^E^C^T^I^V^E^S ^I^F ^Y^O^U ^E^N^T^E^R 0 (^Z^E^R^O).  (A ^F^I^L^E ^N^A^M^E
      ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E INPUT
.HELP,L,NOLIST

      OPLEDIT ^W^R^I^T^E^S ^O^U^T^P^U^T ^T^O ^T^H^I^S ^F^I^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 0, ^N^O ^O^U^T^P^U^T
      ^F^I^L^E ^I^S ^G^E^N^E^R^A^T^E^D.  (A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT
.HELP,LO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (LO=^L^O) ^S^E^L^E^C^T^S ^U^P ^T^O ^F^I^V^E ^L^I^S^T ^O^P^T^I^O^N^S.

            E^N^T^E^R    T^O ^S^P^E^C^I^F^Y

            LO       S^E^L^E^C^T^S ^A^L^L ^L^I^S^T ^O^P^T^I^O^N^S.
            E        E^R^R^O^R^S.
            C        I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S.
            M        M^O^D^I^F^I^C^A^T^I^O^N^S ^M^A^D^E.
            D        D^E^C^K ^S^T^A^T^U^S.
            S        S^T^A^T^I^S^T^I^C^S.

      D^E^F^A^U^L^T@D ECMDS. I^F ^T^H^E ^O^U^T^P^U^T ^F^I^L^E ^I^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L ^I^N
               ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B ^A^N^D LO ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, LO=E.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M=^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^O^N ^W^H^I^C^H *PULLMOD
      ^D^I^R^E^C^T^I^V^E^S ^W^R^I^T^E ^O^U^T^P^U^T.  (A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D F^I^L^E ^N^A^M^E MODSETS
.HELP,F,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (F) ^M^O^D^I^F^I^E^S ^A^L^L ^D^E^C^K^S ^O^N ^T^H^E ^L^I^B^R^A^R^Y.  T^O ^S^E^L^E^C^T
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^N^T^E^R F; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.
.HELP,D,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (D) ^C^A^U^S^E^S OPLEDIT ^N^O^T ^T^O ^A^B^O^R^T ^Y^O^U^R ^J^O^B ^I^F ^A
      ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R ^O^C^C^U^R^S.  E^N^T^E^R D ^T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R;
      ^O^M^I^T ^I^T ^T^O ^A^B^O^R^T ^O^N ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R^S.

      D^E^F^A^U^L^T@D Y^O^U^R ^J^O^B ^A^B^O^R^T^S ^O^N ^A ^D^I^R^E^C^T^I^V^E ^E^R^R^O^R.
.HELP,U,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (U) ^G^E^N^E^R^A^T^E^S EDIT ^D^I^R^E^C^T^I^V^E^S ^F^O^R ^A^L^L ^D^E^C^K^S (^O^N^L^Y
      ^F^O^R *PULLMOD ^E^X^E^C^U^T^I^O^N^S.)  E^N^T^E^R U ^T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R;
      ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D I^F ^T^H^E U ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, *EDIT ^D^I^R^E^C^T^I^V^E^S ^A^R^E
               ^G^E^N^E^R^A^T^E^D ^F^O^R ^C^O^M^M^O^N ^D^E^C^K^S.
.ENDHELP
.IF($U$.EQ.$#U$,L1)
 .EX.  $OPLEDIT(#P=P,#L=L,#LO=LO,#N=N,#I=I,#M=M,#U=U_D_F)
.ELSE(L1)
 .EX.  $OPLEDIT(#P=P,#L=L,#LO=LO,#N=N,#I=I,#M=M_U_D_F)
.ENDIF(L1)
*WEOR
.PROC,OUT*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  OUT

      T^H^E OUT ^C^O^M^M^A^N^D ^Q^U^E^U^E^S ^F^I^L^E^S ^T^H^A^T ^H^A^V^E ^B^E^E^N ^G^I^V^E^N ^D^E^F^E^R^R^E^D ^R^O^U^T^I^N^G
      (^R^E^F^E^R ^T^O ^T^H^E ROUTE ^C^O^M^M^A^N^D).  T^H^I^S ^C^O^M^M^A^N^D ^I^N^I^T^I^A^T^E^S ^T^H^E ^Q^U^E^U^E^I^N^G
      ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^D^O^E^S ^A^T ^J^O^B ^T^E^R^M^I^N^A^T^I^O^N.
.ENDHELP
.EX.  $OUT.
*WEOR
.PROC,OVWRITE*I
,LFN[F^I^L^E ^T^O ^B^E ^O^V^E^R^W^R^I^T^T^E^N]=(*F)
,OP[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S]=(*S2(ZXR),*N=Z)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  OVWRITE,^L^F^N/OP=^O^P.

      T^H^E OVWRITE ^C^O^M^M^A^N^D ^D^E^S^T^R^O^Y^S ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^A ^F^I^L^E ^B^Y ^O^V^E^R^W^R^I^T^I^N^G ^I^T.
      T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^A ^T^A^P^E ^F^I^L^E ^O^R ^T^O ^A ^F^I^L^E ^T^O ^W^H^I^C^H ^Y^O^U
      ^C^A^N^N^O^T ^W^R^I^T^E.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^O^V^E^R^W^R^I^T^E (^I^T ^M^U^S^T
      ^N^O^T ^B^E ^A ^T^A^P^E ^F^I^L^E).  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.

.HELP,OP,NOLIST

      ^O^P                           D^E^S^C^R^I^P^T^I^O^N
      --                           -----------
      Z    O^V^E^R^W^R^I^T^E^S ^T^H^E ^F^I^L^E ^W^I^T^H ^Z^E^R^O^S.  (Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H Z ^A^N^D X).
      X    O^V^E^R^W^R^I^T^E^S ^T^H^E ^F^I^L^E ^F^I^R^S^T ^W^I^T^H ^Z^E^R^O^S, ^T^H^E^N ^W^I^T^H ^O^N^E^S, ^A^N^D ^T^H^E^N ^W^I^T^H
           ^A^N ^A^L^T^E^R^N^A^T^I^N^G ^P^A^T^T^E^R^N ^O^F ^O^N^E^S ^A^N^D ^Z^E^R^O^S.  (Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H
           Z ^A^N^D X.)
      R    R^E^L^E^A^S^E^S ^T^H^E ^F^I^L^E ^F^R^O^M ^T^H^E ^J^O^B ^A^F^T^E^R ^O^V^E^R^W^R^I^T^I^N^G ^I^T.

      D^E^F^A^U^L^T@D I^F ^O^P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S Z.
.ENDHELP
.EX.  $OVWRITE(LFN/#OP=OP)
*WEOR
.PROC,PACK*I
,LFN1[F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D]=(*F,*N=#PRIMARY)
,LFN2[F^I^L^E ^T^O ^R^E^C^E^I^V^E ^P^A^C^K^E^D ^V^E^R^S^I^O^N]=(*F,*N=)
,X[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^F^I^L^E ^L^F^N1]=(YES=,Y=,*N=,NO,N,*S7/AD)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PACK,^L^F^N1,^L^F^N2,^X.

      T^H^E PACK ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^F^I^L^E (^L^F^N1) ^A^N^D ^D^E^L^E^T^E^S ^A^L^L EOR ^A^N^D EOF
      ^M^A^R^K^S ^F^R^O^M ^T^H^E ^C^O^P^Y (^L^F^N2), ^W^H^I^C^H ^I^S ^T^H^E^N ^T^H^E "^P^A^C^K^E^D" ^V^E^R^S^I^O^N.  I^F
      ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^T^O ^C^O^P^Y ^T^O (^L^F^N2), ^T^H^E ^I^N^P^U^T ^F^I^L^E (^L^F^N1) ^I^S
      ^O^V^E^R^W^R^I^T^T^E^N ^W^I^T^H ^T^H^E ^P^A^C^K^E^D ^V^E^R^S^I^O^N.
.HELP,LFN1,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D (^L^F^N1).  I^F ^Y^O^U ^A^L^S^O ^S^P^E^C^I^F^Y ^A
      ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y (^L^F^N2), EOR ^A^N^D EOF ^M^A^R^K^S ^A^R^E ^D^E^L^E^T^E^D ^F^R^O^M ^T^H^E
      ^C^O^P^Y (^L^F^N2) ^R^A^T^H^E^R ^T^H^A^N ^F^R^O^M ^F^I^L^E ^L^F^N1.  I^F ^A ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y
      ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^F^I^L^E ^L^F^N1 ^I^S ^O^V^E^R^W^R^I^T^T^E^N ^W^I^T^H ^T^H^E ^P^A^C^K^E^D ^V^E^R^S^I^O^N.

      T^H^I^S ^F^I^L^E (^L^F^N1) ^M^U^S^T ^N^O^T ^B^E ^A^S^S^I^G^N^E^D ^T^O ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^T^E^R^M^I^N^A^L.

      D^E^F^A^U^L^T@D  F^R^O^M ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S, ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^I^S ^U^S^E^D.  F^R^O^M ^B^A^T^C^H
                ^J^O^B^S, ^T^H^E^R^E ^I^S ^N^O ^D^E^F^A^U^L^T; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,LFN2,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^W^H^I^C^H ^T^H^E ^P^A^C^K^E^D ^F^I^L^E ^I^S ^T^O ^B^E ^C^O^P^I^E^D
      ^A^S ^O^N^E ^R^E^C^O^R^D.  N^O^T^E@D ^I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y,
      ^T^H^E ^I^N^P^U^T ^F^I^L^E (^L^F^N1) ^I^S ^O^V^E^R^W^R^I^T^T^E^N ^W^I^T^H ^T^H^E ^P^A^C^K^E^D ^V^E^R^S^I^O^N.

      D^E^F^A^U^L^T@D  F^I^L^E ^L^F^N1.
.HELP,X,NOLIST

      I^F ^Y^O^U ^D^O ^N^O^T ^W^A^N^T ^T^H^E ^I^N^P^U^T ^F^I^L^E ^L^F^N1 ^T^O ^B^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^C^O^P^Y^I^N^G
      ^B^E^G^I^N^S, ^E^N^T^E^R ^A ^S^T^R^I^N^G ^O^F 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  N^O^T^E@D
      ^T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^Y^O^U ^M^U^S^T ^A^L^S^O ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^T^O ^R^E^C^E^I^V^E
      ^T^H^E ^C^O^P^Y (^L^F^N2).

      I^F ^Y^O^U ^W^A^N^T ^F^I^L^E ^L^F^N1 ^T^O ^B^E ^R^E^W^O^U^N^D ^F^I^R^S^T, ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  F^I^L^E ^L^F^N1 ^I^S ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^C^O^P^Y^I^N^G ^B^E^G^I^N^S.
.ENDHELP
.IF($LFN1$.EQ.$$,L1)
  .EX. *NO PRIMARY FILE.
.ELSE(L1)
  .IF($LFN2$.EQ.$$.AND.$X$.EQ.$$,L2)
    .EX.  $PACK(LFN1)
  .ELSE(L2)
    .EX.  $PACK(LFN1,LFN2,X)
  .ENDIF(L2)
.ENDIF(L1)
*WEOR
.PROC,PACKNAM*I
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PACKNAM,PN=^P^N,R=^R.

      T^H^E PACKNAM ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^S^U^B^S^E^Q^U^E^N^T ^R^E^Q^U^E^S^T^S ^T^O ^T^H^E ^S^P^E^C^I^F^I^E^D
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.  T^H^E ^D^I^S^K ^P^A^C^K ^A^N^D ^D^E^V^I^C^E ^T^Y^P^E ^T^H^A^T ^Y^O^U ^S^P^E^C^I^F^Y
      ^O^N ^T^H^E PACKNAM ^C^O^M^M^A^N^D ^B^E^C^O^M^E ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E^S ^F^O^R ^T^H^E ^S^A^M^E
      ^P^A^R^A^M^E^T^E^R^S ^O^N ^A^N^Y ^S^U^B^S^E^Q^U^E^N^T ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^O^M^M^A^N^D^S.
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^C^K ^N^A^M^E ^O^F ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^O ^B^E
      ^A^C^C^E^S^S^E^D ^I^N ^S^U^B^S^E^Q^U^E^N^T ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^O^M^M^A^N^D^S.  T^H^I^S ^A^L^L^O^W^S ^Y^O^U ^T^O
      ^O^M^I^T ^T^H^E PN ^P^A^R^A^M^E^T^E^R ^O^N ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^F^O^R ^F^I^L^E^S ^T^H^A^T ^R^E^S^I^D^E
      ^O^N ^T^H^E ^S^P^E^C^I^F^I^E^D PACKNAM ^D^E^V^I^C^E.  T^O ^C^L^E^A^R ^A ^P^R^E^V^I^O^U^S PACKNAM ^R^E^Q^U^E^S^T,
      ^E^N^T^E^R 0.

      D^E^F^A^U^L^T@D  I^F PN ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^E^F^F^E^C^T ^O^F PACKNAM ^I^S ^C^L^E^A^R^E^D.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^Y^O^U ^W^A^N^T ^T^O ^U^S^E ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E
      ^O^T^H^E^R ^T^H^A^N ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T ^D^E^V^I^C^E. I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E PACKNAM ^C^O^M^M^A^N^D, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y R=^R ^O^N ^E^A^C^H
      ^S^U^B^S^E^Q^U^E^N^T ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^O^M^M^A^N^D.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.ENDHELP
.EX.  $PACKNAM(#PN=PN,#R=R)
*WEOR
.PROC,PASSWOR*I
,OLD[E^N^T^E^R ^O^L^D (^C^U^R^R^E^N^T) ^P^A^S^S^W^O^R^D]=(*F)
,NEW[E^N^T^E^R ^N^E^W ^P^A^S^S^W^O^R^D]=(*F)
,XD[P^A^S^S^W^O^R^D ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E]=(*S6(0123456789),*N=)
,XT[P^A^S^S^W^O^R^D ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^N ^D^A^Y^S]=(*S4(0123456789),$*$,*N=)
,PT[P^A^S^S^W^O^R^D ^T^Y^P^E (B^A^T^C^H/I^N^T^E^R^A^C^T^I^V^E)]=(B,I,IB,BI,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PASSWOR,^O^L^D^P^A^S^S^W^O^R^D,^N^E^W^P^A^S^S^W^O^R^D,XD=^E^X^P^I^R^E^D^A^T^E,PT=^T^Y^P^E.
               PASSWOR,^O^L^D^P^A^S^S^W^O^R^D,^N^E^W^P^A^S^S^W^O^R^D,XT=^E^X^P^I^R^E^T^E^R^M,PT=^T^Y^P^E.

      T^H^E PASSWOR ^C^O^M^M^A^N^D ^I^S ^U^S^E^D ^T^O ^C^H^A^N^G^E ^Y^O^U^R ^P^A^S^S^W^O^R^D.

      N^O^T^E@D O^N^L^Y ^U^S^E^R^S ^W^I^T^H ^S^P^E^C^I^A^L ^A^U^T^H^O^R^I^Z^A^T^I^O^N ^A^R^E ^P^E^R^M^I^T^T^E^D ^T^O ^C^H^A^N^G^E
            ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^O^R ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^O^F ^T^H^E^I^R ^P^A^S^S^W^O^R^D^S.

      Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^A^N^D ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^O^N
      ^T^H^E ^S^A^M^E ^E^N^T^R^Y ^O^F ^T^H^E PASSWOR ^C^O^M^M^A^N^D.  HELPME ^W^I^L^L ^I^G^N^O^R^E ^A^N^Y
      ^V^A^L^U^E ^Y^O^U ^S^P^E^C^I^F^Y ^F^O^R ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^F ^Y^O^U ^H^A^V^E ^S^P^E^C^I^F^I^E^D ^A^N
      ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E.
.HELP,OLD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^L^D ^P^A^S^S^W^O^R^D ^Y^O^U ^W^I^S^H ^T^O ^C^H^A^N^G^E.  T^H^E^R^E
      ^I^S ^N^O ^D^E^F^A^U^L^T ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^O^L^D ^P^A^S^S^W^O^R^D.
.HELP,NEW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^A^S^S^W^O^R^D ^Y^O^U ^W^I^S^H ^T^O ^C^H^A^N^G^E ^T^O. T^H^E
      ^N^E^W ^P^A^S^S^W^O^R^D ^M^U^S^T ^B^E ^T^H^E ^M^I^N^I^M^U^M ^L^E^N^G^T^H ^R^E^Q^U^I^R^E^D ^B^Y ^Y^O^U^R ^S^I^T^E. T^H^E
      ^M^A^X^I^M^U^M ^L^E^N^G^T^H ^I^S 7 ^C^H^A^R^A^C^T^E^R^S.  T^H^E^R^E ^I^S ^N^O ^D^E^F^A^U^L^T ^Y^O^U ^M^U^S^T ^E^N^T^E^R
      ^A ^N^E^W ^P^A^S^S^W^O^R^D.
.HELP,XD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XD=^E^X^P^I^R^E^D^A^T^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^F^O^R ^T^H^E
      ^P^A^S^S^W^O^R^D.  E^N^T^E^R ^A ^S^I^X-^D^I^G^I^T ^S^T^R^I^N^G ^I^N ^T^H^E ^F^O^R^M ^Y^Y^M^M^D^D. (Y^O^U ^M^U^S^T
      ^H^A^V^E ^S^P^E^C^I^A^L ^A^U^T^H^O^R^I^Z^A^T^I^O^N ^T^O ^C^H^A^N^G^E ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^O^F ^Y^O^U^R
      ^P^A^S^S^W^O^R^D.  R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D.)  T^H^E ^D^E^F^A^U^L^T ^F^O^R ^A^N
      ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^I^S ^S^I^T^E-^D^E^T^E^R^M^I^N^E^D.
.HELP,XT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XT=^E^X^P^I^R^E^T^E^R^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^F^E ^O^F ^Y^O^U^R ^P^A^S^S^W^O^R^D
      ^I^N ^D^A^Y^S.  I^F ^Y^O^U ^E^N^T^E^R 0 (^Z^E^R^O), ^T^H^E ^P^A^S^S^W^O^R^D ^E^X^P^I^R^E^S ^I^M^M^E^D^I^A^T^E^L^Y;
      ^I^F ^Y^O^U ^E^N^T^E^R 4095 ^O^R * (^A^N ^A^S^T^E^R^I^S^K), ^T^H^E ^P^A^S^S^W^O^R^D ^D^O^E^S ^N^O^T ^E^X^P^I^R^E.
      (Y^O^U ^M^U^S^T ^H^A^V^E ^S^P^E^C^I^A^L ^A^U^T^H^O^R^I^Z^A^T^I^O^N ^T^O ^C^H^A^N^G^E ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M
      ^O^F ^Y^O^U^R ^P^A^S^S^W^O^R^D.  R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D.)

      S^I^N^C^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^A^N^D ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^C^A^N^N^O^T ^B^O^T^H ^B^E ^S^P^E^C^I^F^I^E^D
      ^O^N ^T^H^E ^S^A^M^E ^E^N^T^R^Y ^O^F ^T^H^E PASSWOR ^C^O^M^M^A^N^D, HELPME ^W^I^L^L ^I^G^N^O^R^E ^A^N^Y
      ^V^A^L^U^E ^Y^O^U ^S^P^E^C^I^F^Y ^F^O^R ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^F ^Y^O^U ^H^A^V^E ^A^L^S^O ^E^N^T^E^R^E^D ^A^N
      ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E.  T^H^E ^D^E^F^A^U^L^T ^F^O^R ^A^N ^E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^S ^S^I^T^E-^D^E^T^E^R^M^I^N^E^D.
.HELP,PT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PT=^T^Y^P^E ^S^P^E^C^I^F^I^E^S ^W^H^I^C^H ^P^A^S^S^W^O^R^D ^I^S ^T^O ^B^E ^U^P^D^A^T^E^D.
      P^O^S^S^I^B^L^E ^T^Y^P^E^S ^A^R^E@D

         T^Y^P^E                D^E^S^C^R^I^P^T^I^O^N
         ----                -----------
          B          U^P^D^A^T^E ^B^A^T^C^H ^P^A^S^S^W^O^R^D.

          I          U^P^D^A^T^E ^I^N^T^E^R^A^C^T^I^V^E ^P^A^S^S^W^O^R^D.

          IB ^O^R BI   B^O^T^H ^B^A^T^C^H ^A^N^D ^I^N^T^E^R^A^C^T^I^V^E.

      I^F ^T^H^E PT ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, PASSWOR ^W^I^L^L ^C^H^A^N^G^E ^T^H^E ^P^A^S^S^W^O^R^D ^M^A^T^C^H^I^N^G
      ^T^H^E ^O^R^I^G^I^N ^T^Y^P^E ^O^F ^T^H^E ^U^S^E^R ^J^O^B@D ^U^N^L^E^S^S ^Y^O^U^R ^S^I^T^E ^H^A^S ^E^L^E^C^T^E^D ^T^O ^C^H^A^N^G^E
      ^B^O^T^H ^P^A^S^S^W^O^R^D^S ^I^F ^T^H^E ^P^A^S^S^W^O^R^D ^T^Y^P^E ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.IF($XD$.EQ.$$.AND.$XT$.NE.$$,L1)
   .EX. $PASSWOR(OLD,NEW,#XT=XT,#PT=PT)
.ELSE(L1)
   .IF($XD$.NE.$$,L2)
      .EX. $PASSWOR(OLD,NEW,#XD=XD,#PT=PT)
   .ELSE(L2)
      .EX. $PASSWOR(OLD,NEW,#PT=PT)
   .ENDIF(L2)
.ENDIF(L1)
*WEOR
.PROC,PASCAL*I
,SFN[P^R^O^G^R^A^M S^O^U^R^C^E F^I^L^E (I)]=(*F,*N=INPUT)
,LFN[P^R^O^G^R^A^M L^I^S^T^I^N^G F^I^L^E (L)]=(*F,*N=OUTPUT)
,BFN[B^I^N^A^R^Y O^B^J^E^C^T F^I^L^E (B)]=(*F,*N=LGO)
,OPTS[C^O^M^P^I^L^E^R O^P^T^I^O^N^S (OPTS)]=(*A1,N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST
      F^O^R^M^A^T@D  PASCAL,I=^L^F^N,L=^L^F^N,B=^B^F^N/^O^P^T^S.

      T^H^E ^C^O^M^M^A^N^D PASCAL ^C^A^L^L^S ^T^H^E PASCAL ^C^O^M^P^I^L^E^R.
.HELP,SFN,NOLIST
      F^O^R^M^A^T@D  SFN=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R SFN ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^O^G^R^A^M ^S^O^U^R^C^E ^F^I^L^E ^L^F^N. I^F SFN ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,LFN,NOLIST
      F^O^R^M^A^T@D  LFN=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R LFN ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^O^G^R^A^M ^L^I^S^T^I^N^G ^F^I^L^E ^L^F^N.  I^F LFN ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,BFN,NOLIST
      F^O^R^M^A^T@D  BFN=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R BFN ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^B^J^E^C^T ^F^I^L^E ^L^F^N.  I^F BFN ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S LGO.
.HELP,OPTS,NOLIST
      F^O^R^M^A^T@D  OPTS=^O^P^T^S

      T^H^E ^P^A^R^A^M^E^T^E^R OPTS ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^E^R ^O^P^T^I^O^N^S.  M^U^L^T^I^P^L^E ^O^P^T^I^O^N^S ^F^O^R
      ^T^H^E OPTS ^P^A^R^A^M^E^T^E^R ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S, ^F^O^R ^E^X^A^M^P^L^E OPTS=B/E/G.
      T^H^E ^C^O^M^P^I^L^E^R ^O^P^T^I^O^N^S ^A^R^E ^A^S ^F^O^L^L^O^W^S@D

         ^O^P^T^S                                M^E^A^N^I^N^G

         B        S^P^E^C^I^F^I^E^S ^T^H^E ^S^I^Z^E ^O^F ^T^H^E ^F^I^L^E ^B^U^F^F^E^R^S.  I^F B ^I^S ^L^E^S^S ^T^H^A^N 64,
                  ^I^T ^I^S ^A ^B^U^F^F^E^R ^F^A^C^T^O^R; ^T^H^E ^A^C^T^U^A^L ^B^U^F^F^E^R ^S^I^Z^E ^I^N ^W^O^R^D^S ^I^S 128
                  ^T^I^M^E^S ^T^H^E ^B^U^F^F^E^R ^F^A^C^T^O^R.  I^F B ^I^S ^L^A^R^G^E^R ^T^H^A^N 64, ^T^H^E^N B ^I^S
                  ^T^H^E ^A^C^T^U^A^L ^B^U^F^F^E^R ^S^I^Z^E.  T^H^E ^D^E^F^A^U^L^T ^I^S 2.

         E        C^O^N^T^R^O^L^S ^T^H^E ^E^N^T^R^Y-^P^O^I^N^T ^N^A^M^E^S ^G^E^N^E^R^A^T^E^D ^B^Y ^T^H^E ^C^O^M^P^I^L^E^R ^F^O^R
                  ^T^H^E ^M^A^I^N ^P^R^O^G^R^A^M, ^M^A^I^N ^V^A^R^I^A^B^L^E^S ^B^L^O^C^K, ^P^R^O^C^E^D^U^R^E^S, ^F^U^N^C^T^I^O^N^S,
                  ^A^N^D ^L^A^B^E^L^S.  E+ ^T^U^R^N^S ^L^I^S^T^I^N^G ^O^N ^A^N^D E- ^T^U^R^N^S ^L^I^S^T^I^N^G ^O^F^F.
                  T^H^E ^D^E^F^A^U^L^T ^I^S E-.

         G        C^O^M^P^I^L^E^S ^A^N^D ^E^X^E^C^U^T^E^S ^T^H^E ^P^R^O^G^R^A^M ^I^N ^A ^S^I^N^G^L^E ^J^O^B ^S^T^E^P ^W^I^T^H
                  ^O^N^E ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T.  G+ ^T^U^R^N^S ^L^I^S^T^I^N^G ^O^N ^A^N^D G- ^T^U^R^N^S
                  ^L^I^S^T^I^N^G ^O^F^F. ^D^E^F^A^U^L^T ^I^S G-.

         I        I^N^C^L^U^D^E^S ^T^H^E ^S^O^U^R^C^E ^C^O^D^E ^F^R^O^M ^A^N ^E^X^T^E^R^N^A^L ^F^I^L^E.

         L        C^O^N^T^R^O^L^S ^T^H^E ^L^I^S^T^I^N^G ^O^F ^T^H^E ^P^R^O^G^R^A^M ^T^E^X^T.  L+ ^T^U^R^N^S ^T^H^E
                  ^L^I^S^T^I^N^G ^O^N.  L- ^T^U^R^N^S ^T^H^E ^L^I^S^T^I^N^G ^O^F^F.  L ^F^O^L^L^O^W^E^D ^B^Y ^A ^N^U^M^B^E^R
                  ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^S^I^Z^E.  L ^F^O^L^L^O^W^E^D ^B^Y ^A ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G
                  ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^T^I^T^L^E.  T^H^E ^D^E^F^A^U^L^T ^I^S L+.

         P        D^I^R^E^C^T^S ^T^H^E ^C^O^M^P^I^L^E^R ^T^O ^G^E^N^E^R^A^T^E ^A P^O^S^T M^O^R^T^E^M D^U^M^P (PMD)
                  ^L^I^S^T^I^N^G ^I^N ^T^H^E ^E^V^E^N^T ^O^F ^A ^R^U^N^T^I^M^E ^E^R^R^O^R.  P+ ^R^E^Q^U^E^S^T^S ^T^H^E PMD
                  ^F^A^C^I^L^I^T^Y ^T^O ^P^R^O^V^I^D^E ^A ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^E^A^C^H ^P^R^O^C^E^D^U^R^E ^O^R
                  ^F^U^N^C^T^I^O^N ^T^H^A^T ^W^A^S ^A^C^T^I^V^E ^A^T ^T^H^E ^T^I^M^E ^O^F ^T^H^E ^E^R^R^O^R.  P-
                  ^S^U^P^P^R^E^S^S^E^S ^S^O^M^E ^O^F ^T^H^E PMD ^I^N^F^O^R^M^A^T^I^O^N.  PO ^C^A^U^S^E^S ^T^H^E
                  ^P^R^O^C^E^D^U^R^E^S ^T^O ^B^E ^T^R^A^N^S^P^A^R^E^N^T ^T^O PMD.  T^H^E ^D^E^F^A^U^L^T ^I^S P+.

         R        C^O^N^T^R^O^L^S ^T^H^E ^R^E^D^U^C^E ^M^O^D^E.  R ^I^S ^U^S^E^D ^I^N ^C^O^N^J^U^C^T^I^O^N ^W^I^T^H ^T^H^E W
                  ^O^P^T^I^O^N ^T^O ^C^O^N^T^R^O^L ^T^H^E ^E^X^E^C^U^T^I^O^N ^F^I^E^L^D ^L^E^N^G^T^H.  R+ ^T^U^R^N^S
                  ^L^I^S^T^I^N^G ^O^N ^A^N^D R- ^T^U^R^N^S ^L^I^S^T^I^N^G ^O^F^F.  T^H^E ^D^E^F^A^U^L^T ^I^S R+.

         T        D^I^R^E^C^T^S ^T^H^E ^C^O^M^P^I^L^E^R ^T^O ^G^E^N^E^R^A^T^E ^E^X^T^R^A ^C^O^D^E ^T^H^A^T ^C^A^N ^B^E ^U^S^E^D
                  ^T^O ^P^E^R^F^O^R^M ^R^U^N^T^I^M^E ^T^E^S^T^S.

         U        R^E^S^T^R^I^C^T^S ^T^H^E ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S ^T^H^A^T ^A^R^E ^S^C^A^N^N^E^D ^B^Y ^T^H^E
                  ^C^O^M^P^I^L^E^R ^I^N ^E^V^E^R^Y ^S^O^U^R^C^E ^L^I^N^E.  U+ ^R^E^S^T^R^I^C^T^S ^T^H^E ^N^U^M^B^E^R ^T^O
                  72.  U- ^R^E^S^T^R^I^C^T^S ^T^H^E ^N^U^M^B^E^R ^O^F 120.  T^H^E ^D^E^F^A^U^L^T ^I^S U-.

         W        C^O^N^T^R^O^L^S ^T^H^E ^W^O^R^K^S^P^A^C^E ^S^I^Z^E.

         X=^N      S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F X ^R^E^G^I^S^T^E^R^S ^U^S^E^D ^F^O^R ^P^A^S^S^I^N^G
                  ^D^E^S^C^R^I^P^T^I^O^N^S.  T^H^E ^D^E^F^A^U^L^T ^I^S 4.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,PAUSE*I
,JSN[J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E]=
                      (*S4(0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PAUSE,^J^S^N.

      T^H^E PAUSE ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^P^A^U^S^E ^B^I^T ^O^F ^O^N^E ^O^F ^Y^O^U^R ^E^X^E^C^U^T^I^N^G ^J^O^B^S.
.HELP,JSN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 4-^A^L^P^H^A^B^E^T^I^C ^O^R ^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S
      ^O^F ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E ^W^H^O^S^E ^P^A^U^S^E ^B^I^T ^Y^O^U ^W^A^N^T ^T^O ^S^E^T.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^J^S^N ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $PAUSE(JSN)
*WEOR
.PROC,PBC*I
,FWA[S^P^E^C^I^F^Y ^A^D^D^R^E^S^S]=(*A1,*N=)
,LWA[L^A^S^T ^W^O^R^D ^A^D^D^R^E^S^S]=(*A1,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PBC,^F^W^A,^L^W^A.
               PBC,^L^W^A.
               PBC.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E PBC ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E PBC ^C^O^M^M^A^N^D ^W^R^I^T^E^S ^O^N^E ^R^E^C^O^R^D ^F^R^O^M ^T^H^E ^S^P^E^C^I^F^I^E^D ^A^R^E^A ^O^F ^C^E^N^T^R^A^L
      ^M^E^M^O^R^Y ^T^O ^T^H^E ^F^I^L^E PUNCHB.
.HELP,FWA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^F^W^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^D^D^R^E^S^S ^R^E^L^A^T^I^V^E ^T^O RA ^A^T ^W^H^I^C^H ^T^H^E
      ^B^I^N^A^R^Y ^D^E^C^K ^B^E^G^I^N^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E PBC ^O^P^E^R^A^T^I^O^N
      ^D^E^P^E^N^D^S ^U^P^O^N ^T^H^E ^P^R^E^S^E^N^C^E ^O^R ^A^B^S^E^N^C^E ^O^F ^L^W^A.
.HELP,LWA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^W^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^W^O^R^D ^A^D^D^R^E^S^S ^O^F ^T^H^E ^B^I^N^A^R^Y ^D^E^C^K.  I^F
      ^L^W^A ^A^L^O^N^E ^I^S ^P^R^E^S^E^N^T, PBC ^A^S^S^U^M^E^S ^T^H^A^T ^F^W^A ^I^S RA.  I^F ^L^W^A ^E^Q^U^A^L^S ^F^W^A, ^A^N^D
      ^A ^N^O^N-^Z^E^R^O ^V^A^L^U^E ^I^S ^S^P^E^C^I^F^I^E^D, PBC ^A^D^D^S 10(8) ^T^O ^L^W^A.  I^F ^F^W^A ^A^N^D ^L^W^A ^A^R^E 0
      ^O^R ^A^R^E ^O^M^I^T^T^E^D, ^L^W^A ^I^S ^S^E^T ^T^O ^T^H^E ^V^A^L^U^E ^I^N ^T^H^E ^L^O^W^E^R 18 ^B^I^T^S ^O^F RA.  I^F
      ^T^H^E ^U^P^P^E^R 12 ^B^I^T^S ^O^F RA ^A^R^E 7700(8), ^L^W^A ^I^S ^T^H^E ^L^O^W^E^R 18 ^B^I^T^S ^O^F ^T^H^E
      ^L^O^C^A^T^I^O^N ^F^O^L^L^O^W^I^N^G ^T^H^E ^P^R^E^F^I^X (77) ^T^A^B^L^E ^P^L^U^S ^T^H^E ^L^E^N^G^T^H ^O^F ^T^H^E ^P^R^E^F^I^X
      ^T^A^B^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PDU*I
,I[P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E ^N^A^M^E]=(*F)
,L[L^I^S^T^I^N^G ^F^I^L^E ^N^A^M^E]=(*F,0,*N=OUTPUT)
,C[C^A^P^S^U^L^E ^F^I^L^E ^N^A^M^E]=(*F,0,*N=CAPSULE)
,LIB[F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^A^P^S^U^L^E]=(*F,0,*N=PANELIB)
,REC[P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^R^E^C^O^R^D]=(*A7,*N=)
,RW[R^E^W^I^N^D ^A^F^T^E^R ^P^R^O^C^E^S^S^I^N^G]=(YES=$,RW$,Y=$,RW$,NO=,N=,*K=$,RW$,*N=YES)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D PDU,I=^P^A^N^E^L,L=^L^I^S^T^I^N^G,C=^C^A^P^S^U^L^E,LIB=^L^I^B^R^A^R^Y,REC=^R^E^C^N^A^M^E,RW=^O^P^T^I^O^N.
              ^O^R
              PDU,^P^A^N^E^L,^L^I^S^T^I^N^G,^C^A^P^S^U^L^E,^L^I^B^R^A^R^Y,^R^E^C^N^A^M^E,^O^P^T^I^O^N.

      T^H^E PDU ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^A ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E ^A^N^D ^S^T^O^R^E^S ^T^H^E
      ^C^O^M^P^I^L^E^D ^P^A^N^E^L ^I^N ^A ^U^S^E^R ^L^I^B^R^A^R^Y.
.HELP,I,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E (^T^H^E ^F^I^L^E ^M^U^S^T ^B^E
      ^L^O^C^A^L).

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,L,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^Z^E^R^O (0),
      ^N^O ^L^I^S^T^I^N^G^S ^A^R^E ^G^E^N^E^R^A^T^E^D.

      D^E^F^A^U^L^T@D F^I^L^E OUTPUT
.HELP,C,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^C^A^P^S^U^L^E ^F^I^L^E ^O^N ^W^H^I^C^H ^T^H^E ^S^Y^S^T^E^M ^W^R^I^T^E^S ^T^H^E
      ^C^O^M^P^I^L^E^D ^P^A^N^E^L.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^Z^E^R^O (0), ^N^O ^C^A^P^S^U^L^E ^I^S ^G^E^N^E^R^A^T^E^D.

      D^E^F^A^U^L^T@D F^I^L^E CAPSULE
.HELP,LIB,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^A^P^S^U^L^E.  I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^Z^E^R^O (0), ^T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T ^S^T^O^R^E ^T^H^E ^C^O^M^P^I^L^E^D ^P^A^N^E^L ^I^N ^A
      ^U^S^E^R ^L^I^B^R^A^R^Y.

      D^E^F^A^U^L^T@D F^I^L^E PANELIB
.HELP,REC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (REC=^R^E^C^N^A^M^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N
      ^R^E^C^O^R^D ^T^O ^B^E ^S^E^L^E^C^T^E^D ^F^O^R ^P^R^O^C^E^S^S^I^N^G ^F^R^O^M ^T^H^E ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E.
      I^F ^A^N ^A^S^T^E^R^I^S^K (*) ^I^S ^E^N^T^E^R^E^D, ^A^L^L ^R^E^C^O^R^D^S ^W^I^L^L ^B^E ^P^R^O^C^E^S^S^E^D.  I^F REC
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^C^U^R^R^E^N^T ^R^E^C^O^R^D ^W^I^L^L ^B^E ^P^R^O^C^E^S^S^E^D, ^W^I^T^H ^N^O ^R^E^G^A^R^D ^T^O ^T^H^E
      ^R^E^C^O^R^D ^N^A^M^E.
.HELP,RW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (RW=^O^P^T^I^O^N) ^S^P^E^C^I^F^I^E^S ^I^F ^T^H^E ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N ^A^N^D ^L^I^S^T^I^N^G
      ^F^I^L^E^S ^A^R^E ^T^O ^B^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^P^R^O^C^E^S^S^I^N^G.

      ^O^P^T^I^O^N            A^C^T^I^O^N
      ------            ------

      NO ^O^R N          F^I^L^E^S ^A^R^E ^N^O^T ^R^E^W^O^U^N^D.
      YES ^O^R Y         F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D.

      D^E^F^A^U^L^T@D  I^F RW ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D.
.ENDHELP
.EX.  $PDU(#I=I,#L=L,#C=C,#LIB=LIB,#REC=REC,#RW=RW)
*WEOR
.PROC,PERMIT*I
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
,UN[U^S^E^R ^N^A^M^E]=(*A1..7)
,M[F^I^L^E ^A^C^C^E^S^S]=(E,EXECUTE,R,READ,RA,READAP,M,MODIFY,W,
                               WRITE,RM,READMD,A,APPEND,N,NULL,*N=READ)
/PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
,XD[E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^O^F ^P^E^R^M^I^S^S^I^O^N]=(*S6(0123456789),*N=)
,XT[E^X^P^I^R^A^T^I^O^N ^T^E^R^M ^I^N ^D^A^Y^S]=(*S4(0123456789),$*$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PERMIT,^P^F^N,^U^S^E^R^N^A^M^E=^A^C^C^E^S^S^M^O^D^E/PN=^P^N,R=^R,NA,WB,
                 XD=^E^X^P^I^R^E^D^A^T^E,XT=^E^X^P^I^R^E^T^E^R^M.

      T^H^E PERMIT ^C^O^M^M^A^N^D ^E^X^P^L^I^C^I^T^L^Y ^P^E^R^M^I^T^S ^A^N^O^T^H^E^R ^U^S^E^R ^T^O ^A^C^C^E^S^S ^A ^P^R^I^V^A^T^E
      ^F^I^L^E ^I^N ^Y^O^U^R ^C^A^T^A^L^O^G.  T^H^E PERMIT ^C^O^M^M^A^N^D ^C^A^N ^A^L^S^O ^C^H^A^N^G^E ^T^H^E ^M^O^D^E ^I^N
      ^W^H^I^C^H ^A^N^O^T^H^E^R ^U^S^E^R ^C^A^N ^A^C^C^E^S^S ^A ^S^E^M^I^P^R^I^V^A^T^E ^O^R ^P^U^B^L^I^C ^F^I^L^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^M^U^S^T ^B^E ^T^H^E ^N^A^M^E ^O^F ^A^N ^E^X^I^S^T^I^N^G ^F^I^L^E.
      (T^O ^C^R^E^A^T^E ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E, ^U^S^E ^T^H^E DEFINE ^C^O^M^M^A^N^D;
      ^T^O ^C^R^E^A^T^E ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E, ^U^S^E ^T^H^E SAVE ^C^O^M^M^A^N^D.)

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N ^T^O ^B^E ^G^R^A^N^T^E^D ^T^O
      ^T^H^E ^U^S^E^R.

      E^N^T^E^R  ^T^O ^A^L^L^O^W ^U^S^E^R ^T^O@D
      -----  -----------------
      A      A^P^P^E^N^D
      E      E^X^E^C^U^T^E ^O^N^L^Y.
      M      M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      R      R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RA     R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      RM     R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D ^O^R ^E^X^E^C^U^T^E.
      W      W^R^I^T^E, ^M^O^D^I^F^Y, ^A^P^P^E^N^D, ^R^E^A^D ^M^O^D^I^F^Y, ^R^E^A^D ^A^P^P^E^N^D, ^R^E^A^D
             ^O^R ^E^X^E^C^U^T^E.
      N      N^O^N^E; ^U^S^E^R ^D^E^N^I^E^D ^P^E^R^M^I^S^S^I^O^N ^T^O ^A^C^C^E^S^S ^F^I^L^E.

      D^E^F^A^U^L^T@D  R
.HELP,UN,NOLIST

      E^N^T^E^R ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^U^S^E^R ^Y^O^U ^W^I^S^H ^T^O ^G^R^A^N^T ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^U^S^E^R ^N^A^M^E.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.
      S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^R^E^S^I^D^E^S ^O^N ^A^N
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.
.HELP,R,NOLIST

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^R^A^M^E^T^E^R PN (^P^A^C^K
      ^N^A^M^E), ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^I^F ^A^N^Y ^P^R^O^C^E^S^S^I^N^G ^E^R^R^O^R^S ^A^R^E
      ^E^N^C^O^U^N^T^E^R^E^D ^T^H^E ^J^O^B ^W^I^L^L ^N^O^T ^A^B^O^R^T.

      D^E^F^A^U^L^T@D  E^R^R^O^R^S ^I^N PERMIT ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^A^L^L^O^W^S ^Y^O^U^R ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^A ^B^U^S^Y ^F^I^L^E ^O^R
      ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^A ^D^I^S^K ^P^A^C^K, ^B^U^T ^D^O^E^S ^N^O^T ^P^R^E^V^E^N^T ^A^B^O^R^T ^O^N
      ^O^T^H^E^R ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S.  E^N^T^E^R WB ^F^O^R ^W^A^I^T-^I^F-^B^U^S^Y, ^O^T^H^E^R^W^I^S^E
      ^O^M^I^T.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D  WB ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,XD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XD) ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^F^O^R ^T^H^E ^P^E^R^M^I^S^S^I^O^N.
      E^N^T^E^R ^A ^S^I^X-^D^I^G^I^T ^S^T^R^I^N^G ^O^F ^T^H^E ^F^O^R^M ^Y^Y^M^M^D^D.

      D^E^F^A^U^L^T@D  N^O^N^E; ^B^U^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^N ^B^E ^O^M^I^T^T^E^D.
.HELP,XT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XY)  ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^F^E ^O^F ^T^H^E ^P^E^R^M^I^S^S^I^O^N ^I^N ^D^A^Y^S.
      I^F ^Y^O^U ^E^N^T^E^R ^Z^E^R^O, ^T^H^E ^P^E^R^M^I^S^S^I^O^N ^E^X^P^I^R^E^S ^I^M^M^E^D^I^A^T^E^L^Y; ^I^F ^Y^O^U ^E^N^T^E^R
      4095 ^O^R ^A^N ^A^S^T^E^R^I^S^K (*), ^T^H^E ^P^E^R^M^I^S^S^I^O^N ^D^O^E^S ^N^O^T ^E^X^P^I^R^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^B^U^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^A^N ^B^E ^O^M^I^T^T^E^D.
.ENDHELP
.EX.  $PERMIT(PFN,UN=M/#PN=PN,#R=R,#XD=XD,#XT=XT_NA_WB)
*WEOR
.PROC,PRIMARY*I
,FN[P^R^I^M^A^R^Y ^F^I^L^E]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PRIMARY,^L^F^N.

      T^H^E PRIMARY ^C^O^M^M^A^N^D ^M^A^K^E^S ^A ^L^O^C^A^L ^F^I^L^E ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^O^R ^C^R^E^A^T^E^S ^A^N
      ^E^M^P^T^Y ^P^R^I^M^A^R^Y ^F^I^L^E.
.HELP,FN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^M^A^D^E ^T^H^E
      ^P^R^I^M^A^R^Y ^F^I^L^E.  T^H^E ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.
      I^F ^T^H^E ^F^I^L^E ^D^O^E^S ^N^O^T ^E^X^I^S^T, PRIMARY ^C^R^E^A^T^E^S ^A^N ^E^M^P^T^Y ^F^I^L^E ^O^N ^M^A^S^S
      ^S^T^O^R^A^G^E.
.ENDHELP
.EX.  $PRIMARY,FN.
*WEOR
.PROC,PROFILE*I
,I[I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S ^F^I^L^E]=(*F,*N=INPUT)
,L[F^I^L^E ^T^O ^R^E^C^E^I^V^E ^L^I^S^T^I^N^G^S]=(*F,*N=OUTPUT)
,P[P^R^O^J^E^C^T ^P^R^O^F^I^L^E ^F^I^L^E]=(*F,*N=PROFILC)
,CN[C^H^A^R^G^E ^N^U^M^B^E^R ^I^N^Q^U^I^R^Y]=(*S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890),*N=)
,PN[P^R^O^J^E^C^T ^N^U^M^B^E^R ^I^N^Q^U^I^R^Y]=(*S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890),*N=)
,OP[PROFILE ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N]=(L,U,T,I,*N=U)
,LO[PROFILE ^L^I^S^T ^O^P^T^I^O^N]=(FM,CM,PM,*N=FM)
,DIR[D^I^R^E^C^T^I^V^E^S ^S^T^A^T^E^M^E^N^T]=(*A1,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PROFILE,I=^L^F^N1,L=^L^F^N2,P=^L^F^N3,CN=^C^N,PN=^P^N,
                 CV,OP=^O^P^T,LO=^O^P.
               ^O^R
               PROFILE,I=^L^F^N1,L=^L^F^N2,P=^L^F^N3,CN=^C^N,PN=^P^N,
                 CV,OP=^O^P^T,LO=^O^P,^D^I^R^E^C^T^I^V^E^S.

      T^H^E PROFILE ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^T^H^E ^M^A^S^T^E^R ^U^S^E^R ^T^O ^U^P^D^A^T^E ^A^N^D ^I^N^Q^U^I^R^E ^A^B^O^U^T ^A
      ^P^R^O^J^E^C^T ^P^R^O^F^I^L^E ^F^I^L^E ^F^O^R ^U^S^E^R ^P^R^O^F^I^L^E ^C^O^N^T^R^O^L.
.HELP,I,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (I=^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E ^L^F^N1 ^C^O^N^T^A^I^N^S ^T^H^E ^I^N^P^U^T
      ^D^I^R^E^C^T^I^V^E^S ^F^O^R ^A^N ^U^P^D^A^T^E (OP=U).  I^F ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^U^S^E ^F^I^L^E
      INPUT.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L=^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E ^L^F^N2 ^I^S ^T^O ^R^E^C^E^I^V^E ^T^H^E ^O^U^T^P^U^T
      ^L^I^S^T^I^N^G^S.  I^F ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^U^S^E ^F^I^L^E OUTPUT.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (P=^L^F^N3) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E ^L^F^N3 ^I^S ^T^H^E ^P^R^O^J^E^C^T ^P^R^O^F^I^L^E
      ^F^I^L^E.  I^F ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^U^S^E ^F^I^L^E PROFILC.
.HELP,CN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CN=^C^N) ^S^P^E^C^I^F^I^E^S ^C^H^A^R^G^E ^N^U^M^B^E^R ^I^N^Q^U^I^R^Y.  A^L^L ^P^R^O^J^E^C^T
      ^N^U^M^B^E^R^S ^V^A^L^I^D ^F^O^R ^C^H^A^R^G^E ^N^U^M^B^E^R ^C^N ^A^R^E ^W^R^I^T^T^E^N ^T^O ^O^U^T^P^U^T ^F^I^L^E.  V^A^L^I^D
      ^O^N^L^Y ^I^F OP=I ^O^P^T^I^O^N ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^P^R^O^J^E^C^T ^N^U^M^B^E^R ^I^N^Q^U^I^R^Y.  T^H^E ^C^O^N^T^R^O^L
      ^V^A^L^U^E^S ^A^N^D ^A^L^L ^V^A^L^I^D ^U^S^E^R ^N^A^M^E^S ^F^O^R ^P^R^O^J^E^C^T ^N^U^M^B^E^R ^P^N ^A^R^E ^W^R^I^T^T^E^N ^T^O ^T^H^
      ^O^U^T^P^U^T ^F^I^L^E.  T^H^E OP=I ^A^N^D CN=^C^N ^O^P^T^I^O^N^S ^M^U^S^T ^A^L^S^O ^B^E ^S^P^E^C^I^F^I^E^D ^T^O ^U^S^E
      ^T^H^E PN ^O^P^T^I^O^N.
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=^O^P^T) ^S^P^E^C^I^F^I^E^S ^T^H^E PROFILE ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N.  S^E^L^E^C^T
      ^F^R^O^M ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      ^O^P^T                              D^E^S^C^R^I^P^T^I^O^N
      ---                              -----------

      L     L^I^S^T^S ^P^O^R^T^I^O^N^S ^O^F ^T^H^E ^P^R^O^F^I^L^E ^F^I^L^E ^A^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E LO=^O^P
            ^P^A^R^A^M^E^T^E^R.

      T     I^N^T^E^R^A^C^T^I^V^E ^U^P^D^A^T^E.  P^R^O^C^E^S^S^I^N^G ^I^S ^T^H^E ^S^A^M^E ^A^S OP=U, ^B^U^T ^P^R^E^L^I^M^I^N^A^R^Y
            ^I^N^S^T^R^U^C^T^I^O^N^S ^A^R^E ^S^U^P^P^R^E^S^S^E^D.

      U     U^P^D^A^T^E^S ^T^H^E ^P^R^O^J^E^C^T ^P^R^O^F^I^L^E ^F^I^L^E ^W^I^T^H ^D^I^R^E^C^T^I^V^E^S ^S^U^P^P^L^I^E^D ^B^Y
            ^T^H^E ^I^N^P^U^T ^F^I^L^E.  U ^I^S ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E ^F^O^R ^T^H^E ^M^A^S^T^E^R ^U^S^E^R ^I^F
            ^T^H^E OP ^O^P^T^I^O^N ^I^S ^O^M^I^T^T^E^D.
.HELP,LO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R LO=^O^P ^S^P^E^C^I^F^I^E^S ^T^H^E PROFILE ^L^I^S^T ^O^P^T^I^O^N (OP=L ^M^U^S^T ^B^E
      ^S^P^E^C^I^F^I^E^D.  S^E^L^E^C^T ^F^R^O^M ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      ^O^P                               D^E^S^C^R^I^P^T^I^O^N
      --                               -----------

      FM     F^U^L^L ^L^I^S^T ^O^F ^E^V^E^R^Y^T^H^I^N^G ^A^C^C^E^S^S^I^B^L^E ^O^N ^T^H^E ^P^R^O^F^I^L^E ^F^I^L^E ^B^Y
             ^T^H^E ^M^A^S^T^E^R ^U^S^E^R.  T^H^I^S ^I^S ^T^H^E ^D^E^F^A^U^L^T ^F^O^R ^A ^N^O^N^S^Y^S^T^E^M ^O^R^I^G^I^N
             ^J^O^B ^I^F ^T^H^E LO=^O^P ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.

      CM     C^H^A^R^G^E ^N^U^M^B^E^R ^L^I^S^T ^O^F ^A^L^L ^C^H^A^R^G^E ^N^U^M^B^E^R^S ^A^C^C^E^S^S^I^B^L^E ^O^N ^T^H^E
             ^P^R^O^F^I^L^E ^F^I^L^E ^B^Y ^T^H^E ^M^A^S^T^E^R ^U^S^E^R.

      PM     P^R^O^J^E^C^T ^N^U^M^B^E^R ^L^I^S^T ^O^F ^A^L^L ^P^R^O^J^E^C^T ^N^U^M^B^E^R^S ^A^C^C^E^S^S^I^B^L^E ^O^N ^T^H^E
             ^P^R^O^F^I^L^E ^F^I^L^E ^B^Y ^T^H^E ^M^A^S^T^E^R ^U^S^E^R.
.HELP,DIR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^D^I^R^E^C^T^I^V^E^S) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^D^I^R^E^C^T^I^V^E^S ^A^R^E ^A^V^A^I^L^A^B^L^E
      ^T^O ^T^H^E ^M^A^S^T^E^R ^U^S^E^R ^A^S ^I^N^P^U^T ^T^O PROFILE ^T^O ^A^D^D ^O^R ^U^P^D^A^T^E ^I^N^F^O^R^M^A^T^I^O^N
      ^C^O^N^C^E^R^N^I^N^G ^E^A^C^H ^C^H^A^R^G^E ^N^U^M^B^E^R.

      D^E^F^A^U^L^T@D I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.ENDHELP
.EX. $PROFILE(#I=I,#L=L,#P=P,#CN=CN,#PN=PN,#OP=OP,#LO=LP)
*WEOR
.PROC,PROTECT*I
,ECS[S^A^V^E ECS]=(YES=ON,ON,NO=OFF,OFF,*N=OFF)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PROTECT,EC=^S^T^A^T^E.
               PROTECT,^S^T^A^T^E.

      T^H^E PROTECT ^C^O^M^M^A^N^D ^A^C^T^I^V^A^T^E^S ^O^R ^D^E^A^C^T^I^V^A^T^E^S ^P^R^E^S^E^R^V^A^T^I^O^N ^O^F ^T^H^E
      ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^F^I^E^L^D ^B^E^T^W^E^E^N ^J^O^B ^S^T^E^P^S.
.HELP,ECS,NOLIST

     ^S^T^A^T^E               D^E^S^C^R^I^P^T^I^O^N
     -----               -----------
      ON     A^C^T^I^V^A^T^E^S ^T^H^E ^P^R^E^S^E^R^V^A^T^I^O^N ^O^F ^M^E^M^O^R^Y.

      OFF    D^E^A^C^T^I^V^A^T^E^S ^T^H^E ^P^R^E^S^E^R^V^A^T^I^O^N ^O^F ^M^E^M^O^R^Y.

      D^E^F^A^U^L^T@D  OFF.
.ENDHELP
.EX.  $PROTECT,ECS.
*WEOR
.PROC,PURGALL*I
,AD[A^C^C^E^S^S ^D^A^T^E (AD)]=(*A1,*N)
,AF[F^I^L^E^S ^A^C^C^E^S^S^E^D (AF)]=(*A1,*N)
,CD[C^R^E^A^T^I^O^N ^D^A^T^E (CD)]=(*A1,*N)
,CT[P^E^R^M^I^T ^C^A^T^E^G^O^R^Y ^T^O ^B^E ^P^U^R^G^E^D (CT)]=(*A1,*N)
,DF[D^A^Y^F^I^L^E ^M^E^S^S^A^G^E (DF)]=(*A1,*N)
,DN[D^E^V^I^C^E ^N^U^M^B^E^R (DN)]=(*A1,*N)
,EF[E^X^C^L^U^D^E^D ^P^E^R^M^A^N^E^N^T ^F^I^L^E (EF)]=(*A1,*N)
,FN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E (FN)]=(*A1,*N)
,MD[L^A^S^T ^M^O^D^I^F^I^C^A^T^I^O^N ^D^A^T^E (MD)]=(*A1,*N)
,NA[N^O ^A^B^O^R^T ^O^P^T^I^O^N (NA)]=(*A1,*N)
,PN[A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN)]=(*A1,*N)
,R[A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E (R)]=(R=R,*A1,*N)
,TM[T^I^M^E ^O^F ^D^A^Y (TM)]=(*A1,*N)
,TY[F^I^L^E ^T^Y^P^E ^T^O ^B^E ^P^U^R^G^E^D (TY)]=(*A1,*N)
,WB[W^A^I^T-^I^F-^B^U^S^Y (WB)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PURGALL,AD=^A^D,AF,CD=^C^D,CT=^C^T,DF,DN=^D^N,EF=^E^F,FN=^F^N,MD=^M^D,
                   NA,PN=^P^A^C^K^N^A^M^E,R=^R,TM=^T^M,TY=^T^Y,WB.

      T^H^E PURGALL ^C^O^M^M^A^N^D ^P^U^R^G^E^S ^A^L^L ^Y^O^U^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S ^T^H^A^T ^S^A^T^I^S^F^Y
      ^T^H^E ^C^R^I^T^E^R^I^A ^S^P^E^C^I^F^I^E^D ^B^Y ^I^T^S ^P^A^R^A^M^E^T^E^R^S.

      AF, CT, DF, DN, EF, FN, NA, PN, R, TY, TM, ^A^N^D ^O^N^E ^D^A^T^E (^E^I^T^H^E^R AD, MD,
      ^O^R CD) ^C^A^N ^B^E ^E^N^T^E^R^E^D ^O^N ^A ^S^I^N^G^L^E PURGALL ^C^O^M^M^A^N^D.
.HELP,AD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AD=^A^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^A^C^C^E^S^S ^D^A^T^E; ^I^T^S ^F^O^R^M^A^T ^I^S ^Y^Y^M^M^D^D.
      A^L^L ^F^I^L^E^S ^L^A^S^T ^A^C^C^E^S^S^E^D ^B^E^F^O^R^E ^T^H^I^S ^D^A^T^E ^A^R^E ^P^U^R^G^E^D, ^U^N^L^E^S^S ^T^H^E AF
      ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,AF,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AF ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^F^I^L^E^S ^A^C^C^E^S^S^E^D ^A^F^T^E^R ^T^H^E ^D^A^T^E ^S^P^E^C^I^F^I^E^D
      ^B^Y ^T^H^E AD=^A^D ^P^A^R^A^M^E^T^E^R, ^M^O^D^I^F^I^E^D ^A^F^T^E^R ^T^H^E ^D^A^T^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E MD=^M^D
      ^P^A^R^A^M^E^T^E^R, ^O^R ^C^R^E^A^T^E^D ^A^F^T^E^R ^T^H^E ^D^A^T^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E CD=^C^D ^P^A^R^A^M^E^T^E^R
      ^A^R^E ^P^U^R^G^E^D.
.HELP,CD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CD=^C^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^R^E^A^T^I^O^N ^D^A^T^E; ^I^T^S ^F^O^R^M^A^T ^I^S ^Y^Y^M^M^D^D.
      A^L^L ^F^I^L^E^S ^C^R^E^A^T^E^D ^B^E^F^O^R^E ^T^H^I^S ^D^A^T^E ^A^R^E ^P^U^R^G^E^D, ^U^N^L^E^S^S ^T^H^E AF ^P^A^R^A^M^E^T^E^R
      ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,CT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CT=^C^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^C^A^T^E^G^O^R^Y ^T^O ^B^E ^P^U^R^G^E^D.  E^N^T^R^I^E^S
      ^A^R^E P, PR, ^O^R PRIVATE ^F^O^R ^P^R^I^V^A^T^E; S ^O^R SPRIV ^F^O^R ^S^E^M^I^P^R^I^V^A^T^E; ^A^N^D PU
      ^O^R PUBLIC ^F^O^R ^P^U^B^L^I^C.
.HELP,DF,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DF ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^W^I^L^L ^B^E ^I^S^S^U^E^D ^F^O^R
      ^E^A^C^H ^F^I^L^E ^T^H^A^T ^I^S ^P^U^R^G^E^D.
.HELP,DN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DN=^D^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^N^U^M^B^E^R ^A^S^S^I^G^N^E^D ^T^O ^A ^D^E^V^I^C^E
      ^D^U^R^I^N^G ^S^Y^S^T^E^M ^I^N^I^T^I^A^L^I^Z^A^T^I^O^N.  O^N^L^Y ^F^I^L^E^S ^O^N ^T^H^A^T ^D^E^V^I^C^E ^A^R^E ^P^U^R^G^E^D.
.HELP,EF,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R EF=^E^F ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^E^X^C^L^U^D^E^D ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E^S.
      T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^X^C^L^U^D^E^S ^F^R^O^M ^P^U^R^G^I^N^G ^T^H^E^S^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E^S.

      A^N ^A^S^T^E^R^I^S^K (*) ^P^R^E^S^E^N^T ^I^N ^A ^F^I^L^E ^N^A^M^E ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^A ^S^E^T ^O^F ^F^I^L^E^S ^I^S ^T^O
      ^B^E ^E^X^C^L^U^D^E^D.  F^O^R ^E^X^A^M^P^L^E, EF=***OPL ^W^I^L^L ^E^X^C^L^U^D^E ^F^R^O^M ^P^U^R^G^I^N^G ^A^L^L ^T^H^E
      ^F^I^L^E^S ^W^I^T^H ^S^I^X ^C^H^A^R^A^C^T^E^R ^N^A^M^E^S ^T^H^A^T ^E^N^D ^I^N OPL; EF=M****** ^W^I^L^L ^E^X^C^L^U^D^E
      ^F^R^O^M ^P^U^R^G^I^N^G ^A^L^L ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R M.

      M^U^L^T^I^P^L^E ^F^I^L^E ^N^A^M^E^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D, ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S; ^F^O^R ^E^X^A^M^P^L^E,
      EF=A******/B******/C****** ^W^I^L^L ^E^X^C^L^U^D^E ^F^R^O^M ^P^U^R^G^I^N^G ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H
      ^N^A^M^E^S ^T^H^A^T ^B^E^G^I^N ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S A, B ^O^R C.

      T^H^E EF ^P^A^R^A^M^E^T^E^R ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D ^T^O^G^E^T^H^E^R ^W^I^T^H ^T^H^E FN ^P^A^R^A^M^E^T^E^R; ^F^O^R
      ^E^X^A^M^P^L^E, FN=AB*****,EF=ABC**** ^W^I^L^L ^P^U^R^G^E ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T
      ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S AB, ^E^X^C^E^P^T ^F^O^R ^T^H^O^S^E ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T
      ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S ABC.
.HELP,FN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R FN=^F^N ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E^S.  T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^R^E^S^T^R^I^C^T^S ^T^H^E ^P^U^R^G^I^N^G ^T^O ^T^H^E^S^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E^S.

      A^N ^A^S^T^E^R^I^S^K (*) ^P^R^E^S^E^N^T ^I^N ^A ^F^I^L^E ^N^A^M^E ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^A ^S^E^T ^O^F ^F^I^L^E^S ^I^S ^T^O
      ^B^E ^P^U^R^G^E^D.  F^O^R ^E^X^A^M^P^L^E, FN=***OPL ^W^I^L^L ^P^U^R^G^E ^A^L^L ^F^I^L^E^S ^W^I^T^H ^A ^S^I^X
      ^C^H^A^R^A^C^T^E^R ^N^A^M^E ^T^H^A^T ^E^N^D^S ^I^N OPL; FN=M****** ^W^I^L^L ^P^U^R^G^E ^A^L^L ^F^I^L^E^S ^W^I^T^H
      ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R M.

      M^U^L^T^I^P^L^E ^F^I^L^E ^N^A^M^E^S ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D, ^S^E^P^A^R^A^T^E^D ^B^Y ^S^L^A^S^H^E^S; ^F^O^R ^E^X^A^M^P^L^E,
      FN=A******/B******/C****** ^W^I^L^L ^P^U^R^G^E ^A^L^L ^F^I^L^E^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^T^H^E
      ^L^E^T^T^E^R^S A, B ^O^R C.

      T^H^E FN ^P^A^R^A^M^E^T^E^R ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D ^T^O^G^E^T^H^E^R ^W^I^T^H ^T^H^E EF ^P^A^R^A^M^E^T^E^R; ^F^O^R
      ^E^X^A^M^P^L^E, FN=AB*****,EF=ABC**** ^W^I^L^L ^P^U^R^G^E ^A^L^L ^T^H^E ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T
      ^S^T^A^R^T ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S AB, ^E^X^C^E^P^T ^F^O^R ^T^H^O^S^E ^F^I^L^E^S ^W^I^T^H ^N^A^M^E^S ^T^H^A^T ^S^T^A^R^T
      ^W^I^T^H ^T^H^E ^L^E^T^T^E^R^S ABC.
.HELP,MD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R MD=^M^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^M^O^D^I^F^I^C^A^T^I^O^N ^D^A^T^E; ^I^T^S ^F^O^R^M^A^T ^I^S
      ^Y^Y^M^M^D^D.  A^L^L ^F^I^L^E^S ^L^A^S^T ^M^O^D^I^F^I^E^D ^B^E^F^O^R^E ^T^H^I^S ^D^A^T^E ^A^R^E ^P^U^R^G^E^D, ^U^N^L^E^S^S ^T^H^E
      AF ^P^A^R^A^M^E^T^E^R ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  I^F ^T^H^E ^S^P^E^C^I^F^I^E^D
      ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E, ^T^H^E ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^I^T
      ^B^E^C^O^M^E^S ^A^V^A^I^L^A^B^L^E.
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN=^P^A^C^K^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^A^U^X^I^L^I^T^A^R^Y ^D^E^V^I^C^E
      ^O^N ^W^H^I^C^H ^T^H^E ^F^I^L^E^S ^T^O ^B^E ^P^U^R^G^E^D ^R^E^S^I^D^E.  T^H^E PN ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T ^B^E
      ^S^P^E^C^I^F^I^E^D ^I^F ^A ^D^E^V^I^C^E ^N^U^M^B^E^R ^I^S ^S^P^E^C^I^F^I^E^D (DN=^D^N).
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^O^N ^W^H^I^C^H ^T^H^E
      ^F^I^L^E^S ^T^O ^B^E ^P^U^R^G^E^D ^R^E^S^I^D^E.  T^H^E R ^P^A^R^A^M^E^T^E^R ^C^A^N^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^A
      ^D^E^V^I^C^E ^N^U^M^B^E^R ^I^S ^S^P^E^C^I^F^I^E^D (DN=^D^N).
.HELP,TM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R TM=^T^M ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^I^M^E ^O^F ^D^A^Y ^O^N ^T^H^E ^D^A^T^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^
      AD, MD, ^O^R CD ^P^A^R^A^M^E^T^E^R; ^I^T^S ^F^O^R^M^A^T ^I^S ^H^H^M^M^S^S.
.HELP,TY,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R TY=^T^Y ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^Y^P^E ^T^O ^B^E ^P^U^R^G^E^D.

                    ^T^Y                              A^C^T^I^O^N
                    --                              ------
                 A ^O^R ALL                 P^U^R^G^E^S ^A^L^L ^F^I^L^E^S.
                 D ^O^R DIRECT              P^U^R^G^E^S ^A^L^L ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E^S.
                 I ^O^R INDIR               P^U^R^G^E^S ^A^L^L ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E^S.

       I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^B^U^T ^O^T^H^E^R ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^S^P^E^C^I^F^I^E^D, ^T^H^E
       ^S^Y^S^T^E^M ^A^S^S^U^M^E^S ^T^Y ^I^S ALL.  T^O ^P^U^R^G^E ^A^L^L ^F^I^L^E^S ^I^F ^N^O ^O^T^H^E^R ^P^A^R^A^M^E^T^E^R^S
       ^A^R^E ^S^P^E^C^I^F^I^E^D, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y TY=A.
.HELP,WB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R WB ^S^P^E^C^I^F^I^E^S ^T^H^E ^W^A^I^T-^I^F-^B^U^S^Y ^O^P^T^I^O^N.  WB ^C^A^U^S^E^S ^T^H^E ^J^O^B
      ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K ^P^A^C^K^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PURGE*I
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F)
/UN[U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  PURGE,^P^F^N1,^P^F^N2,...,^P^F^N^N/UN=^U^N,PW=^P^W,PN=^P^N,R=^R,NA,WB.

      T^H^E PURGE ^C^O^M^M^A^N^D ^R^E^M^O^V^E^S ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E(^S) ^F^R^O^M ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^D^E^V^I^C^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^
      ^P^U^R^G^E (^E^R^A^S^E).  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E, ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E
               ^V^E^R^S^I^O^N ^O^F ^Y^O^U^R ^P^R^I^M^A^R^Y ^F^I^L^E (^I^F ^Y^O^U ^H^A^V^E ^O^N^E) ^I^S ^P^U^R^G^E^D.
               (F^R^O^M HELPME, ^H^O^W^E^V^E^R, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.)
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^S^E^R^N^A^M^E) ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^F^I^L^E ^T^O
      ^B^E ^P^U^R^G^E^D ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G (^Y^O^U ^M^U^S^T ^H^A^V^E ^W^R^I^T^E
      ^P^E^R^M^I^S^S^I^O^N ^O^N ^T^H^A^T ^F^I^L^E).  E^N^T^E^R ^T^H^E ^U^S^E^R'^S ^U^S^E^R ^N^A^M^E.

      D^E^F^A^U^L^T@D Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^I^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O
      ^P^U^R^G^E ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G ^A^N^D ^I^S ^P^A^S^S^W^O^R^D ^P^R^O^T^E^C^T^E^D.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^Y^O^U
      ^W^I^S^H ^T^O ^P^U^R^G^E ^I^F ^T^H^A^T ^F^I^L^E ^I^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E.

      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^R^A^M^E^T^E^R PN (^P^A^C^K
      ^N^A^M^E), ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  E^R^R^O^R^S ^I^N
      PURGE ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B ^W^H^E^N NA ^I^S ^S^P^E^C^I^F^I^E^D.  W^H^E^N
      ^S^P^E^C^I^F^Y^I^N^G NA, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T, ^A
      ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S ^B^U^S^Y (^S^O^M^E^O^N^E ^E^L^S^E ^I^S
      ^U^S^I^N^G ^I^T), ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E (^N^O^T
      ^M^O^U^N^T^E^D) ^W^H^I^C^H ^R^E^S^U^L^T^S ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^F^I^L^E ^B^E^C^O^M^E

      ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R ^E^X^A^M^P^L^E, ^T^H^E ^F^I^L^E ^C^A^N^N^O^T
      ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D
      WB (^W^A^I^T-^I^F-^B^U^S^Y).

      D^E^F^A^U^L^T@D  I^F NA ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^E^R^R^O^R^S ^I^N PURGE ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^A^L^L^O^W^S ^A ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^A ^B^U^S^Y ^F^I^L^E ^O^R ^A ^R^E^M^O^V^A^B^L^E
      ^P^A^C^K ^M^O^U^N^T ^B^U^T ^W^I^L^L ^A^B^O^R^T ^O^N ^O^T^H^E^R ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S.  E^N^T^E^R WB ^F^O^R
      ^W^A^I^T-^I^F-^B^U^S^Y, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O
      ^A^B^O^R^T).
.ENDHELP
.EX.  $PURGE(PFN/#UN=UN,#PW=PW,#PN=PN,#R=R_NA_WB)
*WEOR
.PROC,QGET*I
,JSN[J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN)]=(*S4(0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ),*N=)
,DC[D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E (DC)]=(PR,PU,PL,WT,*N=WT)
,UJN[U^S^E^R ^J^O^B ^N^A^M^E (UJN)]=(*F,*N=)
,FN[L^O^C^A^L ^F^I^L^E ^N^A^M^E ^T^O ^A^S^S^I^G^N ^T^O ^Q^U^E^U^E^D ^F^I^L^E (FN)]=(*F,*N=)
,OP[N^O ^A^B^O^R^T ^O^P^T^I^O^N (OP)]=(NA,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  QGET,JSN=^J^S^N,DC=^D^C,UJN=^U^J^N,FN=^L^F^N,OP=NA.

      T^H^E QGET ^C^O^M^M^A^N^D ^A^S^S^I^G^N^S ^A ^Q^U^E^U^E^D ^F^I^L^E ^T^O ^Y^O^U^R ^J^O^B.  I^F ^N^E^I^T^H^E^R
      JSN ^N^O^R UJN ^I^S ^S^P^E^C^I^F^I^E^D, QGET ^I^S ^A^B^O^R^T^E^D.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A UJN
      ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^W^O ^Q^U^E^U^E^D ^F^I^L^E^S ^W^I^T^H ^T^H^E ^S^A^M^E ^D^I^S^P^O^S^I^T^I^O^N, ^O^R ^I^F ^A
      ^L^O^C^A^L ^F^I^L^E ^A^L^R^E^A^D^Y ^E^X^I^S^T^S ^W^I^T^H ^T^H^E ^S^A^M^E ^N^A^M^E ^A^S ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E, QGET
      ^I^S ^A^B^O^R^T^E^D ^U^N^L^E^S^S OP=NA ^I^S ^A^L^S^O ^S^P^E^C^I^F^I^E^D.

.HELP,JSN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R JSN=^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^O^U^R-^C^H^A^R^A^C^T^E^R ^S^Y^S^T^E^M-^G^E^N^E^R^A^T^E^D
      ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E.

      Y^O^U ^M^U^S^T ^A^T ^L^E^A^S^T ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E ^O^R ^T^H^E ^U^S^E^R
      ^J^O^B ^N^A^M^E.

      D^E^F^A^U^L^T@D N^O^N^E.
.HELP,UJN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R UJN=^U^J^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H
      ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E.

      Y^O^U ^M^U^S^T ^A^T ^L^E^A^S^T ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E ^O^R ^T^H^E ^J^O^B
      ^S^E^Q^U^E^N^C^E ^N^A^M^E.

      D^E^F^A^U^L^T@D  N^O^N^E.
.HELP,DC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DC=^D^C ^S^P^E^C^I^F^I^E^S ^A ^T^W^O-^C^H^A^R^A^C^T^E^R ^C^O^D^E ^W^H^I^C^H ^I^D^E^N^T^I^F^I^E^S
      ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E.

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y
      -----      ----------
      PR         P^R^I^N^T.
      PU         P^U^N^C^H.
      PL         P^L^O^T.
      WT         W^A^I^T.

      D^E^F^A^U^L^T@D WT
.HELP,FN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R FN=^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E ^T^O ^B^E ^A^S^S^I^G^N^E^D
      ^T^O ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E.

      D^E^F^A^U^L^T@D  I^F FN ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E JSN ^B^E^C^O^M^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^N^A^M^E.
                I^F JSN ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E UJN ^B^E^C^O^M^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E
                ^N^A^M^E.
.HELP,OP,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R OP=NA ^D^I^R^E^C^T^S QGET ^N^O^T ^T^O ^A^B^O^R^T ^I^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E
      ^I^S ^N^O^T ^F^O^U^N^D, ^O^R ^I^F ^A^N^Y ^O^T^H^E^R ^N^O^N-^S^Y^N^T^A^C^T^I^C^A^L ^E^R^R^O^R ^O^C^C^U^R^S.
.ENDHELP
.EX.  $QGET(#JSN=JSN,#DC=DC,#UJN=UJN,#FN=FN,#OP=OP)
*WEOR
.PROC,QUEUE7*I
,ID[P^H^Y^S^I^C^A^L I^D^E^N^T^I^F^I^E^R (ID)]=(*A1,*N)
,L[F^I^L^E ^T^O ^R^E^C^E^I^V^E QUEUE7 ^O^U^T^P^U^T (L)]=(L=L,*A1,*N)
,P[D^I^S^P^L^A^Y SCOPE2 Q^U^E^U^E^S (^P)]=(P=P,*A1,*N)
,HEL[P^H^Y^S^I^C^A^L I^D^E^N^T^I^F^I^E^R^S (^H^E^L^P)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  QUEUE7,ID=^P^I^D,L=^L^F^N,^P1,^P2,^P3,^P4.

                    ^O^R

               QUEUE7,^H^E^L^P.

      T^H^E QUEUE7 ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^E^X^A^M^I^N^E ^T^H^E ^S^Y^S^T^E^M ^B^A^T^C^H ^Q^U^E^U^E^S
      ^I^N ^L^I^N^K^E^D SCOPE 2 ^S^Y^S^T^E^M^S.
.HELP,ID,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ID=^P^I^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^H^Y^S^I^C^A^L ^I^D^E^N^T^I^F^I^E^R (PID) ^O^F ^T^H^E
      SCOPE 2 ^M^A^I^N^F^R^A^M^E ^T^O ^B^E ^S^E^A^R^C^H^E^D.  I^F ^N^O PID ^I^S ^S^P^E^C^I^F^I^E^D, ^A^L^L ^M^A^I^N^F^R^A^M^E^S
      ^A^R^E ^S^E^A^R^C^H^E^D.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E ^P^A^R^A^M^E^T^E^R ^N^A^M^E
      (ID) ^A^N^D ^E^Q^U^A^L ^S^I^G^N ^O^M^I^T^T^E^D.
.HELP,L,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E
      QUEUE7 ^O^U^T^P^U^T.  T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,P,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^P(^I) ^S^P^E^C^I^F^I^E^S ^T^H^E SCOPE 2 ^Q^U^E^U^E^S (^I^N^P^U^T, ^O^U^T^P^U^T, ^E^X^E^C^U^T^E,
      ^O^R ^P^U^N^C^H) ^T^O ^B^E ^D^I^S^P^L^A^Y^E^D.  V^A^L^I^D ^O^P^T^I^O^N^S ^F^O^R ^P(^I) ^A^R^E ^L^I^S^T^E^D ^B^E^L^O^W.
      F^R^O^M ^O^N^E ^T^O ^F^O^U^R ^O^P^T^I^O^N^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D.  T^H^E ^D^E^F^A^U^L^T ^I^S E.

             ^P(^I)                      D^E^S^C^R^I^P^T^I^O^N
             ---                       -----------

             A        L^I^S^T^S ^J^O^B^S ^F^O^U^N^D ^I^N ^A^L^L ^Q^U^E^U^E^S (E, I, O, ^A^N^D P).

             E        E^X^E^C^U^T^E ^Q^U^E^U^E; ^L^I^S^T^S ^T^H^E SCOPE 2 R ^D^I^S^P^L^A^Y.

             I        I^N^P^U^T ^Q^U^E^U^E; ^L^I^S^T^S ^T^H^E SCOPE 2 R ^D^I^S^P^L^A^Y ^F^O^R ^I^N^P^U^T.

             O        O^U^T^P^U^T ^Q^U^E^U^E; ^L^I^S^T^S ^T^H^E SCOPE 2 H ^D^I^S^P^L^A^Y ^F^O^R ^O^U^T^P^U^T.

             P        P^U^N^C^H ^Q^U^E^U^E; ^L^I^S^T^S ^T^H^E SCOPE 2 H ^D^I^S^P^L^A^Y ^F^O^R ^P^U^N^C^H ^O^U^T^P^U^T.
.HELP,HEL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^H^E^L^P ^D^I^S^P^L^A^Y^S ^T^H^E ^C^O^M^M^A^N^D ^F^O^R^M^A^T ^O^R ^T^H^E ^P^H^Y^S^I^C^A^L
      ^I^D^E^N^T^I^F^I^E^R^S ^F^O^R ^A^L^L ^A^V^A^I^L^A^B^L^E SCOPE 2 ^M^A^I^N^F^R^A^M^E^S.  T^H^E ^F^O^L^L^O^W^I^N^G ^A^R^E
      ^E^N^T^R^I^E^S ^F^O^R ^T^H^E ^H^E^L^P ^P^A^R^A^M^E^T^E^R.

            ^H^E^L^P                        D^E^S^C^R^I^P^T^I^O^N
            ----                        -----------
            ID             D^I^S^P^L^A^Y^S ^P^H^Y^S^I^C^A^L ^I^D^E^N^T^I^F^I^E^R^S ^F^O^R ^A^L^L SCOPE 2
                           ^M^A^I^N^F^R^A^M^E^S ^I^N ^T^H^E ^N^E^T^W^O^R^K.

            SYNTAX         D^I^S^P^L^A^Y^S ^T^H^E QUEUE7 ^C^O^M^M^A^N^D ^F^O^R^M^A^T.
            ^O^R
            S
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RBR*I
,N[N^A^M^E ^O^F ^B^I^N^A^R^Y ^R^E^C^O^R^D ^F^I^L^E]=(*F,*N=)
,NAM[S^P^E^C^I^F^Y ^R^E^C^O^R^D ^P^R^E^F^I^X ^F^I^L^E]=(*F,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RBR,^N,^N^A^M^E.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E RBR ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.

      T^H^E RBR ^C^O^M^M^A^N^D ^L^O^A^D^S ^O^N^E ^B^I^N^A^R^Y ^R^E^C^O^R^D ^F^R^O^M ^A ^S^P^E^C^I^F^I^E^D ^F^I^L^E ^I^N^T^O
      ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^S^T^A^R^T^I^N^G ^A^T ^T^H^E ^R^E^F^E^R^E^N^C^E ^A^D^D^R^E^S^S (RA).
.HELP,N,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^N ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^N ^I^S ^U^S^E^D ^I^N ^C^O^N^S^T^R^U^C^T^I^N^G ^T^H^E ^N^A^M^E ^O^F ^T^H^E
      ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^B^I^N^A^R^Y ^R^E^C^O^R^D ^T^O ^B^E ^R^E^A^D.  I^F ^N ^I^S ^L^E^S^S ^T^H^A^N ^F^O^U^R
      ^C^H^A^R^A^C^T^E^R^S ^A^N^D ^I^S ^N^U^M^E^R^I^C, TAPE^N ^I^S ^T^H^E ^F^I^L^E ^N^A^M^E.  I^F ^N ^C^O^N^T^A^I^N^S ^A
      ^N^O^N-^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R ^O^R ^I^S ^F^O^U^R ^O^R ^M^O^R^E ^C^H^A^R^A^C^T^E^R^S ^L^O^N^G, ^N ^I^T^S^E^L^F ^I^S
      ^U^S^E^D ^A^S ^T^H^E ^F^I^L^E ^N^A^M^E.  I^F ^N ^I^S ^O^M^I^T^T^E^D, TAPE ^I^S ^T^H^E ^F^I^L^E ^N^A^M^E.
.HELP,NAM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^N^A^M^E ^U^S^E^D ^I^N ^A
      ^R^E^C^O^R^D ^P^R^E^F^I^X.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,READ*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  READ,^F^I^L^E^N^A^M^E,^N,^Z.

      T^H^E READ ^C^O^M^M^A^N^D ^I^N^S^E^R^T^S ^T^H^E ^L^I^N^E^S ^O^F ^A ^R^E^A^D ^F^I^L^E ^A^T ^A ^S^P^E^C^I^F^I^C ^L^O^C^A^T^I^O^N
      ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.

      T^H^E ^L^I^N^E ^N^U^M^B^E^R(^N) ^A^N^D ^L^I^N^E ^N^U^M^B^E^R ^I^N^C^R^E^M^E^N^T(^Z) ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^P^T^I^O^N^A^L.
      T^H^E ^P^A^R^A^M^E^T^E^R ^F^I^L^E^N^A^M^E ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^I^N^S^E^R^T^E^D.

      W^H^E^N ^T^H^E ^L^I^N^E ^N^U^M^B^E^R ^P^A^R^A^M^E^T^E^R ^I^S ^E^N^T^E^R^E^D, ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^
      ^I^N^S^E^R^T^E^D ^A^R^E ^I^N^S^E^R^T^E^D ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W^I^N^G ^L^I^N^E ^N.  I^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^N
      ^I^S ^A ^L^I^N^E ^N^U^M^B^E^R ^T^H^A^T ^I^S ^N^O^T ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E, ^T^H^E ^R^E^A^D ^F^I^L^E ^I^S
      ^I^N^S^E^R^T^E^D ^A^F^T^E^R ^T^H^E ^L^A^R^G^E^S^T ^L^I^N^E ^N^U^M^B^E^R ^T^H^A^T ^I^S ^L^E^S^S ^T^H^A^N ^N.  T^H^E
      ^L^I^N^E ^N^U^M^B^E^R^S ^O^F ^R^E^A^D ^F^I^L^E^S ^A^R^E ^I^N^C^R^E^M^E^N^T^E^D ^B^Y 1, ^U^N^L^E^S^S ^A^N ^I^N^C^R^E^M^E^N^T ^I^S
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^Z ^P^A^R^A^M^E^T^E^R.

      I^F ^T^H^E ^L^I^N^E ^N^U^M^B^E^R ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^E^N^T^E^R^E^D, ^T^H^E ^C^O^N^T^E^N^T^S ^O^F ^T^H^E ^R^E^A^D
      ^F^I^L^E ^A^R^E ^A^D^D^E^D ^T^O ^T^H^E ^E^N^D ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^A^N^D ^I^N^C^R^E^M^E^N^T^E^D ^B^Y ^Z ^F^R^O^M
      ^T^H^E ^L^A^S^T ^L^I^N^E ^N^U^M^B^E^R ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.  F^O^R ^S^E^Q^U^E^N^C^E^D ^R^E^A^D ^F^I^L^E^S, ^L^I^N^E
      ^N^U^M^B^E^R^S ^A^R^E ^A^D^D^E^D ^I^N ^I^N^C^R^E^M^E^N^T^S ^O^F ^O^N^E, ^U^N^L^E^S^S ^O^T^H^E^R^W^I^S^E ^S^P^E^C^I^F^I^E^D ^B^Y
      ^T^H^E ^Z ^P^A^R^A^M^E^T^E^R.  A ^S^E^Q^U^E^N^C^E^D ^R^E^A^D ^F^I^L^E ^W^I^L^L ^B^E ^R^E^S^E^Q^U^E^N^C^E^D ^I^N ^I^N^C^R^E^M^E^N^T

      ^O^F ^Z ^F^R^O^M ^T^H^E ^L^A^S^T ^L^I^N^E ^N^U^M^B^E^R ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.

      U^N^S^E^Q^U^E^N^C^E^D ^R^E^A^D ^F^I^L^E^S ^W^I^L^L ^H^A^V^E ^A ^F^I^V^E-^D^I^G^I^T ^L^I^N^E ^N^U^M^B^E^R ^A^D^D^E^D ^A^N^D
      ^F^O^L^L^O^W^E^D ^B^Y ^A ^B^L^A^N^K (^I^N ^T^H^E FORTRAN ^A^N^D FTNTS ^S^U^B^S^Y^S^T^E^M^S, ^T^H^E ^L^I^N^E ^N^U^M^B^E^R
      ^I^S ^A^D^D^E^D ^B^U^T ^N^O^T ^T^H^E ^B^L^A^N^K).  I^F ^A ^L^I^N^E ^C^O^N^S^I^S^T^S ^O^F ^O^N^L^Y ^A ^L^I^N^E ^N^U^M^B^E^R
      ^O^R ^A ^L^I^N^E ^N^U^M^B^E^R ^F^O^L^L^O^W^E^D ^B^Y ^Z^E^R^O ^O^R ^O^N^E ^B^L^A^N^K, ^T^H^E ^L^I^N^E ^W^I^L^L ^N^O^T ^B^E
      ^I^N^S^E^R^T^E^D ^I^N^T^O ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.

      I^F ^T^H^E ^N^E^W ^L^I^N^E ^N^U^M^B^E^R^S ^O^V^E^R^L^A^P ^E^X^I^S^T^I^N^G ^L^I^N^E^S ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E,
      ^L^I^N^E ^R^E^S^E^Q^U^E^N^C^I^N^G ^O^C^C^U^R^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RECLAIM*I
,AS[P^R^E^S^E^R^V^E ^P^E^R^M^A^N^E^N^T ^D^A^T^A (AS)]=(Y,N,*N=Y)
,DB[F^I^L^E ^N^A^M^E ^O^F RECLAIM ^D^A^T^A^B^A^S^E (DB)]=(*F,*N=RECLDB,0=)
,I[F^I^L^E ^N^A^M^E ^F^O^R RECLAIM ^D^I^R^E^C^T^I^V^E^S (I)]=(*F,*N=INPUT)
,L[F^I^L^E ^T^O ^R^E^C^E^I^V^E ^L^I^S^T^A^B^L^E ^O^U^T^P^U^T (L)]=(*F,*N=OUTPUT)
,NH[D^O ^Y^O^U ^W^A^N^T ^P^R^I^N^T^E^D ^H^E^A^D^E^R (NH)]=(YES=,Y=,*K=$,NH$,NO=$,NH$,
                                  N=$,NH$,*N=)
,PN[A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E (PN)]=(*F,*N=)
,R[A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E (R)]=(*S3/AD,*N=)
,PW[P^A^S^S^W^O^R^D ^O^F ^D^A^T^A^B^A^S^E ^F^I^L^E (PW)]=(*F,*N=)
,UN[U^S^E^R ^N^A^M^E ^O^F ^D^A^T^A^B^A^S^E ^F^I^L^E ^O^W^N^E^R (UN)]=(*A1..7,*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S (NA)]=(YES=,Y=,*K=$,NA$,NO=$,NA$,
                                         N=$,NA$,*N=)
,NV[W^R^I^T^E ^D^U^M^P ^A^T ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N (NV)]=(YES=$,NV$,Y=$,NV$,*K=$,NV$,NO=,N=,*N=)
.
.HELP,,NOLIST
      F^O^R^M^A^T@D  RECLAIM,AS=^O^P^T^I^O^N,DB=^P^F^N,I=^L^F^N1,L=^L^F^N2,NH,PN=^P^A^C^K^N^A^M^E,
                       R=^D^E^V^T^Y^P^E,PW=^P^A^S^S^W^O^R^D,UN=^U^S^E^R^N^A^M^E,NA,NV,Z./^D^I^R^E^C^T^I^V^E1,
                       ^O^P^T^I^O^N1,^O^P^T^I^O^N2,...^O^P^T^I^O^N^N/^D^I^R^E^C^T^I^V^E2,^O^P^T^I^O^N21,^O^P^T^I^O^N22,
                       ...^O^P^T^I^O^N2^N/^D^I^R^E^C^T^I^V^E^N^N,^O^P^T^I^O^N^N1,^O^P^T^I^O^N^N2,...^O^P^T^I^O^N^N^N.

      T^H^E RECLAIM ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^D^U^M^P ^L^O^C^A^L ^O^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S,
      ^R^E^T^R^I^E^V^E ^F^I^L^E^S ^F^R^O^M ^A ^D^U^M^P ^F^I^L^E, ^L^I^S^T ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^F^I^L^E^S
      ^P^R^E^V^I^O^U^S^L^Y ^D^U^M^P^E^D ^T^O ^T^A^P^E ^O^R ^M^A^S^S ^S^T^O^R^A^G^E (^D^I^S^K), ^M^A^K^E ^B^A^C^K^U^P ^C^O^P^I^E^S
      ^O^F ^L^O^C^A^L ^O^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S, ^O^R ^C^O^N^T^R^O^L ^T^H^E ^S^I^Z^E ^O^F ^Y^O^U^R ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E ^D^I^S^K ^S^P^A^C^E.

      T^H^E Z./^D^I^R^E^C^T^I^V^E,^O^P^T^I^O^N ^K^E^Y^W^O^R^D^S ^A^L^L^O^W ^T^H^E ^U^S^E^R ^T^O ^S^P^E^C^I^F^Y
      ^D^I^R^E^C^T^I^V^E^S ^O^N ^T^H^E RECLAIM ^C^O^M^M^A^N^D ^I^T^S^E^L^F, ^W^I^T^H^O^U^T
      ^A^S^S^I^G^N^I^N^G ^T^H^O^S^E ^D^I^R^E^C^T^I^V^E^S ^T^O ^A ^S^E^P^A^R^A^T^E ^F^I^L^E (I=^L^F^N1).  T^H^I^S
      ^O^P^T^I^O^N, ^H^O^W^E^V^E^R, ^C^A^N^N^O^T ^B^E ^U^S^E^D ^W^I^T^H^I^N HELPME.
.HELP,AS,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AS=^O^P^T^I^O^N ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R RECLAIM ^I^S ^T^O ^P^R^E^S^E^R^V^E
      ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^A^T^A^L^O^G ^D^A^T^A ^R^E^L^A^T^I^N^G ^T^O ^C^A^R^T^R^I^D^G^E ^A^N^D ^T^A^P^E ^A^L^T^E^R^N^A^T^E
      ^S^T^O^R^A^G^E.  A^C^C^E^P^T^A^B^L^E ^V^A^L^U^E^S ^F^O^R ^O^P^T^I^O^N ^A^R^E Y ^O^R N.  I^F Y ^I^S ^S^P^E^C^I^F^I^E^D,
      ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^D^A^T^A ^I^S ^P^R^E^S^E^R^V^E^D.  I^F N ^I^S ^S^P^E^C^I^F^I^E^D, ^A^L^T^E^R^N^A^T^E
      ^S^T^O^R^A^G^E ^D^A^T^A ^I^S ^C^L^E^A^R^E^D ^O^N ^T^H^E ^D^U^M^P ^F^I^L^E.  I^F AS ^I^S ^S^P^E^C^I^F^I^E^D ^W^I^T^H^O^U^T
      ^A^N ^E^Q^U^I^V^A^L^E^N^C^E, ^T^H^E ^O^P^T^I^O^N ^V^A^L^U^E ^I^S ^A^S^S^U^M^E^D ^T^O ^B^E Y.  T^H^I^S ^O^P^T^I^O^N ^I^S
      ^O^N^L^Y ^U^S^E^F^U^L ^W^H^E^N ^A RECLAIM ^D^U^M^P ^T^A^P^E ^I^S ^T^O ^B^E ^P^R^O^C^E^S^S^E^D ^B^Y ^T^H^E NOS
      ^U^T^I^L^I^T^Y PFLOAD.  T^H^I^S ^O^P^T^I^O^N ^I^S ^U^S^E^D ^O^N^L^Y ^W^I^T^H ^T^H^E DUMP ^D^I^R^E^C^T^I^V^E
      (^F^O^R ^M^O^R^E ^I^N^F^O^R^M^A^T^I^O^N ^O^N RECLAIM ^D^I^R^E^C^T^I^V^E^S, ^R^E^F^E^R ^T^O ^T^H^E NOS V^O^L^U^M^E 3
      S^Y^S^T^E^M C^O^M^M^A^N^D^S ^M^A^N^U^A^L).

.HELP,DB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R DB=^P^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^T^H^A^T
      ^C^O^N^T^A^I^N^S ^T^H^E ^U^S^E^R'^S RECLAIM ^D^A^T^A^B^A^S^E.  I^F ^Z^E^R^O ^I^S ^E^N^T^E^R^E^D, ^N^O ^D^A^T^A^B^A^S^E
      ^I^S ^C^R^E^A^T^E^D ^O^R ^M^A^I^N^T^A^I^N^E^D.

      D^E^F^A^U^L^T ^F^I^L^E ^N^A^M^E@D RECLDB
.HELP,I,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G
      ^T^H^E RECLAIM ^I^N^P^U^T ^D^I^R^E^C^T^I^V^E^S.

      D^E^F^A^U^L^T ^F^I^L^E ^N^A^M^E@D INPUT
.HELP,L,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^R^E^C^E^I^V^E
      ^L^I^S^T^A^B^L^E ^O^U^T^P^U^T.

      D^E^F^A^U^L^T ^F^I^L^E ^N^A^M^E@D OUTPUT
.HELP,NH,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NH ^P^R^E^V^E^N^T^S RECLAIM ^F^R^O^M ^P^R^I^N^T^I^N^G ^A ^H^E^A^D^E^R ^O^N ^T^H^E
      ^O^U^T^P^U^T ^F^I^L^E (^E^N^T^E^R NH).

      D^E^F^A^U^L^T@D I^F NH ^I^S^N'^T ^S^P^E^C^I^F^I^E^D, ^A ^H^E^A^D^E^R ^I^S ^P^R^I^N^T^E^D.
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN=^P^A^C^K^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.  Y^O^U
      ^S^P^E^C^I^F^Y ^P^A^C^K^N^A^M^E ^O^N^L^Y ^I^F ^T^H^E ^D^A^T^A^B^A^S^E ^F^I^L^E ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^
E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^D^E^V^T^Y^P^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^S^S ^S^T^O^R^A^G^E ^D^E^V^I^C^E ^T^Y^P^E ^F^O^R
      ^D^A^T^A^B^A^S^E ^R^E^S^I^D^E^N^C^E; ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^I^F ^T^H^E PN ^P^A^R^A^M^E^T^E^R ^I^S ^A^L^S^O ^S^P^E^C^I^F^I^

      I^F PN ^I^S ^S^P^E^C^I^F^I^E^D ^B^U^T R ^I^S ^N^O^T, ^T^H^E ^S^Y^S^T^E^M ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.
.HELP,PW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PW=^P^A^S^S^W^O^R^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^F^O^R ^T^H^E
      ^D^A^T^A^B^A^S^E ^F^I^L^E.  A ^D^A^T^A^B^A^S^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^N^E^E^D ^O^N^L^Y ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E
      ^D^A^T^A^B^A^S^E ^F^I^L^E ^R^E^S^I^D^E^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.

      D^E^F^A^U^L^T@D N^O^N^E.
.HELP,UN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R UN=^U^S^E^R^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^D^A^T^A^B^A^S^E ^F^I^L^E
      ^O^W^N^E^R.  T^H^I^S ^N^E^E^D ^O^N^L^Y ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^D^A^T^A^B^A^S^E ^F^I^L^E ^R^E^S^I^D^E^S ^I^N
      ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G. (Y^O^U ^M^U^S^T ^H^A^V^E ^W^R^I^T^E ^P^E^R^M^I^S^S^I^O^N ^T^O ^A^C^C^E^S^S ^F^I^L^E^S
      ^U^N^D^E^R ^A^N^O^T^H^E^R ^U^S^E^R ^N^A^M^E.)

      D^E^F^A^U^L^T@D N^O^N^E.
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^P^R^E^V^E^N^T^S ^A RECLAIM ^A^B^O^R^T ^O^N ^P^R^O^G^R^A^M ^E^R^R^O^R (^E^N^T^E^R NA).

      D^E^F^A^U^L^T@D I^F NA ^I^S^N'^T ^S^P^E^C^I^F^I^E^D, RECLAIM ^A^B^O^R^T^S ^O^N ^E^R^R^O^R^S.
.HELP,NV,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NV ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^D^U^M^P ^I^S ^T^O ^B^E ^W^R^I^T^T^E^N ^A^T ^E^N^D-^O^F-
      ^I^N^F^O^R^M^A^T^I^O^N (EOI) ^R^E^G^A^R^D^L^E^S^S ^O^F ^W^H^A^T ^P^R^E^C^E^D^E^S ^T^H^E EOI.  T^O ^S^P^E^C^I^F^Y
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^E^N^T^E^R NV, ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D RECLAIM ^W^I^L^L ^N^O^T ^W^R^I^T^E ^A ^D^U^M^P ^B^E^G^I^N^N^I^N^G ^A^T EOI ^U^N^L^E^S^S ^A^T
               ^L^E^A^S^T ^O^N^E ^V^A^L^I^D RECLAIM ^D^U^M^P ^P^R^E^C^E^D^E^S ^T^H^E EOI.
.ENDHELP
.EX.  $RECLAIM(#AS=AS,#DB=DB,#I=I,#L=L_NH,#PN=PN,#R=R,#PW=PW,#UN=UN_NA_NV)
$REVERT,NOLIST.
*WEOR
.PROC,RECOVER*I
,JSN[J^O^B ^T^O ^B^E ^R^E^C^O^V^E^R^E^D]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789))
,OP[R^E^C^O^V^E^R ^O^P^T^I^O^N^S]=(T,*N=T)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RECOVER,JSN=^J^S^N,OP=T.

      T^H^E RECOVER ^C^O^M^M^A^N^D ^R^E^C^O^V^E^R^S ^D^E^T^A^C^H^E^D ^J^O^B^S ^O^R ^I^N^T^E^R^R^U^P^T^E^D ^T^E^R^M^I^N^A^L
      ^S^E^S^S^I^O^N^S.

      T^H^E ^L^E^N^G^T^H ^O^F ^T^I^M^E ^B^E^F^O^R^E ^T^H^E ^S^Y^S^T^E^M ^T^I^M^E^S ^O^U^T ^T^H^E ^J^O^B ^D^E^P^E^N^D^S ^O^N ^Y^O^U^R
      ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T^S (^R^E^F^E^R ^T^O ^T^H^E LIMITS ^C^O^M^M^A^N^D), ^W^H^E^T^H^E^R ^Y^O^U^R ^T^E^R^M^I^N^A^L
      ^I^S ^I^N ^S^C^R^E^E^N ^M^O^D^E (^R^E^F^E^R ^T^O ^T^H^E SCREEN ^C^O^M^M^A^N^D), ^A^N^D ^T^H^E ^S^I^T^E-^D^E^T^E^R^M^I^N^E^D
      ^D^E^F^A^U^L^T ^T^I^M^E-^O^U^T ^P^E^R^I^O^D.

      I^F ^Y^O^U ^H^A^V^E ^R^E^C^O^V^E^R^A^B^L^E ^J^O^B^S ^A^N^D ^S^P^E^C^I^F^Y RECOVER ^W^I^T^H^O^U^T ^P^A^R^A^M^E^T^E^R^S,
      ^T^H^E ^S^Y^S^T^E^M ^D^I^S^P^L^A^Y^S ^T^H^O^S^E ^J^O^B^S ^A^N^D ^T^H^E^I^R ^S^T^A^T^U^S, ^A^N^D ^P^R^O^M^P^T^S ^Y^O^U ^F^O^R
      ^F^U^R^T^H^E^R ^R^E^C^O^V^E^R^Y ^D^I^R^E^C^T^I^V^E^S.
.HELP,JSN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E ^O^F ^T^H^E ^D^E^T^A^C^H^E^D ^J^O^B
      ^T^O ^B^E ^R^E^C^O^V^E^R^E^D.
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^E^I^T^H^E^R ^T^O ^A^B^O^R^T ^R^E^C^O^V^E^R^Y ^P^R^O^C^E^S^S^I^N^G ^

      ^Y^O^U ^H^A^V^E ^N^O ^R^E^C^O^V^E^R^A^B^L^E ^J^O^B^S, ^O^R ^T^O ^E^N^G^A^G^E ^Y^O^U ^I^N ^A ^R^E^C^O^V^E^R^Y ^D^I^A^L^O^G^U^E
      ^I^F ^Y^O^U ^D^O ^H^A^V^E ^R^E^C^O^V^E^R^A^B^L^E ^J^O^B^S.  E^N^T^E^R T ^T^O ^A^C^C^O^M^P^L^I^S^H ^E^I^T^H^E^R ^O^N^E.
.ENDHELP.
.EX.  $RECOVER(#JSN=JSN,#OP=OP)
*WEOR
.PROC,REDO*I
,STRING[E^N^T^E^R ^C^O^M^M^A^N^D ^T^O ^M^O^D^I^F^Y]=(*N=,
                      *S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789))
,GO[S^U^P^P^R^E^S^S OLD@D,MOD@D,NEW]=(Y=$/$GO,YES=$/$GO,*K=$/$GO,
                                  N=,NO=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D REDO,^S^T^R^I^N^G/GO
              ^O^R
              R,^S^T^R^I^N^G/GO

      T^H^E REDO ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^M^O^D^I^F^Y ^A^N^D ^R^E-^E^N^T^E^R ^A ^P^R^E^V^I^O^U^S^L^Y
      ^E^N^T^E^R^E^D ^C^O^M^M^A^N^D ^W^I^T^H^O^U^T ^R^E^T^Y^P^I^N^G ^T^H^E ^E^N^T^I^R^E ^C^O^M^M^A^N^D ^A^N^D
      ^P^A^R^A^M^E^T^E^R^S.  T^H^E ^S^Y^S^T^E^M ^R^E^S^P^O^N^D^S ^T^O REDO ^B^Y ^P^R^I^N^T^I^N^G OLD@D ^A^N^D
      ^T^H^E ^C^O^M^M^A^N^D ^Y^O^U ^C^H^O^S^E ^T^O ^C^H^A^N^G^E (^R^E^M^O^V^E ^L^E^A^D^I^N^G ^B^L^A^N^K^S), ^T^H^E^N ^I^T
      ^P^R^I^N^T^S MOD@D ^A^S ^A ^P^R^O^M^P^T ^F^O^R ^Y^O^U ^T^O ^C^H^A^N^G^E ^T^H^E ^C^O^M^M^A^N^D, ^A^N^D ^F^I^N^A^L^L^Y
      NEW@D ^F^O^L^L^O^W^E^D ^B^Y ^T^H^E ^C^H^A^N^G^E^D ^F^O^R^M ^O^F ^T^H^E ^C^O^M^M^A^N^D, ^W^H^I^C^H ^I^S ^T^H^E^N
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^E^X^E^C^U^T^E^D.

      D^E^F^A^U^L^T@D  I^F ^T^H^E ^C^O^M^M^A^N^D ^S^T^R^I^N^G ^A^N^D /GO ^A^R^E ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^W^I^L^L
                ^B^E ^Y^O^U^R ^L^A^S^T ^C^O^M^M^A^N^D.  (W^I^T^H^I^N HELPME, ^Y^O^U^R ^L^A^S^T ^C^O^M^M^A^N^D
                ^W^A^S HELPME,REDO.)
.HELP,STRING,NOLIST

      T^H^E ^T^E^X^T ^O^R ^S^T^R^I^N^G ^F^O^L^L^O^W^I^N^G REDO ^S^H^O^U^L^D ^B^E ^O^N^E ^O^R ^M^O^R^E ^C^H^A^R^A^C^T^E^R^S
      ^O^F ^T^H^E ^C^O^M^M^A^N^D ^Y^O^U ^W^I^S^H ^T^O ^C^H^A^N^G^E, ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^T^H^E ^F^I^R^S^T
      ^C^H^A^R^A^C^T^E^R (^L^E^A^D^I^N^G ^B^L^A^N^K^S ^A^R^E ^I^G^N^O^R^E^D).  F^O^R ^I^N^S^T^A^N^C^E, ^T^O ^M^O^D^I^F^Y ^A
      ^P^R^E^V^I^O^U^S SAVE ^C^O^M^M^A^N^D, ^Y^O^U ^C^O^U^L^D ^E^N^T^E^R REDO,S.  T^H^E ^S^Y^S^T^E^M ^W^O^U^L^D
      ^R^E^S^P^O^N^D ^W^I^T^H OLD@D ^F^O^L^L^O^W^E^D ^B^Y ^T^H^E ^E^N^T^I^R^E SAVE ^C^O^M^M^A^N^D ^A^S ^Y^O^U ^H^A^D
      ^P^R^E^V^I^O^U^S^L^Y ^E^N^T^E^R^E^D ^I^T.

      D^E^F^A^U^L^T@D  I^F ^T^H^E ^C^O^M^M^A^N^D ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^W^I^L^L ^B^E
                ^Y^O^U^R ^L^A^S^T ^C^O^M^M^A^N^D. (W^I^T^H^I^N HELPME, ^Y^O^U^R ^L^A^S^T ^C^O^M^M^A^N^D
                ^W^A^S HELPME,REDO.)
.HELP,GO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (GO) ^S^U^P^P^R^E^S^S^E^S ^T^H^E ^P^R^O^M^P^T^S OLD@D, MOD@D, ^A^N^D NEW@D.
      E^N^T^E^R^I^N^G GO ^C^A^U^S^E^S ^I^M^M^E^D^I^A^T^E ^E^X^E^C^U^T^I^O^N ^O^F ^T^H^E ^C^O^M^M^A^N^D ^Y^O^U ^L^A^S^T
      ^E^N^T^E^R^E^D ^O^R ^O^F ^T^H^E ^C^O^M^M^A^N^D ^S^T^R^I^N^G ^Y^O^U ^S^P^E^C^I^F^I^E^D ^O^N REDO.

      D^E^F^A^U^L^T@D I^F GO ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^P^R^O^M^P^T^S OLD@D, MOD@D, ^A^N^D NEW@D ^A^P^P^E^A^R.
.ENDHELP
.EX. $REDO,STRING_GO.
*WEOR
.PROC,REDUCE*I
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  REDUCE.
               REDUCE-.

      T^H^E REDUCE ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^H^E ^L^O^A^D^E^R ^I^S ^T^O
      ^D^E^T^E^R^M^I^N^E ^F^I^E^L^D ^L^E^N^G^T^H ^A^S^S^I^G^N^M^E^N^T.  REDUCE ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^L^O^A^D^E^R
      ^A^S^S^I^G^N^S ^F^I^E^L^D ^L^E^N^G^T^H.  REDUCE- ^P^R^E^V^E^N^T^S ^T^H^E ^L^O^A^D^E^R ^F^R^O^M ^R^E^D^U^C^I^N^G ^T^H^E
      ^F^I^E^L^D ^L^E^N^G^T^H.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RENAME*I
,NEW[N^E^W ^F^I^L^E ^N^A^M^E]=(*F)
,OLD[O^L^D ^F^I^L^E ^N^A^M^E]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RENAME,^N^E^W^F^I^L^E1=^O^L^D^F^I^L^E1,...,^N^E^W^F^I^L^E^N=^O^L^D^F^I^L^E^N.

      T^H^E RENAME ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^N^A^M^E ^O^F ^O^N^E ^O^R ^M^O^R^E ^L^O^C^A^L ^F^I^L^E^S.  RENAME,
      ^H^O^W^E^V^E^R, ^D^O^E^S ^N^O^T ^C^H^A^N^G^E ^F^I^L^E ^N^A^M^E^S ^I^N ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^S^Y^S^T^E^M.
.HELP,OLD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^I^S^T^I^N^G ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^T^H^E ^O^L^D ^N^A^M^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NEW,NOLIST

       T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^Y^O^U ^W^A^N^T ^T^H^E ^F^I^L^E ^T^O ^H^A^V^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^T^H^E ^N^E^W ^N^A^M^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $RENAME,NEW=OLD.
*WEOR
.PROC,REPLACE*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F,*N=)
/UN[U^S^E^R ^N^A^M^E ^O^F ^F^I^L^E ^O^W^N^E^R]=(*A1..7,*N=)
,PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,M[F^I^L^E ^A^C^C^E^S^S]=(E,EXECUTE,R,READ,RA,READAP,RU,READUP,RM,READMD,M,MODIFY,
                  U,UPDATE,W,WRITE,A,APPEND,N,NULL,*N=)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  REPLACE,^L^F^N=^P^F^N/UN=^U^N,PW=^P^W,M=^M,PN=^P^N,R=^R,NA,WB.

      T^H^E REPLACE ^C^O^M^M^A^N^D ^R^E^P^L^A^C^E^S ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^I^T^H ^A
      ^C^O^P^Y ^O^F ^A ^L^O^C^A^L ^F^I^L^E.  I^T ^C^A^N ^A^L^S^O ^S^A^V^E ^A ^C^O^P^Y ^O^F ^A ^L^O^C^A^L ^F^I^L^E ^O^N ^M^A^S^S
      ^S^T^O^R^A^G^E ^A^S ^A ^N^E^W ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^L^O^C^A^L ^F^I^L^E ^L^F^N ^B^E^C^O^M^E^S ^A^N ^I^N^D^I^R^E^C^T
      ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^R^E^P^L^A^C^I^N^G ^T^H^E ^E^X^I^S^T^I^N^G ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^P^F^N ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^L^O^C^A^L ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,PFN,NOLIST

       T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^A^N ^E^X^I^S^T^I^N^G ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S
       ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^P^F^N ^T^O ^B^E ^R^E^P^L^A^C^E^D ^B^Y ^A ^L^O^C^A^L ^F^I^L^E ^L^F^N.  I^F ^A ^P^F^N ^D^O^E^S
       ^N^O^T ^A^L^R^E^A^D^Y ^E^X^I^S^T, ^O^N^E ^I^S ^C^R^E^A^T^E^D.

      D^E^F^A^U^L^T@D  I^F ^N^O^T ^S^P^E^C^I^F^I^E^D, ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^I^L^L ^H^A^V^E ^T^H^E ^S^A^M^E
                ^N^A^M^E ^A^S ^T^H^E ^L^O^C^A^L ^F^I^L^E.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R^N^A^M^E.  T^H^E ^U^S^E^R ^N^A^M^E ^M^U^S^T ^B^E
      ^S^P^E^C^I^F^I^E^D ^I^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^R^E^P^L^A^C^E^D (^P^F^N) ^I^S ^I^N ^A^N^O^T^H^E^R ^U^S^E^R'^S ^C^A^T^A^L^O^G.
      T^H^E ^O^T^H^E^R ^U^S^E^R ^M^U^S^T ^H^A^V^E ^G^R^A^N^T^E^D ^Y^O^U ^W^R^I^T^E ^P^E^R^M^I^S^S^I^O^N.  T^H^E ^U^S^E^R ^N^A^M^E ^M^A^Y
      ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  Y^O^U^R ^U^S^E^R ^N^A^M^E.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^P^W) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D.  T^H^E ^P^A^S^S^W^O^R^D
      ^O^F ^T^H^E ^F^I^L^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  T^H^E
      ^F^I^L^E ^N^E^E^D ^N^O^T ^H^A^V^E ^A ^P^A^S^S^W^O^R^D.  Y^O^U ^D^O^N'^T ^H^A^V^E ^T^O ^S^P^E^C^I^F^Y ^T^H^E
      ^P^A^S^S^W^O^R^D ^I^F ^Y^O^U ^A^R^E ^T^H^E ^F^I^L^E ^O^W^N^E^R.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^P^A^S^S^W^O^R^D
      ^I^F ^Y^O^U ^A^R^E ^N^O^T ^T^H^E ^F^I^L^E ^O^W^N^E^R ^A^N^D ^T^H^E ^F^I^L^E ^H^A^S ^A ^P^A^S^S^W^O^R^D.

      D^E^F^A^U^L^T@D  N^O ^P^A^S^S^W^O^R^D.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M=^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E ^I^F ^T^H^E ^F^I^L^E ^D^O^E^S^N'^T
      ^A^L^R^E^A^D^Y ^E^X^I^S^T, ^O^R ^I^F ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E ^T^H^E ^A^C^C^E^S^S ^M^O^D^E.

      I^F ^M ^I^S@D         O^T^H^E^R ^U^S^E^R^S ^C^A^N@D
      --------         ----------------
      R ^O^R READ        R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E.  T^H^I^S ^C^O^P^Y ^C^A^N ^B^E
      RU ^O^R READUP     ^R^E^A^D ^O^R ^E^X^E^C^U^T^E^D.
      RA ^O^R READAP
      RM ^O^R READMD
      U ^O^R UPDATE

      E ^O^R EXECUTE     R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E.  T^H^I^S ^C^O^P^Y ^C^A^N ^O^N^L^Y
                       ^B^E ^E^X^E^C^U^T^E^D.

      A ^O^R APPEND      A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E ^F^I^L^E ^W^I^T^H ^T^H^E APPEND ^C^O^M^M^A^N^D.

      M ^O^R MODIFY      R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^O^R ^A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E
                       ^F^I^L^E.  T^H^E ^U^S^E^R ^C^A^N ^E^N^T^E^R GET, OLD, NEW ^A^N^D APPEND
                       ^C^O^M^M^A^N^D^S, ^B^U^T ^N^O^T ^A REPLACE ^C^O^M^M^A^N^D ^F^O^R ^T^H^E ^F^I^L^E.

      W ^O^R WRITE       R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E, ^A^P^P^E^N^D ^D^A^T^A ^T^O ^I^T,
                       ^R^E^P^L^A^C^E ^I^T ^O^R ^P^U^R^G^E ^I^T.

      N ^O^R NULL        N^O ^A^C^C^E^S^S ^I^S ^A^L^L^O^W^E^D.

      D^E^F^A^U^L^T@D  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^F^O^R ^A ^N^E^W^L^Y ^C^R^E^A^T^E^D ^F^I^L^E,
                ^T^H^E ^D^E^F^A^U^L^T ^I^S R.  I^F ^Y^O^U ^O^M^I^T ^I^T ^F^O^R ^A ^P^R^E^V^I^O^U^S^L^Y
                ^E^X^I^S^T^I^N^G ^F^I^L^E, ^T^H^E ^F^I^L^E'^S ^C^U^R^R^E^N^T ^A^C^C^E^S^S ^M^O^D^E ^I^S ^U^S^E^D.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^I^S ^T^H^E ^P^A^C^K ^N^A^M^E ^O^F ^A ^D^I^S^K ^P^A^C^K ^C^O^N^T^A^I^N^I^N^G ^T^H^E
      ^F^I^L^E ^Y^O^U ^W^A^N^T ^T^O ^R^E^P^L^A^C^E.  PN ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^B^E^T^I^C ^O^R ^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.  Y^O^U ^D^O^N'^T ^N^E^E^D ^T^O ^S^P^E^C^I^F^Y ^A ^P^A^C^K ^N^A^M^E ^F^O^R ^F^I^L^E^S ^O^N ^Y^O^U^R
      ^D^E^F^A^U^L^T ^P^A^C^K.  Y^O^U ^M^A^Y ^A^L^S^O ^N^E^E^D ^T^O ^U^S^E ^T^H^E R ^P^A^R^A^M^E^T^E^R ^T^O ^S^P^E^C^I^F^Y
      ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^C^K ^N^A^M^E.  T^O ^S^E^E ^W^H^A^T ^F^I^L^E^S
      ^R^E^S^I^D^E ^O^N ^Y^O^U^R ^D^E^F^A^U^L^T ^P^A^C^K, ^U^S^E ^T^H^E CATLIST ^C^O^M^M^A^N^D.

      D^E^F^A^U^L^T@D  I^F ^N^O ^P^A^C^K ^N^A^M^E, ^R^E^P^L^A^C^E^S ^T^H^E ^F^I^L^E ^F^R^O^M ^T^H^E ^D^E^F^A^U^L^T ^F^A^M^I^L^Y.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E.

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^R^A^M^E^T^E^R PN (^P^A^C^K
      ^N^A^M^E), ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  E^R^R^O^R^S ^I^N
      REPLACE ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B ^W^H^E^N NA ^I^S ^S^P^E^C^I^F^I^E^D.  W^H^E^N
      ^S^P^E^C^I^F^Y^I^N^G NA, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T, ^A
      ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S ^B^U^S^Y (^S^O^M^E^O^N^E ^E^L^S^E ^I^S
      ^U^S^I^N^G ^I^T) ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T ^A^V^A^I^L^A^B^L^E (^N^O^T
      ^M^O^U^N^T^E^D) ^R^E^S^U^L^T^S ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E ^F^I^L^E ^B^E^C^O^M^E^S
      ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R ^E^X^A^M^P^L^E, ^T^H^E ^F^I^L^E ^C^A^N^N^O^T
      ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D
      WB (^W^A^I^T-^I^F-^B^U^S^Y).

      D^E^F^A^U^L^T@D  IF NA ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^E^R^R^O^R^S ^I^N REPLACE ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^S^P^E^C^I^F^I^E^S ^T^H^E ^W^A^I^T-^I^F-^B^U^S^Y ^O^P^T^I^O^N.  T^H^I^S ^A^L^L^O^W^S ^A
      ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^A ^B^U^S^Y ^F^I^L^E ^O^R ^A ^R^E^M^O^V^A^B^L^E ^P^A^C^K ^M^O^U^N^T ^B^U^T ^W^I^L^L ^A^B^O^R^T
      ^O^N ^O^T^H^E^R ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA
      (^N^O ^A^B^O^R^T).

      D^E^F^A^U^L^T@D  WB ^N^O^T ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.IF($PFN$.EQ.$$,L1)
  .EX.  $REPLACE(LFN/#UN=UN,#PW=PW,#M=M,#PN=PN,#R=R_NA_WB)
.ELSE(L1)
  .EX.  $REPLACE(LFN=PFN/#UN=UN,#PW=PW,#M=M,#PN=PN,#R=R_NA_WB)
.ENDIF(L1)
*WEOR
.PROC,REQUEST*I
,LFN[L^O^C^A^L F^I^L^E]=(*A1,*N)
,VSN[V^O^L^U^M^E S^E^R^I^A^L N^U^M^B^E^R]=(*A1,*N)
,MT[N^U^M^B^E^R ^O^F T^R^A^C^K^S (MT ^O^R NT)]=(*A1,*N)
,TD[T^A^P^E D^E^N^S^I^T^Y (D)]=(*A1,*N)
,F[D^A^T^A F^O^R^M^A^T (F)]=(*A1,*N)
,LB[L^A^B^E^L^E^D ^O^R U^N^L^A^B^E^L^E^D T^A^P^E (LB)]=(*A1,*N)
,FC[F^R^A^M^E C^O^U^N^T (FC)]=(*A1,*N)
,CV[C^O^N^V^E^R^S^I^O^N M^O^D^E (CV ^O^R N)]=(*A1,*N)
,NS[N^O^I^S^E S^I^Z^E (NS)]=(*A1,*N)
,PO[P^R^O^C^E^S^S^I^N^G O^P^T^I^O^N^S (PO)]=(*A1,*N)
,CK[C^H^E^C^K^P^O^I^N^T F^I^L^E (CK ^O^R CB)]=(*A1,*N)
,AL[S^E^C^U^R^I^T^Y A^C^C^E^S^S L^E^V^E^L (AL)]=(*A1,*N)
,COM[C^O^M^M^E^N^T]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST
      FORMAT@D  R^E^Q^U^E^S^T,^L^F^N,VSN=^V^S^N,^0MT ^O^R NT^2,D=^D,F=^F,LB=^L^B,FC=^F^C,CV=^C^V,
                   NS=^N^S,PO=^P^O,^0CK ^O^R CB^2,AL=^A^L.^C^O^M^M^E^N^T

      T^H^E REQUEST ^C^O^M^M^A^N^D ^A^S^S^O^C^I^A^T^E^S ^A ^F^I^L^E ^N^A^M^E, ^L^F^N, ^W^I^T^H ^A ^M^A^G^N^E^T^I^C ^T^A^P^E
      ^D^E^V^I^C^E, ^W^H^I^C^H ^Y^O^U ^C^A^N ^D^E^S^C^R^I^B^E ^I^N ^A ^C^O^M^M^E^N^T ^F^O^L^L^O^W^I^N^G ^T^H^E ^C^O^M^M^A^N^D
      ^T^E^R^M^I^N^A^T^O^R.  T^H^I^S ^C^O^M^M^E^N^T ^A^P^P^E^A^R^S ^A^T ^T^H^E ^S^Y^S^T^E^M ^C^O^N^S^O^L^E ^S^O ^T^H^A^T ^T^H^E
      ^O^P^E^R^A^T^O^R ^C^A^N ^M^A^K^E ^T^H^E ^R^E^Q^U^E^S^T^E^D ^A^S^S^I^G^N^M^E^N^T.  H^O^W^E^V^E^R, ^I^F ^T^H^E ^T^A^P^E ^I^S
      ^L^A^B^E^L^E^D ^A^N^D ^Y^O^U ^P^R^E^V^I^O^U^S^L^Y ^S^P^E^C^I^F^I^E^D ^A VSN ^V^I^A ^T^H^E VSN ^C^O^N^T^R^O^L ^C^O^M^M^A^N^D
      ^O^R ^I^N^C^L^U^D^E^D ^T^H^E VSN ^P^A^R^A^M^E^T^E^R ^O^N ^T^H^E REQUEST ^C^O^M^M^A^N^D, ^T^H^E ^S^Y^S^T^E^M ^C^A^N
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^A^S^S^I^G^N ^T^H^E ^T^A^P^E.  T^H^E REQUEST ^C^O^M^M^A^N^D ^C^A^N ^C^R^E^A^T^E ^U^N^L^A^B^E^L^E^D
      ^T^A^P^E ^F^I^L^E^S ^A^N^D ^A^C^C^E^S^S ^E^X^I^S^T^I^N^G ^L^A^B^E^L^E^D ^A^N^D ^U^N^L^A^B^E^L^E^D ^T^A^P^E ^F^I^L^E^S.  I^T
      ^C^A^N^N^O^T ^C^R^E^A^T^E ^O^R ^V^E^R^I^F^Y ^T^A^P^E ^L^A^B^E^L^S.

      I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A VSN ^P^A^R^A^M^E^T^E^R ^O^R ^A^N MT ^O^R NT ^P^A^R^A^M^E^T^E^R ^O^N ^T^H^E
      ^C^O^M^M^A^N^D, ^T^H^E ^O^P^E^R^A^T^O^R ^C^A^N ^A^S^S^I^G^N ^A^N^Y ^D^E^V^I^C^E ^T^O ^T^H^E ^F^I^L^E.  I^F ^Y^O^U ^A^R^E
      ^N^O^T ^A^U^T^H^O^R^I^Z^E^D ^T^O ^U^S^E ^T^H^E ^A^S^S^I^G^N^E^D ^D^E^V^I^C^E, ^T^H^E ^J^O^B ^A^B^O^R^T^S.

      T^H^E LABEL ^C^O^M^M^A^N^D ^P^E^R^F^O^R^M^S ^T^H^E ^S^A^M^E ^F^U^N^C^T^I^O^N ^A^S ^T^H^E REQUEST ^C^O^M^M^A^N^D.
      U^N^L^E^S^S ^Y^O^U ^H^A^V^E ^R^E^A^S^O^N ^T^O ^D^O ^O^T^H^E^R^W^I^S^E, ^U^S^E ^T^H^E LABEL ^C^O^M^M^A^N^D.
.HELP,LFN,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^H^A^T ^R^E^S^I^D^E^S ^O^R ^I^S
      ^T^O ^R^E^S^I^D^E ^O^N ^M^A^G^N^E^T^I^C ^T^A^P^E.  I^F ^L^F^N ^I^S ^A^L^R^E^A^D^Y ^A^S^S^I^G^N^E^D ^T^O ^A ^M^A^S^S
      ^S^T^O^R^A^G^E ^F^I^L^E, ^P^R^O^C^E^S^S^I^N^G ^C^O^N^T^I^N^U^E^S ^W^I^T^H ^T^H^E ^N^E^X^T ^C^O^M^M^A^N^D.  T^O ^A^S^S^I^G^N
      ^A ^P^R^E^V^I^O^U^S^L^Y ^A^S^S^I^G^N^E^D ^L^F^N, ^Y^O^U ^M^U^S^T ^R^E^T^U^R^N ^L^F^N ^B^E^F^O^R^E ^I^T^S ^R^E^A^S^S^I^G^N^M^E^N^T.
      O^M^I^S^S^I^O^N ^O^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^R^E^S^U^L^T^S ^I^N ^A^N ^E^R^R^O^R.
.HELP,VSN,NOLIST
      T^H^E VSN=^V^S^N ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 6-^C^H^A^R^A^C^T^E^R ^V^O^L^U^M^E
      ^S^E^R^I^A^L ^N^U^M^B^E^R ^T^H^A^T ^U^N^I^Q^U^E^L^Y ^I^D^E^N^T^I^F^I^E^S ^A ^R^E^E^L ^O^F ^T^A^P^E.  I^F VSN
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^O^P^E^R^A^T^O^R ^A^S^S^I^G^N^S ^A^N ^A^V^A^I^L^A^B^L^E ^U^N^I^T ^T^O ^L^F^N.
      M^U^L^T^I^P^L^E VSN^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^I^F ^S^E^P^A^R^A^T^E^D ^B^Y / ^O^R = ^C^H^A^R^A^C^T^E^R^S.
      I^F ^T^H^E VSN^S ^A^R^E ^S^E^P^A^R^A^T^E^D ^B^Y ^T^H^E = ^C^H^A^R^A^C^T^E^R, REQUEST ^A^S^S^I^G^N^S ^L^F^N
      ^T^O ^T^H^E ^F^I^R^S^T ^A^V^A^I^L^A^B^L^E VSN ^I^N ^T^H^E ^L^I^S^T.  I^F ^T^H^E VSN^S ^A^R^E ^S^E^P^A^R^T^E^D
      ^B^Y ^T^H^E / ^C^H^A^R^A^C^T^E^R, ^L^F^N ^I^S ^A ^M^U^L^T^I^V^O^L^U^M^E ^F^I^L^E ^S^E^T, ^A^N^D REQUEST
      ^A^S^S^I^G^N^S ^T^H^E ^V^O^L^U^M^E^S ^I^N ^T^H^E ^S^E^Q^U^E^N^C^E ^G^I^V^E^N.  I^F VSN=, VSN=0, ^O^R
      VSN=SCRATCH ^I^S ^S^P^E^C^I^F^I^E^D, ^A ^S^C^R^A^T^C^H ^T^A^P^E ^I^S ^A^S^S^I^G^N^E^D.  I^F ^A ^S^C^R^A^T^C^H
      ^T^A^P^E ^I^S ^U^N^A^V^A^I^L^A^B^L^E, ^T^H^E ^J^O^B ^I^S ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^A ^T^A^P^E ^I^S ^A^V^A^I^L^A^B^L^E.
 .HELP,MT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R MT ^O^R NT ^R^E^Q^U^E^S^T^S ^A ^S^E^V^E^N-^T^R^A^C^K (MT) ^O^R ^N^I^N^E-^T^R^A^C^K (NT)
      ^T^A^P^E ^D^R^I^V^E.  I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T.  M^U^S^T ^N^O^T ^C^O^N^F^L^I^C^T ^W^I^T^H
      D=^D^E^N ^S^P^E^C^I^F^I^C^A^T^I^O^N.
.HELP,TD,NOLIST
     T^H^E ^P^A^R^A^M^E^T^E^R D=^D^E^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^A^P^E ^D^E^N^S^I^T^Y.  T^A^P^E ^D^E^N^S^I^T^Y ^M^U^S^T ^N^O^T
     ^C^O^N^F^L^I^C^T ^W^I^T^H MT ^O^R NT ^S^P^E^C^I^F^I^C^A^T^I^O^N.  T^H^E ^D^E^F^A^U^L^T ^I^S ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D
     T^H^E ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D ^F^O^R ^N^I^N^E-^T^R^A^C^K ^T^A^P^E ^N^O^T ^P^O^S^I^T^I^O^N^E^D ^A^T ^L^O^A^D ^P^O^I^N

     C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

    S^E^V^E^N-^T^R^A^C^K (MT)            N^I^N^E-^T^R^A^C^K (NT)
    ---------------             ---------------
    ^D^E^N      D^E^N^S^I^T^Y            ^D^E^N     D^E^N^S^I^T^Y
    ---      -------            ---     -------
    LO       200 ^C^P^I            HD       800 ^C^P^I
    HI       556 ^C^P^I            PE      1600 ^C^P^I
    HY       800 ^C^P^I            GE      6250 ^C^P^I
    200      200 ^C^P^I            800      800 ^C^P^I
    556      556 ^C^P^I            1600    1600 ^C^P^I
    800      800 ^C^P^I            6250    6250 ^C^P^I
.HELP,F,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R F=^F^O^R^M^A^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^A^T^A ^F^O^R^M^A^T.  D^E^F^A^U^L^T ^I^S I.

      ^F^O^R^M^A^T       D^E^S^C^R^I^P^T^I^O^N
      ------       -----------
      I            I^N^T^E^R^N^A^L.
      SI           S^Y^S^T^E^M ^I^N^T^E^R^N^A^L.
      S            S^T^R^A^N^G^E^R.
      L            L^O^N^G ^B^L^O^C^K ^S^T^R^A^N^G^E^R.
      F            F^O^R^E^I^G^N (^D^E^S^I^G^N^E^D ^F^O^R ^T^A^P^E^S ^O^F ^U^N^K^N^O^W^N ^D^A^T^A ^F^O^R^M^A^T).

      T^H^E SI ^F^O^R^M^A^T ^I^S ^T^H^E NOS/BE ^S^Y^S^T^E^M ^D^E^F^A^U^L^T ^T^A^P^E ^F^O^R^M^A^T (^B^I^N^A^R^Y ^M^O^D^E ^O^N^L^Y); ^U^S^

      ^F^O^R ^T^A^P^E ^I^N^T^E^R^C^H^A^N^G^E ^W^I^T^H NOS/BE ^S^Y^S^T^E^M^S.
.HELP,LB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R LB=^L^B ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^A^P^E ^I^S ^L^A^B^E^L^E^D ^O^R ^U^N^L^A^B^E^L^E^D.
      D^E^F^A^U^L^T ^I^S KL ^I^F ^A ^V^O^L^U^M^E ^S^E^R^I^A^L ^N^U^M^B^E^R ^I^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E VSN ^P^A^R^A^M^E^T^E^R
      ^O^R ^B^Y ^A VSN ^C^O^M^M^A^N^D; ^O^T^H^E^R^W^I^S^E, ^T^H^E ^D^E^F^A^U^L^T ^I^S KU.  R^E^F^E^R ^T^O ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^L^I^S^T@D
      ^L^B          D^E^S^C^R^I^P^T^I^O^N
      --          -----------
      KL          ANSI-^L^A^B^E^L^E^D.
      KU          U^N^L^A^B^E^L^E^D.
      NS          N^O^N^S^T^A^N^D^A^R^D-^L^A^B^E^L^E^D.  A^S^S^U^M^E^S ^D^A^T^A ^B^E^G^I^N^S ^I^M^M^E^D^I^A^T^E^L^Y ^A^F^T^E^R
                  ^T^H^E ^F^I^R^S^T ^T^A^P^E ^M^A^R^K.
.HELP,PO,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PO=^P1^P2...^P^N ^S^P^E^C^I^F^I^E^S ^A ^S^T^R^I^N^G ^O^F ^C^H^A^R^A^C^T^E^R^S (^N^O^T
      ^S^E^P^A^R^A^T^E^D ^B^Y ^C^O^M^M^A^S) ^T^H^A^T ^S^P^E^C^I^F^I^E^S ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S.
.HELP,FC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R FC=^F^C^O^U^N^T ^O^R C=^C^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K
      ^S^I^Z^E ^I^N ^F^R^A^M^E^S (^N^O ^D^E^F^A^U^L^T ^V^A^L^U^E).  W^H^E^N^E^V^E^R ^T^A^P^E ^F^O^R^M^A^T F ^I^S
      ^S^P^E^C^I^F^I^E^D, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.  N^O^T ^A^P^P^L^I^C^A^B^L^E ^F^O^R
      ^T^A^P^E ^F^O^R^M^A^T^S ^O^T^H^E^R ^T^H^A^N F.
.HELP,CV,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CV=^C^V ^O^R N=^C^V ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^N^V^E^R^S^I^O^N ^M^O^D^E ^F^O^R ^N^I^N^E-^T^R^A^C^K
      ^T^A^P^E^S; ^A^P^P^L^I^E^S ^T^O ^B^O^T^H ^L^A^B^E^L^S ^A^N^D ^D^A^T^A ^O^N ^C^O^D^E^D ^T^A^P^E^S; ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O
      ^L^A^B^E^L^S ^O^N ^B^I^N^A^R^Y ^T^A^P^E^S.  I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T.  I^G^N^O^R^E^D ^F^O^R
      ^U^N^L^A^B^E^L^E^D I ^O^R SI ^F^O^R^M^A^T ^B^I^N^A^R^Y ^T^A^P^E^S ^W^H^O^S^E ^T^R^A^I^L^E^R ^L^A^B^E^L^S ^A^R^E ^A^L^W^A^Y^S
      ASCII.  M^U^S^T ^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H MT ^O^R ^S^E^V^E^N-^T^R^A^C^K ^D^E^N^S^I^T^Y
      ^S^P^E^C^I^F^I^C^A^T^I^O^N.
      ^C^V                     M^E^A^N^I^N^G
      --                     -------
      AS        ASCII/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.
      US        S^A^M^E ^A^S AS.
      EB        EBCDIC/^D^I^S^P^L^A^Y ^C^O^D^E ^C^O^N^V^E^R^S^I^O^N.
.HELP,NS,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NS=^N^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O^I^S^E ^S^I^Z^E; ^A^N^Y ^B^L^O^C^K ^O^C^N^T^A^I^N^I^N^G ^F^E^W^E^R
      ^T^H^A^N ^N^S ^F^R^A^M^E^S ^I^S ^C^O^N^S^I^D^E^R^E^D ^N^O^I^S^E ^A^N^D ^I^S ^D^I^S^C^A^R^D^E^D.  T^H^E NS ^P^A^R^A^M^E^T^E^R ^I^S
      ^N^O^T ^V^A^L^I^D ^F^O^R I ^O^R SI ^F^O^R^M^A^T ^T^A^P^E^S ^O^R ^F^O^R ^O^T^H^E^R ^T^A^P^E ^F^O^R^M^A^T^S ^W^H^E^N ^E^I^T^H^E^R
      PE (9-^T^R^A^C^K, 1600 ^C^P^I) ^O^R GE (9-^T^R^A^C^K, 6250 ^C^P^I) ^D^E^N^S^I^T^Y ^I^S ^S^P^E^C^I^F^I^E^D.
      F^O^R PE ^A^N^D GE ^D^E^N^S^I^T^I^E^S, ^T^H^E ^N^O^I^S^E ^B^L^O^C^K ^S^I^Z^E ^I^S ^Z^E^R^O.  D^E^F^A^U^L^T ^I^S 18
      ^F^R^A^M^E^S ^F^O^R ^O^T^H^E^R ^F^O^R^M^A^T^S.  M^A^X^I^M^U^M ^V^A^L^U^E ^I^S 31 ^F^R^A^M^E^S.  I^F NS=0 ^I^S
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^U^S^E^D.
.HELP,CK,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R CK ^O^R CB ^S^P^E^C^I^F^I^E^S ^F^I^L^E ^L^F^N, ^I^S ^T^O ^B^E ^U^S^E^D ^A^S ^A ^C^H^E^C^K^P^O^I^N^T ^F^I^

      ^C^H^E^C^K^P^O^I^N^T                    D^E^S^C^R^I^P^T^I^O^N
      ----------                    -----------
      CK              E^A^C^H ^N^E^W ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T EOI ^O^F ^L^F^N.
      CB              E^A^C^H ^N^E^W ^D^U^M^P ^I^S ^W^R^I^T^T^E^N ^A^T BOI ^O^F ^L^F^N.
.HELP,AL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AL=^L^E^V^E^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^T^O ^A^S^S^I^G^N ^T^O
      ^T^H^E ^F^I^L^E.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^N^A^M^E^S@D

      LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, ^O^R LVL7

      T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^J^O^B.
.HELP,COM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^C^O^M^M^E^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^M^E^N^T ^T^H^A^T ^I^S ^D^I^S^P^L^A^Y^E^D ^A^T ^T^H^E
      ^S^Y^S^T^E^M ^C^O^S^O^L^E.  I^N ^T^H^E ^C^O^M^M^E^N^T ^F^I^E^L^D, ^Y^O^U ^C^A^N ^D^I^R^E^C^T ^T^H^E ^O^P^E^R^A^T^O^R ^T^O ^M^A^K^E
      ^T^H^E ^R^E^Q^U^E^S^T^E^D ^D^E^V^I^C^E ^A^S^S^I^G^N^M^E^N^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RERUN*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RERUN.

      T^H^E RERUN ^C^O^M^M^A^N^D ^S^E^T^S ^J^O^B ^R^E^R^U^N ^S^T^A^T^U^S.  I^F RERUN ^H^A^S ^B^E^E^N ^I^S^S^U^E^D,
      ^T^H^E ^O^P^E^R^A^T^O^R ^C^A^N ^R^E^R^U^N ^T^H^E ^J^O^B ^I^F ^N^E^C^E^S^S^A^R^Y.  T^H^I^S ^C^O^M^M^A^N^D ^I^S ^I^G^N^O^R^E^D
      ^F^R^O^M ^A ^J^O^B ^O^F ^I^N^T^E^R^A^C^T^I^V^E ^O^R^I^G^I^N.

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RESEQ*I
,LFN[F^I^L^E ^T^O ^R^E^S^E^Q^U^E^N^C^E]=(*F)
,TYPE[T^Y^P^E ^O^F ^F^I^L^E]=(B,T,F,*F=,*N=)
,START[N^E^W ^L^I^N^E ^N^U^M^B^E^R ^O^F ^F^I^R^S^T ^L^I^N^E]=(*S5(0123456789),*N=100)
,STEP[L^I^N^E ^N^U^M^B^E^R ^I^N^C^R^E^M^E^N^T ^V^A^L^U^E]=(*S5(0123456789),*N=10)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RESEQ,^L^F^N,^T^Y^P^E,^S^T^A^R^T,^S^T^E^P.   (F^O^R ^N^O^N^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S.)

               RESEQ,^S^T^A^R^T,^S^T^E^P,^T^Y^P^E.       (F^O^R ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S.)

      T^H^E RESEQ ^C^O^M^M^A^N^D ^R^E^S^E^Q^U^E^N^C^E^S ^E^X^I^S^T^I^N^G ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^O^R ^A^D^D^S
      ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R^S ^T^O ^A ^F^I^L^E.  (O^N^L^Y ^T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^I^S ^E^X^E^C^U^T^E^D
      ^B^Y HELPME.)
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^O^R^T^E^D ^F^I^L^E ^T^O ^B^E ^R^E^S^E^Q^U^E^N^C^E^D.  T^H^E RESEQ
      ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^S^O^R^T ^T^H^I^S ^F^I^L^E (^R^E^F^E^R ^T^O ^T^H^E SORT ^C^O^M^M^A^N^D).
      A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,TYPE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^F^I^L^E.

      E^N^T^E^R   T^O ^S^P^E^C^I^F^Y

      B       BASIC ^S^O^U^R^C^E ^C^O^D^E.
      T       T^E^X^T ^S^O^U^R^C^E ^I^N^F^O^R^M^A^T^I^O^N; ^A ^F^I^V^E-^D^I^G^I^T ^S^E^Q^U^E^N^C^E ^N^U^M^B^E^R ^P^L^U^S ^A
              ^B^L^A^N^K ^I^S ^A^D^D^E^D ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^E^A^C^H ^L^I^N^E; ^T^H^E ^F^I^L^E ^T^E^X^T,
              ^H^O^W^E^V^E^R, ^I^S ^N^O^T ^I^N^S^P^E^C^T^E^D.
      F       FORTRAN ^S^O^U^R^C^E ^C^O^D^E.

      D^E^F^A^U^L^T@D  I^F ^O^M^I^T^T^E^D, ^N^O ^T^Y^P^E ^I^S ^S^P^E^C^I^F^I^E^D.
.HELP,START,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^I^N^E ^N^U^M^B^E^R ^O^F ^T^H^E ^F^I^R^S^T ^L^I^N^E.

      D^E^F^A^U^L^T@D 100.
.HELP,STEP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^C^R^E^M^E^N^T ^T^O ^B^E ^A^D^D^E^D ^F^O^R ^E^A^C^H ^S^U^C^C^E^E^D^I^N^G
      ^L^I^N^E ^N^U^M^B^E^R.

      D^E^F^A^U^L^T@D 10.
.ENDHELP
.EX.  $RESEQ,LFN,TYPE,START,STEP.
*WEOR
.PROC,RESOURC*I
,RT[R^E^S^O^U^R^C^E T^Y^P^E (^R^T^I)]=(*A1,*N)
,U[M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^U^N^I^T^S (^U)]=(U=U,*A1,*N)
,AL[S^E^C^U^R^I^T^Y A^C^C^E^S^S L^E^V^E^L]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RESOURC,^R^T1=^U1/^L^E^V^E^L1,^R^T2=^U2/^L^E^V^E^L2,...,^R^T^N=^U^N/^L^E^V^E^L^N.

      T^H^E RESOURC ^C^O^M^M^A^N^D ^I^S ^R^E^Q^U^I^R^E^D ^I^N ^A^N^Y ^J^O^B ^T^H^A^T ^U^S^E^S ^M^O^R^E ^T^H^A^N ^O^N^E ^T^A^P^E
      ^O^R ^R^E^M^O^V^A^B^L^E ^A^U^X^I^L^I^A^R^Y ^P^A^C^K ^C^O^N^C^U^R^R^E^N^T^L^Y; ^I^T ^P^R^E^V^E^N^T^S ^D^E^A^D^L^O^C^K^S ^W^I^T^H ^O













































^E^R
      ^J^O^B^S ^W^H^I^C^H ^M^A^Y ^N^E^E^D ^T^H^E ^S^A^M^E ^R^E^S^O^U^R^C^E^S.  Y^O^U ^D^O ^N^O^T ^N^E^E^D ^T^O ^U^S^E ^A RESOURC
      ^C^O^M^M^A^N^D ^I^F ^Y^O^U ^H^A^V^E ^O^N^L^Y ^O^N^E ^M^U^L^T^I^V^O^L^U^M^E ^T^A^P^E ^F^I^L^E ^O^R ^M^U^L^T^I^P^A^C^K ^D^I^S^K ^F^I










      ^B^E^C^A^U^S^E ^T^H^E ^S^Y^S^T^E^M ^T^R^E^A^T^S ^E^A^C^H ^A^S ^O^N^L^Y ^O^N^E ^R^E^S^O^U^R^C^E ^U^N^I^T.  N^O^N^R^E^M^O^V^A^B^L^E
      ^A^U^X^I^L^I^A^R^Y ^P^A^C^K^S ^S^H^O^U^L^D ^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E RESOURC ^C^O^M^M^A^N^D; ^N^O^N-
      ^R^E^M^O^V^A^B^L^E ^P^A^C^K^S ^A^R^E ^A^L^W^A^Y^S ^A^V^A^I^L^A^B^L^E ^T^O ^A^L^L ^U^S^E^R^S.
.HELP,RT,NOLIST
      T^H^E ^P^A^R^A^M^E^T^E^R ^R^T^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^E^S^O^U^R^C^E ^T^Y^P^E.

      R^E^S^O^U^R^C^E ^T^Y^P^E@D          D^E^S^C^R^I^P^T^I^O^N
      -------------           -----------
      LO     200-^C^P^I, ^S^E^V^E^N-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      HI     556-^C^P^I, ^S^E^V^E^N-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      HY     800-^C^P^I, ^S^E^V^E^N-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      PE     1600-^C^P^I, ^N^I^N^E-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      GE     6250-^C^P^I, ^N^I^N^E-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      MT     S^E^V^E^N-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T
      NT     N^I^N^E-^T^R^A^C^K ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T (800/1600-^C^P^I)
      DB^M    885-42 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           ^F^U^L^L-^T^R^A^C^K; 1<^M<3
      DC^M    895 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              ^F^U^L^L-^T^R^A^C^K; 1<^M<2
      DD^M    834 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              ^F^U^L^L-^T^R^A^C^K; 1<^M<8
      DF^M    887 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M (4K ^S^E^C^T^O^R)  ^F^U^L^L-^T^R^A^C^K; 1<^M<3
      DG^M    836 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              ^F^U^L^L-^T^R^A^C^K; 1<^M<3
      DH^M    887 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M (16K ^S^E^C^T^O^R) ^F^U^L^L-^T^R^A^C^K; 1<^M<2
      DI^M    844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           ^H^A^L^F-^T^R^A^C^K; 1<^M<8
      DJ^M    844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        ^H^A^L^F-^T^R^A^C^K; 1<^M<8
      DK^M    844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M           ^F^U^L^L-^T^R^A^C^K; 1<^M<8
      DL^M    844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        ^F^U^L^L-^T^R^A^C^K; 1<^M<8
      DM^M    885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        ^H^A^L^F-^T^R^A^C^K; 1<^M<3
      DN     9853 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M (2K ^S^E^C^T^O^R) ^F^U^L^L-^T^R^A^C^K.
      DQ^M    885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        ^F^U^L^L-^T^R^A^C^K; 1<^M<3
      DV     819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              ^S^I^N^G^L^E-^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M              ^D^O^U^B^L^E-^D^E^N^S^I^T^Y.

      T^H^E ^V^A^L^U^E ^M ^D^E^N^O^T^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^U^N^I^T^S (^S^P^I^N^D^L^E^S) ^R^E^Q^U^I^R^E^D ^F^O^R ^A
      ^P^A^R^T^I^C^U^L^A^R ^A^U^X^I^L^I^A^R^Y ^D^I^S^K ^F^I^L^E ^T^H^A^T ^Y^O^U ^W^I^L^L ^A^C^C^E^S^S ^I^N ^Y^O^U^R ^J^O^B.  I^N
      ^T^H^I^S ^C^A^S^E, ^T^H^E ^R^T^I ^V^A^L^U^E ^M^U^S^T ^C^O^R^R^E^S^P^O^N^D ^T^O ^T^H^E R=^R ^S^P^E^C^I^F^I^C^A^T^I^O^N ^O^N
      ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^C^O^M^M^A^N^D ^T^H^A^T ^R^E^F^E^R^E^N^C^E^S ^T^H^E ^D^I^S^K ^P^A^C^K.
.HELP,U,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^U(^I) ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^U^N^I^T^S ^O^F ^R^E^S^O^U^R^C^E
      ^T^Y^P^E ^R^T^I ^T^H^I^S ^J^O^B ^W^I^L^L ^U^S^E ^C^O^N^C^U^R^R^E^N^T^L^Y; ^A^N^Y ^R^T^I=^U^I ^E^N^T^R^Y ^C^A^N ^B^E
      ^C^H^A^N^G^E^D ^O^N ^S^U^B^S^E^Q^U^E^N^T RESOURC ^C^O^M^M^A^N^D^S.  A^N ^R^T=0 ^E^N^T^R^Y ^C^A^N ^B^E ^E^N^T^E^R^E^D
      ^T^O ^C^L^E^A^R ^A ^R^E^S^O^U^R^C^E ^T^Y^P^E ^T^H^A^T ^I^S ^N^O ^L^O^N^G^E^R ^R^E^Q^U^I^R^E^D.
.HELP,AL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^E^V^E^L^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^A^T ^W^H^I^C^H ^Y^O^U ^W
^T
      ^T^O ^A^C^C^E^S^S ^M^A^G^N^E^T^I^C ^T^A^P^E ^U^N^I^T^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D ^F^O^R ^A^U^X^I^L^I^A^R^Y
      ^D^I^S^K ^P^A^C^K^S.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D

      LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6, ^O^R LVL7

      T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^C^U^R^R^E^N^T ^J^O^B ^A^C^C^E^S^S ^L^E^V^E^L.
.ENDHELP
$REVERT(NOLIST
*WEOR
.PROC,RESTART*I
,LFN[C^H^E^C^K^P^O^I^N^T ^F^I^L^E]=(*F)
,N  [N^U^M^B^E^R ^O^F ^T^H^E ^C^H^E^C^K^P^O^I^N^T]=(*S5(0123456789),$*$,*N=)
,RI [R^E^S^T^O^R^E ^T^H^E ^F^I^L^E ]=(NO=$,RI$,N=$,RI$,YES=,Y=,*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,FC [R^E^S^T^O^R^E ^A^L^L ^F^I^L^E^S]=(YES=$,FC$,Y=$,FC$,*K=$,FC$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RESTART,^L^F^N,^N,RI,NA,FC.

      T^H^E RESTART ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^R^E^S^T^A^R^T ^A ^P^R^E^V^I^O^U^S^L^Y ^T^E^R^M^I^N^A^T^E^D
      ^J^O^B ^F^R^O^M ^A ^S^P^E^C^I^F^I^E^D ^C^H^E^C^K^P^O^I^N^T.
.HELP,LFN,NOLIST

      T^H^I^S ^F^I^L^E ^N^A^M^E ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^C^H^E^C^K^P^O^I^N^T ^F^I^L^E (^Y^O^U ^M^U^S^T ^H^A^V^E ^W^R^I^T^E
      ^P^E^R^M^I^S^S^I^O^N ^T^O ^T^H^I^S ^F^I^L^E).
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^T^H^E ^C^H^E^C^K^P^O^I^N^T ^F^R^O^M ^W^H^I^C^H ^T^O
      ^R^E^S^T^A^R^T ^T^H^E ^J^O^B.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^A^N ^A^S^T^E^R^I^S^K (*), ^T^H^E ^L^A^S^T ^A^V^A^I^L^A^B^L^E
      ^C^H^E^C^K^P^O^I^N^T ^O^N ^T^H^E ^C^H^E^C^K^P^O^I^N^T ^F^I^L^E ^I^S ^U^S^E^D.

      D^E^F^A^U^L^T@D T^H^E ^F^I^R^S^T ^C^H^E^C^K^P^O^I^N^T ^I^S ^U^S^E^D.
.HELP,RI,NOLIST

      I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R (RI) ^I^S ^S^P^E^C^I^F^I^E^D, ^T^H^E ^C^O^M^M^A^N^D ^F^I^L^E ^O^N ^L^F^N ^I^S ^N^O^T
      ^R^E^S^T^O^R^E^D, ^A^N^D ^T^H^E ^C^O^M^M^A^N^D ^F^I^L^E ^O^F ^T^H^I^S ^R^E^S^T^A^R^T ^J^O^B ^I^S ^U^S^E^D ^A^T ^I^T^S
      ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^I^N^S^T^E^A^D.  E^N^T^E^R NO ^O^R N ^O^R RI ^I^F ^Y^O^U ^D^O^N'^T ^W^A^N^T ^T^H^E
      ^C^O^M^M^A^N^D ^F^I^L^E ^T^O ^B^E ^R^E^S^T^O^R^E^D, ^A^N^D YES ^O^R Y ^T^O ^R^E^S^T^O^R^E ^I^T.

      D^E^F^A^U^L^T@D T^H^E ^C^O^M^M^A^N^D ^F^I^L^E ^I^S ^R^E^S^T^O^R^E^D.
.HELP,NA,NOLIST

      I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^I^S ^I^N^C^L^U^D^E^D, RESTART ^D^O^E^S ^N^O^T ^A^B^O^R^T ^I^F ^A ^R^E^Q^U^I^R^E^D
      ^F^I^L^E ^I^S ^U^N^A^V^A^I^L^A^B^L^E.  T^O ^S^P^E^C^I^F^Y ^N^O ^A^B^O^R^T, ^E^N^T^E^R NA (^O^R NO ^O^R N); ^T^O
      ^S^P^E^C^I^F^Y ^A^B^O^R^T, ^E^N^T^E^R YES ^O^R Y.

      D^E^F^A^U^L^T@D RESTART ^A^B^O^R^T^S ^O^N ^E^R^R^O^R^S.
.HELP,FC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^O^P^T^I^O^N^A^L) ^D^I^R^E^C^T^S RESTART ^T^O ^C^H^E^C^K ^W^H^E^T^H^E^R ^A ^F^I^L^E ^I^S
      ^A^L^R^E^A^D^Y ^L^O^C^A^L ^T^O ^T^H^E ^R^E^S^T^A^R^T ^J^O^B.  I^F ^I^T ^I^S, RESTART ^D^O^E^S ^N^O^T ^R^E^P^L^A^C^E ^I^T
      ^W^I^T^H ^T^H^E ^F^I^L^E ^O^N ^T^H^E ^C^H^E^C^K^P^O^I^N^T ^D^U^M^P.  (I^N ^A^D^D^I^T^I^O^N, ^F^I^L^E^S ZZZZZC0,
      ZZZZZC1, ^A^N^D ZZZZZC2 ^A^R^E ^N^O^T ^R^E^S^T^O^R^E^D.)

      T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^E^N^T^E^R YES, Y, ^O^R FC.  O^T^H^E^R^W^I^S^E, NO ^O^R N.

      D^E^F^A^U^L^T@D N^O^N^E.
.ENDHELP
.EX.  $RESTART(LFN,N_RI_NA_FC)
*WEOR
.PROC,RETURN*I
,LFN[F^I^L^E ^T^O ^B^E ^R^E^T^U^R^N^E^D]=(*F,$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RETURN,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               RETURN,*,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               RETURN,*

      T^H^E RETURN ^C^O^M^M^A^N^D ^R^E^L^E^A^S^E^S (^D^R^O^P^S) ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^A ^J^O^B ^A^N^D ^M^A^Y
      ^R^E^L^E^A^S^E ^F^I^L^E ^S^P^A^C^E ^D^E^P^E^N^D^I^N^G ^O^N ^T^H^E ^F^I^L^E ^T^Y^P^E.

      N^O^T^E@D ^T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^R^E^L^E^A^S^E^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^J^O^B ^E^X^C^E^P^T
      ^T^H^E ^N^A^M^E^D ^F^I^L^E^S; ^T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^R^E^L^E^A^S^E^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^T^H^E
      ^J^O^B.  I^N HELPME, ^H^O^W^E^V^E^R, ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^O^N^L^Y ^O^N^E ^F^I^L^E ^T^O ^R^E^L^E^A^S^E,
      ^O^R ^A^N ^A^S^T^E^R^I^S^K (*) ^T^O ^R^E^L^E^A^S^E ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^T^O ^B^E ^R^E^T^U^R^N^E^D.  I^N HELPME,
      ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^A ^F^I^L^E ^N^A^M^E (1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S)
      ^O^R ^A^N ^A^S^T^E^R^I^S^K (*).  A^N ^A^S^T^E^R^I^S^K ^R^E^T^U^R^N^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O
      ^Y^O^U^R ^J^O^B.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E ^O^R ^A^N ^A^S^T^E^R^I^S^K.
.ENDHELP
.EX.  $RETURN,LFN.
*WEOR
.PROC,REVERT*I
,OPT[R^E^V^E^R^T O^P^T^I^O^N^S]=(*A1,*N)
,COM[C^O^M^M^E^N^T ^O^R C^O^M^M^A^N^D]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  REVERT,^O^P^T.^C^O^M

      T^H^E REVERT ^C^O^M^M^A^N^D ^T^E^R^M^I^N^A^T^E^S ^P^R^O^C^E^D^U^R^E ^P^R^O^C^E^S^S^I^N^G.
 .HELP,OPT,NOLIST

       T^H^E ^P^A^R^A^M^E^T^E^R ^O^P^T ^C^O^N^T^R^O^L^S ^T^H^E ^R^E^V^E^R^T ^O^P^T^I^O^N^S ^A^N^D ^W^H^E^T^H^E^R ^T^H^E REVERT
       ^C^O^M^M^A^N^D ^A^P^P^E^A^R^S ^A^T ^T^H^E ^T^E^R^M^I^N^A^L ^A^N^D ^I^N ^T^H^E ^J^O^B ^D^A^Y^F^I^L^E.

       ^O^P^T                                  M^E^A^N^I^N^G
       ---                                  -------

       ABORT          R^E^T^U^R^N^S ^C^O^N^T^R^O^L ^T^O ^T^H^E ^N^E^X^T EXIT ^C^O^M^M^A^N^D ^I^N ^T^H^E ^C^O^M^M^A^N^D
                      ^R^E^C^O^R^D ^U^N^L^E^S^S ^A NOEXIT ^C^O^M^M^A^N^D ^H^A^S ^B^E^E^N ^P^R^O^C^E^S^S^E^D.
                      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^E^T^S EF=CPE (CPU ^A^B^O^R^T).  I^T ^R^E^T^U^R^N^S
                      ^C^O^N^T^R^O^L ^T^O ^T^H^E ^C^O^M^M^A^N^D ^F^O^L^L^O^W^I^N^G ^T^H^E ^C^A^L^L^I^N^G BEGIN
                      ^C^O^M^M^A^N^D ^I^F ^A NOEXIT ^C^O^M^M^A^N^D ^H^A^S ^B^E^E^N ^P^R^O^C^E^S^S^E^D.  T^H^I^S
                      ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^T^H^E REVERT ^C^O^M^M^A^N^D ^T^O ^A^P^P^E^A^R ^A^T ^T^H^E
                      ^T^E^R^M^I^N^A^L ^A^N^D ^I^N ^T^H^E ^J^O^B ^D^A^Y^F^I^L^E.

       EX             R^E^T^U^R^N^S ^C^O^N^T^R^O^L ^T^O ^T^H^E ^C^O^M^M^A^N^D ^R^E^C^O^R^D ^O^F ^T^H^E ^C^A^L^L^I^N^G
                      ^P^R^O^C^E^D^U^R^E ^A^N^D ^E^X^E^C^U^T^E^S ^T^H^E ^C^O^M^M^A^N^D ^C^O^M ^A^S ^I^F ^T^H^E
                      ^C^O^M^M^A^N^D ^H^A^D ^A^C^T^U^A^L^L^Y ^A^P^P^E^A^R^E^D ^I^N ^T^H^E ^C^A^L^L^I^N^G
                      ^P^R^O^C^E^D^U^R^E.  T^H^E EX ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^T^H^E REVERT ^C^O^M^M^A^N^D
                      ^T^O ^A^P^P^E^A^R ^I^N ^T^H^E ^J^O^B ^D^A^Y^F^I^L^E ^B^U^T ^N^O^T ^A^T ^T^H^E ^T^E^R^M^I^N^A^L.

       NOLIST         R^E^T^U^R^N^S ^C^O^N^T^R^O^L ^T^O ^T^H^E ^C^O^M^M^A^N^D ^F^O^L^L^O^W^I^N^G ^T^H^E ^C^A^L^L^I^N^G
                      BEGIN ^C^O^M^M^A^N^D ^A^N^D ^S^U^P^P^R^E^S^S^E^S ^T^H^E ^D^I^S^P^L^A^Y ^O^F ^T^H^E REVERT
                      ^C^O^M^M^A^N^D ^A^T ^T^H^E ^T^E^R^M^I^N^A^L ^A^N^D ^I^N ^T^H^E ^D^A^Y^F^I^L^E.

       I^F ^Y^O^U ^O^M^I^T ^O^P^T, ^C^O^N^T^R^O^L ^R^E^T^U^R^N^S ^T^O ^T^H^E ^C^O^M^M^A^N^D ^F^O^L^L^O^W^I^N^G ^T^H^E ^C^A^L^L^I^N^G
       BEGIN ^C^O^M^M^A^N^D.  T^H^E REVERT ^C^O^M^M^A^N^D ^A^P^P^E^A^R^S ^I^N ^T^H^E ^J^O^B ^D^A^Y^F^I^L^E ^B^U^T ^N^O^T
       ^A^T ^A ^T^E^R^M^I^N^A^L ^U^N^L^E^S^S ^Y^O^U ^A^R^E ^U^N^D^E^R ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M ^A^N^D ^T^H^E REVERT
       ^I^S ^N^O^T ^W^I^T^H^I^N ^A ^N^E^S^T^E^D ^P^R^O^C^E^D^U^R^E ^C^A^L^L.
.HELP,COM,NOLIST

       T^H^E ^P^A^R^A^M^E^T^E^R ^C^O^M ^S^P^E^C^I^F^I^E^S ^A ^C^O^M^M^E^N^T ^U^N^L^E^S^S ^U^S^E^D ^W^I^T^H ^T^H^E EX ^P^A^R^A^M^E^T^E^R.
       I^N ^T^H^I^S ^C^A^S^E, ^C^O^M ^M^U^S^T ^B^E ^A ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,REWIND*I
,LFN[F^I^L^E ^T^O ^B^E ^R^E^W^O^U^N^D]=(*F,$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  REWIND,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               REWIND,*,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               REWIND,*

      T^H^E REWIND ^C^O^M^M^A^N^D ^R^E^W^I^N^D^S ^F^I^L^E^S.  T^H^E ^F^I^L^E ^I^S ^P^O^S^I^T^I^O^N^E^D ^A^T ^I^T^S
      ^B^E^G^I^N^N^I^N^G-^O^F-^I^N^F^O^R^M^A^T^I^O^N (BOI).

       N^O^T^E@D ^T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^R^E^W^I^N^D^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^E^X^C^E^P^T
       ^T^H^E ^N^A^M^E^D ^F^I^L^E^S (^L^F^N).  T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^R^E^W^I^N^D^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D
       ^T^O ^Y^O^U^R ^J^O^B.  I^N HELPME, ^H^O^W^E^V^E^R, ^Y^O^U ^M^A^Y ^U^S^E ^O^N^L^Y ^T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^O^F
       REWIND, ^S^P^E^C^I^F^Y^I^N^G ^O^N^L^Y ^O^N^E ^F^I^L^E ^T^O ^R^E^W^I^N^D, ^O^R ^T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^W^I^T^H
       ^A^N ^A^S^T^E^R^I^S^K (*), ^R^E^W^I^N^D^I^N^G ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.
.HELP,LFN,NOLIST

       S^P^E^C^I^F^Y ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^R^E^W^I^N^D.   I^F ^Y^O^U ^S^P^E^C^I^F^Y
       ^A^N ^A^S^T^E^R^I^S^K (*), ^A^L^L ^T^H^E ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^W^I^L^L ^B^E ^R^E^W^O^U^N^D.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E ^O^R ^A^S^T^E^R^I^S^K (*).
.ENDHELP
.EX.  $REWIND,LFN.
*WEOR
.PROC,RFL*I
,CM[S^P^E^C^I^F^Y ^M^A^X^I^M^U^M ^C^E^N^T^R^A^L ^M^E^M^O^R^Y]=(*S7(01234567B),*S7(0123456789D))
,EC[S^P^E^C^I^F^Y ^M^A^X^I^M^U^M ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y]=(*S7(01234567B),*S7(0123456789D),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RFL,CM=^N^N^N^N^N^N,EC=^M^M^M^M.
               RFL,^N^N^N^N^N^N,^M^M^M^M.

      T^H^E RFL ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^I^N^I^T^I^A^L ^R^U^N^N^I^N^G ^F^I^E^L^D ^L^E^N^G^T^H ^F^O^R ^E^A^C^H
      ^S^U^B^S^E^Q^U^E^N^T ^J^O^B ^S^T^E^P.
.HELP,CM,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CM=^N^N^N^N^N^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H
      (^O^C^T^A^L ^I^S ^A^S^S^U^M^E^D ^U^N^L^E^S^S ^Y^O^U ^S^P^E^C^I^F^Y ^D^E^C^I^M^A^L ^B^Y ^A D ^S^U^F^F^I^X ^O^R ^B^Y ^U^S^E
      ^O^F ^T^H^E ^D^I^G^I^T^S 8 ^O^R 9).  T^H^E ^V^A^L^U^E ^I^S ^R^O^U^N^D^E^D ^U^P ^T^O ^T^H^E ^N^E^A^R^E^S^T ^M^U^L^T^I^P^L^E
      ^O^F 100 ^O^C^T^A^L.  S^P^E^C^I^F^Y^I^N^G ^N^N^N^N^N^N ^A^S 0 ^R^E^M^O^V^E^S ^T^H^E ^E^F^F^E^C^T ^O^F ^T^H^E ^P^R^E^V^I^O^U^S
      RFL ^C^O^M^M^A^N^D ^A^N^D ^R^E^T^U^R^N^S ^T^H^E ^S^E^T^T^I^N^G ^O^F ^T^H^E ^F^I^E^L^D ^L^E^N^G^T^H ^T^O ^S^Y^S^T^E^M ^C^O^N^T^R^O^


      D^E^F^A^U^L^T@D  P^R^I^O^R ^T^O ^T^H^E RFL ^C^O^M^M^A^N^D, ^T^H^E ^S^Y^S^T^E^M ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^F^I^E^L^D ^L^E^N^G^T^H
                ^F^O^R ^E^A^C^H ^J^O^B ^S^T^E^P.
.HELP,EC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (EC=^M^M^M^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^F^I^E^L^D ^L^E^N^G^T^H ^I^N
      ^O^C^T^A^L. T^H^I^S ^V^A^L^U^E ^I^S ^T^H^E ^A^C^T^U^A^L ^E^X^T^E^N^D^E^D ^M^E^M^O^R^Y ^D^I^V^I^D^E^D ^B^Y 1000 ^O^C^T^A^L.

      D^E^F^A^U^L^T@D  P^R^I^O^R ^T^O ^T^H^E RFL ^C^O^M^M^A^N^D, ^T^H^E ^S^Y^S^T^E^M ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^F^I^E^L^D ^L^E^N^G^T^H
                ^F^O^R ^E^A^C^H ^J^O^B ^S^T^E^P.
.ENDHELP
.EX.  $RFL(#CM=CM,#EC=EC)
*WEOR
.PROC,ROLLOUT*I
,LN[L^E^N^G^T^H ^O^F ^R^O^L^L^O^U^T ^D^E^L^A^Y]=(*S7(0123456789B),*N=1)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ROLLOUT,^T.

      T^H^E ROLLOUT ^C^O^M^M^A^N^D ^S^U^S^P^E^N^D^S ^J^O^B ^E^X^E^C^U^T^I^O^N ^A^N^D ^P^L^A^C^E^S ^T^H^E ^J^O^B ^I^N ^T^H^E
      ^R^O^L^L^O^U^T ^Q^U^E^U^E.
.HELP,LN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^P^T^I^O^N^A^L ^T^I^M^E ^D^E^L^A^Y ^M^E^A^S^U^R^E^D ^I^N ^J^O^B
      ^S^C^H^E^D^U^L^E^R ^D^E^L^A^Y ^I^N^T^E^R^V^A^L^S. (T^H^E ^D^E^L^A^Y ^I^N^T^E^R^V^A^L ^L^E^N^G^T^H ^I^S ^S^E^T ^B^Y ^T^H^E
      ^I^N^S^T^A^L^L^A^T^I^O^N.)   Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^A ^T^I^M^E ^D^E^L^A^Y ^O^F 0 ^T^H^R^O^U^G^H
      262080 (777700B).  E^N^T^E^R ^T^H^E ^V^A^L^U^E ^I^N ^D^E^C^I^M^A^L, ^O^R ^I^N ^O^C^T^A^L ^W^I^T^H ^A
      B ^S^U^F^F^I^X.

      D^E^F^A^U^L^T@D 1  (^U^S^U^A^L^L^Y 1 ^S^E^C^O^N^D).
.ENDHELP
.EX.  $ROLLOUT(LN)
*WEOR
.PROC,ROUTE*I
,LFN[F^I^L^E ^T^O ^R^O^U^T^E]=(*F)
,DC[D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E]=(IN,NO,TO,WT,LP,PR,LR,LS,LT,LX,SB,PB,P8,PU,PH,PL,SC,*N=)
,DEF[D^O ^Y^O^U ^W^A^N^T ^D^E^F^E^R^R^E^D ^R^O^U^T^I^N^G]=(YES=$,DEF$,Y=$,DEF$,
                                      DEF=$,DEF$,NO=,N=,*N=)
,DO[M^A^I^N^F^R^A^M^E ^T^O ^R^E^C^E^I^V^E ^O^U^T^P^U^T]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789$*$),
                                     *N=)
,EC[E^X^T^E^R^N^A^L ^C^H^A^R^A^C^T^E^R ^S^E^T]=(A4,A6,A9,B4,B6,ASCII,O26,026,O29,029,SB,80COL,
                                T6,T8,*N=A6)
,FC[S^P^E^C^I^A^L ^F^O^R^M^S]=(533,536,64,95,AS,*N=)
,FID[NOS/BE ^C^O^M^P^A^T^I^B^I^L^I^T^Y]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ),*N=)
,FM[F^A^M^I^L^Y ^N^A^M^E ^T^O ^R^O^U^T^E ^F^I^L^E ^T^O]=(*S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890),
                                      *N=)
,IC[I^N^T^E^R^N^A^L ^C^H^A^R^A^C^T^E^R ^S^E^T]=(DIS,ASCII,BIN,*N=)
,ID[S^E^L^E^C^T ^D^E^V^I^C^E ^I^D^E^N^T^I^F^I^E^R]=(*S7(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890),*N=)
,PI[P^R^I^N^T^E^R ^C^H^A^R^A^C^T^E^R ^S^E^T]=(*A1..7,*N=)
,PRI[NOS/BE ^C^O^M^P^A^T^I^B^I^L^I^T^Y ^F^O^R ^F^I^L^E ^P^R^I^O^R^I^T^Y]=(NO=$,PRI$,N=$,PRI$,YES=,Y=,
                                              *K=$,PRI$,*N=)
,REP[R^E^P^E^T^I^T^I^O^N ^C^O^U^N^T]=(*S2(0123456789),*N=0)
,SC[P^R^O^G^R^A^M^M^A^B^L^E ^F^O^R^M^A^T ^C^O^N^T^R^O^L]=(*S1(123456),*N=3)
,SCL[S^E^R^V^I^C^E ^C^L^A^S^S ^A^S^S^I^G^N^E^D ^T^O ^F^I^L^E]=(BC,CT,DF,DI,IN,MA,NS,RB,SY,TS,*N=DF)
,ST[M^A^I^N^F^R^A^M^E ^T^O ^R^O^U^T^E ^F^I^L^E ^T^O]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456798$*$),
                                     *N=)
,TID[NOS/BE ^U^S^E^R ^N^A^M^E ^D^E^S^T^I^N^A^T^I^O^N]=(*F,*N=)
,UJN[J^O^B ^N^A^M^E ^T^O ^R^O^U^T^E ^F^I^L^E ^T^O]=(*S4(ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890),
                                     *N=)
,UN[U^S^E^R ^N^A^M^E ^T^O ^R^O^U^T^E ^F^I^L^E ^T^O]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ROUTE,^L^F^N,DC=^D^C,DEF,DO=^L^I^D1,EC=^E^C,FC=^F^C,FID=^F^I^D,FM=^F^M,IC=^I^C,
                 ID=^I^D,PI=^P^I,PRI=^P^R^I,REP=^R^E^P,SC=^S^C,SCL=^S^C^L,ST=^L^I^D2,TID=^T^I^D,
                 UJN=^U^J^N,UN=^U^N.

      T^H^E ROUTE ^C^O^M^M^A^N^D ^Q^U^E^U^E^S ^A ^F^I^L^E ^F^O^R ^D^I^S^P^O^S^A^L.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^O^U^T^E (^I^T ^M^U^S^T ^N^O^T
      ^B^E ^E^I^T^H^E^R ^A ^P^R^I^M^A^R^Y ^O^R ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E).

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,DC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (DC=^D^C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^Q^U^E^U^E^D ^F^I^L^E.

      E^N^T^E^R       T^O ^S^P^E^C^I^F^Y
      -----       ----------

      IN          Q^U^E^U^E ^T^H^E ^F^I^L^E ^W^I^T^H ^A^N ^I^N^P^U^T ^D^I^S^P^O^S^I^T^I^O^N.
      NO          Q^U^E^U^E ^T^H^E ^F^I^L^E ^W^I^T^H ^A^N ^I^N^P^U^T ^D^I^S^P^O^S^I^T^I^O^N.  O^U^T^P^U^T ^N^O^T
                  ^E^X^P^L^I^C^I^T^L^Y ^R^O^U^T^E^D ^B^Y ^T^H^E ^J^O^B ^I^S ^D^I^S^C^A^R^D^E^D ^A^T ^J^O^B
                  ^C^O^M^P^L^E^T^I^O^N.
      TO          Q^U^E^U^E ^T^H^E ^F^I^L^E ^W^I^T^H ^A^N ^I^N^P^U^T ^D^I^S^P^O^S^I^T^I^O^N ^A^N^D ^Q^U^E^U^E ^I^T^S
                  ^O^U^T^P^U^T ^W^I^T^H ^A ^W^A^I^T ^D^I^S^P^O^S^I^T^I^O^N ^U^N^L^E^S^S ^T^H^E ^J^O^B ^R^O^U^T^E^S ^I^T
                  ^E^L^S^E^W^H^E^R^E.
      WT          Q^U^E^U^E ^T^H^E ^F^I^L^E ^W^I^T^H ^A ^W^A^I^T ^D^I^S^P^O^S^I^T^I^O^N.
      LP ^O^R PR    Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^R^I^N^T^I^N^G ^O^N ^A^N^Y ^P^R^I^N^T^E^R.
      LR          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^R^I^N^T^I^N^G ^O^N ^A 580-12 ^P^R^I^N^T^E^R.
      LS          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^R^I^N^T^I^N^G ^O^N ^A 580-16 ^P^R^I^N^T^E^R.
      LT          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^R^I^N^T^I^N^G ^O^N ^A 580-20 ^P^R^I^N^T^E^R.
      LX          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^R^I^N^T^I^N^G ^O^N ^A 5870 ^P^R^I^N^T^E^R.
      SB ^O^R PB    Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^U^N^C^H^I^N^G ^S^Y^S^T^E^M ^B^I^N^A^R^Y ^F^O^R^M^A^T.
      P8          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^U^N^C^H^I^N^G ^I^N 80-^C^O^L^U^M^N ^B^I^N^A^R^Y ^F^O^R^M^A^T.
      PU ^O^R PH    Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^U^N^C^H^I^N^G ^I^N ^C^O^D^E^D ^F^O^R^M^A^T.
      PL          Q^U^E^U^E ^T^H^E ^F^I^L^E ^F^O^R ^P^L^O^T^T^I^N^G.
      SC          R^E^S^C^I^N^D ^P^R^I^O^R ^R^O^U^T^I^N^G ^A^N^D ^C^H^A^N^G^E ^T^H^E ^F^I^L^E ^T^Y^P^E ^T^O ^L^O^C^A^L.
                  I^F ^N^O ^P^R^I^O^R ^R^O^U^T^I^N^G ^E^X^I^S^T^S, SC ^I^S ^I^G^N^O^R^E^D.

      D^E^F^A^U^L^T@D I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D ^A^N^D ^T^H^E ^F^I^L^E ^H^A^S ^B^E^E^N ^P^R^E^V^I^O^U^S^L^Y
               ^G^I^V^E^N ^A ^D^E^F^E^R^R^E^D ^R^O^U^T^I^N^G, ^T^H^E ^F^I^L^E ^I^S ^Q^U^E^U^E^D ^W^I^T^H ^T^H^E
               ^D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E ^P^R^E^V^I^O^U^S^L^Y ^S^P^E^C^I^F^I^E^D.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
               ^I^S ^O^M^I^T^T^E^D ^A^N^D ^T^H^E ^F^I^L^E ^I^S ^N^O^T ^A ^D^E^F^E^R^R^E^D ^R^O^U^T^E^D ^F^I^L^E, ^T^H^E
               ^F^I^L^E ^N^A^M^E ^M^A^Y ^D^E^T^E^R^M^I^N^E ^T^H^E ^D^E^F^A^U^L^T.
.HELP,DEF,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (DEF) ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^Q^U^E^U^E^I^N^G ^O^F ^T^H^E ^F^I^L^E ^I^S ^D^E^F^E^R^R^E^D
      ^T^O ^A ^L^A^T^E^R ^J^O^B ^S^T^E^P ^O^R ^T^O ^T^H^E ^E^N^D ^O^F ^J^O^B.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^M^A^Y
      ^N^O^T ^B^E ^S^P^E^C^I^F^I^E^D ^I^F DC=IN, NO, ^O^R TO. T^O ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R,
      ^E^N^T^E^R DEF; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.
.HELP,DO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (DO=^L^I^D1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^G^I^C^A^L ^I^D^E^N^T^I^F^I^E^R (^L^I^D) ^O^F
      ^T^H^E ^M^A^I^N^F^R^A^M^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^O^U^T^P^U^T ^G^E^N^E^R^A^T^E^D ^B^Y ^T^H^E ^R^O^U^T^E^D ^F^I^L^E.
      T^H^E ^L^I^D ^C^A^N ^B^E ^A^N^Y 3-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G ^D^E^F^I^N^E^D ^B^Y ^Y^O^U^R
      ^S^I^T^E.  A^N ^A^S^T^E^R^I^S^K (DO=*) ^R^E^T^U^R^N^S ^T^H^E ^O^U^T^P^U^T ^T^O ^T^H^E ^M^A^I^N^F^R^A^M^E ^T^H^A^T
      ^P^R^O^C^E^S^S^E^D ^T^H^E ROUTE ^C^O^M^M^A^N^D.  S^P^E^C^I^F^Y ^T^H^E DO ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^W^H^E^N
      ^Y^O^U ^S^P^E^C^I^F^Y DC=IN ^O^R DC=TO.

      D^E^F^A^U^L^T@D  O^U^T^P^U^T ^R^E^T^U^R^N^S ^T^O ^T^H^E ^O^R^I^G^I^N^A^T^I^N^G ^M^A^I^N^F^R^A^M^E.
.HELP,EC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (EC=^E^C) ^D^E^F^I^N^E^S ^E^X^T^E^R^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^F^O^R ^F^I^L^E^S
      ^Q^U^E^U^E^D ^F^O^R ^P^R^I^N^T^I^N^G, ^P^U^N^C^H^I^N^G, ^O^R ^P^L^O^T^T^I^N^G.  F^O^R ^F^I^L^E^S ^Q^U^E^U^E^D ^F^O^R
      ^P^R^I^N^T^I^N^G@D

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y
      -----       ---------

      A4 ^O^R B4   T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^T^H^E ^A^P^P^R^O^P^R^I^A^T^E EC ^D^E^F^A^U^L^T (^P^R^O^V^I^D^E^D ^F^O^R
                 NOS/BE ^C^O^M^P^A^T^I^B^I^L^I^T^Y).
      A6         ASCII ^G^R^A^P^H^I^C 63/64-^C^H^A^R^A^C^T^E^R ^S^E^T.
      A9         ASCII ^G^R^A^P^H^I^C 95-^C^H^A^R^A^C^T^E^R ^S^E^T.  F^I^L^E ^L^F^N ^M^U^S^T ^B^E ^A 7-^B^I^T
                 ASCII ^F^I^L^E.
      B6         CDC ^G^R^A^P^H^I^C 63/64-^C^H^A^R^A^C^T^E^R ^S^E^T.

      F^O^R ^F^I^L^E^S ^Q^U^E^U^E^D ^F^O^R ^P^U^N^C^H^I^N^G@D

      E^N^T^E^R        T^O ^S^P^E^C^I^F^Y

      ASCII        P^U^N^C^H ASCII.
      026 ^O^R O26   P^U^N^C^H O26 ^M^O^D^E.
      029 ^O^R O29   P^U^N^C^H O29 ^M^O^D^E.
      SB           P^U^N^C^H ^S^Y^S^T^E^M ^B^I^N^A^R^Y.
      80COL        P^U^N^C^H 80-^C^O^L^U^M^N ^B^I^N^A^R^Y.

      F^O^R ^F^I^L^E^S ^Q^U^E^U^E^D ^F^O^R ^P^L^O^T^T^I^N^G@D

      E^N^T^E^R        T^O ^S^P^E^C^I^F^Y
      -----        ----------

      T6           6-^B^I^T ^T^R^A^N^S^P^A^R^E^N^T ^P^L^O^T ^D^A^T^A.
      T8           8-^B^I^T ^T^R^A^N^S^P^A^R^E^N^T ^P^L^O^T ^D^A^T^A.

      D^E^F^A^U^L^T@D  I^N HELPME, A6 (ASCII ^G^R^A^P^H^I^C 63/64 ^C^H^A^R^A^C^T^E^R ^S^E^T).
.HELP,FC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FC=^V^A^L^U^E) ^S^P^E^C^I^F^I^E^S ^R^O^U^T^I^N^G ^O^F ^O^U^T^P^U^T ^R^E^Q^U^I^R^I^N^G ^S^P^E^C^I^A^L
      ^F^O^R^M^S, ^S^P^E^C^I^F^Y FC=^F^C, ^W^H^E^R^E ^F^C ^I^S ^A 2-^C^H^A^R^A^C^T^E^R ^C^O^D^E ^A^S^S^I^G^N^E^D ^B^Y ^T^H^E
      ^S^Y^S^T^E^M ^O^P^E^R^A^T^O^R ^T^O ^A^N ^O^U^T^P^U^T ^D^E^V^I^C^E.  I^F FC ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S ^A ^N^U^L^L ^V^A^L^U^E.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,FID,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FID=^U^J^N) ^S^P^E^C^I^F^I^E^S ^T^H^A^T FID ^I^S ^A NOS/BE ^P^A^R^A^M^E^T^E^R ^W^H^I^C^H ^I^S
      ^I^N^C^L^U^D^E^D ^F^O^R ^C^O^M^P^A^T^I^B^I^L^I^T^Y.  U^N^D^E^R NOS, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^P^E^R^F^O^R^M^S ^T^H^E ^S^A^M^E
      ^F^U^N^C^T^I^O^N ^A^S ^T^H^E UJN ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,FM,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FM=^F^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^R^O^U^T^I^N^G ^T^O ^A ^R^E^M^O^T^E ^B^A^T^C^H ^O^R
      ^I^N^T^E^R^A^C^T^I^V^E ^T^E^R^M^I^N^A^L ^L^O^G^G^E^D ^I^N ^W^I^T^H ^T^H^E ^F^A^M^I^L^Y ^N^A^M^E ^S^P^E^C^I^F^I^E^D.
      Y^O^U ^M^U^S^T ^H^A^V^E ^S^P^E^C^I^A^L ^A^U^T^H^O^R^I^Z^A^T^I^O^N ^T^O ^S^P^E^C^I^F^Y ^A^N ^A^L^T^E^R^N^A^T^E ^F^A^M^I^L^Y ^N^A^M^

      T^H^E ^O^N^E- ^T^O ^S^E^V^E^N-^C^H^A^R^A^C^T^E^R ^F^A^M^I^L^Y ^N^A^M^E ^M^U^S^T ^B^E ^A^L^P^H^A^N^U^M^E^R^I^C.  I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D FM, ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^R^E^S^U^L^T^S.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,IC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (IC=^I^C) ^S^P^E^C^I^F^I^E^S ^I^N^T^E^R^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F
      ^T^H^E ^F^I^L^E.

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y
      -----      ----------

      DIS        6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E.
      ASCII      7-^B^I^T ASCII ^C^O^D^E.
      BIN        B^I^N^A^R^Y.

      D^E^F^A^U^L^T@D  A^U^T^O^M^A^T^I^C^A^L^L^Y ^E^S^T^A^B^L^I^S^H^E^D ^T^H^R^O^U^G^H ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^C^O^D^E (DC=^D^C)
                ^A^N^D ^T^H^E ^E^X^T^E^R^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S (EC=^E^C) ^P^A^R^A^M^E^T^E^R^S.  T^H^I^S
                ^P^A^R^A^M^E^T^E^R ^M^A^Y ^B^E ^O^M^I^T^T^E^D.
.HELP,ID,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ID=^I^D) ^S^E^L^E^C^T^S ^T^H^E ^D^E^V^I^C^E ^L^O^C^A^L^L^Y ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H
      ^I^D^E^N^T^I^F^I^E^R ^I^D.  I^D^E^N^T^I^F^I^E^R ^I^D ^C^A^N ^B^E 0 ^T^O 67B (^O^C^T^A^L ^D^E^F^A^U^L^T).  I^F
      ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D ID, ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^R^E^S^U^L^T^S.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,REP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (REP=^R^E^P) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^A^D^D^I^T^I^O^N^A^L ^F^I^L^E
      ^C^O^P^I^E^S ^T^O ^B^E ^R^O^U^T^E^D ^T^O ^A ^D^E^S^T^I^N^A^T^I^O^N.  T^H^E ^R^A^N^G^E ^I^S ^F^R^O^M 0 ^T^O 63.
      (T^H^E ^T^O^T^A^L ^N^U^M^B^E^R ^T^H^A^T ^C^A^N ^B^E ^S^E^N^T ^I^S ^F^R^O^M 1 ^T^O 64.)

      D^E^F^A^U^L^T@D 0 (^Z^E^R^O); 1 ^C^O^P^Y ^I^S ^R^O^U^T^E^D.
.HELP,SC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (SC=^S^C) ^S^P^E^C^I^F^I^E^S ^A ^P^R^O^G^R^A^M^M^A^B^L^E ^F^O^R^M^A^T ^C^O^N^T^R^O^L (PFC) ^A^R^R^A^Y
      ^F^O^R ^T^H^E 580 PFC ^P^R^I^N^T^E^R, ^O^R ^A ^V^E^R^T^I^C^A^L ^F^O^R^M^A^T ^D^E^F^I^N^I^T^I^O^N ^F^O^R 533/536,
      537, ^O^R 585 ^P^R^I^N^T^E^R.  T^H^E ^S^Y^S^T^E^M ^I^S ^R^E^L^E^A^S^E^D ^W^I^T^H ^T^W^O PFC ^A^R^R^A^Y^S, ^A
      ^D^E^F^A^U^L^T (SC=0), ^A^N^D ^A^N ^A^L^T^E^R^N^A^T^E (SC=1).  I^F ^Y^O^U^R ^S^I^T^E ^H^A^S 533/536, 537,
      ^O^R 585 ^P^R^I^N^T^E^R^S, ^T^H^E ^S^Y^S^T^E^M ^C^O^N^T^A^I^N^S ^S^I^X ^V^E^R^T^I^C^A^L ^F^O^R^M^A^T ^D^E^F^I^N^I^T^I^O^N^S ^F^O^R
      ^T^H^E^S^E ^P^R^I^N^T^E^R^S ^W^I^T^H ^A ^D^E^F^A^U^L^T ^O^F SC=3.  F^O^R 533/536, 537, ^A^N^D 585 ^P^R^I^N^T^E^R^S,
      ^Y^O^U ^M^A^Y ^C^H^O^O^S^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^C ^V^A^L^U^E^S@D

         ^S^C             D^E^S^C^R^I^P^T^I^O^N
         --             -----------
         1     12-^I^N^C^H ^F^O^R^M^S ^A^T 6 ^L^I^N^E^S/^I^N^C^H.
         2     12-^I^N^C^H ^F^O^R^M^S ^A^T 8 ^L^I^N^E^S/^I^N^C^H.
         3     11-^I^N^C^H ^F^O^R^M^S ^A^T 6 ^L^I^N^E^S/^I^N^C^H.
         4     11-^I^N^C^H ^F^O^R^M^S ^A^T 8 ^L^I^N^E^S/^I^N^C^H.
         5     8.5-^I^N^C^H ^F^O^R^M^S ^A^T 6 ^L^I^N^E^S/^I^N^C^H.
         6     8.5-^I^N^C^H ^F^O^R^M^S ^A^T 8 ^L^I^N^E^S/^I^N^C^H.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,SCL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (SCL=^S^C^L) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^R^V^I^C^E ^C^L^A^S^S ^T^O ^B^E ^A^S^S^I^G^N^E^D ^T^O
      ^T^H^I^S ^R^O^U^T^E^D ^F^I^L^E.  T^H^E ^V^A^L^U^E ^F^O^R ^S^C^L ^M^U^S^T ^B^E ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

         ^S^C^L                          D^E^S^C^R^I^P^T^I^O^N
         ---                          -----------
         BC     L^O^C^A^L ^B^A^T^C^H.
         CT     C^O^M^M^U^N^I^C^A^T^I^O^N ^T^A^S^K.
         DF     T^H^E ^D^E^F^A^U^L^T ^S^E^R^V^I^C^E ^C^L^A^S^S ^A^C^C^O^R^D^I^N^G ^T^O ^T^H^E ^O^R^I^G^I^N ^T^Y^P^E ^O^F ^T^H^E
                ^R^O^U^T^E^D ^F^I^L^E.
         DI     D^E^T^A^C^H^E^D ^I^N^T^E^R^A^C^T^I^V^E.
         I^N     I^N^S^T^A^L^L^A^T^I^O^N ^C^L^A^S^S ^N (^N<=^N<=3).
         MA     M^A^I^N^T^E^N^A^N^C^E.
         NS     N^E^T^W^O^R^K ^S^U^P^E^R^V^I^S^O^R.
         RB     R^E^M^O^T^E ^B^A^T^C^H.
         SY     S^Y^S^T^E^M.
         TS     I^N^T^E^R^A^C^T^I^V^E.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,ST,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (ST=^L^I^D2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^G^I^C^A^L ^I^D^E^N^T^I^F^I^E^R ^O^F ^T^H^E
      ^M^A^I^N^F^R^A^M^E ^T^O ^W^H^I^C^H ^Y^O^U ^A^R^E ^R^O^U^T^I^N^G ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E.  T^H^E ^L^I^D
      ^C^A^N ^B^E ^A^N^Y 3-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G ^D^E^F^I^N^E^D ^B^Y ^Y^O^U^R ^S^I^T^E.
      I^F ^Y^O^U ^E^N^T^E^R ^A^N ^A^S^T^E^R^I^S^K (*), ^T^H^E ^M^A^I^N^F^R^A^M^E ^P^R^O^C^E^S^S^I^N^G ^T^H^E ROUTE
      ^C^O^M^M^A^N^D ^A^L^S^O ^P^R^O^C^E^S^S^E^S ^T^H^E ^R^O^U^T^E^D ^F^I^L^E.

      D^E^F^A^U^L^T@D T^H^E ^M^A^I^N^F^R^A^M^E ^P^R^O^C^E^S^S^I^N^G ^T^H^E ROUTE ^C^O^M^M^A^N^D ^A^L^S^O ^P^R^O^C^E^S^S^E^S
               ^T^H^E ^R^O^U^T^E^D ^F^I^L^E, ^U^N^L^E^S^S ^T^H^E ^J^O^B ^C^O^N^T^A^I^N^I^N^G ^T^H^E ROUTE ^C^O^M^M^A^N^D
               ^W^A^S ^S^E^N^T ^B^Y ^A^N^O^T^H^E^R ^J^O^B ^T^H^A^T ^I^S ^D^I^V^E^R^T^I^N^G ^T^H^E ^O^U^T^P^U^T ^E^L^S^E^W^H^E^R^E.
.HELP,PI,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PI=^P^I, ^W^H^I^C^H ^S^T^A^N^D^S ^F^O^R ^P^R^I^N^T-^T^R^A^I^N ^I^M^A^G^E) ^S^P^E^C^I^F^I^E^S
      ^T^H^E ^S^E^T ^O^F ^C^H^A^R^A^C^T^E^R^S ^U^S^E^D ^F^O^R ^P^R^I^N^T^I^N^G ^A ^F^I^L^E.  E^A^C^H ^P^R^I^N^T^E^R ^C^H^A^R^A^C^T^E^R
      ^S^E^T ^I^S ^R^E^P^R^E^S^E^N^T^E^D ^B^Y ^A ^N^U^M^B^E^R (0 ^T^H^R^O^U^G^H 7) ^O^R ^A ^N^A^M^E ^O^F 1- ^T^O 7-^A^L^P^H^A-
      ^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  P^R^I^N^T^E^R ^C^H^A^R^A^C^T^E^R ^S^E^T^S ^A^R^E ^D^E^F^I^N^E^D ^B^Y ^E^A^C^H ^S^I^T^E.

      E^N^T^E^R ^T^H^E ^N^U^M^B^E^R ^O^R ^N^A^M^E ^O^F ^T^H^E ^P^R^I^N^T^E^R ^C^H^A^R^A^C^T^E^R ^S^E^T ^T^O ^B^E ^U^S^E^D ^I^N
      ^P^R^I^N^T^I^N^G ^T^H^E ^F^I^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^D^E^F^A^U^L^T ^P^R^I^N^T^E^R ^C^H^A^R^A^C^T^E^R ^S^E^T ^I^S ^D^E^F^I^N^E^D ^B^Y ^Y^O^U^R ^S^I^T^E.
.HELP,PRI,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PRI=^P^R^I) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^P^R^I^O^R^I^T^Y.  T^H^I^S ^I^S ^A NOS/BE
      ^P^A^R^A^M^E^T^E^R ^I^N^C^L^U^D^E^D ^F^O^R ^C^O^M^P^A^T^I^B^I^L^I^T^Y.  I^T ^P^R^O^D^U^C^E^S ^A^N ^I^N^F^O^R^M^A^T^I^V^E ^M^E^S^S^
E
      ^U^N^D^E^R NOS.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,TID,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (TID=^T^I^D ^O^R TID=C) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^A^M^E ^F^U^N^C^T^I^O^N^S ^A^S ^T^H^E
      UN=^U^N ^P^A^R^A^M^E^T^E^R ^I^F TID=^T^I^D, ^A^N^D ^I^S ^I^N^C^L^U^D^E^D ^F^O^R ^C^O^M^P^A^T^I^B^I^L^I^T^Y ^W^I^T^H NOS/BE.
      I^F TID=C ^T^H^E^N ^T^H^E ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^R^O^U^T^I^N^G ^T^O ^T^H^E ^C^E^N^T^R^A^L ^S^I^T^E.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,UJN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UJN=^U^J^N) ^S^P^E^C^I^F^I^E^S ^A ^U^S^E^R ^J^O^B ^N^A^M^E (UJN) ^F^O^R ^T^H^E ^F^I^L^E ^T^O
      ^B^E ^R^O^U^T^E^D.  E^X^C^E^P^T ^F^O^R ^I^N^P^U^T ^D^I^S^P^O^S^I^T^I^O^N^S, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E UJN ^O^F ^T^H^E
      ^J^O^B ^F^R^O^M ^W^H^I^C^H ^Y^O^U ^E^N^T^E^R ^T^H^E ^C^O^M^M^A^N^D.  I^N ^T^H^E ^C^A^S^E ^W^H^E^R^E ^Y^O^U ^S^P^E^C^I^F^Y ^A^N
      ^I^N^P^U^T ^D^I^S^P^O^S^I^T^I^O^N (DC=IN, DC=NO, ^O^R DC=TO), ^T^H^E J^O^B ^C^O^M^M^A^N^D ^O^F ^T^H^E ^Q^U^E^U^E^D
      ^F^I^L^E ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^D^E^F^A^U^L^T UJN.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,UN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (UN=^U^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^R^E^M^O^T^E ^B^A^T^C^H ^O^R
      ^I^N^T^E^R^A^C^T^I^V^E ^U^S^E^R ^T^O ^W^H^O^M ^T^H^E ^S^Y^S^T^E^M ^R^O^U^T^E^S ^T^H^E ^F^I^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y
      ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D UN, ^I^M^P^L^I^C^I^T ^R^E^M^O^T^E ^R^O^U^T^I^N^G ^O^C^C^U^R^S.

      D^E^F^A^U^L^T@D I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.ENDHELP
.EX.  $ROUTE(LFN,#DC=DC_DEF,#DO=DO,#EC=EC,#IC=IC,#REP=REP,#ST=ST,#PI=PI)
*WEOR
.PROC,RTIME*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RTIME

      T^H^E RTIME ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^T^H^A^T ^T^H^E ^T^I^M^E ^B^E ^R^E^A^D ^F^R^O^M ^T^H^E ^R^E^A^L-^T^I^M^E ^C^L^O^C^K
      ^A^N^D ^I^S^S^U^E^D ^T^O ^T^H^E ^D^A^Y^F^I^L^E (^I^N ^S^E^C^O^N^D^S).  T^H^I^S ^I^S ^T^H^E ^A^C^C^U^M^U^L^A^T^E^D ^T^I^M^E
      ^S^I^N^C^E ^T^H^E ^L^A^S^T ^D^E^A^D^S^T^A^R^T.
.ENDHELP
.EX.  $RTIME.
*WEOR
.PROC,RUN*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  RUN
               RUN,I=^L^F^N1
               RUN,B=^L^F^N2         ^O^R RUN,C=^L^F^N2
               RUN,I=^L^F^N1,B=^L^F^N2  ^O^R RUN,I=^L^F^N1,C=^L^F^N2
               RUN,T,^Q1,^Q2,...,^Q^N

      T^H^E RUN ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^A^N^D ^I^N^I^T^I^A^T^E^S ^E^X^E^C^U^T^I^O^N ^O^F ^A ^L^O^C^A^L ^F^I^L^E.  T^H^E
      ^C^O^M^P^I^L^E^R ^U^S^E^D (^I^F ^A^N^Y) ^D^E^P^E^N^D^S ^O^N ^T^H^E ^C^U^R^R^E^N^T ^S^U^B^S^Y^S^T^E^M.  T^H^I^S ^C^O^M^M^A^N^D ^I^S
      ^V^A^L^I^D ^O^N^L^Y ^I^N ^T^H^E BASIC, FORTRAN, FTNTS, ^A^N^D ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M^S.

           P^A^R^A^M^E^T^E^R                      D^E^S^C^R^I^P^T^I^O^N
           ---------                      -----------
           ^L^F^N1          S^P^E^C^I^F^I^E^S ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^T^H^E ^S^O^U^R^C^E
                         ^P^R^O^G^R^A^M ^T^O ^B^E ^C^O^M^P^I^L^E^D ^A^N^D ^E^X^E^C^U^T^E^D.

           ^L^F^N2          S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^E^R ^O^R ^A^S^S^E^M^B^L^E^R ^O^U^T^P^U^T ^F^I^L^E.
                         F^I^L^E ^L^F^N2 ^C^A^N ^B^E ^L^A^T^E^R ^E^X^E^C^U^T^E^D ^I^N ^T^H^E ^E^X^E^C^U^T^E
                         ^S^U^B^S^Y^S^T^E^M ^B^Y ^E^N^T^E^R^I^N^G ^J^U^S^T RUN.

           ^Q1            S^P^E^C^I^F^I^E^S ^L^O^C^A^L ^F^I^L^E^S ^T^O ^R^E^P^L^A^C^E ^F^I^L^E^S ^S^P^E^C^I^F^I^E^D
                         ^O^N ^T^H^E PROGRAM ^S^T^A^T^E^M^E^N^T ^I^N ^A FORTRAN 5 ^P^R^O^G^R^A^M.

       T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^A^N^D ^I^N^I^T^I^A^T^E^S ^E^X^E^C^U^T^I^O^N ^O^F ^T^H^
       ^P^R^I^M^A^R^Y ^F^I^L^E.

       T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^A^N^D ^I^N^I^T^I^A^T^E^S ^E^X^E^C^U^T^I^O^N ^O^F
       ^T^H^E ^L^O^C^A^L ^F^I^L^E ^L^F^N1 ^I^F ^T^H^E ^S^U^B^S^Y^S^T^E^M ^A^N^D ^T^H^E ^S^O^U^R^C^E ^P^R^O^G^R^A^M ^A^R^E
       ^C^O^M^P^A^T^I^B^L^E.

       T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^A^N^D ^G^E^N^E^R^A^T^E^
       ^A ^B^I^N^A^R^Y ^F^I^L^E, ^L^F^N2, ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^R^E^S^U^L^T^I^N^G ^O^B^J^E^C^T ^C^O^D^E.  T^H^E ^O^B^J^E^C^T
       ^C^O^D^E ^I^S ^N^O^T ^E^X^E^C^U^T^E^D.  F^I^L^E ^L^F^N2 ^C^A^N ^L^A^T^E^R ^B^E ^E^X^E^C^U^T^E^D ^U^N^D^E^R ^T^H^E ^E^X^E^C^U^T^E
       ^S^U^B^S^Y^S^T^E^M ^B^Y ^E^N^T^E^R^I^N^G ^T^H^E RUN ^C^O^M^M^A^N^D.  T^H^E B ^A^N^D C ^P^A^R^A^M^E^T^E^R ^N^A^M^E^S ^A^R^E
       ^I^N^T^E^R^C^H^A^N^G^E^A^B^L^E.

       T^H^E ^F^O^U^R^T^H ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D ^C^O^M^P^I^L^E^S ^L^O^C^A^L ^F^I^L^E ^L^F^N1 ^A^N^D ^G^E^N^E^R^A^T^E^S

       ^B^I^N^A^R^Y ^F^I^L^E, ^L^F^N2, ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^R^E^S^U^L^T^I^N^G ^O^B^J^E^C^T ^C^O^D^E.  T^H^E ^O^B^J^E^C^T ^C^O^D^
       ^I^S ^N^O^T ^E^X^E^C^U^T^E^D.  F^I^L^E ^L^F^N2 ^C^A^N ^L^A^T^E^R ^B^E ^E^X^E^C^U^T^E^D ^U^N^D^E^R ^T^H^E ^E^X^E^C^U^T^E
       ^S^U^B^S^Y^S^T^E^M ^B^Y ^E^N^T^E^R^I^N^G ^T^H^E RUN ^C^O^M^M^A^N^D.  T^H^E B ^A^N^D C ^P^A^R^A^M^E^T^E^R ^N^A^M^E^S ^A^R^E
       ^I^N^T^E^R^C^H^A^N^G^E^A^B^L^E.

       T^H^E ^F^I^F^T^H ^F^O^R^M^A^T ^O^F ^T^H^E ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^W^H^E^N ^R^U^N^N^I^N^G ^A ^P^R^E^V^I^O^U^S^L^Y
       ^C^O^M^P^I^L^E^D (^O^B^J^E^C^T ^C^O^D^E) FORTRAN ^P^R^O^G^R^A^M ^I^N ^T^H^E ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M.  I^T
       ^A^L^L^O^W^S ^Y^O^U ^T^O ^R^E^N^A^M^E ^L^O^C^A^L ^F^I^L^E^S ^S^P^E^C^I^F^I^E^D ^I^N ^T^H^E PROGRAM ^S^T^A^T^E^M^E^N^T
       ^W^I^T^H^O^U^T ^R^E^C^O^M^P^I^L^I^N^G ^T^H^E ^P^R^O^G^R^A^M.  P^A^R^A^M^E^T^E^R^S ^Q1 ^T^H^R^O^U^G^H ^Q^N ^S^P^E^C^I^F^Y ^N^E^W
       ^L^O^C^A^L ^F^I^L^E ^N^A^M^E^S ^T^O ^B^E ^U^S^E^D ^I^N ^P^L^A^C^E ^O^F ^T^H^O^S^E ^T^H^A^T ^C^U^R^R^E^N^T^L^Y ^E^X^I^S^T ^I^N
       ^T^H^E PROGRAM ^S^T^A^T^E^M^E^N^T (^T^H^E ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^A^N^D ^M^U^S^T
       ^C^O^R^R^E^S^P^O^N^D ^T^O ^T^H^O^S^E ^T^H^E^Y ^R^E^P^L^A^C^E).
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SATISFY*I
,LIBFILE[N^A^M^E ^O^F ^S^Y^S^T^E^M ^O^R ^U^S^E^R ^L^I^B^R^A^R^Y ^F^I^L^E]=(*A40,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

       F^O^R^M^A^T@D  SATISFY,^L^I^B^F^I^L^E1,...,^L^I^B^F^I^L^E^N.
                SATISFY.

      T^H^E SATISFY ^C^O^M^M^A^N^D ^S^A^T^I^S^F^I^E^S ^E^X^T^E^R^N^A^L ^R^E^F^E^R^E^N^C^E^S.
.HELP,LIBFILE,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^Y^S^T^E^M ^O^R ^U^S^E^R ^L^I^B^R^A^R^Y ^F^I^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SAVE*I
,LFN[L^O^C^A^L ^F^I^L^E ^N^A^M^E]=(*F,*N=)
,PFN[P^E^R^M^A^N^E^N^T ^F^I^L^E ^N^A^M^E]=(*F,*N=)
/PW[F^I^L^E'^S ^P^A^S^S^W^O^R^D]=(*F,*N=)
,CT[F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y]=(P,PR,PRIVATE,S,SPRIV,
                                         PU,PUBLIC,*N=P)
,M[F^I^L^E ^A^C^C^E^S^S]=(E,EXECUTE,R,READ,RA,READAP,M,MODIFY,W,
         ,RU,READUP,U,UPDATE,WRITE,RM,READMD,A,APPEND,N,NULL,*N=READ)
,SS[S^U^B^S^Y^S^T^E^M]=(BASIC,BAS,BATCH,BAT,EXECUTE,EXE,ACCESS,PASCAL,
                              FORTRAN,FOR,FTNTS,FTN,NULL,NUL,*N=)
,BR[B^A^C^K^U^P ^C^O^P^Y ^S^E^L^E^C^T^I^O^N]=(Y,MD,N,*N=Y)
,PR[P^R^E^F^E^R^R^E^D ^F^I^L^E ^R^E^S^I^D^E^N^C^E]=(D,L,M,N,T,*N=N)
,PN[A^L^T^E^R^N^A^T^E ^D^I^S^K ^P^A^C^K]=(*F,0,*N=)
,R[D^E^V^I^C^E ^T^Y^P^E]=(*S3(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789),*N=)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=$,NA$,N=$,NA$,*K=$,NA$)
,WB[W^A^I^T ^I^F ^F^I^L^E ^B^U^S^Y]=(*K=$,WB$,YES=$,WB$,Y=$,WB$,NO=,N=,*N=)
,AL[S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L]=(LVL0,LVL1,LVL2,LVL3,LVL4,LVL5,LVL6,LVL7,*N=)
,XD[E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^F^O^R ^F^I^L^E ^P^A^S^S^W^O^R^D]=(*S6(1234567890),*N=)
,XT[L^I^F^E ^O^F ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^I^N ^D^A^Y^S]=(*S4(1234567890),$*$,*N=)
,AC[G^R^A^N^T CATLIST ^P^E^R^M^I^S^S^I^O^N]=(YES=Y,Y,NO=N,N,*N=N)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SAVE,^L^F^N=^P^F^N/PW=^P^W,CT=^C^T,M=^M,SS=^S^S,BR=^B^R,PR=^P^R,PN=^P^N,R=^R,NA,WB,
                 AL=^L^E^V^E^L,XD=^E^X^P^I^R^E^D^A^T^E,XT=^E^X^P^I^R^E^T^E^R^M,AC=^A^C.

      T^H^E SAVE ^C^O^M^M^A^N^D ^R^E^T^A^I^N^S ^A ^L^O^C^A^L ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E ^A^S ^A^N ^I^N^D^I^R^E^C^T
      ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.

.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^C^O^P^Y ^O^F ^A ^L^O^C^A^L ^F^I^L^E
      ^L^F^N ^B^E^C^O^M^E^S ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^P^F^N.  E^N^T^E^R ^T^H^E
      ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^H^A^T ^Y^O^U ^W^I^S^H ^T^O ^H^A^V^E ^R^E^T^A^I^N^E^D ^A^S ^A^N
      ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.  (A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M 1- ^T^O
      7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  I^F ^N^O ^L^F^N ^I^S ^S^P^E^C^I^F^I^E^D ^B^U^T ^A ^P^F^N ^I^S, ^T^H^E ^L^F^N ^I^S ^A^S^S^U^M^E^D
                ^T^O ^B^E ^T^H^E ^P^F^N.  I^F ^N^O ^P^F^N ^I^S ^S^P^E^C^I^F^I^E^D ^E^I^T^H^E^R, ^A ^C^O^P^Y
                ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^B^E^C^O^M^E^S ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S
                ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^I^T^H ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
.HELP,PFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^
      ^F^I^L^E ^P^F^N ^R^E^T^A^I^N^E^D ^O^R ^S^A^V^E^D ^B^Y ^T^H^E SAVE ^C^O^M^M^A^N^D.  (A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E ^F^R^O^M
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D  I^F ^P^F^N ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D ^B^U^T ^L^F^N ^I^S, ^T^H^E ^P^F^N ^B^E^C^O^M^E^S ^T^H^E ^L^F^N.
                I^F ^N^E^I^T^H^E^R ^P^F^N ^N^O^R ^L^F^N ^I^S ^S^P^E^C^I^F^I^E^D, ^A ^C^O^P^Y ^O^F ^T^H^E ^P^R^I^M^A^R^Y
                ^F^I^L^E ^B^E^C^O^M^E^S ^A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^I^T^H ^T^H^E
                ^S^A^M^E ^N^A^M^E ^A^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
.HELP,PN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PN=^P^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^C^K ^N^A^M^E ^O^F ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^O^N
      ^W^H^I^C^H ^T^H^E ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^W^I^L^L ^R^E^S^I^D^E.  Y^O^U ^D^O ^N^O^T ^H^A^V^E ^T^O ^S^P^E^C^I^F^Y
      ^A ^P^A^C^K ^N^A^M^E ^F^O^R ^F^I^L^E^S ^O^N ^Y^O^U^R ^D^E^F^A^U^L^T ^P^A^C^K.  Y^O^U ^M^A^Y ^A^L^S^O ^N^E^E^D ^T^O ^U^S^E
      ^T^H^E R ^P^A^R^A^M^E^T^E^R ^T^O ^S^P^E^C^I^F^Y ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^P^A^C^K ^N^A^M


      D^E^F^A^U^L^T@D  F^I^L^E ^W^I^L^L ^R^E^S^I^D^E ^O^N ^T^H^E ^D^E^F^A^U^L^T ^F^A^M^I^L^Y.
.HELP,PW,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PW=^P^W) ^S^P^E^C^I^F^I^E^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^P^A^S^S^W^O^R^D ^T^H^A^T ^O^T^H^E^R
      ^U^S^E^R^S ^M^U^S^T ^S^P^E^C^I^F^Y ^T^O ^A^C^C^E^S^S ^T^H^E ^F^I^L^E.

      D^E^F^A^U^L^T@D  N^O ^P^A^S^S^W^O^R^D.
.HELP,CT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (CT=^C^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y.  P^O^S^S^I^B^L^E
      ^V^A^L^U^E^S ^A^R^E@D

      ^C^T                           D^E^S^C^R^I^P^T^I^O^N
      --                           -----------
      P        P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^O^N^L^Y ^B^Y ^T^H^E^I^R ^C^R^E^A^T^O^R
      PR       ^A^N^D ^B^Y ^T^H^O^S^E ^G^R^A^N^T^E^D ^E^X^P^L^I^C^I^T ^A^C^C^E^S^S ^P^E^R^M^I^S^S^I^O^N ^B^Y ^T^H^E
      PRIVATE  ^F^I^L^E ^C^R^E^A^T^O^R (^U^S^I^N^G ^T^H^E PERMIT ^C^O^M^M^A^N^D).

      S        S^E^M^I^P^R^I^V^A^T^E ^F^I^L^E^S; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A ^U^S^E^R ^W^H^O
      SPRIV    ^K^N^O^W^S ^T^H^E ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E, ^A^N^D ^P^A^S^S^W^O^R^D ^A^N^D ^W^H^O ^H^A^S
               ^N^O^T ^B^E^E^N ^E^X^P^L^I^C^I^T^L^Y ^D^E^N^I^E^D ^P^E^R^M^I^S^S^I^O^N ^T^O ^T^H^E ^F^I^L^E (M=NULL
               ^P^A^R^A^M^E^T^E^R ^O^N ^A PERMIT ^C^O^M^M^A^N^D).

      PU       P^U^B^L^I^C ^F^I^L^E; ^A^V^A^I^L^A^B^L^E ^F^O^R ^A^C^C^E^S^S ^B^Y ^A^L^L ^U^S^E^R^S ^W^H^O ^K^N^O^W ^T^H^E
      PUBLIC   ^F^I^L^E ^N^A^M^E, ^U^S^E^R ^N^A^M^E ^A^N^D ^P^A^S^S^W^O^R^D.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^R^D^S ^T^H^E
               ^N^U^M^B^E^R ^O^F ^T^I^M^E^S ^T^H^E ^F^I^L^E ^W^A^S ^A^C^C^E^S^S^E^D ^A^N^D ^T^H^E ^D^A^T^E ^A^N^D ^T^I^M^E
               ^O^F ^T^H^E ^L^A^S^T ^A^C^C^E^S^S, ^B^U^T ^D^O^E^S ^N^O^T ^R^E^C^O^R^D ^U^S^E^R ^N^A^M^E^S.

      D^E^F^A^U^L^T@D  P
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R=^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^T^Y^P^E ^O^N ^W^H^I^C^H ^T^H^E
      ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^I^S ^T^O ^R^E^S^I^D^E.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      E^N^T^E^R  T^O ^S^P^E^C^I^F^Y ^D^E^V^I^C^E ^T^Y^P^E@D
      -----  -----------------------
      DB^X    885-42 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DC^X    895-1/2 D^I^S^K,          ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DD^X    834 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DF^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DG^X    836 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DH^X    887 D^I^S^K,              ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..2.
      DI^X    844-21 D^I^S^K,           ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DJ^X    844-41 ^O^R 844-44 D^I^S^K, ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DK^X    844-21 D^I^S^K,           ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DL^X    844-41 ^O^R 844-44 D^I^S^K, ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..8.
      DM^X    885-11/12 D^I^S^K,        ^H^A^L^F-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DN     9853 D^I^S^K,             ^F^U^L^L-^T^R^A^C^K.
      DQ^X    885-11/12 D^I^S^K,        ^F^U^L^L-^T^R^A^C^K, ^X ^I^N ^T^H^E ^R^A^N^G^E 1..3.
      DV     819 D^I^S^K,              ^S^I^N^G^L^E ^D^E^N^S^I^T^Y.
      DW     819 D^I^S^K,              ^D^O^U^B^L^E ^D^E^N^S^I^T^Y.

      Y^O^U ^M^U^S^T ^S^E^L^E^C^T ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^F ^Y^O^U ^S^P^E^C^I^F^Y PN (^P^A^C^K ^N^A^M^E),
      ^I^F ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E ^I^S^N'^T ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T, ^A^N^D ^I^F ^T^H^E
      ^P^A^C^K ^I^S ^R^E^M^O^V^A^B^L^E.

      D^E^F^A^U^L^T@D  T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N ^D^E^F^A^U^L^T ^D^E^V^I^C^E ^T^Y^P^E.
.HELP,SS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (SS=^S^S) ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^T^E^R^A^C^T^I^V^E ^S^U^B^S^Y^S^T^E^M ^T^O ^B^E
      ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^F^I^L^E.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ACCESS     ACCESS ^S^U^B^S^Y^S^T^E^M
      BAS        BASIC ^S^U^B^S^Y^S^T^E^M
      BAT        BATCH ^S^U^B^S^Y^S^T^E^M
      EXE        ^E^X^E^C^U^T^E ^S^U^B^S^Y^S^T^E^M
      FOR        FORTRAN 5 ^S^U^B^S^Y^S^T^E^M
      FTN        FORTRAN EXTENDED 4 ^S^U^B^S^Y^S^T^E^M
      NUL        NULL ^S^U^B^S^Y^S^T^E^M
      PASCAL     PASCAL ^S^U^B^S^Y^S^T^E^M

      D^E^F^A^U^L^T@D  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^N^O ^S^U^B^S^Y^S^T^E^M (NULL) ^I^S
                ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^F^I^L^E.  I^F ^T^H^E ^F^I^L^E ^I^S ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E,
                ^H^O^W^E^V^E^R, ^T^H^E ^C^U^R^R^E^N^T^L^Y ^A^C^T^I^V^E ^S^U^B^S^Y^S^T^E^M ^I^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H
                ^T^H^E ^F^I^L^E.
.HELP,BR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (BR=^B^R) ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^F^I^L^E ^Y^O^U ^W^I^S^H ^T^O ^S^A^V^E ^W^I^L^L ^B^E
      ^B^A^C^K^E^D ^U^P, ^A^N^D ^I^F ^S^O, ^T^H^E ^K^I^N^D ^O^F ^S^T^O^R^A^G^E ^D^E^V^I^C^E ^I^T ^W^I^L^L ^B^E ^B^A^C^K^E^D ^U^P ^O^N.
      E^N^T^E^R Y ^F^O^R ^T^A^P^E ^B^A^C^K^U^P, MD ^F^O^R ^T^A^P^E ^O^R ^A ^S^U^P^P^L^E^M^E^N^T^A^L ^S^T^O^R^A^G^E ^M^E^D^I^U^M ^S^U^C^H
      ^A^S M^A^S^S S^T^O^R^A^G^E E^X^T^E^N^D^E^D, ^O^R N ^F^O^R ^N^O ^B^A^C^K^U^P.

      D^E^F^A^U^L^T@D  T^A^P^E ^B^A^C^K^U^P.
.HELP,PR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (PR=^P^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^E^F^E^R^R^E^D ^F^I^L^E ^R^E^S^I^D^E^N^C^E; ^P^O^S^S^I^B^L^E
      ^V^A^L^U^E^S ^A^R^E@D

      ^P^R          D^E^S^C^R^I^P^T^I^O^N
      --          -----------
      D     D^I^S^K ^R^E^S^I^D^E^N^C^E ^P^R^E^F^E^R^R^E^D.
      L     L^O^C^K^E^D ^T^O ^D^I^S^K.
      M     A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^R^E^S^I^D^E^N^C^E ^P^R^E^F^E^R^R^E^D.
      N     N^O ^P^R^E^F^E^R^E^N^C^E.
      T     T^A^P^E ^A^L^T^E^R^N^A^T^E ^S^T^O^R^A^G^E ^R^E^S^I^D^E^N^C^E ^P^R^E^F^E^R^R^E^D.

      D^E^F^A^U^L^T@D  I^F PR=^P^R ^I^S ^O^M^I^T^T^E^D, PR=N ^I^S ^A^S^S^U^M^E^D.  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R
                ^I^S ^O^M^I^T^T^E^D.
.HELP,M,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (M=^M) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^L^E ^A^C^C^E^S^S ^M^O^D^E ^P^E^R^M^I^T^T^E^D ^T^O ^O^T^H^E^R
      ^U^S^E^R^S ^I^F ^T^H^E ^F^I^L^E ^I^S ^P^U^B^L^I^C ^O^R ^S^E^M^I^P^R^I^V^A^T^E.  V^A^L^U^E^S ^A^R^E@D

      I^F ^M ^I^S@D         O^T^H^E^R ^U^S^E^R^S ^C^A^N@D
      --------         ----------------

      R ^O^R READ        R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E.  T^H^I^S ^C^O^P^Y ^C^A^N ^B^E
      RU ^O^R READUP     ^R^E^A^D ^O^R ^E^X^E^C^U^T^E^D.
      RA ^O^R READAP
      RM ^O^R READMD
      U ^O^R UPDATE

      E ^O^R EXECUTE     R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E.  T^H^I^S ^C^O^P^Y ^C^A^N ^O^N^L^Y
                       ^B^E ^E^X^E^C^U^T^E^D.

      A ^O^R APPEND      A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E ^F^I^L^E ^W^I^T^H ^T^H^E APPEND ^C^O^M^M^A^N^D.

      M ^O^R MODIFY      R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E ^O^R ^A^P^P^E^N^D ^D^A^T^A ^T^O ^T^H^E
                       ^F^I^L^E.  T^H^E ^U^S^E^R ^C^A^N ^E^N^T^E^R GET, OLD, NEW, ^A^N^D APPEND
                       ^C^O^M^M^A^N^D^S, ^B^U^T ^N^O^T ^A REPLACE ^C^O^M^M^A^N^D ^F^O^R ^T^H^E ^F^I^L^E.

      W ^O^R WRITE       R^E^T^R^I^E^V^E ^A ^C^O^P^Y ^O^F ^T^H^E ^F^I^L^E, ^A^P^P^E^N^D ^D^A^T^A ^T^O ^I^T,
                       ^R^E^P^L^A^C^E ^I^T ^O^R ^P^U^R^G^E ^I^T.
      N ^O^R NULL        N^O ^A^C^C^E^S^S ^I^S ^A^L^L^O^W^E^D.

      D^E^F^A^U^L^T@D  R
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NA) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^E^R^R^O^R^S ^I^N SAVE ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E
      ^J^O^B ^W^H^E^N NA ^I^S ^S^P^E^C^I^F^I^E^D.  W^H^E^N ^S^P^E^C^I^F^Y^I^N^G NA, ^E^R^R^O^R^S ^A^R^E ^H^A^N^D^L^E^D ^I^N ^O^N^E
      ^O^F ^T^W^O ^W^A^Y^S@D  F^I^R^S^T, ^A ^T^E^M^P^O^R^A^R^Y ^E^R^R^O^R, ^S^U^C^H ^A^S ^T^H^E ^R^E^Q^U^E^S^T^E^D ^F^I^L^E ^I^S
      ^B^U^S^Y (^S^O^M^E^O^N^E ^E^L^S^E ^I^S ^U^S^I^N^G ^I^T) ^O^R ^A ^R^E^Q^U^E^S^T^E^D ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^I^S ^N^O^T
      ^A^V^A^I^L^A^B^L^E (^N^O^T ^M^O^U^N^T^E^D), ^R^E^S^U^L^T^I^N^G ^I^N ^T^H^E ^J^O^B ^B^E^I^N^G ^S^U^S^P^E^N^D^E^D ^U^N^T^I^L ^T^H^E
      ^F^I^L^E ^B^E^C^O^M^E^S ^A^V^A^I^L^A^B^L^E; S^E^C^O^N^D, ^A^S ^A ^P^E^R^M^A^N^E^N^T ^E^R^R^O^R (^F^O^R ^E^X^A^M^P^L^E,
      ^T^H^E ^F^I^L^E ^C^A^N^N^O^T ^B^E ^F^O^U^N^D), ^T^H^E ^J^O^B ^S^I^M^P^L^Y ^C^O^N^T^I^N^U^E^S.  Y^O^U ^C^A^N^N^O^T
      ^S^P^E^C^I^F^Y ^B^O^T^H NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).

      E^N^T^E^R NA ^F^O^R ^N^O ^A^B^O^R^T; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.

      D^E^F^A^U^L^T@D  E^R^R^O^R^S ^I^N SAVE ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (WB) ^A^L^L^O^W^S ^A ^J^O^B ^T^O ^W^A^I^T ^F^O^R ^A ^B^U^S^Y ^F^I^L^E ^O^R ^R^E^M^O^V^A^B^L^E
      ^P^A^C^K ^M^O^U^N^T ^B^U^T ^W^I^L^L ^A^B^O^R^T ^O^N ^O^T^H^E^R ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N^S.  E^N^T^E^R WB ^F^O^R
      ^W^A^I^T-^I^F-^B^U^S^Y; ^O^T^H^E^R^W^I^S^E ^O^M^I^T.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA (^N^O
      ^A^B^O^R^T).

      D^E^F^A^U^L^T@D  I^F WB ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D, ^Y^O^U^R ^J^O^B ^W^I^L^L ^A^B^O^R^T ^I^F ^T^H^E ^F^I^L^E
                ^Y^O^U ^R^E^Q^U^E^S^T^E^D ^I^S ^U^N^A^V^A^I^L^A^B^L^E.
.HELP,AL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (AL) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U ^W^A^N^T ^A^S^S^I^G^N^E^
      ^T^O ^T^H^E ^F^I^L^E.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E ^O^F ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D

               LVL0, LVL1, LVL2, LVL3, LVL4, LVL5 LVL6, ^O^R LVL7

      D^E^F^A^U^L^T@D  T^H^E ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^B^E^I^N^G ^S^A^V^E^D.  I^N HELPME,
                ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,XD,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XD) ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^X^P^I^R^A^T^I^O^N ^D^A^T^E ^F^O^R ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D.
      T^H^E ^V^A^L^U^E ^E^X^P^I^R^E^D^A^T^E ^M^U^S^T ^B^E ^A ^S^I^X-^D^I^G^I^T ^S^T^R^I^N^G ^O^F ^T^H^E ^F^O^R^M ^Y^Y^M^M^D^D;
      ^W^H^E^R^E ^Y^Y, ^M^M, ^A^N^D ^D^D ^A^R^E ^A ^T^W^O-^D^I^G^I^T ^Y^E^A^R, ^M^O^N^T^H, ^A^N^D ^D^A^Y ^D^E^S^I^G^N^A^T^O^R^S,
      ^R^E^S^P^E^C^T^I^V^E^L^Y.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^I^F ^Y^O^U ^A^L^S^O ^S^P^E^C^I^F^Y
      ^T^H^E PW=^P^A^S^S^W^O^R^D ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,XT,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (XT) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^F^E ^O^F ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^I^N ^D^A^Y^S.  I^F
      ^Y^O^U ^S^P^E^C^I^F^Y 0, ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^E^X^P^I^R^E^S ^I^M^M^E^D^I^A^T^E^L^Y.  I^F ^Y^O^U ^S^P^E^C^I^F^Y 4095
      ^O^R *, ^T^H^E ^F^I^L^E ^P^A^S^S^W^O^R^D ^D^O^E^S ^N^O^T ^E^X^P^I^R^E.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^O^N^L^Y ^I^F ^Y^O^U ^A^L^S^O ^S^P^E^C^I^F^Y ^T^H^E PW=^P^A^S^S^W^O^R^D ^P^A^R^A^M^E^T^E^R.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.HELP,AC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (AC=^A^C) ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^A^L^T^E^R^N^A^T^E ^U^S^E^R^S ^M^A^Y ^O^B^T^A^I^N
      ^I^N^F^O^R^M^A^T^I^O^N ^A^B^O^U^T ^T^H^E ^F^I^L^E ^U^S^I^N^G CATLIST.  V^A^L^U^E^S ^A^R^E Y (^Y^E^S)
      ^A^N^D N (^N^O).

      D^E^F^A^U^L^T@D  N
.ENDHELP
.IF($PFN$.EQ.$$.AND.$LFN$.EQ.$$,L1)
   .EX.  $SAVE.
.ELSE(L1)
   .IF($PFN$.EQ.$$,L2)
    .EX. $SAVE(LFN/#PW=PW,#CT=CT,#M=M,#SS=SS,#PN=PN,#R=R,#BR=BR_NA_WB,#AC=AC)
   .ELSE(L2)
    .IF($LFN$.EQ.$$,L3)
     .EX. $SAVE(PFN/#PW=PW,#CT=CT,#M=M,#SS=SS,#PN=PN,#R=R,#BR=BR_NA_WB,#AC=AC)
    .ELSE(L3)
.EX.  $SAVE(LFN=PFN/#PW=PW,#CT=CT,#M=M,#SS=SS,#PN=PN,#R=R,#BR=BR_NA_WB,#AC=AC)
    .ENDIF(L3)
   .ENDIF(L2)
.ENDIF(L1)
*WEOR
.PROC,SCOPY*I
,FROM[F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D ^F^R^O^M]=(*F)
,TO[F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D ^T^O]=(*F,*N=OUTPUT)
,N[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y]=(*S5(0123456789),*N=1)
,FCHAR[F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N]=(*S3(0123456789),*N=1)
,LCHAR[L^A^S^T  ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N]=(*S3(0123456789),*N=500)
,NA[D^O ^Y^O^U ^W^A^N^T ^T^O ^A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(YES=,Y=,*N=,NO=NA,N=NA,*K=NA)
,R[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=R,Y=R,*K=R,NO=,N=,*N=)
,FCS [C^H^A^R^A^C^T^E^R ^S^E^T]=(DIS,DIS63,DIS64,*N=DIS)
,FLINE[F^I^R^S^T ^L^I^N^E ^T^O ^C^O^P^Y]=(*S6(0123456789),*N=)
,LLINE[L^A^S^T ^L^I^N^E ^T^O ^C^O^P^Y]=(*S6(0123456789),*N=)
,NS[L^I^S^T EOR^S ^A^N^D EOF^S ^I^N ^L^F^N2]=(YES=,Y=,NO=NS,N=NS,NS,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SCOPY,^L^F^N1,^L^F^N2,^N,^F^C^H^A^R,^L^C^H^A^R,^N^A,R,^F^C^S,^F^L^I^N^E,^L^L^I^N^E,^N^S.

      T^H^E SCOPY ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^C^O^D^E^D ^F^I^L^E^S ^F^R^O^M ^O^N^E ^F^I^L^E
      ^T^O ^A^N^O^T^H^E^R ^F^I^L^E ^A^N^D, ^U^N^L^E^S^S ^E^X^P^L^I^C^I^T^L^Y ^P^R^O^H^I^B^I^T^E^D, ^I^N^D^I^C^A^T^E^S ^T^H^E
      ^S^T^R^U^C^T^U^R^E ^O^F ^T^H^E ^F^I^L^E ^B^E^I^N^G ^C^O^P^I^E^D ^B^Y ^D^I^S^P^L^A^Y^I^N^G ^T^H^E EOR^S ^A^N^D EOF^S
      ^I^N ^T^H^E ^R^E^C^E^I^V^I^N^G ^F^I^L^E.
.HELP,FROM,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^C^O^P^I^E^D.  A ^F^I^L^E
      ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,TO,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^C^O^P^Y
      ^O^F ^L^F^N1.

      D^E^F^A^U^L^T@D  F^I^L^E ^N^A^M^E OUTPUT
.HELP,N,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S (^D^E^C^I^M^A^L) ^T^O ^C^O^P^Y.

      D^E^F^A^U^L^T@D  1
.HELP,FCHAR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^F^C^H^A^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N (1 ^T^O 500
      ^F^O^R 6-^B^I^T ^C^H^A^R^A^C^T^E^R^S) ^O^F ^E^A^C^H ^L^I^N^E ^T^O ^C^O^P^Y.

      D^E^F^A^U^L^T@D  C^O^P^Y ^B^E^G^I^N^S ^A^T ^P^O^S^I^T^I^O^N 1.
.HELP,LCHAR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^C^H^A^R) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N (1 ^T^O 500 ^F^O^R
      6-^B^I^T ^C^H^A^R^A^C^T^E^R^S) ^O^F ^E^A^C^H ^L^I^N^E ^T^O ^C^O^P^Y (^M^U^S^T ^B^E ^G^R^E^A^T^E^R ^T^H^A^N ^O^R ^E^Q^U^A^L ^T^O
      ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^P^O^S^I^T^I^O^N ^Y^O^U ^S^P^E^C^I^F^I^E^D ^F^O^R ^F^C^H^A^R).

      D^E^F^A^U^L^T@D  P^O^S^I^T^I^O^N 500
.HELP,NA,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^N^A) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^J^O^B ^S^T^E^P ^S^H^O^U^L^D ^N^O^T ^A^B^O^R^T
      ^W^H^E^N ^A ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^D^O^E^S ^N^O^T ^A^P^P^E^A^R ^B^E^F^O^R^E ^A^N EOR.  T^O ^S^P^E^C^I^F^Y
      ^N^O ^A^B^O^R^T, ^E^N^T^E^R ^A^N^Y ^S^T^R^I^N^G ^O^F 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S;
      ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  J^O^B ^S^T^E^P ^A^B^O^R^T^S ^W^H^E^N ^A ^L^I^N^E ^T^E^R^M^I^N^A^T^O^R ^D^O^E^S ^N^O^T ^A^P^P^E^A^R
                ^B^E^F^O^R^E ^A^N EOR.
.HELP,R,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (R) ^R^E^W^I^N^D^S ^B^O^T^H ^L^F^N1 ^A^N^D ^L^F^N2 ^B^E^F^O^R^E ^T^H^E^Y ^A^R^E
      ^C^O^P^I^E^D.  T^O ^S^P^E^C^I^F^Y ^R^E^W^I^N^D, ^E^N^T^E^R R; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  T^H^E ^F^I^L^E^S ^A^R^E ^N^O^T ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^C^O^P^Y^I^N^G.
.HELP,FCS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^F^C^S) ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^C^O^D^E ^O^F ^F^I^L^E ^L^F^N1.
      Y^O^U ^M^A^Y ^E^N^T^E^R DIS, DIS63, ^O^R DIS64.

      D^E^F^A^U^L^T@D  DIS
.HELP,FLINE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^F^L^I^N^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E ^N^U^M^B^E^R ^O^F ^T^H^E ^F^I^R^S^T ^L^I^N^E ^Y^O^U
      ^W^A^N^T ^T^O ^C^O^P^Y ^F^R^O^M ^L^F^N1 ^I^F ^L^F^N1 ^I^S ^A ^S^E^Q^U^E^N^C^E^D ^F^I^L^E.

      D^E^F^A^U^L^T@D  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^I^F ^L^F^N1 ^I^S
                ^N^O^T ^A ^S^E^Q^U^E^N^C^E^D ^F^I^L^E (^N^O ^L^I^N^E ^N^U^M^B^E^R^S), ^T^H^E ^C^O^P^Y^I^N^G
                ^B^E^G^I^N^S ^W^I^T^H ^T^H^E ^F^I^R^S^T ^L^I^N^E ^O^F ^L^F^N1.
.HELP,LLINE,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^L^I^N^E) ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^N^E ^N^U^M^B^E^R ^O^F ^T^H^E ^L^A^S^T ^L^I^N^E ^Y^O^U ^W^A^

      ^T^O ^C^O^P^Y ^F^R^O^M ^L^F^N1 ^I^F ^L^F^N1 ^I^S ^A ^S^E^Q^U^E^N^C^E^D ^F^I^L^E.

      D^E^F^A^U^L^T@D  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^I^F ^L^F^N1 ^I^S
                ^N^O^T ^A ^S^E^Q^U^E^N^C^E^D ^F^I^L^E (^N^O ^L^I^N^E ^N^U^M^B^E^R^S), ^T^H^E ^C^O^P^Y^I^N^G
                ^I^S ^C^O^N^T^R^O^L^L^E^D ^B^Y ^T^H^E N ^P^A^R^A^M^E^T^E^R (^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^P^Y).
.HELP,NS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^N^S) ^S^P^E^C^I^F^I^E^S ^N^O ^S^T^R^U^C^T^U^R^E ^R^E^P^O^R^T^I^N^G ^O^N ^F^I^L^E ^L^F^N2
      (^T^H^E EOR^S ^A^N^D EOF^S ^I^N ^F^I^L^E ^L^F^N2 ^A^R^E ^N^O^T ^D^I^S^P^L^A^Y^E^D). T^O ^S^P^E^C^I^F^Y
      ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^F^R^O^M HELPME, ^E^N^T^E^R NS (^E^N^T^E^R ^A^N^Y ^N^O^N^N^U^L^L ^V^A^L^U^E ^F^R^O^M
      ^C^O^M^M^A^N^D ^M^O^D^E ^O^U^T^S^I^D^E ^O^F HELPME).

      D^E^F^A^U^L^T@D  N^U^L^L (^T^H^E EOR^S ^A^N^D EOF^S ^I^N ^L^F^N2 ^A^R^E ^D^I^S^P^L^A^Y^E^D).
.ENDHELP
.EX.  $SCOPY(FROM,TO,N,FCHAR,LCHAR,NA,R,FCS,FLINE,LLINE,NS)
*WEOR
.PROC,SCREEN*I
,TM[T^E^R^M^I^N^A^L M^O^D^E^L]=(721,721V3,722,72230,3270,VT100,Z19,ADM3A,ADM5,T4115,
                 721T,721V3T,722T,72230T,VT100T,Z19T,ADM3AT,ADM5T,T4115T,
                 TV924,TV924T,TV950,TV950T,TV955,TV955T,
                 *S6(0123456789PCON),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SCREEN,TM=^M^O^D^E^L.
               SCREEN,^M^O^D^E^L.

      T^H^E SCREEN ^C^O^M^M^A^N^D ^S^E^T^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^N ^S^C^R^E^E^N ^M^O^D^E (^A^S ^O^P^P^O^S^E^D ^T^O
      ^L^I^N^E ^O^R ^S^C^R^O^L^L^I^N^G ^M^O^D^E).  I^T ^A^L^S^O ^I^D^E^N^T^I^F^I^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^M^O^D^E^L
      ^T^O ^T^H^E ^S^Y^S^T^E^M.  U^S^I^N^G ^T^H^I^S ^C^O^M^M^A^N^D ^D^O^U^B^L^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^T^I^M^E^O^U^T
      ^P^E^R^I^O^D.
.HELP,TM,NOLIST
      E^N^T^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L.  F^O^R ^M^O^S^T ^O^F ^T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L^S ^L^I^S^T^E^D
      ^B^E^L^O^W, ^A ^T^Y^P^E-^A^H^E^A^D ^V^E^R^S^I^O^N ^I^S ^A^V^A^I^L^A^B^L^E.  T^Y^P^E-^A^H^E^A^D ^A^L^L^O^W^S ^Y^O^U
      ^T^O ^S^T^R^I^K^E ^F^U^N^C^T^I^O^N ^K^E^Y^S ^R^A^P^I^D^L^Y, ^W^I^T^H^O^U^T ^H^A^V^I^N^G ^T^O ^W^A^I^T ^F^O^R ^T^H^E ^F^I^R^S^T
      ^F^U^N^C^T^I^O^N ^K^E^Y ^T^O ^B^E ^E^X^E^C^U^T^E^D ^B^E^F^O^R^E ^P^R^E^S^S^I^N^G ^A^N^O^T^H^E^R ^F^U^N^C^T^I^O^N ^K^E^Y.
      Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^T^H^E ^M^O^D^E^L ^O^R ^T^H^E ^M^O^D^E^L ^W^I^T^H ^T^Y^P^E-^A^H^E^A^D.

                M^O^D^E^L ^W^I^T^H
      M^O^D^E^L     T^Y^P^E-^A^H^E^A^D          D^E^S^C^R^I^P^T^I^O^N
      -----     ----------          -----------

      ADM3A     ADM3AT              L^E^A^R S^I^E^G^L^E^R ADM3A ^T^E^R^M^I^N^A^L.
      ADM5      ADM5T               L^E^A^R S^I^E^G^L^E^R ADM5 ^T^E^R^M^I^N^A^L.
      PCON^X^X    ^N^O^N^E                IBM PC ^W^I^T^H CDC CONNECT (^F^O^R ^X^X, ^E^N^T^E^R
                                    ^Y^O^U^R ^C^U^R^R^E^N^T ^R^E^L^E^A^S^E ^L^E^V^E^L ^O^F CDC CONNECT).
      T4115     T4115T              T^E^K^T^R^O^N^I^X 4115 ^T^E^R^M^I^N^A^L.
      VT100     VT100T              DEC VT100 ^T^E^R^M^I^N^A^L.
      Z19       Z19T                Z^E^N^I^T^H Z19 ^O^R Z29 ^T^E^R^M^I^N^A^L.
      3270      ^N^O^N^E                IBM 3270 ^T^E^R^M^I^N^A^L.
      721       721T                CDC 721 ^T^E^R^M^I^N^A^L.
      721V3     721V3T              CDC 721 ^T^E^R^M^I^N^A^L V^E^R^S^I^O^N 3.
      722       722T                CDC 722 ^T^E^R^M^I^N^A^L.
      72230     72230T              CDC 722-30 ^T^E^R^M^I^N^A^L.
      TV924     TV924T              T^E^L^E^V^I^D^E^O 924 ^T^E^R^M^I^N^A^L.
      TV950     TV950T              T^E^L^E^V^I^D^E^O 950 ^T^E^R^M^I^N^A^L.
      TV955     TV955T              T^E^L^E^V^I^D^E^O 955 ^T^E^R^M^I^N^A^L.

      D^E^F^A^U^L^T@D T^H^E ^T^E^R^M^I^N^A^L ^M^O^D^E^L ^I^S ^L^E^F^T ^U^N^C^H^A^N^G^E^D.
.ENDHELP
.IF($TM$.EQ.$$,L1)
.EX.  $SCREEN.
.ELSE(L1)
.EX.  $SCREEN,TM.
.ENDIF(L1)
*WEOR
.PROC,SECHDR*I
,LFN[E^N^T^E^R ^N^A^M^E ^O^F ^F^I^L^E]=(*F)
,FF[I^S ^F^I^L^E ^F^O^R^M^A^T^T^E^D ^F^O^R ^P^R^I^N^T^I^N^G]=(YES=$,FF$,Y=$,FF$,*K=$,FF$,NO=,N=,*N=)
,OP[E^N^T^E^R ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^O^P^T^I^O^N]=(*S4(BFRP),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D SECHDR,^L^F^N,FF,OP=^P1^P2^P3^P4.

      T^H^E SECHDR ^C^O^M^M^A^N^D ^A^D^D^S ^S^E^C^U^R^I^T^Y-^R^E^L^A^T^E^D ^I^N^F^O^R^M^A^T^I^O^N ^T^O ^A ^F^I^L^E.  Y^O^U
      ^C^A^N ^C^H^O^O^S^E ^T^O ^H^A^V^E ^T^H^I^S ^I^N^F^O^R^M^A^T^I^O^N ^P^L^A^C^E^D ^O^N ^B^A^N^N^E^R ^P^A^G^E^S ^T^H^R^O^U^G^H^O^U^T
      ^T^H^E ^F^I^L^E, ^P^L^A^C^E^D ^A^T ^T^H^E ^T^O^P ^A^N^D ^B^O^T^T^O^M ^O^F ^E^A^C^H ^P^A^G^E, ^O^R ^B^O^T^H.
.HELP,LFN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E (^L^F^N) ^Y^O^U ^W^I^S^H ^T^O ^A^D^D
      ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^T^O.  T^H^E ^F^I^L^E ^M^U^S^T ^B^E ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B (^L^O^C^A^L).

      D^E^F^A^U^L^T@D  T^H^E^R^E ^I^S ^N^O ^D^E^F^A^U^L^T; ^Y^O^U ^M^U^S^T ^E^N^T^E^R ^A ^F^I^L^E ^N^A^M^E.
.HELP,FF,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FF) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E ^F^I^L^E ^H^A^S ^A^L^R^E^A^D^Y ^B^E^E^N ^F^O^R^M^A^T^T^E^D
      ^F^O^R ^P^R^I^N^T^I^N^G; ^T^H^A^T ^I^S, ^C^A^R^R^I^A^G^E ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R^S (^S^U^C^H ^A^S ^T^H^O^S^E
      ^C^O^N^T^R^O^L^L^I^N^G ^P^A^G^E ^E^J^E^C^T^S ^A^N^D ^P^A^G^E ^D^E^N^S^I^T^Y) ^H^A^V^E ^A^L^R^E^A^D^Y ^B^E^E^N ^I^N^S^E^R^T^E^D.
      E^N^T^E^R FF ^T^O ^S^E^L^E^C^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R; ^O^T^H^E^R^W^I^S^E, ^O^M^I^T.

      D^E^F^A^U^L^T@D  N^O^N^E; ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^P^T^I^O^N^A^L.
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (OP=^P1^P2^P3^P4) ^S^P^E^C^I^F^I^E^S ^W^H^E^R^E ^T^H^E ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^W^I^L^L
      ^B^E ^I^N^S^E^R^T^E^D ^I^N ^T^H^E ^F^I^L^E.  Y^O^U ^C^A^N ^E^N^T^E^R ^A^N^Y ^C^O^M^B^I^N^A^T^I^O^N ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G
      ^C^H^O^I^C^E^S (^F^O^R ^I^N^S^T^A^N^C^E, BRP)@D

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y
      -----      ----------

      B          P^R^I^N^T ^T^H^E ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^T^W^O ^B^A^N^N^E^R ^P^A^G^E^S@D
                 ^O^N^E ^A^T ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^F^I^L^E ^A^N^D ^O^N^E ^A^T ^T^H^E ^E^N^D ^O^F ^F^I^L^E.

      F          P^R^I^N^T ^T^H^E ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^A ^B^A^N^N^E^R ^P^A^G^E ^A^T
                 ^B^E^G^I^N^N^I^N^G ^A^N^D ^E^N^D ^O^F ^E^V^E^R^Y ^L^O^G^I^C^A^L ^F^I^L^E ^W^I^T^H^I^N ^F^I^L^E ^L^F^N.

      R          P^R^I^N^T ^T^H^E ^S^E^C^U^R^I^T^Y ^I^N^F^O^R^M^A^T^I^O^N ^O^N ^A ^B^A^N^N^E^R ^P^A^G^E ^A^T ^T^H^E
                 ^B^E^G^I^N^N^I^N^G ^A^N^D ^E^N^D ^O^F ^E^V^E^R^Y ^L^O^G^I^C^A^L ^R^E^C^O^R^D ^I^N ^F^I^L^E ^L^F^N.

      P          P^R^I^N^T ^T^H^E ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^F^I^L^E ^A^T ^T^H^E ^T^O^P ^A^N^D ^B^O^T^T^O^M
                 ^O^F ^E^V^E^R^Y ^P^A^G^E ^O^F ^O^U^T^P^U^T.

      D^E^F^A^U^L^T@D  B.
.ENDHELP
.IF($OP$.EQ.$$,L1)
  .EX. $SECHDR,LFN_FF.
.ELSE(L1)
  .EX.  $SECHDR,LFN_FF,#OP=OP.
.ENDIF(L1)
$REVERT(NOLIST)
*WEOR
.PROC,SEGLOAD*I
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SEGLOAD.

      T^H^E SEGLOAD ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^S^E^G^M^E^N^T^A^T^I^O^N ^I^S ^T^O ^T^A^K^E ^P^L^A^C^E
      ^D^U^R^I^N^G ^L^O^A^D^I^N^G.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SET*I
,SYM[S^Y^M^B^O^L^I^C N^A^M^E^S]=(*A1,*N)
,EXP[V^A^L^I^D E^X^P^R^E^S^S^I^O^N^S]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

     F^O^R^M^A^T@D SET,^S^Y^M^B^O^L1=^E^X^P^R^E^S^S^I^O^N1,^S^Y^M^B^O^L2=^E^X^P^R^E^S^S^I^O^N2,...,^S^Y^M^B^O^L^N=^E^X^P^R^E^S^S^I^O^N^N

     T^H^E SET ^C^O^M^M^A^N^D ^A^S^S^I^G^N^S ^A ^V^A^L^U^E ^T^O ^A ^C^O^N^T^R^O^L ^R^E^G^I^S^T^E^R, ^A^N ^E^R^R^O^R ^F^L^A^G, ^O^R
     ^T^H^E ^F^L^A^G ^T^H^A^T ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^S^K^I^P^P^E^D ^C^O^M^M^A^N^D^S ^A^R^E ^E^N^T^E^R^E^D ^I^N ^T^H^E
     ^D^A^Y^F^I^L^E.  U^S^I^N^G ^T^H^E SS ^S^Y^M^B^O^L^I^C ^N^A^M^E, ^I^T ^A^L^S^O ^C^A^N ^C^H^A^N^G^E ^T^H^E ^C^U^R^R^E^N^T
     ^I^N^T^E^R^A^C^T^I^V^E ^S^U^B^S^Y^S^T^E^M.
.HELP,SYM,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^Y^M^B^O^L^I ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^Y^M^B^O^L^I^C ^N^A^M^E^S
      (^I^N^I^T^I^A^L^L^Y ^T^H^E^S^E ^N^A^M^E^S ^A^R^E ^S^E^T ^T^O 0, ^E^X^C^E^P^T ^F^O^R SS).

      N^A^M^E                         D^E^S^C^R^I^P^T^I^O^N
      ----                         -----------
      R1, R2, ^O^R R3    L^O^C^A^L ^C^O^N^T^R^O^L ^R^E^G^I^S^T^E^R^S.  W^H^E^N ^A ^P^R^O^C^E^D^U^R^E ^I^S
                       ^C^A^L^L^E^D, ^T^H^E ^C^U^R^R^E^N^T ^V^A^L^U^E^S ^O^F R1, R2, ^A^N^D R3 ^A^R^E
                       ^P^A^S^S^E^D ^T^O ^T^H^E ^P^R^O^C^E^D^U^R^E.  T^H^E ^V^A^L^U^E^S ^O^F ^T^H^E^S^E
                       ^R^E^G^I^S^T^E^R^S ^M^A^Y ^C^H^A^N^G^E ^W^I^T^H^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E.
                       H^O^W^E^V^E^R, ^W^H^E^N ^P^R^O^C^E^S^S^I^N^G ^R^E^V^E^R^T^S, ^T^H^E^S^E ^R^E^G^I^S^T^E^R^S
                       ^A^R^E ^R^E^S^T^O^R^E^D ^T^O ^T^H^E ^V^A^L^U^E^S ^T^H^E^Y ^H^A^D ^W^H^E^N ^T^H^E
                       ^P^R^O^C^E^D^U^R^E ^W^A^S ^C^A^L^L^E^D.

      R1G              G^L^O^B^A^L ^C^O^N^T^R^O^L ^R^E^G^I^S^T^E^R.  W^H^E^N ^A ^P^R^O^C^E^D^U^R^E ^I^S
                       ^C^A^L^L^E^D ^O^R ^R^E^V^E^R^T^S, R1G ^K^E^E^P^S ^I^T^S ^C^U^R^R^E^N^T ^V^A^L^U^E.

      EF               L^O^C^A^L ^E^R^R^O^R ^F^L^A^G.  W^H^E^N ^A ^P^R^O^C^E^D^U^R^E ^I^S ^C^A^L^L^E^D, ^T^H^E
                       ^C^U^R^R^E^N^T ^V^A^L^U^E ^O^F ^T^H^E ^E^R^R^O^R ^F^L^A^G ^I^S ^P^A^S^S^E^D ^T^O ^T^H^E
                       ^P^R^O^C^E^D^U^R^E.  T^H^E ^V^A^L^U^E ^O^F ^T^H^E ^E^R^R^O^R ^F^L^A^G ^M^A^Y ^C^H^A^N^G^E
                       ^W^I^T^H^I^N ^T^H^E ^P^R^O^C^E^D^U^R^E.  H^O^W^E^V^E^R, ^W^H^E^N ^P^R^O^C^E^S^S^I^N^G
                       ^R^E^V^E^R^T^S, ^T^H^E ^E^R^R^O^R ^F^L^A^G ^I^S ^R^E^S^T^O^R^E^D ^T^O ^T^H^E ^V^A^L^U^E
                       ^I^T ^H^A^D ^W^H^E^N ^T^H^E ^P^R^O^C^E^D^U^R^E ^W^A^S ^C^A^L^L^E^D.

      EFG              G^L^O^B^A^L ^E^R^R^O^R ^F^L^A^G.  W^H^E^N ^A ^P^R^O^C^E^D^U^R^E ^I^S ^C^A^L^L^E^D ^O^R
                       ^R^E^V^E^R^T^S, EFG ^K^E^E^P^S ^I^T^S ^C^U^R^R^E^N^T ^V^A^L^U^E ^I^F ^I^T ^I^S ^N^O^T
                       ^Z^E^R^O.  I^F EFG ^H^A^S ^A ^V^A^L^U^E ^O^F ^Z^E^R^O ^W^H^E^N ^T^H^E
                       ^P^R^O^C^E^D^U^R^E ^R^E^V^E^R^T^S, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S EFG ^E^Q^U^A^L ^T^O
                       EF.

      DSC              D^A^Y^F^I^L^E-^S^K^I^P^P^E^D-^C^O^M^M^A^N^D ^F^L^A^G.  I^N^I^T^I^A^L^L^Y, ^I^T ^I^S
                       ^S^E^T ^T^O 0, ^S^O ^T^H^A^T ^C^O^M^M^A^N^D^S ^T^H^A^T ^A^R^E ^S^K^I^P^P^E^D (^N^O^T
                       ^P^R^O^C^E^S^S^E^D) ^A^R^E ^N^O^T ^E^N^T^E^R^E^D ^I^N ^T^H^E ^D^A^Y^F^I^L^E.  I^F
                       DSC ^I^S 1, ^T^H^E ^S^Y^S^T^E^M ^E^N^T^E^R^S ^S^K^I^P^P^E^D ^C^O^M^M^A^N^D^S ^I^N
                       ^T^H^E ^D^A^Y^F^I^L^E ^W^I^T^H ^T^W^O ^L^E^A^D^I^N^G ^P^E^R^I^O^D^S.

      PL ^O^R PS         P^A^G^E ^L^E^N^G^T^H (^O^R ^P^A^G^E ^S^I^Z^E).  D^E^F^A^U^L^T ^I^S 60 ^L^I^N^E^S.

      PW               P^A^G^E ^W^I^D^T^H.  D^E^F^A^U^L^T ^I^S 136 ^C^H^A^R^A^C^T^E^R^S.

      PD               P^A^G^E ^D^E^N^S^I^T^Y.  D^E^F^A^U^L^T ^I^S ^S^I^X ^L^I^N^E^S ^P^E^R ^I^N^C^H.

      SS               I^N^T^E^R^A^C^T^I^V^E ^S^U^B^S^Y^S^T^E^M ^I^N^D^I^C^A^T^O^R.  T^H^E ^D^E^F^A^U^L^T ^O^F
                       SS ^I^S NULL.
.HELP,EXP,NOLIST

       T^H^E ^P^A^R^A^M^E^T^E^R ^E^X^P^R^E^S^S^I^O^N^I ^S^I^G^N^I^F^I^E^S ^A^N^Y ^V^A^L^I^D ^E^X^P^R^E^S^S^I^O^N.  T^H^E
       ^V^A^L^U^E ^D^E^R^I^V^E^D ^T^H^R^O^U^G^H ^E^V^A^L^U^A^T^I^O^N ^O^F ^T^H^E ^E^X^P^R^E^S^S^I^O^N ^I^S ^A^S^S^I^G^N^E^D ^T^O
       ^T^H^E ^S^Y^M^B^O^L^I^C ^N^A^M^E.  A^C^C^E^P^T^A^B^L^E ^V^A^L^U^E^S ^F^O^R ^E^A^C^H ^S^Y^M^B^O^L^I^C ^N^A^M^E ^A^R^E
       ^L^I^S^T^E^D ^B^E^L^O^W@D

       ^S^Y^M^B^O^L                    S^U^G^G^E^S^T^E^D V^A^L^U^E
       ------                    ---------------

       R1, R2, R3, ^O^R R1G   A^N^Y ^I^N^T^E^G^E^R ^B^E^T^W^E^E^N -131071 ^A^N^D 131071.  I^F ^T^H^E
                            ^V^A^L^U^E ^I^S ^O^U^T^S^I^D^E ^T^H^I^S ^R^A^N^G^E, ^I^T ^I^S ^T^R^U^N^C^A^T^E^D.
                            T^H^E ^V^A^L^U^E^S ^I^N ^T^H^E^S^E ^R^E^G^I^S^T^E^R^S ^A^R^E 18-^B^I^T
                            ^Q^U^A^N^T^I^T^I^E^S, 17 ^D^I^G^I^T^S ^A^N^D ^A ^S^I^G^N.  W^H^E^N ^T^R^U^N^C^A-
                            ^T^I^O^N ^O^C^C^U^R^S, ^T^H^E ^U^P^P^E^R ^B^I^T^S ^A^R^E ^T^R^U^N^C^A^T^E^D ^B^U^T ^T^H^E
                            ^S^I^G^N ^B^I^T ^I^S ^A^L^W^A^Y^S ^R^E^T^A^I^N^E^D.  T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T
                            ^I^S^S^U^E ^A ^M^E^S^S^A^G^E ^A^S ^A ^R^E^S^U^L^T ^O^F ^T^H^E ^T^R^U^N^C^A^T^I^O^N.

       EF ^O^R EFG            A^N^Y ^I^N^T^E^G^E^R ^B^E^T^W^E^E^N 0 ^A^N^D 63.  T^H^E ^V^A^L^U^E^S ^I^N
                            ^T^H^E^S^E ^R^E^G^I^S^T^E^R^S ^A^R^E 6-^B^I^T ^U^N^S^I^G^N^E^D ^Q^U^A^N^T^I^T^I^E^S.
                            W^H^E^N ^T^R^U^N^C^A^T^I^O^N ^O^C^C^U^R^S, ^T^H^E ^U^P^P^E^R ^B^I^T^S ^A^R^E
                            ^D^I^S^C^A^R^D^E^D.  I^F ^T^H^E ^V^A^L^U^E ^I^S ^G^R^E^A^T^E^R ^T^H^A^N 63,
                            ^I^T ^I^S ^T^R^U^N^C^A^T^E^D.  T^O ^A^S^S^I^G^N ^T^H^E ^V^A^L^U^E ^D^E^F^I^N^E^D
                            ^B^Y ^T^H^E ^S^Y^S^T^E^M ^F^O^R ^A^N^D ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N, ^S^E^T ^T^H^E
                            ^E^R^R^O^R ^F^L^A^G ^T^O ^O^N^E ^O^F ^T^H^E ^E^R^R^O^R ^C^O^N^D^I^T^I^O^N
                            ^S^Y^M^B^O^L^I^C ^N^A^M^E^S.  T^H^E ^S^Y^S^T^E^M ^S^E^T^S ^T^H^E EF ^F^L^A^G
                            ^T^O ^T^H^E ^A^P^P^R^O^P^R^I^A^T^E ^E^R^R^O^R ^C^O^D^E ^W^H^E^N ^A^N^D ^E^R^R^O^R
                            ^O^C^C^U^R^S.

       DSC                  1 ^O^R 0. I^F ^T^H^E ^V^A^L^U^E ^O^F ^T^H^E ^E^X^P^R^E^S^S^I^O^N ^I^S
                            ^N^O^N-^Z^E^R^O, DSC ^I^S ^S^E^T ^T^O 1.  W^H^I^L^E DSC ^I^S 1,
                            ^S^K^I^P^P^E^D ^C^O^M^M^A^N^D^S ^A^R^E ^E^N^T^E^R^E^D ^I^N ^T^H^E ^D^A^Y^F^I^L^E
                            ^P^R^E^C^E^D^E^D ^B^Y ^T^W^O ^P^E^R^I^O^D^S.  S^O^M^E ^E^R^R^O^R ^P^R^O^C^E^S^S^I^N^G
                            ^R^O^U^T^I^N^E^S ^S^E^T DSC ^T^O 1 ^S^O ^T^H^A^T ^S^K^I^P^P^E^D ^C^O^M^M^A^N^D^S
                            ^A^R^E ^W^R^I^T^T^E^N ^I^N ^T^H^E ^D^A^Y^F^I^L^E.

       PL ^O^R PS             A^N^Y ^I^N^T^E^G^E^R ^B^E^T^W^E^E^N 16 ^A^N^D 255.

       PW                   A^N^Y ^I^N^T^E^G^E^R ^B^E^T^W^E^E^N 40 ^A^N^D 255.

       PD                  6 ^O^R 8.  Y^O^U ^C^A^N ^S^E^L^E^C^T ^A ^P^R^I^N^T ^D^E^N^S^I^T^Y ^O^F
                           ^E^I^T^H^E^R ^S^I^X ^O^R ^E^I^G^H^T ^L^I^N^E^S ^P^E^R ^I^N^C^H.

       SS                  A^N^Y ^S^U^B^S^Y^S^T^E^M ^N^A^M^E (ACCESS, BASIC, BATCH,
                           EXECUTE, FORTRAN, FTNTS, ^O^R NULL).
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SETASL*I
,SRU[SRU^S ^F^O^R ^A^C^C^O^U^N^T ^B^L^O^C^K ^E^X^E^C^U^T^I^O^N]=(*S6(01234567B)
                                              ,*S6(0123456789))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETASL,^S.

      T^H^E SETASL ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^S^Y^S^T^E^M ^R^E^S^O^U^R^C^E ^U^N^I^T (SRU) ^L^I^M^I^T ^F^O^R
      ^A^N ^A^C^C^O^U^N^T ^B^L^O^C^K.
.HELP,SRU,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^S) ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^I^F ^S ^I^S ^A^N ^A^S^T^E^R^I^S^K (*), ^O^R ^H^A^S ^A
      ^V^A^L^U^E ^O^F 262136 (777770B) ^O^R ^G^R^E^A^T^E^R, ^O^R ^H^A^S ^A ^V^A^L^U^E ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R
      ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T, ^T^H^E ^A^C^C^O^U^N^T ^B^L^O^C^K SRU ^L^I^M^I^T ^I^S ^S^E^T ^T^O ^Y^O^U^R ^V^A^L^I^D^A^T^I^O^N
      ^L^I^M^I^T.  A^L^S^O, ^I^F ^S ^I^S ^L^E^S^S ^T^H^A^N ^Y^O^U^R ^C^U^R^R^E^N^T ^J^O^B ^S^T^E^P SRU ^L^I^M^I^T, ^B^O^T^H
      ^T^H^E ^A^C^C^O^U^N^T ^B^L^O^C^K ^A^N^D ^J^O^B ^S^T^E^P SRU ^L^I^M^I^T^S ^A^R^E ^S^E^T ^T^O ^S.

      A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^I^S ^I^S^S^U^E^D ^I^N^D^I^C^A^T^I^N^G ^W^H^A^T ^T^H^E ^N^E^W ^V^A^L^U^E^S ^A^R^E ^F^O^R
      ^T^H^E ^A^C^C^O^U^N^T ^B^L^O^C^K SRU ^L^I^M^I^T (ASL) ^A^N^D ^J^O^B ^S^T^E^P SRU ^L^I^M^I^T (JSL).

      D^E^F^A^U^L^T@D  N^O^N^E; ^A^N SRU ^V^A^L^U^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $SETASL(SRU)
*WEOR
.PROC,SETCORE*I
,P[P^R^E^S^E^T ^V^A^L^U^E]=(0,ZERO,INDEF,INF,*N=0)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETCORE,^P.
               SETCORE,-^P.

      T^H^E SETCORE ^C^O^M^M^A^N^D ^P^R^E^S^E^T^S ^E^A^C^H ^W^O^R^D ^W^I^T^H^I^N ^T^H^E ^F^I^E^L^D ^L^E^N^G^T^H, ^E^X^C^E^P^T
      ^F^O^R RA+2.

      I^F ^A ^M^I^N^U^S ^S^I^G^N ^P^R^E^C^E^D^E^S ^P, ^T^H^E ^C^O^M^P^L^E^M^E^N^T ^O^F ^P ^I^S ^S^E^T ^I^N ^C^O^R^E.
.HELP,P,NOLIST

      P^R^E^S^E^T ^M^E^M^O^R^Y ^W^I^T^H ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G@D

      0     = 0
      ZERO  = 0
      INDEF = I^N^D^E^F^I^N^I^T^E (1777 0000 0000 0000 0000)
      INF   = I^N^F^I^N^I^T^E   (3777 0000 0000 0000 0000)

      D^E^F^A^U^L^T@D 0
.ENDHELP
.EX.  $SETCORE,P.
*WEOR
.PROC,SETFAL*I
,LFN[F^I^L^E ^T^O ^C^H^A^N^G^E ^S^E^C^U^R^I^T^Y ^L^E^V^E^L ^O^N]=(*F)
,AL[S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^T^O ^A^S^S^I^G^N]=(LVL0,LVL1,LVL2,LVL3,LVL4,LVL5,
                                            LVL6,LVL7)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETFAL,^L^F^N,AL=^L^E^V^E^L.

      T^H^E SETFAL ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^A ^L^O^C^A^L ^F^I^L^E.
      I^N ^M^O^S^T ^C^A^S^E^S, ^L^O^C^A^L ^F^I^L^E^S ^I^N^H^E^R^I^T ^T^H^E ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^F^O^R ^W^H^I^C^H ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E ^S^E^C^U^R^I^T^Y
      ^A^C^C^E^S^S ^L^E^V^E^L.  T^H^E ^F^I^L^E ^C^A^N^N^O^T ^B^E ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^O^R ^A ^M^A^G^N^E^T^I^C ^T^A^P^E ^F^I^L^E.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,AL,NOLIST

      S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U ^W^A^N^T ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^F^I^L^E.
      A^L^L^O^W^A^B^L^E ^V^A^L^U^E^S ^A^R^E@D LVL0, LVL1, LVL2, LVL3, LVL4, LVL5, LVL6,
      ^A^N^D LVL7.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L.
.ENDHELP
.EX.  $SETFAL,LFN,#AL=AL.
*WEOR
.PROC,SETFS*I
,LFN[F^I^L^E ^T^O ^S^E^T ^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S ^O^N]=(*F)
,FS[D^O ^Y^O^U ^W^A^N^T ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S]=(YES=NAD,Y=NAD,NAD,AD,NO=AD,N=AD,*N=NAD)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETFS,^L^F^N/FS=^F^S.
               SETFS,*,^L^F^N/FS=^F^S.

      T^H^E SETFS ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^A^U^T^O-^D^R^O^P ^O^R ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S ^O^N ^T^H^E
      ^S^P^E^C^I^F^I^E^D ^F^I^L^E (^L^F^N).  T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^O^F SETFS ^S^E^T^S ^T^H^E ^A^U^T^O-^D^R^O^P
      ^O^R ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S ^O^N ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^E^X^C^E^P^T ^F^I^L^E
      ^L^F^N.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,FS,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (FS=^F^S) ^S^P^E^C^I^F^I^E^S ^E^I^T^H^E^R ^T^H^E ^A^U^T^O-^D^R^O^P ^O^R
      ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S.  E^N^T^E^R AD ^F^O^R ^A^U^T^O-^D^R^O^P ^O^R NAD ^F^O^R
      ^N^O-^A^U^T^O-^D^R^O^P.

      D^E^F^A^U^L^T@D F^O^R ^U^S^E^R-^C^R^E^A^T^E^D ^F^I^L^E^S ^T^H^E ^D^E^F^A^U^L^T ^I^S AD (^A^U^T^O ^D^R^O^P).  I^N
               HELPME ^T^H^E ^D^E^F^A^U^L^T ^I^S NAD (^N^O ^A^U^T^O ^D^R^O^P).
.ENDHELP
.EX.  $SETFS,LFN/#FS=FS.
*WEOR
.PROC,SETJAL*I
,AL [S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^T^O ^A^S^S^I^G^N]=(LVL0,LVL1,LVL2,LVL3,LVL4,LVL5,
                                            LVL6,LVL7)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETJAL,AL=^L^E^V^E^L.

      T^H^E SETJAL ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^A ^C^U^R^R^E^N^T ^J^O^B.
.HELP,AL,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (AL=^L^E^V^E^L) ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U
      ^W^A^N^T ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.  A^L^L^O^W^A^B^L^E ^V^A^L^U^E^S ^A^R^E@D LVL0, LVL1, LVL2,
      LVL3, LVL4, LVL5, LVL6, ^A^N^D LVL7.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L.
.ENDHELP
.EX.  $SETJAL,#AL=AL.
*WEOR
.PROC,SETJOB*I
,UJN[U^S^E^R ^J^O^B ^N^A^M^E]=(*F,*N=)
,DC[D^I^S^P^O^S^I^T^O^N ^C^O^D^E]=(TO,NO,DF,*N=DF)
,OP[E^N^D-^O^F-^J^O^B ^O^P^T^I^O^N]=(SU,TJ,*N=SU)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETJOB,UJN=^U^J^N,DC=^D^C,OP=^O^P.
               SETJOB,^U^J^N,^D^C,^O^P.

      T^H^E SETJOB ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^U^S^E^R ^J^O^B ^N^A^M^E, ^C^H^A^N^G^E^S ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^O^U^T^P^U^T,
      ^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^J^O^B ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N ^F^O^R ^J^O^B ^T^E^R^M^I^N^A^T^I^O^N ^O^R ^J^O^B
      ^S^U^S^P^E^N^S^I^O^N.
.HELP,UJN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^C^H^A^N^G^E^S ^Y^O^U^R ^J^O^B'^S ^D^E^F^A^U^L^T ^U^S^E^R ^J^O^B ^N^A^M^E (UJN) ^T^O ^T^H^E ^U^S^E^R
      ^J^O^B ^N^A^M^E ^Y^O^U ^S^P^E^C^I^F^Y.  T^H^E UJN ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^C^T^E^R^S.

      D^E^F^A^U^L^T@D F^O^R ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S, ^T^H^E ^D^E^F^A^U^L^T UJN ^I^S ^T^H^E ^U^S^E^R ^I^N^D^E^X
               ^H^A^S^H (^R^E^F^E^R ^T^O ^T^H^E ENQUIRE ^C^O^M^M^A^N^D).
.HELP,DC,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^I^S^P^O^S^I^T^I^O^N ^F^O^R ^O^U^T^P^U^T ^U^P^O^N ^J^O^B
      ^T^E^R^M^I^N^A^T^I^O^N.

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y

      TO         Q^U^E^U^E ^O^U^T^P^U^T ^W^I^T^H ^W^A^I^T ^D^I^S^P^O^S^I^T^I^O^N.

      NO         D^I^S^C^A^R^D ^O^U^T^P^U^T.

      DF         Q^U^E^U^E ^O^U^T^P^U^T ^T^O ^J^O^B'^S ^D^E^F^A^U^L^T ^Q^U^E^U^E.

      D^E^F^A^U^L^T@D DF
.HELP,OP,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N ^T^H^A^T ^T^H^E ^S^Y^S^T^E^M
      ^E^X^E^R^C^I^S^E^S ^U^P^O^N ^D^E^T^A^C^H^E^D ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B ^W^H^E^N ^I^T ^I^S ^N^O ^L^O^N^G^E^R
      ^E^X^E^C^U^T^I^N^G.

      E^N^T^E^R    T^O ^S^P^E^C^I^F^Y

      SU       T^H^E ^J^O^B ^R^E^M^A^I^N^S ^I^N ^A ^S^U^S^P^E^N^D^E^D ^S^T^A^T^E ^U^N^T^I^L ^R^E^C^O^V^E^R^E^D ^O^R
               ^T^I^M^E^D ^O^U^T.

      TJ       T^H^E ^S^Y^S^T^E^M ^T^E^R^M^I^N^A^T^E^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D SU
.ENDHELP
.EX.  $SETJOB,#UJN=UJN,#DC=DC,#OP=OP.
*WEOR
.PROC,SETJSL*I
,SRU[E^N^T^E^R SRU^S ^F^O^R ^J^O^B ^S^T^E^P ^E^X^E^C^U^T^I^O^N]=($*$,*S6(0123456789B))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETJSL,^S.

      T^H^E SETJSL ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^S^Y^S^T^E^M ^R^E^S^O^U^R^C^E ^U^N^I^T (SRU) ^L^I^M^I^T
      ^F^O^R ^E^A^C^H ^S^U^B^S^E^Q^U^E^N^T ^J^O^B ^S^T^E^P.
.HELP,SRU,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^S) ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F SRU^S ^A^L^L^O^W^E^D ^F^O^R
      ^J^O^B ^S^T^E^P ^E^X^E^C^U^T^I^O^N.  A^L^T^H^O^U^G^H ^T^H^E ^D^E^F^A^U^L^T ^B^A^S^E ^I^S ^D^E^C^I^M^A^L, ^O^C^T^A^L ^V^A^L^U^E^S
      ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^B^Y ^A B ^S^U^F^F^I^X ^O^N ^T^H^E ^V^A^L^U^E.  T^H^E ^V^A^L^U^E ^S ^M^U^S^T ^B^E
      ^G^R^E^A^T^E^R ^T^H^A^N 0.  T^H^E ^A^S^T^E^R^I^S^K (*), ^V^A^L^U^E^S ^G^R^E^A^T^E^R ^T^H^A^N 262136 (777770(8)),
      ^A^N^D ^V^A^L^U^E^S ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R ^V^A^L^I^D^A^T^E^D ^L^I^M^I^T, ^S^E^T ^T^H^E ^J^O^B ^S^T^E^P SRU ^L^I^M^I^T
      ^A^T ^T^H^E ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T.  I^F ^S ^I^S ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R ^C^U^R^R^E^N^T ^A^C^C^O^U^N^T ^B^L^O^C^
      SRU ^L^I^M^I^T, ^B^O^T^H ^T^H^E ^J^O^B ^S^T^E^P ^A^N^D ^A^C^C^O^U^N^T ^B^L^O^C^K SRU ^L^I^M^I^T^S ^A^R^E ^S^E^T ^T^O ^S.
      N^O^T^E ^T^H^A^T ^I^F ^S ^I^S ^A^L^S^O ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T, ^B^O^T^H SRU ^L^I^M^I^T^S
      ^A^R^E ^S^E^T ^T^O ^T^H^E ^V^A^L^I^D^A^T^I^O^N ^L^I^M^I^T.

      A ^D^A^Y^F^I^L^E ^M^E^S^S^A^G^E ^I^S ^I^S^S^U^E^D ^I^N^D^I^C^A^T^I^N^G ^W^H^A^T ^T^H^E ^N^E^W ^V^A^L^U^E^S ^A^R^E ^F^O^R ^T^H^E ^J

      ^S^T^E^P SRU ^L^I^M^I^T (JSL) ^A^N^D ^T^H^E ^A^C^C^O^U^N^T ^B^L^O^C^K SRU ^L^I^M^I^T (ASL).

      T^H^E ^S^Y^S^T^E^M ^I^S^S^U^E^S ^A^N ^E^R^R^O^R ^M^E^S^S^A^G^E ^W^H^E^N ^T^H^E ^J^O^B ^S^T^E^P SRU ^L^I^M^I^T ^I^S
      ^R^E^A^C^H^E^D.  A ^J^O^B ^S^T^E^P ^W^I^T^H^I^N ^A ^B^A^T^C^H ^J^O^B ^I^S ^T^H^E^N ^T^E^R^M^I^N^A^T^E^D.  I^N
      ^I^N^T^E^R^A^C^T^I^V^E ^J^O^B^S, ^Y^O^U ^C^A^N ^I^N^C^R^E^M^E^N^T ^T^H^E SRU ^L^I^M^I^T ^A^F^T^E^R ^R^E^C^E^I^V^I^N^G
      ^T^H^E SRU ^L^I^M^I^T ^M^E^S^S^A^G^E.

      D^E^F^A^U^L^T@D N^O^N^E; ^T^H^E SRU ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $SETJSL,SRU.
*WEOR
.PROC,SETPFAC*I
,PFN[P^E^R^M^A^N^E^N^T F^I^L^E]=(*F,*N=)
,AC[N^E^W C^A^T^E^G^O^R^Y S^E^T (AC)]=(*A5)
,PN[A^U^X^I^L^I^A^R^Y D^E^V^I^C^E N^A^M^E (PN)]=(*A2,*N=)
,R[D^E^V^I^C^E T^Y^P^E (R)]=(DB,DC,DE,DF,DG,DH,DI,DJ,DK,DL,DM,DN,DP,DQ,DV,DW,MS,
                        NE,TT,*N=)
,NA[N^O A^B^O^R^T O^P^T^I^O^N (NA)]=(YES=,Y=,NO=$,NA$,N=$,NA$,*N=NO)
,WB[W^A^I^T-I^F-B^U^S^Y (WB)]=(YES=,Y=,NO=$,NA$,N=$,NA$,*N=NO)
.
.HELP,,NOLIST.

      F^O^R^M^A^T@D  SETPFAC,^P^F^N,AC=0,^C^A^T^E^G^O^R^Y1,^C^A^T^E^G^O^R^Y2,.../PN=^P^A^C^K^N^A^M^E,R=^R,NA,WB.
                  ^O^R
               SETPFAC,^P^F^N,AC=^C^A^T^E^G^O^R^Y1,^C^A^T^E^G^O^R^Y2,.../PN=^P^A^C^K^N^A^M^E,R=^R,NA,WB.

      T^H^E SETPFAC ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S ^O^F ^A ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E.  Y^O^U ^C^A^N ^E^I^T^H^E^R ^S^P^E^C^I^F^Y ^A^N ^E^N^T^I^R^E^L^Y ^N^E^W ^C^A^T^E^G^O^R^Y ^S^E^T (^F^I^R^S^T ^F^O^R^M^A^T)
      ^O^R ^A^D^D ^T^O ^O^R ^D^E^L^E^T^E ^F^R^O^M ^T^H^E ^C^U^R^R^E^N^T ^C^A^T^E^G^O^R^Y ^S^E^T (^S^E^C^O^N^D ^F^O^R^M^A^T).  B^Y
      ^D^E^F^A^U^L^T ^O^N ^A ^S^E^C^U^R^E^D ^S^Y^S^T^E^M, ^T^H^E ^S^Y^S^T^E^M ^A^S^S^O^C^I^A^T^E^S ^A^L^L ^O^F ^T^H^E
      ^A^C^C^E^S^S ^C^A^T^E^G^O^R^I^E^S ^F^O^R ^W^H^I^C^H ^Y^O^U ^A^R^E ^A^U^T^H^O^R^I^Z^E^D ^W^I^T^H ^A^N^Y ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E ^Y^O^U ^C^R^E^A^T^E.
.HELP,PFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^P^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^H^O^S^E ^A^C^C^E^S^S ^C^A^T^E^G^O^R^Y ^S^

      ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E.
.HELP,AC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AC=O,...^C^A^T^E^G^O^R^Y^I ^S^P^E^C^I^F^I^E^S ^A ^N^E^W ^C^A^T^E^G^O^R^Y ^S^E^T.  U^N^L^E^S^S
      ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E ^C^A^T^E^G^O^R^Y^I ^C^A^N ^B^E ^A^N^Y ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D

         CAT00,CAT01,...,CAT31

      T^H^E ^P^A^R^A^M^E^T^E^R AC=...^C^A^T^E^G^O^R^Y^I ^S^P^E^C^I^F^I^E^S ^C^A^T^E^G^O^R^I^E^S ^T^O ^A^D^D ^T^O ^O^R ^D^E^L^E^T^E
      ^F^R^O^M ^T^H^E ^C^U^R^R^E^N^T ^C^A^T^E^G^O^R^Y ^S^E^T.  T^O ^A^D^D ^A ^C^A^T^E^G^O^R^Y, ^P^R^E^F^I^X ^T^H^E ^C^A^T^E^G^O^R^Y
      ^N^A^M^E ^W^I^T^H ^A ^P^L^U^S ^S^I^G^N ^O^R ^U^S^E ^N^O ^P^R^E^F^I^X ^A^T ^A^L^L.  T^O ^D^E^L^E^T^E ^A ^C^A^T^E^G^O^R^Y,
      ^P^R^E^F^I^X ^T^H^E ^C^A^T^E^G^O^R^Y ^N^A^M^E ^W^I^T^H ^A ^M^I^N^U^S ^S^I^G^N.
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN=^P^A^C^K^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.  Y^O^U
      ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^F ^P^F^N ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^F ^A ^R^E^M^O^V^A^B^L^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^O^N ^A ^D^E^V^I^C^E ^T^Y^P^E ^O^T^H^E^R ^T^H^A^N ^T




      ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T ^I^S ^T^O ^B^E ^U^S^E^D.

      ^R                 D^E^S^C^R^I^P^T^I^O^N
      -                 -----------
      DB       885-42 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M     (^F^U^L^L-^T^R^A^C^K)
      DC       895-1/2 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M    (^F^U^L^L-^T^R^A^C^K)
      DD       834 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^F^U^L^L-^T^R^A^C^K)
      DE       E^X^T^E^N^D^E^D ^M^E^M^O^R^Y
      DF       887 D^I^S^K (4K ^S^E^C^T^O^R)              (^F^U^L^L-^T^R^A^C^K)
      DG       836 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^F^U^L^L-^T^R^A^C^K)
      DH       887 D^I^S^K (16K ^S^E^C^T^O^R)             (^F^U^L^L-^T^R^A^C^K)
      DI       844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M     (^H^A^L^F-^T^R^A^C^K)
      DJ       844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M  (^H^A^L^F-^T^R^A^C^K)
      DK       844-21 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M     (^F^U^L^L-^T^R^A^C^K)
      DL       844-41/44 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M  (^F^U^L^L-^T^R^A^C^K)
      DM       885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M  (^H^A^L^F-^T^R^A^C^K)
      DN       9853 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M       (^F^U^L^L-^T^R^A^C^K)
      DP       D^I^S^T^R^I^B^U^T^I^V^E ^D^A^T^A ^P^A^T^H ^T^O ECS
      DQ       885-11/12 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M  (^F^U^L^L-^T^R^A^C^K)
      DV       819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^S^I^N^G^L^E-^D^E^N^S^I^T^Y)
      DW       819 D^I^S^K S^T^O^R^A^G^E S^U^B^S^Y^S^T^E^M        (^D^O^U^B^L^E-^D^E^N^S^I^T^Y)
      MS       M^A^S^S ^S^T^O^R^A^G^E ^D^E^V^I^C^E
      NE       N^U^L^L ^E^Q^U^I^P^M^E^N^T
      TT       T^I^M^E^S^H^A^R^I^N^G ^T^E^R^M^I^N^A^L^S
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  I^F NA ^I^S ^S^P^E^C^I^F^I^E^D,
      ^P^R^O^C^E^S^S^I^N^G ^E^R^R^O^R^S ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H
      NA ^A^N^D WB (^W^A^I^T-^I^F-^B^U^S^Y).
.HELP,WB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R WB ^S^P^E^C^I^F^I^E^S ^T^H^E ^W^A^I^T-^I^F-^B^U^S^Y ^O^P^T^I^O^N.  WB ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O
      ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K ^P^A^C^K^S.  Y^O^U ^C^A^N^N^O^T ^S^P^E^C^I^F^Y ^B^O^T^H WB ^A^N^D NA
      (^N^O ^A^B^O^R^T).
.ENDHELP
.EX.  $SETPFAC,PFN,AC,PN,R,NA,WB.
*WEOR
.PROC,SETPFAL*I
,PFN[P^E^R^M^A^N^E^N^T F^I^L^E]=(*A1*N=)
,AL[S^E^C^U^R^I^T^Y A^C^C^E^S^S L^E^V^E^L (AL)]=(*A1,*N=)
,PN[A^U^X^I^L^I^A^R^Y D^E^V^I^C^E N^A^M^E (PN)]=(*A1,*N=)
,R[D^E^V^I^C^E T^Y^P^E (R)]=(*A1,*N=)
,NA[N^O A^B^O^R^T O^P^T^I^O^N (NA)]=(*A1,*N)
,WB[W^A^I^T-I^F-B^U^S^Y (WB)]=(*A1,*N)
.
.HELP,,NOLIST.

      F^O^R^M^A^T@D  SETPFAL,^P^F^N,AL=^L^E^V^E^L/PN=^P^A^C^K^N^A^M^E,R=^R,NA,WB.

      T^H^E SETPFAL ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^A ^P^E^R^M^A^N^E^N^T
      ^F^I^L^E.  B^Y ^D^E^F^A^U^L^T, ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E ^I^N^H^E^R^I^T^S ^T^H^E ^A^C^C^E^S^S ^L^E^V^E^L ^O^F
      ^T^H^E ^C^R^E^A^T^I^N^G ^J^O^B.  A^N ^I^N^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^I^N^H^E^R^I^T^S ^T^H^E
      ^A^C^C^E^S^S ^L^E^V^E^L ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^F^R^O^M ^W^H^I^C^H ^I^T ^W^A^S ^C^R^E^A^T^E^D.  Y^O^U ^C^A^N ^A^L^S^O
      ^E^X^P^L^I^C^I^T^L^Y ^S^E^T ^T^H^E ^A^C^C^E^S^S ^L^E^V^E^L ^W^H^E^N ^Y^O^U ^C^R^E^A^T^E ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^B^Y
      ^S^P^E^C^I^F^Y^I^N^G ^T^H^E AL=^L^E^V^E^L ^P^A^R^A^M^E^T^E^R ^O^N ^T^H^E ^C^O^M^M^A^N^D ^Y^O^U ^U^S^E ^T^O ^C^R^E^A^T^E ^T^H^E
      ^F^I^L^E.
.HELP,PFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^P^F^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^W^H^O^S^E ^A^C^C^E^S^S ^L^E^V^E^L
      ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E.
.HELP,AL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R AL=^L^E^V^E^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^E^C^U^R^I^T^Y ^A^C^C^E^S^S ^L^E^V^E^L ^Y^O^U ^W^A^N^T
      ^A^S^S^I^G^N^E^D ^T^O ^T^H^E ^F^I^L^E.  U^N^L^E^S^S ^C^H^A^N^G^E^D ^B^Y ^Y^O^U^R ^S^I^T^E, ^L^E^V^E^L ^C^A^N ^B^E ^O^N^E
      ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^N^A^M^E^S@D

                LVL0, LVL1, LVL2, LVL3, LVL4, LVL5,LVL6, ^O^R LVL7
.HELP,PN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PN=^P^A^C^K^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^N^A^M^E.  Y^O^U
      ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^F ^P^F^N ^R^E^S^I^D^E^S ^O^N ^A^N ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E.
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^V^I^C^E ^T^Y^P^E.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^I^S
      ^P^A^R^A^M^E^T^E^R ^I^F ^A ^R^E^M^O^V^A^B^L^E ^A^U^X^I^L^I^A^R^Y ^D^E^V^I^C^E ^O^N ^A ^D^E^V^I^C^E ^T^Y^P^E ^O^T^H^E^R ^T^H^A^N ^T









      ^I^N^S^T^A^L^L^A^T^I^O^N-^D^E^F^I^N^E^D ^D^E^F^A^U^L^T ^I^S ^T^O ^B^E ^U^S^E^D.
.HELP,NA,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NA ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^O ^A^B^O^R^T ^O^P^T^I^O^N.  I^F NA ^I^S ^S^P^E^C^I^F^I^E^D,
      ^P^R^O^C^E^S^S^I^N^G ^E^R^R^O^R^S ^D^O ^N^O^T ^T^E^R^M^I^N^A^T^E ^T^H^E ^J^O^B.
.HELP,WB,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R WB ^S^P^E^C^I^F^I^E^S ^T^H^E ^W^A^I^T-^I^F-^B^U^S^Y ^O^P^T^I^O^N.  WB ^C^A^U^S^E^S ^T^H^E ^J^O^B ^T^O
      ^W^A^I^T ^F^O^R ^T^H^E ^M^O^U^N^T^I^N^G ^O^F ^D^I^S^K ^P^A^C^K^S.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,SETPR*I
,P[CPU ^P^R^I^O^R^I^T^Y ^O^F ^Y^O^U^R ^J^O^B]=(*S3(01234567B))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETPR,^P.

      T^H^E SETPR ^C^O^M^M^A^N^D ^D^E^C^R^E^A^S^E^S ^T^H^E CPU ^P^R^I^O^R^I^T^Y ^O^F ^A ^J^O^B.
.HELP,P,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^P) ^S^P^E^C^I^F^I^E^S ^T^H^E CPU ^P^R^I^O^R^I^T^Y ^O^F ^Y^O^U^R ^J^O^B.
      P^R^I^O^R^I^T^Y ^M^U^S^T ^F^A^L^L ^I^N ^T^H^E ^R^A^N^G^E 1<^P<70 ^O^C^T^A^L; ^I^F ^P ^E^X^C^E^E^D^S 70 ^O^C^T^A^L
      ^O^R ^T^H^E ^M^A^X^I^M^U^M ^P^R^I^O^R^I^T^Y ^D^E^F^I^N^E^D ^F^O^R ^T^H^E ^O^R^I^G^I^N ^T^Y^P^E ^O^F ^T^H^E ^J^O^B,
      ^I^T ^I^S ^R^E^D^U^C^E^D ^T^O ^T^H^A^T ^V^A^L^U^E.  E^N^T^E^R ^T^H^E ^V^A^L^U^E ^I^N ^O^C^T^A^L ^B^Y ^E^N^D^I^N^G
      ^T^H^E ^N^U^M^B^E^R ^W^I^T^H B.

      D^E^F^A^U^L^T@D N^O^N^E; ^P^R^I^O^R^I^T^Y ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $SETPR,P.
*WEOR
.PROC,SETTL*I
,T[S^E^C^O^N^D^S ^T^O ^B^E ^S^E^T ^F^O^R ^Y^O^U^R ^J^O^B]=(*S7(01234567B),*S7(0123456789),$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SETTL,^T.

      T^H^E SETTL ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E CPU ^T^I^M^E ^L^I^M^I^T ^F^O^R ^E^A^C^H ^S^U^B^S^E^Q^U^E^N^T ^J^O^B ^S^T^E^P.
      E^A^C^H ^U^S^E^R ^N^A^M^E ^I^S ^V^A^L^I^D^A^T^E^D ^F^O^R ^A ^M^A^X^I^M^U^M ^J^O^B ^S^T^E^P ^T^I^M^E ^L^I^M^I^T.
.HELP,T,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F CPU ^S^E^C^O^N^D^S ^A^L^L^O^W^E^D ^F^O^
      ^J^O^B ^S^T^E^P ^E^X^E^C^U^T^I^O^N.  A^L^T^H^O^U^G^H ^T^H^E ^D^E^F^A^U^L^T ^B^A^S^E ^I^S ^D^E^C^I^M^A^L, ^O^C^T^A^L ^V^A^L^U^E^S
      ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^B^Y ^A B ^S^U^F^F^I^X ^O^N ^T^H^E ^V^A^L^U^E ^Y^O^U ^E^N^T^E^R.

      ^T ^M^U^S^T ^B^E ^G^R^E^A^T^E^R ^T^H^A^N 0.  T^H^E ^A^S^T^E^R^I^S^K (*), ^V^A^L^U^E^S ^G^R^E^A^T^E^R ^T^H^A^N 32760
      (77770B), ^A^N^D ^V^A^L^U^E^S ^G^R^E^A^T^E^R ^T^H^A^N ^Y^O^U^R ^V^A^L^I^D^A^T^E^D ^T^I^M^E ^L^I^M^I^T ^S^E^T ^T^H^E ^J^O^B
      ^S^T^E^P ^T^I^M^E ^L^I^M^I^T ^A^T ^Y^O^U^R ^V^A^L^I^D^A^T^E^D ^T^I^M^E ^L^I^M^I^T.

      D^E^F^A^U^L^T@D N^O^N^E; ^T^O ^S^P^E^C^I^F^Y ^T^H^E ^J^O^B ^S^T^E^P ^T^I^M^E ^L^I^M^I^T ^A^T ^Y^O^U^R ^V^A^L^I^D^A^T^E^D
               ^T^I^M^E ^L^I^M^I^T, ^E^N^T^E^R ^A^N ^A^S^T^E^R^I^S^K (*).
.ENDHELP
.EX.  $SETTL,T.
*WEOR
.PROC,SHELL*I
,SPN[F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^S^H^E^L^L]=(*F)
,E[C^L^E^A^R ^C^O^N^T^R^O^L^S ^I^F ^T^H^E^R^E ^A^R^E ^E^R^R^O^R^S]=(E=$,E$,YES=$,E$,Y=$,E$,N=,NO=,*N=)
,A[C^L^E^A^R ^C^O^N^T^R^O^L ^O^N ^A^B^O^R^T]=(A=$,A$,YES=$,A$,Y=$,A$,NO=,N=,*N=)
,L[L^O^A^D S^H^E^L^L ^P^R^O^G^R^A^M ^F^R^O^M ^A ^L^O^C^A^L ^F^I^L^E]=(L=$,L$,YES=$,L$,Y=$,L$,NO=,N=,*N=)
,G[L^O^A^D S^H^E^L^L ^P^R^O^G^R^A^M ^F^R^O^M G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T]=(G=$,G$,YES=$,G$,Y=$,G$,NO=,N=,
                                                   *N=)
,S[L^O^A^D S^H^E^L^L ^P^R^O^G^R^A^M ^F^R^O^M S^Y^S^T^E^M]=(S=$,S$,YES=$,S$,Y=$,S$,NO=,N=,*N=)
,T[M^O^N^I^T^O^R ^T^E^R^M^I^N^A^L ^C^O^M^M^A^N^D^S]=(T=$,T$,YES=$,T$,Y=$,T$,NO=,N=,*N=)
,B[M^O^N^I^T^O^R ^C^O^M^M^A^N^D^S ^N^O^T ^I^N ^P^R^O^C^E^D^U^R^E^S]=(B=$,B$,YES=$,B$,Y=$,B$,NO=,N=,*N=)
,C[M^O^N^I^T^O^R ^C^O^M^M^A^N^D^S ^I^N ^P^R^O^C^E^D^U^R^E^S]=(C=$,C$,YES=$,C$,Y=$,C$,NO=,N=,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SHELL.
               SHELL,^S^P^N.
               SHELL,^S^P^N,E,A,L,G,S,T,B,C.

      T^H^E SHELL ^C^O^M^M^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^P^R^O^C^E^S^S ^B^Y ^W^H^I^C^H ^T^H^E ^S^Y^S^T^E^M^S ^L^O^A^D^S ^A^N^D
      ^E^X^E^C^U^T^E^S ^A ^S^H^E^L^L ^P^R^O^G^R^A^M.  A ^S^H^E^L^L ^P^R^O^G^R^A^M ^I^S ^A ^U^S^E^R-^W^R^I^T^T^E^N
      ^P^R^O^G^R^A^M ^W^H^I^C^H ^M^O^N^I^T^O^R^S ^A^N^D ^P^R^O^C^E^S^S^E^S ^C^O^M^M^A^N^D^S ^E^N^T^E^R^E^D ^F^R^O^M ^Y^O^U^R ^J^O^B^S.
.HELP,SPN,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M ^T^O ^B^E ^E^X^E^C^U^T^E^D.
.HELP,E,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (E) ^C^L^E^A^R^S ^C^O^N^T^R^O^L^S ^I^F ^T^H^E^R^E ^A^R^E ^E^R^R^O^R^S ^D^U^R^I^N^G ^T^H^E ^L^O^A^D^I^N^
      ^O^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^S^U^C^H
      ^E^R^R^O^R^S ^O^C^C^U^R, ^Y^O^U^R ^J^O^B ^I^S ^A^B^O^R^T^E^D ^W^I^T^H ^N^O EXIT ^P^R^O^C^E^S^S^I^N^G.

      T^O ^C^L^E^A^R ^C^O^N^T^R^O^L^S ^O^N ^E^R^R^O^R, ^E^N^T^E^R YES, Y, ^O^R E.  O^T^H^E^R^W^I^S^E, NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, E ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,A,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (A) ^C^L^E^A^R^S ^C^O^N^T^R^O^L^S ^I^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M ^A^B^O^R^T^S.
      E^N^T^E^R YES, Y, ^O^R A ^T^O ^C^L^E^A^R ^C^O^N^T^R^O^L^S, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, A ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,L,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (L) ^A^L^L^O^W^S ^L^O^C^A^L ^F^I^L^E ^L^O^A^D^I^N^G ^O^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M.
      E^N^T^E^R YES, Y, ^O^R L, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, L ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,G,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (G) ^A^L^L^O^W^S ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^L^O^A^D ^O^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M.
      E^N^T^E^R YES, Y, ^O^R G, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, G ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,S,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (S) ^A^L^L^O^W^S ^S^Y^S^T^E^M ^L^I^B^R^A^R^Y ^L^O^A^D ^O^F ^T^H^E ^S^H^E^L^L ^P^R^O^G^R^A^M.
      E^N^T^E^R YES, Y, ^O^R S, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, S ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,T,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (T) ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^M^O^N^I^T^O^R ^C^O^M^M^A^N^D^S ^D^I^R^E^C^T^L^Y
      ^F^R^O^M ^T^H^E ^T^E^R^M^I^N^A^L.  E^N^T^E^R YES, Y, ^O^R T, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, T ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,B,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (B) ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^M^O^N^I^T^O^R ^C^O^M^M^A^N^D^S ^O^U^T^S^I^D^E
      ^P^R^O^C^E^D^U^R^E^S.  E^N^T^E^R YES, Y, ^O^R B, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, B ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.HELP,C,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (C) ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^M^O^N^I^T^O^R ^C^O^M^M^A^N^D^S ^I^N^S^I^D^E
      ^P^R^O^C^E^D^U^R^E^S.  E^N^T^E^R YES, Y, ^O^R C, ^O^T^H^E^R^W^I^S^E NO ^O^R N.

      D^E^F^A^U^L^T@D I^F ^O^M^I^T^T^E^D, C ^I^S ^N^O^T ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $SHELL,SPN_E_A_L_G_S_T_B_C.
*WEOR
.PROC,SHOW*I
,P[N^A^M^E ^O^F ^P^R^I^M^A^R^Y ^P^A^N^E^L]=(*F)
,O[N^A^M^E ^O^F ^S^E^C^O^N^D ^O^R ^O^V^E^R^L^A^Y ^P^A^N^E^L]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D SHOW,^P^R^I^M^A^R^Y ^P^A^N^E^L^N^A^M^E,^S^E^C^O^N^D ^P^A^N^E^L^N^A^M^E.

      T^H^E SHOW ^C^O^M^M^A^N^D ^D^I^S^P^L^A^Y^S ^P^R^E^D^E^F^I^N^E^D ^S^C^R^E^E^N ^F^O^R^M^A^T^T^I^N^G ^P^A^N^E^L^S ^O^N ^T^H^E
      ^S^C^R^E^E^N.  W^I^T^H ^T^H^I^S ^C^O^M^M^A^N^D, ^Y^O^U ^C^A^N ^D^I^S^P^L^A^Y ^A^N^D ^T^E^S^T ^P^A^N^E^L ^D^E^F^I^N^I^T^I^O^N^S
      ^W^I^T^H^O^U^T ^H^A^V^I^N^G ^T^O ^W^R^I^T^E ^A ^P^R^O^G^R^A^M ^T^O ^D^O ^S^O.
.HELP,P,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^P^A^N^E^L ^T^O ^B^E ^D^I^S^P^L^A^Y^E^D (^T^H^E ^N^A^M^E ^M^U^S^T ^B^E 1- ^T^O 7-
      ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^I^N ^L^E^N^G^T^H).  T^H^E ^P^A^N^E^L ^M^U^S^T ^H^A^V^E ^B^E^E^N ^C^O^M^P^I^L^E^D
      ^B^Y ^T^H^E P^A^N^E^L D^E^F^I^N^I^T^I^O^N U^T^I^L^I^T^Y (PDU), ^M^U^S^T ^H^A^V^E ^B^E^E^N ^D^E^F^I^N^E^D ^A^S ^A
      ^P^R^I^M^A^R^Y ^P^A^N^E^L (^N^O^T ^A^S ^A^N ^O^V^E^R^L^A^Y ^P^A^N^E^L), ^A^N^D ^M^U^S^T ^A^L^R^E^A^D^Y ^B^E ^O^N ^L^O^C^A^L
      ^L^I^B^R^A^R^Y ^F^I^L^E PANELIB ^O^R ^I^N ^Y^O^U^R ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T.

      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L ^H^A^S ^B^E^E^N ^P^L^A^C^E^D ^I^N ^S^C^R^E^E^N ^M^O^D^E ^W^I^T^H ^T^H^E SCREEN
      ^C^O^M^M^A^N^D, ^T^H^E ^S^C^R^E^E^N ^F^O^R^M^A^T^T^I^N^G ^O^B^J^E^C^T ^R^O^U^T^I^N^E^S ^A^R^E ^E^X^E^C^U^T^E^D ^T^O
      ^D^I^S^P^L^A^Y ^T^H^E ^S^P^E^C^I^F^I^E^D ^P^A^N^E^L ^O^N ^T^H^E ^S^C^R^E^E^N.  R^O^U^T^I^N^E^S SFOPEN, SFSREA,
      ^A^N^D SFCLOS ^A^R^E ^C^A^L^L^E^D ^T^O ^O^P^E^N ^T^H^E ^P^A^N^E^L, ^D^I^S^P^L^A^Y ^I^T ^O^N ^T^H^E ^S^C^R^E^E^N
      ^F^O^R ^T^E^S^T^I^N^G, ^A^N^D ^C^L^O^S^E ^I^T.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^P^A^N^E^L ^N^A^M^E.
.HELP,O,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^E^C^O^N^D ^O^R ^O^V^E^R^L^A^Y ^P^A^N^E^L ^T^O ^B^E ^D^I^S^P^L^A^Y^E^D (^T^H^E
      ^N^A^M^E ^M^U^S^T ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S ^I^N ^L^E^N^G^T^H).  T^H^E ^P^A^N^E^L
      ^M^U^S^T ^H^A^V^E ^B^E^E^N ^C^O^M^P^I^L^E^D ^B^Y ^T^H^E P^A^N^E^L D^E^F^I^N^I^T^I^O^N U^T^I^L^I^T^Y (PDU),
      ^A^N^D ^M^U^S^T ^B^E ^O^N ^T^H^E ^L^O^C^A^L ^L^I^B^R^A^R^Y ^F^I^L^E PANELIB ^O^R ^I^N ^Y^O^U^R ^G^L^O^B^A^L
      ^L^I^B^R^A^R^Y ^S^E^T.

      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L ^H^A^S ^B^E^E^N ^P^L^A^C^E^D ^I^N ^S^C^R^E^E^N ^M^O^D^E ^W^I^T^H ^T^H^E SCREEN
      ^C^O^M^M^A^N^D, ^T^H^E ^S^C^R^E^E^N ^F^O^R^M^A^T^T^I^N^G ^O^B^J^E^C^T ^R^O^U^T^I^N^E^S ^A^R^E ^E^X^E^C^U^T^E^D ^T^O
      ^D^I^S^P^L^A^Y ^T^H^E ^S^P^E^C^I^F^I^E^D ^P^A^N^E^L ^O^N ^T^H^E ^S^C^R^E^E^N.  R^O^U^T^I^N^E^S SFOPEN, SFSREA,
      ^A^N^D SFCLOS ^A^R^E ^C^A^L^L^E^D ^T^O ^O^P^E^N ^T^H^E ^P^A^N^E^L, ^D^I^S^P^L^A^Y ^I^T ^O^N ^T^H^E ^S^C^R^E^E^N
      ^F^O^R ^T^E^S^T^I^N^G, ^A^N^D ^C^L^O^S^E ^I^T.

      D^E^F^A^U^L^T@D I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^O^N^L^Y ^T^H^E ^P^R^I^M^A^R^Y
               ^P^A^N^E^L ^I^S ^D^I^S^P^L^A^Y^E^D.
.ENDHELP
.EX.  $SHOW(P,O)
$REVERT(NOLIST)
*WEOR
.PROC,SKIP*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SKIP,^L^A^B^E^L.

      T^H^E SKIP ^C^O^M^M^A^N^D ^I^N^I^T^I^A^T^E^S ^U^N^C^O^N^D^I^T^I^O^N^A^L ^S^K^I^P^P^I^N^G ^O^F ^S^U^C^C^E^E^D^I^N^G ^C^O^M^M^A^N^D^

      S^K^I^P^P^I^N^G ^I^S ^T^E^R^M^I^N^A^T^E^D ^B^Y ^A^N ENDIF ^C^O^M^M^A^N^D ^T^H^A^T ^H^A^S ^A ^L^A^B^E^L ^S^T^R^I^N^G
      ^M^A^T^C^H^I^N^G ^T^H^E ^L^A^B^E^L ^S^T^R^I^N^G ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E SKIP ^C^O^M^M^A^N^D.

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^A^B^E^L ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 10-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G.
      T^H^E ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N ^W^I^T^H ^A^N ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SKIPEI*I
,LFN[S^P^E^C^I^F^Y ^F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SKIPEI,^L^F^N.

      T^H^E SKIPEI ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^P^O^S^I^T^I^O^N ^T^H^E ^S^P^E^C^I^F^I^E^D
      ^F^I^L^E ^A^T ^T^H^E EOI.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D. T^H^E ^F^I^L^E ^M^U^S^T ^A^L^R^E^A^D^Y
      ^E^X^I^S^T.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $SKIPEI,LFN.
*WEOR
.PROC,SKIPF*I
,LFN[F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^S^K^I^P]=(*S6(0123456789),*N=1)
,MODE[F^I^L^E ^M^O^D^E]=(C=$,C$,B=$,B$,*N=$,B$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SKIPF,^L^F^N,^N,^M.

      T^H^E SKIPF ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^B^Y^P^A^S^S, ^I^N ^A ^F^O^R^W^A^R^D
      ^D^I^R^E^C^T^I^O^N, ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^F^R^O^M ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F
      ^T^H^E ^N^A^M^E^D ^F^I^L^E.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D. T^H^E ^F^I^L^E ^M^U^S^T ^A^L^R^E^A^D^Y
      ^E^X^I^S^T.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      N^U^M^B^E^R (^I^N^T^E^G^E^R) ^O^F ^F^I^L^E^S ^T^O ^B^E ^S^K^I^P^P^E^D.

      D^E^F^A^U^L^T@D 1
.HELP,MODE,NOLIST

      F^I^L^E ^M^O^D^E@D  C ^F^O^R ^C^O^D^E^D, B ^F^O^R ^B^I^N^A^R^Y.
      I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D B
.ENDHELP
.EX.  $SKIPF,LFN,NUMBER_MODE.
*WEOR
.PROC,SKIPFB*I
,LFN[F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^S^K^I^P]=(*S6(0123456789),*N=1)
,MODE[F^I^L^E ^M^O^D^E]=(C=$,C$,B=$,B$,*N=$,B$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SKIPFB,^L^F^N,^N,^M.

      T^H^E SKIPFB ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^B^Y^P^A^S^S, ^I^N ^T^H^E ^R^E^V^E^R^S^E
      ^D^I^R^E^C^T^I^O^N, ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^F^R^O^M ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F
      ^T^H^E ^N^A^M^E^D ^F^I^L^E.
.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D. T^H^E ^F^I^L^E ^M^U^S^T ^A^L^R^E^A^D^Y
      ^E^X^I^S^T.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      N^U^M^B^E^R (^I^N^T^E^G^E^R) ^O^F ^F^I^L^E^S ^T^O ^B^E ^S^K^I^P^P^E^D.

      D^E^F^A^U^L^T@D 1
.HELP,MODE,NOLIST

      E^N^T^E^R   T^O ^S^P^E^C^I^F^Y

      C       C^O^D^E^D
      B       B^I^N^A^R^Y

      I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D B
.ENDHELP
.EX.  $SKIPFB,LFN,NUMBER_MODE.
*WEOR
.PROC,SKIPR*I
,LFN[F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^T^O ^S^K^I^P]=(*S6(0123456789),*N=1)
,LEVEL[S^P^E^C^I^F^Y ^L^E^V^E^L ^N^U^M^B^E^R]=(*S2(01234567),*N=)
,MODE[F^I^L^E ^M^O^D^E]=(C=$,C$,B=$,B$,*N=$,B$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SKIPR,^L^F^N,^N,^L^E^V^E^L,^M.

      SKIPR ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^B^Y^P^A^S^S, ^I^N ^A ^F^O^R^W^A^R^D
      ^D^I^R^E^C^T^I^O^N, ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^L^O^G^I^C^A^L ^R^E^C^O^R^D ^O^R ^F^I^L^E ^M^A^R^K^S ^F^R^O^M
      ^T^H^E ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^N^A^M^E^D ^F^I^L^E.
.HELP,LFN,NOLIST

      N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^P^O^S^I^T^I^O^N^E^D.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      N^U^M^B^E^R (^D^E^C^I^M^A^L) ^O^F ^F^I^L^E^S ^T^O ^B^E ^S^K^I^P^P^E^D.

      D^E^F^A^U^L^T@D 1
.HELP,LEVEL,NOLIST

      E^N^T^E^R ^T^H^E ^L^E^V^E^L ^N^U^M^B^E^R.  T^H^E ^L^E^V^E^L ^N^U^M^B^E^R ^M^U^S^T ^F^A^L^L ^I^N ^T^H^E ^R^A^N^G^E
      0<^L^E^V^E^L<17.  I^F 0<^L^E^V^E^L<16, ^B^O^T^H EOR ^A^N^D EOF ^M^A^R^K^S ^A^R^E ^C^O^U^N^T^E^D.
      I^F ^L^E^V^E^L ^I^S 17, ^O^N^L^Y EOF ^M^A^R^K^S ^A^R^E ^C^O^U^N^T^E^D.

      D^E^F^A^U^L^T@D 0 (^Z^E^R^O).
.HELP,MODE,NOLIST

      E^N^T^E^R     T^O ^S^P^E^C^I^F^Y

        C       C^O^D^E^D
        B       B^I^N^A^R^Y

      I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D B
.ENDHELP
.EX.  $SKIPR,LFN,NUMBER_LEVEL_MODE.
*WEOR
.PROC,SLOAD*I
,LFN[F^I^L^E ^F^R^O^M ^W^H^I^C^H ^M^O^D^U^L^E^S ^A^R^E ^L^O^A^D^E^D]=(*F,*N=)
,R[R^E^W^I^N^D ^F^I^L^E ^B^E^F^O^R^E ^L^O^A^D^I^N^G]=(YES=$/R$,Y=$/R$,*K=$/R$,NO=$/NR$,N=$/NR$,
         NR=$/NR$,*N=)
,NAME[N^A^M^E(^S) ^O^F ^M^O^D^U^L^E^S ^T^O ^B^E ^L^O^A^D^E^D]=(*A40,*N=)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SLOAD,^L^F^N,^N^A^M^E1,...,^N^A^M^E^N.

      T^H^E SLOAD ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^T^H^E ^L^O^A^D^E^R ^T^O ^L^O^A^D ^M^O^D^U^L^E^S ^F^R^O^M ^A ^L^O^C^A^L
      ^F^I^L^E.  T^O ^S^P^E^C^I^F^Y ^R^E^W^I^N^D ^O^R ^N^O ^R^E^W^I^N^D ^F^O^R ^T^H^E ^F^I^L^E, ^E^N^T^E^R ^L^F^N/R ^O^R
      ^L^F^N/NR.

.HELP,LFN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^F^R^O^M ^W^H^I^C^H ^T^O ^L^O^A^D ^M^O^D^U^L^E^S.
.HELP,R,NOLIST

      F^O^R ^E^A^C^H ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E SLOAD ^C^O^M^M^A^N^D, ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^R^E^W^I^N^D
      ^O^R ^N^O ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G@D

        R     F^O^R^C^E^S ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G (^D^E^F^A^U^L^T).

        NR    I^N^H^I^B^I^T^S ^R^E^W^I^N^D ^P^R^I^O^R ^T^O ^L^O^A^D^I^N^G.
.HELP,NAME,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E^S ^O^F ^T^H^E ^M^O^D^U^L^E^S ^T^O ^B^E ^L^O^A^D^E^D ^I^N ^T^H^E ^O^R^D^E^R ^E^N^C^O^U^N^T^E^R^E^D
      ^O^N ^L^F^N.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SORT*I
,LFN[S^P^E^C^I^F^Y ^F^I^L^E ^N^A^M^E ^T^O ^B^E ^S^O^R^T^E^D]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^L^E^A^D^I^N^G ^L^I^N^E ^N^U^M^B^E^R ^D^I^G^I^T^S]=(*S2(0123456789),*N=5)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SORT,^L^F^N,NC=^N.

      T^H^E SORT ^C^O^M^M^A^N^D ^S^O^R^T^S ^A ^F^I^L^E ^O^F ^L^I^N^E ^I^M^A^G^E^S ^I^N ^N^U^M^E^R^I^C^A^L ^O^R^D^E^R ^B^A^S^E^D
      ^O^N ^L^E^A^D^I^N^G ^L^I^N^E ^N^U^M^B^E^R^S ^C^O^N^S^I^S^T^I^N^G ^O^F ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^D^I^G^I^T^S.
.HELP,LFN,NOLIST

      L^O^G^I^C^A^L ^F^I^L^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^S^O^R^T^E^D; ^F^I^L^E ^M^A^Y ^B^E ^A ^L^O^C^A^L ^F^I^L^E ^O^R
      ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^P^E^R^M^A^N^E^N^T ^F^I^L^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NC=^N) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^L^E^A^D^I^N^G ^L^I^N^E ^N^U^M^B^E^R ^D^I^G^I^T^S
      ^O^N ^W^H^I^C^H ^T^H^E ^F^I^L^E ^I^S ^T^O ^B^E ^S^O^R^T^E^D; ^N<=10.

      D^E^F^A^U^L^T@D 5
.ENDHELP
.EX.  $SORT(LFN,#NC=NUMBER)
*WEOR
.PROC,STIME*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  STIME

      T^H^E STIME ^C^O^M^M^A^N^D ^R^E^Q^U^E^S^T^S ^T^H^A^T ^T^H^E ^A^C^C^U^M^U^L^A^T^E^D SRU ^V^A^L^U^E ^F^O^R ^T^H^E ^J^O^B ^B^E
      ^I^S^S^U^E^D ^T^O ^T^H^E ^J^O^B'^S ^D^A^Y^F^I^L^E.
.ENDHELP
.EX.  $STIME.
*WEOR
.PROC,SUBMIT*I
,LFN[F^I^L^E ^T^O ^B^E ^S^U^B^M^I^T^T^E^D]=(*F)
,Q[S^P^E^C^I^F^Y ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^O^U^T^P^U^T]=(B,BC,N,NO,E,RB,TO,*N=)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,C[P^R^E^F^I^X ^F^O^R ^R^E^F^O^R^M^A^T^T^I^N^G ^D^I^R^E^C^T^I^V^E^S]=($/$,$#$,$!$,$*$,*N=$/$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SUBMIT,^L^F^N,^Q,NR.^C.

      T^H^E SUBMIT ^C^O^M^M^A^N^D ^P^L^A^C^E^S ^A ^U^S^E^R-^S^U^P^P^L^I^E^D ^J^O^B ^F^I^L^E ^I^N^T^O ^T^H^E
      ^I^N^P^U^T ^Q^U^E^U^E ^A^S ^A ^S^E^P^A^R^A^T^E ^J^O^B.
.HELP,LFN,NOLIST

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^S^U^B^M^I^T^T^E^D ^T^O ^T^H^E ^S^Y^S^T^E^M ^F^O^R
      ^P^R^O^C^E^S^S^I^N^G ^A^S ^A ^B^A^T^C^H ^J^O^B.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,Q,NOLIST

      S^P^E^C^I^F^I^E^S ^D^I^S^P^O^S^I^T^I^O^N ^O^F ^J^O^B ^O^U^T^P^U^T ^F^I^L^E^S (OUTPUT, PUNCH, PUNCHB, ^A^N^D P8
      ^A^S ^F^O^L^L^O^W^S@D

      ENTER    T^O ^S^P^E^C^I^F^Y

      BC       J^O^B ^O^U^T^P^U^T ^I^S ^D^I^S^P^O^S^E^D ^T^O ^L^O^C^A^L ^B^A^T^C^H ^Q^U^E^U^E ^T^O ^B^E ^P^R^I^N^T^E^D ^A^N^D/
               ^O^R ^P^U^N^C^H^E^D ^A^T ^T^H^E ^C^E^N^T^R^A^L ^S^I^T^E (^D^E^F^A^U^L^T ^V^A^L^U^E ^F^O^R ^N^O^N^I^N^T^E^R^A^C^T^I^V^E
               ^O^R^I^G^I^N ^J^O^B^S).

      NO       J^O^B ^O^U^T^P^U^T ^I^S ^D^I^S^C^A^R^D^E^D ^A^T ^J^O^B ^T^E^R^M^I^N^A^T^I^O^N ^U^N^L^E^S^S ^T^H^E ^F^I^L^E^S
               ^H^A^V^E ^B^E^E^N ^E^X^P^L^I^C^I^T^L^Y ^R^O^U^T^E^D (^D^E^F^A^U^L^T ^V^A^L^U^E ^F^O^R ^I^N^T^E^R^A^C^T^I^V^E
               ^O^R^I^G^I^N ^J^O^B^S).


      RB       J^O^B ^O^U^T^P^U^T ^I^S ^D^I^S^P^O^S^E^D ^T^O ^T^H^E ^R^E^M^O^T^E ^B^A^T^C^H ^Q^U^E^U^E ^F^O^R ^P^R^I^N^T^I^N^G
               ^A^T ^A ^R^E^M^O^T^E ^B^A^T^C^H ^T^E^R^M^I^N^A^L.

      TO       J^O^B ^O^U^T^P^U^T (^I^N^C^L^U^D^I^N^G ^T^H^E ^D^A^Y^F^I^L^E) ^I^S ^Q^U^E^U^E^D ^W^I^T^H ^A ^W^A^I^T
               ^D^I^S^P^O^S^I^T^I^O^N.

      D^E^F^A^U^L^T@D  NO
.HELP,NR,NOLIST

      T^H^I^S ^P^A^R^A^M^E^T^E^R (NR) ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^N^O^T ^T^O ^R^E^W^I^N^D ^T^H^E SUBMIT ^F^I^L^E
      ^O^R ^T^H^E ^F^I^L^E ^S^P^E^C^I^F^I^E^D ^O^N ^A ^CREAD ^F^O^R^M^A^T^T^I^N^G ^D^I^R^E^C^T^I^V^E ^B^E^F^O^R^E ^O^R ^A^F^T^E^R
      ^P^R^O^C^E^S^S^I^N^G.  O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^F^O^R ^R^E^W^I^N^D; ^E^N^T^E^R NR ^F^O^R ^N^O ^R^E^W^I^N^D.

      D^E^F^A^U^L^T@D  I^F NR ^I^S ^O^M^I^T^T^E^D, ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^B^U^T ^N^O^T ^A^F^T^E^R
                ^P^R^O^C^E^S^S^I^N^G.
.HELP,C,NOLIST

      T^H^I^S ^I^S ^T^H^E ^P^R^E^F^I^X ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^I^D^E^N^T^I^F^Y ^R^E^F^O^R^M^A^T^T^I^N^G ^D^I^R^E^C^T^I^V^E^S
      ^I^N ^T^H^E ^F^I^L^E ^T^O ^B^E ^S^U^B^M^I^T^T^E^D.  E^N^T^E^R ^O^N^E ^O^F ^T^H^E^S^E ^C^H^A^R^A^C^T^E^R^S@D  / # * !
      T^H^E ^R^E^F^O^R^M^A^T^T^I^N^G ^D^I^R^E^C^T^I^V^E^S ^W^I^L^L ^B^E ^P^R^O^C^E^S^S^E^D ^O^N^L^Y ^I^F ^T^H^E ^F^I^R^S^T ^L^I^N^E
      ^O^F ^T^H^E ^S^U^B^M^I^T ^F^I^L^E ^C^O^N^T^A^I^N^S ^T^H^E JOB ^D^I^R^E^C^T^I^V^E ^W^I^T^H ^T^H^E ^P^R^E^F^I^X
      ^C^H^A^R^A^C^T^E^R ^B^E^F^O^R^E ^I^T.

      D^E^F^A^U^L^T@D ^S^L^A^S^H (/).
.ENDHELP
.EX.  $SUBMIT(LFN,Q_NR.C)
*WEOR
.PROC,SWITCH*I
,SWI[S^P^E^C^I^F^Y ^T^H^E ^S^W^I^T^C^H ^T^O ^B^E ^S^E^T]=(*A1,*N)
,JSN[S^P^E^C^I^F^Y ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  SWITCH,^S^W^I^T^C^H1,^S^W^I^T^C^H2,...,^S^W^I^T^C^H^N,^J^S^N.

      T^H^E SWITCH ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^S^E^N^S^E ^S^W^I^T^C^H^E^S ^F^O^R ^R^E^F^E^R^E^N^C^E ^B^Y
      ^O^N^E ^O^F ^Y^O^U^R ^J^O^B^S.
.HELP,SWI,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^W^I^T^C^H^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^S^W^I^T^C^H(^E^S) ^T^O ^B^E ^S^E^T.  Y^O^U ^M^U^S^T
      ^D^E^N^O^T^E ^E^A^C^H ^S^W^I^T^C^H ^S^W^I^T^C^H^I ^B^Y ^A^N ^I^N^T^E^G^E^R ^I^N ^T^H^E ^R^A^N^G^E ^O^F 1 ^T^H^R^O^U^G^H 6.
      I^F ^Y^O^U ^S^P^E^C^I^F^Y 0 ^F^O^R ^T^H^I^S ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^S^E^T^S ^A^L^L ^S^E^N^S^E ^S^W^I^T^C^H^E^S.
.HELP,JSN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R ^J^S^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^J^O^B ^W^H^O^S^E
      ^S^E^N^S^E ^S^W^I^T^C^H^E^S ^W^I^L^L ^B^E ^C^H^A^N^G^E^D.  ^J^S^N ^I^S ^A^N ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R, ^I^T^S ^D^E^F^A^U
&l4C      ^I^S ^T^H^E ^C^U^R^R^E^N^T ^J^O^B.  T^H^E ^S^Y^S^T^E^M ^R^E^C^O^G^N^I^Z^E^S ^T^H^E ^J^S^N ^P^A^R^A^M^E^T^E^R ^B^Y ^I^T^S
      ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R^S; ^T^H^E^R^E^F^O^R^E, ^J^S^N ^C^A^N ^A^P^P^E^A^R ^A^N^Y^W^H^E^R^E ^I^N ^T^H^E
      ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^A^N^D ^C^A^N ^B^E ^O^M^I^T^T^E^D ^W^I^T^H^O^U^T ^L^E^A^V^I^N^G ^A ^B^L^A^N^K ^P^A^R^A^M^E^T^E^R ^F^I^
D.
.ENDHELP.
$REVERT(NOLIST)
*WEOR
.PROC,SYMPL*I
,BCF[B^I^N^A^R^Y C^O^D^E F^I^L^E (B)]=(*F,*N=LGO)
,CSR[C^H^E^C^K S^W^I^T^C^H R^A^N^G^E (C)]=(*A1,*N=C)
,PS[P^A^C^K S^W^I^T^C^H^E^S (D)]=(*A1,*N=D)
,CID[C^Y^B^E^R I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G (DB)]=(*A2,*N=DB)
,CS[C^O^M^P^I^L^E $B^E^G^I^N/$E^N^D S^T^A^T^E^M^E^N^T^S (E)]=(*A1,*N=E)
,EL[E^R^R^O^R L^E^V^E^L (EL)]=(*A2,*N=EL)
,ET[E^R^R^O^R T^E^R^M^I^N^A^T^I^O^N (ET)]=(*A2,*N=ET)
,FCS[F^O^R^T^R^A^N C^A^L^L^I^N^G S^E^Q^U^E^N^C^E (F)]=(*A1,*N=F)
,LSS[L^I^S^T A^L^L S^O^U^R^C^E S^T^A^T^E^M^E^N^T^S (H)]=(*A1,*N=H)
,SIF[S^O^U^R^C^E I^N^P^U^T F^I^L^E (I)]=(*F,*N=COMPILE)
,PNT[P^O^I^N^T^S-N^O^T-T^E^S^T^E^D (K)]=(*A1,*N=K)
,LF[L^I^S^T^I^N^G F^I^L^E (L)]=(*F,*N=OUTPUT)
,CRU[C^R^O^S^S-R^E^F^E^R^E^N^C^E U^N^R^E^F^E^R^E^N^C^E^D I^T^E^M^S (N)]=(*A1,*N=N)
,LOC[L^I^S^T O^B^J^E^C^T C^O^D^E (O)]=(*A14,*N=)
,PC[P^R^E^S^E^T C^O^M^M^O^N (P)]=(*A1,*N=P)
,CRM[L^I^S^T C^R^O^S^S-R^E^F^E^R^E^N^C^E M^A^P (R)]=(*F,*N=OUTPUT)
,SEL[E^X^E^C^U^T^I^O^N L^I^B^R^A^R^Y (S)]=(*A7,*N=LDSET)
,SC[S^Y^N^T^A^X C^H^E^C^K (T)]=(*A1,*N=T)
,SCG[S^I^N^G^L^E S^T^A^T^E^M^E^N^T C^O^D^E G^E^N^E^R^A^T^I^O^N (W)]=(*A1,*N=W)
,LSM[L^I^S^T S^T^O^R^A^G^E M^A^P (X)]=(*F,*N=OUTPUT)
,STI[SYMPL T^E^X^T I^N^P^U^T F^I^L^E (Y)]=(*F,*N=SYMTEXT)
,STL[SYMPL T^E^X^T I^N^P^U^T L^I^B^R^A^R^Y (Z)]=(*A7,*N=$ $)
.
.PROMPT, N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST
      F^O^R^M^A^T@D  SYMPL,B,C,D,DB,E,EL,ET,F,H,I=^L^F^N,K,L,N,O,P,R,S,T,W,X,Y,Z.

      T^H^E ^C^O^M^M^A^N^D SYMPL ^C^A^L^L^S ^T^H^E SYMPL ^C^O^M^P^I^L^E^R.
.HELP,BCF,NOLIST
      F^O^R^M^A^T@D  B

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^I^N^A^R^Y ^O^U^T^P^U^T ^F^I^L^E ^L^F^N.  I^F B=0, ^N^O ^B^I^N^A^R^Y
      ^O^U^T^P^U^T ^I^S ^P^R^O^D^U^C^E^D.  I^F B ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S B=LGO.
.HELP,CSR,NOLIST
      F^O^R^M^A^T@D  C

      T^H^E ^P^A^R^A^M^E^T^E^R C ^S^P^E^C^I^F^I^E^S ^T^O ^G^E^N^E^R^A^T^E ^C^O^D^E ^T^O ^C^H^E^C^K ^T^H^E ^R^A^N^G^E ^O^F ^T^H^E
      ^S^W^I^T^C^H ^R^E^F^E^R^E^N^C^E^S.  D^U^R^I^N^G ^E^X^E^C^U^T^I^O^N, ^A^N^Y ^R^E^F^E^R^E^N^C^E ^T^O ^A^N ^O^U^T-^O^F-^R^A^N^G^E
      ^S^W^I^T^C^H ^O^R ^A^N ^U^N^S^P^E^C^I^F^I^E^D ^S^W^I^T^C^H ^V^A^L^U^E ^P^R^O^D^U^C^E^S ^A ^D^I^A^G^N^O^S^T^I^C ^E^R^R^O^R ^A^N^D
      ^T^H^E ^P^R^O^G^R^A^M ^A^B^O^R^T^S.  I^F C ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O ^G^E^N^E^R^A^T^I^O^N ^O^F
      ^C^H^E^C^K^I^N^G ^C^O^D^E.
.HELP,PS,NOLIST
      F^O^R^M^A^T@D  D

      T^H^E ^P^A^R^A^M^E^T^E^R D ^S^P^E^C^I^F^I^E^S ^T^O ^G^E^N^E^R^A^T^E ^O^N^E ^W^O^R^D ^W^I^T^H ^T^W^O ^S^W^I^T^C^H ^P^O^I^N^T^S,
      ^T^H^U^S ^R^E^D^U^C^I^N^G ^T^H^E ^S^I^Z^E ^O^F ^G^E^N^E^R^A^T^E^D ^C^O^D^E ^B^U^T ^I^N^C^R^E^A^S^I^N^G ^T^H^E ^E^X^E^C^U^T^I^O^N
      ^T^I^M^E.  S^E^L^E^C^T^I^O^N ^O^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^P^R^O^D^U^C^E^S ^T^H^E ^S^A^M^E ^R^E^S^U^L^T ^A^S CONTROL
      PACK ^W^I^T^H^I^N ^A ^P^R^O^G^R^A^M.  I^F D ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^G^E^N^E^R^A^T^E ^O^N^E
      ^W^O^R^D ^F^O^R ^E^A^C^H ^S^W^I^T^C^H.
.HELP,CID,NOLIST
      F^O^R^M^A^T@D  DB

      T^H^E ^P^A^R^A^M^E^T^E^R DB ^S^P^E^C^I^F^I^E^S ^T^H^E ^G^E^N^E^R^A^T^I^O^N ^C^O^D^E ^T^O ^A^L^L^O^W CYBER I^N^T^E^R^A^C^T^I^V^E
      D^E^B^U^G ^M^O^D^E.  I^F DB=0, ^N^O ^G^E^N^E^R^A^T^I^O^N ^C^O^D^E ^I^S ^A^L^L^O^W^E^D ^T^O ^T^H^E CYBER
      I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G ^I^N^T^E^R^F^A^C^E, ^E^V^E^N ^I^F ^T^H^E ^J^O^B ^I^S ^I^N ^D^E^B^U^G ^M^O^D^E.  I^F DB ^I^S
      ^O^M^I^T^T^E^D, ^N^O ^G^E^N^E^R^A^T^I^O^N ^C^O^D^E ^I^S ^A^L^L^O^W^E^D ^T^O CYBER I^N^T^E^R^A^C^T^I^V^E D^E^B^U^G
      ^I^N^T^E^R^F^A^C^E, ^U^N^L^E^S^S ^T^H^E ^J^O^B ^I^S ^I^N ^D^E^B^U^G ^M^O^D^E (DEBUG,ON ^C^O^N^T^R^O^L ^S^T^A^T^E^M^E^N^T
      ^H^A^S ^B^E^E^N ^E^X^E^C^U^T^E^D).

      S^E^L^E^C^T^I^O^N ^O^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^E^L^E^C^T^S ^T^H^E W ^C^O^N^T^R^O^L ^S^T^A^T^E^M^
T
      ^P^A^R^A^M^E^T^E^R ^A^N^D ^S^E^T^S CONTROL TRACEBACK ^F^O^R ^T^H^E ^E^N^T^I^R^E ^P^R^O^G^R^A^M.
.HELP,CS,NOLIST
      F^O^R^M^A^T@D  E

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^C^O^M^P^I^L^A^T^I^O^N ^O^F ^T^H^E ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T^S
      ^B^R^A^C^K^E^T^E^D ^B^E^T^W^E^E^N $BEGIN ^A^N^D $END.  I^F E ^I^S ^O^M^I^T^T^E^D, ^N^O ^C^O^M^P^I^L^A^T^I^O^N ^I^S
      ^P^E^R^F^O^R^M^E^D.
.HELP,EL,NOLIST
      F^O^R^M^A^T@D  EL

      T^H^E ^P^A^R^M^E^T^E^R EL ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^E^V^E^L ^C^O^N^T^R^O^L.  T^H^E ^D^E^F^A^U^L^T ^I^S EL=F.
      I^F EL ^I^S ^O^M^I^T^T^E^D ^A^N^D ET ^I^S ^O^M^I^T^T^E^D, ^O^R ET=W, F, ^O^R C ^I^S ^S^E^L^E^C^T^E^D, ^L^I^S^T
      ^D^I^A^G^N^O^S^T^I^C^S ^O^F ^L^E^V^E^L W ^A^N^D ^H^I^G^H^E^R. I^F ET=D, ^L^I^S^T ^D^I^A^G^N^O^S^T^I^C^S ^O^F ^L^E^V^E^L D
      ^A^N^D ^H^I^G^H^E^R.  I^F ET=T, ^L^I^S^T ^D^I^A^G^N^O^S^T^I^C^S ^O^F ^L^E^V^E^L T ^A^N^D ^H^I^G^H^E^R.  T^H^E
      ^F^O^L^L^O^W^I^N^G EL ^O^P^T^I^O^N^S ^A^R^E ^L^I^S^T^E^D ^B^E^L^O^W@D

      O^P^T^I^O^N                       M^E^A^N^I^N^G

      EL    S^A^M^E ^A^S EL=F.

      D     L^I^S^T ^S^Y^S^T^E^M-^D^E^P^E^N^D^E^N^T ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D T, W, F, ^A^N^D C ^D^I^A^G^N^O^S^T^I^C^S.

      T     L^I^S^T ^T^R^I^V^I^A^L ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D W, F, ^A^N^D C ^D^I^A^G^N^O^S^T^I^C^S.

      W     L^I^S^T ^W^A^R^N^I^N^G ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D F ^A^N^D C ^D^I^A^G^N^O^S^T^I^C^S.

      F     L^I^S^T ^A^L^L ^F^A^T^A^L ^D^I^A^G^N^O^S^T^I^C^S ^A^N^D C ^D^I^A^G^N^O^S^T^I^C^S.

      C     L^I^S^T ^O^N^L^Y ^C^A^T^A^S^T^R^O^P^H^I^C ^E^R^R^O^R^S.
.HELP,ET,NOLIST
      F^O^R^M^A^T@D  ET

      T^H^E ^P^A^R^A^M^E^T^E^R ET ^S^P^E^C^I^F^I^E^S ^E^R^R^O^R ^T^E^R^M^I^N^A^T^I^O^N ^F^O^R ^A ^C^E^R^T^A^I^N ^L^E^V^E^L ^O^F ^E^R^R^O

      F^O^R ^A^N ^E^X^P^L^A^N^A^T^I^O^N ^O^F ^T^H^E ^E^R^R^O^R ^L^E^V^E^L^S, ^R^E^F^E^R ^T^O ^T^H^E EL ^P^A^R^A^M^E^T^E^R.  I^F
      ET ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ET=F.  I^F ET ^I^S ^O^M^I^T^T^E^D, ^T^H^E^N ET=C.  T^H^E
      ^F^O^L^L^O^W^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^L^I^S^T^E^D ^B^E^L^O^W@D

      O^P^T^I^O^N                       M^E^A^N^I^N^G

      ET    S^A^M^E ^A^S ET=F.

      ET=D  A^B^O^R^T ^J^O^B ^S^T^E^P ^I^F ^E^R^R^O^R^S ^O^F ^L^E^V^E^L D ^O^R ^H^I^G^H^E^R ^O^C^C^U^R.

      ET=T  A^B^O^R^T ^J^O^B ^S^T^E^P ^I^F ^E^R^R^O^R^S ^O^F ^L^E^V^E^L T ^O^R ^H^I^G^H^E^R ^O^C^C^U^R.

      ET=W  A^B^O^R^T ^J^O^B ^S^T^E^P ^I^F ^E^R^R^O^R^S ^O^F ^L^E^V^E^L W ^O^R ^H^I^G^H^E^R ^O^C^C^U^R.

      ET=F  A^B^O^R^T ^J^O^B ^S^T^E^P ^I^F ^E^R^R^O^R^S ^O^F ^L^E^V^E^L F ^O^R ^H^I^G^H^E^R ^O^C^C^U^R.

      ET=C  A^B^O^R^T ^J^O^B ^S^T^E^P ^I^F ^E^R^R^O^R^S ^O^F ^L^E^V^E^L C ^O^C^C^U^R.
.HELP,FCS,NOLIST
      F^O^R^M^A^T@D  F

      T^H^E ^P^A^R^A^M^E^T^E^R F ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^A^T^I^O^N ^O^F ^A ^W^O^R^D ^O^F ^A^L^L ^Z^E^R^O^S ^A^T ^T^H^E
      ^E^N^D ^O^F ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^L^I^S^T ^A^S ^R^E^Q^U^I^R^E^D ^B^Y ^T^H^E FORTRAN ^C^A^L^L^I^N^G ^S^E^Q^U^E^N^C^E.
      S^E^L^E^C^T^I^O^N ^O^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^P^R^O^D^U^C^E^S ^T^H^E ^S^A^M^E ^R^E^S^U^L^T ^A^S ^A CONTROL FTNCALL
      ^S^T^A^T^E^M^E^N^T ^W^I^T^H^I^N ^A ^P^R^O^G^R^A^M.  T^H^E ^D^E^F^A^U^L^T ^I^S F.  I^F F ^I^S ^O^M^I^T^T^E^D, ^N^O
      ^C^O^M^P^I^L^A^T^I^O^N ^I^S ^P^E^R^F^O^R^M^E^D.
.HELP,LSS,NOLIST
      F^O^R^M^A^T@D  H

      T^H^E ^P^A^R^A^M^E^T^E^R H ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^F ^A^L^L ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T^S, ^R^E^G^A^R^D^L^
S
      ^O^F CONTROL NOLIST ^S^T^A^T^E^M^E^N^T^S ^W^I^T^H^I^N ^T^H^E ^P^R^O^G^R^A^M.  I^F H ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^L^I^S^T ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T^S ^A^R^E ^L^I^S^T^E^D ^A^C^C^O^R^D^I^N^G ^T^O CONTROL NOLIST ^A^N^D
      CONTROL LIST ^S^T^A^T^E^M^E^N^T^S ^W^I^T^H^I^N ^T^H^E ^P^R^O^G^R^A^M.  T^H^E ^D^E^F^A^U^L^T ^I^S H.
.HELP,SIF,NOLIST
      F^O^R^M^A^T@D  I=^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R I ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^E ^C^A^R^D ^I^M^A^G^E^S ^F^I^L^E ^L^F^N.  I^F ^L^F^N ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S COMPILE.  I^F I ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S INPUT.
.HELP,PNT,NOLIST
      F^O^R^M^A^T@D  K

      T^H^E ^P^A^R^A^M^E^T^E^R K ^S^P^E^C^I^F^I^E^S ^T^H^E ^G^E^N^E^R^A^T^I^O^N ^O^F ^A^N RJ ^T^O ^T^H^E ^P^O^I^N^T^S-^N^O^T-^T^E^S^T^E^
      ^I^N^T^E^R^F^A^C^E ^R^O^U^T^I^N^E SYMCK$ ^A^F^T^E^R ^E^V^E^R^Y ^L^A^B^E^L ^A^N^D ^C^O^N^D^I^T^I^O^N^A^L ^J^U^M^P.  T^H^E
      ^U^S^E^R ^M^U^S^T ^S^U^P^P^L^Y ^T^H^E ^R^O^U^T^I^N^E SYMCK$.  T^H^E ^D^E^F^A^U^L^T ^I^S K.  I^F K ^I^S ^O^M^I^T^T^E^D,
      ^N^O ^G^E^N^E^R^A^T^I^O^N ^I^S ^P^R^O^D^U^C^E^D.
.HELP,LF,NOLIST
      F^O^R^M^A^T@D  L

      T^H^E ^P^A^R^A^M^E^T^E^R L ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^L^F^N.  A^N^Y O, R, ^O^R X ^P^A^R^A^M^E^T^E^R
      ^M^U^S^T ^B^E ^C^O^N^C^A^T^E^N^A^T^E^D ^W^I^T^H ^A^N^Y L ^P^A^R^A^M^E^T^E^R (^F^O^R ^E^X^A^M^P^L^E, LXOR=PRINTIT).
      T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.  I^F L ^I^S ^O^M^I^T^T^E^D, ^A^N^D ^P^A^R^A^M^E^T^E^R^S O, R, ^O^R X ^A^R^E ^N^O^T
      ^S^P^E^C^I^F^I^E^D, ^W^R^I^T^E ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T ^L^I^S^T^I^N^G ^A^N^D ^D^I^A^G^N^O^S^T^I^C^S ^T^O ^F^I^L^E OUTPUT.
      I^F O, R, ^O^R X ^A^R^E ^S^P^E^C^I^F^I^E^D, ^S^U^P^P^R^E^S^S ^S^O^U^R^C^E ^L^I^S^T^I^N^G.  T^H^E ^F^O^L^L^O^W^I^N^G
      ^O^P^T^I^O^N^S ^A^R^E ^A^S ^F^O^L^L^O^W^S@D

      O^P^T^I^O^N                  M^E^A^N^I^N^G

      L        W^R^I^T^E ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T ^L^I^S^T^I^N^G ^A^N^D ^D^I^A^G^N^O^S^T^I^C^S ^T^O ^F^I^L^E OUTPUT.

      L=1      W^R^I^T^E ^S^U^M^M^A^R^Y ^O^F ^R^E^S^O^U^R^C^E^S ^U^S^E^D ^T^O ^F^I^L^E OUTPUT.

      L=0      S^U^P^P^R^E^S^S ^A^L^L ^L^I^S^T^I^N^G ^O^U^T^P^U^T, ^I^N^C^L^U^D^I^N^G ^T^H^A^T ^S^E^L^E^C^T^E^D ^B^Y O, R, ^A^N^D
               X; ^L^I^S^T ^O^N^L^Y ^D^I^A^G^N^O^S^T^I^C^S.

      L=^L^F^N    W^R^I^T^E ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T ^L^I^S^T^I^N^G ^A^N^D ^D^I^A^G^N^O^S^T^I^C^S ^T^O ^F^I^L^E ^L^F^N.
.HELP,CRU,NOLIST
      F^O^R^M^A^T@D  N

      T^H^E ^P^A^R^A^M^E^T^E^R N ^S^P^E^C^I^F^I^E^S ^T^O ^L^I^S^T ^R^E^F^E^R^E^N^C^E^D ^A^N^D ^U^N^R^E^F^E^R^E^N^C^E^D ^D^A^T^A ^I^T^E^M

      ^O^N ^T^H^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^M^A^P ^S^E^L^E^C^T^E^D ^B^Y ^T^H^E R ^P^A^R^A^M^E^T^E^R.  I^F N ^I^S ^O^M^I^T^T^E^D,
      ^L^I^S^T ^O^N^L^Y ^T^H^E ^R^E^F^E^R^E^N^C^E^D ^I^T^E^M^S ^O^N ^T^H^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^M^A^P ^S^E^L^E^C^T^E^D ^B^Y ^T






      R ^P^A^R^A^M^E^T^E^R.
.HELP,LOC,NOLIST
      F^O^R^M^A^T@D  O

      T^H^E ^P^A^R^A^M^E^T^E^R O ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^F ^T^H^E ^B^I^N^A^R^Y ^O^B^J^E^C^T ^C^O^D^E.  A^N^Y L,
      R, ^O^R X ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^C^O^N^C^A^T^E^N^A^T^E^D ^W^I^T^H ^A^N^Y O ^P^A^R^A^M^E^T^E^R (^F^O^R ^E^X^A^M^P^L^E,
      OL=LIST/ 35/45).  I^F O ^I^S ^O^M^I^T^T^E^D, ^N^O ^B^I^N^A^R^Y ^O^B^J^E^C^T ^C^O^D^E ^I^S ^P^R^O^D^U^C^E^D.  T^H^E
      ^F^O^L^L^O^W^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^L^I^S^T^E^D ^B^E^L^O^W@D

      O^P^T^I^O^N                                 M^E^A^N^I^N^G

      O=^S^T/^E^N^D       L^I^S^T ^B^I^N^A^R^Y ^O^B^J^E^C^T ^C^O^D^E ^G^E^N^E^R^A^T^E^D ^B^Y ^T^H^E ^R^A^N^G^E ^O^F ^S^O^U^R^C^E
                     ^S^T^A^T^E^M^E^N^T^S ^I^N^D^I^C^A^T^E^D@D

                     ^S^T    N^U^M^B^E^R ^O^F ^F^I^R^S^T ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T ^W^H^O^S^E ^O^B^J^E^C^T ^C^O^D^E ^I^S
                           ^T^O ^B^E ^L^I^S^T^E^D.  D^E^F^A^U^L^T ^I^S 0.

                     ^E^N^D   N^U^M^B^E^R ^O^F ^L^A^S^T ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T ^W^H^O^S^E ^O^B^J^E^C^T ^C^O^D^E ^I^S
                           ^T^O ^B^E ^L^I^S^T^E^D.  D^E^F^A^U^L^T ^I^S ^L^A^S^T ^S^T^A^T^E^M^E^N^T ^I^N ^P^R^O^G^R^A^M.

                     I^F ^O^N^L^Y ^O^N^E ^N^U^M^B^E^R ^A^P^P^E^A^R^S ^A^F^T^E^R =, ^I^T ^I^S ^P^R^E^S^U^M^E^D ^T^O ^B^E
                     ^T^H^E ^E^N^D.

      O=^L^F^N/^S^T/^E^N^D   L^I^S^T ^B^I^N^A^R^Y ^O^B^J^E^C^T ^C^O^D^E ^F^R^O^M ^S^P^E^C^I^F^I^E^D ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T^S ^O

                     ^F^I^L^E ^L^F^N.  ^S^T ^A^N^D ^E^N^D ^A^R^E ^S^A^M^E ^A^S ^A^B^O^V^E.
.HELP,PC,NOLIST
      F^O^R^M^A^T@D  P

      T^H^E ^P^A^R^A^M^E^T^E^R P ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^I^T^I^A^L^I^Z^A^T^I^O^N ^O^F ^D^A^T^A ^I^T^E^M^S ^I^N ^C^O^M^M^O^N ^B^L^
K^S
      ^A^C^C^O^R^D^I^N^G ^T^O ^T^H^E ^P^R^E^S^E^T ^V^A^L^U^E^S ^I^N ^T^H^E ^D^A^T^A ^D^E^C^L^A^R^A^T^I^O^N^S.  T^H^E ^D^E^F^A^U^L^T ^I^S
      P.  I^F P ^I^S ^O^M^I^T^T^E^D, ^C^O^M^M^O^N ^B^L^O^C^K^S ^A^R^E ^N^O^T ^I^N^I^T^I^A^L^I^Z^E^D.
.HELP,CRM,NOLIST
      F^O^R^M^A^T@D  R

      T^H^E ^P^A^R^A^M^E^T^E^R R ^S^P^E^C^I^F^I^E^S ^T^O ^L^I^S^T ^T^H^E ^C^R^O^S^S-^R^E^F^E^R^E^N^C^E ^T^A^B^L^E ^A^N^D ^C^O^M^M^O^N
      ^B^L^O^C^K^S ^O^N ^F^I^L^E ^L^F^N.  A^N^Y L, O, ^O^R X ^P^A^R^A^M^E^T^E^R ^M^U^S^T ^B^E ^C^O^N^C^A^T^E^N^A^T^E^D ^W^I^T^H
      ^A^N^Y R ^P^A^R^A^M^E^T^E^R (^F^O^R ^E^X^A^M^P^L^E, RX=SHOW).  T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.  I^F R ^I^S
      ^O^M^I^T^T^E^D, ^N^O ^L^I^S^T^I^N^G ^I^S ^P^R^O^D^U^C^E^D.
.HELP,SEL,NOLIST
      F^O^R^M^A^T@D  S

      T^H^E ^P^A^R^A^M^E^T^E^R S ^S^P^E^C^I^F^I^E^S ^L^I^B^R^A^R^Y ^E^X^E^C^U^T^I^O^N.  I^F S ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S LDSET ^T^A^B^L^E^S ^W^I^T^H ^R^E^F^E^R^E^N^C^E^S ^T^O ^L^I^B^R^A^R^I^E^S@D

      SYMLIB/FORTRAN ^F^O^R NOS ^A^N^D NOS/BE ^O^P^E^R^A^T^I^N^G ^S^Y^S^T^E^M^S.
      SYMIO/FORTRAN ^F^O^R SCOPE 2 ^O^P^E^R^A^T^I^N^G ^S^Y^S^T^E^M.

      T^H^E ^F^O^L^L^O^W^I^N^G ^O^P^T^I^O^N^S ^A^R^E ^L^I^S^T^E^D ^B^E^L^O^W@D

      O^P^T^I^O^N               M^E^A^N^I^N^G

      S=0      S^U^P^P^R^E^S^S LDSET ^T^A^B^L^E ^G^E^N^E^R^A^T^I^O^N.

      S=^L^I^B    G^E^N^E^R^A^T^E LDSET ^T^A^B^L^E^S ^W^I^T^H ^R^E^F^E^R^E^N^C^E^S ^T^O ^L^I^B^R^A^R^Y ^L^I^B.  M^U^L^T^I^P^L^E
               ^L^I^B^R^A^R^I^E^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^S^L^A^S^H^E^S ^B^E^T^W^E^E^N ^L^I^B^R^A^R^Y ^N^A^M^E^S,
               ^F^O^R ^E^X^A^M^P^L^E, S=AAA/MMM/TTT.  A ^M^A^X^I^M^U^M ^O^F ^S^E^V^E^N ^L^I^B^R^A^R^I^E^S ^C^A^N ^B^E
               ^S^P^E^C^I^F^I^E^D.
.HELP,SC,NOLIST
      F^O^R^M^A^T@D  T

      T^H^E ^P^A^R^A^M^E^T^E^R T ^S^P^E^C^I^F^I^E^S ^C^H^E^C^K^I^N^G ^S^Y^N^T^A^X ^E^R^R^O^R ^A^N^D ^N^O ^G^E^N^E^R^A^T^I^O^N ^O^F
      ^B^I^N^A^R^Y ^C^O^D^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^N^U^L^L^I^F^I^E^S ^A^N^Y B, O, R, ^O^R X ^P^A^R^A^M^E^T^E^R^S.  T^H^E
      ^D^E^F^A^U^L^T ^I^S T.  I^F T ^I^S ^O^M^I^T^T^E^D, ^S^Y^N^T^A^X ^E^R^R^O^R^S ^A^R^E ^C^H^E^C^K^E^D ^A^N^D ^B^I^N^A^R^Y ^C^O^D^E
      ^I^S ^G^E^N^E^R^A^T^E^D.
.HELP,SCG,NOLIST
      F^O^R^M^A^T@D  W

      T^H^E ^P^A^R^A^M^E^T^E^R W ^S^P^E^C^I^F^I^E^S ^T^H^E ^G^E^N^E^R^A^T^I^O^N ^O^F ^O^B^J^E^C^T ^C^O^D^E ^T^H^A^T ^M^A^I^N^T^A^I^N^S ^
      ^C^L^O^S^E ^C^O^R^R^E^S^P^O^N^D^E^N^C^E ^W^I^T^H ^I^T^S ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T.  I^F W ^I^S ^O^M^I^T^T^E^D, ^O^B^J^E^C^T
      ^C^O^D^E ^I^S ^G^E^N^E^R^A^T^E^D ^W^I^T^H ^M^U^L^T^I^P^L^E ^S^O^U^R^C^E ^S^T^A^T^E^M^E^N^T^S ^I^N^T^E^R^M^I^X^E^D.
.HELP,LSM,NOLIST
      F^O^R^M^A^T@D  X

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^S^T^I^N^G ^O^F ^S^T^O^R^A^G^E ^M^A^P ^A^N^D ^C^O^M^M^O^N ^B^L^O^C^K^S ^O

      ^F^I^L^E ^L^F^N. T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.  I^F X ^I^S ^O^M^I^T^T^E^D, ^N^O ^L^I^S^T^I^N^G ^I^S ^P^R^O^D^U^C^E^D.
      A^N^Y L, R, ^O^R O ^P^A^R^A^M^E^T^E^R^S ^M^U^S^T ^B^E ^C^O^N^C^A^T^E^N^A^T^E^D ^W^I^T^H ^A^N^Y X ^P^A^R^A^M^E^T^E^R (^F^O^R
      ^E^X^A^M^P^L^E, RX=OUTPUT).
.HELP,STI,NOLIST
      F^O^R^M^A^T@D  Y

      T^H^E ^P^A^R^A^M^E^T^E^R Y ^S^P^E^C^I^F^I^E^S ^T^O ^R^E^A^D SYMPL ^T^E^X^T^S ^N^A^M^E^D ^I^N ^T^H^E USETEXT
      ^S^T^A^T^E^M^E^N^T ^F^R^O^M ^F^I^L^E ^L^F^N.  T^H^E ^D^E^F^A^U^L^T ^I^S SYMTEXT.  I^F Y=0 ^O^R ^O^M^I^T^T^E^D, ^N^O
      SYMPL ^T^E^X^T ^I^S ^R^E^A^D ^F^R^O^M ^A ^F^I^L^E.
.HELP,STL,NOLIST
      F^O^R^M^A^T@D  Z

      T^H^E ^P^A^R^A^M^E^T^E^R Z ^S^P^E^C^I^F^I^E^S ^T^O ^R^E^A^D SYMPL ^T^E^X^T^S ^N^A^M^E^D ^I^N ^T^H^E USETEXT
      ^S^T^A^T^E^M^E^N^T ^F^R^O^M ^T^H^E ^J^O^B'^S ^C^U^R^R^E^N^T ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T ^L^I^B.  T^H^E ^D^E^F^A^U^L^T ^I^S
      ^T^H^E ^J^O^B'^S ^C^U^R^R^E^N^T ^G^L^O^B^A^L ^L^I^B^R^A^R^Y ^S^E^T.  I^F Z=0 ^O^R ^O^M^I^T^T^E^D, ^N^O SYMPL ^T^E^X^T
      ^I^S ^R^E^A^D ^F^R^O^M ^A ^L^I^B^R^A^R^Y.
.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,TCOPY*I
,I[I^N^P^U^T ^F^I^L^E (I)]=(*K,*F)
,O[D^A^T^A ^O^U^T^P^U^T ^F^I^L^E (O)]=(*K,*F,*N=OUTPUT)
,F[D^A^T^A ^C^O^N^V^E^R^S^I^O^N ^F^O^R^M^A^T (F)]=(E,B,X,SI,*N=X)
,TC[T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N (TC)]=(F,EOF,I,EOI,D,EOD,*N=D)
,N[C^O^P^Y ^C^O^U^N^T (N)]=(*S6(0123456789),*N=1)
,CC[B^L^O^C^K ^S^I^Z^E (CC)]=(*S6(0123456789),*N=)
,EL[E^R^R^O^R ^T^H^R^E^S^H^O^L^D (EL)]=(*S6(0123456789),*N=0)
,PO[P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S (PO)]=(*S2(ET),*N=)
,L[L^I^S^T^I^N^G ^F^I^L^E (L)]=(*F,*N=OUTPUT)
,NS[N^O^I^S^E ^S^I^Z^E (NS)]=(*S2(0123456789),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TCOPY,I=^L^F^N1,O=^L^F^N2,F=^F^O^R^M^A^T,TC=^T^C,N=^C^O^P^Y^C^N^T,CC=^C^H^A^R^C^N^T,
                     EL=^E^R^L^I^M^I^T,PO=^P1^P2,L=^L^F^N3,NS=^N^S.

      T^H^E TCOPY ^C^O^M^M^A^N^D ^C^O^P^I^E^S X (^E^X^T^E^R^N^A^L) ^F^O^R^M^A^T ^B^I^N^A^R^Y ^T^A^P^E^S ^O^R
      E (^L^I^N^E ^I^M^A^G^E), B (^B^L^O^C^K^E^D), ^O^R SI (^S^Y^S^T^E^M ^I^N^T^E^R^N^A^L) ^F^O^R^M^A^T ^C^O^D^E^D ^T^A^P^E^S
      ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, ^T^O ^A^N I ^F^O^R^M^A^T ^T^A^P^E, ^O^R ^T^O ^A^N SI ^B^I^N^A^R^Y ^F^O^R^M^A^T ^T^A^P^E.
.HELP,I,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^C^O^P^Y ^F^R^O^M.
      A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E 1- ^T^O 7- ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,O,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R O=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^C^O^P^Y ^T^O.

      D^E^F^A^U^L^T@D  OUTPUT.  S^I^N^C^E OUTPUT ^I^S ^A^L^S^O ^T^H^E ^D^E^F^A^U^L^T ^F^O^R ^T^H^E ^A^L^T^E^R^N^A^T^E
                ^O^U^T^P^U^T ^F^I^L^E L=^L^F^N3, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E ^O^T^H^E^R ^T^H^A^N
                OUTPUT ^F^O^R ^E^I^T^H^E^R O=^L^F^N2 ^O^R L=^L^F^N3.
.HELP,F,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R F=^F^O^R^M^A^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^C^O^N^V^E^R^S^I^O^N ^F^O^R ^T^H^E
      ^C^O^P^Y ^O^P^E^R^A^T^I^O^N.  T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^A^R^E ^P^O^S^S^I^B^L^E@D

      ^F^O^R^M^A^T                    D^E^S^C^R^I^P^T^I^O^N
      ------                    -----------
      E       C^O^P^Y ^A^N E ^F^O^R^M^A^T ^T^A^P^E ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I, ^O^R ^A^N
              SI ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E, ^O^R ^G^E^N^E^R^A^T^E ^A ^N^E^W E ^F^O^R^M^A^T ^T^A^P^E
              ^F^R^O^M ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I, ^O^R ^A^N SI ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E.
              T^H^E E ^T^A^P^E ^M^U^S^T ^B^E ^U^N^L^A^B^E^L^E^D ^A^N^D ^A^S^S^I^G^N^E^D ^A^S S ^F^O^R^M^A^T.

      B       C^O^P^Y ^A B ^F^O^R^M^A^T ^T^A^P^E ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I, ^O^R ^A^N SI
              ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E, ^O^R ^G^E^N^E^R^A^T^E ^A ^N^E^W B ^T^A^P^E ^F^R^O^M ^M^A^S^S
              ^S^T^O^R^A^G^E, ^A^N I ^O^R  ^A^N SI ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E.  T^H^E B ^T^A^P^E
              ^M^U^S^T ^B^E ^U^N^L^A^B^E^L^E^D ^O^R ^A^S^S^I^G^N^E^D ^A^S S ^O^R L ^F^O^R^M^A^T.

      X       C^O^P^Y ^A^N X ^F^O^R^M^A^T ^T^A^P^E ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I, ^O^R ^A^N SI
              ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E.  T^H^E ^U^N^L^A^B^E^L^E^D ^I^N^P^U^T ^T^A^P^E ^M^U^S^T ^B^E
              ^A^S^S^I^G^N^E^D ^A^N S ^O^R L ^F^O^R^M^A^T, ^W^I^T^H ^N^O^I^S^E ^S^I^Z^E ^O^F ^E^I^G^H^T ^F^R^A^M^E^S
              ^F^O^R ^S^E^V^E^N-^T^R^A^C^K ^T^A^P^E ^O^R ^S^I^X ^F^R^A^M^E^S ^F^O^R ^N^I^N^E-^T^R^A^C^K ^T^A^P^E
              (^R^E^F^E^R ^T^O NS ^P^A^R^A^M^E^T^E^R ^O^N ^T^A^P^E ^A^S^S^I^G^N^M^E^N^T ^C^O^M^M^A^N^D).

      SI      C^O^P^Y ^A^N SI ^C^O^D^E^D ^F^O^R^M^A^T ^T^A^P^E ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I, ^O^R ^A^N
              SI ^B^I^N^A^R^Y ^T^A^P^E ^F^I^L^E.  T^H^E ^L^A^B^E^L^E^D ^O^R ^U^N^L^A^B^E^L^E^D ^I^N^P^U^T ^T^A^P^E
              ^M^U^S^T ^B^E ^A^S^S^I^G^N^E^D ^A^S S ^O^R L ^F^O^R^M^A^T, ^W^I^T^H ^N^O^I^S^E ^S^I^Z^E ^O^F ^E^I^G^H^T
              ^F^R^A^M^E^S ^F^O^R ^N^I^N^E-^T^R^A^C^K ^T^A^P^E (^R^E^F^E^R ^T^O NS ^P^A^R^A^M^E^T^E^R ^O^N ^T^A^P^E
              ^A^S^S^I^G^N^M^E^N^T ^C^O^M^M^A^N^D).  I^F ^T^H^E SI ^C^O^D^E^D ^I^N^P^U^T ^T^A^P^E ^I^S
              ^C^O^M^P^L^E^T^E^D ^B^E^F^O^R^E EOI ^I^S ^E^N^C^O^U^N^T^E^R^E^D, ^T^H^E ^P^O^S^I^T^I^O^N ^O^F ^T^H^E
              ^I^N^P^U^T ^T^A^P^E ^A^F^T^E^R ^T^H^E ^C^O^P^Y ^I^S ^I^N^D^E^T^E^R^M^I^N^A^T^E.  T^H^I^S ^I^S ^B^E^C^A^U^S^E
              ^C^O^N^T^R^O^L ^W^O^R^D^S ^A^R^E ^U^S^E^D ^O^N ^T^H^E SI ^C^O^D^E^D ^T^A^P^E READ ^V^I^A S ^O^R L ^F^O^R^M^A^T
              (EOF ^O^N ^A^N SI ^C^O^D^E^D ^T^A^P^E ^I^S ^A ^L^E^V^E^L 17B ^B^L^O^C^K ^T^E^R^M^I^N^A^T^O^R,
              ^W^H^E^R^E^A^S EOF ^O^N ^A^N S ^O^R L ^T^A^P^E ^I^S ^A ^T^A^P^E ^M^A^R^K).

      I       C^O^P^Y ^A^N I ^F^O^R^M^A^T^T^E^D ^T^A^P^E ^T^O ^M^A^S^S ^S^T^O^R^A^G^E, I ^O^R ^A^N SI-^B^I^N^A^R^Y
              ^F^I^L^E (I ^F^O^R^M^A^T ^I^S ^N^O^T ^A^N ^O^B^S^O^L^E^T^E ^F^O^R^M^A^T; ^T^H^I^S ^O^P^T^I^O^N ^H^A^S ^B^E^E^N
              ^I^N^C^L^U^D^E^D ^T^O ^S^I^M^P^L^I^F^Y ^R^E^C^O^V^E^R^Y ^O^F ^D^A^T^A ^F^R^O^M ^O^V^E^R^W^R^I^T^T^E^N ^T^A^P^E^S).
              T^H^E ^L^A^B^E^L^E^D ^O^R ^U^N^L^A^B^E^L^E^D ^I^N^P^U^T ^T^A^P^E ^M^U^S^T ^B^E ^A^S^S^I^G^N^E^D ^A^S ^A^N L
              ^F^O^R^M^A^T ^T^A^P^E.  I^F ^T^H^E ^T^E^R^M^I^N^A^T^I^N^G ^C^O^N^D^I^T^I^O^N ^S^P^E^C^I^F^I^E^D ^I^S ^O^T^H^E^R
              ^T^H^A^N EOI, ^T^H^E^N ^T^H^E ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^I^N^P^U^T ^T^A^P^E ^A^F^T^E^R ^T^H^E ^C^O^P^Y
              ^I^S ^I^N^D^E^T^E^R^M^I^N^A^T^E.  T^H^I^S ^I^S ^B^E^C^A^U^S^E ^C^O^N^T^R^O^L ^W^O^R^D^S ^A^R^E ^U^S^E^D ^O^N
              ^A^N I ^F^O^R^M^A^T ^T^A^P^E ^R^E^A^D ^V^I^A L ^F^O^R^M^A^T (EOF ^O^N ^A^N I ^F^O^R^M^A^T ^T^A^P^E
              ^I^S ^A ^L^E^V^E^L 17B ^B^L^O^C^K ^T^E^R^M^I^N^A^T^O^R, ^W^H^E^R^E^A^S EOF ^O^N ^A^N L ^T^A^P^E ^I^S
              ^A ^T^A^P^E ^M^A^R^K).

      D^E^F^A^U^L^T@D  X
.HELP,TC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R TC=^T^C ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^P^Y ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N, ^U^S^E^D ^I^N
      ^C^O^N^J^U^N^C^T^I^O^N ^W^I^T^H ^T^H^E N ^P^A^R^A^M^E^T^E^R.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ^T^C                              D^E^S^C^R^I^P^T^I^O^N
      --                              -----------
      F        T^H^E N ^P^A^R^A^M^E^T^E^R (^C^O^P^Y ^C^O^U^N^T) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O
               ^C^O^P^Y.
      I        C^O^P^Y ^T^O ^T^H^E ^E^N^D ^O^F ^I^N^F^O^R^M^A^T^I^O^N.
      D        T^H^E N ^P^A^R^A^M^E^T^E^R ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^D^O^U^B^L^E EOF^S ^T^O ^C^O^P^Y ^T^O.

      D^E^F^A^U^L^T@D  D
.HELP,N,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R N=^C^O^P^Y^C^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^P^Y ^C^O^U^N^T ^U^S^E^D ^B^Y ^T^H^E ^C^O^P^Y
      ^T^E^R^M^I^N^A^T^I^O^N ^C^O^N^D^I^T^I^O^N (TC).

      D^E^F^A^U^L^T@D  1
.HELP,CC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CC=^C^H^A^R^C^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T
      ^W^H^I^C^H ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K ^S^I^Z^E (^L^I^N^E ^L^E^N^G^T^H)
      ^I^N ^C^H^A^R^A^C^T^E^R^S ^F^O^R ^A^N E ^O^R B ^F^O^R^M^A^T ^T^A^P^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^C^A^N ^O^N^L^Y ^B^E ^S^P^E^C^I^F^I^E^D ^O^N ^A^N E ^O^R B ^F^O^R^M^A^T ^T^A^P^E ^C^O^P^Y.

      D^E^F^A^U^L^T@D  136 ^F^O^R E ^F^O^R^M^A^T; 150 ^F^O^R B ^F^O^R^M^A^T.
.HELP,EL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R EL=^E^R^L^I^M^I^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^I^M^I^T
      ^W^H^I^C^H ^S^E^T^S ^T^H^E ^N^U^M^B^E^R ^O^F ^N^O^N^F^A^T^A^L ^E^R^R^O^R^S ^A^L^L^O^W^E^D
      ^B^E^F^O^R^E ^A^B^O^R^T.  T^H^I^S ^I^N^C^L^U^D^E^S ^P^A^R^I^T^Y ^E^R^R^O^R^S ^A^N^D
      ^B^L^O^C^K-^T^O^O-^L^A^R^G^E ^E^R^R^O^R^S ^W^H^I^C^H ^A^R^E ^R^E^T^U^R^N^E^D ^B^Y ^T^H^E ^T^A^P^E
      ^S^U^B^S^Y^S^T^E^M ^A^F^T^E^R ^C^O^M^P^L^E^T^I^N^G ^R^E^C^O^V^E^R^Y ^P^R^O^C^E^D^U^R^E^S.  I^T
      ^A^L^S^O ^I^N^C^L^U^D^E^S ^I^N^V^A^L^I^D ^B^L^O^C^K ^F^O^R^M^A^T ^E^R^R^O^R^S (^I^N^V^A^L^I^D ^B^Y^T^E
      ^C^O^U^N^T ^O^R ^U^N^U^S^E^D ^B^I^T ^C^O^U^N^T) ^F^O^R X ^F^O^R^M^A^T ^A^N^D SI ^C^O^D^E^D
      ^F^O^R^M^A^T ^T^A^P^E^S.  E^R^R^O^R ^L^I^M^I^T ^I^S ^I^G^N^O^R^E^D ^W^H^E^N ^G^E^N^E^R^A^T^I^N^G ^A^N
      E ^O^R B ^F^O^R^M^A^T ^T^A^P^E ^F^R^O^M ^M^A^S^S ^S^T^O^R^A^G^E, ^A^N I ^F^O^R^M^A^T, ^A^N^D
      ^A^N SI ^B^I^N^A^R^Y ^F^O^R^M^A^T ^F^I^L^E, ^S^I^N^C^E ^C^O^N^T^R^O^L ^W^O^R^D READ ^I^S ^N^O^T
      ^U^S^E^D.  E^R^R^O^R ^L^I^M^I^T ^I^S ^L^I^K^E^W^I^S^E ^I^G^N^O^R^E^D ^I^F ^T^H^E ^I^N^P^U^T ^F^I^L^E
      ^D^E^V^I^C^E ^D^O^E^S ^N^O^T ^S^U^P^P^O^R^T ^C^O^N^T^R^O^L ^W^O^R^D READ (^T^E^R^M^I^N^A^L^S).  I^N
      ^T^H^I^S ^C^A^S^E, ^A^N^Y ^E^R^R^O^R ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D  0
.HELP,PO,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R PO=^P1^P2 ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^B^O^T^H ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^P^R^O^C^E^S^S^I^N^G
      ^O^P^T^I^O^N^S (^N^O^T ^S^E^P^A^R^A^T^E^D ^B^Y ^C^O^M^M^A^S).

      E^N^T^E^R      T^O ^S^P^E^C^I^F^Y
      -----      ----------
      E          I^N^P^U^T ^B^L^O^C^K^S ^W^I^T^H ^P^A^R^I^T^Y ^E^R^R^O^R^S ^O^R ^B^L^O^C^K-^T^O^O-^L^A^R^G^E
                 ^E^R^R^O^R^S ^A^R^E ^P^R^O^C^E^S^S^E^D (^C^O^P^I^E^D).

      T          W^H^E^N ^G^E^N^E^R^A^T^I^N^G ^A B ^O^R E ^F^O^R^M^A^T ^T^A^P^E, ^B^L^O^C^K^S ^E^X^C^E^E^D^I^N^G
                 ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K ^S^I^Z^E (^R^E^F^E^R ^T^O ^T^H^E CC ^P^A^R^A^M^E^T^E^R) ^A^R^E
                 ^T^R^U^N^C^A^T^E^D.  PO=T ^I^S ^I^L^L^E^G^A^L ^F^O^R ^O^T^H^E^R ^F^I^L^E ^C^O^N^V^E^R^S^I^O^N^S.

      D^E^F^A^U^L^T@D  F^O^R E@D  E^R^R^O^R ^B^L^O^C^K^S ^A^R^E ^S^K^I^P^P^E^D.

                F^O^R T@D  L^I^N^E^S ^E^X^C^E^E^D^I^N^G ^T^H^E ^M^A^X^I^M^U^M ^L^I^N^E ^S^I^Z^E ^A^R^E ^S^P^L^I^T
                        ^I^N^T^O ^M^U^L^T^I^P^L^E ^B^L^O^C^K^S.
.HELP,L,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^L^F^N3 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^A^N ^A^L^T^E^R^N^A^T^E ^O^U^T^P^U^T
      ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^P^A^R^I^T^Y ^E^R^R^O^R ^M^E^S^S^A^G^E^S ^W^H^E^N ^E^X^T^E^N^D^E^D ^E^R^R^O^R
      ^P^R^O^C^E^S^S^I^N^G ^I^S ^I^N ^E^F^F^E^C^T (^N^O^N-^Z^E^R^O EL ^S^P^E^C^I^F^I^E^D).  T^H^E ^F^I^L^E
      ^N^A^M^E ^L^F^N3 ^M^U^S^T ^N^O^T ^B^E ^T^H^E ^S^A^M^E ^A^S ^L^F^N2.  A ^F^I^L^E ^N^A^M^E ^M^A^Y ^B^E
      1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D  OUTPUT
.HELP,NS,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NS=^N^S ^S^P^E^C^I^F^I^E^S ^N^O^I^S^E ^S^I^Z^E.  A^N^Y ^I^N^P^U^T ^B^L^O^C^K ^W^I^T^H ^F^E^W^E^R
      ^T^H^A^N ^N^S ^C^H^A^R^A^C^T^E^R^S ^I^S ^C^O^N^S^I^D^E^R^E^D ^N^O^I^S^E ^A^N^D ^I^S ^D^I^S^C^A^R^D^E^D.  (T^H^I^S ^P^A^R^A^M^E^T^E

      ^I^S ^V^A^L^I^D ^O^N^L^Y ^F^O^R E ^T^O B ^F^O^R^M^A^T ^C^O^N^V^E^R^S^I^O^N^S.)  E^N^T^E^R ^A ^D^E^C^I^M^A^L ^N^U^M^B^E^R.
      M^A^X^I^M^U^M ^V^A^L^U^E ^F^O^R ^N^O^I^S^E ^S^I^Z^E ^I^S 41.  I^F 0 ^I^S ^E^N^T^E^R^E^D, 18 ^I^S ^A^S^S^U^M^E^D.

      D^E^F^A^U^L^T@D  18.
.ENDHELP
.EX.  $TCOPY(#I=I,#O=O,#F=F,#TC=TC,#N=N,#CC=CC,#EL=EL,#PO=PO,#L=L,#NS=NS)
*WEOR
.PROC,TDU*I
,I[N^A^M^E ^O^F ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^F^I^L^E]=(*F)
,L[N^A^M^E ^O^F ^L^I^S^T^I^N^G ^F^I^L^E]=(*F,*N=OUTPUT)
,LIB[L^I^B^R^A^R^Y ^F^I^L^E ^N^A^M^E ^F^O^R ^L^O^A^D ^C^A^P^S^U^L^E]=(*F,*N=TERMLIB)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TDU,I=^D^E^F^I^N^I^T^I^O^N,L=^L^I^S^T^I^N^G,LIB=^L^I^B^R^A^R^Y.

      T^H^E TDU ^C^O^M^M^A^N^D ^C^A^L^L^S ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^P^R^O^C^E^D^U^R^E ^T^O ^C^O^M^P^I^L^E ^A
      ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N.  T^H^E ^C^O^M^P^I^L^E^D ^D^E^F^I^N^I^T^I^O^N ^I^S ^S^T^O^R^E^D ^I^N
      ^A ^U^S^E^R ^L^I^B^R^A^R^Y.

      D^E^F^A^U^L^T^S@D  L=OUTPUT

                 LIB=TERMLIB
.HELP,I,NOLIST

      F^O^R^M^A^T@D  I=^D^E^F^I^N^I^T^I^O^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 7- ^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^F^I^L^E ^N^A^M^E,
      ^W^H^I^C^H ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.  T^H^E ^F^I^L^E ^M^U^S^T ^B^E ^I^N 6/12 ^D^I^S^P^L^A^Y ^C^O^D^E.
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L^I^S^T^I^N^G

      T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^I^S ^A ^C^O^P^Y ^O^F ^T^H^E ^I^N^P^U^T ^F^I^L^E ^W^I^T^H ^E^R^R^O^R ^M^E^S^S^A^G^E^S
      ^I^N^T^E^R^S^P^E^R^S^E^D (^I^F ^A^N^Y).  E^N^T^E^R ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E ^N^A^M^E (^A ^F^I^L^E ^N^A^M^E
      ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S).  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R
      ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,LIB,NOLIST

      F^O^R^M^A^T@D  LIB=^L^I^B^R^A^R^Y

      T^H^E ^C^O^M^P^I^L^E^D ^D^E^F^I^N^I^T^I^O^N ^R^E^S^U^L^T^S ^I^N ^A ^L^O^A^D ^C^A^P^S^U^L^E ^W^H^I^C^H
      ^I^S ^S^T^O^R^E^D ^I^N ^A ^U^S^E^R ^L^I^B^R^A^R^Y.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A
      ^L^I^B^R^A^R^Y ^F^I^L^E, TDU ^C^R^E^A^T^E^S ^A ^L^O^C^A^L ^F^I^L^E ^W^I^T^H ^T^H^E ^D^E^F^A^U^L^T ^N^A^M^E
      TERMLIB.  (T^O ^B^E ^U^S^E^D ^B^Y ^T^H^E SCREEN ^A^N^D LINE ^C^O^M^M^A^N^D^S, ^T^H^E
      ^L^I^B^R^A^R^Y ^N^A^M^E ^M^U^S^T ^B^E TERMLIB.)

      D^E^F^A^U^L^T@D  TERMLIB
.ENDHELP
.EX. $TDU(#I=I,#L=L,#LIB=LIB)
$REVERT,NOLIST
*WEOR
.PROC,TDUMP*I
,I[F^I^L^E ^T^O ^B^E ^D^U^M^P^E^D (I)]=(*F)
,L[O^U^T^P^U^T ^F^I^L^E ^N^A^M^E (L)]=(*F,*N=OUTPUT)
,R[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S ^T^O ^D^U^M^P (R)]=(,*N=0,*S5(0123456789))
,F[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^D^U^M^P (F)]=(*S5(0123456789),*N=)
,N[M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^O^U^T^P^U^T ^L^I^N^E^S (N)]=(,*N=0,*S5(0123456789))
,C[R^E^A^D ^F^I^L^E ^I^N ^C^O^D^E^D ^M^O^D^E (C)]=(*K=$,H$,*N=)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E (NR)]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
,O[D^O ^Y^O^U ^W^A^N^T ^A^N ^O^C^T^A^L ^D^U^M^P (O)]=(*K=$,O$,*N=)
,A[D^O ^Y^O^U ^W^A^N^T ^A^N ^A^L^P^H^A^N^U^M^E^R^I^C ^D^U^M^P (A)]=(*K=$,A$,*N=)
,H[D^O ^Y^O^U ^W^A^N^T ^A ^H^E^X^I^D^E^C^I^M^A^L ^D^U^M^P (H)]=(*K=$,H$,*N=)
,CW[D^O ^Y^O^U ^W^A^N^T ^C^O^N^T^R^O^L ^W^O^R^D^S ^D^U^M^P^E^D (CW)]=(*K=$,CW$,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TDUMP,I=^L^F^N1,L=^L^F^N2,R=^R^C^O^U^N^T,F=^F^C^O^U^N^T,N=^L^I^N^E^S,C,NR,O,A,H,CW.

      T^H^E TDUMP ^C^O^M^M^A^N^D ^D^U^M^P^S ^A ^F^I^L^E ^I^N ^E^I^T^H^E^R ^O^C^T^A^L ^O^R ^A^L^P^H^A^N^U^M^E^R^I^C ^F^O^R^M^A^T.
.HELP,I,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^D^U^M^P^E^D.

      D^E^F^A^U^L^T@D TAPE1.
.HELP,L,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^A ^L^O^C^A^L ^F^I^L^E ^T^O ^C^O^N^T^A^I^N ^T^H^E
      ^L^I^S^T^I^N^G ^O^F ^T^H^E ^D^U^M^P.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
.HELP,R,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^R^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^D^E^C^I^M^A^L ^N^U^M^B^E^R ^O^F ^R^E^C^O^R^D^S
      ^T^O ^B^E ^D^U^M^P^E^D.  I^F R ^I^S ^O^M^I^T^T^E^D ^O^R ^S^E^T ^T^O ^Z^E^R^O (0), ^T^H^E ^D^U^M^P ^C^O^N^T^I^N^U^E^S
      ^T^O EOI.
.HELP,F,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R F=^F^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^D^E^C^I^M^A^L ^N^U^M^B^E^R ^O^F ^F^I^L^E^S
      ^T^O ^B^E ^D^U^M^P^E^D.  I^F F=0, ^D^U^M^P ^C^O^N^T^I^N^U^E^S ^U^N^T^I^L ^A^N ^E^M^P^T^Y ^F^I^L^E (^D^O^U^B^L^E EOF)
      ^O^R EOI ^I^S ^E^N^C^O^U^N^T^E^R^E^D.

      D^E^F^A^U^L^T@D  A^L^L ^F^I^L^E^S ^I^N ^L^F^N1 ^A^R^E ^D^U^M^P^E^D.
.HELP,N,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R N=^L^I^N^E^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^D^E^C^I^M^A^L ^N^U^M^B^E^R ^O^F ^L^I^N^E^S ^T^O
      ^B^E ^D^U^M^P^E^D ^T^O ^T^H^E ^L^I^S^T^I^N^G ^F^I^L^E.

      D^E^F^A^U^L^T@D  I^F N ^I^S ^O^M^I^T^T^E^D ^O^R ^S^E^T ^T^O ^Z^E^R^O (0), ^T^H^E ^E^N^T^I^R^E ^F^I^L^E ^D^U^M^P ^I^S
                ^L^I^S^T^E^D.
.HELP,NR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NR ^S^P^E^C^I^F^I^E^S ^N^O^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E ^T^H^A^T ^I^S ^T^O ^B^E ^D^U^M^P^E^D.

      D^E^F^A^U^L^T@D  F^I^L^E ^L^F^N1 ^I^S ^T^O ^B^E ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^T^H^E ^D^U^M^P.
.HELP,C,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R C ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^T^O ^R^E^A^D ^T^H^E ^F^I^L^E ^T^O ^B^E ^D^U^M^P^E^D ^I^N
      ^C^O^D^E^D ^M^O^D^E.  T^H^E ^D^E^F^A^U^L^T ^I^S ^T^O ^R^E^A^D ^T^H^E ^F^I^L^E ^I^N ^B^I^N^A^R^Y ^M^O^D^E.

.HELP,O,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R O ^S^P^E^C^I^F^I^E^S ^A^N ^O^C^T^A^L ^D^U^M^P.  E^N^T^E^R O.

      D^E^F^A^U^L^T@D  I^F ^M^O^R^E ^T^H^A^N ^O^N^E ^O^F ^T^H^E H, O, ^A^N^D A ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^S^P^E^C^I^F^I^E^D,
                ^T^H^E ^L^A^S^T ^O^N^E ^O^V^E^R^R^I^D^E^S.  I^F ^N^O H, O, ^O^R A ^P^A^R^A^M^E^T^E^R ^I^S
                ^S^P^E^C^I^F^I^E^D, TDUMP ^L^I^S^T^S ^A ^C^O^M^B^I^N^E^D ^O^C^T^A^L ^A^N^D ^A^L^P^H^A^N^U^M^E^R^I^C ^D^U^M^P.
.HELP,A,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R A ^S^P^E^C^I^F^I^E^S ^A ^D^U^M^P ^I^N ^A^L^P^H^A^N^U^M^E^R^I^C ^F^O^R^M^A^T.  E^N^T^E^R A.

      D^E^F^A^U^L^T@D  I^F ^M^O^R^E ^T^H^A^N ^O^N^E ^O^F ^T^H^E H, O, ^A^N^D A ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^S^P^E^C^I^F^I^E^D,
                ^T^H^E ^L^A^S^T ^O^N^E ^O^V^E^R^R^I^D^E^S.  I^F ^N^O H, O, ^O^R A ^P^A^R^A^M^E^T^E^R ^I^S
                ^S^P^E^C^I^F^I^E^D, TDUMP ^L^I^S^T^S ^A ^C^O^M^B^I^N^E^D ^O^C^T^A^L ^A^N^D ^A^L^P^H^A^N^U^M^E^R^I^C ^D^U^M^P.
.HELP,H,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R H ^S^P^E^C^I^F^I^E^S ^A ^D^U^M^P ^I^N ^H^E^X^A^D^E^C^I^M^A^L ^F^O^R^M^A^T.

      D^E^F^A^U^L^T@D  I^F ^M^O^R^E ^T^H^A^N ^O^N^E ^O^F ^T^H^E H, O, ^A^N^D A ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^S^P^E^C^I^F^I^E^D,
                ^T^H^E ^L^A^S^T ^O^N^E ^O^V^E^R^R^I^D^E^S.  I^F ^N^O H, O, ^O^R A ^P^A^R^A^M^E^T^E^R ^I^S
                ^S^P^E^C^I^F^I^E^D, TDUMP ^L^I^S^T^S ^A ^C^O^M^B^I^N^E^D ^O^C^T^A^L ^A^N^D ^A^L^P^H^A^N^U^M^E^R^I^C ^D^U^M^P.
.HELP,CW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R CW ^S^P^E^C^I^F^I^E^S ^T^O ^D^U^M^P ^C^O^N^T^R^O^L ^W^O^R^D^S ^A^S ^W^E^L^L ^A^S ^D^A^T^A.
.ENDHELP
.EX.  $TDUMP(#I=I,#L=L,#R=R,#F=F,#N=N_NR_A_O_H_CW)
*WEOR
.PROC,TEXT*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TEXT

      T^H^E TEXT ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^T^E^X^T ^M^O^D^E.  T^E^X^T ^M^O^D^E ^A^L^L^O^W^S ^D^I^R^E^C^T ^E^N^T^R^Y ^O^F
      ^I^N^F^O^R^M^A^T^I^O^N (^P^R^O^G^R^A^M ^C^O^M^M^A^N^D^S, ^D^A^T^A, ^O^R ^T^E^X^T) ^I^N^T^O ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E
      ^W^I^T^H^O^U^T ^S^P^E^C^I^F^Y^I^N^G ^L^I^N^E ^N^U^M^B^E^R^S.  T^H^E ^S^Y^S^T^E^M ^I^N^T^E^R^P^R^E^T^S ^C^O^M^M^A^N^D^S ^E^N^T^E^R^

      ^I^N ^T^E^X^T ^M^O^D^E ^A^S ^T^E^X^T ^A^N^D ^D^O^E^S ^N^O^T ^P^R^O^C^E^S^S ^T^H^E^M ^D^I^R^E^C^T^L^Y.

      U^N^L^E^S^S ^C^H^A^N^G^E^D ^D^U^R^I^N^G ^I^N^S^T^A^L^L^A^T^I^O^N, ^T^H^E ^I^N^P^U^T ^L^I^N^E ^C^A^N ^C^O^N^S^I^S^T ^O^F
      ^A ^M^A^X^I^M^U^M ^O^F 160 ^C^H^A^R^A^C^T^E^R^S.  T^H^E ^S^Y^S^T^E^M ^A^P^P^E^N^D^S ^D^A^T^A ^T^O ^T^H^E ^E^N^D
      ^O^F ^T^H^E ^F^I^L^E.

      T^O ^T^E^R^M^I^N^A^T^E ^T^E^X^T ^M^O^D^E, ^Y^O^U ^S^H^O^U^L^D ^T^E^R^M^I^N^A^T^E ^T^H^E ^C^U^R^R^E^N^T ^I^N^P^U^T ^L^I^N^E
      ^W^I^T^H ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N, ^T^H^E^N ^E^N^T^E^R ^T^H^E ^I^N^T^E^R^R^U^P^T^I^O^N ^S^E^Q^U^E^N^C^E ^O^R ^T^H^E
      ^T^E^R^M^I^N^A^T^I^O^N ^S^E^Q^U^E^N^C^E ^D^E^F^I^N^E^D ^F^O^R ^T^H^E ^T^E^R^M^I^N^A^L ^I^N ^U^S^E ^O^R ^T^H^E ETX ^C^H^A^R^A^C^T^E

      ^F^O^L^L^O^W^E^D ^B^Y ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N.

      T^H^E ^S^Y^S^T^E^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^P^A^C^K^S ^T^H^E ^T^E^X^T ^F^I^L^E ^T^O ^E^N^S^U^R^E ^T^H^A^T ^T^H^E ^D^A^T^A
      ^I^S ^I^N ^O^N^E ^L^O^G^I^C^A^L ^R^E^C^O^R^D.

                                     NOTE
                                     ----

                  D^O ^N^O^T ^E^N^T^E^R ^A ^U^S^E^R ^B^R^E^A^K ^T^O ^T^E^R^M^I^N^A^T^E ^T^E^X^T
                  ^M^O^D^E ^U^N^T^I^L ^Y^O^U ^H^A^V^E ^R^E^C^E^I^V^E^D ^T^H^E ENTER TEXT
                  MODE ^M^E^S^S^A^G^E ^A^T ^Y^O^U^R ^T^E^R^M^I^N^A^L.  I^F ^E^N^T^E^R^E^D
                  ^B^E^F^O^R^E ^T^H^I^S ^M^E^S^S^A^G^E, ^Y^O^U^R ^U^S^E^R ^B^R^E^A^K ^C^L^E^A^R^S
                  ^A^N^Y ^U^N^P^R^O^C^E^S^S^E^D ^I^N^P^U^T, ^A^N^D ^N^O ^D^A^T^A ^G^O^E^S ^I^N^T^O
                  ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,TIMEOUT*I
,ON[E^X^E^C^U^T^E TIMEOUT ^C^O^M^M^A^N^D]=(NO=$,ON$,N=$,ON$,YES=,Y=,*N=NO)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TIMEOUT

      T^H^E TIMEOUT ^C^O^M^M^A^N^D ^C^A^N ^C^H^A^N^G^E ^Y^O^U^R ^S^T^A^T^U^S ^F^R^O^M ^T^H^E ^N^O-^T^I^M^E^O^U^T ^S^T^A^T^U^S
      ^T^O ^T^H^E ^S^T^A^N^D^A^R^D ^T^I^M^E^O^U^T ^S^T^A^T^U^S.  I^N ^S^T^A^N^D^A^R^D ^T^I^M^E^O^U^T ^S^T^A^T^U^S, ^Y^O^U ^A^R^E
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^L^O^G^G^E^D ^O^U^T ^A^F^T^E^R 10 ^M^I^N^U^T^E^S ^O^F ^I^N^A^C^T^I^V^I^T^Y@D ^H^O^W^E^V^E^R, ^I^F
      ^Y^O^U ^A^R^E ^I^N ^S^C^R^E^E^N ^M^O^D^E ^T^H^E ^T^I^M^E^O^U^T ^P^E^R^I^O^D ^I^S ^D^O^U^B^L^E^D. I^F ^Y^O^U ^H^A^V^E ^A
      ^N^O-^T^I^M^E^O^U^T ^S^T^A^T^U^S ^T^H^E ^T^E^R^M^I^N^A^L ^R^E^M^A^I^N^S ^C^O^N^N^E^C^T^E^D ^U^N^T^I^L ^Y^O^U ^L^O^G ^O^U^T.
      T^H^E TIMEOUT ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^Y^O^U^R ^S^T^A^T^U^S ^F^O^R ^T^H^E ^S^E^S^S^I^O^N ^I^N ^P^R^O^G^R^E^S^S.
.HELP,ON,NOLIST

      F^R^O^M HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^O ^E^X^E^C^U^T^E ^T^H^E
      TIMEOUT ^C^O^M^M^A^N^D.  E^N^T^E^R YES ^O^R Y ^T^O ^E^X^E^C^U^T^E ^T^H^E TIMEOUT ^C^O^M^M^A^N^D ^O^R
      ^O^M^I^T.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^N^O^T ^T^O ^E^X^E^C^U^T^E
      ^T^H^E TIMEOUT ^C^O^M^M^A^N^D.

      N^O^T^E@D  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^N^L^Y ^V^A^L^I^D ^F^R^O^M HELPME.
.ENDHELP
.IF($ON$.EQ.$YES$,L1)
.EX.  $TIMEOUT.
.ENDIF(L1)
.IF($ON$.EQ.$Y$,L2)
.EX.  $TIMEOUT.
.ENDIF(L2)
$REVERT(NOLIST)
*WEOR
.PROC,TRMDEF*I
,AB[A^B^O^R^T O^U^T^P^U^T B^L^O^C^K C^H^A^R^A^C^T^E^R (AB)]=(*A1,*N)
,BF[B^L^O^C^K^I^N^G F^A^C^T^O^R (BF)]=(*A1,*N)
,BR[B^R^E^A^K K^E^Y A^S U^S^E^R B^R^E^A^K 1 (BR)]=(*A1,*N)
,BS[B^A^C^K^S^P^A^C^E C^H^A^R^A^C^T^E^R (BS)]=(*A1,*N)
,B1[I^N^T^E^R^R^U^P^T^I^O^N ^O^R U^S^E^R B^R^E^A^K 1 (B1)]=(*A1,*N)
,B2[T^E^R^M^I^N^A^T^I^O^N ^O^R U^S^E^R B^R^E^A^K 2 (B2)]=(*A1,*N)
,CI[C^A^R^R^I^A^G^E R^E^T^U^R^N I^D^L^E C^O^U^N^T (CI)]=(*A1,*N)
,CN[C^A^N^C^E^L C^H^A^R^A^C^T^E^R (CN)]=(*A1,*N)
,CP[C^U^R^S^O^R P^O^S^I^T^I^O^N^I^N^G A^F^T^E^R I^N^P^U^T (CP)]=(*A1,*N)
,CT[N^E^T^W^O^R^K C^O^N^T^R^O^L C^H^A^R^A^C^T^E^R (CT)]=(*A1,*N)
,DL[D^E^L^I^M^I^T^E^R^S F^O^R S^I^N^G^L^E M^E^S^S^A^G^E (DL)]=(*A1,*N)
,EB[E^N^D-O^F-B^L^O^C^K C^H^A^R^A^C^T^E^R (EB)]=(*A1,*N)
,EL[E^N^D-O^F-L^I^N^E C^H^A^R^A^C^T^E^R (EL)]=(*A1,*N)
,EP[E^C^H^O^P^L^E^X M^O^D^E (EP)]=(*A1,*N)
,FA[F^U^L^L-ASCII I^N^P^U^T M^O^D^E (FA)]=(*A1,*N)
,IC[F^L^O^W C^O^N^T^R^O^L F^O^R I^N^P^U^T D^E^V^I^C^E^S (IC)]=(*A1,*N)
,IN[I^N^P^U^T D^E^V^I^C^E A^N^D T^R^A^N^S^M^I^S^S^I^O^N M^O^D^E (IN)]=(*A1,*N)
,LI[L^I^N^E F^E^E^D I^D^L^E C^O^U^N^T (LI)]=(*A1,*N)
,LK[L^O^C^K^O^U^T O^F U^N^S^O^L^I^C^I^T^E^D M^E^S^S^A^G^E^S (LK)]=(*A1,*N)
,OC[F^L^O^W C^O^N^T^R^O^L F^O^R O^U^T^P^U^T D^E^V^I^C^E^S (OC)]=(*A1,*N)
,OP[O^U^T^P^U^T D^E^V^I^C^E S^E^L^E^C^T^I^O^N (OP)]=(*A1,*N)
,PA[P^A^R^I^T^Y P^R^O^C^E^S^S^I^N^G (PA)]=(*A1,*N)
,PG[P^A^G^E W^A^I^T^I^N^G (PG)]=(*A1,*N)
,PL[P^A^G^E L^E^N^G^T^H (PL)]=(*A1,*N)
,PW[P^A^G^E W^I^D^T^H (PW)]=(*A1,*N)
,SE[S^P^E^C^I^A^L E^D^I^T^I^N^G M^O^D^E (SE)]=(*A1,*N)
,TC[T^E^R^M^I^N^A^L C^L^A^S^S C^O^M^M^A^N^D (TC)]=(*A1,*N)
,XL[M^U^L^T^I^M^E^S^S^A^G^E T^R^A^N^S^P^A^R^E^N^T M^O^D^E (XL)]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  TRMDEF,AB=^A^B,BF=^B^F,BR=^O^P^T^I^O^N,BS=^B^S,B1=^U^B1,B2=^U^B2,CI=^C^I,
                  CN=^C^N,CP=^O^P^T^I^O^N,CT=^C^H^A^R,DL=X^X^X/C^C^O^U^N^T/T^O,EB=^E^B/^C^P^R,
                  EL=^E^L/^C^P^R,EP=^O^P^T^I^O^N,FA=^O^P^T^I^O^N,IC=^O^P^T^I^O^N,IN=^I^N,
                  LI=^V^A^L^U^E,LK=^O^P^T^I^O^N,OC=^O^P^T^I^O^N,OP=^O^P,PA=^P^A,PG=^O^P^T^I^O^N,
                  PL=^P^L,PW=^P^W,SE=^O^P^T^I^O^N,TC=^T^C,XL=X^X^X/C^C^O^U^N^T/T^O/Y^Y^Y.

      T^H^E TRMDEF ^C^O^M^M^A^N^D ^C^H^A^N^G^E^S ^O^N^E ^O^R ^M^O^R^E ^O^F ^T^H^E ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^Y^O^U^R
      ^T^E^R^M^I^N^A^L.  Y^O^U ^C^A^N ^A^L^S^O ^U^S^E ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D^S (^A^L^S^O ^C^A^L^L^E^D
      ^N^E^T^W^O^R^K ^C^O^M^M^A^N^D^S) ^F^O^R ^T^H^I^S ^P^U^R^P^O^S^E.  T^Y^P^I^C^A^L^L^Y, ^Y^O^U ^W^O^U^L^D ^U^S^E TRMDEF ^I^N
      ^A ^P^R^O^L^O^G^U^E ^T^O ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L ^A^T^T^R^I^B^U^T^E^S ^F^O^R ^E^A^C^H ^L^O^G^I^N--^E^S^P^E^C^I^A^L^L^Y
      ^I^F ^Y^O^U ^T^E^N^D ^T^O ^L^O^G ^I^N ^A^T ^T^H^E ^S^A^M^E ^T^Y^P^E ^O^F ^T^E^R^M^I^N^A^L ^E^A^C^H ^T^I^M^E.  Y^O^U
      ^W^O^U^L^D ^U^S^E ^N^E^T^W^O^R^K ^C^O^M^M^A^N^D^S ^T^O ^M^A^K^E ^O^N-^T^H^E-^F^L^Y ^C^H^A^N^G^E^S ^D^U^R^I^N^G ^A ^G^I^V^E^N
      ^T^E^R^M^I^N^A^L ^S^E^S^S^I^O^N.
.HELP,AB,NOLIST

      F^O^R^M^A^T@D AB=^A^B

      T^H^E AB ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^A^B^O^R^T ^A^N ^O^U^T^P^U^T ^B^L^O^C^K.

      T^H^E ^V^A^L^U^E ^A^B ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^A^B^O^R^T ^O^U^T^P^U^T ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R.
      T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^F^O^R BS,
      B1, B2, CT, EB, ^A^N^D EL.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^A^N^D ^I^S ^N^O^T
      ^V^A^L^I^D ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S.
.HELP,BF,NOLIST

      F^O^R^M^A^T@D  BF=^B^F

      T^H^E BF ^P^A^R^A^M^E^T^E^R ^S^E^T^S ^T^H^E ^S^I^Z^E ^O^F ^T^H^E ^I^N^T^E^R^M^E^D^I^A^T^E ^D^A^T^A ^B^L^O^C^K^S
      ^T^H^A^T ^W^I^L^L ^B^E ^D^E^L^I^V^E^R^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E ^V^A^L^U^E ^B^F ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^L^O^C^K^I^N^G ^F^A^C^T^O^R. Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^B^F@D

      ^B^F                         D^E^S^C^R^I^P^T^I^O^N
      --                         -----------
      0      S^E^L^E^C^T^S ^A ^L^I^N^E ^F^E^E^D ^C^H^A^R^A^C^T^E^R ^A^N^D ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F
             100 ^A^S ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S.

      1      S^E^L^E^C^T^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F 100 ^A^S ^A ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.

      2      S^E^L^E^C^T^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F 200 ^A^S ^A ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.

      R^E^G^A^R^D^L^E^S^S ^O^F ^T^H^E ^B^L^O^C^K^I^N^G ^F^A^C^T^O^R, ^A^N ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R
      (^U^S^U^A^L^L^Y ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N) ^F^O^R^W^A^R^D^S ^D^A^T^A ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.
.HELP,BR,NOLIST

      F^O^R^M^A^T@D  BR=^O^P^T^I^O^N

      T^H^E BR ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^I^F ^T^H^E BREAK ^K^E^Y (^I^N^T^E^R^R^U^P^T^I^O^N ^K^E^Y ^F^O^R
      ^I^N^T^E^R^A^C^T^I^V^E ^O^U^T^P^U^T) ^A^L^S^O ^F^U^N^C^T^I^O^N^S ^A^S ^T^H^E ^I^N^T^E^R^R^U^P^T^I^O^N ^S^E^Q^U^E^N^C^E
      (^U^S^E^R ^B^R^E^A^K 1 ^S^E^Q^U^E^N^C^E) ^W^H^E^N ^E^N^T^E^R^E^D ^D^U^R^I^N^G ^O^U^T^P^U^T ^A^N^D ^A^S ^T^H^E ^C^A^N^C^E^L
      ^C^H^A^R^A^C^T^E^R ^W^H^E^N ^E^N^T^E^R^E^D ^D^U^R^I^N^G ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^D^E^T^E^R^M^I^N^E^S ^I^F ^T^H^I^S ^F^E^A^T^U^R^E ^I^S ^E^N^A^B^L^E^D ^O^R
      ^D^I^S^A^B^L^E^D.  A ^V^A^L^U^E ^O^F Y ^E^N^A^B^L^E^S ^A^N^D ^A ^V^A^L^U^E ^O^F N ^D^I^S^A^B^L^E^S ^T^H^I^S ^F^E^A^T^U^R^E.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.HELP,BS,NOLIST

      F^O^R^M^A^T@D  BS=^B^S

      T^H^E BS ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^D^E^L^E^T^E ^T^H^E
      ^P^R^E^V^I^O^U^S ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^B^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^B^A^C^K^S^P^A^C^E ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R
      ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, B1, B2,
      CN, CT, EB, ^A^N^D EL.

      I^T ^I^S ^P^O^S^S^I^B^L^E ^T^O ^B^A^C^K^S^P^A^C^E ^O^N^L^Y ^T^O ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E ^C^U^R^R^E^N^T ^P^H^Y^S^I^C^

      ^L^I^N^E; ^A^D^D^I^T^I^O^N^A^L ^B^A^C^K^S^P^A^C^E^S ^A^R^E ^D^I^S^R^E^G^A^R^D^E^D.  W^H^E^N ^A ^P^A^G^E ^W^I^D^T^H
      ^O^F 0 ^I^S ^S^E^L^E^C^T^E^D, ^T^H^E ^N^E^T^W^O^R^K ^A^S^S^U^M^E^S ^A ^P^A^G^E ^W^I^D^T^H ^O^F 100 ^C^H^A^R^A^C^T^E^R^S
      ^F^O^R ^B^A^C^K^S^P^A^C^I^N^G.  I^F ^T^H^E ^P^A^G^E ^W^I^D^T^H ^I^S ^I^N ^T^H^E ^R^A^N^G^E 20 ^T^H^R^O^U^G^H 56,
      ^B^A^C^K^S^P^A^C^I^N^G ^I^N^T^O ^P^R^E^V^I^O^U^S ^P^H^Y^S^I^C^A^L ^L^I^N^E^S ^I^S ^S^O^M^E^T^I^M^E^S ^P^E^R^M^I^T^T^E^D.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.HELP,B1,NOLIST

      F^O^R^M^A^T@D  B1=^U^B1

      T^H^E B1 ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^T^H^A^T, ^W^H^E^N ^E^N^T^E^R^E^D ^A^S ^T^H^E
      ^O^N^L^Y ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^O^G^I^C^A^L ^L^I^N^E (^I^N^T^E^R^R^U^P^T^I^O^N ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^E^D
      ^B^Y ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y), ^C^A^U^S^E^S ^P^R^O^G^R^A^M ^I^N^T^E^R^R^U^P^T^I^O^N.

      T^H^E ^V^A^L^U^E ^U^B1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^U^S^E^R ^B^R^E^A^K 1 ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R
      AB, BS, B2, CN, CT, EB, ^A^N^D EL.


      T^H^E BR ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^T^H^E BREAK ^K^E^Y ^C^A^N ^A^L^S^O ^F^U^N^C^T^I^O^N
      ^A^S ^T^H^E B1 ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.HELP,B2,NOLIST

      F^O^R^M^A^T@D  B2=^U^B2

      T^H^E B2 ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^T^H^A^T, ^W^H^E^N ^E^N^T^E^R^E^D ^A^S ^T^H^E
      ^O^N^L^Y ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^O^G^I^C^A^L ^L^I^N^E (^T^E^R^M^I^N^A^T^I^O^N ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^E^D
      ^B^Y ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y), ^C^A^U^S^E^S ^P^R^O^G^R^A^M ^T^E^R^M^I^N^A^T^I^O^N.

      T^H^E ^V^A^L^U^E ^U^B2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^U^S^E^R ^B^R^E^A^K 2 ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R
      ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1,
      CN, CT, EB, ^A^N^D EL.


      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.HELP,CI,NOLIST

      F^O^R^M^A^T@D  CI=^C^I

      T^H^E CI ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^T^O ^B^E
      ^I^N^S^E^R^T^E^D ^I^N^T^O ^T^H^E ^O^U^T^P^U^T ^S^T^R^E^A^M ^A^F^T^E^R ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N.


      T^H^E ^V^A^L^U^E ^C^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E ^C^O^U^N^T.  T^H^I^S
      ^V^A^L^U^E ^C^A^N ^B^E ^F^R^O^M 0 ^T^O 127 ^O^R ^T^H^E ^S^T^R^I^N^G CA.  A ^V^A^L^U^E ^O^F CA
      ^R^E^S^T^O^R^E^S ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E ^C^O^U^N^T ^T^O ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E.

      W^H^E^N ^T^H^E ^N^E^T^W^O^R^K ^P^R^O^D^U^C^E^S ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N, ^T^H^E ^N^E^T^W^O^R^K ^O^U^T^P^U^T^S
      ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^B^E^F^O^R^E ^O^U^T^P^U^T^T^I^N^G ^T^H^E
      ^N^E^X^T ^L^I^N^E.  T^H^I^S ^A^L^L^O^W^S ^T^I^M^E ^F^O^R ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^F^U^N^C^T^I^O^N
      ^A^N^D ^E^N^S^U^R^E^S ^T^H^A^T ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^N^O^T ^L^O^S^T ^B^E^C^A^U^S^E ^O^F ^P^R^I^N^T^I^N^G ^A^T^T^E^M^P^T^S
      ^D^U^R^I^N^G ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^O^P^E^R^A^T^I^O^N.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.HELP,CN,NOLIST

      F^O^R^M^A^T@D  CN=^C^N

      T^H^E CN ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^C^A^N^C^E^L ^T^H^E
      ^L^O^G^I^C^A^L ^L^I^N^E ^C^U^R^R^E^N^T^L^Y ^B^E^I^N^G ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^C^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^C^A^N^C^E^L ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D
      ^F^O^R BS, B1, B2, CT, EB, ^A^N^D EL.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^C^A^N^C^E^L ^C^H^A^R^A^C^T^E^R ^A^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^I^N
      ^A ^L^I^N^E, ^T^H^E ^E^N^T^I^R^E ^L^O^G^I^C^A^L ^L^I^N^E ^I^N ^P^R^O^G^R^E^S^S ^I^S ^C^A^N^C^E^L^L^E^D.  T^H^E
      ^S^Y^S^T^E^M ^R^E^S^P^O^N^D^S ^T^O ^A ^C^A^N^C^E^L ^L^I^N^E ^C^H^A^R^A^C^T^E^R ^B^Y ^P^R^I^N^T^I^N^G *DEL*
      ^O^N ^T^H^E ^N^E^X^T ^L^I^N^E ^A^N^D ^P^O^S^I^T^I^O^N^I^N^G ^T^H^E ^C^A^R^R^I^A^G^E ^T^O ^T^H^E ^B^E^G^I^N^N^I^N^G
      ^O^F ^A ^N^E^W ^L^I^N^E.  T^H^E BR ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^T^H^E BREAK
      ^K^E^Y ^C^A^N ^A^L^S^O ^F^U^N^C^T^I^O^N ^A^S ^T^H^E CN ^C^H^A^R^A^C^T^E^R.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.HELP,CP,NOLIST

      F^O^R^M^A^T@D  CP=^O^P^T^I^O^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^H^E ^S^Y^S^T^E^M ^S^E^N^D^S ^T^H^E ^T^E^R^M^I^N^A^L ^A
      ^R^E^S^P^O^N^S^E ^T^O ^L^I^N^E ^F^E^E^D ^K^E^Y, ^T^H^E EL ^C^H^A^R^A^C^T^E^R, ^A^N^D ^T^H^E EB ^C^H^A^R^A^C^T^E^R.  ^O^P^T^I^O^N
      ^I^N^D^I^C^A^T^E^S ^W^H^E^T^H^E^R ^T^O ^S^E^N^D ^A ^R^E^S^P^O^N^S^E ^T^O ^T^H^E ^T^E^R^M^I^N^A^L ^O^R ^N^O^T.  A ^V^A^L^U^E ^O^F
      Y ^I^N^D^I^C^A^T^E^S ^Y^E^S ^A^N^D N ^I^N^D^I^C^A^T^E^S ^N^O.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T 2741^S).  I^F
      CP=Y ^A^N^D IN=KB ^A^R^E ^S^E^L^E^C^T^E^D, ^T^H^E ^S^Y^S^T^E^M ^R^E^S^P^O^N^D^S ^T^O ^T^H^E ^L^I^N^E ^F^E^E^D ^K^E^Y ^B^Y
      ^S^E^N^D^I^N^G ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^R^E^S^P^O^N^D^S ^T^O ^A^N EL ^O^R EB ^C^H^A^R^A^C^T^E^R ^B^Y
      ^S^E^N^D^I^N^G ^T^H^E ^C^U^R^S^O^R ^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E EL ^O^R EB ^C^O^M^M^A^N^

      I^F IN=BK ^I^S ^S^E^L^E^C^T^E^D ^O^R ^Y^O^U ^A^R^E ^A^T ^A^N X.25 PAD ^T^E^R^M^I^N^A^L, ^T^H^E ^S^Y^S^T^E^M
      ^R^E^S^P^O^N^D^S ^O^N^L^Y ^T^O ^T^H^E EB ^C^H^A^R^A^C^T^E^R ^B^Y ^S^E^N^D^I^N^G ^T^H^E ^C^U^R^S^O^R ^P^O^S^I^T^I^O^N^I^N^G
      ^R^E^S^P^O^N^S^E ^S^E^L^E^C^T^E^D ^B^Y ^T^H^E EB ^C^O^M^M^A^N^D.
.HELP,CT,NOLIST

      F^O^R^M^A^T@D  CT=^C^H^A^R

      T^H^E CT ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^T^H^E
      ^T^E^R^M^I^N^A^L.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^I^S ^C^H^A^R^A^C^T^E^R ^A^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R
      ^O^F ^A ^L^O^G^I^C^A^L ^L^I^N^E, ^I^T ^S^I^G^N^A^L^S ^T^H^A^T ^W^H^A^T ^F^O^L^L^O^W^S ^I^S ^A ^T^E^R^M^I^N^A^L
      ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D ^O^R ^A ^S^P^E^C^I^A^L ^C^O^M^M^A^N^D ^T^H^A^T ^T^H^E ^N^E^T^W^O^R^K ^F^O^R^W^A^R^D^S
      ^T^O ^Y^O^U^R ^A^P^P^L^I^C^A^T^I^O^N ^W^I^T^H ^A ^P^R^E^E^M^P^T^I^V^E ^S^T^A^T^U^S.

      T^H^E ^V^A^L^U^E ^C^H^A^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R
      AB, BS, B1, B2, CN, EB, ^A^N^D EL.


      I^F ^Y^O^U ^E^N^T^E^R ^T^H^E CT ^P^A^R^A^M^E^T^E^R ^I^N ^A ^L^I^N^E ^W^I^T^H ^M^U^L^T^I^P^L^E ^T^E^R^M^I^N^A^L
      ^D^E^F^I^N^I^T^I^O^N^S, ^T^H^E ^N^E^W ^V^A^L^U^E ^C^H^A^R ^D^O^E^S ^N^O^T ^T^A^K^E ^E^F^F^E^C^T ^U^N^T^I^L
      ^T^H^E ^C^O^M^P^L^E^T^E ^L^I^N^E ^I^S ^P^R^O^C^E^S^S^E^D.
.HELP,DL,NOLIST
      F^O^R^M^A^T@D  DL=X^X^X/C^C^O^U^N^T/TO

      T^H^E DL ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^L^I^M^I^T^E^R^S ^T^H^A^T ^T^E^R^M^I^N^A^T^E ^S^I^N^G^L^E-
      ^M^E^S^S^A^G^E ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.  W^H^E^N ^Y^O^U ^I^N^I^T^I^A^T^E ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E (IN=X, IN=XK, ^O^R IN=XP), ^T^H^E ^N^E^T^W^O^R^K ^R^E^A^D^S ^Y^O^U^R ^I^N^P^U^T
      ^A^N^D ^S^E^N^D^S ^I^T ^T^O ^T^H^E ^S^Y^S^T^E^M ^W^I^T^H^O^U^T ^T^R^A^N^S^L^A^T^I^O^N ^U^N^T^I^L ^I^T ^E^N^C^O^U^N^T^E^R^S
      ^A ^D^E^L^I^M^I^T^E^R.  I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^E^V^E^N, ^O^D^D, ^O^R
      ^Z^E^R^O (PA=E, 0, ^O^R Z), ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^S^T^R^I^P^P^E^D (^S^E^T ^T^O ^Z^E^R^O)
      ^B^E^F^O^R^E ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T, ^A^L^T^H^O^U^G^H ^N^O ^T^R^A^N^S^L^A^T^I^O^N
      ^O^C^C^U^R^S.  I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^N^O^N^E ^O^R ^I^G^N^O^R^E
      (PA=N ^O^R I), ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^N^O^T ^S^T^R^I^P^P^E^D.  T^H^E ^F^I^R^S^T ^D^E^L^I^M^I^T^E^R
      ^E^N^C^O^U^N^T^E^R^E^D ^T^E^R^M^I^N^A^T^E^S ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.



      T^H^E ^V^A^L^U^E X^X^X ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E (^X^X) ^O^F
      ^T^H^E ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T ^A^S ^A ^D^E^L^I^M^I^T^E^R.  T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^S^E^N^D
      ^T^H^E ^C^H^A^R^A^C^T^E^R ^A^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^D^A^T^A.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A
      ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T ^H^A^V^E ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S
      ^P^A^R^I^T^Y ^T^O ^N^O^N^E ^O^R ^I^G^N^O^R^E (PA=N ^O^R I); ^O^T^H^E^R^W^I^S^E ^T^H^E ^N^E^T^W^O^R^K ^C^A^N^N^O^T
      ^D^E^T^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N ^I^T ^O^C^C^U^R^S ^I^N ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^M^E^S^S^A^G^E.
      I^F ^T^H^E ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^N^O^N^E, ^T^H^E 8-^B^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^C^O^D^E ^I^N^P^U^T ^F^R^O^M ^T^H^E ^T^E^R^M^I^N^A^L ^I^S ^M^A^T^C^H^E^D ^A^G^A^I^N^S^T ^T^H^E 8-^B^I^T
      ^H^E^X^D^E^C^I^M^A^L ^C^O^D^E ^S^P^E^C^I^F^I^E^D ^A^S ^T^H^E ^D^E^L^I^M^I^T^E^R (^X^X).  I^F ^T^H^E
      ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^I^G^N^O^R^E, ^T^H^E ^B^O^T^T^O^M 7 ^B^I^T^S ^O^F ^T^H^E
      ^T^E^R^M^I^N^A^L ^I^N^P^U^T ^A^R^E ^M^A^T^C^H^E^D ^A^G^A^I^N^S^T ^T^H^E ^B^O^T^T^O^M 7 ^B^I^T^S ^O^F ^T^H^E
      ^S^P^E^C^I^F^I^E^D ^D^E^L^I^M^I^T^E^R (^X^X).

      T^H^E ^V^A^L^U^E C^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^A ^D^E^C^I^M^A^L ^V^A^L^U^E (^C^O^U^N^T) ^F^R^O^M 1 ^T^O 4095
      ^T^H^A^T ^F^U^N^C^T^I^O^N^S ^A^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^D^E^L^I^M^I^T^E^R.  T^H^E^S^E ^V^A^L^U^E^S ^A^R^E ^V^A^L^I^D
      ^W^I^T^H^I^N ^T^H^E ^N^E^T^W^O^R^K.  H^O^W^E^V^E^R, ^U^N^L^E^S^S ^C^H^A^N^G^E^D ^D^U^R^I^N^G ^I^N^S^T^A^L^L^A^T^I^O^N, ^T^H^E
      ^M^A^X^I^M^U^M ^L^O^G^I^C^A^L ^I^N^P^U^T ^L^I^N^E ^L^E^N^G^T^H ^I^N IAF (2500 ^C^H^A^R^A^C^T^E^R^S) ^L^I^M^I^T^S ^Y^O^U.

      T^H^E ^V^A^L^U^E TO ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^T^I^M^E^O^U^T ^O^F ^B^E^T^W^E^E^N 200 ^A^N^D 400
      ^M^I^L^L^I^S^E^C^O^N^D^S ^W^I^L^L ^B^E ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R.

      Y^O^U ^C^A^N ^S^E^L^E^C^T ^A^N^Y ^O^F ^T^H^E ^T^H^R^E^E ^T^Y^P^E^S ^O^F ^D^E^L^I^M^I^T^E^R^S@D  ^C^H^A^R^A^C^T^E^R
      ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y X^X^X), ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y
      C^C^O^U^N^T), ^A^N^D ^T^I^M^E^O^U^T ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y TO).

      T^H^E ^P^A^R^A^M^E^T^E^R ^V^A^L^U^E^S ^F^O^R DL ^A^R^E ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T ^A^N^D ^O^P^T^I^O^N^A^L.
      H^O^W^E^V^E^R, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A^T ^L^E^A^S^T ^O^N^E ^O^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^V^A^L^U^E^S.
      Y^O^U ^C^A^N ^O^M^I^T ^T^R^A^I^L^I^N^G ^C^O^M^M^A^S ^I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^L^L ^T^H^R^E^E
      ^T^Y^P^E^S ^O^F ^D^E^L^I^M^I^T^E^R^S.

      E^N^T^E^R^I^N^G ^T^H^I^S ^C^O^M^M^A^N^D ^W^I^T^H ^A^N^Y ^N^U^M^B^E^R ^O^F ^N^E^W ^D^E^L^I^M^I^T^E^R^S ^C^A^N^C^E^L^S
      ^A^L^L ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^I^N^P^U^T ^D^E^L^I^M^I^T^E^R^S ^A^L^R^E^A^D^Y ^I^N ^E^F^F^E^C^T,
      ^I^N^C^L^U^D^I^N^G ^T^H^O^S^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E XL ^C^O^M^M^A^N^D.

      T^H^E DL ^P^A^R^A^M^E^T^E^R ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.
      T^E^R^M^I^N^A^L ^C^L^A^S^S 4 ^I^S ^C^O^N^F^I^G^U^R^E^D ^W^I^T^H ^T^H^E RETURN ^K^E^Y ^A^S ^T^H^E ^O^N^L^Y
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S ^A^R^E ^C^O^N^F^I^G^U^R^E^D
      ^W^I^T^H ^T^H^E SEND ^O^R ETX ^K^E^Y ^A^S ^T^H^E^I^R ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.
      F^O^R X.25 ^D^E^V^I^C^E^S, ^T^H^E PAD ^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^L^W^A^Y^S ^A^C^T^S ^A^S ^A
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R ^I^N ^A^D^D^I^T^I^O^N ^T^O ^A^N^Y ^O^T^H^E^R ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D.
.HELP,EB,NOLIST

      F^O^R^M^A^T@D  EB=^E^B/^C^P^R

      T^H^E EB ^P^A^R^A^M^E^T^E^R ^D^E^F^I^N^E^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^A^N^D ^D^E^F^I^N^E^S ^T^H^E
      ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^A^T ^C^H^A^R^A^C^T^E^R.  T^H^E EB ^C^H^A^R^A^C^T^E^R
      ^A^C^T^S ^A^S ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y ^F^O^R ^T^E^R^M^I^N^A^L^S ^O^P^E^R^A^T^I^N^G ^I^N
      ^B^L^O^C^K ^M^O^D^E (^R^E^F^E^R ^T^O ^T^H^E IN ^P^A^R^A^M^E^T^E^R).

      T^H^E ^V^A^L^U^E ^E^B ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R.  Y^O^U ^C^A^N
      ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^E^B@D

      ^E^B                     D^E^S^C^R^I^P^T^I^O^N
      --                     -----------
      X^X^X   S^P^E^C^I^F^I^E^S ^T^H^E 2-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^X^X ^O^F ^T^H^E ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T
            ^A^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^D^E^L^I^M^I^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E
            ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1, B2, CN, ^A^N^D CT.

      EB    S^E^L^E^C^T^S ^T^H^E ^D^E^F^A^U^L^T ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^O^R ^C^H^A^R^A^C^T^E^R ^S^E^Q^U^E^N^C^E.

      EL    S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^C^P^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^E
      EB ^C^H^A^R^A^C^T^E^R. Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^C^P^R@D



      ^C^P^R              D^E^S^C^R^I^P^T^I^O^N
      ---              -----------
      CR    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      LF    S^E^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      CL    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      NO    S^E^N^D ^N^O ^R^E^S^P^O^N^S^E.

      T^H^E ^T^W^O EB ^P^A^R^A^M^E^T^E^R^S (EB=^E^B ^A^N^D ^C^P^R) ^A^R^E ^O^P^T^I^O^N^A^L ^A^N^D ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T.
      I^F ^Y^O^U ^O^M^I^T ^O^N^E, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^A^I^N^S ^I^T^S ^P^R^E^V^I^O^U^S ^V^A^L^U^E.

      T^H^I^S ^C^O^M^M^A^N^D ^I^S ^V^A^L^I^D ^O^N^L^Y ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^A^N^D ^M^O^D^E 4
      ^T^E^R^M^I^N^A^L^S, ^E^X^C^E^P^T ^F^O^R ^P^A^P^E^R ^T^A^P^E ^D^E^V^I^C^E^S ^A^N^D 2741 ^T^E^R^M^I^N^A^L^S.  T^H^E
      ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^F^O^R ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S ^I^S ETX ^A^N^D ^I^S ^N^O^T ^C^H^A^N^G^E^A^B^L^E.
      I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E ^C^H^A^R ^F^O^R^M ^O^F ^T^H^E ^E^B ^P^A^R^A^M^E^T^E^R, ^I^T ^I^S ^O^N^L^Y ^E^F^F^E^C^T^I^V^E ^I^F
      ^I^T ^O^C^C^U^R^S ^A^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^I^N^E.

      T^H^E CP ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G
      ^R^E^S^P^O^N^S^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^C^P^R ^P^A^R^A^M^E^T^E^R.

.HELP,EL,NOLIST

      F^O^R^M^A^T@D  EL=^E^L/^C^P^R

      T^H^E EL ^P^A^R^A^M^E^T^E^R ^D^E^F^I^N^E^S ^T^H^E ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R
      (^C^A^R^R^I^A^G^E ^R^E^T^U^R^N) ^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O
      ^T^H^A^T ^C^H^A^R^A^C^T^E^R.  I^T ^A^L^S^O ^D^E^F^I^N^E^S ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y ^F^O^R
      ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^N^O^T ^O^P^E^R^A^T^I^N^G ^I^N ^B^L^O^C^K ^M^O^D^E (^R^E^F^E^R ^T^O ^T^H^E
      IN ^P^A^R^A^M^E^T^E^R).

      T^H^E ^V^A^L^U^E ^E^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.
      Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^E^L@D

      ^E^L                 D^E^S^C^R^I^P^T^I^O^N
      --                 -----------
      X^X^X   S^P^E^C^I^F^I^E^S ^T^H^E 2-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^X^X ^O^F ^T^H^E ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T
            ^A^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^D^E^L^I^M^I^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E
            ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1, B2, CN, ^A^N^D CT.

      EB    S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^O^R
            ^C^H^A^R^A^C^T^E^R ^S^E^Q^U^E^N^C^E.

      EL    S^E^L^E^C^T^S ^T^H^E ^D^E^F^A^U^L^T ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^C^P^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^E
      EL ^C^H^A^R^A^C^T^E^R.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^C^P^R@D


      ^C^P^R                D^E^S^C^R^I^P^T^I^O^N
      ---                -----------
      CR    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      LF    S^E^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      CL    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      NO    S^E^N^D ^N^O ^R^E^S^P^O^N^S^E.

      T^H^E ^T^W^O EL ^P^A^R^A^M^E^T^E^R^S (^E^L ^A^N^D ^C^P^R) ^A^R^E ^O^P^T^I^O^N^A^L ^A^N^D ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T.
      I^F ^Y^O^U ^O^M^I^T ^O^N^E, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^A^I^N^S ^I^T^S ^P^R^E^V^I^O^U^S ^V^A^L^U^E.

      T^H^E EL ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O 2741, HASP 3270, ^A^N^D ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S; ^T^H^E ^C^P^R ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y
      ^T^O ^M^O^D^E 4 ^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S; ^A^N^D ^T^H^E ^C^H^A^R ^S^P^E^C^I^F^I^C^A^T^I^O^N
      ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.

      T^H^E CP ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^C^P^R ^V^A^L^U^E.
.HELP,EP,NOLIST

      F^O^R^M^A^T@D  EP=^O^P^T^I^O^N

      T^H^E EP ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^E^C^H^O^I^N^G ^O^F ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R^S
      ^B^A^C^K ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.


      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^I^N^P^U^T ^E^C^H^O^I^N^G.


      S^O^M^E ^T^E^R^M^I^N^A^L^S ^C^A^N ^P^E^R^F^O^R^M ^T^H^E^I^R ^O^W^N ^C^H^A^R^A^C^T^E^R ^E^C^H^O^I^N^G ^S^U^C^H ^A^S
      ^T^E^R^M^I^N^A^L^S ^W^I^T^H ^A HALF/FULL ^D^U^P^L^E^X ^S^W^I^T^C^H.  I^F ^T^H^E ^S^W^I^T^C^H ^I^S ^I^N ^T^H^E
      HALF ^P^O^S^I^T^I^O^N, ^S^E^T ^T^H^E EP ^V^A^L^U^E ^T^O N ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^L ^E^C^H^O^E^S
      ^T^H^E ^I^N^P^U^T.  I^F ^T^H^E ^S^W^I^T^C^H ^I^S ^I^N ^T^H^E FULL ^P^O^S^I^T^I^O^N, ^S^E^T ^T^H^E EP
      ^V^A^L^U^E ^T^O Y ^A^N^D ^T^H^E ^N^E^T^W^O^R^K ^E^C^H^O^E^S ^T^H^E ^I^N^P^U^T.

      Y^O^U ^C^A^N ^U^S^E ^T^H^E EP ^P^A^R^A^M^E^T^E^R ^A^N^D ^F^U^L^L-^D^U^P^L^E^X ^M^O^D^E ^A^S ^A ^S^E^C^U^R^I^T^Y
      ^M^E^A^S^U^R^E.  I^F ^Y^O^U ^A^R^E ^I^N ^F^U^L^L-^D^U^P^L^E^X ^M^O^D^E ^A^N^D EP ^I^S Y ^D^U^R^I^N^G
      ^L^O^G^I^N, ^T^H^E ^S^Y^S^T^E^M ^E^C^H^O^E^S ^A^L^L ^O^F ^Y^O^U^R ^I^N^P^U^T ^E^X^C^E^P^T ^Y^O^U^R ^P^A^S^S^W^O^R^D.


      T^H^I^S ^I^S ^N^O^T ^T^R^U^E, ^H^O^W^E^V^E^R, ^I^F ^Y^O^U ^E^N^T^E^R ^Y^O^U^R ^U^S^E^R
      ^N^A^M^E ^A^N^D ^P^A^S^S^W^O^R^D ^O^N ^T^H^E ^S^A^M^E ^L^I^N^E.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^E^X^C^E^P^T 2741^S.
.HELP,FA,NOLIST

      F^O^R^M^A^T@D  FA=^O^P^T^I^O^N

      T^H^E FA ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^F^U^L^L-ASCII ^I^N^P^U^T ^M^O^D^E.


      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^T^H^E ^F^U^L^L-ASCII ^I^N^P^U^T ^M^O^D^E.

      I^N ^F^U^L^L-ASCII ^I^N^P^U^T, ^A^L^L 128 ASCII ^C^H^A^R^A^C^T^E^R^S, ^I^N^C^L^U^D^I^N^G NUL, DEL,
      STX, LF, ^A^N^D ^A^L^L BLK ^A^N^D ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S (^W^H^I^C^H ^A^R^E
      ^N^O^R^M^A^L^L^Y ^D^I^S^C^A^R^D^E^D), ^A^R^E ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T.

      E^X^C^E^P^T^I^O^N^S ^T^O ^T^H^I^S ^A^R^E ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^H^A^R^A^C^T^E^R^S@D  NUL^S, DEL^S,
      ^A^N^D LF^S ^W^H^E^N ^E^N^C^O^U^N^T^E^R^E^D ^A^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^O^F ^A^N ^I^N^P^U^T ^L^I^N^E ^O^R
      ^A^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^I^N^G ^A ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L; CR^S ^T^H^A^T
      ^F^O^L^L^O^W LF^S ^W^H^E^N ^I^N^P^U^T^T^I^N^G ^F^R^O^M ^P^A^P^E^R ^T^A^P^E; DC3^S ^T^H^A^T ^F^O^L^L^O^W ^T^H^E EL
      ^C^H^A^R^A^C^T^E^R ^W^H^E^N ^I^N^P^U^T^T^I^N^G ^F^R^O^M ^P^A^P^E^R ^T^A^P^E; DC1^S ^A^N^D DC3^S ^W^H^E^N
      ^O^U^T^P^U^T ^C^O^N^T^R^O^L (OC=Y) ^I^S ^S^E^L^E^C^T^E^D.

      I^N ^F^U^L^L-ASCII ^M^O^D^E, ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^R^E^C^O^G^N^I^Z^E ^T^H^E ^T^E^R^M^I^N^A^L
      ^F^U^N^C^T^I^O^N^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^M^N^E^N^O^M^I^C^S B1, B2, CN, AB, ^A^N^D BS.
      T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^R^E^C^O^G^N^I^Z^E ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D^S ^A^N^D ^O^T^H^E^R
      ^C^O^M^M^A^N^D^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^T^H^E CT ^C^H^A^R^A^C^T^E^R.

      I^F SE ^I^S ^I^N ^E^F^F^E^C^T ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T FA ^O^R ^I^F FA ^I^S ^I^N ^E^F^F^E^C^T
      ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T SE, FA ^T^A^K^E^S ^P^R^E^C^E^D^E^N^C^E ^A^N^D SE ^W^I^L^L ^N^O^T
      ^B^E ^E^F^F^E^C^T^I^V^E ^U^N^T^I^L FA ^I^S ^T^U^R^N^E^D ^O^F^F.  I^F ^F^U^L^L-ASCII ^M^O^D^E ^I^S ^E^N^A^B^L^E^D
      ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E, ^T^H^E ^N^E^T^W^O^R^K ^S^U^S^P^E^N^D^S ^T^H^E
      ^F^U^L^L-ASCII ^M^O^D^E ^U^N^T^I^L ^T^H^E ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.
.HELP,IC,NOLIST

      F^O^R^M^A^T@D  IC=^O^P^T^I^O^N

      T^H^E IC ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^R^E^C^O^G^N^I^Z^E^S DC3^S
      ^A^S ^A ^S^T^O^P ^S^I^G^N^A^L ^A^N^D DC1^S ^A^S ^A ^R^E^S^U^M^E ^S^I^G^N^A^L ^F^O^R ^T^E^R^M^I^N^A^L ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^I^N^P^U^T ^C^O^N^T^R^O^L.

      I^N^P^U^T ^C^O^N^T^R^O^L ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^I^N^C^L^U^D^I^N^G ^P^A^P^E^R ^T^A^P^E
      ^D^E^V^I^C^E^S (^E^X^C^E^P^T 2741^S).
.HELP,IN,NOLIST

      F^O^R^M^A^T@D  IN=^I^N

      T^H^E IN ^P^A^R^A^M^E^T^E^R ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^H^E ^T^R^A^N^S^M^I^S^S^I^O^N
      ^M^O^D^E ^O^F ^T^H^E ^D^E^V^I^C^E.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^A ^K^E^Y^B^O^A^R^D ^O^R ^P^A^P^E^R ^T^A^P^E
      ^T^A^P^E ^R^E^A^D^E^R ^A^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E.

      A^S ^T^H^E ^I^N^P^U^T ^T^R^A^N^S^M^I^S^S^I^O^N ^M^O^D^E, ^Y^O^U ^C^A^N ^S^P^E^C^I^F^Y
      ^E^I^T^H^E^R ^N^O^R^M^A^L^I^Z^E^D ^L^I^N^E ^M^O^D^E, ^N^O^R^M^A^L^I^Z^E^D ^B^L^O^C^K ^M^O^D^E,
      ^O^R ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E.


      T^H^E ^V^A^L^U^E ^I^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^R^A^N^S^M^I^S^S^I^O^N ^M^O^D^E.
      Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^I^N@D


      ^I^N                   D^E^S^C^R^I^P^T^I^O^N
      --                   -----------
      BK    S^E^L^E^C^T^S ^B^L^O^C^K ^M^O^D^E ^A^S ^O^P^P^O^S^E^D ^F^R^O^M ^A ^F^O^R^M ^T^E^R^M^I^N^A^L ^A^N^D
            ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      KB    S^E^L^E^C^T^S ^A ^K^E^Y^B^O^A^R^D ^I^N ^C^H^A^R^A^C^T^E^R ^O^R ^L^I^N^E ^M^O^D^E ^A^N^D
            ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      PT    S^E^L^E^C^T^S ^P^A^P^E^R ^T^A^P^E ^A^N^D ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      X     S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T
            ^I^N^P^U^T ^M^O^D^E.

      XK    S^E^L^E^C^T^S ^T^H^E ^K^E^Y^B^O^A^R^D ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.

      XP    S^E^L^E^C^T^S ^P^A^P^E^R ^T^A^P^E ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.

      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XK, XP, ^O^R X, ^T^E^R^M^I^N^A^L ^I^N^P^U^T ^I^S ^S^E^N^T ^T^O ^T^H^E
      ^H^O^S^T ^I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^B^L^O^C^K^S.  T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^C^O^N^T^I^N^U^E^S ^U^N^T^I^L
      ^T^H^E ^S^Y^S^T^E^M ^E^N^C^O^U^N^T^E^R^S ^A ^P^R^E^V^I^O^U^S^L^Y ^D^E^F^I^N^E^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O


      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XK ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O KB.  W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XP ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T
      ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O PT.  W^H^E^N
      ^T^H^E IN ^V^A^L^U^E ^I^S X ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O ^T^H^E ^V^A^L^U^E ^T^H^A^T ^W^A^S ^P^R^E^V^I^O^U^S^L^Y ^I^N ^E^F^F^E^C^T.

      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S PT ^O^R XP, ^T^H^E ^N^E^T^W^O^R^K ^S^E^N^D^S ^T^H^E X-ON ^C^O^D^E ^T^O ^S^T^A^R^T
      ^T^H^E ^P^A^P^E^R ^T^A^P^E ^R^E^A^D^E^R ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^A^F^T^E^R ^T^H^E ^E^N^D ^O^F ^A ^M^E^S^S^A^G^E ^I^S ^O^U^T^P^U

      ^T^O ^T^H^E ^T^E^R^M^I^N^A^L ^A^N^D ^T^H^E ^M^E^S^S^A^G^E ^E^M^P^T^I^E^S ^T^H^E ^T^E^R^M^I^N^A^L'^S ^O^U^T^P^U^T ^Q^U^E^U^E.

      T^H^E IN ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^A^P^P^L^I^C^A^B^L^E ^T^O HASP, 3270 ^O^R ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.  2741 ^T^E^R^M^I^N^A^L^S ^C^A^N ^O^N^L^Y ^S^E^L^E^C^T IN=KB, IN=X,
      ^A^N^D IN=XK.  M^O^D^E 4 ^T^E^R^M^I^N^A^L^S, ^W^H^I^C^H ^A^R^E ^A^L^W^A^Y^S ^I^N ^B^L^O^C^K ^M^O^D^E, ^A^N^D
      X.25 PSN ^T^E^R^M^I^N^A^L^S ^C^A^N^N^O^T ^S^E^L^E^C^T PT ^O^R XP ^M^O^D^E.
.HELP,LI,NOLIST

      F^O^R^M^A^T@D  LI=^V^A^L^U^E

      T^H^E LI ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^T^O ^B^E
      ^I^N^S^E^R^T^E^D ^I^N^T^O ^T^H^E ^O^U^T^P^U^T ^S^T^R^E^A^M ^F^O^L^L^O^W^I^N^G ^A ^L^I^N^E ^F^E^E^D.

      E^N^T^E^R^I^N^G ^V^A^L^U^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^I^N^E ^F^E^E^D ^I^D^L^E ^C^O^U^N^T.  T^H^I^S ^V^A^L^U^E
      ^C^A^N ^B^E ^F^R^O^M 0 ^T^O 127 ^O^R ^T^H^E ^S^T^R^I^N^G CA.  A ^V^A^L^U^E ^O^F CA ^R^E^S^T^O^R^E^S ^T^H^E
      ^L^I^N^E ^F^E^E^D ^I^D^L^E ^C^O^U^N^T ^T^O ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E.

      T^H^E ^L^I^N^E ^F^E^E^D ^I^D^L^E ^C^O^U^N^T ^I^S ^S^I^M^I^L^A^R ^T^O ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E
      ^C^O^U^N^T (CI), ^E^X^C^E^P^T ^T^H^A^T ^T^H^E ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^O^U^T^P^U^T ^A^F^T^E^R ^A
      ^L^I^N^E ^F^E^E^D ^I^N^S^T^E^A^D ^O^F ^A^F^T^E^R ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.HELP,LK,NOLIST

      F^O^R^M^A^T@D  LK=^O^P^T^I^O^N

      T^H^E LK ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^U^N^S^O^L^I^C^I^T^E^D ^M^E^S^S^A^G^E^S ^F^R^O^M ^T^H^E
      ^N^E^T^W^O^R^K ^O^P^E^R^A^T^O^R ^A^P^P^E^A^R ^A^T ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^L^O^C^K ^O^U^T ^U^N^S^O^L^I^C^I^T^E^D ^M^E^S^S^A^G^E^S.
      A ^V^A^L^U^E ^O^F Y ^L^O^C^K^S ^O^U^T ^T^H^E ^M^E^S^S^A^G^E^S ^A^N^D ^A ^V^A^L^U^E N ^A^L^L^O^W^S ^T^H^E
      ^M^E^S^S^A^G^E^S ^T^O ^A^P^P^E^A^R.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^N^O^T ^V^A^L^I^D ^F^O^R ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.HELP,OC,NOLIST

      F^O^R^M^A^T@D  OC=^O^P^T^I^O^N

      T^H^E OC ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^G^E^N^E^R^A^T^E^S DC3^S ^A^S ^A
      ^S^T^O^P ^S^I^G^N^A^L ^T^O ^T^H^E ^N^E^T^W^O^R^K ^A^N^D DC1^S ^A^S ^A ^R^E^S^U^M^E ^S^I^G^N^A^L ^F^O^R
      ^T^E^R^M^I^N^A^L ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^O^U^T^P^U^T ^C^O^N^T^R^O^L.



      I^F ^T^H^E ^N^E^T^W^O^R^K ^R^E^C^E^I^V^E^S ^A DC3 ^W^H^I^L^E ^O^U^T^P^U^T ^C^O^N^T^R^O^L ^I^S ^E^N^A^B^L^E^D,
      ^I^T ^S^U^S^P^E^N^D^S ^O^U^T^P^U^T ^U^N^T^I^L ^I^T ^R^E^C^E^I^V^E^S ^A DC1.


      O^U^T^P^U^T ^C^O^N^T^R^O^L ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S, ^I^N^C^L^U^D^I^N^G ^P^A^P^E^R
      ^T^A^P^E ^D^E^V^I^C^E^S (^E^X^C^E^P^T 2741^S).
.HELP,OP,NOLIST

      F^O^R^M^A^T@D  OP=^O^P

      T^H^E OP ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^O^U^T^P^U^T ^D^E^V^I^C^E.

      T^H^E ^V^A^L^U^E ^O^P ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^D^E^V^I^C^E.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^O^P@D


      ^O^P           D^E^S^C^R^I^P^T^I^O^N
      --           -----------
      DI    S^P^E^C^I^F^I^E^S ^A ^D^I^S^P^L^A^Y ^D^E^V^I^C^E.
      PR    S^P^E^C^I^F^I^E^S ^A ^P^R^I^N^T^E^R.
      PT    S^P^E^C^I^F^I^E^S ^A ^P^A^P^E^R ^T^A^P^E ^P^U^N^C^H.
      Y^O^U ^C^A^N ^P^U^N^C^H ^A ^T^A^P^E ^I^N ^A^N^Y ^M^O^D^E ^B^U^T ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^P^R^O^V^I^D^E
      ^T^H^E ^P^R^O^P^E^R X-OFF ^C^H^A^R^A^C^T^E^R^S ^U^N^L^E^S^S OP ^H^A^S ^A ^V^A^L^U^E ^O^F PT.

      I^F ^Y^O^U ^S^E^L^E^C^T OP=PR, ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^L^I^N^E ^F^O^L^D^I^N^G ^A^N^D ^P^A^G^E
      ^B^O^U^N^D^I^N^G ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D X.25 PSN ^T^E^R^M^I^N^A^L^S.
      I^F OP=DI, ^T^H^E ^N^E^T^W^O^R^K ^A^S^S^U^M^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^P^E^R^F^O^R^M^S ^T^H^E^S^E
      ^F^U^N^C^T^I^O^N^S ^I^T^S^E^L^F.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T
      2741^S).  OP=PT ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O X.25 PSN ^T^E^R^M^I^N^A^L^S.
.HELP,PA,NOLIST

      F^O^R^M^A^T@D  PA=^P^A

      T^H^E PA ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^R^I^T^Y ^P^R^O^C^E^S^S^I^N^G ^T^O ^B^E ^P^E^R^F^O^R^M^E^D ^B^Y
      ^T^H^E ^N^E^T^W^O^R^K.

      T^H^E ^V^A^L^U^E ^P^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^P^A^R^I^T^Y ^P^R^O^C^E^S^S^I^N^G.  Y^O^U
      ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^P^A@D


      ^P^A                        D^E^S^C^R^I^P^T^I^O^N
      --                        -----------
      E     S^E^T ^P^A^R^I^T^Y ^B^I^T ^F^O^R ^E^V^E^N ^P^A^R^I^T^Y ^D^U^R^I^N^G ^O^U^T^P^U^T, ^A^N^D
            ^C^H^E^C^K ^F^O^R ^E^V^E^N ^P^A^R^I^T^Y (^E^X^C^E^P^T ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S)
            ^A^N^D ^S^E^T ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T.

      N     I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E, ^D^O ^N^O^T ^S^E^T ^O^R ^C^H^E^C^K ^T^H^E ^P^A^R^I^T^Y ^B^I^T
            ^B^E^C^A^U^S^E ^I^T ^I^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^D^A^T^A. I^N ^N^O^R^M^A^L^I^Z^E^D
            ^M^O^D^E, ^S^E^T ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T.

      O     S^E^T ^P^A^R^I^T^Y ^B^I^T ^F^O^R ^O^D^D ^P^A^R^I^T^Y ^D^U^R^I^N^G ^O^U^T^P^U^T, ^A^N^D ^C^H^E^C^K
            ^F^O^R ^O^D^D ^P^A^R^I^T^Y (^E^X^C^E^P^T ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S) ^A^N^D
            ^S^E^T ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T.

      Z     S^E^T ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^O^U^T^P^U^T ^A^N^D ^C^H^E^C^K ^P^A^R^I^T^Y ^B^I^T
            ^A^G^A^I^N^S^T ^Z^E^R^O ^O^N ^I^N^P^U^T.

      I     I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E, ^D^O ^N^O^T ^S^E^T ^O^R ^C^H^E^C^K ^T^H^E ^P^A^R^I^T^Y
            ^B^I^T ^B^E^C^A^U^S^E ^I^T ^I^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^D^A^T^A.
            I^G^N^O^R^E ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^W^H^E^N ^C^H^E^C^K^I^N^G ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
            ^I^N^P^U^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R^S.  I^N ^N^O^R^M^A^L^I^Z^E^D ^M^O^D^E, ^S^E^T ^T^H^E
            ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T.

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T
      2741^S).  F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S, ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^S^E^T ^T^O
      0 ^A^N^D ^N^O^T ^C^H^E^C^K^E^D ^F^O^R ^I^N^P^U^T.
.HELP,PG,NOLIST

      F^O^R^M^A^T@D  PG=^O^P^T^I^O^N

      T^H^E PG ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^P^A^G^E ^W^A^I^T^I^N^G ^A^T ^T^H^E ^T^E^R^M^I^N^A^L
      ^D^U^R^I^N^G ^O^U^T^P^U^T.  I^F ^Y^O^U ^E^N^A^B^L^E ^P^A^G^E ^W^A^I^T^I^N^G, ^T^H^E ^T^E^R^M^I^N^A^L ^S^T^O^P^S
      ^A^T ^T^H^E ^E^N^D ^O^F ^E^A^C^H ^O^U^T^P^U^T ^P^A^G^E ^F^O^R ^Y^O^U^R ^A^C^K^N^O^W^L^E^D^G^E^M^E^N^T (^A ^N^U^L^L
      ^I^N^P^U^T ^L^I^N^E) ^B^E^F^O^R^E ^O^U^T^P^U^T ^C^O^N^T^I^N^U^E^S.  (I^N ^O^R^D^E^R ^F^O^R ^T^H^E PG ^P^A^R^A^M^E^T^E^R
      ^T^O ^B^E ^E^F^F^E^C^T^I^V^E, ^A ^P^A^G^E ^L^E^N^G^T^H (PL) ^M^U^S^T ^B^E ^N^O^N-^Z^E^R^O.)

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^P^A^G^E ^W^A^I^T^I^N^G.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^A ^N^U^L^L ^I^N^P^U^T ^L^I^N^E ^T^O ^G^E^T ^T^H^E ^N^E^X^T ^P^A^G^E ^O^F
      ^O^U^T^P^U^T, ^T^H^E ^N^U^L^L ^I^N^P^U^T ^L^I^N^E ^H^A^S ^N^O ^O^T^H^E^R ^M^E^A^N^I^N^G.

      P^A^G^E ^W^A^I^T^I^N^G ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^O^R 3780
      ^T^E^R^M^I^N^A^L^S ^O^R ^T^O HASP ^T^E^R^M^I^N^A^L^S.
.HELP,PL,NOLIST

      F^O^R^M^A^T@D  PL=^P^L

      T^H^E PL ^P^A^R^A^M^E^T^E^R ^E^S^T^A^B^L^I^S^H^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^P^H^Y^S^I^C^A^L
      ^L^I^N^E^S ^T^H^A^T ^C^A^N ^B^E ^P^R^I^N^T^E^D ^A^S ^O^N^E ^P^A^G^E.  I^F ^T^H^E ^O^U^T^P^U^T ^D^E^V^I^C^E
      ^T^Y^P^E ^I^S PR ^T^H^E ^N^E^T^W^O^R^K ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^P^O^S^I^T^I^O^N^S ^T^H^E ^C^A^R^R^I^A^G^E ^T^O
      ^T^H^E ^T^O^P ^O^F ^T^H^E ^F^O^R^M ^A^F^T^E^R PL ^L^I^N^E^S ^H^A^V^E ^B^E^E^N ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^P^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^L^E^N^G^T^H.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y 0 ^O^R
      ^A^N^Y ^V^A^L^U^E ^F^R^O^M 8 ^T^O 255.  PL=0 ^S^E^L^E^C^T^S ^A^N ^I^N^F^I^N^I^T^E^L^Y ^L^O^N^G ^P^A^G^E.


      T^H^E PL ^V^A^L^U^E ^M^U^S^T ^B^E ^N^O^N-^Z^E^R^O ^I^F ^Y^O^U ^W^A^N^T ^T^O ^E^N^A^B^L^E ^P^A^G^E ^W^A^I^T^I^N^G
      ^S^I^N^C^E ^P^A^G^E ^W^A^I^T^I^N^G ^O^N^L^Y ^O^C^C^U^R^S ^A^F^T^E^R ^T^H^E ^N^U^M^B^E^R ^O^F ^L^I^N^E^S ^D^E^F^I^N^E^D ^B^Y
      ^P^L-1 ^A^R^E ^O^U^T^P^U^T.
.HELP,PW,NOLIST

      F^O^R^M^A^T@D  PW=^P^W

      T^H^E PW ^P^A^R^A^M^E^T^E^R ^E^S^T^A^B^L^I^S^H^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S
      ^T^H^A^T ^T^H^E ^T^E^R^M^I^N^A^L ^P^R^I^N^T^S ^O^N ^O^N^E ^O^U^T^P^U^T ^L^I^N^E.  I^F ^T^H^E ^O^U^T^P^U^T
      ^D^E^V^I^C^E ^T^Y^P^E ^I^S PR ^T^H^E ^S^Y^S^T^E^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^T^A^R^T^S ^A ^N^E^W ^L^I^N^E
      ^A^F^T^E^R ^P^W ^C^H^A^R^A^C^T^E^R^S ^H^A^V^E ^B^E^E^N ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^P^W ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^W^I^D^T^H.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^A ^V^A^L^U^E ^O^F 0
      ^O^R ^A^N^Y ^V^A^L^U^E ^F^R^O^M 20 ^T^O 255.  PW=0 ^S^E^L^E^C^T^S ^A^N ^I^N^F^I^N^I^T^E^L^Y ^L^O^N^G ^L^I^N^E.

.HELP,SE,NOLIST

      F^O^R^M^A^T@D  SE=^O^P^T^I^O^N

      T^H^E SE ^P^A^R^A^M^E^T^E^R ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^V^A^R^I^A^N^T ^O^F
      ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^E^N^A^B^L^E^S (Y) ^O^R ^D^I^S^A^B^L^E^S (N) ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^O^P^E^R^A^T^I^O^N^S.

      W^H^E^N ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^I^S ^I^N ^E^F^F^E^C^T, ^A^N^Y ^B^A^C^K^S^P^A^C^E ^C^H^A^R^A^C^T^E^R
      ^E^N^T^E^R^E^D ^I^S ^S^T^O^R^E^D ^F^O^R ^T^R^A^N^S^M^I^S^S^I^O^N ^T^O ^T^H^E ^H^O^S^T.  S^I^M^I^L^A^R^L^Y, ^A
      ^L^I^N^E ^F^E^E^D ^E^N^T^R^Y ^P^R^O^D^U^C^E^S ^A ^N^O^R^M^A^L ^L^I^N^E ^F^E^E^D ^O^P^E^R^A^T^I^O^N ^A^T ^T^H^E
      ^T^E^R^M^I^N^A^L ^A^N^D ^T^H^E ^N^E^T^W^O^R^K ^S^T^O^R^E^S ^T^H^E ^L^I^N^E ^F^E^E^D ^C^H^A^R^A^C^T^E^R ^C^O^D^E
      ^F^O^R ^T^R^A^N^S^M^I^S^S^I^O^N ^T^O ^T^H^E ^H^O^S^T.  A ^B^A^C^K^S^P^A^C^E ^F^O^L^L^O^W^E^D ^B^Y ^A ^L^I^N^E
      ^F^E^E^D ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^O^U^T^P^U^T ^A ^B^E^L^L ^A^N^D ^P^O^S^I^T^I^O^N ^T^H^E ^C^U^R^S^O^R
      ^B^E^L^O^W ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^E^N^T^E^R^E^D.

      T^H^I^S ^C^O^M^M^A^N^D ^I^S ^O^N^L^Y ^V^A^L^I^D ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T ^F^O^R
      X.25 PSN ^T^E^R^M^I^N^A^L^S).
.HELP,TC,NOLIST

      F^O^R^M^A^T@D  TC=^T^C

      T^H^E TC ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^F^O^R ^Y^O^U^R ^T^E^R^M^I^N^A^L.  T^H^E
      ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^A^S^S^O^C^I^A^T^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^W^I^T^H ^A ^P^R^E^D^E^F^I^N^E^D ^S^E^T ^O^F
      ^T^E^R^M^I^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.  T^O ^E^F^F^E^C^T^I^V^E^L^Y ^U^S^E ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S, ^C^H^O^O^S^E
      ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^W^H^O^S^E ^D^E^F^A^U^L^T ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^R^R^E^S^P^O^N^D^S ^T^O ^T^H^E
      ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^T^C ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^C^L^A^S^S.  T^H^E ^V^A^L^U^E ^T^C ^C^A^N ^B^E ^F^R^O^M
      1 ^T^O 18.  T^H^E ^F^O^L^L^O^W^I^N^G ^L^I^S^T ^A^S^S^O^C^I^A^T^E^S ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^V^A^L^U^E^S ^W^I^T^H
      ^T^E^R^M^I^N^A^L ^T^Y^P^E^S@D

      ^T^C    T^E^R^M^I^N^A^L ^T^Y^P^E
      --    -------------
      1     M33, M35, M37, M38 ^T^E^L^E^T^Y^P^E^S.
      2     CDC 713-10, 722, 751-1, 752, 756.
      3     CDC 721,722-30.
      4     IBM 2741.
      5     M40 ^T^E^L^E^T^Y^P^E^S.
      6     H^A^Z^E^L^T^I^N^E 2000.
      7     T^E^R^M^I^N^A^L^S ^C^O^N^F^O^R^M^I^N^G ^T^O ^T^H^E ANSI ^X3.64 ^S^T^A^N^D^A^R^D (DEC VT100,
            T^E^L^EV^I^D^E^O 924, 950,955).
      8     T^E^K^T^R^O^N^I^X 4010, 4014.
      9     HASP ^P^R^O^T^O^C^O^L, ^P^O^S^T^P^R^I^N^T ^F^O^R^M^A^T ^C^O^N^T^R^O^L.
      10    200 U^S^E^R T^E^R^M^I^N^A^L.
      11    CDC 714-30.
      12    CDC 711-10.
      13    CDC 714-10/20.
      14    HASP ^P^R^O^T^O^C^O^L, ^P^R^E^P^R^I^N^T ^F^O^R^M^A^T ^C^O^N^T^R^O^L.
      15    CDC 731-12, 734.
      16    IBM 2780.
      17    IBM 3780.
      18    IBM 3270.

      A ^T^E^R^M^I^N^A^L ^T^H^A^T ^I^S ^N^O^T ^S^H^O^W^N ^A^S ^B^E^L^O^N^G^I^N^G ^T^O ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S
      ^M^A^Y ^S^T^I^L^L ^B^E ^O^P^E^R^A^T^I^O^N^A^L.  T^H^E ^T^E^R^M^I^N^A^L ^C^A^N ^B^E ^A^S^S^I^G^N^E^D ^T^O ^A
      ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^H^A^V^I^N^G ^S^I^M^I^L^A^R ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^L'^S
      ^D^E^F^I^N^I^T^I^O^N ^C^A^N ^B^E ^M^O^D^I^F^I^E^D ^A^S ^N^E^C^E^S^S^A^R^Y ^T^O ^C^O^R^R^E^C^T^L^Y ^D^E^F^I^N^E ^T^H^E
      ^O^P^E^R^A^T^I^O^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^T^H^E ^T^E^R^M^I^N^A^L.


      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^S ^O^N ^A^N ^A^U^T^O-^R^E^C^O^G^N^I^T^I^O^N ^L^I^N^E ^A^N^D ^I^T^S ^T^E^R^M^I^N^A^L
      ^C^L^A^S^S ^I^S ^O^T^H^E^R ^T^H^A^N 4, 10, 13, ^O^R 18, ^Y^O^U ^C^A^N ^U^S^E ^T^H^E  TC ^P^A^R^A^M^E^T^E^R
      ^T^O ^C^H^A^N^G^E ^I^T^S ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^T^O ^E^N^S^U^R^E ^P^R^O^P^E^R ^O^P^E^R^A^T^I^O^N.

      I^F ^Y^O^U ^I^N^C^L^U^D^E ^A TC ^P^A^R^A^M^E^T^E^R ^I^N ^A ^S^E^Q^U^E^N^C^E ^O^F ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N
      ^C^O^M^M^A^N^D^S, ^E^N^T^E^R ^T^H^E TC ^P^A^R^A^M^E^T^E^R ^F^I^R^S^T ^A^S ^I^T ^R^E^S^E^T^S ^A^L^L ^O^T^H^E^R
      ^T^E^R^M^I^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.
.HELP,XL,NOLIST

      F^O^R^M^A^T@D  XL=X^X^X/C^C^O^U^N^T/TO/Y^Y^Y

      T^H^E ^N^E^T^W^O^R^K ^P^R^O^V^I^D^E^S ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^H^A^T ^A^L^L^O^W^S ^Y^O^U ^T^O ^R^E^M^A^I^N
      ^I^N ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^E^V^E^N ^A^F^T^E^R ^M^E^S^S^A^G^E ^B^L^O^C^K^S ^H^A^V^E ^B^E^E^N
      ^F^O^R^W^A^R^D^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.  T^H^E XL ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E
      ^M^U^L^T^I^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E.  I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^E^V^E^N, ^O^D^D, ^O^R ^Z^E^R^O
      (PA=E, O ^O^R Z), ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^S^T^R^I^P^P^E^D (^S^E^T ^T^O ^Z^E^R^O) ^B^E^F^O^R^E ^T^H^E
      ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T, ^A^L^T^H^O^U^G^H ^N^O ^T^R^A^N^S^L^A^T^I^O^N ^O^C^C^U^R^S.
      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^N^O^N^E ^O^R ^I^G^N^O^R^E (PA=N ^O^R I), ^T^H^E
      ^P^A^R^I^T^Y ^B^I^T ^I^S ^N^O^T ^S^T^R^I^P^P^E^D.

      T^H^E ^V^A^L^U^E X^X^X ^S^E^L^E^C^T^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^W^I^T^H ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^R^E^P^R^E^S^E^N^T^A^T^I^O^N ^X^X ^A^S ^T^H^E ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.  I^F ^Y^O^U ^D^O
      ^N^O^T ^S^P^E^C^I^F^Y ^A ^V^A^L^U^E ^Y^Y, ^T^H^E ^O^C^C^U^R^R^E^N^C^E ^O^F ^T^W^O ^S^U^C^C^E^S^S^I^V^E
      ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^B^Y ^X^X ^A^C^T^S ^A^S ^A ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T
      ^H^A^V^E ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L^S ^P^A^R^I^T^Y ^T^O ^N^O^N^E (PA=N) ^O^R ^I^G^N^O^R^E
      (PA=I); ^O^T^H^E^R^W^I^S^E ^T^H^E ^N^E^T^W^O^R^K ^C^A^N^N^O^T ^D^I^R^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N ^I^T ^O^C^C^U^R^S
      ^I^N ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^M^E^S^S^A^G^E.

      T^H^E ^V^A^L^U^E C^C^O^U^N^T ^S^E^L^E^C^T^S ^A ^D^E^C^I^M^A^L ^V^A^L^U^E ^F^R^O^M 1 ^T^O 4095 ^A^S ^A ^C^H^A^R^A^C^T^E^R
      ^C^O^U^N^T ^T^H^A^T ^F^U^N^C^T^I^O^N^S ^A^S ^A ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.  T^H^E^S^E ^V^A^L^U^E^S ^A^R^E
      ^V^A^L^I^D ^W^I^T^H ^T^H^E ^N^E^T^W^O^R^K.  H^O^W^E^V^E^R, ^U^N^L^E^S^S ^C^H^A^N^G^E^D ^D^U^R^I^N^G ^I^N^S^T^A^L^L^A^T^I^O^N,
      ^T^H^E ^M^A^X^I^M^U^M ^L^O^G^I^C^A^L ^I^N^P^U^T ^L^I^N^E ^L^E^N^G^T^H ^I^N IAF (2500 ^C^H^A^R^A^C^T^E^R^S) ^L^I^M^I^T^S ^Y^O^U.

      T^H^E ^V^A^L^U^E TO ^S^E^L^E^C^T^S ^T^I^M^E^O^U^T ^A^S ^A ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.

      T^H^E ^V^A^L^U^E Y^Y^Y ^S^E^L^E^C^T^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^W^I^T^H ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^R^E^P^R^E^S^E^N^T^A^T^I^O^N ^Y^Y ^A^S ^A ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^W^H^E^N ^I^T
      ^F^O^L^L^O^W^S ^X^X.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T ^H^A^V^E
      ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^T^O ^N^O^N^E (PA=N) ^O^R ^I^G^N^O^R^E (PA=I);
      ^O^T^H^E^R^W^I^S^E ^T^H^E ^N^E^T^W^O^R^K ^C^A^N^N^O^T ^D^E^T^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N ^I^T ^O^C^C^U^R^S ^I^N ^A
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^M^E^S^S^A^G^E.

      Y^Y^Y, ^I^F ^S^P^E^C^I^F^I^E^D, ^M^U^S^T ^F^O^L^L^O^W ^T^H^E X^X^X ^P^A^R^A^M^E^T^E^R; ^O^T^H^E^R^W^I^S^E,
      ^I^T ^I^S ^I^G^N^O^R^E^D.  T^H^E ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^T^H^E^R^W^I^S^E ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T.
      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A^T ^L^E^A^S^T ^O^N^E ^O^F X^X^X ^O^R TO ^T^O ^S^E^L^E^C^T ^A
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.  W^H^E^N ^I^T ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W^S ^T^H^E
      ^C^H^A^R^A^C^T^E^R ^D^E^F^I^N^E^D ^B^Y X^X^X ^O^N ^I^N^P^U^T, ^T^H^E ^C^H^A^R^A^C^T^E^R ^D^E^F^I^N^E^D ^B^Y
      ^Y^Y ^T^E^R^M^I^N^A^T^E^S ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.  T^H^E ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D
      ^B^Y X^X^X ^A^N^D Y^Y^Y ^C^A^N ^B^E ^I^D^E^N^T^I^C^A^L ^O^R ^Y^O^U ^C^A^N ^O^M^I^T Y^Y^Y.  I^N
      ^E^I^T^H^E^R ^C^A^S^E, ^T^W^O ^S^U^C^C^E^S^S^I^V^E ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^B^Y X^X^X
      ^A^R^E ^R^E^Q^U^I^R^E^D ^T^O ^T^E^R^M^I^N^A^T^E ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E.

      T^H^E ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S ^A^N^D ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R^S ^A^R^E ^N^O^T
      ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T.

      T^H^E XL ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4
      ^T^E^R^M^I^N^A^L^S.  T^E^R^M^I^N^A^L ^C^L^A^S^S 4 ^I^S ^C^O^N^F^I^G^U^R^E^D ^W^I^T^H ^T^H^E RETURN ^K^E^Y
      ^A^S ^T^H^E ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R ^A^N^D ^T^E^R^M^I^N^A^T^O^R, ^A^N^D ^M^O^D^E
      4 ^T^E^R^M^I^N^A^L^S ^A^R^E ^C^O^N^F^I^G^U^R^E^D ^W^I^T^H ^T^H^E SEND ^O^R ETX ^K^E^Y ^A^S ^T^H^E^I^R
      ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R ^A^N^D ^T^E^R^M^I^N^A^T^O^R.  F^O^R ^D^E^V^I^C^E^S
      ^C^O^N^N^E^C^T^E^D ^T^H^R^O^U^G^H X.25, ^T^H^E PAD ^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^L^W^A^Y^S ^A^C^T^S ^A^S
      ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R ^I^N ^A^D^D^I^T^I^O^N ^T^O ^A^N^Y ^O^T^H^E^R ^O^P^T^I^O^N^S
      ^S^E^L^E^C^T^E^D.

.ENDHELP
$REVERT,NOLIST.
*WEOR
.PROC,ULIB*I
,OP[L^I^B^R^A^R^Y ^O^P^E^R^A^T^I^O^N]=(C,A,D,R,F)
,REC[N^A^M^E ^O^F ^R^E^C^O^R^D]=(*F)
,LIB[N^A^M^E ^O^F ^L^O^C^A^L ^L^I^B^R^A^R^Y ^F^I^L^E]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D ULIB,OP=^O^P^E^R^A^T^I^O^N,REC=^R^E^C^O^R^D,LIB=^L^I^B^R^A^R^Y.
              ^O^R
              ULIB,^O^P^E^R^A^T^I^O^N,^R^E^C^O^R^D,^L^I^B^R^A^R^Y.

      T^H^E ULIB ^C^O^M^M^A^N^D ^C^A^N ^E^I^T^H^E^R ^C^R^E^A^T^E ^A ^U^S^E^R ^L^I^B^R^A^R^Y ^O^R ^A^D^D, ^D^E^L^E^T^E,
      ^O^R ^R^E^P^L^A^C^E ^R^E^C^O^R^D^S ^I^N ^A^N ^E^X^I^S^T^I^N^G ^U^S^E^R ^L^I^B^R^A^R^Y.  ULIB ^C^H^A^N^G^E^S
      ^A^F^F^E^C^T ^O^N^L^Y ^T^H^E ^L^O^C^A^L ^C^O^P^Y ^O^F ^A ^U^S^E^R ^L^I^B^R^A^R^Y.  (U^S^E ^T^H^E SAVE
      ^O^R REPLACE ^C^O^M^M^A^N^D ^T^O ^M^A^K^E ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^C^H^A^N^G^E^S ^P^E^R^M^A^N^E^N^T.)

      N^O^T^E@D A^L^L ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^R^E^Q^U^I^R^E^D.  T^H^E ^F^I^R^S^T ^F^O^R^M^A^T ^I^S ^T^H^E
            ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T ^F^O^R ^T^H^E ^P^A^R^A^M^E^T^E^R^S.  T^H^E ^S^E^C^O^N^D ^I^S
            ^T^H^E ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T ^F^O^R^M^A^T.
.HELP,OP,NOLIST

      F^O^R^M^A^T@D  OP=^O^P^E^R^A^T^I^O^N

      T^H^E ^P^A^R^A^M^E^T^E^R OP ^S^P^E^C^I^F^I^E^S ^T^H^E ^L^I^B^R^A^R^Y ^O^P^E^R^A^T^I^O^N ^T^O ^B^E ^D^O^N^E.  Y^O^U
      ^C^A^N ^S^P^E^C^I^F^Y ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^O^P^E^R^A^T^I^O^N@D

      ^O^P^E^R^A^T^I^O^N               D^E^S^C^R^I^P^T^I^O^N
      ---------               -----------
         C        C^R^E^A^T^E^S ^A ^N^E^W ^U^S^E^R ^L^I^B^R^A^R^Y.
         A        A^D^D^S ^A ^R^E^C^O^R^D ^T^O ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y (^S^A^M^E ^A^S R).
         D        D^E^L^E^T^E^S ^A ^R^E^C^O^R^D ^F^R^O^M ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y.
         R        R^E^P^L^A^C^E^S ^A ^R^E^C^O^R^D ^I^N ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y (^S^A^M^E ^A^S A).
         F        C^O^P^I^E^S ^A ^R^E^C^O^R^D ^F^R^O^M ^T^H^E ^U^S^E^R ^L^I^B^R^A^R^Y ^A^N^D ^M^A^K^E^S ^T^H^E ^C^O^P^Y
                  ^A ^L^O^C^A^L ^F^I^L^E ^W^I^T^H ^T^H^E ^S^A^M^E ^N^A^M^E ^A^S ^T^H^E ^R^E^C^O^R^D.

      D^E^F^A^U^L^T@D N^O^N^E.
.HELP,REC,NOLIST

      F^O^R^M^A^T@D  REC=^R^E^C^O^R^D

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^R^E^C^O^R^D ^T^O ^B^E ^A^D^D^E^D, ^D^E^L^E^T^E^D,
      ^R^E^P^L^A^C^E^D, ^O^R ^C^O^P^I^E^D.  T^H^E ^R^E^C^O^R^D ^N^A^M^E ^M^U^S^T ^B^E ^T^H^E ^N^A^M^E ^O^F ^A ^L^O^C^A^L ^F^I^L^E.
      (A ^F^I^L^E ^N^A^M^E ^M^U^S^T ^B^E ^F^R^O^M 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)

      D^E^F^A^U^L^T@D N^O^N^E.
.HELP,LIB,NOLIST

      F^O^R^M^A^T@D  LIB=^L^I^B^R^A^R^Y

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^L^I^B^R^A^R^Y ^F^I^L^E ^T^O ^B^E
      ^C^R^E^A^T^E^D ^O^R ^M^O^D^I^F^I^E^D.  ULIB ^C^A^N^N^O^T ^B^E ^U^S^E^D ^T^O ^M^O^D^I^F^Y ^A ^L^I^B^R^A^R^Y ^O^N ^A
      ^A ^D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E.  E^X^C^E^P^T ^I^N ^T^H^E ^C^A^S^E ^O^F OP=C ^O^R OP=F, ULIB
      ^R^E^T^U^R^N^S ^T^H^E ^O^R^I^G^I^N^A^L ^L^I^B^R^A^R^Y ^F^I^L^E ^A^N^D ^C^R^E^A^T^E^S ^A ^N^E^W ^L^O^C^A^L ^F^I^L^E.
      H^E^N^C^E, LIB ^C^A^N^N^O^T ^B^E ^U^S^E^D ^T^O ^D^I^R^E^C^T^L^Y ^M^O^D^I^F^Y ^A ^L^I^B^R^A^R^Y ^O^N ^A ^D^I^R^E^C^T
      ^A^C^C^E^S^S ^F^I^L^E.

      D^E^F^A^U^L^T@D N^O^N^E.
.ENDHELP
.EX.  $ULIB,#OP=OP,#REC=REC,#LIB=LIB.
*WEOR
.PROC,UNLOAD*I
,LFN[F^I^L^E ^T^O ^B^E ^U^N^L^O^A^D^E^D]=(*F,$*$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  UNLOAD,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               UNLOAD,*,^L^F^N1,^L^F^N2,...,^L^F^N^N.
               UNLOAD,*.

      T^H^E UNLOAD ^C^O^M^M^A^N^D ^R^E^L^E^A^S^E^S (^D^R^O^P^S) ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^A^N^D ^M^A^Y
      ^R^E^L^E^A^S^E ^F^I^L^E ^S^P^A^C^E ^D^E^P^E^N^D^I^N^G ^O^N ^T^H^E ^T^Y^P^E ^O^F ^F^I^L^E.  T^H^E ^F^I^R^S^T ^F^O^R^M^A^T
      ^U^N^L^O^A^D^S ^T^H^E ^N^A^M^E^D ^F^I^L^E^S (^L^F^N1,^L^F^N2,...,^L^F^N^N).  T^H^E ^S^E^C^O^N^D ^F^O^R^M^A^T ^D^R^O^P^S ^A^L^L
      ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B ^E^X^C^E^P^T ^T^H^E ^N^A^M^E^D ^F^I^L^E^S.  T^H^E ^T^H^I^R^D ^F^O^R^M^A^T ^D^R^O^

      ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.  I^N HELPME, ^Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y ^O^N^L^Y ^O^N^E ^F^I^L^E
      ^T^O ^D^R^O^P, ^O^R ^A^N ^A^S^T^E^R^I^S^K (*) ^T^O ^D^R^O^P ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.  T^H^E
      UNLOAD ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^R^E^L^E^A^S^E ^A^N^Y ^F^I^L^E^S ^T^H^A^T ^H^A^V^E ^C^H^E^C^K^P^O^I^N^T ^O^R
      ^N^O-^A^U^T^O-^D^R^O^P ^S^T^A^T^U^S.
.HELP,LFN,NOLIST

      F^O^R^M^A^T@D ^L^F^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N^I) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^R^E^L^E^A^S^E^D
      (^D^R^O^P^P^E^D) ^F^R^O^M ^Y^O^U^R ^J^O^B.  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C
      ^C^H^A^R^A^C^T^E^R^S.  I^N HELPME, ^Y^O^U ^M^A^Y ^E^N^T^E^R ^E^I^T^H^E^R ^A ^F^I^L^E ^N^A^M^E ^O^R ^A^N ^A^S^T^E^R^I^S^K
      (^N^O^T ^B^O^T^H).  A^N ^A^S^T^E^R^I^S^K ^D^R^O^P^S ^A^L^L ^F^I^L^E^S ^A^S^S^I^G^N^E^D ^T^O ^Y^O^U^R ^J^O^B.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E ^O^R ^A^S^T^E^R^I^S^K.
.ENDHELP
.EX.  $UNLOAD,LFN.
*WEOR
.PROC,UNLOCK*I
,LFN[S^P^E^C^I^F^Y ^T^H^E ^F^I^L^E ^T^O ^B^E ^U^N^L^O^C^K^E^D]=(*F)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  UNLOCK,^L^F^N1,...,^L^F^N^N.

      T^H^E UNLOCK ^C^O^M^M^A^N^D ^R^E^S^C^I^N^D^S ^T^H^E LOCK ^C^O^M^M^A^N^D ^A^N^D ^C^L^E^A^R^S ^T^H^E
      ^W^R^I^T^E ^I^N^T^E^R^L^O^C^K ^B^I^T ^F^O^R ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E.  T^H^I^S ^C^O^M^M^A^N^D ^C^A^N
      ^O^N^L^Y ^B^E ^U^S^E^D ^O^N ^L^O^C^A^L ^M^A^S^S ^S^T^O^R^A^G^E ^F^I^L^E^S.
.HELP,LFN,NOLIST

      F^O^R^M^A^T@D  ^L^F^N

      T^H^E ^P^A^R^A^M^E^T^E^R ^L^F^N^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^L^O^C^A^L ^F^I^L^E ^T^O ^B^E ^U^N^L^O^C^K^E^D.

      N^O^T^E@D  L^I^B^R^A^R^Y ^F^I^L^E^S ^C^A^N^N^O^T ^B^E ^U^N^L^O^C^K^E^D.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $UNLOCK(LFN)
*WEOR
.PROC,UPDATE*I
,ACC[C^O^P^Y ^O^L^D ^S^E^Q^U^E^N^T^I^A^L ^L^I^B^R^A^R^Y]=(*A1,*N=)
,NACC[C^O^P^Y ^O^L^D ^A^C^C^E^S^S ^L^I^B^R^A^R^Y]=(*A1,*N=)
,CLFN[S^P^E^C^I^F^Y ^C^O^M^P^I^L^E^R ^F^I^L^E]=(*F,*N=COMPILE)
,WID[S^E^T ^C^O^M^P^I^L^E^R ^F^I^L^E ^W^I^D^T^H]=(*S2(1234567890),*N=72)
,EDIT[E^D^I^T ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*A1,*N=)
,FULL[F^U^L^L ^U^P^D^A^T^E ^M^O^D^E]=(*A1,*N=)
,GLFN[O^U^T^P^U^T ^F^I^L^E ^F^O^R PULLMOD ^D^I^R^E^C^T^I^V^E]=(*F,*N=)
,HRUN[S^P^E^C^I^F^Y ^C^H^A^R^A^C^T^E^R ^S^E^T]=(63,64,*N=)
,ILFN[S^P^E^C^I^F^Y ^P^R^I^M^A^R^Y ^I^N^P^U^T ^F^I^L^E]=(*F,*N=INPUT)
,KLFN[S^P^E^C^I^F^Y ^C^O^M^P^I^L^E^R ^A^N^D ^D^E^C^K^S ^F^I^L^E]=(*F,*N=COMPILE)
,LIST[S^P^E^C^I^F^Y ^L^I^S^T^I^N^G^S ^O^P^T^I^O^N^S]=(*S11(AF0123456789),*N=)
,MLFN[M^E^R^G^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*F,*N=MERGE)
,NLFN[S^P^E^C^I^F^Y ^N^E^W ^P^R^O^G^R^A^M ^F^I^L^E]=(*F,*N=MEWPL)
,OLFN[S^P^E^C^I^F^Y ^O^U^T^P^U^T ^F^I^L^E]=(*F,*N=OUTPUT)
,PLFN[A^S^S^I^G^N ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^F^I^L^E]=(*F,*N=OLDPL)
,QK[Q^U^I^C^K ^M^O^D^E]=(*A1,*N=)
,REW[R^E^W^I^N^D ^F^I^L^E^S]=(YES=$,REW$,*K=$,REW$,Y=$REW$,NO=,N=,*N=)
,SLFN[S^P^E^C^I^F^Y ^S^O^U^R^C^E ^F^I^L^E]=(*F,*N=SOURCE)
,TLFN[S^P^E^C^I^F^Y ^S^O^U^R^C^E ^F^I^L^E ^W^I^T^H^O^U^T ^D^E^C^K^S]=(*F,*N=SOURCE)
,UPD[U^P^D^A^T^E ^P^R^O^C^E^S^S^I^N^G]=(*A1,*N=)
,WRIT[N^E^W ^S^E^Q^U^E^N^T^I^A^L ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y]=(*A1,*N=)
,XX[W^R^I^T^E ^C^O^M^P^I^L^E^R ^F^I^L^E ^I^N ^C^O^M^P^R^E^S^S^E^D ^F^O^R^M^A^T]=(*A1,*N=)
,ECHR[80-^C^H^A^R^A^C^T^E^R ^L^I^N^E ^I^M^A^G^E^S]=(8,*N=8)
,ACHR[M^A^S^T^E^R ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R]=($*$,*N=$*$)
,SCHR[C^O^M^M^E^N^T ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R]=($/$,*N=$/$)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D   UPDATE,A,B,C=^L^F^N1,D,E,F,G=^L^F^N2,H=^N,I=^L^F^N3,K=^L^F^N1,L=^C1^C2..^C^N,
                  M=^L^F^N4,N=^L^F^N5,O=^L^F^N6,P=^L^F^N7/^S1/^S2/.../^S7,Q,R=^C1^C2...^C4,
                  S=^L^F^N8,T=^L^F^N8,U,W,X,8,*=^C^H^A^R,/=^C^H^A^R.

      T^H^E UPDATE ^C^O^M^M^A^N^D ^C^R^E^A^T^E^S, ^E^D^I^T^S, ^O^R ^C^O^P^I^E^S ^A^N U^P^D^A^T^E-^F^O^R^M^A^T^T^E^D ^P^R^O^G^R^A^M
      ^L^I^B^R^A^R^Y ^F^I^L^E.
.HELP,ACC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R A ^S^P^E^C^I^F^I^E^S ^T^O ^C^O^P^Y ^T^H^E ^O^L^D ^S^E^Q^U^E^N^T^I^A^L ^A^C^C^E^S^S ^P^R^O^G^R^A^M
      ^L^I^B^R^A^R^Y ^T^O ^A ^N^E^W ^R^A^N^D^O^M ^A^C^C^E^S^S ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
.HELP,NACC,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R B ^S^P^E^C^I^F^I^E^S ^T^O ^C^O^P^Y ^T^H^E ^O^L^D ^R^A^N^D^O^M ^A^C^C^E^S^S ^P^R^O^G^R^A^M
      ^L^I^B^R^A^R^Y ^T^O ^A ^N^E^W ^S^E^Q^U^E^N^T^I^A^L ^A^C^C^E^S^S ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
.HELP,CLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R C=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E.  U^N^L^E^S^S ^O^T^H^E^R^W^I^S^E
      ^S^P^E^C^I^F^I^E^D, ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^H^A^S ^T^H^E ^S^A^M^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^A^S ^T^H^E ^O^L^D
      ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.  C=PUNCH ^I^M^P^L^I^E^S ^T^H^E D ^A^N^D 8 ^P^A^R^A^M^E^T^E^R^S.  C=0 ^I^M^P^L^I^E^S
      ^N^O ^C^O^M^P^I^L^E ^F^I^L^E.  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^S^P^E^C^I^F^Y ^T^H^E ^K^E^Y^W^O^R^D
      ^O^N^L^Y, COMPILE ^B^E^C^O^M^E^S ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E K=^L^F^N1
      ^P^A^R^A^M^E^T^E^R, ^T^H^E C=^L^F^N1 ^P^A^R^A^M^E^T^E^R ^I^S ^I^G^N^O^R^E^D.
.HELP,WID,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R D ^S^P^E^C^I^F^I^E^S ^T^O ^S^E^T ^T^H^E ^W^I^D^T^H ^O^F ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^T^O 80
      ^C^H^A^R^A^C^T^E^R^S.  T^H^E ^D^E^F^A^U^L^T ^I^S 72.
.HELP,EDIT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R E ^S^P^E^C^I^F^I^E^S ^T^O ^E^D^I^T ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.  T^O ^C^O^M^P^L^E^T^E^L^Y
      ^E^D^I^T ^T^H^E ^L^I^B^R^A^R^Y, ^S^P^E^C^I^F^Y ^T^H^E E ^P^A^R^A^M^E^T^E^R ^O^N ^T^W^O UPDATE ^C^O^M^M^A^N^D^S.  T^H^E
      ^F^I^R^S^T ^O^C^C^U^R^R^E^N^C^E ^O^F ^T^H^E E ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^R^E^A^R^R^A^N^G^E ^T^H^E
      ^T^H^E ^D^I^R^E^C^T^O^R^Y ^T^O ^R^E^F^L^E^C^T ^T^H^E ^A^C^T^U^A^L ^O^R^D^E^R ^O^F ^T^H^E ^D^E^C^K^S ^O^N ^T^H^E ^L^I^B^R^A^R^Y ^A^

      ^T^O ^R^E^M^O^V^E ^P^R^E^V^I^O^U^S^L^Y ^P^U^R^G^E^D ^I^D^E^N^T^I^F^I^E^R^S.  T^H^E ^S^E^C^O^N^D ^O^C^C^U^R^R^E^N^C^E ^O^F ^T^H^E E
      ^P^A^R^A^M^E^T^E^R ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^R^E^M^O^V^E ^T^H^E ^I^D^E^N^T^I^F^I^E^R^S ^T^H^A^T ^E^X^I^S^T ^O^N^L^Y ^

      ^D^I^R^E^C^T^O^R^Y ^E^N^T^R^I^E^S.
.HELP,FULL,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R F ^S^P^E^C^I^F^I^E^S ^F^U^L^L U^P^D^A^T^E ^M^O^D^E.
.HELP,GLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R G=^L^F^N2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^F^I^L^E ^F^O^R ^T^H^E PULLMOD ^D^I^R^E^C^T^I^V^E.
      U^N^L^E^S^S ^O^T^H^E^R^W^I^S^E ^S^P^E^C^I^F^I^E^D, ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^O^F ^L^F^N2 ^I^S ^T^H^E ^S^A^M^E ^A^
      ^T^H^A^T ^O^F ^T^H^E ^L^O^A^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.  I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^L^F^N2, ^T^H^E ^O^U^T^P^U^T
      ^F^R^O^M ^T^H^E PULLMOD ^D^I^R^E^C^T^I^V^E ^I^S ^A^P^P^E^N^D^E^D ^T^O ^T^H^E ^S^O^U^R^C^E ^F^I^L^E (^S^P^E^C^I^F^I^E^D ^B^Y
      ^T^H^E S=^L^F^N8 ^P^A^R^A^M^E^T^E^R).
.HELP,HRUN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R H=^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^A 63- ^O^R 64-^C^H^A^R^A^C^T^E^R ^S^E^T ^I^S ^T^O ^B^E
      ^U^S^E^D ^I^N ^T^H^E U^P^D^A^T^E ^R^U^N.

         ^N         D^E^S^C^R^I^P^T^I^O^N
         -         -----------
         3         A 63-^C^H^A^R^A^C^T^E^R ^S^E^T.

         4         A 64-^C^H^A^R^A^C^T^E^R ^S^E^T.

         ^O^M^I^T^T^E^D   C^H^A^R^A^C^T^E^R ^S^E^T ^T^H^A^T ^W^A^S ^U^S^E^D ^I^N ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
.HELP,ILFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R I=^L^F^N3 ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^I^M^A^R^Y ^I^N^P^U^T ^F^I^L^E.  T^H^E ^D^E^F^A^U^L^T ^I^S
      INPUT.  T^H^E ^D^E^F^A^U^L^T ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^I^S 6/12-^B^I^T ASCII ^C^O^D^E ^I^F INPUT
      ^I^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^T^E^R^M^I^N^A^L.  O^T^H^E^R^W^I^S^E, ^I^T ^I^S ^D^I^S^P^L^A^Y ^C^O^D^E.
.HELP,KLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R K=^L^F^N1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^T^H^E
      ^D^E^C^K^S ^A^R^E ^W^R^I^T^T^E^N ^T^O ^T^H^A^T ^F^I^L^E ^I^N ^T^H^E^I^R ^O^R^D^E^R ^O^F ^A^P^P^E^A^R^A^N^C^E ^I^N ^T^H^E COMPILE
      ^D^I^R^E^C^T^I^V^E^S.  T^H^E ^D^E^F^A^U^L^T ^I^S ^F^I^L^E COMPILE.  T^H^E ^D^E^F^A^U^L^T ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T
      ^I^S 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E.
.HELP,LIST,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R L=^C1^C2...^C^N ^S^P^E^C^I^F^I^E^S ^O^N^E ^O^R ^M^O^R^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^L^I^S^T
      ^O^P^T^I^O^N^S.

         ^C^I                        L^I^S^T O^P^T^I^O^N^S
         --                        ------------
         A     L^I^S^T^S ^D^E^C^K ^N^A^M^E^S ^A^N^D ^C^O^R^R^E^C^T^I^O^N ^S^E^T ^I^D^E^N^T^I^F^I^E^R^S, COMDECK
               ^D^I^R^E^C^T^I^V^E^S, ^D^E^F^I^N^I^T^I^O^N^S, ^A^N^D ^D^E^C^K^S ^W^R^I^T^T^E^N ^O^N ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E.

         F     U^S^E^S ^A^L^L ^L^I^S^T ^O^P^T^I^O^N^S ^E^X^C^E^P^T 0.

         0     S^U^P^P^R^E^S^S^E^S ^A^L^L ^L^I^S^T^I^N^G.

         1     L^I^S^T^S ^L^I^N^E^S ^I^N ^E^R^R^O^R.

         2     L^I^S^T^S ^A^C^T^I^V^E U^P^D^A^T^E ^D^I^R^E^C^T^I^V^E^S.

         3     N^O^T^E^S ^O^N ^E^A^C^H ^L^I^N^E ^T^H^A^T ^C^H^A^N^G^E^D ^S^T^A^T^U^S ^D^U^R^I^N^G ^C^U^R^R^E^N^T ^E^X^E^C^U^T^I^O^N.

         4     L^I^S^T^S ^T^E^X^T ^L^I^N^E^S.

         5     L^I^S^T^S ^A^C^T^I^V^E ^C^O^M^P^I^L^E ^F^I^L^E ^D^I^R^E^C^T^I^V^E^S.

         6     L^I^S^T^S ^A^C^T^I^V^E ^A^N^D ^I^N^A^C^T^I^V^E ^L^I^N^E^S.

         7     L^I^S^T^S ^A^L^L ^A^C^T^I^V^E ^L^I^N^E^S.

         8     L^I^S^T^S ^A^L^L ^I^N^A^C^T^I^V^E ^L^I^N^E^S.

         9     L^I^S^T^S ^C^O^R^R^E^C^T^I^O^N ^H^I^S^T^O^R^Y ^O^F ^A^L^L ^L^I^N^E^S ^S^E^L^E^C^T^E^D ^B^Y ^L^I^S^T ^O^P^T^I^O^N^S
               5, 7, 8.

      T^H^E ^D^E^F^A^U^L^T ^D^E^P^E^N^D^S ^O^N ^T^H^E ^N^A^T^U^R^E ^O^F ^T^H^E U^P^D^A^T^E ^P^R^O^C^E^S^S^I^N^G.  F^O^R ^A
      ^C^R^E^A^T^I^O^N ^R^U^N, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^O^P^T^I^O^N^S A, 1, ^A^N^D 2.  F^O^R ^A ^C^O^R^R^E^C^T^I^O^N
      ^R^U^N, ^T^H^E ^D^E^F^A^U^L^T ^I^S A, 1, 2, 3, ^A^N^D 4.  F^O^R ^A ^C^O^P^Y ^R^U^N, ^T^H^E ^D^E^F^A^U^L^T
      ^I^S A ^A^N^D 1.
.HELP,MLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R M=^L^F^N4 ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^L^F^N4 ^A^N^D ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y
      ^A^R^E ^T^O ^M^E^R^G^E^D.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^O^N^L^Y ^T^H^E ^K^E^Y^W^O^R^D M, ^T^H^E ^S^Y^S^T^E^M ^M^E^R^G^E^S
      ^T^H^E ^F^I^L^E MERGE ^A^N^D ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.  T^H^E ^T^W^O ^L^I^B^R^A^R^I^E^S ^M^U^S^T
      ^H^A^V^E ^T^H^E ^S^A^M^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T.  I^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^N^O
      ^M^E^R^G^I^N^G ^O^C^C^U^R^S.
.HELP,NLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R N=^L^F^N5 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.  I^F ^Y^O^U ^D^O
      ^S^P^E^C^I^F^Y ^A ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^O^N ^A ^C^O^R^R^E^C^T^I^O^N ^R^U^N, ^N^O ^N^E^W ^P^R^O^G^R^A^M ^I^S
      ^G^E^N^E^R^A^T^E^D.  O^T^H^E^R^W^I^S^E, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^F^I^L^E NEWPL.  T^H^E ^D^E^F^A^U^L^T
      ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^O^F ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^T^H^E ^S^A^M^E ^A^S ^T^H^A^T ^O^F ^T^H^E
      ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^U^N^L^E^S^S ^T^H^E ^P^R^I^M^A^R^Y ^I^N^P^U^T ^F^I^L^E ^I^S ^I^N 7-^B^I^T ASCII
      ^C^O^D^E ^A^N^D ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^I^N 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E.  I^N ^T^H^I^S
      ^C^A^S^E, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E 7-^B^I^T ASCII ^C^O^D^E ^S^E^T.
.HELP,OLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R O=^L^F^N6 ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^F^I^L^E.  T^H^E ^D^E^F^A^U^L^T ^I^S OUTPUT.
      T^H^E ^D^E^F^A^U^L^T ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^I^S ^T^H^E ^S^A^M^E ^A^S ^T^H^A^T ^O^F ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R

.HELP,PLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R P=^L^F^N7/^S1/^S2/.../^S7 ^S^P^E^C^I^F^I^E^S ^F^I^L^E ^L^F^N7 ^A^S ^T^H^E ^O^L^D ^P^R^O^G^R^A^M
      ^L^I^B^R^A^R^Y.  I^F ^J^U^S^T ^T^H^E ^K^E^Y^W^O^R^D P ^I^S ^S^P^E^C^I^F^I^E^D, ^F^I^L^E OLDPL ^I^S ^A^S^S^U^M^E^D.  I^F
      ^S1/^S2/.../^S7 ^I^S ^S^P^E^C^I^F^I^E^D, ^S^E^C^O^N^D^A^R^Y ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^I^E^S ^W^I^L^L ^R^E^S^I^D^E ^O^N
      ^F^I^L^E^S ^S1,^S2,...^S7.
.HELP,QK,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R Q ^S^P^E^C^I^F^I^E^S ^T^O ^P^R^O^C^E^S^S ^O^N^L^Y ^D^E^C^K^S ^O^N COMPILE ^D^I^R^E^C^T^I^V^E^S
      (^Q^U^I^C^K ^M^O^D^E).
.HELP,REW,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R R=^C1^C2...^C4 ^S^P^E^C^I^F^I^E^S ^T^O ^R^E^W^I^N^D ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E^S (^C^I)
      ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^T^H^E U^P^D^A^T^E ^R^U^N.

         ^C^I                F^I^L^E^S
         --                -----
         C     C^O^M^P^I^L^E ^F^I^L^E.
         N     N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
         P     O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^A^N^D ^M^E^R^G^E ^L^I^B^R^A^R^Y.
         S     S^O^U^R^C^E ^A^N^D PULLMOD ^F^I^L^E^S.

      D^E^F^A^U^L^T@D  I^F ^C^I ^I^S ^O^M^I^T^T^E^D, ^N^O ^F^I^L^E^S ^A^R^E ^R^E^W^O^U^N^D.  I^F R=^C1^C2...^C4 ^I^S
                ^O^M^I^T^T^E^D, ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y, ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y, ^C^O^M^P^I^L^E
                ^F^I^L^E, ^S^O^U^R^C^E ^F^I^L^E, ^A^N^D PULLMOD ^F^I^L^E ^A^R^E ^A^L^L ^R^E^W^O^U^N^D.
.HELP,SLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R S=^L^F^N8 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^O^U^R^C^E ^F^I^L^E.  I^F ^Y^O^U
      ^S^P^E^C^I^F^Y ^T^H^E ^K^E^Y^W^O^R^D ^O^N^L^Y, ^T^H^E ^F^I^L^E SOURCE ^B^E^C^O^M^E^S ^T^H^E ^S^O^U^R^C^E ^F^I^L^E.  I^F ^Y^O^U
      ^O^M^I^T ^T^H^E ^P^A^R^A^M^E^T^E^R, ^T^H^E ^S^Y^S^T^E^M ^D^O^E^S ^N^O^T ^W^R^I^T^E ^A ^S^O^U^R^C^E ^F^I^L^E ^U^N^L^E^S^S ^Y^O^U
      ^S^P^E^C^I^F^Y ^T^H^E T=^L^F^N8 ^P^A^R^A^M^E^T^E^R.  T^H^E ^D^E^F^A^U^L^T ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^O^F ^T^H^E
      ^S^O^U^R^C^E ^F^I^L^E ^I^S ^T^H^E ^S^A^M^E ^A^S ^T^H^A^T ^O^F ^T^H^E ^O^L^D ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y.
.HELP,TLFN,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R T=^L^F^N8 ^F^U^N^C^T^I^O^N^S ^T^H^E ^S^A^M^E ^A^S ^T^H^E S=^L^F^N8 ^P^A^R^A^M^E^T^E^R, ^E^X^C^E^P^T
      ^T^H^A^T ^I^T ^E^X^C^L^U^D^E^S ^C^O^M^M^O^N ^D^E^C^K^S ^F^R^O^M ^T^H^E ^S^O^U^R^C^E ^F^I^L^E.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^T^A^K^E

      ^P^R^E^C^E^D^E^N^C^E ^O^V^E^R ^T^H^E S=^L^F^N8 ^P^A^R^A^M^E^T^E^R.
.HELP,UPD,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R U ^S^P^E^C^I^F^I^E^S ^T^H^A^T U^P^D^A^T^E ^P^R^O^C^E^S^S^I^N^G ^I^S ^T^O ^C^O^N^T^I^N^U^E ^E^V^E^N ^I^F
      ^N^O^R^M^A^L^L^Y ^F^A^T^A^L ^E^R^R^O^R^S ^O^C^C^U^R.
.HELP,WRIT,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R W ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^W^R^I^T^T^E^N ^I^N ^S^E^Q^U^E^N^T^
L
      ^A^C^C^E^S^S ^F^O^R^M^A^T.  I^F W ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^N^E^W ^P^R^O^G^R^A^M ^L^I^B^R^A^R^Y ^I^S ^W^R^I^T^T^E^N ^I^N
      ^R^A^N^D^O^M ^A^C^C^E^S^S ^F^O^R^M^A^T ^U^N^L^E^S^S ^T^H^E ^F^I^L^E ^I^S ^O^N ^M^A^G^N^E^T^I^C ^T^A^P^E.
.HELP,XX,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R X ^S^P^E^C^I^F^I^E^S ^T^O ^W^R^I^T^E ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^N ^C^O^M^P^R^E^S^S^E^D ^F^O^R^M^A^

      I^F X ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^S ^N^O^T ^C^O^M^P^R^E^S^S^E^D.
.HELP,ECHR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R 8 ^S^P^E^C^I^F^I^E^S ^T^O ^W^R^I^T^E ^C^O^M^P^I^L^E ^F^I^L^E ^O^U^T^P^U^T ^A^S 80-^C^H^A^R^A^C^T^E^R
      ^L^I^N^E ^I^M^A^G^E^S.  I^F 8 ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^C^O^M^P^I^L^E ^F^I^L^E ^I^S ^W^R^I^T^T^E^N ^A^S 90-^C^H^A^R^A^C^T^E^R
      ^L^I^N^E ^I^M^A^G^E^S.
.HELP,ACHR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R *=^C^H^A^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^S^T^E^R ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R (^F^I^R^S^T
      ^C^H^A^R^A^C^T^E^R ^O^F ^E^A^C^H ^D^I^R^E^C^T^I^V^E) ^F^O^R ^T^H^I^S U^P^D^A^T^E ^R^U^N ^I^S ^C^H^A^R, ^W^H^I^C^H ^C^A^N
      ^B^E ^A^N^Y ^C^H^A^R^A^C^T^E^R ^H^A^V^I^N^G ^A 6-^B^I^T ^D^I^S^P^L^A^Y ^C^O^D^E ^O^C^T^A^L ^V^A^L^U^E ^I^N ^T^H^E ^R^A^N^G^E
      01 ^T^H^R^O^U^G^H 54 ^E^X^C^E^P^T ^F^O^R 51 ^A^N^D 52 (^T^H^E ^O^P^E^N ^A^N^D ^C^L^O^S^E ^P^A^R^E^N^T^H^E^S^E^S).
      I^F ^T^H^I^S ^O^P^T^I^O^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^M^A^S^T^E^R ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^I^S *.
.HELP,SCHR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R /=^C^H^A^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^O^M^M^E^N^T ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^T^H^I^S
      U^P^D^A^T^E ^R^U^N ^I^S ^C^H^A^R, ^W^H^I^C^H ^C^A^N ^B^E A ^T^H^R^O^U^G^H Z, 0 ^T^H^R^O^U^G^H 9, ^O^R + - * / $ =.
      T^H^E ^C^H^A^R^A^C^T^E^R ^S^H^O^U^L^D ^N^O^T ^B^E ^C^H^A^N^G^E^D ^T^O ^O^N^E ^O^F ^T^H^E ^A^B^B^R^E^V^I^A^T^E^D ^F^O^R^M^S ^O^F ^T











      ^D^I^R^E^C^T^I^V^E^S ^U^N^L^E^S^S NOABBREV ^I^S ^I^N ^E^F^F^E^C^T.  I^F ^T^H^I^S ^O^P^T^I^O^N ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^C^O^M^M^E^N^T ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^I^S ^A ^S^L^A^N^T ^B^A^R.
.ENDHELP
$REVERT,NOLIST
*WEOR
.PROC,UPROC*I
,FN[S^P^E^C^I^F^Y ^Y^O^U^R ^U^S^E^R ^P^R^O^L^O^G^U^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  UPROC,FN=^P^F^I^L^E.
               UPROC,^P^F^I^L^E.

      T^H^E UPROC ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^Y^O^U^R ^U^S^E^R ^P^R^O^L^O^G^U^E, ^W^H^I^C^H ^I^S ^E^X^E^C^U^T^E^D
      ^E^A^C^H ^T^I^M^E ^Y^O^U ^L^O^G ^I^N.
.HELP,FN,NOLIST

      S^P^E^C^I^F^Y ^A ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^T^H^A^T ^C^O^N^T^A^I^N^S ^Y^O^U^R ^U^S^E^R ^P^R^O^L^O^G^U^E. (A ^F^I^L^E
      ^N^A^M^E ^I^S 1 ^T^O 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.)  I^F ^T^H^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E
      ^C^O^N^T^A^I^N^S ^M^O^R^E ^T^H^A^N ^O^N^E ^P^R^O^C^E^D^U^R^E, ^T^H^E ^S^Y^S^T^E^M ^E^X^E^C^U^T^E^S ^O^N^L^Y ^T^H^E ^F^I^R^S^T
      ^O^N^E.  I^F ^Y^O^U ^O^M^I^T ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^O^R ^S^P^E^C^I^F^Y 0 (^Z^E^R^O), ^T^H^E ^S^Y^S^T^E^M
      ^W^I^L^L ^N^O ^L^O^N^G^E^R ^E^X^E^C^U^T^E ^Y^O^U^R ^U^S^E^R ^P^R^O^L^O^G^U^E.

      D^E^F^A^U^L^T@D N^O^N^E; ^T^H^E ^S^Y^S^T^E^M ^N^O ^L^O^N^G^E^R ^E^X^E^C^U^T^E^S ^Y^O^U^R ^P^R^O^L^O^G^U^E.
.ENDHELP
.EX.  $UPROC(#FN=FN)
*WEOR
.PROC,USECPU*I
,CPU[S^P^E^C^I^F^Y ^W^H^I^C^H CPU ^T^O ^U^S^E]=(0,1,2)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  USECPU,^C^P^U.

      T^H^E USECPU ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^W^H^I^C^H ^C^E^N^T^R^A^L ^P^R^O^C^E^S^S^O^R ^I^S ^T^O ^B^E ^U^S^E^D
      ^W^H^E^N ^M^O^R^E ^T^H^A^N ^O^N^E ^I^S ^A^V^A^I^L^A^B^L^E ^F^O^R ^P^R^O^C^E^S^S^I^N^G.  T^H^I^S ^C^O^M^M^A^N^D ^M^A^Y ^B^E
      ^U^S^E^D ^O^N^L^Y ^W^H^E^N ^T^H^E ^S^Y^S^T^E^M ^I^S ^R^U^N^N^I^N^G ^O^N ^A ^M^O^D^E^L 72-2^X, 73-2^X, 74-2^X, 174,
      720-2, 730-2, 6500, 6700, 830-2, 865-2, ^O^R 875-2.
.HELP,CPU,NOLIST

      E^N^T^E^R    T^O ^S^P^E^C^I^F^Y

      0       E^I^T^H^E^R ^C^E^N^T^R^A^L ^P^R^O^C^E^S^S^O^R ^I^S ^U^S^E^D.
      1       CPU 0 ^I^S ^U^S^E^D.
      2       CPU 1 ^I^S ^U^S^E^D.

      D^E^F^A^U^L^T@D N^O^N^E; CPU ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.ENDHELP
.EX.  $USECPU,CPU.
*WEOR
.PROC,USER*I
,UN[U^S^E^R ^N^A^M^E]=(*A1..7)
,PW[P^A^S^S^W^O^R^D]=(*F)
,FNAM[F^A^M^I^L^Y ^N^A^M^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  USER,^U^S^E^R^N^A^M^E,^P^A^S^S^W^O^R^D,^F^A^M^I^L^Y^N^A^M^E.

      T^H^E ^S^Y^S^T^E^M ^U^S^E^S ^T^H^E ^P^A^R^A^M^E^T^E^R^S ^O^N ^T^H^E USER ^C^O^M^M^A^N^D ^T^O ^D^E^T^E^R^M^I^N^E ^I^F ^Y^O^U
      ^A^R^E ^A^N ^A^U^T^H^O^R^I^Z^E^D ^U^S^E^R, ^W^H^I^C^H ^R^E^S^O^U^R^C^E^S ^Y^O^U ^A^R^E ^V^A^L^I^D^A^T^E^D ^T^O ^U^S^E, ^A^N^D ^T^H

      ^E^X^T^E^N^T (^L^I^M^I^T^S) ^T^O ^W^H^I^C^H ^Y^O^U ^M^A^Y ^U^S^E ^T^H^O^S^E ^R^E^S^O^U^R^C^E^S.
.HELP,UN,NOLIST

      T^H^E ^U^S^E^R ^N^A^M^E ^M^U^S^T ^B^E 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^E^N^T^E^R ^A ^U^S^E^R ^N^A^M^E.
.HELP,PW,NOLIST

      T^H^E ^P^A^S^S^W^O^R^D ^M^A^Y ^B^E ^A ^M^A^X^I^M^U^M ^O^F 7 ^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S (^M^I^N^I^M^U^M
      ^L^E^N^G^T^H ^I^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E ^I^N^S^T^A^L^L^A^T^I^O^N).

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^E^N^T^E^R ^A ^P^A^S^S^W^O^R^D.
.HELP,FNAM,NOLIST

      T^H^I^S ^O^P^T^I^O^N^A^L ^P^A^R^A^M^E^T^E^R ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^F^A^M^I^L^Y ^O^F ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^D^E^V^I^C^E

      ^O^N ^W^H^I^C^H ^Y^O^U^R ^P^E^R^M^A^N^E^N^T ^F^I^L^E^S ^R^E^S^I^D^E.  Y^O^U ^S^H^O^U^L^D ^S^P^E^C^I^F^Y ^A ^F^A^M^I^L^Y ^N^A^M^E
      ^W^H^E^N ^T^H^E ^S^Y^S^T^E^M ^C^A^N ^A^C^C^E^S^S ^M^O^R^E ^T^H^A^N ^O^N^E ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^D^E^V^I^C^E
      ^F^A^M^I^L^Y.

      D^E^F^A^U^L^T@D I^F ^Y^O^U^R ^S^I^T^E ^H^A^S ^M^O^R^E ^T^H^A^N ^O^N^E ^F^A^M^I^L^Y, ^T^H^E ^S^I^T^E ^D^E^T^E^R^M^I^N^E^S
               ^W^H^I^C^H ^O^N^E ^I^S ^T^H^E ^D^E^F^A^U^L^T.
.ENDHELP
.EX. $USER(UN,PW,FNAM)
$REVERT(NOLIST)
*WEOR
.PROC,VERIFY*I,
,FIRST[F^I^R^S^T ^F^I^L^E ^T^O ^B^E ^C^O^M^P^A^R^E^D]=(*F,*N=TAPE1)
,SECOND[S^E^C^O^N^D ^F^I^L^E ^T^O ^B^E ^C^O^M^P^A^R^E^D]=(*F,*N=TAPE2)
,N[N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^C^O^M^P^A^R^E]=(*S6(0123456789B),*K,*N=1)
,E[E^R^R^O^R ^L^I^S^T ^T^H^R^E^S^H^O^L^D]=(*S6(0123456789),*N=100,*K=0)
,L[L^I^S^T^I^N^G ^F^I^L^E ^N^A^M^E]=(*F,*N=OUTPUT)
,A[A^B^O^R^T ^O^N ^E^R^R^O^R^S]=(*K=$,A$,YES=$,A$,Y=$,A$,NO=,N=,*N=)
,R[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E]=(YES=$,R$,Y=$,R$,*K=$,R$,NO=,N=,*N=)
,C[S^E^T ^C^O^D^E^D ^M^O^D^E ^F^O^R ^B^O^T^H ^F^I^L^E^S]=(C=$,C$,YES=$,C$,Y=$,C$,NO=,N=,*N=)
,C1[S^E^T ^C^O^D^E^D ^M^O^D^E ^F^O^R ^T^H^E ^F^I^R^S^T ^F^I^L^E]=(C1=$,C1$,YES=$,C1$,Y=$,C1$,NO=,N=,*N=)
,C2[S^E^T ^C^O^D^E^D ^M^O^D^E ^F^O^R ^T^H^E ^S^E^C^O^N^D ^F^I^L^E]=(C2=$,C2$,YES=$,C2$,Y=$,C2$,NO=,N=,*N=)
,BS[B^L^O^C^K ^S^I^Z^E]=(*S6(0123456789),*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  VERIFY,^L^F^N1,^L^F^N2,N=^N,E=^E,L=^L^F^N3,A,R,C,C1,C2,BS=^B^S.

      T^H^E VERIFY ^C^O^M^M^A^N^D ^P^E^R^F^O^R^M^S ^A ^B^I^N^A^R^Y ^C^O^M^P^A^R^I^S^O^N ^O^F ^A^L^L ^D^A^T^A ^F^R^O^M ^T^H^E
      ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N ^O^F ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E^S.
.HELP,FIRST,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^R^S^T ^F^I^L^E ^T^O ^B^E ^V^E^R^I^F^I^E^D.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S
      ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S TAPE1.

.HELP,SECOND,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      N^A^M^E ^O^F ^T^H^E ^S^E^C^O^N^D ^F^I^L^E ^T^O ^B^E ^V^E^R^I^F^I^E^D.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S TAPE2.
.HELP,N,NOLIST

      F^O^R^M^A^T@D  N=^N

      S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E^S ^T^O ^V^E^R^I^F^Y.  P^O^S^S^I^B^L^E ^V^A^L^U^E^S ^A^R^E@D

      ^N                               D^E^S^C^R^I^P^T^I^O^N
      -                               -----------
      0        V^E^R^I^F^I^C^A^T^I^O^N ^T^E^R^M^I^N^A^T^E^S ^O^N ^T^H^E ^F^I^R^S^T ^E^M^P^T^Y ^F^I^L^E ^E^N^C^O^U^N^T^E^R^E^D
               ^O^N ^E^I^T^H^E^R ^F^I^L^E.
      X        V^E^R^I^F^Y X ^F^I^L^E^S.
      N        I^F ^Y^O^U ^S^P^E^C^I^F^Y ^J^U^S^T ^T^H^E ^K^E^Y^W^O^R^D N, ^V^E^R^I^F^I^C^A^T^I^O^N ^T^E^R^M^I^N^A^T^E^S ^W^H^E^N
               ^A^N ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N ^I^S ^E^N^C^O^U^N^T^E^R^E^D ^O^N ^B^O^T^H ^F^I^L^E^S.

      D^E^F^A^U^L^T@D 1
.HELP,E,NOLIST

      F^O^R^M^A^T@D  E=^Y

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^E^R^R^O^R^S ^T^O ^L^I^S^T.
      E^N^T^E^R ^A ^N^U^M^B^E^R ^B^E^T^W^E^E^N 0 ^A^N^D 999999 (^E^N^T^E^R^I^N^G E ^R^E^S^U^L^T^S ^I^N E=0).

      D^E^F^A^U^L^T@D 100.
.HELP,L,NOLIST

      F^O^R^M^A^T@D  L=^L^F^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^E^R^R^O^R ^L^I^S^T^I^N^G ^F^I^L^E (L=^L^F^N3).

      D^E^F^A^U^L^T@D  L=OUTPUT.
.HELP,A,NOLIST

      F^O^R^M^A^T@D  A

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^A^B^O^R^T ^A^F^T^E^R ^V^E^R^I^F^I^C^A^T^I^O^N ^C^O^M^P^L^E^T^E^D ^I^F ^E^R^R^O
&l5C      ^O^C^C^U^R^E^D.

      D^E^F^A^U^L^T@D  N^O ^A^B^O^R^T.
.HELP,R,NOLIST

      F^O^R^M^A^T@D  R

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^R^E^W^I^N^D ^B^O^T^H ^F^I^L^E^S ^B^E^F^O^R^E ^A^N^D ^A^F^T^E^R ^T^H^E
      ^V^E^R^I^F^I^C^A^T^I^O^N.

      D^E^F^A^U^L^T@D  N^E^I^T^H^E^R ^F^I^L^E ^I^S ^R^E^W^O^U^N^D ^B^E^F^O^R^E ^O^R ^A^F^T^E^R ^T^H^E ^V^E^R^I^F^I^C^A^T^I^O^N.
.HELP,C,NOLIST

      F^O^R^M^A^T@D  C

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^S^E^T ^C^O^D^E^D ^F^I^L^E ^M^O^D^E ^O^N ^B^O^T^H ^F^I^L^E^S.  T^H^I^S ^I^S
      ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^T^O S ^A^N^D L ^F^O^R^M^A^T ^T^A^P^E^S.  I^F ^C^O^D^E^D ^M^O^D^E ^I^S ^S^E^T ^O^N ^A^N SI
      ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D  C^O^D^E^D ^M^O^D^E ^I^S ^N^O^T ^S^E^T ^F^O^R ^E^I^T^H^E^R ^F^I^L^E.
.HELP,C1,NOLIST

      F^O^R^M^A^T@D  C1

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^S^E^T ^C^O^D^E^D ^F^I^L^E ^M^O^D^E ^O^N ^T^H^E ^F^I^R^S^T ^F^I^L^E (^L^F^N1)
      ^O^N^L^Y.  T^H^I^S ^I^S ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^T^O S ^A^N^D L ^F^O^R^M^A^T ^T^A^P^E^S.  I^F ^C^O^D^E^D ^M^O^D^E ^I^S
      ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D C^O^D^E^D ^M^O^D^E ^I^S ^N^O^T ^S^E^T ^F^O^R ^T^H^E ^F^I^R^S^T ^F^I^L^E.
.HELP,C2,NOLIST

      F^O^R^M^A^T@D  C2

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^S^E^T ^C^O^D^E^D ^F^I^L^E ^M^O^D^E ^O^N ^T^H^E ^S^E^C^O^N^D ^F^I^L^E (^L^F^N2)
      ^O^N^L^Y.  T^H^I^S ^I^S ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^T^O S ^A^N^D L ^F^O^R^M^A^T ^T^A^P^E^S.  I^F ^C^O^D^E^D ^M^O^D^E ^I^S
      ^S^E^T ^O^N ^A^N SI ^T^A^P^E, ^T^H^E ^S^Y^S^T^E^M ^A^B^O^R^T^S ^T^H^E ^J^O^B.

      D^E^F^A^U^L^T@D C^O^D^E^D ^M^O^D^E ^I^S ^N^O^T ^S^E^T ^F^O^R ^T^H^E ^S^E^C^O^N^D ^F^I^L^E.
.HELP,BS,NOLIST

      F^O^R^M^A^T@D  BS=^B^S

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^D^E^F^I^N^E^S ^T^H^E ^M^A^X^I^M^U^M ^B^L^O^C^K ^S^I^Z^E (PRU ^S^I^Z^E) ^I^N ^C^E^N^T^R^A^L
      ^M^E^M^O^R^Y ^W^O^R^D^S ^F^O^R ^A^N S ^O^R L ^T^A^P^E. T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^L^E^G^A^L ^O^N^L^Y ^F^O^R
      S ^A^N^D L ^T^A^P^E ^V^E^R^I^F^I^E^S.

      D^E^F^A^U^L^T@D F^O^R ^A^N S ^T^A^P^E, 1000B ^W^O^R^D^S (^O^C^T^A^L).
               F^O^R ^A^N L ^T^A^P^E, 2000B ^W^O^R^D^S (^O^C^T^A^L).
.ENDHELP
.IF($N$.NE.$#N$,L1)
  .EX.  $VERIFY(FIRST,SECOND,#N=N,#E=E,#L=L,#BS=BS_A_R_C_C1_C2)
.ELSE(L1)
  .EX.  $VERIFY(FIRST,SECOND,#N,#E=E,#L=L,#BS=BS_A_R_C_C1_C2)
.ENDIF(L1)
*WEOR
.PROC,VFYLIB*I
,FIRST[F^I^R^S^T ^F^I^L^E ^T^O ^B^E ^C^O^M^P^A^R^E^D]=(*F,*N=OLD)
,SECOND[S^E^C^O^N^D ^F^I^L^E ^T^O ^B^E ^C^O^M^P^A^R^E^D]=(*F,*N=NEW)
,LISTING[O^U^T^P^U^T ^F^I^L^E ^N^A^M^E]=(*F,*N=OUTPUT)
,NR[D^O ^Y^O^U ^W^A^N^T ^T^O ^R^E^W^I^N^D ^T^H^E ^F^I^L^E^S]=(YES=,Y=,*N=,NO=$,NR$,N=$,NR$,*K=$,NR$)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  VFYLIB,^L^F^N1,^L^F^N2,^L^F^N3,NR.

      T^H^E VFYLIB ^C^O^M^M^A^N^D ^R^E^W^I^N^D^S ^T^W^O ^F^I^L^E^S, ^C^O^M^P^A^R^E^S ^T^H^E^I^R ^R^E^C^O^R^D^S, ^A^N^D ^L^I^S^T^S
      ^T^H^E ^D^I^F^F^E^R^E^N^C^E^S ^B^E^T^W^E^E^N ^T^H^E^M.
.HELP,FIRST,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N1) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^R^S^T ^F^I^L^E ^T^O ^B^E ^C^O^M^P^A^R^E^D
      I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S  ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^L^F^N1=OLD.
.HELP,SECOND,NOLIST

      F^O^R^M^A^T@D  ^L^F^N2

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N2) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^S^E^C^O^N^D ^F^I^L^E ^T^O ^B^E
      ^C^O^M^P^A^R^E^D.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^D^E^F^A^U^L^T ^I^S ^L^F^N2=NEW.
.HELP,LISTING,NOLIST

      F^O^R^M^A^T@D  ^L^F^N3

      T^H^I^S ^P^A^R^A^M^E^T^E^R (^L^F^N3) ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^O^U^T^P^U^T ^F^I^L^E. A ^F^I^L^E ^N^A^M^E
      ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^T^H^E ^D^E^F^A^U^L^T ^I^S ^L^F^N3=OUTPUT.
.HELP,NR,NOLIST

      T^H^E ^P^A^R^A^M^E^T^E^R NR ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^L^F^N1 ^A^N^D ^L^F^N2 ^A^R^E ^N^O^T ^R^E^W^O^U^N^D ^A^F^T^E^R
      ^V^E^R^I^F^I^C^A^T^I^O^N.

      D^E^F^A^U^L^T@D ^L^F^N1 ^A^N^D ^L^F^N2 ^A^R^E ^R^E^W^O^U^N^D.
.ENDHELP
.EX.  $VFYLIB(FIRST,SECOND,LISTING_NR)
*WEOR
.PROC,VSN*I
,FN[S^P^E^C^I^F^Y ^F^I^L^E ^N^A^M^E ^T^O ^A^S^S^O^C^I^A^T^E ^W^I^T^H ^V^S^N]=(*F)
,VN[S^P^E^C^I^F^Y ^V^S^N ^T^O ^A^S^S^O^C^I^A^T^E ^W^I^T^H ^F^I^L^E]=
      (*S6(ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789))
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  VSN,^L^F^N1=^V^S^N1,...,^L^F^N^N=^V^S^N^N.

      T^H^E VSN ^C^O^M^M^A^N^D ^A^S^S^O^C^I^A^T^E^S ^A ^F^I^L^E ^N^A^M^E (^L^F^N) ^W^I^T^H ^O^N^E ^O^R ^M^O^R^E ^V^O^L^U^M^E^S ^O^F
      ^T^A^P^E (^V^S^N).  U^P ^T^O 60 ^V^S^N^S ^C^A^N ^B^E ^S^P^E^C^I^F^I^E^D ^F^O^R ^A ^S^I^N^G^L^E ^F^I^L^E ^N^A^M^E.
      (F^R^O^M HELPME, ^O^N^L^Y ^O^N^E ^V^S^N ^M^A^Y ^B^E ^S^P^E^C^I^F^I^E^D.)
.HELP,FN,NOLIST

      E^N^T^E^R ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^V^S^N1 (^T^A^P^E
      ^V^O^L^U^M^E).  A ^F^I^L^E ^N^A^M^E ^I^S 1- ^T^O 7-^A^L^P^H^A^N^U^M^E^R^I^C ^C^H^A^R^A^C^T^E^R^S.

      D^E^F^A^U^L^T@D N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,VN,NOLIST

      E^N^T^E^R ^T^H^E 1- ^T^O 6-^C^H^A^R^A^C^T^E^R ^V^O^L^U^M^E ^S^E^R^I^A^L ^N^U^M^B^E^R ^T^O ^B^E ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H
      ^L^F^N1.  I^N HELPME ^Y^O^U ^M^A^Y ^O^N^L^Y ^E^N^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^V^A^L^U^E^S ^F^O^R ^T^H^E ^V^S^N.
.ENDHELP
.EX.  $VSN,FN=VN.
*WEOR
.PROC,WBR*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WBR,^N,^R^L.

      T^H^E WBR ^C^O^M^M^A^N^D ^W^R^I^T^E^S ^O^N^E ^B^I^N^A^R^Y ^R^E^C^O^R^D ^F^R^O^M ^C^E^N^T^R^A^L ^M^E^M^O^R^Y ^T^O ^A
      ^S^P^E^C^I^F^I^E^D ^F^I^L^E ^A^T ^I^T^S ^C^U^R^R^E^N^T ^P^O^S^I^T^I^O^N.

      F^O^R ^S^E^C^U^R^I^T^Y ^R^E^A^S^O^N^S, ^Y^O^U ^C^A^N^N^O^T ^E^X^E^C^U^T^E WBR ^F^R^O^M ^A^N ^I^N^T^E^R^A^C^T^I^V^E
      ^J^O^B ^O^R ^A^S ^T^H^E ^F^I^R^S^T ^C^O^M^M^A^N^D ^F^R^O^M ^A ^P^R^O^C^E^D^U^R^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,WHATJSN*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WHATJSN,^U^S^E^R^N^A^M^E.

      T^H^E WHATJSN ^C^O^M^M^A^N^D ^R^E^T^U^R^N^S ^T^H^E ^J^O^B ^S^E^Q^U^E^N^C^E ^N^A^M^E (JSN) ^O^F ^T^H^E ^T^E^R^M^I^N^A^L
      ^Y^O^U ^S^P^E^C^I^F^Y ^B^Y ^A ^U^S^E^R ^N^A^M^E.  W^H^E^N ^S^E^V^E^R^A^L ^T^E^R^M^I^N^A^L^S ^A^R^E ^L^O^G^G^E^D ^I^N ^U^N^D^E^R
      ^T^H^E ^S^P^E^C^I^F^I^E^D ^U^S^E^R ^N^A^M^E, ^A ^L^I^S^T ^O^F JSN^S ^I^S ^R^E^T^U^R^N^E^D.  WHATJSN ^C^A^N ^B^E
      ^E^N^T^E^R^E^D ^O^N^L^Y ^F^R^O^M ^T^H^E ^A^C^C^E^S^S ^S^U^B^S^Y^S^T^E^M; WHATJSN ^I^S ^U^S^E^D ^W^I^T^H ^T^H^E DIAL
      ^C^O^M^M^A^N^D ^T^O ^S^E^N^D ^A ^M^E^S^S^A^G^E ^T^O ^A ^U^S^E^R ^A^T ^A^N ^I^N^T^E^R^A^C^T^I^V^E ^T^E^R^M^I^N^A^L.

      T^H^E ^P^A^R^A^M^E^T^E^R ^U^S^E^R^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^U^S^E^R ^N^A^M^E ^O^F ^T^H^E ^U^S^E^R ^W^H^O^S^E JSN
      ^Y^O^U ^S^E^E^K.
.ENDHELP
$REVERT,NOLIST
*WEOR
.PROC,WHILE*I
,EXP[E^N^T^E^R ^A ^V^A^L^I^D ^N^A^M^E ^O^R ^E^X^P^R^E^S^S^I^O^N]=(*A1,*N)
,LAB[E^N^T^E^R ^C^H^A^R^A^C^T^E^R ^S^T^R^I^N^G]=(*A1,*N)
.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WHILE,^E^X^P^R^E^S^S^I^O^N,^L^A^B^E^L.

      WHILE ^A^N^D ENDW ^A^R^E ^I^T^E^R^A^T^I^V^E ^C^O^M^M^A^N^D^S ^T^H^A^T ^B^R^A^C^K^E^T ^A ^G^R^O^U^P ^O^F ^C^O^M^M^A^N^D^S
      ^I^N^T^O ^A ^L^O^O^P ^T^H^A^T ^C^A^N ^B^E ^R^E^P^E^A^T^E^D^L^Y ^P^R^O^C^E^S^S^E^D.  T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E ^L^O^O^P
      ^I^S ^I^D^E^N^T^I^F^I^E^D ^B^Y ^A WHILE ^C^O^M^M^A^N^D ^A^N^D ^T^H^E ^E^N^D ^I^S ^I^D^E^N^T^I^F^I^E^D ^B^Y ^A^N ENDW
      ^C^O^M^M^A^N^D.  T^H^E ENDW ^C^O^M^M^A^N^D ^M^U^S^T ^H^A^V^E ^A ^L^A^B^E^L ^S^T^R^I^N^G ^T^H^A^T ^M^A^T^C^H^E^S ^T^H^E
      ^L^A^B^E^L ^S^T^R^I^N^G ^S^P^E^C^I^F^I^E^D ^O^N ^T^H^E WHILE ^C^O^M^M^A^N^D.  T^H^E ^L^O^O^P ^I^S ^R^E^P^E^A^T^E^D ^A^S
      ^L^O^N^G ^A^S ^T^H^E ^E^X^P^R^E^S^S^I^O^N ^I^N ^T^H^E WHILE ^C^O^M^M^A^N^D ^I^S ^T^R^U^E.  I^F ^T^H^E ^E^X^P^R^E^S^S^I^O^N
      ^I^S ^I^N^I^T^I^A^L^L^Y ^F^A^L^S^E, ^C^O^N^T^R^O^L ^I^M^M^E^D^I^A^T^E^L^Y ^S^K^I^P^S ^T^O ^T^H^E ENDW ^C^O^M^M^A^N^D.

      L^A^B^E^L ^S^T^R^I^N^G^S ^O^F ^A^L^L WHILE ^C^O^M^M^A^N^D^S ^W^I^T^H^I^N ^T^H^E ^C^O^M^M^A^N^D ^R^E^C^O^R^D ^O^F ^A ^J^O^B
      ^S^H^O^U^L^D ^B^E ^U^N^I^Q^U^E.  D^U^P^L^I^C^A^T^I^O^N ^O^F ^A ^L^A^B^E^L ^S^T^R^I^N^G ^W^I^T^H^I^N ^A ^C^O^M^M^A^N^D
      ^R^E^C^O^R^D ^O^R ^W^I^T^H^I^N ^A ^P^R^O^C^E^D^U^R^E ^C^A^N ^P^R^O^D^U^C^E ^U^N^P^R^E^D^I^C^T^A^B^L^E ^R^E^S^U^L^T^S.  T^H^E
      ^S^A^M^E ^L^A^B^E^L ^S^T^R^I^N^G ^C^A^N ^B^E ^U^S^E^D ^I^N ^A ^C^A^L^L^E^D ^P^R^O^C^E^D^U^R^E ^A^N^D ^I^N ^T^H^E ^C^A^L^L^I^N^G
      ^C^O^M^M^A^N^D ^R^E^C^O^R^D ^O^R ^P^R^O^C^E^D^U^R^E.
.HELP,EXP,NOLIST

      F^O^R^M^A^T@D  ^E^X^P^R^E^S^S^I^O^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A^N^Y ^V^A^L^I^D ^S^Y^M^B^O^L^I^C ^N^A^M^E ^O^R ^E^X^P^R^E^S^S^I^O^N.
      T^H^E ^S^E^P^A^R^A^T^O^R ^F^O^L^L^O^W^I^N^G ^T^H^E ^E^X^P^R^E^S^S^I^O^N ^M^U^S^T ^B^E ^A ^C^O^M^M^A.
.HELP,LAB,NOLIST

      F^O^R^M^A^T@D  ^L^A^B^E^L

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^A 1- ^T^O 10-^C^H^A^R^A^C^T^E^R ^A^L^P^H^A^N^U^M^E^R^I^C ^S^T^R^I^N^G.
      T^H^E ^S^T^R^I^N^G ^M^U^S^T ^B^E^G^I^N ^W^I^T^H ^A^N ^A^L^P^H^A^B^E^T^I^C ^C^H^A^R^A^C^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,WRITE*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WRITE,^F^I^L^E^N^A^M^E,^C1,^C2,...,^C^N,/^S^T^R^I^N^G/

      T^H^E WRITE ^C^O^M^M^A^N^D ^A^P^P^E^N^D^S ^L^I^N^E^S ^A^N^D ^L^I^N^E ^N^U^M^B^E^R^S ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E
      ^T^O ^T^H^E ^S^P^E^C^I^F^I^E^D ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.

      I^F ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^N^T^E^R^E^D ^A^N^D ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^A^L^L ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^

      ^F^I^L^E.  I^F ^B^O^T^H ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^R^E ^E^N^T^E^R^E^D, ^T^H^E
      ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^W^H^I^C^H ^C^O^N^T^A^I^N ^T^H^E ^S^T^R^I^N^G ^S^P^E^C^I^F








^D
      ^B^Y ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.

      I^F ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^I^S ^E^N^T^E^R^E^D ^A^N^D ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^A^L^L ^L^I^N^E^S ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^S^P^E^C^I^F^I^E^D ^S^T^R^I^N^G ^A^R^E ^C^O^P^I^

      ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.  I^F ^B^O^T^H ^T^H^E ^L^I^N^E^S ^A^N^D ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R^S ^A^R^E
      ^O^M^I^T^T^E^D, ^A^L^L ^L^I^N^E^S ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N
      ^F^I^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,WRITEF*I
,FILE[N^A^M^E ^O^F ^F^I^L^E ^T^O ^B^E ^W^R^I^T^T^E^N ^O^N]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^F^I^L^E ^M^A^R^K^S ^T^O ^B^E ^W^R^I^T^T^E^N]=(*S6(0123456789),*N=1)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WRITEF,^L^F^N,^N^U^M^B^E^R.

      T^H^E WRITEF ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^W^R^I^T^E ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R
      ^O^F ^F^I^L^E ^M^A^R^K^S ^O^N ^T^H^E ^N^A^M^E^D ^F^I^L^E.
.HELP,FILE,NOLIST

      F^O^R^M^A^T@D  ^L^F^N

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^W^R^I^T^E ^F^I^L^E ^M^A^R^K^S ^O^N.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      F^O^R^M^A^T@D  ^N^U^M^B^E^R

      T^H^I^S ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^F^I^L^E ^M^A^R^K^S ^T^O ^B^E ^W^R^I^T^T^E^N.  T^H^E ^M^A^X^I^M^U^M
      ^A^L^L^O^W^A^B^L^E ^V^A^L^U^E ^I^S 262143.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^S^E^T ^T^O 1.
.ENDHELP
.EX.  $WRITEF,FILE,NUMBER.
*WEOR
.PROC,WRITEN*I.
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S R^E^T^U^R^N.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WRITEN,^F^I^L^E^N^A^M^E,^C1,^C2,...,^C^N,/^S^T^R^I^N^G/

      T^H^E WRITEN ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^L^I^N^E^S ^F^R^O^M ^A ^S^E^Q^U^E^N^C^E^D ^P^R^I^M^A^R^Y ^F^I^L^E ^T^O ^A^N
      ^U^N^S^E^Q^U^E^N^C^E^D ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.  T^H^E WRITEN ^C^O^M^M^A^N^D ^C^O^P^I^E^S ^S^P^E^C^I^F^I^E^D
      ^L^I^N^E^S ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E ^W^H^I^L^E ^R^E^M^O^V^I^N^G ^T^H^E
      ^T^H^E ^L^I^N^E ^N^U^M^B^E^R^S; ^R^E^S^U^L^T^I^N^G ^I^N ^A^N ^U^N^S^E^Q^U^E^N^C^E^D ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.

      I^F ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^I^S ^E^N^T^E^R^E^D ^A^N^D ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^A^L^L ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^

      ^F^I^L^E.  I^F ^B^O^T^H ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^A^N^D ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^R^E ^E^N^T^E^R^E^D, ^T^H^E
      ^L^I^N^E^S ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^W^H^I^C^H ^C^O^N^T^A^I^N ^T^H^E ^S^T^R^I^N^G ^S^P^E^C^I^F








^D
      ^B^Y ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.

      I^F ^T^H^E ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R ^I^S ^E^N^T^E^R^E^D ^A^N^D ^T^H^E ^L^I^N^E^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D,
      ^A^L^L ^L^I^N^E^S ^I^N ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^C^O^N^T^A^I^N^I^N^G ^T^H^E ^S^P^E^C^I^F^I^E^D ^S^T^R^I^N^G ^A^R^E ^C^O^P^I^

      ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^L^E.  I^F ^B^O^T^H ^T^H^E ^L^I^N^E^S ^A^N^D ^S^T^R^I^N^G ^P^A^R^A^M^E^T^E^R^S ^A^R^E
      ^O^M^I^T^T^E^D, ^A^L^L ^L^I^N^E^S ^O^F ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^A^R^E ^C^O^P^I^E^D ^T^O ^T^H^E ^D^E^S^T^I^N^A^T^I^O^N ^F^I^

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,WRITER*I
,FILE[N^A^M^E ^O^F ^F^I^L^E ^T^O ^B^E ^W^R^I^T^T^E^N ^O^N]=(*F)
,NUMBER[N^U^M^B^E^R ^O^F ^R^E^C^O^R^D ^M^A^R^K^S ^T^O ^B^E ^W^R^I^T^T^E^N]=(*S6(0123456789),*N=1)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  WRITER,^L^F^N,^N^U^M^B^E^R.

      T^H^E WRITER ^C^O^M^M^A^N^D ^D^I^R^E^C^T^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^W^R^I^T^E ^A ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R
      ^O^F ^E^M^P^T^Y ^R^E^C^O^R^D^S ^O^N ^T^H^E ^N^A^M^E^D ^F^I^L^E.
.HELP,FILE,NOLIST

      F^O^R^M^A^T@D  ^L^F^N

      T^H^I^S ^I^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^R^E^C^E^I^V^E ^T^H^E ^E^M^P^T^Y ^R^E^C^O^R^D^S.

      D^E^F^A^U^L^T@D  N^O^N^E; ^A ^F^I^L^E ^M^U^S^T ^B^E ^S^P^E^C^I^F^I^E^D.
.HELP,NUMBER,NOLIST

      F^O^R^M^A^T@D  ^N^U^M^B^E^R

      T^H^I^S ^I^S ^T^H^E ^N^U^M^B^E^R ^O^F ^E^M^P^T^Y ^R^E^C^O^R^D^S ^T^O ^B^E ^W^R^I^T^T^E^N.  T^H^E ^M^A^X^I^M^U^M
      ^A^L^L^O^W^A^B^L^E ^V^A^L^U^E ^I^S 262143.  I^F ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D, ^T^H^E
      ^D^E^F^A^U^L^T ^I^S ^S^E^T ^T^O 1.
.ENDHELP
.EX.  $WRITER,FILE,NUMBER.
*WEOR
.PROC,X*I.
.PROMPT,P^R^E^S^S NEXT ^W^H^E^N ^R^E^A^D^Y.
.HELP,,NOLIST

      F^O^R^M^A^T@D  X,^C^O^M^M^A^N^D.

      T^H^E X ^C^O^M^M^A^N^D ^F^O^R^C^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^I^N^T^E^R^P^R^E^T ^A ^C^O^M^M^A^N^D ^A^S ^I^F ^Y^O^U ^W^E^R^E
      ^O^P^E^R^A^T^I^N^G ^I^N ^T^H^E ^B^A^T^C^H ^S^U^B^S^Y^S^T^E^M.  T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^E^X^P^L^I^C^I^T^L^Y
      ^C^H^A^N^G^E ^T^H^E ^C^U^R^R^E^N^T ^S^U^B^S^Y^S^T^E^M ^F^O^R ^Y^O^U^R ^J^O^B.

      T^H^E X ^C^O^M^M^A^N^D ^C^A^N^N^O^T ^B^E ^R^U^N ^B^Y HELPME.  R^E^F^E^R ^T^O ^T^H^E NOS COMMAND
      ^O^N^L^I^N^E ^M^A^N^U^A^L.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,XEDIT*I
,LFN[N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^E^D^I^T^E^D]=(*F,*N=)
,PAR[P^R^O^C^E^S^S ^O^P^T^I^O^N^S]=(AS,B,C FR,LK,NH,P,*N=)
,DIR[P^R^O^C^E^S^S ^D^I^R^E^C^T^I^V^E^S]=(*A1,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  XEDIT,^L^F^N1,^P1,^P2,...,^P^N.^D^I^R^E^C^T^I^V^E^S.

      T^H^E XEDIT ^C^O^M^M^A^N^D ^C^A^L^L^S ^T^H^E ^T^E^X^T ^E^D^I^T^O^R, XEDIT.
.HELP,LFN,NOLIST

      F^O^R^M^A^T@D  ^L^F^N1

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^U^S^E^S ^L^F^N1 ^A^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^E^D^I^T^E^D ^O^R ^C^R^E^A^T^E^D.
      I^F ^L^F^N1 ^I^S ^O^M^I^T^T^E^D (^I^N^D^I^C^A^T^E^D ^B^Y ^T^W^O ^S^E^P^A^R^A^T^O^R^S ^B^E^F^O^R^E ^O^T^H^E^R ^P^A^R^A^M^E^T^E^R^S)
      ^T^H^E ^P^R^I^M^A^R^Y ^F^I^L^E ^I^S ^E^D^I^T^E^D.
.HELP,PAR,NOLIST

      F^O^R^M^A^T@D  ^P1,^P2,...,^P^N

      T^H^I^S ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^R^O^C^E^S^S^I^N^G ^O^P^T^I^O^N^S.

         P^I                       D^E^S^C^R^I^P^T^I^O^N
         --                       -----------
         AS       E^D^I^T ^L^F^N1 ^I^N ASCII ^I^N^T^E^R^A^C^T^I^V^E ^M^O^D^E.  A^F^T^E^R ^T^H^E XEDIT ^J^O^B
                  ^S^T^E^P, ^P^R^O^C^E^S^S^I^N^G ^R^E^T^U^R^N^S ^T^O ^T^H^E ^O^R^I^G^I^N^A^L ^M^O^D^E.

         B        P^R^O^C^E^S^S ^T^H^E ^J^O^B ^A^S ^A ^B^A^T^C^H ^O^R^G^I^N ^J^O^B.

         C        C^R^E^A^T^E ^A ^N^E^W ^F^I^L^E ^L^F^N1.

         FR       T^A^K^E ^T^H^E ^F^I^R^S^T ^E^D^I^T^I^N^G ^D^I^R^E^C^T^I^V^E ^F^R^O^M ^T^H^E ^F^I^R^S^T ^L^I^N^E ^O^F ^L^F^N1.

         I=^L^F^N2   T^A^K^E ^E^D^I^T^I^N^G ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^L^F^N2.  B^Y ^D^E^F^A^U^L^T, ^D^I^R^E^C^T^I^V^E^S ^A^R^E
                  ^T^A^K^E^N ^F^R^O^M ^F^I^L^E INPUT.  I^F ^Y^O^U ^S^P^E^C^I^F^Y I=0, ^T^H^E ^S^Y^S^T^E^M ^T^A^K^E^S
                  ^A^L^L ^D^I^R^E^C^T^I^V^E^S ^F^R^O^M ^T^H^E ^T^R^A^I^L^I^N^G ^D^E^L^I^M^I^T^E^D ^D^I^R^E^C^T^I^V^E ^S^E^Q^U^E^N^C^E.
                  (I^F ^T^H^E FR ^P^A^R^A^M^E^T^E^R ^I^S ^A^L^S^O ^S^P^E^C^I^F^I^E^D, ^T^H^E ^S^Y^S^T^E^M ^P^R^O^C^E^S^S^E^S
                  ^T^H^E ^D^E^L^I^M^I^T^E^D ^D^I^R^E^C^T^I^V^E ^S^E^Q^U^E^N^C^E ^A^F^T^E^R ^P^R^O^C^E^S^S^I^N^G ^D^I^R^E^C^T^I^V^E^S
                  ^F^R^O^M ^T^H^E ^F^I^R^S^T ^L^I^N^E ^O^F ^L^F^N1.)

         L=^L^F^N3   P^U^T ^A^L^L XEDIT ^O^U^T^P^U^T ^O^N ^T^H^E ^S^P^E^C^I^F^I^E^D ^F^I^L^E.  OUTPUT ^I^S ^T^H^E
                  ^D^E^F^A^U^L^T.  I^F ^Y^O^U ^S^P^E^C^I^F^Y L=0, ^T^H^E ^S^Y^S^T^E^M ^S^U^P^P^R^E^S^S^E^S ^A^L^L
                  ^O^U^T^P^U^T.

         LK       XEDIT ^P^R^O^C^E^S^S^E^S ^T^H^E ^E^D^I^T ^F^I^L^E ^I^N ^L^O^O^K-^O^N^L^Y ^M^O^D^E.  T^H^E ^E^D^I^T
                  ^F^I^L^E ^M^A^Y ^B^E ^E^X^A^M^I^N^E^D, ^B^U^T ^M^A^Y ^N^O^T ^B^E ^M^O^D^I^F^I^E^D.


         NH       S^U^P^P^R^E^S^S ^P^R^I^N^T^I^N^G ^O^F ^T^H^E XEDIT ^H^E^A^D^E^R.

         P        R^E^T^R^I^E^V^E ^A^N^D ^E^D^I^T ^P^E^R^M^A^N^E^N^T ^F^I^L^E ^L^F^N1.  D^I^R^E^C^T ^A^C^C^E^S^S ^F^I^L^E^S
                  ^A^R^E ^A^T^T^A^C^H^E^D ^I^N ^W^R^I^T^E ^M^O^D^E.  I^F P ^I^S ^O^M^I^T^T^E^D, ^T^H^E ^F^I^L^E ^L^F^N1 ^I^S
                  ^A^S^S^U^M^E^D ^T^O ^B^E ^A ^L^O^C^A^L ^F^I^L^E.


      D^E^F^A^U^L^T@D  I^N HELPME, ^P^A^R^A^M^E^T^E^R^S I=^L^F^N2 ^A^N^D L=^L^F^N3 ^A^R^E ^O^M^I^T^T^E^D.
.HELP,DIR,NOLIST

      F^O^R^M^A^T@D  ^D^I^R^E^C^T^I^V^E^S

      T^H^E ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^O ^P^R^O^C^E^S^S ^T^H^E ^D^I^R^E^C^T^I^V^E^S ^T^H^A^T ^F^O^L^L^O^W ^T^H^E ^C^O^M^M^
D
      ^T^E^R^M^I^N^A^T^O^R.  T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^T^H^A^T ^F^O^L^L^O^W^S ^T^H^E ^T^E^R^M^I^N^A^T^O^R ^D^E^L^I^M^I^T^S
      ^T^H^E ^D^I^R^E^C^T^I^V^E^S.  T^H^E ^V^A^L^U^E ^D^I^R^E^C^T^I^V^E^S ^H^A^S ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^O^R^M (^T^H^E
      ^S^E^M^I^C^O^L^O^N ^S^E^R^V^E^S ^A^S ^T^H^E ^D^E^L^I^M^I^T^E^R, ^F^O^R ^E^X^A^M^P^L^E)@D

         ;^D^I^R^E^C^T^I^V^E1;^D^I^R^E^C^T^I^V^E2;...;^D^I^R^E^C^T^I^V^E^N

      D^O ^N^O^T ^P^L^A^C^E ^A ^T^E^R^M^I^N^A^T^O^R ^A^F^T^E^R ^T^H^E ^L^A^S^T ^D^I^R^E^C^T^I^V^E.

      D^E^F^A^U^L^T@D  I^N HELPME, ^T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^O^M^I^T^T^E^D.
.ENDHELP
.EX.  $XEDIT,LFN,PAR.
*WEOR
.PROC,XMODEM*I
,FN[F^I^L^E ^T^O ^B^E ^T^R^A^N^S^F^E^R^R^E^D]=(*F)
,TD[H^A^V^E ^T^H^E CYBER ^S^E^N^D (S) ^O^R ^R^E^C^E^I^V^E (R) ^F^I^L^E?]=(S,R)
,FT[F^I^L^E ^T^Y^P^E]=(A,C,E,T,B,M,S)
,LF[A^D^D ^L^I^N^E ^F^E^E^D^S ^O^N ^A ^D^O^W^N^L^O^A^D?]=(Y,YES,N,NO,*N=)
,SP[S^E^N^D ^A ^S^P^E^C^I^A^L ^F^I^R^S^T ^B^L^O^C^K?]=(Y,YES,N,NO,*N=)
,EC[E^R^R^O^R ^C^H^E^C^K^I^N^G ^M^O^D^E (CRC ^O^R CHECKSM)]=(CRC,CR,CHECKSM,CH,*N=)
,FM[F^I^L^E ^M^A^R^K^E^R^S ^P^E^R ^W^H^A^T ^O^P^E^R^A^T^I^N^G ^S^Y^S^T^E^M]=(NOS,N,CPM,C,MSDOS,M,*N=)
,CF[C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E]=(*F,*N=)
.
.HELP,,NOLIST

      F^O^R^M^A^T@D  XMODEM,FN=^F^N,TD=^T^D,FT=^F^T,LF=^L^F,SP=^S^P,EC=^E^C,FM=^F^M,CF=^C^F.

               XMODEM,^F^N,^T^D,^F^T,^L^F,^S^P,^E^C,^F^M,^C^F.

      XMODEM ^I^N^I^T^I^A^T^E^S ^A ^F^I^L^E ^T^R^A^N^S^F^E^R ^B^E^T^W^E^E^N ^Y^O^U^R ^M^I^C^R^O^C^O^M^P^U^T^E^R ^A^N^D ^A
      CYBER ^M^A^I^N^F^R^A^M^E.  Y^O^U ^C^A^N ^T^R^A^N^S^F^E^R ^B^I^N^A^R^Y ^F^I^L^E^S ^A^S ^W^E^L^L ^A^S ASCII
      ^T^E^X^T ^F^I^L^E^S.  T^O ^U^S^E XMODEM, ^Y^O^U^R ^M^I^C^R^O^C^O^M^P^U^T^E^R ^C^O^M^M^U^N^I^C^A^T^I^O^N^S
      ^S^O^F^T^W^A^R^E ^M^U^S^T ^U^S^E ^T^H^E C^H^R^I^S^T^E^N^S^E^N ^P^R^O^T^O^C^O^L.
.HELP,FN,NOLIST

      T^H^E FN=^F^N ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^F^I^L^E ^T^O ^B^E ^T^R^A^N^S^F^E^R^R^E^D.
      T^H^E ^F^I^L^E ^T^O ^B^E ^T^R^A^N^S^F^E^R^R^E^D ^F^R^O^M ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E ^C^A^N ^B^E ^L^O^C^A^L ^O^R
      ^P^E^R^M^A^N^E^N^T.

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A ^F^I^L^E ^N^A^M^E.
.HELP,TD,NOLIST

      T^H^E TD=^T^D ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^R^A^N^S^F^E^R ^D^I^R^E^C^T^I^O^N ^F^R^O^M ^T^H^E
      ^P^E^R^S^P^E^C^T^I^V^E ^O^F ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E.  S ^I^N^S^T^R^U^C^T^S ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E ^T^O
      ^S^E^N^D ^T^H^E ^F^I^L^E ^T^O ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^W^H^I^L^E R ^I^N^D^I^C^A^T^E^S ^T^H^A^T ^T^H^E CYBER
      ^M^A^I^N^F^R^A^M^E ^I^S ^T^O ^R^E^C^E^I^V^E ^T^H^E ^F^I^L^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^T^R^A^N^S^F^E^R ^D^I^R^E^C^T^I^O^N.
.HELP,FT,NOLIST

      T^H^E FT=^F^T ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^O^F ^T^H^E ^F^I^L^E ^T^O
      ^B^E ^T^R^A^N^S^F^E^R^R^E^D.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^O^N^E ^O^F ^T^H^E ^F^O^L^L^O^W^I^N^G ^S^E^V^E^N ^V^A^L^U^E^S@D

      V^A^L^U^E                   D^E^S^C^R^I^P^T^I^O^N
      -----                   -----------

      A       A^N 8-^B^I^T ASCII ^F^I^L^E ^O^N ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^T^O ^O^R ^F^R^O^M ^A 6/12-^B^I^T
              ^D^I^S^P^L^A^Y ^C^O^D^E ^T^E^X^T ^F^I^L^E ^O^N ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E.

      C       A^N 8-^B^I^T ASCII ^F^I^L^E ^O^N ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^T^O ^O^R ^F^R^O^M ^A 6-^B^I^T
              ^D^I^S^P^L^A^Y ^C^O^D^E ^T^E^X^T ^F^I^L^E ^O^N ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E.

      E       A^N 8-^B^I^T ASCII ^F^I^L^E ^O^N ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^T^O ^O^R ^F^R^O^M ^A 7-^B^I^T
              ASCII ^T^E^X^T ^F^I^L^E ^O^N ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E.

      T       A ^T^E^X^T ^F^I^L^E.  XMODEM ^U^S^E^S ^T^H^E ^C^U^R^R^E^N^T ^C^H^A^R^A^C^T^E^R ^C^O^D^E
              ^S^E^T ^M^O^D^E ^O^F ^Y^O^U^R CYBER ^M^A^I^N^F^R^A^M^E ^J^O^B.

      B       A CYBER ^M^A^I^N^F^R^A^M^E ^B^I^N^A^R^Y ^F^I^L^E.

      M       A ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^B^I^N^A^R^Y ^F^I^L^E.

      S       XMODEM ^S^E^L^E^C^T^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^B^A^S^E^D ^O^N ^T^H^E
              ^T^R^A^N^S^M^I^T^T^A^L ^O^F ^A ^S^P^E^C^I^A^L ^F^I^R^S^T ^B^L^O^C^K ^O^F ^I^N^F^O^R^M^A^T^I^O^N.
              T^H^I^S ^I^S ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^I^N ^R^E^C^E^I^V^E ^M^O^D^E.

      D^E^F^A^U^L^T@D  N^O^N^E; ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T.
.HELP,LF,NOLIST

      T^H^E LF=^L^F ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^A^N ^E^N^D-^O^F-^L^I^N^E ^O^N ^T^E^X^T ^F^I^L^E^S
      ^S^E^N^T ^T^O ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^I^S ^T^R^A^N^S^M^I^T^T^E^D ^A^S ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^L^I^N^E
      ^F^E^E^D (LF=YES ^O^R LF=Y) ^O^R ^O^N^L^Y ^A^S ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N (LF=NO ^O^R LF=N).
      E^N^T^E^R YES ^O^R Y ^F^O^R ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^L^I^N^E ^F^E^E^D, NO ^O^R N ^F^O^R ^C^A^R^R^I^A^G^E
      ^R^E^T^U^R^N ^O^N^L^Y.

      D^E^F^A^U^L^T@D  LF=YES.  Y^O^U ^C^A^N ^C^H^A^N^G^E ^T^H^I^S ^D^E^F^A^U^L^T ^I^N ^Y^O^U^R ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E.
.HELP,SP,NOLIST

      T^H^E SP=^S^P ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^O^R ^N^O^T ^T^H^E ^F^I^R^S^T ^B^L^O^C^K ^T^R^A^N^S^M^I^T^T^E

      ^I^S ^A ^S^P^E^C^I^A^L ^B^L^O^C^K ^T^O ^I^D^E^N^T^I^F^Y ^T^H^E ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^S^E^T ^O^F ^T^H^E ^F^I^L^E.  I^F
      ^Y^O^U ^S^P^E^C^I^F^Y SP=YES ^O^R Y, XMODEM ^T^R^A^N^S^M^I^T^S ^T^H^E ^S^P^E^C^I^A^L ^B^L^O^C^K.  I^F SP=NO ^O^R
      N, ^N^O ^S^P^E^C^I^A^L ^B^L^O^C^K ^I^S ^S^E^N^T.

      D^E^F^A^U^L^T@D SP=NO.  Y^O^U ^C^A^N ^C^H^A^N^G^E ^T^H^I^S ^D^E^F^A^U^L^T ^I^N ^Y^O^U^R ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E.
.HELP,EC,NOLIST

      T^H^E EC=^E^C ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^M^O^D^E ^O^F ^E^R^R^O^R ^C^H^E^C^K^I^N^G ^T^O ^B^E ^U^S^E^D ^W^H^E^N
      ^T^H^E CYBER ^M^A^I^N^F^R^A^M^E ^R^E^C^E^I^V^E^S ^A ^F^I^L^E.  (W^H^E^N ^T^H^E ^M^I^C^R^O ^C^O^M^P^U^T^E^R ^R^E^C^E^I^V^E^S ^A
      ^F^I^L^E, ^I^T ^D^E^T^E^R^M^I^N^E^S ^T^H^E ^M^O^D^E ^O^F ^E^R^R^O^R ^C^H^E^C^K^I^N^G.)  Y^O^U ^M^A^Y ^S^P^E^C^I^F^Y CRC
      ^O^R CR (^F^O^R ^C^Y^C^L^I^C ^R^E^D^U^N^D^A^N^C^Y ^C^H^E^C^K^I^N^G) ^O^R CHECKSM ^O^R CH (^F^O^R ^C^H^E^C^K^S^U^M).

      D^E^F^A^U^L^T@D EC=CRC.  Y^O^U ^C^A^N ^C^H^A^N^G^E ^T^H^I^S ^D^E^F^A^U^L^T ^I^N ^Y^O^U^R ^C^O^N^F^I^G^U^R^A^T^I^O^N
               ^F^I^L^E.

.HELP,FM,NOLIST

      T^H^E FM=^F^M ^P^A^R^A^M^E^T^E^R ^D^E^T^E^R^M^I^N^E^S ^W^H^A^T ^T^Y^P^E ^O^F ^F^I^L^E ^M^A^R^K^E^R^S XMODEM
      ^R^E^C^O^G^N^I^Z^E^S ^O^R ^T^R^A^N^S^M^I^T^S.  T^H^I^S ^P^A^R^A^M^E^T^E^R ^I^S ^A^P^P^L^I^C^A^B^L^E ^O^N^L^Y ^F^O^R
      ^T^E^X^T ^F^I^L^E^S.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y NOS ^O^R N, CPM ^O^R C, ^O^R MSDOS ^O^R M.

      I^F ^Y^O^U ^S^P^E^C^I^F^Y NOS, XMODEM ^R^E^C^O^G^N^I^Z^E^S ^O^R ^T^R^A^N^S^M^I^T^S #EOR ^T^O ^I^N^D^I^C^A^T^E
      ^A^N ^E^N^D-^O^F-^R^E^C^O^R^D, #EOF ^T^O ^I^N^D^I^C^A^T^E ^A^N ^E^N^D-^O^F-^F^I^L^E, ^A^N^D #EOI ^T^O
      ^I^N^D^I^C^A^T^E ^A^N ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N.  T^H^E 4-^C^H^A^R^A^C^T^E^R ^F^I^L^E ^M^A^R^K^E^R^S ^M^U^S^T
      ^A^P^P^E^A^R ^A^S ^T^H^E ^F^I^R^S^T ^A^N^D ^O^N^L^Y ^C^H^A^R^A^C^T^E^R^S ^O^N ^A ^L^I^N^E.

      I^F ^Y^O^U ^S^P^E^C^I^F^Y CPM ^O^R MSDOS, XMODEM ^I^G^N^O^R^E^S ^E^N^D-^O^F-^R^E^C^O^R^D^S ^A^N^D
      ^E^N^D-^O^F-^F^I^L^E^S ^I^N ^T^E^X^T ^F^I^L^E^S ^S^E^N^T ^T^O ^A ^M^I^C^R^O.  XMODEM ^T^R^A^N^S^M^I^T^S ^T^H^E
      ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N ^A^S ^T^H^E CTRL/Z ^C^H^A^R^A^C^T^E^R.  I^N ^F^I^L^E^S ^R^E^C^E^I^V^E^D
      ^F^R^O^M ^A ^M^I^C^R^O, XMODEM ^R^E^C^O^G^N^I^Z^E^S ^A CTRL/Z ^C^H^A^R^A^C^T^E^R ^A^S ^T^H^E
      ^E^N^D-^O^F-^I^N^F^O^R^M^A^T^I^O^N ^A^N^D ^A^L^S^O ^R^E^C^O^G^N^I^Z^E^S #EOR, #EOF, ^A^N^D #EOI
      ^F^I^L^E ^M^A^R^K^E^R^S.

      D^E^F^A^U^L^T@D FM=NOS.  Y^O^U ^C^A^N ^C^H^A^N^G^E ^T^H^I^S ^D^E^F^A^U^L^T ^I^N ^Y^O^U^R ^C^O^N^F^I^G^U^R^A^T^I^O^N
               ^F^I^L^E.

.HELP,CF,NOLIST

      T^H^E CF=^C^F ^P^A^R^A^M^E^T^E^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^Y^O^U^R ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E.
      T^H^E ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E ^H^A^S ^T^W^O ^F^U^N^C^T^I^O^N^S@D  F^I^R^S^T, ^Y^O^U ^C^A^N ^P^R^O^V^I^D^E
      ^Y^O^U^R ^O^W^N ^D^E^F^A^U^L^T^S ^F^O^R ^T^H^E LF=^L^F, SP=^S^P, EC=^E^C, ^A^N^D FM=^F^M ^P^A^R^A^M^E^T^E^R^S.
      S^E^C^O^N^D, ^Y^O^U ^C^A^N ^U^S^E XMODEM ^T^O ^C^H^A^N^G^E ^S^O^M^E ^O^F ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^A^T^T^R^I^B^U^T^E^S.

      T^H^E ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E ^C^A^N ^B^E ^L^O^C^A^L ^O^R ^P^E^R^M^A^N^E^N^T.  I^T^S ^S^T^R^U^C^T^U^R^E ^I^S
      ^S^I^M^P^L^E@D ^A ^S^I^N^G^L^E-^L^I^N^E ^E^N^T^R^Y ^F^O^R ^E^A^C^H ^P^A^R^A^M^E^T^E^R ^F^O^R ^W^H^I^C^H ^Y^O^U ^W^A^N^T ^T^O
      ^P^R^O^V^I^D^E ^A ^D^E^F^A^U^L^T ^V^A^L^U^E ^A^N^D ^A ^S^I^N^G^L^E-^L^I^N^E ^E^N^T^R^Y ^F^O^R ^E^A^C^H ^T^E^R^M^I^N^A^L
      ^A^T^T^R^I^B^U^T^E ^Y^O^U ^W^A^N^T ^T^O ^C^H^A^N^G^E.  Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^E^A^C^H ^E^N^T^R^Y ^I^N ^T^H^E
      ^K^E^Y^W^O^R^D=^V^A^L^U^E ^F^O^R^M^A^T.  S^E^E ^T^H^E ^H^E^L^P ^T^E^X^T ^F^O^R ^T^H^E ^O^T^H^E^R ^P^A^R^A^M^E^T^E^R^S ^T^O
      ^F^I^N^D ^T^H^E ^A^P^P^R^O^P^R^I^A^T^E ^V^A^L^U^E^S ^F^O^R ^T^H^E LF=^L^F, SP=^S^P, EC=^E^C, ^A^N^D FM=^F^M
      ^P^A^R^A^M^E^T^E^R^S.  B^E^L^O^W ^A^R^E ^T^H^E ^A^C^C^E^P^T^A^B^L^E ^K^E^Y^W^O^R^D^S ^A^N^D ^V^A^L^U^E^S ^F^O^R ^T^H^E
      ^T^E^R^M^I^N^A^L ^A^T^T^R^I^B^U^T^E^S ^Y^O^U ^C^A^N ^C^H^A^N^G^E ^U^S^I^N^G XMODEM@D

      A^T^T^R^I^B^U^T^E           K^E^Y^W^O^R^D      P^O^S^S^I^B^L^E V^A^L^U^E^S
      ---------           -------      ---------------

      P^A^R^I^T^Y                 PA        NONE ^O^R N, EVEN ^O^R E, ODD ^O^R O,
                                       ZERO ^O^R Z.  D^E^F^A^U^L^T ^I^S ^N^O^N^E.

      E^C^H^O^P^L^E^X               EP        YES ^O^R Y, NO ^O^R N.  D^E^F^A^U^L^T ^I^S ^N^O.

      I^N^P^U^T ^F^L^O^W ^C^O^N^T^R^O^L     IC        YES ^O^R Y, NO ^O^R N.  D^E^F^A^U^L^T ^I^S ^Y^E^S.

      O^U^T^P^U^T ^F^L^O^W ^C^O^N^T^R^O^L    OC        YES ^O^R Y, NO ^O^R N.  D^E^F^A^U^L^T ^I^S ^Y^E^S.

      A^T^T^E^N^T^I^O^N ^C^H^A^R^A^C^T^E^R    AC        ASCII ^D^E^C^I^M^A^L ^N^U^M^B^E^R
                                       (^F^O^R CDCNET ^U^S^E^R^S ^O^N^L^Y).

      F^O^R ^E^X^A^M^P^L^E, ^T^H^E ^F^O^L^L^O^W^I^N^G ^L^I^N^E^S ^C^O^U^L^D ^M^A^K^E ^U^P ^A ^C^O^N^F^I^G^U^R^A^T^I^O^N ^F^I^L^E@D

      EC=CRC.
      SP=NO.
      LF=YES.
      EP=NO.
      OC=YES.

.ENDHELP
.EX.$XMODEM,#FN=FN,#TD=TD,#FT=FT,#LF=LF,#SP=SP,#EC=EC,#FM=FM,#CF=CF.
*WEOR
.PROC,AB*I"AB-A^B^O^R^T O^U^T^P^U^T B^L^O^C^K C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T AB=^A^B

      T^H^E AB ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^A^B^O^R^T ^A^N ^O^U^T^P^U^T ^B^L^O^C^K.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^A^B ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^A^B^O^R^T ^O^U^T^P^U^T ^B^L^O^C^K ^C^H^A^R^A^C^T^E^R.
      T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^F^O^R BS,
      B1, B2, CT, EB, ^A^N^D EL.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^A^N^D ^I^S ^N^O^T
      ^V^A^L^I^D ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,AR*I"AR-A^U^T^O^M^A^T^I^C C^H^A^R^A^C^T^E^R R^E^C^O^G^N^I^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T AR

      T^H^E AR ^C^O^M^M^A^N^D ^A^L^L^O^W^S ^Y^O^U ^T^O ^C^H^A^N^G^E ^T^H^E ^T^E^R^M^I^N^A^L'^S ^C^H^A^R^A^C^T^E^R
      ^S^E^T ^O^R ^T^H^E ^C^H^A^R^A^C^T^E^R ^S^E^T ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^T^E^R^M^I^N^A^L ^I^N^P^U^T ^A^N^D
      ^O^U^T^P^U^T ^D^E^V^I^C^E^S.  Y^O^U ^M^U^S^T ^I^N^F^O^R^M ^T^H^E TIP ^O^F ^T^H^E ^C^H^A^N^G^E.  Y^O^U
      ^U^S^E ^T^H^E ^A^U^T^O^M^A^T^I^C ^R^E^C^O^G^N^I^T^I^O^N (AR) ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D
      ^T^O ^D^O ^T^H^I^S.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R
      ^Y^O^U^R ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^S ^C^O^N^N^E^C^T^E^D ^T^H^R^O^U^G^H ^A^N X.25 ^N^E^T^W^O^R^K, ^O^N^L^Y ^T^H^E
      ^C^H^A^R^A^C^T^E^R ^S^E^T ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^Y^O^U^R ^T^E^R^M^I^N^A^L ^C^A^N ^B^E ^C^H^A^N^G^E^D ^W^I^T^H
      ^T^H^E AR ^C^O^M^M^A^N^D.  I^N ^O^R^D^E^R ^F^O^R ^T^H^E TIP ^T^O ^C^O^R^R^E^C^T^L^Y ^R^E^C^O^G^N^I^Z^E ^T^H^E
      ^C^H^A^R^A^C^T^E^R ^S^E^T ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^Y^O^U^R ^T^E^R^M^I^N^A^L, ^T^H^E X.25 ^N^E^T^W^O^R^K
      ^P^A^C^K^E^T ^A^S^S^E^M^B^L^Y/^D^I^S^A^S^S^E^M^B^L^Y (PAD) ^S^E^R^V^I^C^E ^M^U^S^T ^B^E ^A^B^L^E ^T^O ^P^A^S^S
      ^U^N^T^R^A^N^S^L^A^T^E^D ^C^H^A^R^A^C^T^E^R^S ^T^O ^T^H^E TIP.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BF*I"BF-B^L^O^C^K^I^N^G F^A^C^T^O^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T BF=^B^F

      T^H^E BF ^C^O^M^M^A^N^D ^S^E^T^S ^T^H^E ^S^I^Z^E ^O^F ^T^H^E ^I^N^T^E^R^M^E^D^I^A^T^E ^D^A^T^A ^B^L^O^C^K^S
      ^T^H^A^T ^W^I^L^L ^B^E ^D^E^L^I^V^E^R^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^B^F ^S^P^E^C^I^F^I^E^S ^T^H^E ^B^L^O^C^K^I^N^G ^F^A^C^T^O^R.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^B^F@D

      ^B^F                         D^E^S^C^R^I^P^T^I^O^N
      --                         -----------
      0      S^E^L^E^C^T^S ^A ^L^I^N^E ^F^E^E^D ^C^H^A^R^A^C^T^E^R ^A^N^D ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F
             100 ^A^S ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S.

      1      S^E^L^E^C^T^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F 100 ^A^S ^A ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.

      2      S^E^L^E^C^T^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^O^F 200 ^A^S ^A ^D^A^T^A-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.


      R^E^G^A^R^D^L^E^S^S ^O^F ^T^H^E ^B^L^O^C^K^I^N^G ^F^A^C^T^O^R, ^A^N ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R
      (^U^S^U^A^L^L^Y ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N) ^F^O^R^W^A^R^D^S ^D^A^T^A ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BR*I"BR-B^R^E^A^K K^E^Y A^S U^S^E^R B^R^E^A^K 1".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T BR=^O^P^T^I^O^N

      T^H^E BR ^C^O^M^M^A^N^D ^D^E^T^E^R^M^I^N^E^S ^I^F ^T^H^E BREAK ^K^E^Y (^I^N^T^E^R^R^U^P^T^I^O^N ^K^E^Y ^F^O^R
      ^I^N^T^E^R^A^C^T^I^V^E ^O^U^T^P^U^T) ^A^L^S^O ^F^U^N^C^T^I^O^N^S ^A^S ^T^H^E ^I^N^T^E^R^R^U^P^T^I^O^N ^S^E^Q^U^E^N^C^E
      (^U^S^E^R ^B^R^E^A^K 1 ^S^E^Q^U^E^N^C^E) ^W^H^E^N ^E^N^T^E^R^E^D ^D^U^R^I^N^G ^O^U^T^P^U^T ^A^N^D ^A^S ^T^H^E ^C^A^N^C^E^L
      ^C^H^A^R^A^C^T^E^R ^W^H^E^N ^E^N^T^E^R^E^D ^D^U^R^I^N^G ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^D^E^T^E^R^M^I^N^E^S ^I^F ^T^H^I^S ^F^E^A^T^U^R^E ^I^S ^E^N^A^B^L^E^D ^O^R
      ^D^I^S^A^B^L^E^D.  A ^V^A^L^U^E ^O^F Y ^E^N^A^B^L^E^S ^A^N^D ^A ^V^A^L^U^E ^O^F N ^D^I^S^A^B^L^E^S ^T^H^I^S ^F^E^A^T^U^R^E.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,BS*I"BS-B^A^C^K^S^P^A^C^E C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T BS=^B^S

      T^H^E BS ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^D^E^L^E^T^E ^T^H^E
      ^P^R^E^V^I^O^U^S ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R
      ^Y^O^U^R ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^B^S ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^B^A^C^K^S^P^A^C^E ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R
      ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, B1, B2,
      CN, CT, EB, ^A^N^D EL.

      I^T ^I^S ^P^O^S^S^I^B^L^E ^T^O ^B^A^C^K^S^P^A^C^E ^O^N^L^Y ^T^O ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E ^C^U^R^R^E^N^T
      ^P^H^Y^S^I^C^A^L ^L^I^N^E; ^A^D^D^I^T^I^O^N^A^L ^B^A^C^K^S^P^A^C^E^S ^A^R^E ^D^I^S^R^E^G^A^R^D^E^D.  W^H^E^N
      ^A ^P^A^G^E ^W^I^D^T^H ^O^F 0 ^I^S ^S^E^L^E^C^T^E^D, ^T^H^E ^N^E^T^W^O^R^K ^A^S^S^U^M^E^S ^A ^P^A^G^E ^W^I^D^T^H
      ^O^F 100 ^C^H^A^R^A^C^T^E^R^S ^F^O^R ^B^A^C^K^S^P^A^C^I^N^G.  I^F ^T^H^E ^P^A^G^E ^W^I^D^T^H ^I^S ^I^N ^T^H^E
      ^R^A^N^G^E 20 ^T^H^R^O^U^G^H 56, ^B^A^C^K^S^P^A^C^I^N^G ^I^N^T^O ^P^R^E^V^I^O^U^S ^P^H^Y^S^I^C^A^L ^L^I^N^E^S
      ^I^S ^S^O^M^E^T^I^M^E^S ^P^E^R^M^I^T^T^E^D.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,B1*I"B1-I^N^T^E^R^R^U^P^T^I^O^N ^O^R U^S^E^R B^R^E^A^K 1 C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST
      F^O^R^M^A^T@D  ^C^T B1=^U^B1

      T^H^E B1 ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^T^H^A^T, ^W^H^E^N ^E^N^T^E^R^E^D ^A^S ^T^H^E
      ^O^N^L^Y ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^O^G^I^C^A^L ^L^I^N^E (^I^N^T^E^R^R^U^P^T^I^O^N ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^E^D
      ^B^Y ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y), ^C^A^U^S^E^S ^P^R^O^G^R^A^M ^I^N^T^E^R^R^U^P^T^I^O^N.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^U^B1 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^U^S^E^R ^B^R^E^A^K 1 ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R
      AB, BS, B2, CN, CT, EB, ^A^N^D EL.

      T^H^E BR ^C^O^M^M^A^N^D ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^T^H^E BREAK ^K^E^Y ^C^A^N ^A^L^S^O ^F^U^N^C^T^I^O^N
      ^A^S ^T^H^E B1 ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,B2*I"B2-T^E^R^M^I^N^A^T^I^O^N ^O^R U^S^E^R B^R^E^A^K 2 C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T B2=^U^B2

      T^H^E B2 ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^T^H^A^T, ^W^H^E^N ^E^N^T^E^R^E^D ^A^S ^T^H^E
      ^O^N^L^Y ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^O^G^I^C^A^L ^L^I^N^E (^T^E^R^M^I^N^A^T^I^O^N ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^E^D
      ^B^Y ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y), ^C^A^U^S^E^S ^P^R^O^G^R^A^M ^T^E^R^M^I^N^A^T^I^O^N.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^U^B2 ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^U^S^E^R ^B^R^E^A^K 2 ^C^H^A^R^A^C^T^E^R.  T^H^I^S ^C^H^A^R^A^C^T^E^R
      ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1,
      CN, CT, EB, ^A^N^D EL.

      T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CH*I"CH-D^I^S^P^L^A^Y T^E^R^M^I^N^A^L C^H^A^R^A^C^T^E^R^I^S^T^I^C^S".
.PROMPT,N^O^T ^E^X^E^C^U^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T CH

      T^H^E CH ^C^O^M^M^A^N^D ^D^I^S^P^L^A^Y^S ^S^O^M^E ^O^F ^T^H^E ^T^E^R^M^I^N^A^L'^S ^C^U^R^R^E^N^T
      ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E CH ^C^O^M^M^A^N^D ^P^R^O^D^U^C^E^S ^A ^D^I^S^P^L^A^Y ^I^N ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^O^R^M^A^T@D

           TC=^T^C,BS=^B^S,CN=^C^N,AB=^A^B,B^L=^U^B1,B2=^U^B2,EL=^E^L,EB=^E^B

      ^W^H^E^R^E ^T^H^E ^V^A^R^I^A^B^L^E ^P^O^R^T^I^O^N^S ^A^P^P^E^A^R ^A^S ASCII ^C^H^A^R^A^C^T^E^R^S ^I^F
      ^P^R^I^N^T^A^B^L^E, ^M^N^E^M^O^N^I^C^S (^F^O^R ^E^X^A^M^P^L^E, STX) ^I^F ^N^O^N^P^R^I^N^T^A^B^L^E, ^O^R
      N/A ^I^F ^T^H^E ^A^T^T^R^I^B^U^T^E ^I^S ^N^O^T ^A^P^P^L^I^C^A^B^L^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CI*I"CI-C^A^R^R^I^A^G^E R^E^T^U^R^N I^D^L^E C^O^U^N^T".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T CI=^C^I

      T^H^E CI ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^T^O ^B^E
      ^I^N^S^E^R^T^E^D ^I^N^T^O ^T^H^E ^O^U^T^P^U^T ^S^T^R^E^A^M ^A^F^T^E^R ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^C^I ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E ^C^O^U^N^T.  T^H^I^S
      ^V^A^L^U^E ^C^A^N ^B^E ^F^R^O^M 0 ^T^O 127 ^O^R ^T^H^E ^S^T^R^I^N^G CA.  A ^V^A^L^U^E ^O^F CA
      ^R^E^S^T^O^R^E^S ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E ^C^O^U^N^T ^T^O ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E.

      W^H^E^N ^T^H^E ^N^E^T^W^O^R^K ^P^R^O^D^U^C^E^S ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N, ^T^H^E ^N^E^T^W^O^R^K ^O^U^T^P^U^T^S
      ^T^H^E ^S^P^E^C^I^F^I^E^D ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^B^E^F^O^R^E ^O^U^T^P^U^T^T^I^N^G ^T^H^E
      ^N^E^X^T ^L^I^N^E.  T^H^I^S ^A^L^L^O^W^S ^T^I^M^E ^F^O^R ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^F^U^N^C^T^I^O^N
      ^A^N^D ^E^N^S^U^R^E^S ^T^H^A^T ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^N^O^T ^L^O^S^T ^B^E^C^A^U^S^E ^P^R^I^N^T^I^N^G ^A^T^T^E^M^P^T^S
      ^D^U^R^I^N^G ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^O^P^E^R^A^T^I^O^N.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CN*I"CN-C^A^N^C^E^L C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T CN=^C^N

      T^H^E CN ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^U^S^E^D ^T^O ^C^A^N^C^E^L ^T^H^E
      ^L^O^G^I^C^A^L ^L^I^N^E ^C^U^R^R^E^N^T^L^Y ^B^E^I^N^G ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^C^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^C^A^N^C^E^L ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D
      ^F^O^R BS, B1, B2, CT, EB, ^A^N^D EL.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^E ^C^A^N^C^E^L ^C^H^A^R^A^C^T^E^R ^A^S ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^I^N
      ^A ^L^I^N^E ^T^H^E ^E^N^T^I^R^E ^L^O^G^I^C^A^L ^L^I^N^E ^I^N ^P^R^O^G^R^E^S^S ^I^S ^C^A^N^C^E^L^L^E^D.  T^H^E
      ^S^Y^S^T^E^M ^R^E^S^P^O^N^D^S ^T^O ^A ^C^A^N^C^E^L ^L^I^N^E ^C^H^A^R^A^C^T^E^R ^B^Y ^P^R^I^N^T^I^N^G *DEL*
      ^O^N ^T^H^E ^N^E^X^T ^L^I^N^E ^A^N^D ^P^O^S^I^T^I^O^N^I^N^G ^T^H^E ^C^A^R^R^I^A^G^E ^T^O ^T^H^E ^B^E^G^I^N^N^I^N^G
      ^O^F ^A ^N^E^W ^L^I^N^E.  T^H^E BR ^C^O^M^M^A^N^D ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^T^H^E BREAK
      ^K^E^Y ^C^A^N ^A^L^S^O ^F^U^N^C^T^I^O^N ^A^S ^T^H^E CN ^C^H^A^R^A^C^T^E^R.

      T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CP*I"CP-C^U^R^S^O^R P^O^S^I^T^I^O^N^I^N^G A^F^T^E^R I^N^P^U^T".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T CP=^O^P^T^I^O^N

      T^H^E ^N^E^T^W^O^R^K ^N^O^R^M^A^L^L^Y ^R^E^S^P^O^N^D^S ^T^O ^I^N^P^U^T ^T^R^A^N^S^M^I^S^S^I^O^N
      ^D^E^L^I^M^I^T^E^R^S ^B^Y ^R^E^P^O^S^I^T^I^O^N^I^N^G ^T^H^E ^C^O^N^S^O^L^E'^S ^C^U^R^S^O^R ^O^R ^P^R^I^N^T^I^N^G
      ^M^E^C^H^A^N^I^S^M ^T^O ^T^H^E ^B^E^G^I^N^N^I^N^G ^O^F ^T^H^E ^N^E^X^T ^P^H^Y^S^I^C^A^L ^L^I^N^E.  I^T ^S^E^N^D^S
      ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^C^O^D^E ^I^N ^R^E^S^P^O^N^S^E ^T^O ^A ^L^I^N^E ^F^E^E^D ^F^R^O^M ^T^H^E
      ^K^E^Y^B^O^A^R^D (IN ^C^O^M^M^A^N^D KB ^V^A^L^U^E), ^A^N^D ^C^A^N ^S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N
      ^A^N^D/^O^R ^A ^L^I^N^E ^F^E^E^D ^C^O^D^E ^A^S ^A ^R^E^S^P^O^N^S^E ^T^O ^A^N ^E^N^D-^O^F-^L^I^N^E ^O^R
      ^E^N^D-^O^F-^B^L^O^C^K ^C^O^D^E.  T^H^E ^R^E^S^P^O^N^S^E ^U^S^E^D ^F^O^R ^C^U^R^S^O^R ^P^O^S^I^T^I^O^N^I^N^G ^I^S
      ^D^E^T^E^R^M^I^N^E^D ^B^Y ^T^H^E ^C^P^R ^V^A^L^U^E ^O^F ^T^H^E EL ^O^R EB ^C^O^M^M^A^N^D.  Y^O^U ^C^A^N
      ^C^O^N^T^R^O^L ^W^H^E^T^H^E^R ^T^H^E ^N^E^T^W^O^R^K ^P^E^R^F^O^R^M^S ^C^U^R^S^O^R ^P^O^S^I^T^I^O^N^I^N^G ^W^I^T^H ^T^H^E
      ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G (CP) ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^I^S ^C^O^M^M^A^N^D ^I^S ^V^A^L^I^D ^F^R^O^M ^C^O^N^S^O^L^E ^D^E^V^I^C^E^S ^I^N ^T^E^R^M^I^N^A^L ^C^L^A^S^S^E^S
      1 ^T^H^R^O^U^G^H 3 ^A^N^D 5 ^T^H^R^O^U^G^H 8 (^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D X.25 ^T^E^R^M^I^N^A^L^S).
      T^H^E CP ^C^O^M^M^A^N^D ^C^A^N ^A^L^S^O ^B^E ^S^E^N^T ^D^O^W^N^L^I^N^E ^T^O ^D^E^V^I^C^E^S ^I^N ^T^H^O^S^E
      ^T^E^R^M^I^N^A^L ^C^L^A^S^S^E^S ^B^Y ^A^N ^A^P^P^L^I^C^A^T^I^O^N ^P^R^O^G^R^A^M.

      I^F CP=Y ^A^N^D IN=BK, ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^R^E^S^P^O^N^D ^T^O ^L^I^N^E ^F^E^E^D^S
      ^O^R ^T^O ^E^N^D-^O^F-^L^I^N^E ^C^O^D^E^S.  O^N^L^Y ^T^H^E ^R^E^S^P^O^N^S^E ^D^E^F^I^N^E^D ^B^Y ^T^H^E
      EB ^C^O^M^M^A^N^D ^I^S ^U^S^E^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,CT*I"CT-N^E^T^W^O^R^K C^O^N^T^R^O^L C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T CT=^C^H^A^R

      T^H^E CT ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^A ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^T^H^E
      ^T^E^R^M^I^N^A^L.  W^H^E^N ^Y^O^U ^E^N^T^E^R ^T^H^I^S ^C^H^A^R^A^C^T^E^R ^A^S ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R
      ^O^F ^A ^L^O^G^I^C^A^L ^L^I^N^E, ^I^T ^S^I^G^N^A^L^S ^T^H^A^T ^W^H^A^T ^F^O^L^L^O^W^S ^I^S ^A ^T^E^R^M^I^N^A^L
      ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D ^O^R ^A ^S^P^E^C^I^A^L ^C^O^M^M^A^N^D ^T^H^A^T ^T^H^E ^N^E^T^W^O^R^K ^F^O^R^W^A^R^D^S
      ^T^O ^Y^O^U^R ^A^P^P^L^I^C^A^T^I^O^N ^W^I^T^H ^A ^P^R^E^E^M^P^T^I^V^E ^S^T^A^T^U^S.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^C^U^R^R^E^N^T ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R
      ^F^O^R ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^C^H^A^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R.  T^H^I^S
      ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R
      AB, BS, B1, B2, CN, EB, ^A^N^D EL.


      I^F ^Y^O^U ^E^N^T^E^R ^T^H^E CT ^C^O^M^M^A^N^D ^I^N ^A ^L^I^N^E ^W^I^T^H ^M^U^L^T^I^P^L^E ^T^E^R^M^I^N^A^L
      ^D^E^F^I^N^I^T^I^O^N^S ^T^H^E ^N^E^W ^V^A^L^U^E ^C^H^A^R ^D^O^E^S ^N^O^T ^T^A^K^E ^E^F^F^E^C^T ^U^N^T^I^L
      ^T^H^E ^C^O^M^P^L^E^T^E ^L^I^N^E ^I^S ^P^R^O^C^E^S^S^E^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,DL*I"DL-D^E^L^I^M^I^T^E^R^S F^O^R S^I^N^G^L^E M^E^S^S^A^G^E".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME-- P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T DL=X^X^X,C^C^O^U^N^T,TO

      T^H^E DL ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^D^E^L^I^M^I^T^E^R^S ^T^H^A^T ^T^E^R^M^I^N^A^T^E ^S^I^N^G^L^E-
      ^M^E^S^S^A^G^E ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.  W^H^E^N ^Y^O^U ^I^N^I^T^I^A^T^E ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E (IN=X, IN=XK, ^O^R IN=XP), ^T^H^E ^N^E^T^W^O^R^K ^R^E^A^D^S ^Y^O^U^R ^I^N^P^U^T
      ^A^N^D ^S^E^N^D^S ^I^T ^T^O ^T^H^E ^S^Y^S^T^E^M ^W^I^T^H^O^U^T ^T^R^A^N^S^L^A^T^I^O^N ^U^N^T^I^L ^I^T ^E^N^C^O^U^N^T^E^R^S
      ^A ^D^E^L^I^M^I^T^E^R.  I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^E^V^E^N, ^O^D^D, ^O^R
      ^Z^E^R^O (PA=E, 0, ^O^R Z), ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^S^T^R^I^P^P^E^D (^S^E^T ^T^O ^Z^E^R^O)
      ^B^E^F^O^R^E ^T^H^E ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T, ^A^L^T^H^O^U^G^H ^N^O ^T^R^A^N^S^L^A^T^I^O^N
      ^O^C^C^U^R^S.  I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^N^O^N^E ^O^R ^I^G^N^O^R^E
      (PA=N ^O^R I), ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^N^O^T ^S^T^R^I^P^P^E^D.  T^H^E ^F^I^R^S^T ^D^E^L^I^M^I^T^E^R
      ^E^N^C^O^U^N^T^E^R^E^D ^T^E^R^M^I^N^A^T^E^S ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E X^X^X ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E (^X^X) ^O^F
      ^T^H^E ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T ^A^S ^A ^D^E^L^I^M^I^T^E^R.  T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^S^E^N^D
      ^T^H^E ^C^H^A^R^A^C^T^E^R ^A^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^D^A^T^A.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A
      ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T ^H^A^V^E ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R
      ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^T^O ^N^O^N^E ^O^R ^I^G^N^O^R^E (PA=N ^O^R PA=I); ^O^T^H^E^R^W^I^S^E ^T^H^E
      ^N^E^T^W^O^R^K ^C^A^N^N^O^T ^D^E^T^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N ^I^T ^O^C^C^U^R^S ^I^N ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E
      ^M^E^S^S^A^G^E.  I^F ^T^H^E ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^N^O^N^E, ^T^H^E 8-^B^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^C^O^D^E ^I^N^P^U^T ^F^R^O^M ^T^H^E ^T^E^R^M^I^N^A^L ^I^S ^M^A^T^C^H^E^D ^A^G^A^I^N^S^T ^T^H^E 8-^B^I^T
      ^H^E^X^D^E^C^I^M^A^L ^C^O^D^E ^S^P^E^C^I^F^I^E^D ^A^S ^T^H^E ^D^E^L^I^M^I^T^E^R (^X^X).  I^F ^T^H^E
      ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^I^S ^S^E^T ^T^O ^I^G^N^O^R^E, ^T^H^E ^B^O^T^T^O^M 7 ^B^I^T^S ^O^F ^T^H^E
      ^T^E^R^M^I^N^A^L ^I^N^P^U^T ^A^R^E ^M^A^T^C^H^E^D ^A^G^A^I^N^S^T ^T^H^E ^B^O^T^T^O^M 7 ^B^I^T^S ^O^F ^T^H^E
      ^S^P^E^C^I^F^I^E^D ^D^E^L^I^M^I^T^E^R (^X^X).


      T^H^E ^V^A^L^U^E C^C^O^U^N^T ^S^P^E^C^I^F^I^E^S ^A ^D^E^C^I^M^A^L ^V^A^L^U^E (^C^O^U^N^T) ^F^R^O^M 1 ^T^O 4095
      ^T^H^A^T ^F^U^N^C^T^I^O^N^S ^A^S ^A ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^D^E^L^I^M^I^T^E^R.  T^H^E^S^E ^V^A^L^U^E^S ^A^R^E ^V^A^L^I^D
      ^W^I^T^H^I^N ^T^H^E ^N^E^T^W^O^R^K.  H^O^W^E^V^E^R, ^U^N^L^E^S^S ^C^H^A^N^G^E^D ^D^U^R^I^N^G ^I^N^S^T^A^L^L^A^T^I^O^N, ^T^H^E
      ^M^A^X^I^M^U^M ^L^O^G^I^C^A^L ^I^N^P^U^T ^L^I^N^E ^L^E^N^G^T^H ^I^N IAF (2500 ^C^H^A^R^A^C^T^E^R^S) ^L^I^M^I^T^S ^Y^O^U.

      T^H^E ^V^A^L^U^E TO ^S^P^E^C^I^F^I^E^S ^T^H^A^T ^A ^T^I^M^E^O^U^T ^O^F ^B^E^T^W^E^E^N 200 ^A^N^D 400
      ^M^I^L^L^I^S^E^C^O^N^D^S ^W^I^L^L ^B^E ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R.

      Y^O^U ^C^A^N ^S^E^L^E^C^T ^A^N^Y ^O^F ^T^H^E ^T^H^R^E^E ^T^Y^P^E^S ^O^F ^D^E^L^I^M^I^T^E^R^S@D  ^C^H^A^R^A^C^T^E^R
      ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y X^X^X), ^C^H^A^R^A^C^T^E^R ^C^O^U^N^T ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y
      C^C^O^U^N^T), ^A^N^D ^T^I^M^E^O^U^T ^D^E^L^I^M^I^T^E^R (^S^P^E^C^I^F^Y TO).

      T^H^E ^P^A^R^A^M^E^T^E^R ^V^A^L^U^E^S ^F^O^R DL ^A^R^E ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T ^A^N^D ^O^P^T^I^O^N^A^L.
      H^O^W^E^V^E^R, ^Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A^T ^L^E^A^S^T ^O^N^E ^O^F ^T^H^E ^P^A^R^A^M^E^T^E^R ^V^A^L^U^E^S.
      Y^O^U ^C^A^N ^O^M^I^T ^T^R^A^I^L^I^N^G ^C^O^M^M^A^S ^I^F ^Y^O^U ^D^O ^N^O^T ^S^P^E^C^I^F^Y ^A^L^L ^T^H^R^E^E
      ^T^Y^P^E^S ^O^F ^D^E^L^I^M^I^T^E^R^S.

      E^N^T^E^R^I^N^G ^T^H^I^S ^C^O^M^M^A^N^D ^W^I^T^H ^A^N^Y ^N^U^M^B^E^R ^O^F ^N^E^W ^D^E^L^I^M^I^T^E^R^S ^C^A^N^C^E^L^S
      ^A^L^L ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^I^N^P^U^T ^D^E^L^I^M^I^T^E^R^S ^A^L^R^E^A^D^Y ^I^N ^E^F^F^E^C^T,
      ^I^N^C^L^U^D^I^N^G ^T^H^O^S^E ^S^P^E^C^I^F^I^E^D ^W^I^T^H ^T^H^E XL ^C^O^M^M^A^N^D.

      T^H^E DL ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.
      T^E^R^M^I^N^A^L ^C^L^A^S^S 4 ^I^S ^C^O^N^F^I^G^U^R^E^D ^W^I^T^H ^T^H^E RETURN ^K^E^Y ^A^S ^T^H^E ^O^N^L^Y
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S ^A^R^E ^C^O^N^F^I^G^U^R^E^D
      ^W^I^T^H ^T^H^E SEND ^O^R ETX ^K^E^Y ^A^S ^T^H^E^I^R ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.
      F^O^R X.25 ^D^E^V^I^C^E^S, ^T^H^E PAD ^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^L^W^A^Y^S ^A^C^T^S ^A^S ^A
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R ^I^N ^A^D^D^I^T^I^O^N ^T^O ^A^N^Y ^O^T^H^E^R ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EB*I"EB - E^N^D-O^F-B^L^O^C^K C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T EB=^E^B,^C^P^R

      T^H^E EB ^C^O^M^M^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^A^N^D ^D^E^F^I^N^E^S ^T^H^E
      ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^A^T ^C^H^A^R^A^C^T^E^R.  T^H^E EB ^C^H^A^R^A^C^T^E^R
      ^A^C^T^S ^A^S ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y ^F^O^R ^T^E^R^M^I^N^A^L^S ^O^P^E^R^A^T^I^N^G ^I^N
      ^B^L^O^C^K ^M^O^D^E (^R^E^F^E^R ^T^O ^T^H^E IN ^C^O^M^M^A^N^D).

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^E^B ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R.  Y^O^U ^C^A^N
      ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^E^B@D

         ^E^B                     D^E^S^C^R^I^P^T^I^O^N
         --                     -----------
         X^X^X   S^P^E^C^I^F^I^E^S ^T^H^E 2-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^X^X ^O^F ^T^H^E
               ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T ^A^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^D^E^L^I^M^I^T^E^R.
               T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S
               ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1, B2, CN, ^A^N^D CT.

         EB    S^E^L^E^C^T^S ^T^H^E ^D^E^F^A^U^L^T ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^O^R ^C^H^A^R^A^C^T^E^R
               ^S^E^Q^U^E^N^C^E.

         EL    S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^C^P^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^E
      EB ^C^H^A^R^A^C^T^E^R.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^C^P^R@D

         ^C^P^R              D^E^S^C^R^I^P^T^I^O^N
         ---              -----------
         CR    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
         LF    S^E^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
         CL    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
         NO    S^E^N^D ^N^O ^R^E^S^P^O^N^S^E.

      T^H^E ^T^W^O EB ^P^A^R^A^M^E^T^E^R^S (EB=^E^B ^A^N^D ^C^P^R) ^A^R^E ^O^P^T^I^O^N^A^L ^A^N^D
      ^O^R^D^E^R-^D^E^P^E^N^D^E^N^T.  I^F ^Y^O^U ^O^M^I^T ^O^N^E, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^A^I^N^S ^I^T^S
      ^P^R^E^V^I^O^U^S ^V^A^L^U^E.

      T^H^I^S ^C^O^M^M^A^N^D ^I^S ^V^A^L^I^D ^O^N^L^Y ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T
      ^F^O^R ^P^A^P^E^R ^T^A^P^E ^D^E^V^I^C^E^S ^A^N^D 2741 ^T^E^R^M^I^N^A^L^S).  T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R
      ^F^O^R ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S ^I^S ETX ^A^N^D ^I^S ^N^O^T ^C^H^A^N^G^E^A^B^L^E.  I^F ^Y^O^U ^S^P^E^C^I^F^Y ^T^H^E
      ^C^H^A^R ^F^O^R^M ^O^F ^T^H^E ^E^B ^P^A^R^A^M^E^T^E^R, ^I^T ^I^S ^O^N^L^Y ^E^F^F^E^C^T^I^V^E ^I^F ^I^T ^O^C^C^U^R^S ^A^S ^T^H^E
      ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^I^N ^A ^L^I^N^E.

      T^H^E CP ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G
      ^R^E^S^P^O^N^S^E ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^C^P^R ^P^A^R^A^M^E^T^E^R.

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EL*I"EL - E^N^D-O^F-L^I^N^E C^H^A^R^A^C^T^E^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T EL=^E^L, ^C^P^R

      T^H^E EL ^C^O^M^M^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R (^C^A^R^R^I^A^G^E ^R^E^T^U^R^

      ^A^N^D ^D^E^F^I^N^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^A^T ^C^H^A^R^A^C^T^E^R.  I^T ^A^L^S^O
      ^D^E^F^I^N^E^S ^T^H^E ^M^E^S^S^A^G^E ^T^R^A^N^S^M^I^S^S^I^O^N ^K^E^Y ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S ^N^O^T
      ^I^N ^B^L^O^C^K ^M^O^D^E (^R^E^F^E^R ^T^O ^T^H^E IN ^C^O^M^M^A^N^D).

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R ^T^E^R^M^I^N^A^
^S
      ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^E^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.  Y^O^U ^C^A^N
      ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^E^L@D

      ^E^L                      D^E^S^C^R^I^P^T^I^O^N
      --                      -----------
      X^X^X   S^P^E^C^I^F^I^E^S ^T^H^E 2-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^X^X ^O^F ^T^H^E
            ^C^H^A^R^A^C^T^E^R ^Y^O^U ^W^A^N^T ^A^S ^T^H^E ^E^N^D-^O^F-^B^L^O^C^K ^D^E^L^I^M^I^T^E^R.
            T^H^I^S ^C^H^A^R^A^C^T^E^R ^M^U^S^T ^D^I^F^F^E^R ^F^R^O^M ^T^H^E ^C^H^A^R^A^C^T^E^R^S
            ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R AB, BS, B1, B2, CN, ^A^N^D CT.

      EB    S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^E^N^D-^O^F-^B^L^O^C^K ^C^H^A^R^A^C^T^E^R ^O^R
            ^C^H^A^R^A^C^T^E^R ^S^E^Q^U^E^N^C^E.

      EL    S^E^L^E^C^T^S ^T^H^E ^D^E^F^A^U^L^T ^L^O^G^I^C^A^L ^E^N^D-^O^F-^L^I^N^E ^C^H^A^R^A^C^T^E^R.

      T^H^E ^V^A^L^U^E ^C^P^R ^S^P^E^C^I^F^I^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^S^P^O^N^S^E ^T^O ^T^H^E
      EL ^C^H^A^R^A^C^T^E^R. Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^C^P^R@D

      ^C^P^R                D^E^S^C^R^I^P^T^I^O^N
      ---                -----------
      CR    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      LF    S^E^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      CL    S^E^N^D ^A ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^A^N^D ^A ^L^I^N^E ^F^E^E^D ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.
      NO    S^E^N^D ^N^O ^R^E^S^P^O^N^S^E.

      T^H^E ^T^W^O EL ^P^A^R^A^M^E^T^E^R^S (^E^L ^A^N^D ^C^P^R) ^A^R^E ^O^P^T^I^O^N^A^L ^A^N^D ^O^R^D^E^R-
      ^I^N^D^E^P^E^N^D^E^N^T.  I^F ^Y^O^U ^O^M^I^T ^O^N^E, ^T^H^E ^S^Y^S^T^E^M ^R^E^T^A^I^N^S ^I^T^S
      ^P^R^E^V^I^O^U^S ^V^A^L^U^E.

      T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O 2741, HASP 3270, ^A^N^D ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S; ^T^H^E ^C^P^R ^P^A^R^A^M^E^T^E^R ^D^O^E^S ^N^O^T ^A^P^P^L^Y
      ^T^O ^M^O^D^E 4 ^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S; ^A^N^D ^T^H^E ^C^H^A^R ^S^P^E^C^I^F^I^C^A^T^I^O^N
      ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.

      T^H^E CP ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^C^U^R^S^O^R-^P^O^S^I^T^I^O^N^I^N^G ^R^E^P^O^N^S^E
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^C^P^R ^P^A^R^A^M^E^T^E^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,EP*I"EP - E^C^H^O^P^L^E^X M^O^D^E".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T EP=^O^P^T^I^O^N

      T^H^E EP ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^E^C^H^O^I^N^G ^O^F ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R^S
      ^B^A^C^K ^T^O ^T^H^E ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^I^N^P^U^T ^E^C^H^O^I^N^G.

      S^O^M^E ^T^E^R^M^I^N^A^L^S ^C^A^N ^P^E^R^F^O^R^M ^T^H^E^I^R ^O^W^N ^C^H^A^R^A^C^T^E^R ^E^C^H^O^I^N^G, ^S^U^C^H ^A^S
      ^T^E^R^M^I^N^A^L^S ^W^I^T^H ^A HALF/FULL ^D^U^P^L^E^X ^S^W^I^T^C^H.  I^F ^T^H^E ^S^W^I^T^C^H ^I^S ^I^N ^T^H^E
      HALF ^P^O^S^I^T^I^O^N, ^S^E^T ^T^H^E EP ^V^A^L^U^E ^T^O N ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^L ^E^C^H^O^E^S
      ^T^H^E ^I^N^P^U^T.  I^F ^T^H^E ^S^W^I^T^C^H ^I^S ^I^N ^T^H^E FULL ^P^O^S^I^T^I^O^N, ^S^E^T ^T^H^E EP
      ^V^A^L^U^E ^T^O Y ^A^N^D ^T^H^E ^N^E^T^W^O^R^K ^E^C^H^O^E^S ^T^H^E ^I^N^P^U^T.

      Y^O^U ^C^A^N ^U^S^E ^T^H^E EP ^C^O^M^M^A^N^D ^A^N^D ^F^U^L^L-^D^U^P^L^E^X ^M^O^D^E ^A^S ^A ^S^E^C^U^R^I^T^Y ^M^E^A^S^U^R^E.
      I^F ^Y^O^U ^A^R^E ^I^N ^F^U^L^L-^D^U^P^L^E^X ^M^O^D^E ^A^N^D EP ^I^S Y ^D^U^R^I^N^G ^L^O^G^I^N, ^T^H^E ^S^Y^S^T^E^M
      ^E^C^H^O^E^S ^A^L^L ^O^F ^Y^O^U^R ^I^N^P^U^T ^E^X^C^E^P^T ^Y^O^U^R ^P^A^S^S^W^O^R^D.  T^H^I^S ^I^S ^N^O^T ^T^R^U^E,
      ^H^O^W^E^V^E^R, ^I^F ^Y^O^U ^E^N^T^E^R ^Y^O^U^R ^U^S^E^R ^N^A^M^E ^A^N^D ^P^A^S^S^W^O^R^D ^O^N ^T^H^E ^S^A^M^E ^L^I^N^E.

      T^H^I^S ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T 2741^S).
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,FA*I"FA - F^U^L^L ASCII I^N^P^U^T M^O^D^E"
.PROMPT,N^O^T ^E^X^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T FA=^O^P^T^I^O^N

      T^H^E FA ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^F^U^L^L-ASCII ^I^N^P^U^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^T^H^E ^F^U^L^L-ASCII ^I^N^P^U^T ^M^O^D^E.

      I^N ^F^U^L^L-ASCII ^I^N^P^U^T, ^A^L^L 128 ASCII ^C^H^A^R^A^C^T^E^R^S, ^I^N^C^L^U^D^I^N^G NUL, DEL,
      STX, LF, ^A^N^D ^A^L^L BLK ^A^N^D ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S (^W^H^I^C^H ^A^R^E
      ^N^O^R^M^A^L^L^Y ^D^I^S^C^A^R^D^E^D), ^A^R^E ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T.  E^X^C^E^P^T^I^O^N^S ^T^O ^T^H^I^S ^A^R^E
      ^T^H^E ^F^O^L^L^O^W^I^N^G ^C^H^A^R^A^C^T^E^R^S.  NUL^S, DEL^S, ^A^N^D LF^S ^W^H^E^N ^E^N^C^O^U^N^T^E^R^E^D ^A^S
      ^T^H^E ^F^I^R^S^T ^C^H^A^R^A^C^T^E^R ^O^F ^A^N ^I^N^P^U^T ^L^I^N^E ^O^R ^A^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^F^O^L^L^O^W^I^N^G ^A
      ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L, CR^S, ^T^H^A^T ^F^O^L^L^O^W LF^S ^W^H^E^N ^I^N^P^U^T^T^I^N^G ^F^R^O^M
      ^P^A^P^E^R ^T^A^P^E, DC3^S ^T^H^A^T ^F^O^L^L^O^W ^T^H^E EL ^C^H^A^R^A^C^T^E^R ^W^H^E^N ^I^N^P^U^T^T^I^N^G ^F^R^O^M ^P^A^P^E^R
      ^T^A^P^E, DC1^S ^A^N^D DC3^S ^W^H^E^N ^O^U^T^P^U^T ^C^O^N^T^R^O^L (OC=Y) ^I^S ^S^E^L^E^C^T^E^D.

      I^N ^F^U^L^L-ASCII ^M^O^D^E, ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^R^E^C^O^G^N^I^Z^E ^T^H^E ^T^E^R^M^I^N^A^L
      ^F^U^N^C^T^I^O^N^S ^A^S^S^O^C^I^A^T^E^D ^W^I^T^H ^T^H^E ^M^N^E^N^O^M^I^C^S B1, B2, CN, AB, ^A^N^D BS.
      T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^R^E^C^O^G^N^I^Z^E ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D^S ^A^N^D ^O^T^H^E^R
      ^C^O^M^M^A^N^D^S ^B^E^G^I^N^N^I^N^G ^W^I^T^H ^T^H^E CT ^C^H^A^R^A^C^T^E^R.

      I^F SE ^I^S ^I^N ^E^F^F^E^C^T ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T FA ^O^R ^I^F FA ^I^S ^I^N ^E^F^F^E^C^T
      ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T SE, FA ^T^A^K^E^S ^P^R^E^C^E^D^E^N^C^E ^A^N^D SE ^W^I^L^L ^N^O^T
      ^B^E ^E^F^F^E^C^T^I^V^E ^U^N^T^I^L FA ^I^S ^T^U^R^N^E^D ^O^F^F.  I^F ^F^U^L^L-ASCII ^M^O^D^E ^I^S ^E^N^A^B^L^E^D
      ^W^H^E^N ^Y^O^U ^S^E^L^E^C^T ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E, ^T^H^E ^N^E^T^W^O^R^K ^S^U^S^P^E^N^D^S ^T^H^E
      ^F^U^L^L-ASCII ^M^O^D^E ^U^N^T^I^L ^T^H^E ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HC*I"HC - H^O^S^T C^O^N^N^E^C^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T HC=^H^O^S^T^N^A^M^E

      T^H^E HC ^C^O^M^M^A^N^D ^D^I^S^C^O^N^N^E^C^T^S ^Y^O^U ^F^R^O^M ^Y^O^U^R ^C^U^R^R^E^N^T ^H^O^S^T ^A^N^D
      ^E^S^T^A^B^L^I^S^H^E^S ^A ^N^E^W ^H^O^S^T ^C^O^N^N^E^C^T^I^O^N.  T^H^E ^N^E^W ^H^O^S^T ^C^O^N^N^E^C^T^I^O^N ^C^A^N
      ^B^E ^S^E^L^E^C^T^E^D ^B^Y ^A^N HN ^C^O^M^M^A^N^D ^O^R ^B^Y ^T^H^E HC ^C^O^M^M^A^N^D (HC=^H^O^S^T^N^A^M^E).
      T^H^E HC ^C^O^M^M^A^N^D ^I^S ^E^Q^U^I^V^A^L^E^N^T ^T^O HS ^O^R HN ^F^O^L^L^O^W^E^D ^B^Y TM.


      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^H^O^S^T^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^H^O^S^T ^T^O ^W^H^I^C^H ^Y^O^U
      ^W^A^N^T ^Y^O^U^R ^T^E^R^M^I^N^A^L ^C^O^N^N^E^C^T^E^D.

      T^H^E ^H^O^S^T ^S^E^L^E^C^T^E^D ^I^S ^U^S^E^D ^U^N^T^I^L ^Y^O^U ^C^H^A^N^G^E ^I^T ^O^R ^U^N^T^I^L ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^I^S ^D^I^S^C^O^N^N^E^C^T^E^D ^F^R^O^M ^T^H^E ^H^O^S^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HD*I"HD - D^I^S^P^L^A^Y O^F H^O^S^T N^O^D^E^S".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T HD

      T^H^E HD ^C^O^M^M^A^N^D ^C^A^U^S^E^S ^T^H^E ^H^O^S^T ^A^V^A^I^L^A^B^I^L^I^T^Y ^D^I^S^P^L^A^Y (HAD)
      ^T^O ^B^E ^D^I^S^P^L^A^Y^E^D ^A^T ^Y^O^U^R ^T^E^R^M^I^N^A^L.  T^H^E HAD ^L^I^S^T^S ^A^L^L ^P^A^T^H^S ^Y^O^U
      ^C^A^N ^S^E^L^E^C^T ^T^O ^C^O^N^N^E^C^T ^Y^O^U^R ^T^E^R^M^I^N^A^L ^T^O ^A ^H^O^S^T

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^T^E^R^M^I^N^A^L
      ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E HAD ^H^A^S ^T^H^E ^F^O^L^L^O^W^I^N^G ^F^O^R^M^A^T@D

         ^M^E^S^S^A^G^E                 CONTROL CHARACTER=^C^T
         NPU NODE=^N^P^U TERMINAL NAME=^T^E^R^M^I^N^A^L

         HOST            NODE            SELECTED/            STATUS
         ----            ----            CONNECTED            ------
                                         ---------
         ^H^O^S^T1           ^N^O^D^E1           ^C^O^N^D^I^T^I^O^N1           ^S^T^A^T^U^S1
         ^H^O^S^T2           ^N^O^D^E2           ^C^O^N^D^I^T^I^O^N2           ^S^T^A^T^U^S2
           .               .                 .                   .
           .               .                 .                   .
           .               .                 .                   .
         ^H^O^S^T ^N          ^N^O^D^E ^N          ^C^O^N^D^I^T^I^O^N ^N           ^S^T^A^T^U^S ^N

         ^P^R^O^M^P^T ^R^E^S^P^O^N^S^E

      T^H^E ^V^A^R^I^A^B^L^E ^I^T^E^M^S ^I^N ^T^H^E ^D^I^S^P^L^A^Y ^H^A^V^E ^T^H^E ^F^O^L^L^O^W^I^N^G ^D^E^S^C^R^I^P^T^I^O^N^S@D

      I^T^E^M                                D^E^S^C^R^I^P^T^I^O^N
      ----                                -----------
      ^M^E^S^S^A^G^E        A ^M^E^S^S^A^G^E ^D^E^S^C^R^I^B^I^N^G ^T^H^E ^S^T^A^T^U^S ^O^F ^Y^O^U^R ^C^U^R^R^E^N^T ^H^O^S^T
                     ^C^O^N^N^E^C^T^I^O^N.
      ^C^T             N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^C^U^R^R^E^N^T^L^Y ^D^E^F^I^N^E^D ^F^O^R ^Y^O^U^R
                     ^T^E^R^M^I^N^A^L.
      ^N^P^U            T^H^E ^N^O^D^E ^N^U^M^B^E^R ^O^F ^T^H^E N^E^T^W^O^R^K P^R^O^C^E^S^S^I^N^G U^N^I^T (NPU) ^Y^O^U^R
                     ^T^E^R^M^I^N^A^L ^I^S ^C^O^N^N^E^C^T^E^D ^T^O.
      ^T^E^R^M^I^N^A^L       T^H^E ^N^A^M^E ^O^F ^Y^O^U^R ^T^E^R^M^I^N^A^L.
      ^H^O^S^T ^I         R^E^P^R^E^S^E^N^T^S ^T^H^E 1- ^T^O 7-^C^H^A^R^A^C^T^E^R ^N^A^M^E ^O^F ^A ^H^O^S^T.  T^H^E ^F^I^E^L^D
                     ^M^A^Y ^B^E ^B^L^A^N^K.
      ^N^O^D^E ^I         R^E^P^R^E^S^E^N^T^S ^A ^N^O^D^E ^N^U^M^B^E^R (1-31).
      ^C^O^N^D^I^T^I^O^N ^I    I^N^D^I^C^A^T^E^S ^T^H^A^T ^Y^O^U ^H^A^V^E ^S^E^L^E^C^T^E^D ^N^O^D^E ^I (S), ^T^H^A^T ^Y^O^U ^A^R^E
                     ^C^O^N^N^E^C^T^E^D ^T^O ^T^H^E ^H^O^S^T ^U^S^I^N^G ^N^O^D^E ^I (C), ^O^R ^T^H^A^T ^N^O^D^E ^I
                     ^H^A^S ^B^E^E^N ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^S^E^L^E^C^T^E^D ^A^N^D ^T^H^E ^C^O^N^N^E^C^T^I^O^N ^T^O ^T^H^E
                     ^H^O^S^T ^I^S ^I^N ^P^R^O^G^R^E^S^S (SA).
      ^S^T^A^T^U^S ^I       R^E^P^R^E^S^E^N^T^S AVAILABLE ^O^R NOT AVAILABLE.

      ^P^R^O^M^P^T ^M^E^S^S^A^G^E A^C^T^I^O^N ^T^O ^T^A^K^E ^I^N ^R^E^S^P^O^N^S^E ^T^O ^A ^H^O^S^T ^S^T^A^T^U^S ^M^E^S^S^A^G^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HN*I"HN - H^O^S^T N^O^D^E S^E^L^E^C^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T HN=^N^O^D^E

      T^H^E HN ^C^O^M^M^A^N^D ^S^E^T^S ^O^R ^C^H^A^N^G^E^S ^T^H^E ^H^O^S^T ^O^R ^T^H^E ^P^A^T^H (^N^O^D^E) ^T^O ^A
      ^H^O^S^T ^T^H^R^O^U^G^H ^W^H^I^C^H ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^S ^C^O^N^N^E^C^T^E^D.  T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S
      ^N^O^T ^D^I^S^C^O^N^N^E^C^T ^Y^O^U ^F^R^O^M ^Y^O^U^R ^C^U^R^R^E^N^T ^H^O^S^T ^C^O^N^N^E^C^T^I^O^N.  Y^O^U ^M^U^S^T
      ^L^O^G ^O^U^T ^O^R ^D^I^S^C^O^N^N^E^C^T ^W^I^T^H ^T^H^E S^E^C^U^R^E L^O^G^I^N ^C^O^M^M^A^N^D ^O^R TM
      ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D ^B^E^F^O^R^E ^Y^O^U ^C^A^N ^C^O^N^N^E^C^T ^T^O ^T^H^E ^N^E^W
      ^S^E^L^E^C^T^I^O^N.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^N^O^D^E ^S^P^E^C^I^F^I^E^S ^A ^N^O^D^E ^N^U^M^B^E^R.  T^H^E ^D^E^F^A^U^L^T ^I^S ^T^H^E ^N^O^D^E ^T^H^E
      ^N^E^T^W^O^R^K ^P^R^O^C^E^S^S^I^N^G ^U^N^I^T ^I^S ^U^S^I^N^G ^T^O ^A^C^C^E^S^S ^I^T^S ^S^U^P^E^R^V^I^S^O^R (CS).

      T^H^E ^H^O^S^T ^A^V^A^I^L^A^B^I^L^I^T^Y ^D^I^S^P^L^A^Y (HAD) ^L^I^S^T^S ^A^L^L ^N^O^D^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L
      ^C^A^N ^U^S^E.  R^E^F^E^R ^T^O ^T^H^E HD ^C^O^M^M^A^N^D ^F^O^R ^A ^D^E^S^C^R^I^P^T^I^O^N ^O^F ^T^H^E HAD.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,HS*I"HS - H^O^S^T S^E^L^E^C^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T HS=^H^O^S^T^N^A^M^E

      T^H^E HS ^C^O^M^M^A^N^D ^S^E^L^E^C^T^S ^A ^H^O^S^T ^W^H^I^C^H ^I^S ^C^O^N^N^E^C^T^E^D ^T^O ^Y^O^U^R ^T^E^R^M^I^N^A^L.
      T^H^E ^H^O^S^T ^A^V^A^I^L^A^B^I^L^I^T^Y ^D^I^S^P^L^A^Y (HAD) ^S^H^O^W^S ^T^H^E ^A^V^A^I^L^A^B^L^E ^H^O^S^T^S
      (^R^E^F^E^R ^T^O ^T^H^E HD ^C^O^M^M^A^N^D).

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^H^O^S^T^N^A^M^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^A^M^E ^O^F ^T^H^E ^H^O^S^T ^T^O ^W^H^I^C^H ^Y^O^U ^W^A^N^T
      ^Y^O^U^R ^T^E^R^M^I^N^A^L ^C^O^N^N^E^C^T^E^D.  T^H^E ^V^A^L^I^D ^E^N^T^R^I^E^S ^A^P^P^E^A^R ^I^N ^T^H^E HAD.

      Y^O^U^R ^T^E^R^M^I^N^A^L ^U^S^E^S ^T^H^E ^P^A^T^H ^T^O ^H^O^S^T ^W^I^T^H ^T^H^E ^L^E^A^S^T ^T^R^A^F^F^I^C.  T^H^E
      ^P^A^T^H ^S^E^L^E^C^T^E^D ^I^S ^U^S^E^D ^U^N^T^I^L ^E^I^T^H^E^R ^Y^O^U ^C^H^A^N^G^E ^I^T ^O^R ^U^N^T^I^L ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^I^S ^D^I^S^C^O^N^N^E^C^T^E^D ^F^R^O^M ^T^H^E ^H^O^S^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,IC*I"IC - F^L^O^W C^O^N^T^R^O^L F^O^R I^N^P^U^T D^E^V^I^C^E^S".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T IC=^O^P^T^I^O^N

      T^H^E IC ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^R^E^C^O^G^N^I^Z^E^S DC3^S
      ^A^S ^A ^S^T^O^P ^S^I^G^N^A^L ^A^N^D DC1^S ^A^S ^A ^R^E^S^U^M^E ^S^I^G^N^A^L ^F^O^R ^T^E^R^M^I^N^A^L ^I^N^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^I^N^P^U^T ^C^O^N^T^R^O^L.

      I^N^P^U^T ^C^O^N^T^R^O^L ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T 2741^S)
      ^I^N^C^L^U^D^I^N^G ^P^A^P^E^R ^T^A^P^E ^D^E^V^I^C^E^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,IN*I"IN - I^N^P^U^T D^E^V^I^C^E A^N^D T^R^A^N^S^M^I^S^S^I^O^N M^O^D^E".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T IN=^I^N

      T^H^E IN ^C^O^M^M^A^N^D ^I^D^E^N^T^I^F^I^E^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^H^E ^T^R^A^N^S^M^I^S^S^I^O^N
      ^M^O^D^E ^O^F ^T^H^E ^D^E^V^I^C^E.  A^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E, ^Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^A
      ^K^E^Y^B^O^A^R^D ^O^R ^A ^P^A^P^E^R ^T^A^P^E ^R^E^A^D^E^R.  A^S ^T^H^E ^I^N^P^U^T ^T^R^A^N^S^M^I^S^S^I^O^N ^M^O^D^E,
      ^Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^E^I^T^H^E^R ^N^O^R^M^A^L^I^Z^E^D ^L^I^N^E ^M^O^D^E, ^N^O^R^M^A^L^I^Z^E^D ^B^L^O^C^K
      ^M^O^D^E, ^O^R ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^I^N ^S^P^E^C^I^F^I^E^S ^T^H^E ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^R^A^N^S^M^I^S^S^I^O^N ^M^O^D^E.
      Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^I^N@D

      ^I^N                   D^E^S^C^R^I^P^T^I^O^N
      --                   -----------
      BK    S^E^L^E^C^T^S ^B^L^O^C^K ^N^O^D^E (^A^S ^F^R^O^M ^A ^F^O^R^M ^T^E^R^M^I^N^A^L) ^A^N^D
            ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      KB    S^E^L^E^C^T^S ^A ^K^E^Y^B^O^A^R^D ^I^N ^C^H^A^R^A^C^T^E^R ^O^R ^L^I^N^E ^M^O^D^E ^A^N^D
            ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      PT    S^E^L^E^C^T^S ^P^A^P^E^R ^T^A^P^E ^A^N^D ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      X     S^E^L^E^C^T^S ^T^H^E ^C^U^R^R^E^N^T ^I^N^P^U^T ^D^E^V^I^C^E ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T
            ^I^N^P^U^T ^M^O^D^E.

      XK    S^E^L^E^C^T^S ^T^H^E ^K^E^Y^B^O^A^R^D ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.

      XP    S^E^L^E^C^T^S ^P^A^P^E^R ^T^A^P^E ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.

      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XK, XP, ^O^R X, ^T^E^R^M^I^N^A^L ^I^N^P^U^T ^I^S ^S^E^N^T ^T^O ^T^H^E
      ^H^O^S^T ^I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^B^L^O^C^K^S.  T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^C^O^N^T^I^N^U^E^S ^U^N^T^I^L
      ^T^H^E ^S^Y^S^T^E^M ^E^N^C^O^U^N^T^E^R^S ^A ^P^R^E^V^I^O^U^S^L^Y ^D^E^F^I^N^E^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O


      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XK ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O KB,  W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S XP ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T
      ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O PT.  W^H^E^N
      ^T^H^E IN ^V^A^L^U^E ^I^S X ^A^N^D ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^E^S, ^T^H^E IN ^V^A^L^U^E
      ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^V^E^R^T^S ^T^O ^T^H^E ^V^A^L^U^E ^T^H^A^T ^W^A^S ^P^R^E^V^I^O^U^S^L^Y ^I^N ^E^F^F^E^C^T.

      W^H^E^N ^T^H^E IN ^V^A^L^U^E ^I^S PT ^O^R XP, ^T^H^E ^N^E^T^W^O^R^K ^S^E^N^D^S ^T^H^E X-ON ^C^O^D^E
      ^T^O ^S^T^A^R^T ^T^H^E ^P^A^P^E^R ^T^A^P^E ^R^E^A^D^E^R ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^A^F^T^E^R ^T^H^E ^E^N^D
      ^O^F ^A ^M^E^S^S^A^G^E ^I^S ^O^U^T^P^U^T ^T^O ^T^H^E ^T^E^R^M^I^N^A^L ^A^N^D ^T^H^E ^M^E^S^S^A^G^E ^E^M^P^T^I^E^S
      ^T^H^E ^T^E^R^M^I^N^A^L'^S ^O^U^T^P^U^T ^Q^U^E^U^E.

      T^H^E IN ^C^O^M^M^A^N^D ^I^S ^N^O^T ^A^P^P^L^I^C^A^B^L^E ^T^O HASP, 3270 ^O^R ^B^I^S^Y^N^C^H^R^O^N^O^U^S
      2780 ^A^N^D 3780 ^T^E^R^M^I^N^A^L^S.  2741 ^T^E^R^M^I^N^A^L^S ^C^A^N ^O^N^L^Y ^S^E^L^E^C^T IN=KB, IN=X,
      ^A^N^D IN=XK.  M^O^D^E 4 ^T^E^R^M^I^N^A^L^S, ^W^H^I^C^H ^A^R^E ^A^L^W^A^Y^S ^I^N ^B^L^O^C^K ^M^O^D^E, ^A^N^D
      X.25 PSN ^T^E^R^M^I^N^A^L^S ^C^A^N^N^O^T ^S^E^L^E^C^T PT ^O^R XP ^M^O^D^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LI*I"LI - L^I^N^E F^E^E^D I^D^L^E C^O^U^N^T".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT .
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T LI=^V^A^L^U^E

      T^H^E LI ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^U^M^B^E^R ^O^F ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^T^O ^B^E
      ^I^N^S^E^R^T^E^D ^I^N^T^O ^T^H^E ^O^U^T^P^U^T ^S^T^R^E^A^M ^F^O^L^L^O^W^I^N^G ^A ^L^I^N^E ^F^E^E^D.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^S^P^E^C^I^F^I^E^S ^T^H^E ^N^E^W ^L^I^N^E ^F^E^E^D ^I^D^L^E ^C^O^U^N^T.  T^H^I^S ^V^A^L^U^E ^C^A^N
      ^B^E ^F^R^O^M 0 ^T^O 127 ^O^R ^T^H^E ^S^T^R^I^N^G CA.  A ^V^A^L^U^E ^O^F CA ^R^E^S^T^O^R^E^S ^T^H^E ^L^I^N^E
      ^F^E^E^D ^I^D^L^E ^C^O^U^N^T ^T^O ^T^H^E ^D^E^F^A^U^L^T ^V^A^L^U^E.

      T^H^E ^L^I^N^E ^F^E^E^D ^I^D^L^E ^C^O^U^N^T ^I^S ^S^I^M^I^L^A^R ^T^O ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N ^I^D^L^E
      ^C^O^U^N^T (CI), ^E^X^C^E^P^T ^T^H^A^T ^T^H^E ^I^D^L^E ^C^H^A^R^A^C^T^E^R^S ^A^R^E ^O^U^T^P^U^T ^A^F^T^E^R ^A
      ^L^I^N^E ^F^E^E^D ^I^N^S^T^E^A^D ^O^F ^A^F^T^E^R ^T^H^E ^C^A^R^R^I^A^G^E ^R^E^T^U^R^N.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,LK*I"LK - L^O^C^K^O^U^T O^F U^N^S^O^L^I^C^I^T^E^D M^E^S^S^A^G^E^S".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T LK=^O^P^T^I^O^N

      T^H^E LK ^C^O^M^M^A^N^D ^D^E^T^E^R^M^I^N^E^S ^W^H^E^T^H^E^R ^U^N^S^O^L^I^C^I^T^E^D ^M^E^S^S^A^G^E^S ^F^R^O^M ^T^H^E
      ^N^E^T^W^O^R^K ^O^P^E^R^A^T^O^R ^A^P^P^E^A^R ^A^T ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^L^O^C^K ^O^U^T ^U^N^S^O^L^I^C^I^T^E^D ^M^E^S^S^A^G^E^S.
      A ^V^A^L^U^E ^O^F Y ^L^O^C^K^S ^O^U^T ^T^H^E ^M^E^S^S^A^G^E^S ^A^N^D ^A ^V^A^L^U^E N ^A^L^L^O^W^S ^T^H^E
      ^M^E^S^S^A^G^E^S ^T^O ^A^P^P^E^A^R.

.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,MS*I"MS - M^E^S^S^A^G^E T^O N^E^T^W^O^R^K O^P^E^R^A^T^O^R".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T MS=^M^E^S^S^A^G^E

      T^H^E MS ^C^O^M^M^A^N^D ^S^E^N^D^S ^A ^M^E^S^S^A^G^E ^T^O ^T^H^E ^N^E^T^W^O^R^K ^O^P^E^R^A^T^O^R.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^M^E^S^S^A^G^E ^S^P^E^C^I^F^I^E^S ^Y^O^U^R ^M^E^S^S^A^G^E ^T^O ^T^H^E ^O^P^E^R^A^T^O^R.
      Y^O^U ^C^A^N ^U^S^E ^A^N^Y ^S^T^R^I^N^G ^O^F 50 ^C^H^A^R^A^C^T^E^R^S ^O^R ^L^E^S^S.

      I^F ^Y^O^U ^A^R^E ^H^A^V^I^N^G ^P^R^O^B^L^E^M^S ^W^I^T^H ^T^H^E ^N^E^T^W^O^R^K (^S^U^C^H ^A^S ^D^I^F^F^I^C^U^L^T^Y
      ^C^O^N^N^E^C^T^I^N^G ^T^O IAF), ^Y^O^U ^C^A^N ^C^O^M^M^U^N^I^C^A^T^E ^T^H^E^S^E ^P^R^O^B^L^E^M^S ^T^O ^T^H^E
      ^N^E^T^W^O^R^K ^O^P^E^R^A^T^O^R ^U^S^I^N^G ^T^H^E MS ^C^O^M^M^A^N^D.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,OC*I"OC - F^L^O^W C^O^N^T^R^O^L F^O^R O^U^T^P^U^T D^E^V^I^C^E^S".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T OC=^O^P^T^I^O^N

      T^H^E OC ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^H^E ^T^E^R^M^I^N^A^L ^G^E^N^E^R^A^T^E^S DC3^S ^A^S ^A
      ^S^T^O^P ^S^I^G^N^A^L ^T^O ^T^H^E ^N^E^T^W^O^R^K ^A^N^D DC1^S ^A^S ^A ^R^E^S^U^M^E ^S^I^G^N^A^L ^F^O^R
      ^T^E^R^M^I^N^A^L ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^C^O^M^M^A^N^D ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R
      ^Y^O^U^R ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^O^U^T^P^U^T ^C^O^N^T^R^O^L.

      I^F ^T^H^E ^N^E^T^W^O^R^K ^R^E^C^E^I^V^E^S ^A DC3 ^W^H^I^L^E ^O^U^T^P^U^T ^C^O^N^T^R^O^L ^I^S ^E^N^A^B^L^E^D,
      ^I^T ^S^U^S^P^E^N^D^S ^O^U^T^P^U^T ^U^N^T^I^L ^I^T ^R^E^C^E^I^V^E^S ^A DC1.

      O^U^T^P^U^T ^C^O^N^T^R^O^L ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S, ^I^N^C^L^U^D^I^N^G ^P^A^P^E^R
      ^T^A^P^E ^D^E^V^I^C^E^S (^E^X^C^E^P^T 2741^S).
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,OP*I"OP - O^U^T^P^U^T D^E^V^I^C^E S^E^L^E^C^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T OP=^O^P

      T^H^E OP ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^O^U^T^P^U^T ^D^E^V^I^C^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P ^S^P^E^C^I^F^I^E^S ^T^H^E ^O^U^T^P^U^T ^D^E^V^I^C^E.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^O^P@D

      ^O^P           D^E^S^C^R^I^P^T^I^O^N
      --           -----------
      DI    S^P^E^C^I^F^I^E^S ^A ^D^I^S^P^L^A^Y ^D^E^V^I^C^E.

      PR    S^P^E^C^I^F^I^E^S ^A ^P^R^I^N^T^E^R.

      PT    S^P^E^C^I^F^I^E^S ^A ^P^A^P^E^R ^T^A^P^E ^P^U^N^C^H.

      Y^O^U ^C^A^N ^P^U^N^C^H ^A ^T^A^P^E ^I^N ^A^N^Y ^M^O^D^E ^B^U^T ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^N^O^T ^P^R^O^V^I^D^E
      ^T^H^E ^P^R^O^P^E^R X-OFF ^C^H^A^R^A^C^T^E^R^S ^U^N^L^E^S^S OP ^H^A^S ^A ^V^A^L^U^E ^O^F PT.

      I^F ^Y^O^U ^S^E^L^E^C^T OP=PR, ^T^H^E ^N^E^T^W^O^R^K ^D^O^E^S ^L^I^N^E ^F^O^L^D^I^N^G ^A^N^D ^P^A^G^E
      ^B^O^U^N^D^I^N^G ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D X.25 PSN ^T^E^R^M^I^N^A^L^S.  I^F
      OP=DI, ^T^H^E ^N^E^T^W^O^R^K ^A^S^S^U^M^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^P^E^R^F^O^R^M^S ^T^H^E^S^E
      ^F^U^N^C^T^I^O^N^S ^I^T^S^E^L^F.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T
      2741^S).  OP=PT ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O X.25 PSN ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PA*I"PA - P^A^R^I^T^Y P^R^O^C^E^S^S^I^N^G".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T PA=^P^A

      T^H^E PA ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^R^I^T^Y ^P^R^O^C^E^S^S^I^N^G ^T^O ^B^E ^P^E^R^F^O^R^M^E^D ^B^Y
      ^T^H^E ^N^E^T^W^O^R^K.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^P^A ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^Y^P^E ^O^F ^P^A^R^I^T^Y ^P^R^O^C^E^S^S^I^N^G.  Y^O^U
      ^C^A^N ^S^P^E^C^I^F^Y ^T^H^E ^F^O^L^L^O^W^I^N^G ^V^A^L^U^E^S ^F^O^R ^P^A@D

      ^P^A                       D^E^S^C^R^I^P^T^I^O^N
      --                       -----------
      E     S^E^T ^P^A^R^I^T^Y ^B^I^T ^F^O^R ^E^V^E^N ^P^A^R^I^T^Y ^D^U^R^I^N^G ^O^U^T^P^U^T, ^A^N^D
            ^C^H^E^C^K ^F^O^R ^E^V^E^N ^P^A^R^I^T^Y (^E^X^C^E^P^T ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S)
            ^A^N^D ^S^E^T ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T.

      N     I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E, ^D^O ^N^O^T ^S^E^T ^O^R ^C^H^E^C^K ^T^H^E ^P^A^R^I^T^Y
            ^B^I^T ^B^E^C^A^U^S^E ^I^T ^I^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^D^A^T^A.
            I^N ^N^O^R^M^A^L^I^Z^E^D ^M^O^D^E, ^S^E^T ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N
            ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T.

      O     S^E^T ^P^A^R^I^T^Y ^B^I^T ^F^O^R ^O^D^D ^P^A^R^I^T^Y ^D^U^R^I^N^G ^O^U^T^P^U^T, ^A^N^D ^C^H^E^C^K
            ^F^O^R ^O^D^D ^P^A^R^I^T^Y (^E^X^C^E^P^T ^F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S) ^A^N^D ^S^E^T
            ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T.

      Z     S^E^T ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^O^U^T^P^U^T ^A^N^D ^C^H^E^C^K ^P^A^R^I^T^Y ^B^I^T
            ^A^G^A^I^N^S^T ^Z^E^R^O ^O^N ^I^N^P^U^T.

      I     I^N ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E, ^D^O ^N^O^T ^S^E^T ^O^R ^C^H^E^C^K ^T^H^E ^P^A^R^I^T^Y
            ^B^I^T ^B^E^C^A^U^S^E ^I^T ^I^S ^P^A^R^T ^O^F ^T^H^E ^I^N^P^U^T ^O^R ^O^U^T^P^U^T ^D^A^T^A.
            I^G^N^O^R^E ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^W^H^E^N ^C^H^E^C^K^I^N^G ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
            ^I^N^P^U^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R^S.  I^N ^N^O^R^M^A^L^I^Z^E^D ^M^O^D^E, ^S^E^T ^T^H^E
            ^P^A^R^I^T^Y ^B^I^T ^T^O ^Z^E^R^O ^O^N ^I^N^P^U^T ^A^N^D ^O^U^T^P^U^T.

      T^H^I^S ^C^O^M^M^A^N^D ^O^N^L^Y ^A^P^P^L^I^E^S ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S (^E^X^C^E^P^T
      2741^S).  F^O^R X.25 PSN ^T^E^R^M^I^N^A^L^S, ^T^H^E ^P^A^R^I^T^Y ^B^I^T ^I^S ^S^E^T ^T^O O ^A^N^D
      ^N^O^T ^C^H^E^C^K^E^D ^F^O^R ^I^N^P^U^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PG*I"PG -P^A^G^E W^A^I^T^I^N^G".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T PG=^O^P^T^I^O^N

      T^H^E PG ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^P^A^G^E ^W^A^I^T^I^N^G ^A^T ^T^H^E ^T^E^R^M^I^N^A^L
      ^D^U^R^I^N^G ^O^U^T^P^U^T.  I^F ^Y^O^U ^E^N^A^B^L^E ^P^A^G^E ^W^A^I^T^I^N^G, ^T^H^E ^T^E^R^M^I^N^A^L ^S^T^O^P^S
      ^A^T ^T^H^E ^E^N^D ^O^F ^E^A^C^H ^O^U^T^P^U^T ^P^A^G^E ^F^O^R ^Y^O^U^R ^A^C^K^N^O^W^L^E^D^G^E^M^E^N^T (^A ^N^U^L^L
      ^I^N^P^U^T ^L^I^N^E) ^B^E^F^O^R^E ^O^U^T^P^U^T ^C^O^N^T^I^N^U^E^S. (I^N ^O^R^D^E^R ^F^O^R ^T^H^E PG ^C^O^M^M^A^N^D
      ^E^F^F^E^C^T^I^V^E, ^P^A^G^E ^L^E^N^G^T^H (PL) ^M^U^S^T ^B^E ^N^O^N-^Z^E^R^O.)

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^S^P^E^C^I^F^I^E^S ^W^H^E^T^H^E^R ^T^O ^E^N^A^B^L^E (Y) ^O^R ^D^I^S^A^B^L^E (N)
      ^P^A^G^E ^W^A^I^T^I^N^G.

      W^H^E^N ^Y^O^U ^E^N^T^E^R ^A ^N^U^L^L ^I^N^P^U^T ^L^I^N^E ^T^O ^G^E^T ^T^H^E ^N^E^X^T ^P^A^G^E ^O^F
      ^O^U^T^P^U^T, ^T^H^E ^N^U^L^L ^I^N^P^U^T ^L^I^N^E ^H^A^S ^N^O ^O^T^H^E^R ^M^E^A^N^I^N^G.

      P^A^G^E ^W^A^I^T^I^N^G ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O ^B^I^S^Y^N^C^H^R^O^N^O^U^S 2780 ^O^R 3780
      ^T^E^R^M^I^N^A^L^S ^O^R ^T^O HASP ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PL*I"PL - P^A^G^E L^E^N^G^T^H".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T PL=^P^L

      T^H^E PL ^C^O^M^M^A^N^D ^E^S^T^A^B^L^I^S^H^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^P^H^Y^S^I^C^A^L ^L^I^N^E^S
      ^T^H^A^T ^C^A^N ^B^E ^P^R^I^N^T^E^D ^A^S ^O^N^E ^P^A^G^E.  I^F ^T^H^E ^O^U^T^P^U^T ^D^E^V^I^C^E ^T^Y^P^E ^I^S
      PR (^S^E^E OP ^C^O^M^M^A^N^D), ^T^H^E ^N^E^T^W^O^R^K ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^P^O^S^I^T^I^O^N^S ^T^H^E
      ^C^A^R^R^I^A^G^E ^T^O ^T^H^E ^T^O^P ^O^F ^T^H^E ^F^O^R^M ^A^F^T^E^R ^P^L ^L^I^N^E^S ^H^A^V^E ^B^E^E^N
      ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^P^L ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^L^E^N^G^T^H.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y 0 ^O^R
      ^A^N^Y ^V^A^L^U^E ^F^R^O^M 8 ^T^O 255.  PL=0 ^S^E^L^E^C^T^S ^A^N ^I^N^F^I^N^I^T^E^L^Y ^L^O^N^G ^P^A^G^E.

      T^H^E PL ^V^A^L^U^E ^M^U^S^T ^B^E ^N^O^N-^Z^E^R^O ^I^F ^Y^O^U ^W^A^N^T ^T^O ^E^N^A^B^L^E ^P^A^G^E ^W^A^I^T^I^N^G
      ^S^I^N^C^E ^P^A^G^E ^W^A^I^T^I^N^G ^O^N^L^Y ^O^C^C^U^R^S ^A^F^T^E^R ^T^H^E ^N^U^M^B^E^R ^O^F ^L^I^N^E ^D^E^F^I^N^E^D ^B^Y
      ^P^L-1 ^A^R^E ^O^U^T^P^U^T.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,PW*I"PW - P^A^G^E W^I^D^T^H".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T PW=^P^W

      T^H^E PW ^C^O^M^M^A^N^D ^E^S^T^A^B^L^I^S^H^E^S ^T^H^E ^M^A^X^I^M^U^M ^N^U^M^B^E^R ^O^F ^C^H^A^R^A^C^T^E^R^S
      ^T^H^A^T ^T^H^E ^T^E^R^M^I^N^A^L ^P^R^I^N^T^S ^O^N ^O^N^E ^O^U^T^P^U^T ^L^I^N^E.  I^F ^T^H^E ^O^U^T^P^U^T
      ^D^E^V^I^C^E ^T^Y^P^E ^I^S PR (^S^E^E OP ^C^O^M^M^A^N^D), ^T^H^E ^S^Y^S^T^E^M ^A^U^T^O^M^A^T^I^C^A^L^L^Y
      ^S^T^A^R^T^S ^A ^N^E^W ^L^I^N^E ^A^F^T^E^R ^P^W ^C^H^A^R^A^C^T^E^R^S ^H^A^V^E ^B^E^E^N ^O^U^T^P^U^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^P^W ^S^P^E^C^I^F^I^E^S ^T^H^E ^P^A^G^E ^W^I^D^T^H.  Y^O^U ^C^A^N ^S^P^E^C^I^F^Y ^A ^V^A^L^U^E ^O^F 0
      ^O^R ^A^N^Y ^V^A^L^U^E ^F^R^O^M 20 ^T^O 255.  PW=0 ^S^E^L^E^C^T^S ^A^N ^I^N^F^I^N^I^T^E^L^Y ^L^O^N^G ^L^I^N^E.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,RC*I"RC - R^E^S^E^T T^E^R^M^I^N^A^L C^H^A^R^A^C^T^E^R^I^S^T^I^C^S".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D ^C^T RC

      T^H^E RC ^C^O^M^M^A^N^D ^R^E^S^E^T^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^T^O ^T^H^E NDL-^S^P^E^C^I^F^I^E^D ^D^E^F^A^U^L^T
      ^V^A^L^U^E^S.  N^O^R^M^A^L^L^Y ^Y^O^U ^W^O^U^L^D ^U^S^E ^T^H^I^S ^C^O^M^M^A^N^D ^A^F^T^E^R ^D^I^S^C^O^N^N^E^C^T^I^N^G
      ^F^R^O^M ^A ^H^O^S^T ^C^O^N^N^E^C^T^I^O^N ^F^O^R ^W^H^I^C^H ^Y^O^U ^H^A^D ^A^L^T^E^R^E^D ^O^N^E ^O^R ^M^O^R^E
      ^T^E^R^M^I^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      N^O^T^E ^T^H^A^T ^A ^T^E^R^M^I^N^A^L ^C^A^N ^A^L^S^O ^B^E ^A^U^T^O^M^A^T^I^C^A^L^L^Y ^R^E^C^O^N^F^I^G^U^R^E^D ^E^A^C^H
      ^T^I^M^E ^T^H^E ^T^E^R^M^I^N^A^L ^I^S ^D^I^S^C^O^N^N^E^C^T^E^D ^F^R^O^M ^A ^H^O^S^T ^I^F ^T^H^E ^T^E^R^M^I^N^A^L
      ^I^S ^O^N ^A ^L^I^N^E ^F^O^R ^W^H^I^C^H ^A^U^T^O^M^A^T^I^C ^R^E^C^O^N^F^I^G^U^R^A^T^I^O^N ^H^A^S ^B^E^E^N
      ^S^P^E^C^I^F^I^E^D ^B^Y ^T^H^E ^N^E^T^W^O^R^K ^A^D^M^I^N^I^S^T^R^A^T^O^R.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,SE*I"SE - S^P^E^C^I^A^L E^D^I^T^I^N^G M^O^D^E".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T SE=^O^P^T^I^O^N

      T^H^E SE ^C^O^M^M^A^N^D ^E^N^A^B^L^E^S ^O^R ^D^I^S^A^B^L^E^S ^T^H^E ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^V^A^R^I^A^N^T ^O^F
      ^N^O^R^M^A^L^I^Z^E^D ^I^N^P^U^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^O^P^T^I^O^N ^E^N^A^B^L^E^S (Y) ^O^R ^D^I^S^A^B^L^E^S (N) ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^O^P^E^R^A^T^I^O^N^S.

      W^H^E^N ^S^P^E^C^I^A^L ^E^D^I^T^I^N^G ^I^S ^I^N ^E^F^F^E^C^T, ^A^N^Y ^B^A^C^K^S^P^A^C^E ^C^H^A^R^A^C^T^E^R
      ^E^N^T^E^R^E^D ^I^S ^S^T^O^R^E^D ^F^O^R ^T^R^A^N^S^M^I^S^S^I^O^N ^T^O ^T^H^E ^H^O^S^T.  S^I^M^I^L^A^R^L^Y, ^A ^L^I^N^E
      ^F^E^E^D ^E^N^T^R^Y ^P^R^O^D^U^C^E^S ^A ^N^O^R^M^A^L ^L^I^N^E ^F^E^E^D ^O^P^E^R^A^T^I^O^N ^A^T ^T^H^E ^T^E^R^M^I^N^A^L
      ^A^N^D ^T^H^E ^N^E^T^W^O^R^K ^S^T^O^R^E^S ^T^H^E ^L^I^N^E ^F^E^E^D ^C^H^A^R^A^C^T^E^R ^C^O^D^E ^F^O^R
      ^T^R^A^N^S^M^I^S^S^I^O^N ^T^O ^T^H^E ^H^O^S^T.  A ^B^A^C^K^S^P^A^C^E ^F^O^L^L^O^W^E^D ^B^Y ^A ^L^I^N^E ^F^E^E^D
      ^C^A^U^S^E^S ^T^H^E ^S^Y^S^T^E^M ^T^O ^O^U^T^P^U^T ^A ^B^E^L^L ^A^N^D ^P^O^S^I^T^I^O^N ^T^H^E ^C^U^R^S^O^R ^B^E^L^O^W
      ^B^E^L^O^W ^T^H^E ^L^A^S^T ^C^H^A^R^A^C^T^E^R ^E^N^T^E^R^E^D.

      T^H^I^S ^C^O^M^M^A^N^D ^I^S ^O^N^L^Y ^V^A^L^I^D ^F^O^R ^A^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,TC*I"TC - T^E^R^M^I^N^A^L C^L^A^S^S C^O^M^M^A^N^D".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T TC=^T^C

      T^H^E TC ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^F^O^R ^Y^O^U^R ^T^E^R^M^I^N^A^L.  T^H^E
      ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^A^S^S^O^C^I^A^T^E^S ^Y^O^U^R ^T^E^R^M^I^N^A^L ^W^I^T^H ^A ^P^R^E^D^E^F^I^N^E^D ^S^E^T ^O^F
      ^T^E^R^M^I^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.  T^O ^E^F^F^E^C^T^I^V^E^L^Y ^U^S^E ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S,
      ^C^H^O^O^S^E ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^W^H^O^S^E ^D^E^F^A^U^L^T ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N
      ^C^O^R^R^E^S^P^O^N^D^S ^T^O ^T^H^E ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^Y^O^U^R ^T^E^R^M^I^N^A^L.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E ^T^C ^S^P^E^C^I^F^I^E^S ^T^H^E ^T^E^R^M^I^N^A^L ^C^L^A^S^S. T^H^E ^V^A^L^U^E ^T^C
      ^C^A^N ^B^E ^F^R^O^M 1 ^T^O 18.  T^H^E ^F^O^L^L^O^W^I^N^G ^L^I^S^T ^A^S^S^O^C^I^A^T^E^S ^T^E^R^M^I^N^A^L
      ^C^L^A^S^S ^V^A^L^U^E^S ^W^I^T^H ^T^E^R^M^I^N^A^L ^T^Y^P^E^S@D

         ^T^C    T^E^R^M^I^N^A^L ^T^Y^P^E
         --    -------------
         1     M33, M35, M37, M38 ^T^E^L^E^T^Y^P^E^S
         2     CDC 713-10, 722, 751-1, 752, 756
         3     CDC 721,722-30
         4     IBM 2741
         5     M40 ^T^E^L^E^T^Y^P^E^S
         6     H^A^Z^E^L^T^I^N^E 2000
         7     T^E^R^M^I^N^A^L^S ^C^O^N^F^O^R^M^I^N^G ^T^O ^T^H^E ANSI ^X3.64 ^S^T^A^N^D^A^R^D
               (DEC VT100, T^E^L^EV^I^D^E^O 924, 950, 955)
         8     T^E^K^T^R^O^N^I^X 4010, 4014
         9     HASP ^P^R^O^T^O^C^O^L, ^P^O^S^T^P^R^I^N^T ^F^O^R^M^A^T ^C^O^N^T^R^O^L
         10    200 U^S^E^R T^E^R^M^I^N^A^L
         11    CDC 714-30
         12    CDC 711-10
         13    CDC 714-10/20
         14    HASP ^P^R^O^T^O^C^O^L, ^P^R^E^P^R^I^N^T ^F^O^R^M^A^T ^C^O^N^T^R^O^L
         15    CDC 734, 731-12
         16    IBM 2780
         17    IBM 3780
         18    IBM 3270

      A ^T^E^R^M^I^N^A^L ^T^H^A^T ^I^S ^N^O^T ^S^H^O^W^N ^A^S ^B^E^L^O^N^G^I^N^G ^T^O ^A ^T^E^R^M^I^N^A^L ^C^L^A^S^S
      ^M^A^Y ^S^T^I^L^L ^B^E ^O^P^E^R^A^T^I^O^N^A^L.  T^H^E ^T^E^R^M^I^N^A^L ^C^A^N ^B^E ^A^S^S^I^G^N^E^D ^T^O ^A
      ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^H^A^V^I^N^G ^S^I^M^I^L^A^R ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^L'^S
      ^D^E^F^I^N^I^T^I^O^N ^C^A^N ^B^E ^M^O^D^I^F^I^E^D ^A^S ^N^E^C^E^S^S^A^R^Y ^T^O ^C^O^R^R^E^C^T^L^Y ^D^E^F^I^N^E ^T^H^E
      ^O^P^E^R^A^T^I^O^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S ^O^F ^T^H^E ^T^E^R^M^I^N^A^L.

      I^F ^Y^O^U^R ^T^E^R^M^I^N^A^L ^I^S ^O^N ^A^N^D ^A^U^T^O-^R^E^C^O^G^N^I^T^I^O^N ^L^I^N^E ^A^N^D ^I^T^S ^T^E^R^M^I^N^A^L
      ^C^L^A^S^S ^I^S ^O^T^H^E^R ^T^H^A^N 4, 10, 13 ^O^R 18, ^Y^O^U ^C^A^N ^U^S^E ^T^H^E  TC ^C^O^M^M^A^N^D
      ^T^O ^C^H^A^N^G^E ^I^T^S ^T^E^R^M^I^N^A^L ^C^L^A^S^S ^T^O ^E^N^S^U^R^E ^P^R^O^P^E^R ^O^P^E^R^A^T^I^O^N.

      I^F ^Y^O^U ^I^N^C^L^U^D^E ^A TC ^C^O^M^M^A^N^D ^I^N ^A ^S^E^Q^U^E^N^C^E ^O^F ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^I^O^N
      ^C^O^M^M^A^N^D^S, ^E^N^T^E^R ^T^H^E TC ^C^O^M^M^A^N^D ^F^I^R^S^T ^A^S ^I^T ^R^E^S^E^T^S ^A^L^L ^O^T^H^E^R
      ^T^E^R^M^I^N^A^L ^C^H^A^R^A^C^T^E^R^I^S^T^I^C^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,TM*I"TM - T^E^R^M^I^N^A^T^I^N^G A T^E^R^M^I^N^A^L-H^O^S^T C^O^N^N^E^C^T^I^O^N".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T TM

      T^H^E TM ^C^O^M^M^A^N^D ^T^E^R^M^I^N^A^T^E^S ^T^H^E ^C^O^N^N^E^C^T^I^O^N ^B^E^T^W^E^E^N ^Y^O^U^R ^T^E^R^M^I^N^A^L
      ^A^N^D ^A ^H^O^S^T.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^C^O^M^M^A^N^D.

      Y^O^U ^C^A^N ^U^S^E ^T^H^E TM ^C^O^M^M^A^N^D ^I^F ^Y^O^U^R ^A^P^P^L^I^C^A^T^I^O^N ^D^O^E^S ^N^O^T ^R^E^S^P^O^N^D
      ^T^O ^Y^O^U^R ^I^N^P^U^T.  T^H^E ^S^Y^S^T^E^M ^R^E^S^P^O^N^D^S ^T^O ^T^H^E TM ^C^O^M^M^A^N^D ^I^N ^T^H^E
      ^F^O^L^L^O^W^I^N^G ^M^A^N^N^E^R@D

      HOST DISCONNECTED  CONTROL CHARACTER=^C^T
      ENTER INPUT TO CONNECT TO HOST
.ENDHELP
$REVERT(NOLIST)
*WEOR
.PROC,XL*I"XL - M^U^L^T^I^M^E^S^S^A^G^E T^R^A^N^S^P^A^R^E^N^T M^O^D^E".
.PROMPT,N^O^T ^E^X^E^C^U^T^A^B^L^E ^F^R^O^M HELPME--P^R^E^S^S NEXT.
.HELP,,NOLIST

      F^O^R^M^A^T@D  ^C^T XL=X^X^X,C^C^O^U^N^T,TO,Y^Y^Y

      T^H^E ^N^E^T^W^O^R^K ^P^R^O^V^I^D^E^S ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^H^A^T ^A^L^L^O^W^S ^Y^O^U ^T^O ^R^E^M^A^I^N
      ^I^N ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^E^V^E^N ^A^F^T^E^R ^M^E^S^S^A^G^E ^B^L^O^C^K^S ^H^A^V^E ^B^E^E^N
      ^F^O^R^W^A^R^D^E^D ^T^O ^T^H^E ^A^P^P^L^I^C^A^T^I^O^N.  T^H^E XL ^C^O^M^M^A^N^D ^S^P^E^C^I^F^I^E^S ^T^H^E
      ^M^U^L^T^I^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^N^D ^T^H^E ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E.

      T^H^E ^V^A^L^U^E ^C^T ^R^E^P^R^E^S^E^N^T^S ^T^H^E ^N^E^T^W^O^R^K ^C^O^N^T^R^O^L ^C^H^A^R^A^C^T^E^R ^F^O^R ^Y^O^U^R
      ^T^E^R^M^I^N^A^L ^A^S ^D^E^F^I^N^E^D ^B^Y ^T^H^E CT ^T^E^R^M^I^N^A^L ^D^E^F^I^N^I^T^O^N ^C^O^M^M^A^N^D.

      T^H^E ^V^A^L^U^E X^X^X ^S^E^L^E^C^T^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^W^I^T^H ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^R^E^P^R^E^S^E^N^T^A^T^I^O^N ^X^X ^A^S ^T^H^E ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L.  I^F ^Y^O^U ^D^O
      ^N^O^T ^S^P^E^C^I^F^Y ^A ^V^A^L^U^E ^Y^Y, ^T^H^E ^O^C^C^U^R^R^E^N^C^E ^O^F ^T^W^O ^S^U^C^C^E^S^S^I^V^E
      ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^B^Y ^X^X ^A^C^T^S ^A^S ^A ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T
      ^I^N^P^U^T ^M^O^D^E.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A ^H^E^X^A^D^E^C^I^M^A^L ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T
      ^H^A^V^E ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S ^P^A^R^I^T^Y ^T^O ^N^O^N^E (PA=N) ^O^R
      ^I^G^N^O^R^E (PA=I); ^O^T^H^E^R^W^I^S^E ^T^H^E ^N^E^T^W^O^R^K ^C^A^N^N^O^T ^D^E^T^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N
      ^I^T ^O^C^C^U^R^S ^I^N ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^M^E^S^S^A^G^E.

      T^H^E ^V^A^L^U^E C^C^O^U^N^T ^S^E^L^E^C^T^S ^A ^D^E^C^I^M^A^L ^V^A^L^U^E ^F^R^O^M 1 ^T^O 4095 ^A^S ^A ^C^H^A^R^A^C^T^E^R
      ^C^O^U^N^T ^T^H^A^T ^F^U^N^C^T^I^O^N^S ^A^S ^A ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L. T^H^E^S^E ^V^A^L^U^E^S
      (1 ^T^O 4095) ^A^R^E ^V^A^L^I^D ^W^I^T^H ^T^H^E ^N^E^T^W^O^R^K.  H^O^W^E^V^E^R, ^U^N^L^E^S^S ^C^H^A^N^G^E^D ^D^U^R^I^N^G
      ^I^N^S^T^A^L^L^A^T^I^O^N, ^T^H^E ^M^A^X^I^M^U^M ^L^O^G^I^C^A^L ^I^N^P^U^T ^L^I^N^E ^L^E^N^G^T^H ^I^N IAF
      (2500 ^C^H^A^R^A^C^T^E^R^S) ^L^I^M^I^T^S ^Y^O^U.

      T^H^E ^V^A^L^U^E TO ^S^E^L^E^C^T^S ^T^I^M^E^O^U^T ^A^S ^A ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.

      T^H^E ^V^A^L^U^E Y^Y^Y ^S^E^L^E^C^T^S ^T^H^E ^C^H^A^R^A^C^T^E^R ^W^I^T^H ^T^H^E ^T^W^O-^D^I^G^I^T ^H^E^X^A^D^E^C^I^M^A^L
      ^R^E^P^R^E^S^E^N^T^A^T^I^O^N ^Y^Y ^A^S ^A ^T^E^R^M^I^N^A^T^O^R ^F^O^R ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E
      ^W^H^E^N ^I^T ^F^O^L^L^O^W^S ^X^X.  W^H^E^N ^Y^O^U ^S^P^E^C^I^F^Y ^A ^H^E^X^A^D^E^C^I^M^A^L
      ^C^O^D^E ^A^B^O^V^E 7F, ^Y^O^U ^M^U^S^T ^H^A^V^E ^P^R^E^V^I^O^U^S^L^Y ^S^E^T ^Y^O^U^R ^T^E^R^M^I^N^A^L'^S
      ^P^A^R^I^T^Y ^T^O ^N^O^N^E (PA=N) ^O^R ^I^G^N^O^R^E (PA=I); ^O^T^H^E^R^W^I^S^E ^T^H^E ^N^E^T^W^O^R^K
      ^C^A^N^N^O^T ^D^E^T^E^C^T ^T^H^E ^C^O^D^E ^W^H^E^N ^I^T ^O^C^C^U^R^S ^I^N ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^M^E^S^S^A^G^E.


      Y^Y^Y, ^I^F ^S^P^E^C^I^F^I^E^D, ^M^U^S^T ^F^O^L^L^O^W ^T^H^E X^X^X ^P^A^R^A^M^E^T^E^R; ^O^T^H^E^R^W^I^S^E,
      ^I^T ^I^S ^I^G^N^O^R^E^D.  T^H^E ^P^A^R^A^M^E^T^E^R^S ^A^R^E ^O^T^H^E^R^W^I^S^E ^O^R^D^E^R-^I^N^D^E^P^E^N^D^E^N^T.
      Y^O^U ^M^U^S^T ^S^P^E^C^I^F^Y ^A^T ^L^E^A^S^T ^O^N^E ^O^F X^X^X ^O^R TO ^T^O ^S^E^L^E^C^T ^A
      ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R.  W^H^E^N ^I^T ^I^M^M^E^D^I^A^T^E^L^Y ^F^O^L^L^O^W^S ^T^H^E
      ^C^H^A^R^A^C^T^E^R ^D^E^F^I^N^E^D ^B^Y X^X^X ^O^N ^I^N^P^U^T, ^T^H^E ^C^H^A^R^A^C^T^E^R ^D^E^F^I^N^E^D ^B^Y
      ^Y^Y ^T^E^R^M^I^N^A^T^E^S ^T^R^A^N^S^P^A^R^E^N^T ^I^N^P^U^T ^M^O^D^E.  T^H^E ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D
      ^B^Y X^X^X ^A^N^D Y^Y^Y ^C^A^N ^B^E ^I^D^E^N^T^I^C^A^L ^O^R ^Y^O^U ^C^A^N ^O^M^I^T Y^Y^Y.  I^N
      ^E^I^T^H^E^R ^C^A^S^E, ^T^W^O ^S^U^C^C^E^S^S^I^V^E ^I^N^P^U^T ^C^H^A^R^A^C^T^E^R^S ^D^E^F^I^N^E^D ^B^Y X^X^X
      ^A^R^E ^R^E^Q^U^I^R^E^D ^T^O ^T^E^R^M^I^N^A^T^E ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E.

      T^H^E ^M^E^S^S^A^G^E-^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L^S ^A^N^D ^M^O^D^E ^T^E^R^M^I^N^A^T^O^R^S ^A^R^E ^N^O^T
      ^S^E^N^T ^T^O ^T^H^E ^H^O^S^T.

      T^H^E XL ^C^O^M^M^A^N^D ^A^P^P^L^I^E^S ^O^N^L^Y ^T^O ^A^S^Y^N^C^H^R^O^N^O^U^S ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S.
      T^E^R^M^I^N^A^L ^C^L^A^S^S 4 ^I^S ^C^O^N^F^I^G^U^R^E^D ^W^I^T^H ^T^H^E RETURN ^K^E^Y ^A^S ^T^H^E ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T
      ^M^O^D^E ^D^E^L^I^M^I^T^E^R ^A^N^D ^T^E^R^M^I^N^A^T^O^R, ^A^N^D ^M^O^D^E 4 ^T^E^R^M^I^N^A^L^S ^A^R^E ^C^O^N^F^I^G^U^R^E^D
      ^W^I^T^H ^T^H^E SEND ^O^R ETX ^K^E^Y ^A^S ^T^H^E^I^R ^O^N^L^Y ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R
      ^A^N^D ^T^E^R^M^I^N^A^T^O^R.  F^O^R ^D^E^V^I^C^E^S ^C^O^N^N^E^C^T^E^D ^T^H^R^O^U^U^G^H X.25, ^T^H^E PAD
      ^F^O^R^W^A^R^D^I^N^G ^S^I^G^N^A^L ^A^L^W^A^Y^S ^A^C^T^S ^A^S ^A ^T^R^A^N^S^P^A^R^E^N^T ^M^O^D^E ^D^E^L^I^M^I^T^E^R
      ^I^N ^A^D^D^I^T^I^O^N ^T^O ^A^N^Y ^O^T^H^E^R ^O^P^T^I^O^N^S ^S^E^L^E^C^T^E^D.

      T^H^I^S ^C^O^M^M^A^N^D ^D^O^E^S ^N^O^T ^A^P^P^L^Y ^T^O HASP ^A^N^D ^B^I^S^Y^N^C^H^R^O^N^O^U^S ^T^E^R^M^I^N^A^L^S.
.ENDHELP
$REVERT(NOLIST)
*WEOR
cdc/nos2.source/opl871/helplib.txt ยท Last modified: 2023/08/05 17:24 by Site Administrator