|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 25097 (0x6209)
Notes: pts_type(SC)
Names: »WUEXT.SC«
└─⟦f45ea3bc3⟧ Bits:30009713 Philips computer tape "WSM"
└─⟦this⟧ »WSM:UTIL/WUEXT.SC«
IDENT WUEXT REL=2.3,841001,870155940230 ************************************** * WORK STATION MANAGEMENT * * UTILITY PROGRAMS * * 5 EXTEND FILE * * * ************************************** ** HISTORY: ** 84-07-12 /MAER "EXTEND WSM SYSTEM FILE". ** 83-09-27 /MAER VOLUME NAME NO MORE DESTROYED IF RETURN-KEY ** IS PRESSED BEFORE ENTERING UNIT-MNEMO. ** 83-05-11 /MAER CHANGED DECORATIONS. ** EXTENTS GET TYPE 'X' AND RECORD LENGTH 256. ** 82-10-19 /MAER VOLUME-NAME CHANGED BEFORE EXTENSION. ** 82-02-04 /DALI DISPLAY OF NO. OF RECS CHANGED FROM 5 TO 7 DIGITS ** 81-11-04 /DALI CREATION DDUM WUDIV PDIV ENTRY WUEXT ENTRY WUEXT1 ENTRY WUEXT2 * EXPROC DECLRA CRE= SCREEN ROUTINE EXPROC DERR CRE= ERROR ROUTINE EXPROC DISERR EXPROC DSKERR,PBIN EXPROC CHVNAM,PSTRG,PBIN CRE= CHANGE VOLUMENAME PARAM: NEW NAME, F.C. EXPROC HALT EXPROC CONT DISPLAY WAIT-TEXT * EXT CREFIL ASS= CREATE FILE EXT DELFIL ASS= DELETE FILE EXT RDSECT ASS= READ A SECTOR EXT WRSECT ASS= WRITE A SECTOR EXT READDK ASS= READ A RECORD EXT WRITDK ASS= WRITE A RECORD EXT BINBCD ASS= TWO BINARYS TO BCDITEM EXT BCDBIN ASS= BCDITEM TO TWO BINARYS EXT CHANFC ASS= CHANGE FILE-CODE EXT OPENF ASS= OPEN FILE EXT CLOSEF ASS= CLOSE FILE EJECT WUEXT PROC EXT000 ATTFMT FEXT SET DEPROMPT EXT050 PERF DECLRA EXT075 IB DEBINW2,EXT050,RETUR,EXT200 PERF DSKERR,W0 'BELL' B EXT075 EXT200 ERASE 0,W1,W12 PERF CONT DISPLAY WAIT-TEXT... MOVE COPFIL,=C'WSM-TEMP' MOVE STR1A,=C'X' XCOPY PBLOCK,W5,W1,PBLOCK,W4 FC NO DISP XCOPY PBLOCK,W7,W1,STR1A,W0 F.ORG XCOPY PBLOCK,W8,W8,COPFIL,W0 FILE-NAME XCOPY PBLOCK,W16,W6,VOLEX1,W0 VOL-NAME 1 CALL DELFIL,PBLOCK,BPOOL(W5),BPOOL(W10),RETCOD XCOPY PBLOCK,W7,W1,FCOD,W1 DISK-FILE CODE XCOPY PBLOCK,W7,W1,STR1A,W0 F.ORG XCOPY PBLOCK,W8,W8,COPFIL,W0 FILE-NAME COPY PBLOCK,W16,W6,VOLEX1,W0 VOL-NAME 1 MOVE STRG10A,='R XXX WSM ' XCOPY STRG10A,W2,W3,RELNUM,W0 SET REL. NO MOVE BIN1,=W'40' XCOPY PBLOCK,BIN1,W9,STRG10A,W0 REL + RET.PERIOD MOVE BIN1,=W'49' XCOPY PBLOCK,BIN1,W1,W1,W1 BF MOVE BIN2,=W'50' XCOPY PBLOCK,BIN2,W2,SECLEN,W0 CALL BCDBIN,NOREC,BIN10,BIN11 MOVE BIN1,=W'52' XCOPY PBLOCK,BIN1,W2,BIN10,W0 NO. OF RECORDS MOVE BIN1,=W'54' XCOPY PBLOCK,BIN1,W2,BIN11,W0 NO. OF RECORDS MOVE BIN1,=W'56' XCOPY PBLOCK,BIN1,W2,W0,W0 KA MOVE BIN1,=W'58' XCOPY PBLOCK,BIN1,W2,W0,W0 NIF CALL CREFIL,PBLOCK,BPOOL(W12),BPOOL(W1),RETCOD CMP RETCOD,W0 'I/O-ERROR' BNZ EXT750 CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD BNOK EXT750 MOVE BIN2,W0 USED FOR REL.REC MOVE RECNUM,W1 EXT700 CALL BCDBIN,RECNUM,FFSNR(W1),FFSNR(W2) CALL READDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD BNOK EXT995 XCOPY BIN2,W1,W1,RELREC,W0 CBNE LNEXT2,W0,EXT720 CBE LNEXT1,W0,EXT730 EXT720 CALL BINBCD,LNEXT1,LNEXT2,RECNUM B EXT700 EXT730 CALL OPENF,DISK,FILECODE(W3),SYSBUF,COPFIL,VOLEX1,RETCOD BNOK EXT995 B EXT800 EXT750 PERF CHVNAM,VOLNAM,FCOD CHANGE NAME TO ORIGIN EXT755 PERF DISERR 'I/O-ERROR' B EXT075 EJECT *************************************** * * * FOLLOWING WORK ITEMS ARE USED * * FOR INIALIZATION OF THE SYSWSM-FILE* * * * BIN1 = WORKITEM * * BIN2 = COUNTER IN BIN9 * * BIN3 = NO.OF SECTORS/RECORD * * BIN4 = NO.OF FREE-SPACE REC. * * BIN5 = NO.OF FS.IN LAST REC. * * BIN6 = INDEX * * BIN7 = NOT USED * * BIN8 = CONTER TO MATCH - FS-IND * * BIN9 = WORKITEM - FREE-SPACE IND. * * * * * * BIN12 = SIZE OF SECTORS * * * * BCD5A = NO.OF FS.IND PER FS. RECORD* * BCD13A = NO.OF RECORDS * *************************************** EJECT ************************ * FREE-SPACE RECORDS * ************************ EXT800 MOVE RBUF,HEX00 MOVE FS,=C'FS' RECORD TYPE MOVE LNEXT1,W0 LINK NEXT1. MOVE LNEXT2,W0 LINK NEXT2. MOVE BCD13A,NOREC NO. OF RECORDS MOVE BCD5A,=D'+01920' NO. OF FS-IND. PER FS. REC. MOVE BIN4,W0 EXT810 ADD BIN4,W1 NO.OF FREE-SPACE RECORDS SUB BCD13A,=D'+1' SUB BCD13A,BCD5A CBG BCD13A,=D'00',EXT810 CHECK IF SPACE FOR 1 FS-REC ADD BCD13A,BCD5A MOVE BIN5,BCD13A BIN5 = NO. OF FREE-RECORD-IND. IN LAST FREE-SPACE RECORD MOVE BCD13A,BIN4 ADD BCD13A,NORECO ADD BCD13A,=D'+1' CALL BCDBIN,BCD13A,FRSTN1,FRSTN2 CBE BIN4,W1,EXT830 ONLY 1 RECORD ADD BCD13A,=D'+1' CALL BCDBIN,BCD13A,LNEXT1,LNEXT2 EXT830 MOVE NOFREE,BCD5A NO. OF FREE = 1920 MOVE NOFREC,BCD5A ADD BIN2,W1 RELREC CBNE BIN4,W1,EXT840 MOVE NOFREE,BIN5 IF LAST RECORD MOVE NOFREC,BIN5 EXT840 MOVE RECNUM,=D'+1' EXT850 ***************************************************** * FILL RECORD WITH FREE-SPACE-INDICATIONS : 1=FREE * ***************************************************** XCOPY RELREC,W0,W1,BIN2,W1 MOVE BIN1,NOFREE MOVE BIN6,W0 INDEX MOVE BIN8,W0 COUNTER TO MATCH - FS-IND. EXT860 ADD BIN6,W1 SUB BIN1,W8 8 RECORDS BN EXT870 MOVE FF(BIN6),=X'FF' CBE BIN1,W0,EXT880 B EXT860 EXT870 ADD BIN1,W8 CBE BIN1,W0,EXT882 MOVE FF(BIN6),HEXTAB(BIN1) EXT880 ADD BIN6,W1 CBG BIN6,=W'240',EXT885 EXT882 MOVE FF(BIN6),=X'00' B EXT880 EJECT ****************************** * WRITE FREE-SPACE RECORDS * ****************************** EXT885 CALL WRITDK,DISK,FILECODE(W3),RBUF,SECLEN,RECNUM,RETCOD BNOK EXT990 SUB BIN4,W1 BZ EXT890 IF LAST RECORD CALL BINBCD,FRSTN1,FRSTN2,BCD13A ADD BCD13A,BCD5A CALL BCDBIN,BCD13A,FRSTN1,FRSTN2 ADD BIN2,W1 RELREC CALL BINBCD,LNEXT1,LNEXT2,BCD13A ADD BCD13A,=D'+1' CALL BCDBIN,BCD13A,LNEXT1,LNEXT2 ADD RECNUM,=D'+1' CBNE BIN4,W1,EXT850 MOVE LNEXT1,W0 MOVE LNEXT2,W0 LAST RECORD MOVE NOFREE,BIN5 B EXT850 EXT890 PERF CLOFIL,W3 CALL BINBCD,FFSNR(W1),FFSNR(W2),RECNUM CALL READDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD BNOK EXT995 ADD NORECO,=D'+1' CALL BCDBIN,NORECO,LNEXT1,LNEXT2 CALL WRITDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD BNOK EXT995 PERF CLOFIL,W1 MOVE BIN5,W0 NO. OF EXTENTS MOVE BIN1,W0 SECTOR NO. CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL BNOK EXT750 XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH ADD DKBIN3,W1 OCCUPYED BYTE SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS ADD BIN1,DKBIN1 START OF VTOC EXT900 CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR BNOK EXT750 MOVE BIN4,W0 DISP TO FILENAME EXT905 MOVE BIN3,W0 MATCH COPFIL,BIN3,W8,SYSBUF,BIN4,W8 BOK EXT915 EXT910 ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY CBL BIN4,=W'240',EXT905 ALL ENTRIES HANDLED SUB DKBIN2,W1 MORE VTOC RECORDS BZ EXT925 ADD BIN1,W1 READ NEXT VTOC RECORD B EXT900 EXT915 CBNE BIN5,W0,EXT920 NO. OF EXTENTS MOVE BIN12,=W'40' NO. OF EXTENTS ADD BIN12,BIN4 DISP IN VTOC-RECORD XCOPY BIN5,W1,W1,SYSBUF,BIN12 MOVE BIN6,BIN5 SAVE NO. OF EXTENTS CBNE BIN5,W0,EXT920 AT LEAST ONE ENTRY MOVE BIN5,=X'7FFF' EXT920 COPY SYSBUF,BIN4,W8,FILNAM,W0 ADD BIN4,W10 ADD BIN7,W1 XCOPY SYSBUF,BIN4,W2,BIN7,W0 EXTENT NO. FEN SUB BIN4,W10 CALL WRSECT,DISK,BIN1,SYSBUF,RETCOD WRITE THE SECTOR BNOK EXT750 SUB BIN5,W1 MORE EXTENTS BP EXT910 YES EXT925 MOVE BIN5,W0 NO. OF EXTENTS MOVE BIN1,W0 SECTOR NO. CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL BNOK EXT750 XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH ADD DKBIN3,W1 OCCUPYED BYTE SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS ADD BIN1,DKBIN1 START OF VTOC EXT930 CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR BNOK EXT750 MOVE BIN4,W0 DISP TO FILENAME EXT940 MOVE BIN3,W0 MATCH FILNAM,BIN3,W8,SYSBUF,BIN4,W8 BOK EXT970 EXT950 ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY CBL BIN4,=W'240',EXT940 ALL ENTRIES HANDLED SUB DKBIN2,W1 MORE VTOC RECORDS BZ EXT975 ADD BIN1,W1 READ NEXT VTOC RECORD B EXT930 EXT970 MOVE BIN12,=W'40' NO. OF EXTENTS ADD BIN12,BIN4 DISP IN VTOC-RECORD XCOPY BIN5,W1,W1,SYSBUF,BIN12 CBE BIN5,W0,EXT975 AT LEAST ONE ENTRY ADD BIN5,BIN6 XCOPY SYSBUF,BIN12,W1,BIN5,W1 CALL WRSECT,DISK,BIN1,SYSBUF,RETCOD WRITE THE SECTOR BNOK EXT750 EXT975 PERF HALT B RETUR EXT990 PERF CLOFIL,W3 EXT995 PERF CLOFIL,W1 B EXT750 RETUR TBF BOOL4,RETUR2 BRANCH IF NEVER CHANGED! (830927) PERF CHVNAM,VOLNAM,FCOD CHANGE NAME TO ORIGIN RETUR2 CLEAR BOOL4 SETOFF "VOLNAM CHANGED" (830927) RET PEND EJECT * * **************** * CLOSE FILE * **************** CLOFIL PROC FC PBIN FC CALL CLOSEF,DISK,FILECODE(FC),SYSBUF,W0,DEBINW4 RET PEND EJECT *********************** * GET NO.OF USED * *********************** WUEXT1 PROC MOVE DEBINW4,W0 MOVE RETCOD,W0 MOVE RECNUM,=D'00' PERF CHVNAM,VOLEX1,FCOD CHANGE NAME TO TEMP. (111....1) BNOK EXT755 SET BOOL4 INDICATE VOLNAM CHANGED (830927) CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD BOK EXT120 MOVE DEBINW4,W9 SYSTEMFILE NOT CREATED RET EXT115 MOVE DEBINW4,W18 DISC NOT OPERABLE RET EXT120 CALL CLOSEF,DISK,FILECODE(W1),RBUF,RECNUM,RETCOD MOVE BCDI21(W2),=D'00' USED FOR NO. OF RECS MOVE BIN5,W0 NO. OF EXTENTS MOVE BIN1,W0 SECTOR NO. MOVE BIN7,W0 EXTENT NUMBER CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL BNOK EXT115 XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH ADD DKBIN3,W1 OCCUPYED BYTE SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS ADD BIN1,DKBIN1 START OF VTOC EXT130 CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR BNOK EXT115 MOVE BIN4,W0 DISP TO FILENAME EXT140 MOVE BIN3,W0 MATCH FILNAM,BIN3,W8,SYSBUF,BIN4,W8 BOK EXT170 EXT150 ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY CBL BIN4,=W'240',EXT140 ALL ENTRIES HANDLED SUB DKBIN2,W1 MORE VTOC RECORDS BNZ EXT160 CBNE BCDI21(W2),=D'00',EXT180 FILE HANDLED MOVE DEBINW4,W12 RET EXT160 ADD BIN1,W1 READ NEXT VTOC RECORD B EXT130 EXT170 CBNE BIN5,W0,EXT175 NO. OF EXTENTS MOVE BIN12,=W'40' NO. OF EXTENTS ADD BIN12,BIN4 DISP IN VTOC-RECORD XCOPY BIN5,W1,W1,SYSBUF,BIN12 CBNE BIN5,W0,EXT175 AT LEAST ONE ENTRY MOVE BIN5,=X'7FFF' EXT175 MOVE BIN2,W10 FILE EXT NO FEN ADD BIN2,BIN4 DISP IN VTOC-RECORD XCOPY BIN6,W0,W2,SYSBUF,BIN2 CBL BIN6,BIN7,EXT177 MOVE BIN7,BIN6 EXT177 ADD BIN2,W2 XCOPY BIN10,W0,W2,SYSBUF,BIN2 FILE EXTENT 1 ADD BIN2,W2 XCOPY BIN11,W0,W2,SYSBUF,BIN2 FILE EXTENT 2 CALL BINBCD,BIN10,BIN11,BCDI21(W1) ADD BCDI21(W2),BCDI21(W1) SUB BIN5,W1 MORE EXTENTS BP EXT150 EXT180 MOVE NORECO,BCDI21(W2) RET PEND EJECT ************************** * GET NO. OF FREE * ************************ WUEXT2 PROC MOVE DEBINW4,W0 MOVE RETCOD,W0 CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD BNOK EXT220 EXT210 CALL CLOSEF,DISK,FILECODE(W1),RBUF,RECNUM,RETCOD MOVE BCDI21(W2),=D'00' NUMBER OF FREE SECTORS MOVE BIN1,W0 SECTOR NO. CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL BNOK EXT220 XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH EXT215 CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR BOK EXT230 EXT220 MOVE DEBINW4,W22 RET EXT230 MOVE BIN6,W1 MOVE BIN5,W2 MOVE BIN3,W0 EXT240 XCOPY BIN10,W0,W2,SYSBUF,BIN3 1:ST WORD IN NO OF FS REC XCOPY BIN11,W0,W2,SYSBUF,BIN5 2:ST WORD IN NO OF FS REC CALL BINBCD,BIN10,BIN11,BCDI21(W1) ADD BCDI21(W2),BCDI21(W1) CBE BIN6,=W'32',EXT250 JUMP IF ALL ENTRIES HANDLED ADD BIN5,W8 ADD BIN6,W1 HANDLE NEXT ENTRY IN ADD BIN3,W8 CURRENT FSAT-RECORD B EXT240 EXT250 SUB DKBIN1,W1 FSAT-LENGTH BZ EXT260 JUMP IF ALL FSAT-RECORDS HANDLED ADD BIN1,W1 INCREMENT RECORDNUMBER TO B EXT215 NEXT FSAT-RECORD EXT260 RET PEND EJECT FEXT FRMT FSL FNL FATTR .HIGH FATTR .INV FCOPY =C'EXTEND WSM SYSTEM FILE' FLINK FFILE FMEND * FFILE FRMT FNL FATTR .HIGH FCOPY =C'UNIT:' FKI 6,MINL=3,MAXL=3,ME,ALPHA,NEOI,APPL=5 FCOPY INUNIT FATTR .HIGH FTAB 12 FCOPY =C'VOLUME-NAME:' FINP 25 FCOPY VOLNAM FNL FATTR .HIGH FCOPY =C'FILENAME:' FKI 10,MINL=1,MAXL=8,ME,REWRT,APPL=14,ALPHA,NEOI FCOPY FILNAM FNL FNL FATTR .HIGH FATTR .INV FCOPY =C'EXISTING' FTAB 10 FCOPY =C'FILE' FNL FATTR .HIGH FCOPY =C'NO.' FTAB 5 FCOPY =C'OF RECORDS:' FATTR .HIGH FINP 17 FMEL 'TTTTX',NORECO FNL FNL FATTR .HIGH FATTR .INV FCOPY =C'EXTEND ' FCOPY =C'FILE' FCOPY =C' WITH' FNL FATTR .HIGH FCOPY =C'NO.' FTAB 5 FCOPY =C'OF RECORDS:' FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=15 NO. OF RECORDS FMEL 'TTTTTTX',NOREC FLINK FHEX FMEND * FHEX FRMT FNL FKI 1,MINL=0,MAXL=0 FCOPY HEX00 FMEND * END
0x0000…0030 (0, 0, 400) Head {h00=0x002c, h01=0x0050, text=» IDENT WUEXT REL=2.3,841001,870155940230«, t00=0x0000, t01=0x0004}
0x0030…005e Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0000, t01=0x0034}
0x005e…008c Head {h00=0x002a, h01=0x0050, text=»* WORK STATION MANAGEMENT *«, t00=0x0000, t01=0x0062}
0x008c…00ba Head {h00=0x002a, h01=0x0050, text=»* UTILITY PROGRAMS *«, t00=0x0000, t01=0x0090}
0x00ba…00e8 Head {h00=0x002a, h01=0x0050, text=»* 5 EXTEND FILE *«, t00=0x0000, t01=0x00be}
0x00e8…0116 Head {h00=0x002a, h01=0x0050, text=»* *«, t00=0x0000, t01=0x00ec}
0x0116…0144 Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0000, t01=0x011a}
0x0144…014c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0148}
0x014c…0154 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0150}
0x0154…0168 Head {h00=0x0010, h01=0x0050, text=»** HISTORY:«, t00=0x0000, t01=0x0158}
0x0168…0170 Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x016c}
0x0170…01a6 Head {h00=0x0032, h01=0x0050, text=»** 84-07-12 /MAER "EXTEND WSM SYSTEM FILE".«, t00=0x0000, t01=0x0174}
0x01a6…01ee Head {h00=0x0044, h01=0x0050, text=»** 83-09-27 /MAER VOLUME NAME NO MORE DESTROYED IF RETURN-KEY«, t00=0x0001, t01=0x001a}
0x01ee…0232 Head {h00=0x0040, h01=0x0050, text=»** IS PRESSED BEFORE ENTERING UNIT-MNEMO. «, t00=0x0001, t01=0x0062}
0x0232…0264 Head {h00=0x002e, h01=0x0050, text=»** 83-05-11 /MAER CHANGED DECORATIONS. «, t00=0x0001, t01=0x00a6}
0x0264…02ac Head {h00=0x0044, h01=0x0050, text=»** EXTENTS GET TYPE 'X' AND RECORD LENGTH 256.«, t00=0x0001, t01=0x00d8}
0x02ac…02ee Head {h00=0x003e, h01=0x0050, text=»** 82-10-19 /MAER VOLUME-NAME CHANGED BEFORE EXTENSION.«, t00=0x0001, t01=0x0120}
0x02ee…033c Head {h00=0x004a, h01=0x0050, text=»** 82-02-04 /DALI DISPLAY OF NO. OF RECS CHANGED FROM 5 TO 7 DIGITS«, t00=0x0001, t01=0x0162}
0x033c…0362 Head {h00=0x0022, h01=0x0050, text=»** 81-11-04 /DALI CREATION «, t00=0x0002, t01=0x0020}
0x0362…036a Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x0046}
0x036a…0372 Head {h00=0x0004, h01=0x0050, t00=0x0002, t01=0x004e}
0x0372…0386 Head {h00=0x0010, h01=0x0050, text=» DDUM WUDIV «, t00=0x0002, t01=0x0056}
0x0386…0394 Head {h00=0x000a, h01=0x0050, text=» PDIV «, t00=0x0002, t01=0x006a}
0x0394…03a8 Head {h00=0x0010, h01=0x0050, text=» ENTRY WUEXT«, t00=0x0002, t01=0x0078}
0x03a8…03be Head {h00=0x0012, h01=0x0050, text=» ENTRY WUEXT1 «, t00=0x0002, t01=0x008c}
0x03be…03d4 Head {h00=0x0012, h01=0x0050, text=» ENTRY WUEXT2 «, t00=0x0002, t01=0x00a2}
0x03d4…03de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b8}
0x03de…0408 Head {h00=0x0026, h01=0x0050, text=» EXPROC DECLRA CRE= SCREEN ROUTINE«, t00=0x0002, t01=0x00c2}
0x0408…0430 Head {h00=0x0024, h01=0x0050, text=» EXPROC DERR CRE= ERROR ROUTINE «, t00=0x0002, t01=0x00ec}
0x0430…0446 Head {h00=0x0012, h01=0x0050, text=» EXPROC DISERR«, t00=0x0002, t01=0x0114}
0x0446…0462 Head {h00=0x0018, h01=0x0050, text=» EXPROC DSKERR,PBIN «, t00=0x0002, t01=0x012a}
0x0462…049a Head {h00=0x0034, h01=0x0050, text=» EXPROC CHVNAM,PSTRG,PBIN CRE= CHANGE VOLUMENAME«, t00=0x0002, t01=0x0146}
0x049a…04ba Head {h00=0x001c, h01=0x0050, text=» PARAM: NEW NAME, F.C.«, t00=0x0002, t01=0x017e}
0x04ba…04ce Head {h00=0x0010, h01=0x0050, text=» EXPROC HALT«, t00=0x0003, t01=0x000e}
0x04ce…04f4 Head {h00=0x0022, h01=0x0050, text=» EXPROC CONT DISPLAY WAIT-TEXT«, t00=0x0003, t01=0x0022}
0x04f4…04fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0048}
0x04fe…0522 Head {h00=0x0020, h01=0x0050, text=» EXT CREFIL ASS= CREATE FILE«, t00=0x0003, t01=0x0052}
0x0522…0546 Head {h00=0x0020, h01=0x0050, text=» EXT DELFIL ASS= DELETE FILE«, t00=0x0003, t01=0x0076}
0x0546…056c Head {h00=0x0022, h01=0x0050, text=» EXT RDSECT ASS= READ A SECTOR«, t00=0x0003, t01=0x009a}
0x056c…0594 Head {h00=0x0024, h01=0x0050, text=» EXT WRSECT ASS= WRITE A SECTOR «, t00=0x0003, t01=0x00c0}
0x0594…05ba Head {h00=0x0022, h01=0x0050, text=» EXT READDK ASS= READ A RECORD«, t00=0x0003, t01=0x00e8}
0x05ba…05e2 Head {h00=0x0024, h01=0x0050, text=» EXT WRITDK ASS= WRITE A RECORD «, t00=0x0003, t01=0x010e}
0x05e2…0612 Head {h00=0x002c, h01=0x0050, text=» EXT BINBCD ASS= TWO BINARYS TO BCDITEM «, t00=0x0003, t01=0x0136}
0x0612…0642 Head {h00=0x002c, h01=0x0050, text=» EXT BCDBIN ASS= BCDITEM TO TWO BINARYS «, t00=0x0003, t01=0x0166}
0x0642…066c Head {h00=0x0026, h01=0x0050, text=» EXT CHANFC ASS= CHANGE FILE-CODE «, t00=0x0004, t01=0x0008}
0x066c…068e Head {h00=0x001e, h01=0x0050, text=» EXT OPENF ASS= OPEN FILE «, t00=0x0004, t01=0x0032}
0x068e…06b2 Head {h00=0x0020, h01=0x0050, text=» EXT CLOSEF ASS= CLOSE FILE «, t00=0x0004, t01=0x0054}
0x06b2…06c0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0078}
0x06c0…06d2 Head {h00=0x000e, h01=0x0050, text=»WUEXT PROC«, t00=0x0004, t01=0x0086}
0x06d2…06e0 Head {h00=0x000a, h01=0x0050, text=»EXT000«, t00=0x0004, t01=0x0098}
0x06e0…06f4 Head {h00=0x0010, h01=0x0050, text=» ATTFMT FEXT«, t00=0x0004, t01=0x00a6}
0x06f4…070a Head {h00=0x0012, h01=0x0050, text=» SET DEPROMPT «, t00=0x0004, t01=0x00ba}
0x070a…0718 Head {h00=0x000a, h01=0x0050, text=»EXT050«, t00=0x0004, t01=0x00d0}
0x0718…072c Head {h00=0x0010, h01=0x0050, text=» PERF DECLRA«, t00=0x0004, t01=0x00de}
0x072c…073a Head {h00=0x000a, h01=0x0050, text=»EXT075«, t00=0x0004, t01=0x00f2}
0x073a…0762 Head {h00=0x0024, h01=0x0050, text=» IB DEBINW2,EXT050,RETUR,EXT200 «, t00=0x0004, t01=0x0100}
0x0762…0780 Head {h00=0x001a, h01=0x0050, text=» PERF DSKERR,W0 'BELL'«, t00=0x0004, t01=0x0128}
0x0780…0792 Head {h00=0x000e, h01=0x0050, text=» B EXT075 «, t00=0x0004, t01=0x0146}
0x0792…07a0 Head {h00=0x000a, h01=0x0050, text=»EXT200«, t00=0x0004, t01=0x0158}
0x07a0…07b8 Head {h00=0x0014, h01=0x0050, text=» ERASE 0,W1,W12 «, t00=0x0004, t01=0x0166}
0x07b8…07e0 Head {h00=0x0024, h01=0x0050, text=» PERF CONT DISPLAY WAIT-TEXT... «, t00=0x0004, t01=0x017e}
0x07e0…0802 Head {h00=0x001e, h01=0x0050, text=» MOVE COPFIL,=C'WSM-TEMP' «, t00=0x0005, t01=0x0016}
0x0802…081c Head {h00=0x0016, h01=0x0050, text=» MOVE STR1A,=C'X' «, t00=0x0005, t01=0x0038}
0x081c…084c Head {h00=0x002c, h01=0x0050, text=» XCOPY PBLOCK,W5,W1,PBLOCK,W4 FC NO DISP«, t00=0x0005, t01=0x0052}
0x084c…0876 Head {h00=0x0026, h01=0x0050, text=» XCOPY PBLOCK,W7,W1,STR1A,W0 F.ORG«, t00=0x0005, t01=0x0082}
0x0876…08a6 Head {h00=0x002c, h01=0x0050, text=» XCOPY PBLOCK,W8,W8,COPFIL,W0 FILE-NAME «, t00=0x0005, t01=0x00ac}
0x08a6…08d8 Head {h00=0x002e, h01=0x0050, text=» XCOPY PBLOCK,W16,W6,VOLEX1,W0 VOL-NAME 1 «, t00=0x0005, t01=0x00dc}
0x08d8…0910 Head {h00=0x0034, h01=0x0050, text=» CALL DELFIL,PBLOCK,BPOOL(W5),BPOOL(W10),RETCOD «, t00=0x0005, t01=0x010e}
0x0910…0942 Head {h00=0x002e, h01=0x0050, text=» XCOPY PBLOCK,W7,W1,FCOD,W1 DISK-FILE CODE«, t00=0x0005, t01=0x0146}
0x0942…096c Head {h00=0x0026, h01=0x0050, text=» XCOPY PBLOCK,W7,W1,STR1A,W0 F.ORG«, t00=0x0005, t01=0x0178}
0x096c…099c Head {h00=0x002c, h01=0x0050, text=» XCOPY PBLOCK,W8,W8,COPFIL,W0 FILE-NAME «, t00=0x0006, t01=0x0012}
0x099c…09cc Head {h00=0x002c, h01=0x0050, text=» COPY PBLOCK,W16,W6,VOLEX1,W0 VOL-NAME 1«, t00=0x0006, t01=0x0042}
0x09cc…09f0 Head {h00=0x0020, h01=0x0050, text=» MOVE STRG10A,='R XXX WSM ' «, t00=0x0006, t01=0x0072}
0x09f0…0a22 Head {h00=0x002e, h01=0x0050, text=» XCOPY STRG10A,W2,W3,RELNUM,W0 SET REL. NO«, t00=0x0006, t01=0x0096}
0x0a22…0a3c Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'40' «, t00=0x0006, t01=0x00c8}
0x0a3c…0a76 Head {h00=0x0036, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W9,STRG10A,W0 REL + RET.PERIOD «, t00=0x0006, t01=0x00e2}
0x0a76…0a90 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'49' «, t00=0x0006, t01=0x011c}
0x0a90…0ab6 Head {h00=0x0022, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W1,W1,W1 BF«, t00=0x0006, t01=0x0136}
0x0ab6…0ad0 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN2,=W'50' «, t00=0x0006, t01=0x015c}
0x0ad0…0af8 Head {h00=0x0024, h01=0x0050, text=» XCOPY PBLOCK,BIN2,W2,SECLEN,W0 «, t00=0x0006, t01=0x0176}
0x0af8…0b1e Head {h00=0x0022, h01=0x0050, text=» CALL BCDBIN,NOREC,BIN10,BIN11«, t00=0x0007, t01=0x000e}
0x0b1e…0b38 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'52' «, t00=0x0007, t01=0x0034}
0x0b38…0b6e Head {h00=0x0032, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,BIN10,W0 NO. OF RECORDS «, t00=0x0007, t01=0x004e}
0x0b6e…0b88 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'54' «, t00=0x0007, t01=0x0084}
0x0b88…0bbe Head {h00=0x0032, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,BIN11,W0 NO. OF RECORDS «, t00=0x0007, t01=0x009e}
0x0bbe…0bd8 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'56' «, t00=0x0007, t01=0x00d4}
0x0bd8…0bfe Head {h00=0x0022, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,W0,W0 KA«, t00=0x0007, t01=0x00ee}
0x0bfe…0c18 Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,=W'58' «, t00=0x0007, t01=0x0114}
0x0c18…0c40 Head {h00=0x0024, h01=0x0050, text=» XCOPY PBLOCK,BIN1,W2,W0,W0 NIF «, t00=0x0007, t01=0x012e}
0x0c40…0c78 Head {h00=0x0034, h01=0x0050, text=» CALL CREFIL,PBLOCK,BPOOL(W12),BPOOL(W1),RETCOD «, t00=0x0007, t01=0x0156}
0x0c78…0c9a Head {h00=0x001e, h01=0x0050, text=» CMP RETCOD,W0 'I/O-ERROR'«, t00=0x0007, t01=0x018e}
0x0c9a…0cae Head {h00=0x0010, h01=0x0050, text=» BNZ EXT750 «, t00=0x0008, t01=0x0020}
0x0cae…0cf0 Head {h00=0x003e, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD «, t00=0x0008, t01=0x0034}
0x0cf0…0d04 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0008, t01=0x0076}
0x0d04…0d2a Head {h00=0x0022, h01=0x0050, text=» MOVE BIN2,W0 USED FOR REL.REC«, t00=0x0008, t01=0x008a}
0x0d2a…0d42 Head {h00=0x0014, h01=0x0050, text=» MOVE RECNUM,W1 «, t00=0x0008, t01=0x00b0}
0x0d42…0d50 Head {h00=0x000a, h01=0x0050, text=»EXT700«, t00=0x0008, t01=0x00c8}
0x0d50…0d80 Head {h00=0x002c, h01=0x0050, text=» CALL BCDBIN,RECNUM,FFSNR(W1),FFSNR(W2) «, t00=0x0008, t01=0x00d6}
0x0d80…0dc0 Head {h00=0x003c, h01=0x0050, text=» CALL READDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD«, t00=0x0008, t01=0x0106}
0x0dc0…0dd4 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT995«, t00=0x0008, t01=0x0146}
0x0dd4…0df8 Head {h00=0x0020, h01=0x0050, text=» XCOPY BIN2,W1,W1,RELREC,W0 «, t00=0x0008, t01=0x015a}
0x0df8…0e16 Head {h00=0x001a, h01=0x0050, text=» CBNE LNEXT2,W0,EXT720«, t00=0x0008, t01=0x017e}
0x0e16…0e34 Head {h00=0x001a, h01=0x0050, text=» CBE LNEXT1,W0,EXT730 «, t00=0x0009, t01=0x000c}
0x0e34…0e42 Head {h00=0x000a, h01=0x0050, text=»EXT720«, t00=0x0009, t01=0x002a}
0x0e42…0e6c Head {h00=0x0026, h01=0x0050, text=» CALL BINBCD,LNEXT1,LNEXT2,RECNUM «, t00=0x0009, t01=0x0038}
0x0e6c…0e7e Head {h00=0x000e, h01=0x0050, text=» B EXT700 «, t00=0x0009, t01=0x0062}
0x0e7e…0e8c Head {h00=0x000a, h01=0x0050, text=»EXT730«, t00=0x0009, t01=0x0074}
0x0e8c…0ece Head {h00=0x003e, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W3),SYSBUF,COPFIL,VOLEX1,RETCOD «, t00=0x0009, t01=0x0082}
0x0ece…0ee2 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT995«, t00=0x0009, t01=0x00c4}
0x0ee2…0ef4 Head {h00=0x000e, h01=0x0050, text=» B EXT800 «, t00=0x0009, t01=0x00d8}
0x0ef4…0f02 Head {h00=0x000a, h01=0x0050, text=»EXT750«, t00=0x0009, t01=0x00ea}
0x0f02…0f38 Head {h00=0x0032, h01=0x0050, text=» PERF CHVNAM,VOLNAM,FCOD CHANGE NAME TO ORIGIN«, t00=0x0009, t01=0x00f8}
0x0f38…0f46 Head {h00=0x000a, h01=0x0050, text=»EXT755«, t00=0x0009, t01=0x012e}
0x0f46…0f66 Head {h00=0x001c, h01=0x0050, text=» PERF DISERR 'I/O-ERROR'«, t00=0x0009, t01=0x013c}
0x0f66…0f78 Head {h00=0x000e, h01=0x0050, text=» B EXT075 «, t00=0x0009, t01=0x015c}
0x0f78…0f86 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x016e}
0x0f86…0fb6 Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0009, t01=0x017c}
0x0fb6…0fe6 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x000a, t01=0x001c}
0x0fe6…1016 Head {h00=0x002c, h01=0x0050, text=»* FOLLOWING WORK ITEMS ARE USED * «, t00=0x000a, t01=0x004c}
0x1016…1046 Head {h00=0x002c, h01=0x0050, text=»* FOR INIALIZATION OF THE SYSWSM-FILE* «, t00=0x000a, t01=0x007c}
0x1046…1076 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x000a, t01=0x00ac}
0x1076…10a6 Head {h00=0x002c, h01=0x0050, text=»* BIN1 = WORKITEM * «, t00=0x000a, t01=0x00dc}
0x10a6…10d6 Head {h00=0x002c, h01=0x0050, text=»* BIN2 = COUNTER IN BIN9 * «, t00=0x000a, t01=0x010c}
0x10d6…1106 Head {h00=0x002c, h01=0x0050, text=»* BIN3 = NO.OF SECTORS/RECORD * «, t00=0x000a, t01=0x013c}
0x1106…1136 Head {h00=0x002c, h01=0x0050, text=»* BIN4 = NO.OF FREE-SPACE REC. * «, t00=0x000a, t01=0x016c}
0x1136…1166 Head {h00=0x002c, h01=0x0050, text=»* BIN5 = NO.OF FS.IN LAST REC. * «, t00=0x000b, t01=0x000c}
0x1166…1196 Head {h00=0x002c, h01=0x0050, text=»* BIN6 = INDEX * «, t00=0x000b, t01=0x003c}
0x1196…11c6 Head {h00=0x002c, h01=0x0050, text=»* BIN7 = NOT USED * «, t00=0x000b, t01=0x006c}
0x11c6…11f6 Head {h00=0x002c, h01=0x0050, text=»* BIN8 = CONTER TO MATCH - FS-IND * «, t00=0x000b, t01=0x009c}
0x11f6…1226 Head {h00=0x002c, h01=0x0050, text=»* BIN9 = WORKITEM - FREE-SPACE IND. * «, t00=0x000b, t01=0x00cc}
0x1226…1256 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x000b, t01=0x00fc}
0x1256…1286 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x000b, t01=0x012c}
0x1286…12b6 Head {h00=0x002c, h01=0x0050, text=»* BIN12 = SIZE OF SECTORS * «, t00=0x000b, t01=0x015c}
0x12b6…12e6 Head {h00=0x002c, h01=0x0050, text=»* * «, t00=0x000b, t01=0x018c}
0x12e6…1316 Head {h00=0x002c, h01=0x0050, text=»* BCD5A = NO.OF FS.IND PER FS. RECORD* «, t00=0x000c, t01=0x002c}
0x1316…1346 Head {h00=0x002c, h01=0x0050, text=»* BCD13A = NO.OF RECORDS * «, t00=0x000c, t01=0x005c}
0x1346…1376 Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x000c, t01=0x008c}
0x1376…1384 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x00bc}
0x1384…13a4 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x00ca}
0x13a4…13c4 Head {h00=0x001c, h01=0x0050, text=»* FREE-SPACE RECORDS *«, t00=0x000c, t01=0x00ea}
0x13c4…13e4 Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000c, t01=0x010a}
0x13e4…13f2 Head {h00=0x000a, h01=0x0050, text=»EXT800«, t00=0x000c, t01=0x012a}
0x13f2…140a Head {h00=0x0014, h01=0x0050, text=» MOVE RBUF,HEX00«, t00=0x000c, t01=0x0138}
0x140a…142e Head {h00=0x0020, h01=0x0050, text=» MOVE FS,=C'FS' RECORD TYPE «, t00=0x000c, t01=0x0150}
0x142e…1452 Head {h00=0x0020, h01=0x0050, text=» MOVE LNEXT1,W0 LINK NEXT1. «, t00=0x000c, t01=0x0174}
0x1452…1476 Head {h00=0x0020, h01=0x0050, text=» MOVE LNEXT2,W0 LINK NEXT2. «, t00=0x000d, t01=0x0008}
0x1476…14a0 Head {h00=0x0026, h01=0x0050, text=» MOVE BCD13A,NOREC NO. OF RECORDS «, t00=0x000d, t01=0x002c}
0x14a0…14da Head {h00=0x0036, h01=0x0050, text=» MOVE BCD5A,=D'+01920' NO. OF FS-IND. PER FS. REC.«, t00=0x000d, t01=0x0056}
0x14da…14f0 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN4,W0 «, t00=0x000d, t01=0x0090}
0x14f0…14fe Head {h00=0x000a, h01=0x0050, text=»EXT810«, t00=0x000d, t01=0x00a6}
0x14fe…152c Head {h00=0x002a, h01=0x0050, text=» ADD BIN4,W1 NO.OF FREE-SPACE RECORDS «, t00=0x000d, t01=0x00b4}
0x152c…1546 Head {h00=0x0016, h01=0x0050, text=» SUB BCD13A,=D'+1'«, t00=0x000d, t01=0x00e2}
0x1546…1560 Head {h00=0x0016, h01=0x0050, text=» SUB BCD13A,BCD5A «, t00=0x000d, t01=0x00fc}
0x1560…159e Head {h00=0x003a, h01=0x0050, text=» CBG BCD13A,=D'00',EXT810 CHECK IF SPACE FOR 1 FS-REC «, t00=0x000d, t01=0x0116}
0x159e…15b8 Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,BCD5A «, t00=0x000d, t01=0x0154}
0x15b8…15f0 Head {h00=0x0034, h01=0x0050, text=» MOVE BIN5,BCD13A BIN5 = NO. OF FREE-RECORD-IND.«, t00=0x000d, t01=0x016e}
0x15f0…1614 Head {h00=0x0020, h01=0x0050, text=» IN LAST FREE-SPACE RECORD«, t00=0x000e, t01=0x0016}
0x1614…162e Head {h00=0x0016, h01=0x0050, text=» MOVE BCD13A,BIN4 «, t00=0x000e, t01=0x003a}
0x162e…1648 Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,NORECO«, t00=0x000e, t01=0x0054}
0x1648…1662 Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,=D'+1'«, t00=0x000e, t01=0x006e}
0x1662…168c Head {h00=0x0026, h01=0x0050, text=» CALL BCDBIN,BCD13A,FRSTN1,FRSTN2 «, t00=0x000e, t01=0x0088}
0x168c…16b6 Head {h00=0x0026, h01=0x0050, text=» CBE BIN4,W1,EXT830 ONLY 1 RECORD «, t00=0x000e, t01=0x00b2}
0x16b6…16d0 Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,=D'+1'«, t00=0x000e, t01=0x00dc}
0x16d0…16fa Head {h00=0x0026, h01=0x0050, text=» CALL BCDBIN,BCD13A,LNEXT1,LNEXT2 «, t00=0x000e, t01=0x00f6}
0x16fa…1708 Head {h00=0x000a, h01=0x0050, text=»EXT830«, t00=0x000e, t01=0x0120}
0x1708…1736 Head {h00=0x002a, h01=0x0050, text=» MOVE NOFREE,BCD5A NO. OF FREE = 1920 «, t00=0x000e, t01=0x012e}
0x1736…1750 Head {h00=0x0016, h01=0x0050, text=» MOVE NOFREC,BCD5A«, t00=0x000e, t01=0x015c}
0x1750…176c Head {h00=0x0018, h01=0x0050, text=» ADD BIN2,W1 RELREC «, t00=0x000e, t01=0x0176}
0x176c…1788 (15, 0, 398) Head {h00=0x0018, h01=0x0050, text=» CBNE BIN4,W1,EXT840«, t00=0x000f, t01=0x0004}
0x1788…17b0 Head {h00=0x0024, h01=0x0050, text=» MOVE NOFREE,BIN5 IF LAST RECORD«, t00=0x000f, t01=0x0020}
0x17b0…17ca Head {h00=0x0016, h01=0x0050, text=» MOVE NOFREC,BIN5 «, t00=0x000f, t01=0x0048}
0x17ca…17d8 Head {h00=0x000a, h01=0x0050, text=»EXT840«, t00=0x000f, t01=0x0062}
0x17d8…17f4 Head {h00=0x0018, h01=0x0050, text=» MOVE RECNUM,=D'+1' «, t00=0x000f, t01=0x0070}
0x17f4…1802 Head {h00=0x000a, h01=0x0050, text=»EXT850«, t00=0x000f, t01=0x008c}
0x1802…1840 Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000f, t01=0x009a}
0x1840…187e Head {h00=0x003a, h01=0x0050, text=»* FILL RECORD WITH FREE-SPACE-INDICATIONS : 1=FREE * «, t00=0x000f, t01=0x00d8}
0x187e…18bc Head {h00=0x003a, h01=0x0050, text=»***************************************************** «, t00=0x000f, t01=0x0116}
0x18bc…18e0 Head {h00=0x0020, h01=0x0050, text=» XCOPY RELREC,W0,W1,BIN2,W1 «, t00=0x000f, t01=0x0154}
0x18e0…18fa Head {h00=0x0016, h01=0x0050, text=» MOVE BIN1,NOFREE «, t00=0x000f, t01=0x0178}
0x18fa…1916 (16, 0, 398) Head {h00=0x0018, h01=0x0050, text=» MOVE BIN6,W0 INDEX «, t00=0x0010, t01=0x0004}
0x1916…1946 Head {h00=0x002c, h01=0x0050, text=» MOVE BIN8,W0 COUNTER TO MATCH - FS-IND.«, t00=0x0010, t01=0x0020}
0x1946…1954 Head {h00=0x000a, h01=0x0050, text=»EXT860«, t00=0x0010, t01=0x0050}
0x1954…1968 Head {h00=0x0010, h01=0x0050, text=» ADD BIN6,W1«, t00=0x0010, t01=0x005e}
0x1968…1986 Head {h00=0x001a, h01=0x0050, text=» SUB BIN1,W8 8 RECORDS«, t00=0x0010, t01=0x0072}
0x1986…1998 Head {h00=0x000e, h01=0x0050, text=» BN EXT870«, t00=0x0010, t01=0x0090}
0x1998…19b6 Head {h00=0x001a, h01=0x0050, text=» MOVE FF(BIN6),=X'FF' «, t00=0x0010, t01=0x00a2}
0x19b6…19d2 Head {h00=0x0018, h01=0x0050, text=» CBE BIN1,W0,EXT880 «, t00=0x0010, t01=0x00c0}
0x19d2…19e4 Head {h00=0x000e, h01=0x0050, text=» B EXT860 «, t00=0x0010, t01=0x00dc}
0x19e4…19f2 Head {h00=0x000a, h01=0x0050, text=»EXT870«, t00=0x0010, t01=0x00ee}
0x19f2…1a06 Head {h00=0x0010, h01=0x0050, text=» ADD BIN1,W8«, t00=0x0010, t01=0x00fc}
0x1a06…1a22 Head {h00=0x0018, h01=0x0050, text=» CBE BIN1,W0,EXT882 «, t00=0x0010, t01=0x0110}
0x1a22…1a46 Head {h00=0x0020, h01=0x0050, text=» MOVE FF(BIN6),HEXTAB(BIN1) «, t00=0x0010, t01=0x012c}
0x1a46…1a54 Head {h00=0x000a, h01=0x0050, text=»EXT880«, t00=0x0010, t01=0x0150}
0x1a54…1a68 Head {h00=0x0010, h01=0x0050, text=» ADD BIN6,W1«, t00=0x0010, t01=0x015e}
0x1a68…1a88 Head {h00=0x001c, h01=0x0050, text=» CBG BIN6,=W'240',EXT885«, t00=0x0010, t01=0x0172}
0x1a88…1a96 (17, 0, 400) Head {h00=0x000a, h01=0x0050, text=»EXT882«, t00=0x0011, t01=0x0004}
0x1a96…1ab4 Head {h00=0x001a, h01=0x0050, text=» MOVE FF(BIN6),=X'00' «, t00=0x0011, t01=0x0012}
0x1ab4…1ac6 Head {h00=0x000e, h01=0x0050, text=» B EXT880 «, t00=0x0011, t01=0x0030}
0x1ac6…1ad4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0042}
0x1ad4…1afa Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0011, t01=0x0050}
0x1afa…1b20 Head {h00=0x0022, h01=0x0050, text=»* WRITE FREE-SPACE RECORDS *«, t00=0x0011, t01=0x0076}
0x1b20…1b46 Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0011, t01=0x009c}
0x1b46…1b54 Head {h00=0x000a, h01=0x0050, text=»EXT885«, t00=0x0011, t01=0x00c2}
0x1b54…1b94 Head {h00=0x003c, h01=0x0050, text=» CALL WRITDK,DISK,FILECODE(W3),RBUF,SECLEN,RECNUM,RETCOD«, t00=0x0011, t01=0x00d0}
0x1b94…1ba8 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT990«, t00=0x0011, t01=0x0110}
0x1ba8…1bbc Head {h00=0x0010, h01=0x0050, text=» SUB BIN4,W1«, t00=0x0011, t01=0x0124}
0x1bbc…1bde Head {h00=0x001e, h01=0x0050, text=» BZ EXT890 IF LAST RECORD «, t00=0x0011, t01=0x0138}
0x1bde…1c08 Head {h00=0x0026, h01=0x0050, text=» CALL BINBCD,FRSTN1,FRSTN2,BCD13A «, t00=0x0011, t01=0x015a}
0x1c08…1c22 Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,BCD5A «, t00=0x0011, t01=0x0184}
0x1c22…1c4c Head {h00=0x0026, h01=0x0050, text=» CALL BCDBIN,BCD13A,FRSTN1,FRSTN2 «, t00=0x0012, t01=0x000e}
0x1c4c…1c68 Head {h00=0x0018, h01=0x0050, text=» ADD BIN2,W1 RELREC «, t00=0x0012, t01=0x0038}
0x1c68…1c92 Head {h00=0x0026, h01=0x0050, text=» CALL BINBCD,LNEXT1,LNEXT2,BCD13A «, t00=0x0012, t01=0x0054}
0x1c92…1cac Head {h00=0x0016, h01=0x0050, text=» ADD BCD13A,=D'+1'«, t00=0x0012, t01=0x007e}
0x1cac…1cd6 Head {h00=0x0026, h01=0x0050, text=» CALL BCDBIN,BCD13A,LNEXT1,LNEXT2 «, t00=0x0012, t01=0x0098}
0x1cd6…1cf0 Head {h00=0x0016, h01=0x0050, text=» ADD RECNUM,=D'+1'«, t00=0x0012, t01=0x00c2}
0x1cf0…1d0c Head {h00=0x0018, h01=0x0050, text=» CBNE BIN4,W1,EXT850«, t00=0x0012, t01=0x00dc}
0x1d0c…1d24 Head {h00=0x0014, h01=0x0050, text=» MOVE LNEXT1,W0 «, t00=0x0012, t01=0x00f8}
0x1d24…1d48 Head {h00=0x0020, h01=0x0050, text=» MOVE LNEXT2,W0 LAST RECORD «, t00=0x0012, t01=0x0110}
0x1d48…1d62 Head {h00=0x0016, h01=0x0050, text=» MOVE NOFREE,BIN5 «, t00=0x0012, t01=0x0134}
0x1d62…1d74 Head {h00=0x000e, h01=0x0050, text=» B EXT850 «, t00=0x0012, t01=0x014e}
0x1d74…1d82 Head {h00=0x000a, h01=0x0050, text=»EXT890«, t00=0x0012, t01=0x0160}
0x1d82…1d9a Head {h00=0x0014, h01=0x0050, text=» PERF CLOFIL,W3 «, t00=0x0012, t01=0x016e}
0x1d9a…1dca Head {h00=0x002c, h01=0x0050, text=» CALL BINBCD,FFSNR(W1),FFSNR(W2),RECNUM «, t00=0x0012, t01=0x0186}
0x1dca…1e0a Head {h00=0x003c, h01=0x0050, text=» CALL READDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD«, t00=0x0013, t01=0x0026}
0x1e0a…1e1e Head {h00=0x0010, h01=0x0050, text=» BNOK EXT995«, t00=0x0013, t01=0x0066}
0x1e1e…1e38 Head {h00=0x0016, h01=0x0050, text=» ADD NORECO,=D'+1'«, t00=0x0013, t01=0x007a}
0x1e38…1e62 Head {h00=0x0026, h01=0x0050, text=» CALL BCDBIN,NORECO,LNEXT1,LNEXT2 «, t00=0x0013, t01=0x0094}
0x1e62…1ea2 Head {h00=0x003c, h01=0x0050, text=» CALL WRITDK,DISK,FILECODE(W1),RBUF,SECLEN,RECNUM,RETCOD«, t00=0x0013, t01=0x00be}
0x1ea2…1eb6 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT995«, t00=0x0013, t01=0x00fe}
0x1eb6…1ece Head {h00=0x0014, h01=0x0050, text=» PERF CLOFIL,W1 «, t00=0x0013, t01=0x0112}
0x1ece…1ef2 Head {h00=0x0020, h01=0x0050, text=» MOVE BIN5,W0 NO. OF EXTENTS«, t00=0x0013, t01=0x012a}
0x1ef2…1f12 Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,W0 SECTOR NO.«, t00=0x0013, t01=0x014e}
0x1f12…1f50 Head {h00=0x003a, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL«, t00=0x0013, t01=0x016e}
0x1f50…1f64 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0014, t01=0x001c}
0x1f64…1f92 Head {h00=0x002a, h01=0x0050, text=» XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE«, t00=0x0014, t01=0x0030}
0x1f92…1fc6 Head {h00=0x0030, h01=0x0050, text=» MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT«, t00=0x0014, t01=0x005e}
0x1fc6…1ffc Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH «, t00=0x0014, t01=0x0092}
0x1ffc…202c Head {h00=0x002c, h01=0x0050, text=» XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH«, t00=0x0014, t01=0x00c8}
0x202c…2062 Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH «, t00=0x0014, t01=0x00f8}
0x2062…2086 Head {h00=0x0020, h01=0x0050, text=» ADD DKBIN3,W1 OCCUPYED BYTE«, t00=0x0014, t01=0x012e}
0x2086…20b6 Head {h00=0x002c, h01=0x0050, text=» SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS «, t00=0x0014, t01=0x0152}
0x20b6…20dc Head {h00=0x0022, h01=0x0050, text=» ADD BIN1,DKBIN1 START OF VTOC«, t00=0x0014, t01=0x0182}
0x20dc…20ea Head {h00=0x000a, h01=0x0050, text=»EXT900«, t00=0x0015, t01=0x0018}
0x20ea…2126 Head {h00=0x0038, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR «, t00=0x0015, t01=0x0026}
0x2126…213a Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0015, t01=0x0062}
0x213a…2160 Head {h00=0x0022, h01=0x0050, text=» MOVE BIN4,W0 DISP TO FILENAME«, t00=0x0015, t01=0x0076}
0x2160…216e Head {h00=0x000a, h01=0x0050, text=»EXT905«, t00=0x0015, t01=0x009c}
0x216e…2184 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN3,W0 «, t00=0x0015, t01=0x00aa}
0x2184…21b0 Head {h00=0x0028, h01=0x0050, text=» MATCH COPFIL,BIN3,W8,SYSBUF,BIN4,W8«, t00=0x0015, t01=0x00c0}
0x21b0…21c4 Head {h00=0x0010, h01=0x0050, text=» BOK EXT915 «, t00=0x0015, t01=0x00ec}
0x21c4…21d2 Head {h00=0x000a, h01=0x0050, text=»EXT910«, t00=0x0015, t01=0x0100}
0x21d2…21fe Head {h00=0x0028, h01=0x0050, text=» ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY«, t00=0x0015, t01=0x010e}
0x21fe…2232 Head {h00=0x0030, h01=0x0050, text=» CBL BIN4,=W'240',EXT905 ALL ENTRIES HANDLED«, t00=0x0015, t01=0x013a}
0x2232…225a Head {h00=0x0024, h01=0x0050, text=» SUB DKBIN2,W1 MORE VTOC RECORDS«, t00=0x0015, t01=0x016e}
0x225a…226c Head {h00=0x000e, h01=0x0050, text=» BZ EXT925«, t00=0x0016, t01=0x0008}
0x226c…2296 Head {h00=0x0026, h01=0x0050, text=» ADD BIN1,W1 READ NEXT VTOC RECORD«, t00=0x0016, t01=0x001a}
0x2296…22a8 Head {h00=0x000e, h01=0x0050, text=» B EXT900 «, t00=0x0016, t01=0x0044}
0x22a8…22b6 Head {h00=0x000a, h01=0x0050, text=»EXT915«, t00=0x0016, t01=0x0056}
0x22b6…22e2 Head {h00=0x0028, h01=0x0050, text=» CBNE BIN5,W0,EXT920 NO. OF EXTENTS «, t00=0x0016, t01=0x0064}
0x22e2…230c Head {h00=0x0026, h01=0x0050, text=» MOVE BIN12,=W'40' NO. OF EXTENTS «, t00=0x0016, t01=0x0090}
0x230c…2338 Head {h00=0x0028, h01=0x0050, text=» ADD BIN12,BIN4 DISP IN VTOC-RECORD «, t00=0x0016, t01=0x00ba}
0x2338…235e Head {h00=0x0022, h01=0x0050, text=» XCOPY BIN5,W1,W1,SYSBUF,BIN12«, t00=0x0016, t01=0x00e6}
0x235e…238a Head {h00=0x0028, h01=0x0050, text=» MOVE BIN6,BIN5 SAVE NO. OF EXTENTS «, t00=0x0016, t01=0x010c}
0x238a…23ba Head {h00=0x002c, h01=0x0050, text=» CBNE BIN5,W0,EXT920 AT LEAST ONE ENTRY «, t00=0x0016, t01=0x0138}
0x23ba…23d6 Head {h00=0x0018, h01=0x0050, text=» MOVE BIN5,=X'7FFF' «, t00=0x0016, t01=0x0168}
0x23d6…23e4 Head {h00=0x000a, h01=0x0050, text=»EXT920«, t00=0x0016, t01=0x0184}
0x23e4…240a (23, 0, 400) Head {h00=0x0022, h01=0x0050, text=» COPY SYSBUF,BIN4,W8,FILNAM,W0«, t00=0x0017, t01=0x0004}
0x240a…2420 Head {h00=0x0012, h01=0x0050, text=» ADD BIN4,W10 «, t00=0x0017, t01=0x002a}
0x2420…2434 Head {h00=0x0010, h01=0x0050, text=» ADD BIN7,W1«, t00=0x0017, t01=0x0040}
0x2434…2468 Head {h00=0x0030, h01=0x0050, text=» XCOPY SYSBUF,BIN4,W2,BIN7,W0 EXTENT NO. FEN«, t00=0x0017, t01=0x0054}
0x2468…247e Head {h00=0x0012, h01=0x0050, text=» SUB BIN4,W10 «, t00=0x0017, t01=0x0088}
0x247e…24bc Head {h00=0x003a, h01=0x0050, text=» CALL WRSECT,DISK,BIN1,SYSBUF,RETCOD WRITE THE SECTOR «, t00=0x0017, t01=0x009e}
0x24bc…24d0 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0017, t01=0x00dc}
0x24d0…24f2 Head {h00=0x001e, h01=0x0050, text=» SUB BIN5,W1 MORE EXTENTS «, t00=0x0017, t01=0x00f0}
0x24f2…2508 Head {h00=0x0012, h01=0x0050, text=» BP EXT910 YES«, t00=0x0017, t01=0x0112}
0x2508…2516 Head {h00=0x000a, h01=0x0050, text=»EXT925«, t00=0x0017, t01=0x0128}
0x2516…253a Head {h00=0x0020, h01=0x0050, text=» MOVE BIN5,W0 NO. OF EXTENTS«, t00=0x0017, t01=0x0136}
0x253a…255a Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,W0 SECTOR NO.«, t00=0x0017, t01=0x015a}
0x255a…2598 Head {h00=0x003a, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL«, t00=0x0017, t01=0x017a}
0x2598…25ac Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0018, t01=0x0028}
0x25ac…25da Head {h00=0x002a, h01=0x0050, text=» XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE«, t00=0x0018, t01=0x003c}
0x25da…260e Head {h00=0x0030, h01=0x0050, text=» MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT«, t00=0x0018, t01=0x006a}
0x260e…2644 Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH «, t00=0x0018, t01=0x009e}
0x2644…2674 Head {h00=0x002c, h01=0x0050, text=» XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH«, t00=0x0018, t01=0x00d4}
0x2674…26aa Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH «, t00=0x0018, t01=0x0104}
0x26aa…26ce Head {h00=0x0020, h01=0x0050, text=» ADD DKBIN3,W1 OCCUPYED BYTE«, t00=0x0018, t01=0x013a}
0x26ce…26fe Head {h00=0x002c, h01=0x0050, text=» SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS «, t00=0x0018, t01=0x015e}
0x26fe…2724 Head {h00=0x0022, h01=0x0050, text=» ADD BIN1,DKBIN1 START OF VTOC«, t00=0x0018, t01=0x018e}
0x2724…2732 Head {h00=0x000a, h01=0x0050, text=»EXT930«, t00=0x0019, t01=0x0024}
0x2732…276e Head {h00=0x0038, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR «, t00=0x0019, t01=0x0032}
0x276e…2782 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x0019, t01=0x006e}
0x2782…27a8 Head {h00=0x0022, h01=0x0050, text=» MOVE BIN4,W0 DISP TO FILENAME«, t00=0x0019, t01=0x0082}
0x27a8…27b6 Head {h00=0x000a, h01=0x0050, text=»EXT940«, t00=0x0019, t01=0x00a8}
0x27b6…27cc Head {h00=0x0012, h01=0x0050, text=» MOVE BIN3,W0 «, t00=0x0019, t01=0x00b6}
0x27cc…27f8 Head {h00=0x0028, h01=0x0050, text=» MATCH FILNAM,BIN3,W8,SYSBUF,BIN4,W8«, t00=0x0019, t01=0x00cc}
0x27f8…280c Head {h00=0x0010, h01=0x0050, text=» BOK EXT970 «, t00=0x0019, t01=0x00f8}
0x280c…281a Head {h00=0x000a, h01=0x0050, text=»EXT950«, t00=0x0019, t01=0x010c}
0x281a…2846 Head {h00=0x0028, h01=0x0050, text=» ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY«, t00=0x0019, t01=0x011a}
0x2846…287a Head {h00=0x0030, h01=0x0050, text=» CBL BIN4,=W'240',EXT940 ALL ENTRIES HANDLED«, t00=0x0019, t01=0x0146}
0x287a…28a2 Head {h00=0x0024, h01=0x0050, text=» SUB DKBIN2,W1 MORE VTOC RECORDS«, t00=0x0019, t01=0x017a}
0x28a2…28b4 Head {h00=0x000e, h01=0x0050, text=» BZ EXT975«, t00=0x001a, t01=0x0012}
0x28b4…28de Head {h00=0x0026, h01=0x0050, text=» ADD BIN1,W1 READ NEXT VTOC RECORD«, t00=0x001a, t01=0x0024}
0x28de…28f0 Head {h00=0x000e, h01=0x0050, text=» B EXT930 «, t00=0x001a, t01=0x004e}
0x28f0…28fe Head {h00=0x000a, h01=0x0050, text=»EXT970«, t00=0x001a, t01=0x0060}
0x28fe…2928 Head {h00=0x0026, h01=0x0050, text=» MOVE BIN12,=W'40' NO. OF EXTENTS «, t00=0x001a, t01=0x006e}
0x2928…2954 Head {h00=0x0028, h01=0x0050, text=» ADD BIN12,BIN4 DISP IN VTOC-RECORD «, t00=0x001a, t01=0x0098}
0x2954…297a Head {h00=0x0022, h01=0x0050, text=» XCOPY BIN5,W1,W1,SYSBUF,BIN12«, t00=0x001a, t01=0x00c4}
0x297a…29a8 Head {h00=0x002a, h01=0x0050, text=» CBE BIN5,W0,EXT975 AT LEAST ONE ENTRY«, t00=0x001a, t01=0x00ea}
0x29a8…29be Head {h00=0x0012, h01=0x0050, text=» ADD BIN5,BIN6«, t00=0x001a, t01=0x0118}
0x29be…29e4 Head {h00=0x0022, h01=0x0050, text=» XCOPY SYSBUF,BIN12,W1,BIN5,W1«, t00=0x001a, t01=0x012e}
0x29e4…2a22 Head {h00=0x003a, h01=0x0050, text=» CALL WRSECT,DISK,BIN1,SYSBUF,RETCOD WRITE THE SECTOR «, t00=0x001a, t01=0x0154}
0x2a22…2a36 (27, 0, 398) Head {h00=0x0010, h01=0x0050, text=» BNOK EXT750«, t00=0x001b, t01=0x0004}
0x2a36…2a44 Head {h00=0x000a, h01=0x0050, text=»EXT975«, t00=0x001b, t01=0x0018}
0x2a44…2a56 Head {h00=0x000e, h01=0x0050, text=» PERF HALT«, t00=0x001b, t01=0x0026}
0x2a56…2a66 Head {h00=0x000c, h01=0x0050, text=» B RETUR«, t00=0x001b, t01=0x0038}
0x2a66…2a74 Head {h00=0x000a, h01=0x0050, text=»EXT990«, t00=0x001b, t01=0x0048}
0x2a74…2a8c Head {h00=0x0014, h01=0x0050, text=» PERF CLOFIL,W3 «, t00=0x001b, t01=0x0056}
0x2a8c…2a9a Head {h00=0x000a, h01=0x0050, text=»EXT995«, t00=0x001b, t01=0x006e}
0x2a9a…2ab2 Head {h00=0x0014, h01=0x0050, text=» PERF CLOFIL,W1 «, t00=0x001b, t01=0x007c}
0x2ab2…2ac4 Head {h00=0x000e, h01=0x0050, text=» B EXT750 «, t00=0x001b, t01=0x0094}
0x2ac4…2ad2 Head {h00=0x000a, h01=0x0050, text=»RETUR «, t00=0x001b, t01=0x00a6}
0x2ad2…2b0e Head {h00=0x0038, h01=0x0050, text=» TBF BOOL4,RETUR2 BRANCH IF NEVER CHANGED! (830927) «, t00=0x001b, t01=0x00b4}
0x2b0e…2b44 Head {h00=0x0032, h01=0x0050, text=» PERF CHVNAM,VOLNAM,FCOD CHANGE NAME TO ORIGIN«, t00=0x001b, t01=0x00f0}
0x2b44…2b52 Head {h00=0x000a, h01=0x0050, text=»RETUR2«, t00=0x001b, t01=0x0126}
0x2b52…2b88 Head {h00=0x0032, h01=0x0050, text=» CLEAR BOOL4 SETOFF "VOLNAM CHANGED" (830927) «, t00=0x001b, t01=0x0134}
0x2b88…2b94 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001b, t01=0x016a}
0x2b94…2ba2 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001b, t01=0x0176}
0x2ba2…2bb0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0184}
0x2bb0…2bba (28, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0004}
0x2bba…2bc4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x000e}
0x2bc4…2bdc Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x001c, t01=0x0018}
0x2bdc…2bf4 Head {h00=0x0014, h01=0x0050, text=»* CLOSE FILE *«, t00=0x001c, t01=0x0030}
0x2bf4…2c0c Head {h00=0x0014, h01=0x0050, text=»****************«, t00=0x001c, t01=0x0048}
0x2c0c…2c22 Head {h00=0x0012, h01=0x0050, text=»CLOFIL PROC FC«, t00=0x001c, t01=0x0060}
0x2c22…2c32 Head {h00=0x000c, h01=0x0050, text=» PBIN FC«, t00=0x001c, t01=0x0076}
0x2c32…2c6a Head {h00=0x0034, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(FC),SYSBUF,W0,DEBINW4«, t00=0x001c, t01=0x0086}
0x2c6a…2c76 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001c, t01=0x00be}
0x2c76…2c84 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x001c, t01=0x00ca}
0x2c84…2c92 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00d8}
0x2c92…2cb2 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x001c, t01=0x00e6}
0x2cb2…2cd2 Head {h00=0x001c, h01=0x0050, text=»* GET NO.OF USED * «, t00=0x001c, t01=0x0106}
0x2cd2…2cf2 Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x001c, t01=0x0126}
0x2cf2…2d06 Head {h00=0x0010, h01=0x0050, text=»WUEXT1 PROC «, t00=0x001c, t01=0x0146}
0x2d06…2d1e Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x001c, t01=0x015a}
0x2d1e…2d36 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCOD,W0 «, t00=0x001c, t01=0x0172}
0x2d36…2d52 Head {h00=0x0018, h01=0x0050, text=» MOVE RECNUM,=D'00' «, t00=0x001c, t01=0x018a}
0x2d52…2d92 Head {h00=0x003c, h01=0x0050, text=» PERF CHVNAM,VOLEX1,FCOD CHANGE NAME TO TEMP. (111....1)«, t00=0x001d, t01=0x0016}
0x2d92…2da6 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT755«, t00=0x001d, t01=0x0056}
0x2da6…2dda Head {h00=0x0030, h01=0x0050, text=» SET BOOL4 INDICATE VOLNAM CHANGED (830927) «, t00=0x001d, t01=0x006a}
0x2dda…2e1c Head {h00=0x003e, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD «, t00=0x001d, t01=0x009e}
0x2e1c…2e30 Head {h00=0x0010, h01=0x0050, text=» BOK EXT120 «, t00=0x001d, t01=0x00e0}
0x2e30…2e60 Head {h00=0x002c, h01=0x0050, text=» MOVE DEBINW4,W9 SYSTEMFILE NOT CREATED «, t00=0x001d, t01=0x00f4}
0x2e60…2e6c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x0124}
0x2e6c…2e7a Head {h00=0x000a, h01=0x0050, text=»EXT115«, t00=0x001d, t01=0x0130}
0x2e7a…2ea6 Head {h00=0x0028, h01=0x0050, text=» MOVE DEBINW4,W18 DISC NOT OPERABLE «, t00=0x001d, t01=0x013e}
0x2ea6…2eb2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x001d, t01=0x016a}
0x2eb2…2ec0 Head {h00=0x000a, h01=0x0050, text=»EXT120«, t00=0x001d, t01=0x0176}
0x2ec0…2efa Head {h00=0x0036, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(W1),RBUF,RECNUM,RETCOD «, t00=0x001d, t01=0x0184}
0x2efa…2f2e Head {h00=0x0030, h01=0x0050, text=» MOVE BCDI21(W2),=D'00' USED FOR NO. OF RECS«, t00=0x001e, t01=0x002e}
0x2f2e…2f52 Head {h00=0x0020, h01=0x0050, text=» MOVE BIN5,W0 NO. OF EXTENTS«, t00=0x001e, t01=0x0062}
0x2f52…2f72 Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,W0 SECTOR NO.«, t00=0x001e, t01=0x0086}
0x2f72…2f96 Head {h00=0x0020, h01=0x0050, text=» MOVE BIN7,W0 EXTENT NUMBER «, t00=0x001e, t01=0x00a6}
0x2f96…2fd4 Head {h00=0x003a, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL«, t00=0x001e, t01=0x00ca}
0x2fd4…2fe8 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT115«, t00=0x001e, t01=0x0108}
0x2fe8…3016 Head {h00=0x002a, h01=0x0050, text=» XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE«, t00=0x001e, t01=0x011c}
0x3016…304a Head {h00=0x0030, h01=0x0050, text=» MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT«, t00=0x001e, t01=0x014a}
0x304a…3080 Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH «, t00=0x001e, t01=0x017e}
0x3080…30b0 Head {h00=0x002c, h01=0x0050, text=» XCOPY DKBIN2,W0,W2,SYSBUF,W6 ADM-LENGTH«, t00=0x001f, t01=0x0024}
0x30b0…30e6 Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN3,W0,W2,SYSBUF,W12 VTOC-REC-LEGTH «, t00=0x001f, t01=0x0054}
0x30e6…310a Head {h00=0x0020, h01=0x0050, text=» ADD DKBIN3,W1 OCCUPYED BYTE«, t00=0x001f, t01=0x008a}
0x310a…313a Head {h00=0x002c, h01=0x0050, text=» SUB DKBIN2,DKBIN1 GET NO. OF VTOC RECS «, t00=0x001f, t01=0x00ae}
0x313a…3160 Head {h00=0x0022, h01=0x0050, text=» ADD BIN1,DKBIN1 START OF VTOC«, t00=0x001f, t01=0x00de}
0x3160…316e Head {h00=0x000a, h01=0x0050, text=»EXT130«, t00=0x001f, t01=0x0104}
0x316e…31aa Head {h00=0x0038, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR «, t00=0x001f, t01=0x0112}
0x31aa…31be Head {h00=0x0010, h01=0x0050, text=» BNOK EXT115«, t00=0x001f, t01=0x014e}
0x31be…31e4 Head {h00=0x0022, h01=0x0050, text=» MOVE BIN4,W0 DISP TO FILENAME«, t00=0x001f, t01=0x0162}
0x31e4…31f2 Head {h00=0x000a, h01=0x0050, text=»EXT140«, t00=0x001f, t01=0x0188}
0x31f2…3208 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN3,W0 «, t00=0x0020, t01=0x0008}
0x3208…3234 Head {h00=0x0028, h01=0x0050, text=» MATCH FILNAM,BIN3,W8,SYSBUF,BIN4,W8«, t00=0x0020, t01=0x001e}
0x3234…3248 Head {h00=0x0010, h01=0x0050, text=» BOK EXT170 «, t00=0x0020, t01=0x004a}
0x3248…3256 Head {h00=0x000a, h01=0x0050, text=»EXT150«, t00=0x0020, t01=0x005e}
0x3256…3282 Head {h00=0x0028, h01=0x0050, text=» ADD BIN4,DKBIN3 GET NEXT VTOC ENTRY«, t00=0x0020, t01=0x006c}
0x3282…32b6 Head {h00=0x0030, h01=0x0050, text=» CBL BIN4,=W'240',EXT140 ALL ENTRIES HANDLED«, t00=0x0020, t01=0x0098}
0x32b6…32de Head {h00=0x0024, h01=0x0050, text=» SUB DKBIN2,W1 MORE VTOC RECORDS«, t00=0x0020, t01=0x00cc}
0x32de…32f2 Head {h00=0x0010, h01=0x0050, text=» BNZ EXT160 «, t00=0x0020, t01=0x00f4}
0x32f2…3326 Head {h00=0x0030, h01=0x0050, text=» CBNE BCDI21(W2),=D'00',EXT180 FILE HANDLED «, t00=0x0020, t01=0x0108}
0x3326…3340 Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W12 «, t00=0x0020, t01=0x013c}
0x3340…334c Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0020, t01=0x0156}
0x334c…335a Head {h00=0x000a, h01=0x0050, text=»EXT160«, t00=0x0020, t01=0x0162}
0x335a…3384 Head {h00=0x0026, h01=0x0050, text=» ADD BIN1,W1 READ NEXT VTOC RECORD«, t00=0x0020, t01=0x0170}
0x3384…3396 Head {h00=0x000e, h01=0x0050, text=» B EXT130 «, t00=0x0021, t01=0x000a}
0x3396…33a4 Head {h00=0x000a, h01=0x0050, text=»EXT170«, t00=0x0021, t01=0x001c}
0x33a4…33d0 Head {h00=0x0028, h01=0x0050, text=» CBNE BIN5,W0,EXT175 NO. OF EXTENTS «, t00=0x0021, t01=0x002a}
0x33d0…33fa Head {h00=0x0026, h01=0x0050, text=» MOVE BIN12,=W'40' NO. OF EXTENTS «, t00=0x0021, t01=0x0056}
0x33fa…3426 Head {h00=0x0028, h01=0x0050, text=» ADD BIN12,BIN4 DISP IN VTOC-RECORD «, t00=0x0021, t01=0x0080}
0x3426…344c Head {h00=0x0022, h01=0x0050, text=» XCOPY BIN5,W1,W1,SYSBUF,BIN12«, t00=0x0021, t01=0x00ac}
0x344c…347c Head {h00=0x002c, h01=0x0050, text=» CBNE BIN5,W0,EXT175 AT LEAST ONE ENTRY «, t00=0x0021, t01=0x00d2}
0x347c…3498 Head {h00=0x0018, h01=0x0050, text=» MOVE BIN5,=X'7FFF' «, t00=0x0021, t01=0x0102}
0x3498…34a6 Head {h00=0x000a, h01=0x0050, text=»EXT175«, t00=0x0021, t01=0x011e}
0x34a6…34ce Head {h00=0x0024, h01=0x0050, text=» MOVE BIN2,W10 FILE EXT NO FEN «, t00=0x0021, t01=0x012c}
0x34ce…34f8 Head {h00=0x0026, h01=0x0050, text=» ADD BIN2,BIN4 DISP IN VTOC-RECORD«, t00=0x0021, t01=0x0154}
0x34f8…351e Head {h00=0x0022, h01=0x0050, text=» XCOPY BIN6,W0,W2,SYSBUF,BIN2 «, t00=0x0021, t01=0x017e}
0x351e…353c Head {h00=0x001a, h01=0x0050, text=» CBL BIN6,BIN7,EXT177 «, t00=0x0022, t01=0x0014}
0x353c…3554 Head {h00=0x0014, h01=0x0050, text=» MOVE BIN7,BIN6 «, t00=0x0022, t01=0x0032}
0x3554…3562 Head {h00=0x000a, h01=0x0050, text=»EXT177«, t00=0x0022, t01=0x004a}
0x3562…3576 Head {h00=0x0010, h01=0x0050, text=» ADD BIN2,W2«, t00=0x0022, t01=0x0058}
0x3576…35aa Head {h00=0x0030, h01=0x0050, text=» XCOPY BIN10,W0,W2,SYSBUF,BIN2 FILE EXTENT 1«, t00=0x0022, t01=0x006c}
0x35aa…35be Head {h00=0x0010, h01=0x0050, text=» ADD BIN2,W2«, t00=0x0022, t01=0x00a0}
0x35be…35f2 Head {h00=0x0030, h01=0x0050, text=» XCOPY BIN11,W0,W2,SYSBUF,BIN2 FILE EXTENT 2«, t00=0x0022, t01=0x00b4}
0x35f2…361e Head {h00=0x0028, h01=0x0050, text=» CALL BINBCD,BIN10,BIN11,BCDI21(W1) «, t00=0x0022, t01=0x00e8}
0x361e…3640 Head {h00=0x001e, h01=0x0050, text=» ADD BCDI21(W2),BCDI21(W1)«, t00=0x0022, t01=0x0114}
0x3640…3662 Head {h00=0x001e, h01=0x0050, text=» SUB BIN5,W1 MORE EXTENTS «, t00=0x0022, t01=0x0136}
0x3662…3674 Head {h00=0x000e, h01=0x0050, text=» BP EXT150«, t00=0x0022, t01=0x0158}
0x3674…3682 Head {h00=0x000a, h01=0x0050, text=»EXT180«, t00=0x0022, t01=0x016a}
0x3682…36a2 Head {h00=0x001c, h01=0x0050, text=» MOVE NORECO,BCDI21(W2) «, t00=0x0022, t01=0x0178}
0x36a2…36ae Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0023, t01=0x0008}
0x36ae…36bc Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0023, t01=0x0014}
0x36bc…36ca Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x0022}
0x36ca…36ec Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0023, t01=0x0030}
0x36ec…370c Head {h00=0x001c, h01=0x0050, text=»* GET NO. OF FREE *«, t00=0x0023, t01=0x0052}
0x370c…372c Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x0023, t01=0x0072}
0x372c…3740 Head {h00=0x0010, h01=0x0050, text=»WUEXT2 PROC «, t00=0x0023, t01=0x0092}
0x3740…3758 Head {h00=0x0014, h01=0x0050, text=» MOVE DEBINW4,W0«, t00=0x0023, t01=0x00a6}
0x3758…3770 Head {h00=0x0014, h01=0x0050, text=» MOVE RETCOD,W0 «, t00=0x0023, t01=0x00be}
0x3770…37b2 Head {h00=0x003e, h01=0x0050, text=» CALL OPENF,DISK,FILECODE(W1),SYSBUF,FILNAM,VOLEX1,RETCOD «, t00=0x0023, t01=0x00d6}
0x37b2…37c6 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT220«, t00=0x0023, t01=0x0118}
0x37c6…37d4 Head {h00=0x000a, h01=0x0050, text=»EXT210«, t00=0x0023, t01=0x012c}
0x37d4…380e Head {h00=0x0036, h01=0x0050, text=» CALL CLOSEF,DISK,FILECODE(W1),RBUF,RECNUM,RETCOD «, t00=0x0023, t01=0x013a}
0x380e…3846 Head {h00=0x0034, h01=0x0050, text=» MOVE BCDI21(W2),=D'00' NUMBER OF FREE SECTORS «, t00=0x0023, t01=0x0174}
0x3846…3866 Head {h00=0x001c, h01=0x0050, text=» MOVE BIN1,W0 SECTOR NO.«, t00=0x0024, t01=0x001c}
0x3866…38a4 Head {h00=0x003a, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ VOLUME-LABEL«, t00=0x0024, t01=0x003c}
0x38a4…38b8 Head {h00=0x0010, h01=0x0050, text=» BNOK EXT220«, t00=0x0024, t01=0x007a}
0x38b8…38e6 Head {h00=0x002a, h01=0x0050, text=» XCOPY BIN1,W0,W2,SYSBUF,W10 FSAT BASE«, t00=0x0024, t01=0x008e}
0x38e6…391a Head {h00=0x0030, h01=0x0050, text=» MOVE DKBIN2,=W'46' FSAT-LENGTH DISPLACEMENT«, t00=0x0024, t01=0x00bc}
0x391a…3950 Head {h00=0x0032, h01=0x0050, text=» XCOPY DKBIN1,W0,W2,SYSBUF,DKBIN2 FSAT-LENGTH «, t00=0x0024, t01=0x00f0}
0x3950…395e Head {h00=0x000a, h01=0x0050, text=»EXT215«, t00=0x0024, t01=0x0126}
0x395e…399a Head {h00=0x0038, h01=0x0050, text=» CALL RDSECT,DISK,BIN1,SYSBUF,RETCOD READ ONESECTOR «, t00=0x0024, t01=0x0134}
0x399a…39ae Head {h00=0x0010, h01=0x0050, text=» BOK EXT230 «, t00=0x0024, t01=0x0170}
0x39ae…39bc Head {h00=0x000a, h01=0x0050, text=»EXT220«, t00=0x0024, t01=0x0184}
0x39bc…39d6 (37, 0, 398) Head {h00=0x0016, h01=0x0050, text=» MOVE DEBINW4,W22 «, t00=0x0025, t01=0x0004}
0x39d6…39e2 Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0025, t01=0x001e}
0x39e2…39f0 Head {h00=0x000a, h01=0x0050, text=»EXT230«, t00=0x0025, t01=0x002a}
0x39f0…3a06 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN6,W1 «, t00=0x0025, t01=0x0038}
0x3a06…3a1c Head {h00=0x0012, h01=0x0050, text=» MOVE BIN5,W2 «, t00=0x0025, t01=0x004e}
0x3a1c…3a32 Head {h00=0x0012, h01=0x0050, text=» MOVE BIN3,W0 «, t00=0x0025, t01=0x0064}
0x3a32…3a40 Head {h00=0x000a, h01=0x0050, text=»EXT240«, t00=0x0025, t01=0x007a}
0x3a40…3a80 Head {h00=0x003c, h01=0x0050, text=» XCOPY BIN10,W0,W2,SYSBUF,BIN3 1:ST WORD IN NO OF FS REC«, t00=0x0025, t01=0x0088}
0x3a80…3ac0 Head {h00=0x003c, h01=0x0050, text=» XCOPY BIN11,W0,W2,SYSBUF,BIN5 2:ST WORD IN NO OF FS REC«, t00=0x0025, t01=0x00c8}
0x3ac0…3aec Head {h00=0x0028, h01=0x0050, text=» CALL BINBCD,BIN10,BIN11,BCDI21(W1) «, t00=0x0025, t01=0x0108}
0x3aec…3b0e Head {h00=0x001e, h01=0x0050, text=» ADD BCDI21(W2),BCDI21(W1)«, t00=0x0025, t01=0x0134}
0x3b0e…3b4a Head {h00=0x0038, h01=0x0050, text=» CBE BIN6,=W'32',EXT250 JUMP IF ALL ENTRIES HANDLED «, t00=0x0025, t01=0x0156}
0x3b4a…3b5e (38, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ADD BIN5,W8«, t00=0x0026, t01=0x0004}
0x3b5e…3b88 Head {h00=0x0026, h01=0x0050, text=» ADD BIN6,W1 HANDLE NEXT ENTRY IN «, t00=0x0026, t01=0x0018}
0x3b88…3bb0 Head {h00=0x0024, h01=0x0050, text=» ADD BIN3,W8 CURRENT FSAT-RECORD«, t00=0x0026, t01=0x0042}
0x3bb0…3bc2 Head {h00=0x000e, h01=0x0050, text=» B EXT240 «, t00=0x0026, t01=0x006a}
0x3bc2…3bd0 Head {h00=0x000a, h01=0x0050, text=»EXT250«, t00=0x0026, t01=0x007c}
0x3bd0…3bf2 Head {h00=0x001e, h01=0x0050, text=» SUB DKBIN1,W1 FSAT-LENGTH«, t00=0x0026, t01=0x008a}
0x3bf2…3c1e Head {h00=0x0028, h01=0x0050, text=» BZ EXT260 JUMP IF ALL FSAT-RECORDS «, t00=0x0026, t01=0x00ac}
0x3c1e…3c30 Head {h00=0x000e, h01=0x0050, text=» HANDLED«, t00=0x0026, t01=0x00d8}
0x3c30…3c5e Head {h00=0x002a, h01=0x0050, text=» ADD BIN1,W1 INCREMENT RECORDNUMBER TO«, t00=0x0026, t01=0x00ea}
0x3c5e…3c80 Head {h00=0x001e, h01=0x0050, text=» B EXT215 NEXT FSAT-RECORD«, t00=0x0026, t01=0x0118}
0x3c80…3c8e Head {h00=0x000a, h01=0x0050, text=»EXT260«, t00=0x0026, t01=0x013a}
0x3c8e…3c9a Head {h00=0x0008, h01=0x0050, text=» RET«, t00=0x0026, t01=0x0148}
0x3c9a…3ca8 Head {h00=0x000a, h01=0x0050, text=» PEND «, t00=0x0026, t01=0x0154}
0x3ca8…3cb6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0162}
0x3cb6…3cc8 Head {h00=0x000e, h01=0x0050, text=»FEXT FRMT «, t00=0x0026, t01=0x0170}
0x3cc8…3cd4 Head {h00=0x0008, h01=0x0050, text=» FSL«, t00=0x0026, t01=0x0182}
0x3cd4…3ce0 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0026, t01=0x018e}
0x3ce0…3cf4 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0027, t01=0x000a}
0x3cf4…3d08 Head {h00=0x0010, h01=0x0050, text=» FATTR .INV «, t00=0x0027, t01=0x001e}
0x3d08…3d32 Head {h00=0x0026, h01=0x0050, text=» FCOPY =C'EXTEND WSM SYSTEM FILE' «, t00=0x0027, t01=0x0032}
0x3d32…3d46 Head {h00=0x0010, h01=0x0050, text=» FLINK FFILE«, t00=0x0027, t01=0x005c}
0x3d46…3d54 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0027, t01=0x0070}
0x3d54…3d5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x007e}
0x3d5e…3d70 Head {h00=0x000e, h01=0x0050, text=»FFILE FRMT«, t00=0x0027, t01=0x0088}
0x3d70…3d7c Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0027, t01=0x009a}
0x3d7c…3d90 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0027, t01=0x00a6}
0x3d90…3da8 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'UNIT:'«, t00=0x0027, t01=0x00ba}
0x3da8…3dda Head {h00=0x002e, h01=0x0050, text=» FKI 6,MINL=3,MAXL=3,ME,ALPHA,NEOI,APPL=5 «, t00=0x0027, t01=0x00d2}
0x3dda…3df0 Head {h00=0x0012, h01=0x0050, text=» FCOPY INUNIT «, t00=0x0027, t01=0x0104}
0x3df0…3e04 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0027, t01=0x011a}
0x3e04…3e14 Head {h00=0x000c, h01=0x0050, text=» FTAB 12«, t00=0x0027, t01=0x012e}
0x3e14…3e34 Head {h00=0x001c, h01=0x0050, text=» FCOPY =C'VOLUME-NAME:' «, t00=0x0027, t01=0x013e}
0x3e34…3e44 Head {h00=0x000c, h01=0x0050, text=» FINP 25«, t00=0x0027, t01=0x015e}
0x3e44…3e5a Head {h00=0x0012, h01=0x0050, text=» FCOPY VOLNAM «, t00=0x0027, t01=0x016e}
0x3e5a…3e66 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0027, t01=0x0184}
0x3e66…3e7a Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0027, t01=0x0190}
0x3e7a…3e96 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'FILENAME:'«, t00=0x0028, t01=0x0014}
0x3e96…3ed0 Head {h00=0x0036, h01=0x0050, text=» FKI 10,MINL=1,MAXL=8,ME,REWRT,APPL=14,ALPHA,NEOI «, t00=0x0028, t01=0x0030}
0x3ed0…3ee6 Head {h00=0x0012, h01=0x0050, text=» FCOPY FILNAM «, t00=0x0028, t01=0x006a}
0x3ee6…3ef2 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0028, t01=0x0080}
0x3ef2…3efe Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0028, t01=0x008c}
0x3efe…3f12 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0028, t01=0x0098}
0x3f12…3f26 Head {h00=0x0010, h01=0x0050, text=» FATTR .INV «, t00=0x0028, t01=0x00ac}
0x3f26…3f42 Head {h00=0x0018, h01=0x0050, text=» FCOPY =C'EXISTING' «, t00=0x0028, t01=0x00c0}
0x3f42…3f52 Head {h00=0x000c, h01=0x0050, text=» FTAB 10«, t00=0x0028, t01=0x00dc}
0x3f52…3f6a Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x0028, t01=0x00ec}
0x3f6a…3f76 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0028, t01=0x0104}
0x3f76…3f8a Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0028, t01=0x0110}
0x3f8a…3fa0 Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'NO.'«, t00=0x0028, t01=0x0124}
0x3fa0…3fb0 Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x0028, t01=0x013a}
0x3fb0…3fce Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'OF RECORDS:'«, t00=0x0028, t01=0x014a}
0x3fce…3fe2 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0028, t01=0x0168}
0x3fe2…3ff2 Head {h00=0x000c, h01=0x0050, text=» FINP 17«, t00=0x0028, t01=0x017c}
0x3ff2…400e Head {h00=0x0018, h01=0x0050, text=» FMEL 'TTTTX',NORECO«, t00=0x0028, t01=0x018c}
0x400e…401a Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0029, t01=0x0018}
0x401a…4026 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0029, t01=0x0024}
0x4026…403a Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0029, t01=0x0030}
0x403a…404e Head {h00=0x0010, h01=0x0050, text=» FATTR .INV «, t00=0x0029, t01=0x0044}
0x404e…4068 Head {h00=0x0016, h01=0x0050, text=» FCOPY =C'EXTEND '«, t00=0x0029, t01=0x0058}
0x4068…4080 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C'FILE' «, t00=0x0029, t01=0x0072}
0x4080…4098 Head {h00=0x0014, h01=0x0050, text=» FCOPY =C' WITH'«, t00=0x0029, t01=0x008a}
0x4098…40a4 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x0029, t01=0x00a2}
0x40a4…40b8 Head {h00=0x0010, h01=0x0050, text=» FATTR .HIGH«, t00=0x0029, t01=0x00ae}
0x40b8…40ce Head {h00=0x0012, h01=0x0050, text=» FCOPY =C'NO.'«, t00=0x0029, t01=0x00c2}
0x40ce…40de Head {h00=0x000c, h01=0x0050, text=» FTAB 5 «, t00=0x0029, t01=0x00d8}
0x40de…40fc Head {h00=0x001a, h01=0x0050, text=» FCOPY =C'OF RECORDS:'«, t00=0x0029, t01=0x00e8}
0x40fc…413e Head {h00=0x003e, h01=0x0050, text=» FKI 17,MINL=1,MAXL=5,ME,NEOI,REWRT,APPL=15 NO. OF RECORDS«, t00=0x0029, t01=0x0106}
0x413e…415c Head {h00=0x001a, h01=0x0050, text=» FMEL 'TTTTTTX',NOREC «, t00=0x0029, t01=0x0148}
0x415c…4170 Head {h00=0x0010, h01=0x0050, text=» FLINK FHEX «, t00=0x0029, t01=0x0166}
0x4170…417e Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x0029, t01=0x017a}
0x417e…4188 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0188}
0x4188…419a (42, 2, 122) Head {h00=0x000e, h01=0x0050, text=»FHEX FRMT «, t00=0x002a, t01=0x0004}
0x419a…41a6 Head {h00=0x0008, h01=0x0050, text=» FNL«, t00=0x002a, t01=0x0016}
0x41a6…41c2 Head {h00=0x0018, h01=0x0050, text=» FKI 1,MINL=0,MAXL=0«, t00=0x002a, t01=0x0022}
0x41c2…41d6 Head {h00=0x0010, h01=0x0050, text=» FCOPY HEX00«, t00=0x002a, t01=0x003e}
0x41d6…41e4 Head {h00=0x000a, h01=0x0050, text=» FMEND«, t00=0x002a, t01=0x0052}
0x41e4…41ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0060}
0x41ee…41fa Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002a, t01=0x006a}
0x41fa…41fe Head {h00=0x4004, h01=0x0000}
0x41fe…4202 00 2a 00 76 ┆ * v┆
0x4202…420a (43, 1, 8) 20 04 00 00 00 2b 00 04 ┆ + ┆
0x420a…425a (44, 3, 8191) 00 5c 6b 00 00 04 00 02 00 1a 00 f5 01 04 00 00 00 a4 00 00 00 02 4f 04 00 6e 6b 06 00 0c 00 02 4f 00 00 77 00 00 00 00 00 2a 00 f6 01 07 00 00 00 d5 00 00 00 02 4f 04 00 30 4f 04 00 5c 4f 08 00 5a 4f 0a 00 3b 61 0a ff fc 00 01 4f 00 00 6c ┆ k O nk O w * O 0O O ZO ;a O l┆
0x425a…42aa 4f 00 00 65 00 00 00 00 00 1e 00 f7 01 04 00 00 00 bc 00 00 00 02 4f 08 00 78 4f 0a 00 59 61 00 ff fc 00 01 4f 00 00 5a 00 1c 00 f8 01 05 00 00 00 a0 00 00 00 02 4f 04 00 1b 4f 04 00 78 4f 04 00 73 4f 00 00 78 00 00 00 1e 00 f9 01 04 00 00 ┆O e O xO Ya O Z O O xO sO x ┆
0x42aa…42fa 00 bc 00 00 00 06 4f 0a 00 59 61 0a ff fc 00 01 4f 00 00 32 4f 00 00 78 00 28 00 fa 01 05 00 00 00 d1 00 00 00 06 4f 0a 00 59 61 0e ff fc 00 01 4f 00 00 5a 4f 0a 00 59 61 00 ff fc 00 01 4f 00 00 32 00 00 00 00 00 00 00 28 00 fb 01 05 00 00 ┆ O Ya O 2O x ( O Ya O ZO Ya O 2 ( ┆
0x42fa…434a 00 bc 00 00 00 06 4f 0a 00 59 61 0e ff fc 00 01 4f 00 00 39 4f 0a 00 59 61 00 ff fc 00 01 4f 00 00 5a 00 00 00 00 00 00 00 1e 00 fc 01 04 00 00 00 bc 00 00 00 02 4f 08 00 5c 4f 0a 00 59 61 00 ff fc 00 01 4f 00 00 5a 00 1c 00 fd 01 05 00 00 ┆ O Ya O 9O Ya O Z O O Ya O Z ┆
0x434a…439a 00 a0 00 00 00 02 4f 04 00 1b 4f 04 00 5c 4f 04 00 79 4f 00 00 5c 00 00 00 1e 00 fe 01 04 00 00 00 bc 00 00 00 06 4f 0a 00 59 61 0a ff fc 00 01 4f 00 00 5a 4f 00 00 5c 00 16 00 ff 01 03 00 00 00 bc 00 00 00 02 4f 04 00 5c 6b 00 00 10 00 02 ┆ O O O yO O Ya O ZO O k ┆
0x439a…43ea 7f ff 7f ff 7f ff 00 6d f0 3a 00 28 01 00 01 05 00 00 00 bc 00 00 00 06 4f 0a 00 59 61 0e ff fc 00 01 4f 00 00 32 4f 0a 00 59 61 00 ff fc 00 01 4f 00 00 5a 00 00 00 00 00 00 00 20 01 01 01 04 00 00 00 be 00 00 00 06 4f 0a 00 59 61 0a ff fc ┆ m : ( O Ya O 2O Ya O Z O Ya ┆
0x43ea…443a 00 01 4f 00 00 32 6b 00 00 18 00 02 00 00 00 00 00 00 00 2c 01 02 01 06 00 00 00 a1 00 00 00 06 4f 0a 00 59 61 0e ff fc 00 01 4f 00 00 32 4f 0a 00 59 61 0a ff fc 00 01 4f 00 00 39 4f 00 00 7a 00 00 00 20 01 03 01 04 00 00 00 88 00 00 00 06 ┆ O 2k , O Ya O 2O Ya O 9O z ┆
0x443a…448a 4f 0a 00 59 61 0a ff fc 00 01 4f 00 00 5a 6b 00 00 20 00 02 00 00 00 00 00 00 00 0c 01 04 01 00 00 7a 00 86 00 00 00 00 00 00 00 26 01 05 01 06 00 00 00 a0 00 00 00 02 4f 08 00 11 4f 0a 00 59 61 0a ff fc 00 01 4f 00 00 5a 4f 04 00 70 4f 00 ┆O Ya O Zk z & O O Ya O ZO pO ┆
0x448a…44da 00 71 00 20 01 06 01 06 00 00 00 d5 00 00 00 02 4f 04 00 30 4f 04 00 5c 4f 04 00 5a 4f 04 00 71 4f 00 00 27 00 00 00 00 00 00 00 10 01 07 01 02 00 00 00 89 00 00 00 02 4f 00 00 7b 00 00 00 00 00 00 00 0c 01 08 01 00 00 77 00 86 00 00 00 00 ┆ q O 0O O ZO qO ' O { w ┆
0x44da…452a 00 00 00 1c 01 09 01 05 00 00 00 a0 00 00 00 02 4f 04 00 1a 4f 04 00 62 4f 04 00 64 4f 00 00 62 00 00 00 14 01 0a 01 03 00 00 00 bc 00 00 00 02 4f 04 00 7c 4f 00 00 62 00 00 00 14 01 0b 01 03 00 00 00 bc 00 00 00 02 4f 04 00 5b 4f 00 00 27 ┆ O O bO dO b O |O b O [O '┆
0x452a…457a 00 00 00 0c 01 0c 01 00 00 7d 54 02 1f 01 ff 1c 00 6d 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ }T m ┆
0x457a…45ca 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x46ba…470a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 6d 00 0c 0d a8 0d b0 0d b8 0d c0 0d c8 0d d0 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ m ┆
0x470a…475a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ┆ ┆
[…0x3…]
0x484a…489a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 6d 01 90 00 2c 00 50 20 49 44 45 4e 54 20 57 55 44 49 56 20 52 45 4c 3d 32 2e 33 2c 38 35 30 39 30 31 2c 38 37 30 31 35 35 39 34 ┆ m , P IDENT WUDIV REL=2.3,850901,87015594┆
0x489a…48ea 30 32 33 30 00 00 00 04 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆0230 L P********************************************************************┆
0x48ea…493a 2a 2a 2a 2a 00 00 00 34 00 06 00 50 2a 20 00 00 00 84 00 06 00 50 2a 20 00 00 00 8e 00 16 00 50 2a 20 20 57 20 20 20 20 53 20 20 20 20 20 20 20 4d 20 00 00 00 98 00 06 00 50 2a 20 00 00 00 b2 00 3c 00 50 2a 20 20 57 4f 52 4b 20 53 54 41 54 ┆**** 4 P* P* P* W S M P* < P* WORK STAT┆
0x493a…498a 49 4f 4e 20 4d 41 4e 41 47 45 4d 45 4e 54 20 55 54 49 4c 49 54 59 20 50 52 4f 47 52 41 4d 53 20 44 41 54 41 44 49 56 49 53 49 4f 4e 00 00 00 bc 00 06 00 50 2a 20 00 00 00 fc 00 16 00 50 2a 20 20 44 44 49 56 20 46 4f 52 20 57 55 3a 49 4e 54 ┆ION MANAGEMENT UTILITY PROGRAMS DATADIVISION P* P* DDIV FOR WU:INT┆
0x498a…49da 00 00 01 06 00 16 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 57 55 3a 46 49 4c 00 00 01 20 00 06 00 50 2a 20 00 00 01 3a 00 06 00 50 2a 20 00 00 01 44 00 4c 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P* WU:FIL P* : P* D L P**************************┆
0x49da…4a2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 01 4c 00 20 00 1c 00 6d 01 90 2a 2a 2a 2a 2a 2a 00 00 01 4e 00 04 00 50 00 01 00 0e 00 04 00 50 00 01 00 16 00 10 00 50 ┆**************************************** L m ****** N P P P┆
0x4a2a…4a7a 2a 2a 20 48 49 53 54 4f 52 59 3a 20 00 01 00 1e 00 04 00 50 00 01 00 32 00 44 00 50 2a 2a 20 38 35 2d 30 39 2d 31 30 2f 43 4a 20 20 20 20 53 55 50 50 4f 52 54 20 4f 46 20 4e 45 57 20 57 43 48 2d 44 49 53 43 20 50 54 53 20 36 37 39 33 20 41 ┆** HISTORY: P 2 D P** 85-09-10/CJ SUPPORT OF NEW WCH-DISC PTS 6793 A┆
0x4a7a…4aca 4e 44 20 50 54 53 20 36 37 39 34 20 00 01 00 3a 00 3c 00 50 2a 2a 20 38 35 2d 30 31 2d 32 35 2f 43 4a 20 20 20 20 53 55 50 50 4f 52 54 20 4f 46 20 57 43 48 2d 44 49 53 43 20 50 54 53 20 36 37 39 34 20 46 4f 52 20 36 39 32 33 20 00 01 00 82 ┆ND PTS 6794 : < P** 85-01-25/CJ SUPPORT OF WCH-DISC PTS 6794 FOR 6923 ┆
0x4aca…4b1a 00 32 00 50 2a 2a 20 38 34 2d 31 32 2d 31 31 2f 43 4a 20 20 20 20 49 44 45 4e 54 4c 49 4e 45 20 55 50 44 41 54 45 44 20 54 4f 20 38 34 31 32 31 31 20 00 01 00 c2 00 3c 00 50 2a 2a 20 38 34 2d 31 32 2d 30 34 2f 43 4a 20 20 20 20 56 44 38 32 ┆ 2 P** 84-12-11/CJ IDENTLINE UPDATED TO 841211 < P** 84-12-04/CJ VD82┆
0x4b1a…4b6a 43 57 20 44 45 46 49 4e 45 44 20 2d 20 55 53 45 44 20 42 59 20 53 54 41 42 4c 4b 26 53 54 50 42 4c 4b 00 01 00 f8 00 3c 00 50 2a 2a 20 38 34 2d 31 32 2d 30 31 2f 43 4a 20 20 20 20 57 53 4d 20 52 45 4c 20 32 2e 32 20 20 57 49 54 48 20 49 4e ┆CW DEFINED - USED BY STABLK&STPBLK < P** 84-12-01/CJ WSM REL 2.2 WITH IN┆
0x4b6a…4bba 54 45 52 54 41 53 4b 20 54 4f 20 54 4f 53 53 55 54 20 00 01 01 38 00 42 00 50 2a 2a 20 38 34 2d 30 37 2d 31 32 2f 4d 41 45 52 20 20 41 44 41 50 54 49 01 4c 00 20 00 1c 00 6d 01 90 4f 4e 53 20 46 4f 52 20 33 35 20 4d 42 20 57 44 20 50 54 53 ┆TERTASK TO TOSSUT 8 B P** 84-07-12/MAER ADAPTI L m ONS FOR 35 MB WD PTS┆
0x4bba…4c0a 2d 36 39 36 33 20 4f 4e 20 50 54 53 2d 36 39 31 30 2e 00 01 01 78 00 3a 00 50 2a 2a 20 20 20 20 20 22 20 20 20 20 20 22 20 20 20 20 49 4e 54 45 52 54 41 53 4b 20 43 4f 4d 4d 55 4e 49 43 41 54 49 4f 4e 20 49 4d 50 4c 45 4d 45 4e 54 45 44 2e ┆-6963 ON PTS-6910. x : P** " " INTERTASK COMMUNICATION IMPLEMENTED.┆
0x4c0a…4c5a 00 02 00 2e 00 3c 00 50 2a 2a 20 20 20 20 20 22 20 20 20 20 20 22 20 20 20 20 49 54 45 4d 20 27 4e 4f 4f 46 50 4f 27 20 41 44 44 45 44 20 28 53 45 45 20 43 42 31 20 42 45 4c 4f 57 21 29 2e 20 00 02 00 6c 00 46 00 50 2a 2a 20 38 34 2d 30 36 ┆ . < P** " " ITEM 'NOOFPO' ADDED (SEE CB1 BELOW!). l F P** 84-06┆
0x4c5a…4caa 2d 30 31 2f 4d 41 45 52 20 20 41 44 41 50 54 49 4f 4e 53 20 46 4f 52 20 35 20 31 2f 34 22 20 46 4c 4f 50 50 59 20 44 49 53 43 2c 20 54 4f 53 53 20 52 45 4c 20 31 32 2e 32 2e 00 02 00 ac 00 46 00 50 2a 2a 20 38 33 2d 31 32 2d 32 34 2f 4d 41 ┆-01/MAER ADAPTIONS FOR 5 1/4" FLOPPY DISC, TOSS REL 12.2. F P** 83-12-24/MA┆
0x4caa…4cfa 45 52 20 20 4e 4f 20 4f 46 20 50 4f 4f 4c 20 55 4e 49 54 53 20 45 58 54 45 4e 44 45 44 20 46 52 4f 4d 20 32 33 20 54 4f 20 33 30 20 28 50 52 4f 44 29 2e 20 00 02 00 f6 00 2a 00 50 2a 2a 20 38 33 2d 31 30 2d 30 36 2f 4d 41 45 52 20 20 4e 45 ┆ER NO OF POOL UNITS EXTENDED FROM 23 TO 30 (PROD). * P** 83-10-06/MAER NE┆
0x4cfa…4d4a 57 20 52 45 4c 44 41 54 20 38 33 20 31 30 20 31 35 20 00 02 01 40 00 4c 00 50 2a 2a 20 38 33 2d 30 39 2d 32 37 2f 4d 41 45 52 20 20 44 54 59 50 45 53 20 41 44 44 45 44 20 46 4f 52 01 4c 00 20 00 1c 00 6d 01 90 20 54 52 41 4e 53 4c 41 54 49 ┆W RELDAT 83 10 15 @ L P** 83-09-27/MAER DTYPES ADDED FOR L m TRANSLATI┆
0x4d4a…4d9a 4f 4e 20 4f 46 20 49 4e 50 55 54 20 54 59 50 45 20 28 43 52 56 2c 41 31 33 29 2e 20 00 02 01 6e 00 2e 00 50 2a 2a 20 38 33 2d 30 39 2d 31 33 2f 4d 41 45 52 20 20 4e 45 57 20 43 52 45 41 54 45 20 56 4f 4c 55 4d 45 20 4d 45 4e 55 2e 20 00 03 ┆ON OF INPUT TYPE (CRV,A13). n . P** 83-09-13/MAER NEW CREATE VOLUME MENU. ┆
0x4d9a…4dea 00 2e 00 4a 00 50 2a 2a 20 38 33 2d 30 38 2d 33 31 2f 4d 41 45 52 20 20 4e 45 57 20 52 45 4c 44 41 54 20 38 33 20 30 39 20 30 31 2c 20 4c 4f 41 44 20 4d 4f 44 55 4c 45 20 4c 49 4e 4b 45 44 20 57 49 54 48 20 4c 41 54 45 53 54 20 00 03 00 60 ┆ . J P** 83-08-31/MAER NEW RELDAT 83 09 01, LOAD MODULE LINKED WITH LATEST `┆
0x4dea…4e3a 00 4e 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 45 41 53 45 44 20 54 4f 53 53 20 55 54 49 4c 49 54 59 20 4d 4f 44 55 4c 45 53 2e 20 57 44 2d 44 49 53 43 53 20 43 41 4e 20 4e 4f 57 20 42 45 20 55 53 45 44 2e 00 03 ┆ N P** RELEASED TOSS UTILITY MODULES. WD-DISCS CAN NOW BE USED. ┆
0x4e3a…4e8a 00 ae 00 2e 00 50 2a 2a 20 38 33 2d 30 38 2d 30 32 2f 4d 41 45 52 20 20 57 34 38 20 44 45 4c 45 54 45 44 2c 20 57 36 36 20 41 44 44 45 44 2e 20 00 03 01 00 00 36 00 50 2a 2a 20 38 33 2d 30 38 2d 30 31 2f 4d 41 45 52 20 20 55 4e 49 54 53 20 ┆ . P** 83-08-02/MAER W48 DELETED, W66 ADDED. 6 P** 83-08-01/MAER UNITS ┆
0x4e8a…4eda 43 4d 31 2c 20 50 4d 31 2c 20 57 44 31 20 2d 20 57 44 34 20 41 44 44 45 44 2e 00 03 01 32 00 3a 00 50 2a 2a 20 38 33 2d 30 34 2d 30 35 2f 43 41 42 45 20 20 49 4c 4c 20 50 48 59 53 2e 53 43 52 45 45 4e 20 44 45 01 4c 00 20 00 1c 00 6d 01 90 ┆CM1, PM1, WD1 - WD4 ADDED. 2 : P** 83-04-05/CABE ILL PHYS.SCREEN DE L m ┆
0x4eda…4f2a 46 45 4e 49 54 49 4f 4e 20 2d 20 4e 4f 57 20 4f 4b 2e 00 03 01 6c 00 36 00 50 2a 2a 20 38 33 2d 30 33 2d 31 38 2f 4d 41 45 52 20 20 41 44 41 50 54 45 44 20 46 4f 52 20 56 44 38 32 20 53 45 43 4f 4e 44 20 56 45 52 53 49 4f 4e 2e 00 04 00 1a ┆FENITION - NOW OK. l 6 P** 83-03-18/MAER ADAPTED FOR VD82 SECOND VERSION. ┆
0x4f2a…4f7a 00 2a 00 50 2a 2a 20 38 32 2d 31 30 2d 31 39 2f 4d 41 45 52 20 20 52 45 4c 45 41 53 45 20 44 41 54 45 20 41 44 44 45 44 2e 20 00 04 00 54 00 28 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 44 38 32 2f 38 33 2d 41 44 41 50 ┆ * P** 82-10-19/MAER RELEASE DATE ADDED. T ( P** VD82/83-ADAP┆
0x4f7a…4fca 54 49 4f 4e 53 2e 00 04 00 82 00 4a 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 50 41 43 4b 45 44 22 20 41 44 44 45 44 20 46 4f 52 20 52 45 4c 20 31 32 20 54 4f 53 53 20 55 54 49 4c 49 54 49 45 53 20 49 4e 54 45 52 46 41 ┆TIONS. J P** "PACKED" ADDED FOR REL 12 TOSS UTILITIES INTERFA┆
0x4fca…501a 43 45 2e 20 00 04 00 ae 00 2c 00 50 2a 2a 20 38 32 2d 30 37 2d 30 38 2f 44 41 4c 49 20 20 56 4f 4c 45 58 31 20 26 20 56 4f 4c 45 58 32 20 41 44 44 45 44 2e 00 04 00 fc 00 36 00 50 2a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 4d ┆CE. , P** 82-07-08/DALI VOLEX1 & VOLEX2 ADDED. 6 P** (M┆
0x501a…506a 55 4c 54 49 50 4c 45 20 56 4f 4c 55 4d 45 20 4e 41 4d 45 53 20 50 52 4f 42 4c 45 4d 29 20 00 04 01 2c 00 22 00 50 2a 2a 20 38 32 2d 31 31 2d 30 34 2f 4d 41 45 52 20 20 42 43 44 34 41 20 41 44 44 45 44 20 00 04 01 66 00 36 00 50 2a 2a 20 20 ┆ULTIPLE VOLUME NAMES PROBLEM) , " P** 82-11-04/MAER BCD4A ADDED f 6 P** ┆
0x506a…50ba 01 4c 00 20 00 1c 00 6d 01 8e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 55 53 45 44 20 42 59 20 57 55 50 52 46 20 46 4f 52 20 53 45 43 54 49 4f 4e 20 53 49 5a 45 29 00 04 01 8c 00 0a 00 50 5c 44 44 49 56 20 00 05 00 36 00 0c 00 50 5c 54 ┆ L m (USED BY WUPRF FOR SECTION SIZE) P DDIV 6 P T┆
0x50ba…510a 45 52 4d 5c 55 31 00 05 00 44 00 0c 00 50 5c 43 57 42 5c 43 42 31 00 05 00 54 00 0c 00 50 5c 43 57 42 5c 43 42 32 00 05 00 64 00 0c 00 50 5c 43 57 42 5c 43 42 33 00 05 00 74 00 0c 00 50 5c 43 57 42 5c 43 42 34 00 05 00 84 00 0c 00 50 5c 43 ┆ERM U1 D P CWB CB1 T P CWB CB2 d P CWB CB3 t P CWB CB4 P C┆
0x510a…515a 57 42 5c 43 42 35 00 05 00 94 00 0c 00 50 5c 43 57 42 5c 43 42 36 00 05 00 a4 00 0c 00 50 5c 43 57 42 5c 43 42 37 00 05 00 b4 00 0c 00 50 5c 43 57 42 5c 43 42 38 00 05 00 c4 00 0c 00 50 5c 43 57 42 5c 43 42 39 00 05 00 d4 00 0c 00 50 5c 43 ┆WB CB5 P CWB CB6 P CWB CB7 P CWB CB8 P CWB CB9 P C┆
0x515a…51aa 57 42 5c 43 42 41 00 05 00 e4 00 06 00 50 2a 20 00 05 00 f4 00 12 00 50 5c 44 57 42 5c 44 42 31 28 43 42 41 29 20 00 05 00 fe 00 0c 00 50 5c 43 57 42 5c 43 42 42 00 05 01 14 00 0c 00 50 5c 43 57 42 5c 43 42 43 00 05 01 24 00 0a 00 50 5c 45 ┆WB CBA P* P DWB DB1(CBA) P CWB CBB P CWB CBC $ P E┆
0x51aa…51fa 4a 45 43 54 00 05 01 34 00 06 00 50 2a 20 00 05 01 42 00 16 00 50 2a 20 20 20 20 20 20 20 20 44 41 54 41 2d 53 45 54 53 00 05 01 4c 00 06 00 50 2a 20 00 05 01 66 00 1e 00 50 44 49 53 4b 5c 44 53 45 54 5c 46 43 3d 58 27 43 30 27 2c 44 45 56 ┆JECT 4 P* B P* DATA-SETS L P* f PDISK DSET FC=X'C0',DEV┆
0x51fa…524a 3d 44 55 20 00 05 01 70 20 20 01 4c 00 20 00 1c 00 6d 01 90 00 1a 00 50 44 45 44 53 44 59 4b 42 5c 44 53 45 54 5c 46 43 3d 58 27 32 30 27 00 06 00 04 00 22 00 50 44 45 44 53 50 52 54 5c 44 53 45 54 5c 46 43 3d 58 27 33 36 27 2c 42 55 46 4c ┆=DU p L m PDEDSDYKB DSET FC=X'20' " PDEDSPRT DSET FC=X'36',BUFL┆
0x524a…529a 3d 31 30 30 00 06 00 22 00 28 00 50 44 45 44 53 53 43 52 4e 5c 44 53 45 54 5c 46 43 3d 58 27 35 30 27 2c 42 55 46 44 53 3d 44 45 44 53 50 52 54 00 06 00 48 00 28 00 50 44 45 44 53 53 59 53 4c 5c 44 53 45 54 5c 46 43 3d 58 27 35 38 27 2c 44 ┆=100 " ( PDEDSSCRN DSET FC=X'50',BUFDS=DEDSPRT H ( PDEDSSYSL DSET FC=X'58',D┆
0x529a…52ea 53 43 42 3d 44 45 44 53 53 43 52 4e 00 06 00 74 00 18 00 50 49 54 43 49 4e 5c 44 53 45 54 5c 46 43 3d 58 27 44 30 27 20 00 06 00 a0 00 24 00 50 49 54 43 4f 55 54 5c 44 53 45 54 5c 46 43 3d 58 27 44 31 27 2c 44 53 43 42 3d 49 54 43 49 4e 20 ┆SCB=DEDSSCRN t PITCIN DSET FC=X'D0' $ PITCOUT DSET FC=X'D1',DSCB=ITCIN ┆
0x52ea…533a 00 06 00 bc 00 28 00 50 5c 46 4d 54 43 54 4c 5c 49 4e 44 53 3d 44 45 44 53 44 59 4b 42 2c 4f 55 54 44 53 3d 44 45 44 53 53 43 52 4e 00 06 00 e4 00 0a 00 50 5c 45 4a 45 43 54 00 06 01 10 00 06 00 50 2a 20 00 06 01 1e 00 18 00 50 2a 20 20 20 ┆ ( P FMTCTL INDS=DEDSDYKB,OUTDS=DEDSSCRN P EJECT P* P* ┆
0x533a…538a 20 20 20 20 20 53 54 41 52 54 50 4f 49 4e 54 20 00 06 01 28 00 06 00 50 2a 20 00 06 01 44 00 10 00 50 5c 53 54 41 52 54 5c 57 55 49 4e 54 00 06 01 4e 00 0e 00 50 5c 53 54 41 43 4b 5c 33 30 30 00 06 01 62 00 0a 00 50 5c 45 4a 45 43 54 00 06 ┆ STARTPOINT ( P* D P START WUINT N P STACK 300 b P EJECT ┆
0x538a…53da 01 74 00 1e 00 50 5c 54 45 52 4d 5c 46 55 5c 46 49 4c 45 2d 00 00 00 00 00 00 00 6d 01 90 48 41 4e 44 4c 45 52 2d 54 41 53 4b 00 06 01 82 00 0c 00 50 5c 43 57 42 5c 43 42 31 00 07 00 14 00 0c 00 50 5c 43 57 42 5c 43 42 32 00 07 00 24 00 0c ┆ t P TERM FU FILE- m HANDLER-TASK P CWB CB1 P CWB CB2 $ ┆
0x53da…542a 00 50 5c 43 57 42 5c 43 42 33 00 07 00 34 00 0c 00 50 5c 43 57 42 5c 43 42 34 00 07 00 44 00 0c 00 50 5c 43 57 42 5c 43 42 35 00 07 00 54 00 0c 00 50 5c 43 57 42 5c 43 42 36 00 07 00 64 00 0c 00 50 5c 43 57 42 5c 43 42 37 00 07 00 74 00 0c ┆ P CWB CB3 4 P CWB CB4 D P CWB CB5 T P CWB CB6 d P CWB CB7 t ┆
0x542a…547a 00 50 5c 43 57 42 5c 43 42 38 00 07 00 84 00 0c 00 50 5c 43 57 42 5c 43 42 39 00 07 00 94 00 0c 00 50 5c 43 57 42 5c 43 42 41 00 07 00 a4 00 04 00 50 00 07 00 b4 00 12 00 50 5c 44 57 42 5c 44 42 31 28 43 42 41 29 20 00 07 00 bc 00 0c 00 50 ┆ P CWB CB8 P CWB CB9 P CWB CBA P P DWB DB1(CBA) P┆
0x547a…54ca 5c 43 57 42 5c 43 42 42 00 07 00 d2 00 0c 00 50 5c 43 57 42 5c 43 42 43 00 07 00 e2 00 0a 00 50 5c 45 4a 45 43 54 00 07 00 f2 00 06 00 50 2a 20 00 07 01 00 00 18 00 50 2a 20 20 20 20 20 20 20 20 53 54 41 52 54 50 4f 49 4e 54 20 00 07 01 0a ┆ CWB CBB P CWB CBC P EJECT P* P* STARTPOINT ┆
0x54ca…551a 00 06 00 50 2a 20 00 07 01 26 00 12 00 50 5c 53 54 41 52 54 5c 46 55 54 41 53 4b 20 00 07 01 30 00 0e 00 50 5c 53 54 41 43 4b 5c 36 30 20 00 07 01 46 00 0a 00 50 5c 45 4a 45 43 54 00 07 01 58 00 06 00 50 2a 20 00 07 01 66 00 06 00 50 2a 20 ┆ P* & P START FUTASK 0 P STACK 60 F P EJECT X P* f P* ┆
0x551a…556a 00 07 01 70 00 0c 00 50 43 42 31 5c 42 4c 4b 20 00 07 01 7a 00 06 00 50 2a 20 00 07 01 8a 00 00 00 00 00 00 00 6d 01 90 00 1c 00 50 52 45 54 43 4f 44 5c 42 49 4e 5c 5c 52 45 54 55 52 4e 2d 43 4f 44 45 20 00 08 00 04 00 04 00 50 00 08 00 24 ┆ p PCB1 BLK z P* m PRETCOD BIN RETURN-CODE P $┆
0x556a…55ba 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 08 00 2c 00 44 00 50 2a 20 4e 55 ┆ D P*************************************************************** , D P* NU┆
0x55ba…560a 4d 42 45 52 20 4f 46 20 42 55 46 46 45 52 20 50 4f 4f 4c 20 55 4e 49 54 53 2e 20 45 41 43 48 20 55 4e 49 54 20 49 53 20 32 35 36 20 43 48 41 52 41 43 54 45 52 53 3a 20 20 20 2a 20 00 08 00 74 00 44 00 50 2a 20 20 20 52 45 43 4f 4d 4d 45 4e ┆MBER OF BUFFER POOL UNITS. EACH UNIT IS 256 CHARACTERS: * t D P* RECOMMEN┆
0x560a…565a 44 41 54 49 4f 4e 3a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 08 00 bc 00 44 00 50 2a 20 20 20 20 20 2d 20 34 30 20 55 4e 49 54 53 20 57 49 54 ┆DATION: * D P* - 40 UNITS WIT┆
0x565a…56aa 48 49 4e 20 41 20 50 52 4f 44 55 43 54 49 4f 4e 20 4c 4f 41 44 20 4d 4f 44 55 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 08 01 04 00 44 00 50 2a 20 20 20 20 20 2d 20 32 30 20 55 4e 49 54 53 20 57 49 54 48 49 4e 20 41 20 54 45 ┆HIN A PRODUCTION LOAD MODULE * D P* - 20 UNITS WITHIN A TE┆
0x56aa…56fa 53 54 20 4c 4f 41 44 20 4d 4f 44 55 4c 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 08 01 4c 00 00 00 00 00 00 00 6d 01 90 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ST LOAD MODULE * L m D P**************************┆
0x56fa…574a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 09 00 04 00 24 00 50 42 50 4f 4f 4c 5c 53 54 52 47 49 5c 28 34 30 29 2c 32 35 36 5c 42 55 46 46 45 52 50 4f 4f 4c 20 00 09 ┆************************************* $ PBPOOL STRGI (40),256 BUFFERPOOL ┆
0x574a…579a 00 4c 00 04 00 50 00 09 00 74 00 1c 00 50 49 4e 55 4e 49 54 5c 53 54 52 47 5c 33 5c 55 4e 49 54 20 49 4e 50 55 54 00 09 00 7c 00 1e 00 50 55 54 55 4e 49 54 5c 53 54 52 47 5c 33 5c 55 4e 49 54 20 4f 55 54 50 55 54 20 00 09 00 9c 00 04 00 50 ┆ L P t PINUNIT STRG 3 UNIT INPUT | PUTUNIT STRG 3 UNIT OUTPUT P┆
0x579a…57ea 00 09 00 be 00 0a 00 50 5c 45 4a 45 43 54 00 09 00 c6 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆ P EJECT D P**********************************************************┆
0x57ea…583a 2a 2a 2a 2a 2a 20 00 09 00 d4 00 44 00 50 2a 20 52 20 45 20 4c 20 45 20 41 20 53 20 45 20 20 20 20 49 20 4e 20 46 20 4f 20 20 20 20 4f 20 4e 20 20 20 20 49 20 4e 20 49 20 54 20 49 20 41 20 4c 20 20 20 20 4d 20 45 20 4e 20 55 20 2a 20 00 09 ┆***** D P* R E L E A S E I N F O O N I N I T I A L M E N U * ┆
0x583a…588a 01 1c 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 00 00 00 00 00 00 6d 01 90 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 ┆ D P******************************************** m ******************* ┆
0x588a…58da 00 09 01 64 00 04 00 50 00 0a 00 1c 00 26 00 50 52 45 4c 4e 55 4d 5c 53 54 52 47 5c 43 27 32 2e 33 27 5c 52 45 4c 45 41 53 45 20 4e 55 4d 42 45 52 20 00 0a 00 24 00 28 00 50 52 45 4c 44 41 54 5c 53 54 52 47 5c 43 27 38 35 20 30 39 20 30 31 ┆ d P & PRELNUM STRG C'2.3' RELEASE NUMBER $ ( PRELDAT STRG C'85 09 01┆
0x58da…592a 27 5c 52 45 4c 45 41 53 45 20 44 41 54 45 00 0a 00 4e 00 04 00 50 00 0a 00 7a 00 04 00 50 00 0a 00 82 00 1e 00 50 2a 20 50 52 45 56 49 4f 55 53 20 52 45 4c 45 41 53 45 20 44 41 54 45 53 3a 20 00 0a 00 8a 00 04 00 50 00 0a 00 ac 00 40 00 50 ┆' RELEASE DATE N P z P P* PREVIOUS RELEASE DATES: P @ P┆
0x592a…597a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 35 2d 30 39 2d 30 31 20 20 57 53 4d 20 32 2e 33 20 54 4f 20 41 43 54 49 4f 4e 2d 43 45 4e 54 52 45 00 0a 00 b4 00 3c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 ┆* 85-09-01 WSM 2.3 TO ACTION-CENTRE < P* ┆
0x597a…59ca 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 35 2d 30 33 2d 30 31 20 20 55 50 44 41 54 45 44 20 32 2e 32 20 56 45 52 53 49 4f 4e 20 00 0a 00 f8 00 3c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 34 ┆ 85-03-01 UPDATED 2.2 VERSION < P* 84┆
0x59ca…5a1a 2d 31 32 2d 31 31 20 20 55 50 44 41 54 45 44 20 32 2e 32 20 56 45 52 53 49 4f 4e 20 00 0a 01 38 00 3c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 6d 01 90 20 20 38 34 2d 31 32 2d 30 31 ┆-12-11 UPDATED 2.2 VERSION 8 < P* m 84-12-01┆
0x5a1a…5a6a 20 20 55 50 44 41 54 45 44 20 32 2e 32 20 56 45 52 53 49 4f 4e 20 00 0a 01 78 00 34 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 34 2d 31 30 2d 30 31 20 20 57 53 4d 20 52 45 4c 20 32 2e 32 20 00 0b ┆ UPDATED 2.2 VERSION x 4 P* 84-10-01 WSM REL 2.2 ┆
0x5a6a…5aba 00 28 00 40 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 34 20 30 36 20 30 31 20 28 50 52 45 2d 52 45 4c 20 31 32 2e 32 20 54 4f 20 42 45 4c 47 49 55 4d 29 00 0b 00 60 00 26 00 50 2a 20 20 20 20 20 ┆ ( @ P* 84 06 01 (PRE-REL 12.2 TO BELGIUM) ` & P* ┆
0x5aba…5b0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 34 20 30 32 20 30 33 00 0b 00 a4 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 34 20 30 31 20 32 30 00 0b 00 ce 00 26 00 50 2a 20 ┆ 84 02 03 & P* 84 01 20 & P* ┆
0x5b0a…5b5a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 31 32 20 32 34 00 0b 00 f8 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 31 30 20 31 35 00 0b 01 22 00 26 ┆ 83 12 24 & P* 83 10 15 " &┆
0x5b5a…5baa 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 31 30 20 30 31 00 0b 01 4c 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 00 00 00 00 00 00 00 6d 01 90 ┆ P* 83 10 01 L & P* m ┆
0x5baa…5bfa 38 33 20 30 39 20 31 35 00 0b 01 76 00 3c 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 30 39 20 30 31 20 28 4e 45 57 20 54 4f 53 53 20 55 54 49 4c 49 54 49 45 53 29 20 00 0c 00 10 00 3e 00 50 ┆83 09 15 v < P* 83 09 01 (NEW TOSS UTILITIES) > P┆
0x5bfa…5c4a 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 30 38 20 30 39 20 28 52 45 4c 20 32 2e 30 20 54 4f 20 41 4c 50 48 41 2d 54 45 53 54 29 00 0c 00 50 00 30 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆* 83 08 09 (REL 2.0 TO ALPHA-TEST) P 0 P* ┆
0x5c4a…5c9a 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 30 36 20 30 31 20 28 52 45 4c 20 32 2e 30 29 00 0c 00 92 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 30 35 20 31 31 00 0c 00 c6 00 26 00 50 ┆ 83 06 01 (REL 2.0) & P* 83 05 11 & P┆
0x5c9a…5cea 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 20 30 34 20 30 35 00 0c 00 f0 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 2d 30 33 2d 32 31 00 0c 01 1a ┆* 83 04 05 & P* 83-03-21 ┆
0x5cea…5d3a 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 33 2d 30 32 2d 32 38 00 0c 01 44 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 32 2d 31 32 2d 30 31 ┆ & P* 83-02-28 D & P* 82-12-01┆
0x5d3a…5d8a 00 00 00 00 00 00 00 6d 01 90 00 0c 01 6e 00 26 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 32 2d 31 30 2d 31 39 00 0d 00 08 00 04 00 50 00 0d 00 32 00 0a 00 50 5c 45 4a 45 43 54 00 0d 00 3a 00 44 ┆ m n & P* 82-10-19 P 2 P EJECT : D┆
0x5d8a…5dda 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0d 00 48 00 44 00 50 2a 20 4d 41 58 20 ┆ P*************************************************************** H D P* MAX ┆
0x5dda…5e2a 53 45 43 54 49 4f 4e 20 53 49 5a 45 2c 20 44 49 53 50 4c 41 59 45 44 20 57 48 45 4e 20 43 4f 50 59 20 56 4f 4c 55 4d 45 2f 46 49 4c 45 20 49 53 20 55 53 45 44 2e 20 20 2a 20 00 0d 00 90 00 44 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆SECTION SIZE, DISPLAYED WHEN COPY VOLUME/FILE IS USED. * D P**************┆
0x5e2a…5e7a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 0d 00 d8 00 04 00 50 00 0d 01 20 00 22 00 50 4e 4f 4f 46 50 4f 5c 42 43 44 5c 34 5c 4e ┆************************************************* P " PNOOFPO BCD 4 N┆
0x5e7a…5eca 4f 20 4f 46 20 50 4f 4f 4c 20 55 4e 49 54 53 20 00 0d 01 28 00 1a 00 50 5c 5c 5c 28 53 45 45 20 42 50 4f 4f 4c 20 41 42 4f 56 45 21 29 20 00 0d 01 4e 00 0a 00 50 5c 45 4a 45 43 54 00 0d 01 6c 00 06 00 50 2a 20 00 0d 01 7a 00 1c 00 50 2a 20 ┆O OF POOL UNITS ( P (SEE BPOOL ABOVE!) N P EJECT l P* z P* ┆
0x5eca…5f1a 20 20 20 20 20 20 20 43 4f 4d 00 00 00 00 00 00 00 6d 01 90 4d 4f 4e 2d 42 4c 4f 43 4b 3a 20 32 00 0d 01 84 00 06 00 50 2a 20 00 0e 00 14 00 1e 00 50 2a 20 20 20 20 20 20 20 20 55 53 41 47 45 3a 20 43 4f 4e 53 54 41 4e 54 53 20 00 0e 00 1e ┆ COM m MON-BLOCK: 2 P* P* USAGE: CONSTANTS ┆
0x5f1a…5f6a 00 06 00 50 2a 20 00 0e 00 40 00 0c 00 50 43 42 32 5c 42 4c 4b 20 00 0e 00 4a 00 0e 00 50 50 4f 4f 4c 31 5c 42 4f 4f 4c 00 0e 00 5a 00 26 00 50 53 57 49 54 57 54 5c 42 4f 4f 4c 5c 46 5c 53 59 53 42 55 46 20 41 54 54 41 43 48 45 44 20 59 2f ┆ P* @ PCB2 BLK J PPOOL1 BOOL Z & PSWITWT BOOL F SYSBUF ATTACHED Y/┆
0x5f6a…5fba 4e 20 00 0e 00 6c 00 2a 00 50 53 57 49 54 53 59 5c 42 4f 4f 4c 5c 46 5c 53 59 53 54 45 4d 46 49 4c 45 20 41 53 53 49 47 4e 45 44 20 59 2f 4e 20 00 0e 00 96 00 24 00 50 53 57 49 54 55 53 5c 42 4f 4f 4c 5c 46 5c 55 53 45 52 46 49 4c 45 20 20 ┆N l * PSWITSY BOOL F SYSTEMFILE ASSIGNED Y/N $ PSWITUS BOOL F USERFILE ┆
0x5fba…600a 20 20 20 20 2d 22 2d 20 00 0e 00 c4 00 18 00 50 57 30 5c 42 49 4e 5c 57 27 30 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 00 ec 00 18 00 50 57 31 5c 42 49 4e 5c 57 27 31 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 01 08 00 18 00 50 57 32 5c 42 49 4e 5c 57 ┆ -"- PW0 BIN W'0' CONSTANT PW1 BIN W'1' CONSTANT PW2 BIN W┆
0x600a…605a 27 32 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 01 24 00 18 00 50 57 33 5c 42 49 4e 5c 57 27 33 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 01 40 00 18 00 50 57 34 5c 42 49 4e 5c 57 27 34 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 01 5c 00 18 00 50 57 35 5c 42 ┆'2' CONSTANT $ PW3 BIN W'3' CONSTANT @ PW4 BIN W'4' CONSTANT PW5 B┆
0x605a…60aa 49 4e 5c 57 27 35 27 5c 43 4f 4e 53 54 41 4e 54 00 0e 01 78 00 00 00 00 00 00 00 6d 01 8e 00 18 00 50 57 36 5c 42 49 4e 5c 57 27 36 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 04 00 18 00 50 57 37 5c 42 49 4e 5c 57 27 37 27 5c 43 4f 4e 53 54 41 ┆IN W'5' CONSTANT x m PW6 BIN W'6' CONSTANT PW7 BIN W'7' CONSTA┆
0x60aa…60fa 4e 54 00 0f 00 20 00 18 00 50 57 38 5c 42 49 4e 5c 57 27 38 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 3c 00 18 00 50 57 39 5c 42 49 4e 5c 57 27 39 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 58 00 1a 00 50 57 31 30 5c 42 49 4e 5c 57 27 31 30 27 5c ┆NT PW8 BIN W'8' CONSTANT < PW9 BIN W'9' CONSTANT X PW10 BIN W'10' ┆
0x60fa…614a 43 4f 4e 53 54 41 4e 54 00 0f 00 74 00 1a 00 50 57 31 31 5c 42 49 4e 5c 57 27 31 31 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 92 00 1a 00 50 57 31 32 5c 42 49 4e 5c 57 27 31 32 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 b0 00 1a 00 50 57 31 33 5c ┆CONSTANT t PW11 BIN W'11' CONSTANT PW12 BIN W'12' CONSTANT PW13 ┆
0x614a…619a 42 49 4e 5c 57 27 31 33 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 ce 00 1a 00 50 57 31 34 5c 42 49 4e 5c 57 27 31 34 27 5c 43 4f 4e 53 54 41 4e 54 00 0f 00 ec 00 1a 00 50 57 31 35 5c 42 49 4e 5c 57 27 31 35 27 5c 43 4f 4e 53 54 41 4e 54 00 0f ┆BIN W'13' CONSTANT PW14 BIN W'14' CONSTANT PW15 BIN W'15' CONSTANT ┆
0x619a…61ea 01 0a 00 0a 00 50 5c 45 4a 45 43 54 00 0f 01 28 00 06 00 50 2a 20 00 0f 01 36 00 1c 00 50 2a 20 20 20 20 20 20 20 20 43 4f 4d 4d 4f 4e 2d 42 4c 4f 43 4b 3a 33 20 00 0f 01 40 00 06 00 50 2a 20 00 0f 01 60 00 1e 00 50 2a 20 20 20 20 20 20 20 ┆ P EJECT ( P* 6 P* COMMON-BLOCK:3 @ P* ` P* ┆
0x61ea…6209 20 20 55 53 41 47 45 3a 20 43 4f 4e 53 54 41 4e 54 53 00 0f 01 6a 00 06 00 50 2a 20 01 78 00 ┆ USAGE: CONSTANTS j P* x ┆