NEW
  AUTO 3,1
*--------------------------------------
ALLOCATED.BUFFER.PAGE .BS 1
*--------------------------------
FNLEN          .BS 1
RECORD.LENGTH  .BS 2
PARM.LENM1     .BS 1
PARM.OFFSET    .BS 1
ACCUM          .BS 3
OVERFLOW       .BS 1
COMMAND.ADDR   .BS 2
BLOCKS         .BS 2
*--------------------------------
MONTH  .BS 1
DAY    .BS 1
YEAR   .BS 1
*--------------------------------
CAT.WIDTH         .BS 1
ENTRY.LENGTH      .BS 1
ENTRIES.PER.BLOCK .BS 1
FILE.COUNT        .BS 2
ENTRY.COUNTER     .BS 1
*--------------------------------
CAT.INDEX           .BS 1
*--------------------------------
FILE.REFNUMS        .BS 2
FILE.BUFFER.PNTRS   .BS 2
*--------------------------------
EXEC.REFNUM         .BS 1
EXEC.INPUT.CHAR     .BS 1
*--------------------------------
WRITE.REFNUM        .BS 1
WRITE.OUTPUT.CHAR   .BS 1
*--------------------------------
PATHNAME.ONE.BUFFER .BS 1
TXTBUF              .BS 65
*--------------------------------
*   OPEN FILE NAME BUFFERS
*      3 BUFFERS, 32 BYTES EACH
*      0 -- # BYTES IN FILE NAME (bits (6-0)
*           Bit 7 = DIR file READ flag
*      1 -- L value lsb
*      2 -- L value msb
*   3-31 -- file name, backwards
*--------------------------------
OPEN.FILE.NAME.BUFFERS
       .BS 32*3
*--------------------------------------
MAN
SAVE usr/src/scmasm.30/sci.s.vars
LOAD usr/src/scmasm.30/scmasm.s
ASM