94:SYSTEM;                                                                     .
   /*                                                               */         .
   /*    SYSTEM TO PRINT DEC SYSTEM 10 AND PDP-11 TAPES             */         .
   /*                                                               */         .
V1:      VFU      ASSIGN=(1,1);                                                .
         VFU      ASSIGN=(8,(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15));            .
         VFU      ASSIGN=(8,(16,17,18,19,20,21,22,23,24,25));                  .
         VFU      ASSIGN=(8,(26,27,28,29,30,31,32,33,34,35));                  .
         VFU      ASSIGN=(8,(36,37,38,39,40,41,42,43,44,45));                  .
         VFU      ASSIGN=(8,(46,47,48,49,50,51,52,53,54,55));                  .
         VFU      ASSIGN=(8,(56,57,58,59,60,61,62,63,64,65,66));               .
         VFU      TOF=1, BOF=66;                                               .
   /*                                                               */         .
   /*                M S G , N   X E R O X                          */         .
         IDEN     PREFIX = X'4D53472C4E205845524F58',
                  SKIP = 13,
                  OFFSET=1,
                  OPRINFO=YES;
   /*                                                               */         .
         VOLUME   HOST=DEC10, LABEL=STANDARD, CODE=ASCII, LCODE=ASCII,         .
                  UNPACK=T5X5D10, PLABEL=YES, TAPE=9T, DENSITY=D1600;          .
         BLOCK    LENGTH=640, PREAMBLE=0, POSTAMBLE=0, LTHFLD=0;               .
         RECORD   LENGTH=200, STRUCTURE=UB, CONSTANT=X'FF';                    .
         LINE     PCCTYPE=DEC10, DATA=(0,132), VFU=V1,                         .
                  OVERPRINT=(MERGE,NODISP);                                    .
         ACCT     USER=(BIN,TRAY);                                             .
   /*                                                               */         .
T1:      TABLE    CONSTANT=(X'9B00');                                          .
C1:      CRITERIA CONSTANT=(8,2,EQ,T1);                                        .
   /*                                                               */         .
   /*    THE FOLLOWING JDES WILL PRINT FLX UTILITY TAPES            */         .
20:JOB;                                                                        .
         VOLUME   HOST=OCTDUMP, LABEL=NONE, UNPACK=NONE, TAPE=9T,              .
                  DENSITY=D1600;                                               .
         BLOCK    LENGTH=512;                                                  .
         BDELETE  TEST=C1;                                                     .
21:JOB;                                                                        .
         VOLUME   HOST=DEC10, LABEL=NONE, UNPACK=NONE, TAPE=9T,                .
                  DENSITY=D1600;                                               .
         BLOCK    LENGTH=512;                                                  .
         BDELETE  TEST=C1;                                                     .
   /*             END OF DEC 10 JDL                                 */         .
END;                                                                           .
BB:SYSTEM;    /*DEC:OVER*/
PB018000/000F,005A(0910)FB00
PB018000/000F,005B(0910)5DDE
PB018000/0000,5DDE(0910)F913
PB018000/0000,5DDF(0910)E601
PB018000/0000,5DE0(0910)C602
PB018000/0000,5DE1(0910)900E
PB018000/0000,5DE2(0910)3081
PB018000/0000,5DE3(0910)F401
PB018000/0000,5DE4(0910)C702
PB018000/0000,5DE5(0910)8893
PB018000/0000,5DE6(0910)900E
PB018000/0000,5DE7(0910)3181
PB018000/0000,5DE8(0910)F401
PB018000/0000,5DE9(0910)B020
PB018000/0000,5DEA(0910)8047
PB018000/0000,5DEB(0910)3101
PB018000/0000,5DEC(0910)F401
PB018000/0000,5DED(0910)F406
PB018000/000F,005C(0910)F220
END