DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦32f3b1567⟧

    Length: 11174 (0x2ba6)
    Notes: pts_type(SC)
    Names: »DDINIT.SC«

Derivation

└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »S:DU/DDINIT.SC« 
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
    └─⟦this⟧ »S:DU/DDINIT.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »S:DU/DDINIT.SC« 

PTS(SC)

	IDENT	DDINIT 
************************************************************************
*  PTS DATA-ENTRY UTILITIES 
*  DDIV FOR DEINIT
*  USER = S:DU
* 
************************************************************************
	EJECT
	DDIV 
	TERM	T1
	CWB	CB1
	CWB	CB2
	CWB	CB3
	CWB	CB4
	CWB	CB5
	CWB	CB6
	CWB	CB7
	CWB	CB8
	CWB	CB9
	CWB	CBA
* 
	DWB	DB1(CBA) 
	CWB	CBB
	CWB	CBC
	EJECT
* 
*        DATA-SETS
* 
DISK	DSET	FC=D0,DEV=DU
DEDSDYKB	DSET	FC=20 
DEDSSCRN	DSET	FC=50,BUFL=100
DEDSPRT	DSET	FC=36,BUFL=100 
	FMTCTL	INDS=DEDSDYKB,OUTDS=DEDSSCRN
	EJECT
* 
*        STARTPOINT 
* 
	START	START
	STACK	300
	EJECT
* 
* 
CB1	BLK 
* 
LRUQUE	STRG	38	LAST RECENT USED 
BPOOL	STRGI	(38),188	BUFFERPOOL 
RPOOL	STRGI	(38),19	BUFFER REFERENCES 
			1-1 USAGE-TYPE STRG
			2-7 NAME 
			8-8 NO. OF USERS 
			9-9 LINK TO NEXT BUFFER
FILINDUS BIN		INDEX FOR USERFILE
RETCOD	BIN		RETURN-CODE 
RECLNTH	BIN		CURRENT RECORDLENGTH 
PJOBCUR	BIN		POOLINDEX
JOBNAME	STRG	6	CURRENT JOBNAME
FORMAT	STRG	6	CURRENT FORMAT-NAME 
	EJECT
* 
*        COMMON-BLOCK: 2
* 
*        USAGE: CONSTANTS 
* 
CB2	BLK 
POOL1	BOOL
SWITWT	BOOL	F	SYSBUF ATTACHED Y/N 
SWITSY	BOOL	F	SYSTEMFILE ASSIGNED Y/N 
SWITUS	BOOL	F	USERFILE      -"- 
W0	BIN	W'0'	CONSTANT
W1	BIN	W'1'	CONSTANT
W2	BIN	W'2'	CONSTANT
W3	BIN	W'3'	CONSTANT
W4	BIN	W'4'	CONSTANT
W5	BIN	W'5'	CONSTANT
W6	BIN	W'6'	CONSTANT
W7	BIN	W'7'	CONSTANT
W8	BIN	W'8'	CONSTANT
W9	BIN	W'9'	CONSTANT
W10	BIN	W'10'	CONSTANT
W11	BIN	W'11'	CONSTANT
W12	BIN	W'12'	CONSTANT
W13	BIN	W'13'	CONSTANT
W14	BIN	W'14'	CONSTANT
W15	BIN	W'15'	CONSTANT
	EJECT
* 
*        COMMON-BLOCK:3 
* 
*         USAGE: CONSTANTS
* 
CB3	BLK 
W16	BIN	W'16'	CONSTANT
W17	BIN	W'17'	CONSTANT
W18	BIN	W'18'	CONSTANT
W19	BIN	W'19'	CONSTANT
W20	BIN	W'20'	CONSTANT
W21	BIN	W'21'	CONSTANT
W22	BIN	W'22'	CONSTANT
W23	BIN	W'23'	CONSTANT
W24	BIN	W'24'	CONSTANT
W64	BIN	W'64'	CONSTANT
W99	BIN	W'99'	CONSTANT
W128	BIN	W'128' 
W188	BIN	W'188'	CONSTANT
SYSLEN BIN W'199' RECLEN SYST 
USELEN BIN W'255' RECLEN USER 
SECLEN	BIN	W'256'	SECTORLENGTH
	EJECT
* 
*        COMMON-BLOCK: 4
* 
*        USAGE: DISC-HANDLING 
* 
CB4	BLK 
* 
BATCH	STRG	6	CURRENT BATCHNAME
TABLE	STRG	6	TABLE-NAME (VALUE-SET) 
PBLOCK	STRG	58	PARAMETERBLOCK 
SYSBUF STRG 256 DISC-BUFFER 
* 
FTYPE	BCD	1	1=SYSTEM,2=USER,3=UD-FILE 
UNIT	STRG	1 
COPY	STRG	1	Y=WHOLE FILE, N=PART OF FILE
ANSW	STRG	1	Y/N 
* 
VOLNAM	STRG	6	VOLUME-NAME 
SYSVOL	STRG	6C'SYSVOL'
COPNAM	STRG	6	VOL-NAME FOR DELETE 
			AND REORG. OUTPUT
* 
FILNAM	STRG	8	FILE-NAME 
USEFIL	STRG	8C'PTS-DE  '
SYSFIL	STRG	8C'SYSFIL  '
PWBDB4	STRG	16	SAVEAREA FOR WORKBLOCKS
			 AND DESCRIPTORS 
DUNIT	STRG	X'F0F0F1F2F3F8F9FAFBF0'	CORRESPOND TO INPUT UNIT NO
*                  Y Y Y Y Y Y Y Y Y Y
*                  I I I I I I I I I I
*       UNIT NO.   0 1 2 3 4 5 6 7 8 9
*  DISC CODE: 
*  FO = FIX.1       F1 = CART.1 
*  F2 = FIX.2       F3 = CART.2 
*  F8 = FLOPPY.1    F9 = FLOPPY 2 
*  FA = FLOPPY 3    FB = FLOPPY 4 
	EJECT
* 
*        COMMON-BLOCK: 5
* 
*       USAGE: CREATE FILES 
* 
CB5	BLK 
* 
FCOD	BIN		DISK FILE-CODE
FCOD1	BIN		FILE-CODE INPUT
FCOD2	BIN		FILE-CODE OUTPUT 
RECNUM	BIN		RECORD NO.
FRESEC	BIN		NO OF FREE SECTORS
ELMNO	BIN		ELEMENT-NO, VALUE-SET
* 
DATE	BCD	8	YYMMDD 
RSIZE	BCD	5	RECORD LENGTH 
BLFACT	BCD	3	BLOCKING FACTOR
NOREC	BCD	5	NO. OF RECORDS-ENTERED
PRNUM	BCD	1	PROGRAM NO. 
* 
HEX00	STRG	1X'00'	PAUSE ITEM
HEXTAB	STRGI	(7),1		C 
		X'80',X'C0',X'E0',X'F0'		C
		X'F8',X'FC',X'FE' 
ACK	BCDI	(10),18	ACKUMULATORS 
	EJECT
* 
CB6	BLK 
* 
SWIT01	BOOL		USED IN DEDISC 
SWIT02	BOOL 
SWIT03	BOOL 
SWIT04	BOOL 
SWIT05	BOOL 
SWIT06	BOOL 
SWIT07	BOOL 
SWIT08	BOOL 
SWITFS	BOOL 
SW95PR	BOOL 
* 
NEWVOL	BOOL	F 
* 
FNOOFREC	BINI	(9)	NO OF REC IN FILE 
F95PROC	BINI	(9)	5% OF FILESPACE
FCOUNTER	BINI	(9)	COUNTER (USER-FILE) 
FILECODE	BINI	(3),X'D0',X'D0',X'D1'	FILECODE
FINDEXPO	BINI	(9)	POOLIND. TO FREESP-REC. 
FVOLNAME	STRGI	(3),6C'SYSVOL'	VOLUMENANES	C 
		6C'SYSVOL'		C 
		6C'OUTPUT'
	EJECT
* 
CB7	BLK 
* 
MAXOCC	BIN		RESERVED FOR DISCHANDLING 
PINDFR	BIN		POOLINDEX TO CURR FMT 
PINDTB	BIN		POOLINDEX TO VALUE-SET
PINACC	BIN		POOLINDEX TO ACCUMULATORS 
FRMTPNTR	BIN		POINTER TO FMT ON DISC
CURSEC	BIN		CURRENT SECTORNO USERFILE 
RNRFMCH	BIN		CURRENT RECNO FMT-CHAIN
PTRFMCH	BIN		POINTER IN RNRFMCH 
FFSNR	BINI	(3)	RECORD NO. FREE-SP.
FRINF	BINI	(9)	FILESTATUS 
* 
SYSV	STRGI	(16),18	SYSTEM-VARIABLES 
	EJECT
* 
CB8	BLK 
* 
DOOL1	BOOL
DOOL2	BOOL
DOOL3	BOOL
DOOL4	BOOL
DOOL5	BOOL
DOOL6	BOOL
DOOL7	BOOL
DOOLA	BOOL
DOOLB	BOOL
DBOFOR	BOOL		FORCED RECORD
DEBIN1	BIN		WORKITEM
DEBIN2	BIN
DEBIN3	BIN
DEBIN4	BIN
DEBIN5	BIN
FLIND1	BIN		FORMATLINKINDEX 
FLIND2	BIN
FLIND3	BIN
FLIND4	BIN
FLIND5	BIN
STR1A	STRG	1	WORKITEM 
STR2A	STRG	2	WORKITEM 
STR6A	STRG	6	WORKITEM 
STR6B	STRG	6
STRG10A STRG 10 WORKITEM
STR15A	STRG	15	WORKITEM 
	EJECT
* 
CB9	BLK 
* 
KEYMSK	BIN		MASK AUTHORITY
FLIND	BINI	(24)	FORMATLINKINDEX 
* 
FDVBCD	BCDI	(8),3 
BCDI21	BCDI	(2),21	WORKITEM 
* 
STATSH	STRG	120	SEARCH STATUS 
USEV	STRGI	(3),25	USER-VARIABLES 1-3
STR64A	STRG	64
	EJECT
* 
* 
*        USAGE: DATA RECORD STORING 
* 
CBA	BLK 
RBUF	STRG	256	RECORD AREA 
	EJECT
* 
*        TERMINAL-BLOCK: 2R 
* 
*        USAGE: DATA RECORD STORING 
* 
DB1	DBLK
FS	STRG	2 
LPREV	BIN		LINK PREVIOUS
LNEXT	BIN		LINK NEXT
NOOCCB	BIN		NO. OF OCCUPIED BYTES 
FRSTNO	BIN		1:ST RECORD NO
NOFREE	BIN		NO.OF FREE RECORDS
FF	STRGI	(187),1	FREE REC. INDICATION 
	EJECT
* 
* 
*        USAGE: BOOLEAN AND BINARY WORKITEMS
* 
CBB	BLK 
* 
BOOL1	BOOL		WORKITEM
BOOL2	BOOL		WORKITEM
BOOL3	BOOL		WORKITEM
BOOL4	BOOL		WORKITEM
BOOL5	BOOL		WORKITEM
BOOL6	BOOL		WORKITEM
BOOL7	BOOL		WORKITEM
BOOL8	BOOL		WORKITEM
BOOL9	BOOL		WORKITEM
* 
BOOLA1	BOOL 
BOOLA2	BOOL 
* 
BIN1	BIN		WORKITEM
BIN2	BIN		WORKITEM
BIN3	BIN		WORKITEM
BIN4	BIN		WORKITEM
BIN5	BIN		WORKITEM
BIN6	BIN		WORKITEM
BIN7	BIN		WORKITEM
BIN8	BIN		WORKITEM
BIN9	BIN		WORKITEM
BIN10	BIN		WORKITEM 
BIN11	BIN		WORKITEM 
BIN12	BIN		WORKITEM 
BIN13	BIN		WORKITEM 
BIN14	BIN		WORKITEM 
BIN15	BIN		WORKITEM 
BIN16	BIN		WORKITEM 
	EJECT
* 
* 
*        USAGE: BCD-/ STRG-WORKITEMS AND DENTERPACKAGE VARIABLES
* 
CBC	BLK 
* 
DEPROMPT	BOOL		DENTERVARIABLE 
DECHANGE	BOOL		DENTERVARIABLES
DENOCHAN	BOOL 
* 
DKBIN1	BIN		WORKITEM-DEDISC 
DKBIN2	BIN
DKBIN3	BIN
* 
DEBINW1	BIN		DENTERVARIABLE 
DEBINW2	BIN		DENTERVARIABLE 
DEBINW3	BIN		DENTERVARIABLE 
DEBINW4	BIN		DENTERVARIABLE 
DEINPUT	STRG	62	DENTERVARIABLE
BCD2A	BCD	2	WORKITEM
BCD3A	BCD	3	WORKITEM
BCD13A	BCD	13	WORKITEM
WORK	BINI	(10)
	PDIV 
	END

HexDump

0x0000…0016 (0, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IDENT DDINIT «, t00=0x0000, t01=0x0004}
0x0016…0066              Head {h00=0x004c, h01=0x004d, text=»************************************************************************«, t00=0x0000, t01=0x001a}
0x0066…008a              Head {h00=0x0020, h01=0x0050, text=»*  PTS DATA-ENTRY UTILITIES «, t00=0x0000, t01=0x006a}
0x008a…00a4              Head {h00=0x0016, h01=0x0050, text=»*  DDIV FOR DEINIT«, t00=0x0000, t01=0x008e}
0x00a4…00ba              Head {h00=0x0012, h01=0x0050, text=»*  USER = S:DU«, t00=0x0000, t01=0x00a8}
0x00ba…00c4              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0000, t01=0x00be}
0x00c4…0114              Head {h00=0x004c, h01=0x004c, text=»************************************************************************«, t00=0x0000, t01=0x00c8}
0x0114…0122              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0000, t01=0x0118}
0x0122…0130              Head {h00=0x000a, h01=0x0005, text=» DDIV «, t00=0x0000, t01=0x0126}
0x0130…0140              Head {h00=0x000c, h01=0x0008, text=» TERM T1«, t00=0x0000, t01=0x0134}
0x0140…0150              Head {h00=0x000c, h01=0x0050, text=» CWB CB1«, t00=0x0000, t01=0x0144}
0x0150…0160              Head {h00=0x000c, h01=0x0008, text=» CWB CB2«, t00=0x0000, t01=0x0154}
0x0160…0170              Head {h00=0x000c, h01=0x0008, text=» CWB CB3«, t00=0x0000, t01=0x0164}
0x0170…0180              Head {h00=0x000c, h01=0x0008, text=» CWB CB4«, t00=0x0000, t01=0x0174}
0x0180…0190              Head {h00=0x000c, h01=0x0008, text=» CWB CB5«, t00=0x0000, t01=0x0184}
0x0190…01a0 (1, 0, 398)  Head {h00=0x000c, h01=0x0050, text=» CWB CB6«, t00=0x0001, t01=0x0004}
0x01a0…01b0              Head {h00=0x000c, h01=0x0050, text=» CWB CB7«, t00=0x0001, t01=0x0014}
0x01b0…01c0              Head {h00=0x000c, h01=0x0050, text=» CWB CB8«, t00=0x0001, t01=0x0024}
0x01c0…01d0              Head {h00=0x000c, h01=0x0050, text=» CWB CB9«, t00=0x0001, t01=0x0034}
0x01d0…01e0              Head {h00=0x000c, h01=0x0050, text=» CWB CBA«, t00=0x0001, t01=0x0044}
0x01e0…01ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0054}
0x01ea…0200              Head {h00=0x0012, h01=0x0050, text=» DWB DB1(CBA) «, t00=0x0001, t01=0x005e}
0x0200…0210              Head {h00=0x000c, h01=0x0050, text=» CWB CBB«, t00=0x0001, t01=0x0074}
0x0210…0220              Head {h00=0x000c, h01=0x0050, text=» CWB CBC«, t00=0x0001, t01=0x0084}
0x0220…022e              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0001, t01=0x0094}
0x022e…0238              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00a2}
0x0238…0252              Head {h00=0x0016, h01=0x0012, text=»*        DATA-SETS«, t00=0x0001, t01=0x00ac}
0x0252…025c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0001, t01=0x00c6}
0x025c…027a              Head {h00=0x001a, h01=0x0016, text=»DISK DSET FC=D0,DEV=DU«, t00=0x0001, t01=0x00d0}
0x027a…0296              Head {h00=0x0018, h01=0x0050, text=»DEDSDYKB DSET FC=20 «, t00=0x0001, t01=0x00ee}
0x0296…02ba              Head {h00=0x0020, h01=0x0050, text=»DEDSSCRN DSET FC=50,BUFL=100«, t00=0x0001, t01=0x010a}
0x02ba…02de              Head {h00=0x0020, h01=0x0050, text=»DEDSPRT DSET FC=36,BUFL=100 «, t00=0x0001, t01=0x012e}
0x02de…030a              Head {h00=0x0028, h01=0x0050, text=» FMTCTL INDS=DEDSDYKB,OUTDS=DEDSSCRN«, t00=0x0001, t01=0x0152}
0x030a…0318              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x017e}
0x0318…0322              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018c}
0x0322…033e              Head {h00=0x0018, h01=0x0050, text=»*        STARTPOINT «, t00=0x0002, t01=0x0008}
0x033e…0348              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0024}
0x0348…035c              Head {h00=0x0010, h01=0x0050, text=» START START«, t00=0x0002, t01=0x002e}
0x035c…036e              Head {h00=0x000e, h01=0x0050, text=» STACK 300«, t00=0x0002, t01=0x0042}
0x036e…037c              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0002, t01=0x0054}
0x037c…0386              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x0062}
0x0386…0390              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0002, t01=0x006c}
0x0390…03a0              Head {h00=0x000c, h01=0x0050, text=»CB1 BLK «, t00=0x0002, t01=0x0076}
0x03a0…03aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0086}
0x03aa…03d2              Head {h00=0x0024, h01=0x0050, text=»LRUQUE STRG 38 LAST RECENT USED «, t00=0x0002, t01=0x0090}
0x03d2…03fa              Head {h00=0x0024, h01=0x0050, text=»BPOOL STRGI (38),188 BUFFERPOOL «, t00=0x0002, t01=0x00b8}
0x03fa…0428              Head {h00=0x002a, h01=0x0050, text=»RPOOL STRGI (38),19 BUFFER REFERENCES «, t00=0x0002, t01=0x00e0}
0x0428…0446              Head {h00=0x001a, h01=0x0050, text=»   1-1 USAGE-TYPE STRG«, t00=0x0002, t01=0x010e}
0x0446…045a              Head {h00=0x0010, h01=0x0050, text=»   2-7 NAME «, t00=0x0002, t01=0x012c}
0x045a…0476              Head {h00=0x0018, h01=0x0050, text=»   8-8 NO. OF USERS «, t00=0x0002, t01=0x0140}
0x0476…0498              Head {h00=0x001e, h01=0x0050, text=»   9-9 LINK TO NEXT BUFFER«, t00=0x0002, t01=0x015c}
0x0498…04c0              Head {h00=0x0024, h01=0x0050, text=»FILINDUS BIN  INDEX FOR USERFILE«, t00=0x0002, t01=0x017e}
0x04c0…04e0              Head {h00=0x001c, h01=0x0017, text=»RETCOD BIN  RETURN-CODE «, t00=0x0003, t01=0x0016}
0x04e0…050a              Head {h00=0x0026, h01=0x0050, text=»RECLNTH BIN  CURRENT RECORDLENGTH «, t00=0x0003, t01=0x0036}
0x050a…0528              Head {h00=0x001a, h01=0x0050, text=»PJOBCUR BIN  POOLINDEX«, t00=0x0003, t01=0x0060}
0x0528…054e              Head {h00=0x0022, h01=0x0050, text=»JOBNAME STRG 6 CURRENT JOBNAME«, t00=0x0003, t01=0x007e}
0x054e…0578              Head {h00=0x0026, h01=0x0050, text=»FORMAT STRG 6 CURRENT FORMAT-NAME «, t00=0x0003, t01=0x00a4}
0x0578…0586              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0003, t01=0x00ce}
0x0586…0590              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x00dc}
0x0590…05b0              Head {h00=0x001c, h01=0x0018, text=»*        COMMON-BLOCK: 2«, t00=0x0003, t01=0x00e6}
0x05b0…05ba              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x0106}
0x05ba…05dc              Head {h00=0x001e, h01=0x0019, text=»*        USAGE: CONSTANTS «, t00=0x0003, t01=0x0110}
0x05dc…05e6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0003, t01=0x0132}
0x05e6…05f6              Head {h00=0x000c, h01=0x0050, text=»CB2 BLK «, t00=0x0003, t01=0x013c}
0x05f6…0608              Head {h00=0x000e, h01=0x0050, text=»POOL1 BOOL«, t00=0x0003, t01=0x014c}
0x0608…0632              Head {h00=0x0026, h01=0x0050, text=»SWITWT BOOL F SYSBUF ATTACHED Y/N «, t00=0x0003, t01=0x015e}
0x0632…0660              Head {h00=0x002a, h01=0x0050, text=»SWITSY BOOL F SYSTEMFILE ASSIGNED Y/N «, t00=0x0003, t01=0x0188}
0x0660…0688              Head {h00=0x0024, h01=0x0050, text=»SWITUS BOOL F USERFILE      -"- «, t00=0x0004, t01=0x0026}
0x0688…06a4              Head {h00=0x0018, h01=0x0014, text=»W0 BIN W'0' CONSTANT«, t00=0x0004, t01=0x004e}
0x06a4…06c0              Head {h00=0x0018, h01=0x0014, text=»W1 BIN W'1' CONSTANT«, t00=0x0004, t01=0x006a}
0x06c0…06dc              Head {h00=0x0018, h01=0x0014, text=»W2 BIN W'2' CONSTANT«, t00=0x0004, t01=0x0086}
0x06dc…06f8              Head {h00=0x0018, h01=0x0014, text=»W3 BIN W'3' CONSTANT«, t00=0x0004, t01=0x00a2}
0x06f8…0714              Head {h00=0x0018, h01=0x0014, text=»W4 BIN W'4' CONSTANT«, t00=0x0004, t01=0x00be}
0x0714…0730              Head {h00=0x0018, h01=0x0050, text=»W5 BIN W'5' CONSTANT«, t00=0x0004, t01=0x00da}
0x0730…074c              Head {h00=0x0018, h01=0x0050, text=»W6 BIN W'6' CONSTANT«, t00=0x0004, t01=0x00f6}
0x074c…0768              Head {h00=0x0018, h01=0x0050, text=»W7 BIN W'7' CONSTANT«, t00=0x0004, t01=0x0112}
0x0768…0784              Head {h00=0x0018, h01=0x0050, text=»W8 BIN W'8' CONSTANT«, t00=0x0004, t01=0x012e}
0x0784…07a0              Head {h00=0x0018, h01=0x0050, text=»W9 BIN W'9' CONSTANT«, t00=0x0004, t01=0x014a}
0x07a0…07be              Head {h00=0x001a, h01=0x0016, text=»W10 BIN W'10' CONSTANT«, t00=0x0004, t01=0x0166}
0x07be…07dc              Head {h00=0x001a, h01=0x0050, text=»W11 BIN W'11' CONSTANT«, t00=0x0004, t01=0x0184}
0x07dc…07fa              Head {h00=0x001a, h01=0x0050, text=»W12 BIN W'12' CONSTANT«, t00=0x0005, t01=0x0012}
0x07fa…0818              Head {h00=0x001a, h01=0x0050, text=»W13 BIN W'13' CONSTANT«, t00=0x0005, t01=0x0030}
0x0818…0836              Head {h00=0x001a, h01=0x0050, text=»W14 BIN W'14' CONSTANT«, t00=0x0005, t01=0x004e}
0x0836…0854              Head {h00=0x001a, h01=0x0050, text=»W15 BIN W'15' CONSTANT«, t00=0x0005, t01=0x006c}
0x0854…0862              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x008a}
0x0862…086c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0098}
0x086c…088c              Head {h00=0x001c, h01=0x0050, text=»*        COMMON-BLOCK:3 «, t00=0x0005, t01=0x00a2}
0x088c…0896              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c2}
0x0896…08b8              Head {h00=0x001e, h01=0x0050, text=»*         USAGE: CONSTANTS«, t00=0x0005, t01=0x00cc}
0x08b8…08c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ee}
0x08c2…08d2              Head {h00=0x000c, h01=0x0050, text=»CB3 BLK «, t00=0x0005, t01=0x00f8}
0x08d2…08f0              Head {h00=0x001a, h01=0x0016, text=»W16 BIN W'16' CONSTANT«, t00=0x0005, t01=0x0108}
0x08f0…090e              Head {h00=0x001a, h01=0x0050, text=»W17 BIN W'17' CONSTANT«, t00=0x0005, t01=0x0126}
0x090e…092c              Head {h00=0x001a, h01=0x0050, text=»W18 BIN W'18' CONSTANT«, t00=0x0005, t01=0x0144}
0x092c…094a              Head {h00=0x001a, h01=0x0050, text=»W19 BIN W'19' CONSTANT«, t00=0x0005, t01=0x0162}
0x094a…0968              Head {h00=0x001a, h01=0x0050, text=»W20 BIN W'20' CONSTANT«, t00=0x0005, t01=0x0180}
0x0968…0986              Head {h00=0x001a, h01=0x0050, text=»W21 BIN W'21' CONSTANT«, t00=0x0006, t01=0x000e}
0x0986…09a4              Head {h00=0x001a, h01=0x0050, text=»W22 BIN W'22' CONSTANT«, t00=0x0006, t01=0x002c}
0x09a4…09c2              Head {h00=0x001a, h01=0x0050, text=»W23 BIN W'23' CONSTANT«, t00=0x0006, t01=0x004a}
0x09c2…09e0              Head {h00=0x001a, h01=0x0050, text=»W24 BIN W'24' CONSTANT«, t00=0x0006, t01=0x0068}
0x09e0…09fe              Head {h00=0x001a, h01=0x0050, text=»W64 BIN W'64' CONSTANT«, t00=0x0006, t01=0x0086}
0x09fe…0a1c              Head {h00=0x001a, h01=0x0050, text=»W99 BIN W'99' CONSTANT«, t00=0x0006, t01=0x00a4}
0x0a1c…0a34              Head {h00=0x0014, h01=0x0050, text=»W128 BIN W'128' «, t00=0x0006, t01=0x00c2}
0x0a34…0a54              Head {h00=0x001c, h01=0x0050, text=»W188 BIN W'188' CONSTANT«, t00=0x0006, t01=0x00da}
0x0a54…0a7a              Head {h00=0x0022, h01=0x0050, text=»SYSLEN BIN W'199' RECLEN SYST «, t00=0x0006, t01=0x00fa}
0x0a7a…0aa0              Head {h00=0x0022, h01=0x0050, text=»USELEN BIN W'255' RECLEN USER «, t00=0x0006, t01=0x0120}
0x0aa0…0ac6              Head {h00=0x0022, h01=0x0050, text=»SECLEN BIN W'256' SECTORLENGTH«, t00=0x0006, t01=0x0146}
0x0ac6…0ad4              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0006, t01=0x016c}
0x0ad4…0ade              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0006, t01=0x017a}
0x0ade…0afe              Head {h00=0x001c, h01=0x0050, text=»*        COMMON-BLOCK: 4«, t00=0x0006, t01=0x0184}
0x0afe…0b08              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0007, t01=0x0014}
0x0b08…0b2e              Head {h00=0x0022, h01=0x001d, text=»*        USAGE: DISC-HANDLING «, t00=0x0007, t01=0x001e}
0x0b2e…0b38              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0044}
0x0b38…0b48              Head {h00=0x000c, h01=0x0050, text=»CB4 BLK «, t00=0x0007, t01=0x004e}
0x0b48…0b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b52…0b78              Head {h00=0x0022, h01=0x0050, text=»BATCH STRG 6 CURRENT BATCHNAME«, t00=0x0007, t01=0x0068}
0x0b78…0ba4              Head {h00=0x0028, h01=0x0050, text=»TABLE STRG 6 TABLE-NAME (VALUE-SET) «, t00=0x0007, t01=0x008e}
0x0ba4…0bca              Head {h00=0x0022, h01=0x0050, text=»PBLOCK STRG 58 PARAMETERBLOCK «, t00=0x0007, t01=0x00ba}
0x0bca…0bee              Head {h00=0x0020, h01=0x0050, text=»SYSBUF STRG 256 DISC-BUFFER «, t00=0x0007, t01=0x00e0}
0x0bee…0bf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0104}
0x0bf8…0c26              Head {h00=0x002a, h01=0x0050, text=»FTYPE BCD 1 1=SYSTEM,2=USER,3=UD-FILE «, t00=0x0007, t01=0x010e}
0x0c26…0c3a              Head {h00=0x0010, h01=0x0050, text=»UNIT STRG 1 «, t00=0x0007, t01=0x013c}
0x0c3a…0c6a              Head {h00=0x002c, h01=0x0050, text=»COPY STRG 1 Y=WHOLE FILE, N=PART OF FILE«, t00=0x0007, t01=0x0150}
0x0c6a…0c82              Head {h00=0x0014, h01=0x0050, text=»ANSW STRG 1 Y/N «, t00=0x0007, t01=0x0180}
0x0c82…0c8c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0008}
0x0c8c…0cae              Head {h00=0x001e, h01=0x0050, text=»VOLNAM STRG 6 VOLUME-NAME «, t00=0x0008, t01=0x0012}
0x0cae…0ccc              Head {h00=0x001a, h01=0x0050, text=»SYSVOL STRG 6C'SYSVOL'«, t00=0x0008, t01=0x0034}
0x0ccc…0cf6              Head {h00=0x0026, h01=0x0050, text=»COPNAM STRG 6 VOL-NAME FOR DELETE «, t00=0x0008, t01=0x0052}
0x0cf6…0d12              Head {h00=0x0018, h01=0x0050, text=»   AND REORG. OUTPUT«, t00=0x0008, t01=0x007c}
0x0d12…0d1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0098}
0x0d1c…0d3c              Head {h00=0x001c, h01=0x0050, text=»FILNAM STRG 8 FILE-NAME «, t00=0x0008, t01=0x00a2}
0x0d3c…0d5c              Head {h00=0x001c, h01=0x0050, text=»USEFIL STRG 8C'PTS-DE  '«, t00=0x0008, t01=0x00c2}
0x0d5c…0d7c              Head {h00=0x001c, h01=0x0050, text=»SYSFIL STRG 8C'SYSFIL  '«, t00=0x0008, t01=0x00e2}
0x0d7c…0daa              Head {h00=0x002a, h01=0x0050, text=»PWBDB4 STRG 16 SAVEAREA FOR WORKBLOCKS«, t00=0x0008, t01=0x0102}
0x0daa…0dc6              Head {h00=0x0018, h01=0x0050, text=»    AND DESCRIPTORS «, t00=0x0008, t01=0x0130}
0x0dc6…0e0c              Head {h00=0x0042, h01=0x0050, text=»DUNIT STRG X'F0F0F1F2F3F8F9FAFBF0' CORRESPOND TO INPUT UNIT NO«, t00=0x0008, t01=0x014c}
0x0e0c…0e3a (9, 0, 400)  Head {h00=0x002a, h01=0x0050, text=»*                  Y Y Y Y Y Y Y Y Y Y«, t00=0x0009, t01=0x0004}
0x0e3a…0e68              Head {h00=0x002a, h01=0x0050, text=»*                  I I I I I I I I I I«, t00=0x0009, t01=0x0032}
0x0e68…0e96              Head {h00=0x002a, h01=0x0050, text=»*       UNIT NO.   0 1 2 3 4 5 6 7 8 9«, t00=0x0009, t01=0x0060}
0x0e96…0eac              Head {h00=0x0012, h01=0x0050, text=»*  DISC CODE: «, t00=0x0009, t01=0x008e}
0x0eac…0ed4              Head {h00=0x0024, h01=0x0050, text=»*  FO = FIX.1       F1 = CART.1 «, t00=0x0009, t01=0x00a4}
0x0ed4…0efc              Head {h00=0x0024, h01=0x0050, text=»*  F2 = FIX.2       F3 = CART.2 «, t00=0x0009, t01=0x00cc}
0x0efc…0f26              Head {h00=0x0026, h01=0x0050, text=»*  F8 = FLOPPY.1    F9 = FLOPPY 2 «, t00=0x0009, t01=0x00f4}
0x0f26…0f50              Head {h00=0x0026, h01=0x0050, text=»*  FA = FLOPPY 3    FB = FLOPPY 4 «, t00=0x0009, t01=0x011e}
0x0f50…0f5e              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0009, t01=0x0148}
0x0f5e…0f68              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x0156}
0x0f68…0f88              Head {h00=0x001c, h01=0x0050, text=»*        COMMON-BLOCK: 5«, t00=0x0009, t01=0x0160}
0x0f88…0f92              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0009, t01=0x0180}
0x0f92…0fb6              Head {h00=0x0020, h01=0x0050, text=»*       USAGE: CREATE FILES «, t00=0x0009, t01=0x018a}
0x0fb6…0fc0              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x000a, t01=0x001e}
0x0fc0…0fd0              Head {h00=0x000c, h01=0x0050, text=»CB5 BLK «, t00=0x000a, t01=0x0028}
0x0fd0…0fda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0038}
0x0fda…0ffa              Head {h00=0x001c, h01=0x0050, text=»FCOD BIN  DISK FILE-CODE«, t00=0x000a, t01=0x0042}
0x0ffa…101c              Head {h00=0x001e, h01=0x0050, text=»FCOD1 BIN  FILE-CODE INPUT«, t00=0x000a, t01=0x0062}
0x101c…1040              Head {h00=0x0020, h01=0x0050, text=»FCOD2 BIN  FILE-CODE OUTPUT «, t00=0x000a, t01=0x0084}
0x1040…105e              Head {h00=0x001a, h01=0x0050, text=»RECNUM BIN  RECORD NO.«, t00=0x000a, t01=0x00a8}
0x105e…1084              Head {h00=0x0022, h01=0x0050, text=»FRESEC BIN  NO OF FREE SECTORS«, t00=0x000a, t01=0x00c6}
0x1084…10ac              Head {h00=0x0024, h01=0x0050, text=»ELMNO BIN  ELEMENT-NO, VALUE-SET«, t00=0x000a, t01=0x00ec}
0x10ac…10b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0114}
0x10b6…10d0              Head {h00=0x0016, h01=0x0050, text=»DATE BCD 8 YYMMDD «, t00=0x000a, t01=0x011e}
0x10d0…10f2              Head {h00=0x001e, h01=0x0050, text=»RSIZE BCD 5 RECORD LENGTH «, t00=0x000a, t01=0x0138}
0x10f2…1116              Head {h00=0x0020, h01=0x0050, text=»BLFACT BCD 3 BLOCKING FACTOR«, t00=0x000a, t01=0x015a}
0x1116…1140              Head {h00=0x0026, h01=0x0050, text=»NOREC BCD 5 NO. OF RECORDS-ENTERED«, t00=0x000a, t01=0x017e}
0x1140…1160              Head {h00=0x001c, h01=0x0050, text=»PRNUM BCD 1 PROGRAM NO. «, t00=0x000b, t01=0x0018}
0x1160…116a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0038}
0x116a…118e              Head {h00=0x0020, h01=0x0050, text=»HEX00 STRG 1X'00' PAUSE ITEM«, t00=0x000b, t01=0x0042}
0x118e…11ac              Head {h00=0x001a, h01=0x0050, text=»HEXTAB STRGI (7),1  C «, t00=0x000b, t01=0x0066}
0x11ac…11d0              Head {h00=0x0020, h01=0x0050, text=»  X'80',X'C0',X'E0',X'F0'  C«, t00=0x000b, t01=0x0084}
0x11d0…11ec              Head {h00=0x0018, h01=0x0050, text=»  X'F8',X'FC',X'FE' «, t00=0x000b, t01=0x00a8}
0x11ec…1212              Head {h00=0x0022, h01=0x0050, text=»ACK BCDI (10),18 ACKUMULATORS «, t00=0x000b, t01=0x00c4}
0x1212…1220              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00ea}
0x1220…122a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00f8}
0x122a…123a              Head {h00=0x000c, h01=0x0050, text=»CB6 BLK «, t00=0x000b, t01=0x0102}
0x123a…1244              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0112}
0x1244…1268              Head {h00=0x0020, h01=0x0050, text=»SWIT01 BOOL  USED IN DEDISC «, t00=0x000b, t01=0x011c}
0x1268…127c              Head {h00=0x0010, h01=0x0050, text=»SWIT02 BOOL «, t00=0x000b, t01=0x0140}
0x127c…1290              Head {h00=0x0010, h01=0x0050, text=»SWIT03 BOOL «, t00=0x000b, t01=0x0154}
0x1290…12a4              Head {h00=0x0010, h01=0x0050, text=»SWIT04 BOOL «, t00=0x000b, t01=0x0168}
0x12a4…12b8              Head {h00=0x0010, h01=0x0050, text=»SWIT05 BOOL «, t00=0x000b, t01=0x017c}
0x12b8…12cc              Head {h00=0x0010, h01=0x0050, text=»SWIT06 BOOL «, t00=0x000b, t01=0x0190}
0x12cc…12e0              Head {h00=0x0010, h01=0x0050, text=»SWIT07 BOOL «, t00=0x000c, t01=0x0014}
0x12e0…12f4              Head {h00=0x0010, h01=0x0050, text=»SWIT08 BOOL «, t00=0x000c, t01=0x0028}
0x12f4…1308              Head {h00=0x0010, h01=0x0050, text=»SWITFS BOOL «, t00=0x000c, t01=0x003c}
0x1308…131c              Head {h00=0x0010, h01=0x0050, text=»SW95PR BOOL «, t00=0x000c, t01=0x0050}
0x131c…1326              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0064}
0x1326…133c              Head {h00=0x0012, h01=0x0050, text=»NEWVOL BOOL F «, t00=0x000c, t01=0x006e}
0x133c…1346              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x1346…1372              Head {h00=0x0028, h01=0x0050, text=»FNOOFREC BINI (9) NO OF REC IN FILE «, t00=0x000c, t01=0x008e}
0x1372…139a              Head {h00=0x0024, h01=0x0050, text=»F95PROC BINI (9) 5% OF FILESPACE«, t00=0x000c, t01=0x00ba}
0x139a…13c8              Head {h00=0x002a, h01=0x0050, text=»FCOUNTER BINI (9) COUNTER (USER-FILE) «, t00=0x000c, t01=0x00e2}
0x13c8…13fc              Head {h00=0x0030, h01=0x0050, text=»FILECODE BINI (3),X'D0',X'D0',X'D1' FILECODE«, t00=0x000c, t01=0x0110}
0x13fc…142e              Head {h00=0x002e, h01=0x0050, text=»FINDEXPO BINI (9) POOLIND. TO FREESP-REC. «, t00=0x000c, t01=0x0144}
0x142e…1462              Head {h00=0x0030, h01=0x0050, text=»FVOLNAME STRGI (3),6C'SYSVOL' VOLUMENANES C «, t00=0x000c, t01=0x0176}
0x1462…147a              Head {h00=0x0014, h01=0x0050, text=»  6C'SYSVOL'  C «, t00=0x000d, t01=0x001a}
0x147a…148e              Head {h00=0x0010, h01=0x0050, text=»  6C'OUTPUT'«, t00=0x000d, t01=0x0032}
0x148e…149c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x0046}
0x149c…14a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0054}
0x14a6…14b6              Head {h00=0x000c, h01=0x0050, text=»CB7 BLK «, t00=0x000d, t01=0x005e}
0x14b6…14c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x006e}
0x14c0…14ee              Head {h00=0x002a, h01=0x0050, text=»MAXOCC BIN  RESERVED FOR DISCHANDLING «, t00=0x000d, t01=0x0078}
0x14ee…1518              Head {h00=0x0026, h01=0x0050, text=»PINDFR BIN  POOLINDEX TO CURR FMT «, t00=0x000d, t01=0x00a6}
0x1518…1542              Head {h00=0x0026, h01=0x0050, text=»PINDTB BIN  POOLINDEX TO VALUE-SET«, t00=0x000d, t01=0x00d0}
0x1542…1570              Head {h00=0x002a, h01=0x0050, text=»PINACC BIN  POOLINDEX TO ACCUMULATORS «, t00=0x000d, t01=0x00fa}
0x1570…159c              Head {h00=0x0028, h01=0x0050, text=»FRMTPNTR BIN  POINTER TO FMT ON DISC«, t00=0x000d, t01=0x0128}
0x159c…15ca              Head {h00=0x002a, h01=0x0050, text=»CURSEC BIN  CURRENT SECTORNO USERFILE «, t00=0x000d, t01=0x0154}
0x15ca…15f6              Head {h00=0x0028, h01=0x0050, text=»RNRFMCH BIN  CURRENT RECNO FMT-CHAIN«, t00=0x000d, t01=0x0182}
0x15f6…161e              Head {h00=0x0024, h01=0x0050, text=»PTRFMCH BIN  POINTER IN RNRFMCH «, t00=0x000e, t01=0x001e}
0x161e…1648              Head {h00=0x0026, h01=0x0050, text=»FFSNR BINI (3) RECORD NO. FREE-SP.«, t00=0x000e, t01=0x0046}
0x1648…166a              Head {h00=0x001e, h01=0x0050, text=»FRINF BINI (9) FILESTATUS «, t00=0x000e, t01=0x0070}
0x166a…1674              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0092}
0x1674…16a0              Head {h00=0x0028, h01=0x0050, text=»SYSV STRGI (16),18 SYSTEM-VARIABLES «, t00=0x000e, t01=0x009c}
0x16a0…16ae              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00c8}
0x16ae…16b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d6}
0x16b8…16c8              Head {h00=0x000c, h01=0x0050, text=»CB8 BLK «, t00=0x000e, t01=0x00e0}
0x16c8…16d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00f0}
0x16d2…16e4              Head {h00=0x000e, h01=0x0050, text=»DOOL1 BOOL«, t00=0x000e, t01=0x00fa}
0x16e4…16f6              Head {h00=0x000e, h01=0x0050, text=»DOOL2 BOOL«, t00=0x000e, t01=0x010c}
0x16f6…1708              Head {h00=0x000e, h01=0x0050, text=»DOOL3 BOOL«, t00=0x000e, t01=0x011e}
0x1708…171a              Head {h00=0x000e, h01=0x0050, text=»DOOL4 BOOL«, t00=0x000e, t01=0x0130}
0x171a…172c              Head {h00=0x000e, h01=0x0050, text=»DOOL5 BOOL«, t00=0x000e, t01=0x0142}
0x172c…173e              Head {h00=0x000e, h01=0x0050, text=»DOOL6 BOOL«, t00=0x000e, t01=0x0154}
0x173e…1750              Head {h00=0x000e, h01=0x0050, text=»DOOL7 BOOL«, t00=0x000e, t01=0x0166}
0x1750…1762              Head {h00=0x000e, h01=0x0050, text=»DOOLA BOOL«, t00=0x000e, t01=0x0178}
0x1762…1774              Head {h00=0x000e, h01=0x0050, text=»DOOLB BOOL«, t00=0x000e, t01=0x018a}
0x1774…1796              Head {h00=0x001e, h01=0x0050, text=»DBOFOR BOOL  FORCED RECORD«, t00=0x000f, t01=0x000c}
0x1796…17b2              Head {h00=0x0018, h01=0x0050, text=»DEBIN1 BIN  WORKITEM«, t00=0x000f, t01=0x002e}
0x17b2…17c4              Head {h00=0x000e, h01=0x0050, text=»DEBIN2 BIN«, t00=0x000f, t01=0x004a}
0x17c4…17d6              Head {h00=0x000e, h01=0x0050, text=»DEBIN3 BIN«, t00=0x000f, t01=0x005c}
0x17d6…17e8              Head {h00=0x000e, h01=0x0050, text=»DEBIN4 BIN«, t00=0x000f, t01=0x006e}
0x17e8…17fa              Head {h00=0x000e, h01=0x0050, text=»DEBIN5 BIN«, t00=0x000f, t01=0x0080}
0x17fa…181e              Head {h00=0x0020, h01=0x0050, text=»FLIND1 BIN  FORMATLINKINDEX «, t00=0x000f, t01=0x0092}
0x181e…1830              Head {h00=0x000e, h01=0x0050, text=»FLIND2 BIN«, t00=0x000f, t01=0x00b6}
0x1830…1842              Head {h00=0x000e, h01=0x0050, text=»FLIND3 BIN«, t00=0x000f, t01=0x00c8}
0x1842…1854              Head {h00=0x000e, h01=0x0050, text=»FLIND4 BIN«, t00=0x000f, t01=0x00da}
0x1854…1866              Head {h00=0x000e, h01=0x0050, text=»FLIND5 BIN«, t00=0x000f, t01=0x00ec}
0x1866…1884              Head {h00=0x001a, h01=0x0015, text=»STR1A STRG 1 WORKITEM «, t00=0x000f, t01=0x00fe}
0x1884…18a2              Head {h00=0x001a, h01=0x0015, text=»STR2A STRG 2 WORKITEM «, t00=0x000f, t01=0x011c}
0x18a2…18c0              Head {h00=0x001a, h01=0x0050, text=»STR6A STRG 6 WORKITEM «, t00=0x000f, t01=0x013a}
0x18c0…18d4              Head {h00=0x0010, h01=0x0050, text=»STR6B STRG 6«, t00=0x000f, t01=0x0158}
0x18d4…18f4              Head {h00=0x001c, h01=0x0050, text=»STRG10A STRG 10 WORKITEM«, t00=0x000f, t01=0x016c}
0x18f4…1914              Head {h00=0x001c, h01=0x0050, text=»STR15A STRG 15 WORKITEM «, t00=0x000f, t01=0x018c}
0x1914…1922              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x001c}
0x1922…192c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192c…193c              Head {h00=0x000c, h01=0x0050, text=»CB9 BLK «, t00=0x0010, t01=0x0034}
0x193c…1946              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0044}
0x1946…1968              Head {h00=0x001e, h01=0x0050, text=»KEYMSK BIN  MASK AUTHORITY«, t00=0x0010, t01=0x004e}
0x1968…1990              Head {h00=0x0024, h01=0x0050, text=»FLIND BINI (24) FORMATLINKINDEX «, t00=0x0010, t01=0x0070}
0x1990…199a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0098}
0x199a…19b4              Head {h00=0x0016, h01=0x0050, text=»FDVBCD BCDI (8),3 «, t00=0x0010, t01=0x00a2}
0x19b4…19d8              Head {h00=0x0020, h01=0x0050, text=»BCDI21 BCDI (2),21 WORKITEM «, t00=0x0010, t01=0x00bc}
0x19d8…19e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00e0}
0x19e2…1a08              Head {h00=0x0022, h01=0x0050, text=»STATSH STRG 120 SEARCH STATUS «, t00=0x0010, t01=0x00ea}
0x1a08…1a34              Head {h00=0x0028, h01=0x0050, text=»USEV STRGI (3),25 USER-VARIABLES 1-3«, t00=0x0010, t01=0x0110}
0x1a34…1a4a              Head {h00=0x0012, h01=0x0050, text=»STR64A STRG 64«, t00=0x0010, t01=0x013c}
0x1a4a…1a58              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0152}
0x1a58…1a62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0160}
0x1a62…1a6c              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0010, t01=0x016a}
0x1a6c…1a98              Head {h00=0x0028, h01=0x0023, text=»*        USAGE: DATA RECORD STORING «, t00=0x0010, t01=0x0174}
0x1a98…1aa2              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x0010}
0x1aa2…1ab2              Head {h00=0x000c, h01=0x0050, text=»CBA BLK «, t00=0x0011, t01=0x001a}
0x1ab2…1ad4              Head {h00=0x001e, h01=0x0050, text=»RBUF STRG 256 RECORD AREA «, t00=0x0011, t01=0x002a}
0x1ad4…1ae2              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0011, t01=0x004c}
0x1ae2…1aec              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x005a}
0x1aec…1b10              Head {h00=0x0020, h01=0x001b, text=»*        TERMINAL-BLOCK: 2R «, t00=0x0011, t01=0x0064}
0x1b10…1b1a              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x0088}
0x1b1a…1b46              Head {h00=0x0028, h01=0x0023, text=»*        USAGE: DATA RECORD STORING «, t00=0x0011, t01=0x0092}
0x1b46…1b50              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0011, t01=0x00be}
0x1b50…1b60              Head {h00=0x000c, h01=0x0050, text=»DB1 DBLK«, t00=0x0011, t01=0x00c8}
0x1b60…1b72              Head {h00=0x000e, h01=0x0050, text=»FS STRG 2 «, t00=0x0011, t01=0x00d8}
0x1b72…1b92              Head {h00=0x001c, h01=0x0050, text=»LPREV BIN  LINK PREVIOUS«, t00=0x0011, t01=0x00ea}
0x1b92…1bae              Head {h00=0x0018, h01=0x0050, text=»LNEXT BIN  LINK NEXT«, t00=0x0011, t01=0x010a}
0x1bae…1bd8              Head {h00=0x0026, h01=0x0050, text=»NOOCCB BIN  NO. OF OCCUPIED BYTES «, t00=0x0011, t01=0x0126}
0x1bd8…1bfa              Head {h00=0x001e, h01=0x0050, text=»FRSTNO BIN  1:ST RECORD NO«, t00=0x0011, t01=0x0150}
0x1bfa…1c20              Head {h00=0x0022, h01=0x0050, text=»NOFREE BIN  NO.OF FREE RECORDS«, t00=0x0011, t01=0x0172}
0x1c20…1c4e              Head {h00=0x002a, h01=0x0050, text=»FF STRGI (187),1 FREE REC. INDICATION «, t00=0x0012, t01=0x0008}
0x1c4e…1c5c              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0012, t01=0x0036}
0x1c5c…1c66              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x0044}
0x1c66…1c70              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x004e}
0x1c70…1ca4              Head {h00=0x0030, h01=0x002c, text=»*        USAGE: BOOLEAN AND BINARY WORKITEMS«, t00=0x0012, t01=0x0058}
0x1ca4…1cae              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0012, t01=0x008c}
0x1cae…1cbe              Head {h00=0x000c, h01=0x0050, text=»CBB BLK «, t00=0x0012, t01=0x0096}
0x1cbe…1cc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a6}
0x1cc8…1ce4              Head {h00=0x0018, h01=0x0014, text=»BOOL1 BOOL  WORKITEM«, t00=0x0012, t01=0x00b0}
0x1ce4…1d00              Head {h00=0x0018, h01=0x0014, text=»BOOL2 BOOL  WORKITEM«, t00=0x0012, t01=0x00cc}
0x1d00…1d1c              Head {h00=0x0018, h01=0x0014, text=»BOOL3 BOOL  WORKITEM«, t00=0x0012, t01=0x00e8}
0x1d1c…1d38              Head {h00=0x0018, h01=0x0014, text=»BOOL4 BOOL  WORKITEM«, t00=0x0012, t01=0x0104}
0x1d38…1d54              Head {h00=0x0018, h01=0x0014, text=»BOOL5 BOOL  WORKITEM«, t00=0x0012, t01=0x0120}
0x1d54…1d70              Head {h00=0x0018, h01=0x0014, text=»BOOL6 BOOL  WORKITEM«, t00=0x0012, t01=0x013c}
0x1d70…1d8c              Head {h00=0x0018, h01=0x0014, text=»BOOL7 BOOL  WORKITEM«, t00=0x0012, t01=0x0158}
0x1d8c…1da8              Head {h00=0x0018, h01=0x0014, text=»BOOL8 BOOL  WORKITEM«, t00=0x0012, t01=0x0174}
0x1da8…1dc4              Head {h00=0x0018, h01=0x0014, text=»BOOL9 BOOL  WORKITEM«, t00=0x0012, t01=0x0190}
0x1dc4…1dce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x001c}
0x1dce…1de2              Head {h00=0x0010, h01=0x0050, text=»BOOLA1 BOOL «, t00=0x0013, t01=0x0026}
0x1de2…1df6              Head {h00=0x0010, h01=0x0050, text=»BOOLA2 BOOL «, t00=0x0013, t01=0x003a}
0x1df6…1e00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x004e}
0x1e00…1e1a              Head {h00=0x0016, h01=0x0012, text=»BIN1 BIN  WORKITEM«, t00=0x0013, t01=0x0058}
0x1e1a…1e34              Head {h00=0x0016, h01=0x0012, text=»BIN2 BIN  WORKITEM«, t00=0x0013, t01=0x0072}
0x1e34…1e4e              Head {h00=0x0016, h01=0x0012, text=»BIN3 BIN  WORKITEM«, t00=0x0013, t01=0x008c}
0x1e4e…1e68              Head {h00=0x0016, h01=0x0012, text=»BIN4 BIN  WORKITEM«, t00=0x0013, t01=0x00a6}
0x1e68…1e82              Head {h00=0x0016, h01=0x0012, text=»BIN5 BIN  WORKITEM«, t00=0x0013, t01=0x00c0}
0x1e82…1e9c              Head {h00=0x0016, h01=0x0012, text=»BIN6 BIN  WORKITEM«, t00=0x0013, t01=0x00da}
0x1e9c…1eb6              Head {h00=0x0016, h01=0x0012, text=»BIN7 BIN  WORKITEM«, t00=0x0013, t01=0x00f4}
0x1eb6…1ed0              Head {h00=0x0016, h01=0x0012, text=»BIN8 BIN  WORKITEM«, t00=0x0013, t01=0x010e}
0x1ed0…1eea              Head {h00=0x0016, h01=0x0012, text=»BIN9 BIN  WORKITEM«, t00=0x0013, t01=0x0128}
0x1eea…1f06              Head {h00=0x0018, h01=0x0013, text=»BIN10 BIN  WORKITEM «, t00=0x0013, t01=0x0142}
0x1f06…1f22              Head {h00=0x0018, h01=0x0013, text=»BIN11 BIN  WORKITEM «, t00=0x0013, t01=0x015e}
0x1f22…1f3e              Head {h00=0x0018, h01=0x0013, text=»BIN12 BIN  WORKITEM «, t00=0x0013, t01=0x017a}
0x1f3e…1f5a              Head {h00=0x0018, h01=0x0013, text=»BIN13 BIN  WORKITEM «, t00=0x0014, t01=0x0008}
0x1f5a…1f76              Head {h00=0x0018, h01=0x0013, text=»BIN14 BIN  WORKITEM «, t00=0x0014, t01=0x0024}
0x1f76…1f92              Head {h00=0x0018, h01=0x0013, text=»BIN15 BIN  WORKITEM «, t00=0x0014, t01=0x0040}
0x1f92…1fae              Head {h00=0x0018, h01=0x0013, text=»BIN16 BIN  WORKITEM «, t00=0x0014, t01=0x005c}
0x1fae…1fbc              Head {h00=0x000a, h01=0x0006, text=» EJECT«, t00=0x0014, t01=0x0078}
0x1fbc…1fc6              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x0086}
0x1fc6…1fd0              Head {h00=0x0006, h01=0x0006, text=»* «, t00=0x0014, t01=0x0090}
0x1fd0…2018              Head {h00=0x0044, h01=0x0050, text=»*        USAGE: BCD-/ STRG-WORKITEMS AND DENTERPACKAGE VARIABLES«, t00=0x0014, t01=0x009a}
0x2018…2022              Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0014, t01=0x00e2}
0x2022…2032              Head {h00=0x000c, h01=0x0050, text=»CBC BLK «, t00=0x0014, t01=0x00ec}
0x2032…203c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00fc}
0x203c…2062              Head {h00=0x0022, h01=0x0050, text=»DEPROMPT BOOL  DENTERVARIABLE «, t00=0x0014, t01=0x0106}
0x2062…2088              Head {h00=0x0022, h01=0x0050, text=»DECHANGE BOOL  DENTERVARIABLES«, t00=0x0014, t01=0x012c}
0x2088…209e              Head {h00=0x0012, h01=0x0050, text=»DENOCHAN BOOL «, t00=0x0014, t01=0x0152}
0x209e…20a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0168}
0x20a8…20cc              Head {h00=0x0020, h01=0x0050, text=»DKBIN1 BIN  WORKITEM-DEDISC «, t00=0x0014, t01=0x0172}
0x20cc…20de              Head {h00=0x000e, h01=0x0050, text=»DKBIN2 BIN«, t00=0x0015, t01=0x0008}
0x20de…20f0              Head {h00=0x000e, h01=0x0050, text=»DKBIN3 BIN«, t00=0x0015, t01=0x001a}
0x20f0…20fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x002c}
0x20fa…211e              Head {h00=0x0020, h01=0x0050, text=»DEBINW1 BIN  DENTERVARIABLE «, t00=0x0015, t01=0x0036}
0x211e…2142              Head {h00=0x0020, h01=0x0050, text=»DEBINW2 BIN  DENTERVARIABLE «, t00=0x0015, t01=0x005a}
0x2142…2166              Head {h00=0x0020, h01=0x0050, text=»DEBINW3 BIN  DENTERVARIABLE «, t00=0x0015, t01=0x007e}
0x2166…218a              Head {h00=0x0020, h01=0x0050, text=»DEBINW4 BIN  DENTERVARIABLE «, t00=0x0015, t01=0x00a2}
0x218a…21b0              Head {h00=0x0022, h01=0x0050, text=»DEINPUT STRG 62 DENTERVARIABLE«, t00=0x0015, t01=0x00c6}
0x21b0…21cc              Head {h00=0x0018, h01=0x0014, text=»BCD2A BCD 2 WORKITEM«, t00=0x0015, t01=0x00ec}
0x21cc…21e8              Head {h00=0x0018, h01=0x0050, text=»BCD3A BCD 3 WORKITEM«, t00=0x0015, t01=0x0108}
0x21e8…2206              Head {h00=0x001a, h01=0x0050, text=»BCD13A BCD 13 WORKITEM«, t00=0x0015, t01=0x0124}
0x2206…221c              Head {h00=0x0012, h01=0x0050, text=»WORK BINI (10)«, t00=0x0015, t01=0x0142}
0x221c…222a              Head {h00=0x000a, h01=0x0005, text=» PDIV «, t00=0x0015, t01=0x0158}
0x222a…2236              Head {h00=0x0008, h01=0x0004, text=» END«, t00=0x0015, t01=0x0166}
0x2236…223a              Head {h00=0x4004, h01=0x0000}
0x223a…223e              00 15 01 72                                                                                                                                                                                                                                       ┆   r┆
0x223e…2246 (22, 1, 8)   20 04 00 00 00 16 00 04                                                                                                                                                                                                                           ┆        ┆
0x2246…2296 (23, 0, 400) 53 20 00 1e 01 70 00 12 00 50 20 41 44 44 20 42 49 4e 31 35 2c 57 31 20 00 1f 00 0a 00 20 00 50 20 43 41 4c 4c 20 43 4d 50 49 4e 44 2c 42 49 4e 31 35 2c 42 50 4f 4f 4c 28 57 31 29 00 1f 00 20 00 10 00 50 20 42 4e 4f 4b 20 44 45 50 4f 31 36   ┆S    p   P ADD BIN15,W1        P CALL CMPIND,BIN15,BPOOL(W1)       P BNOK DEPO16┆
0x2296…22e6              00 1f 00 44 00 16 00 50 20 42 20 44 45 50 4f 31 32 20 43 4f 4e 54 49 4e 55 45 00 1f 00 58 00 0a 00 50 44 45 50 4f 32 30 00 1f 00 72 00 16 00 50 20 4d 4f 56 45 20 42 55 46 46 31 2c 42 55 46 46 32 20 00 1f 00 80 00 2a 00 50 20 50 45 52 46 20   ┆   D   P B DEPO12 CONTINUE   X   PDEPO20   r   P MOVE BUFF1,BUFF2      * P PERF ┆
0x22e6…2336              44 45 50 4f 52 45 2c 42 55 46 46 31 2c 46 43 20 52 45 53 45 52 56 20 50 45 52 4d 41 4e 45 4e 54 00 1f 00 9a 00 0e 00 50 20 42 20 44 45 50 4f 4f 4b 20 00 1f 00 c8 00 0a 00 50 20 45 4a 45 43 54 00 1f 00 da 00 0a 00 50 44 45 50 4f 34 20 00 1f   ┆DEPORE,BUFF1,FC RESERV PERMANENT       P B DEPOOK        P EJECT       PDEPO4   ┆
0x2336…2386              00 e8 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 33 2c 57 30 00 1f 00 f6 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c 57 30 00 1f 01 0e 00 34 00 50 20 58 43 4f 50 59 20 44 45 42 49 4e 57 33 2c 57 31 2c 57 31 2c 52 50 4f 4f 4c   ┆     P MOVE DEBINW3,W0       P MOVE DEBINW4,W0     4 P XCOPY DEBINW3,W1,W1,RPOOL┆
0x2386…23d6              28 42 55 46 46 31 29 2c 57 37 20 47 45 54 20 43 4f 55 4e 54 45 52 00 1f 01 26 00 36 00 50 20 43 42 4e 45 20 44 45 42 49 4e 57 33 2c 57 31 2c 44 45 50 34 33 30 20 4a 55 4d 50 20 49 46 20 4d 4f 52 45 20 54 48 41 4e 20 4f 4e 45 20 55 53 45 52   ┆(BUFF1),W7 GET COUNTER   & 6 P CBNE DEBINW3,W1,DEP430 JUMP IF MORE THAN ONE USER┆
0x23d6…2426 (24, 0, 400) 00 1f 01 5e 00 24 00 50 20 58 43 4f 50 59 20 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 31 2c 57 36 2c 4b 45 59 2c 57 31 00 20 00 08 00 20 00 50 20 58 43 4f 50 59 20 44 45 42 49 4e 57 33 2c 57 31 2c 57 31 2c 4b 45 59 2c 57 30 20 00 20 00 30   ┆   ^ $ P XCOPY RPOOL(BUFF1),W1,W6,KEY,W1       P XCOPY DEBINW3,W1,W1,KEY,W0    0┆
0x2426…2476              00 30 00 50 20 43 42 4e 45 20 46 43 2c 57 31 30 2c 44 45 50 4f 34 31 20 4a 55 4d 50 20 49 46 20 4e 4f 54 20 41 43 43 55 4d 55 4c 41 54 4f 52 53 00 20 00 54 00 26 00 50 20 58 43 4f 50 59 20 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 31 31 2c   ┆ 0 P CBNE FC,W10,DEPO41 JUMP IF NOT ACCUMULATORS   T & P XCOPY RPOOL(BUFF1),W11,┆
0x2476…24c6              57 36 2c 4b 45 59 2c 57 37 20 00 20 00 88 00 0a 00 50 44 45 50 4f 34 31 00 20 00 b2 00 28 00 50 20 58 43 4f 50 59 20 44 45 42 49 4e 57 34 2c 57 31 2c 57 31 2c 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 30 00 20 00 c0 00 24 00 50 20 43 42 45   ┆W6,KEY,W7        PDEPO41     ( P XCOPY DEBINW4,W1,W1,RPOOL(BUFF1),W0     $ P CBE┆
0x24c6…2516              20 44 45 42 49 4e 57 34 2c 57 31 32 38 2c 44 45 50 34 32 30 20 4c 4f 43 4b 45 44 20 00 20 00 ec 00 32 00 50 20 43 42 4e 45 20 44 45 42 49 4e 57 34 2c 57 30 2c 44 45 50 34 33 30 20 4a 55 4d 50 20 49 46 20 41 4c 52 45 41 44 59 20 46 49 58 45   ┆ DEBINW4,W128,DEP420 LOCKED      2 P CBNE DEBINW4,W0,DEP430 JUMP IF ALREADY FIXE┆
0x2516…2566              44 20 00 20 01 14 00 0a 00 50 44 45 50 34 32 30 00 20 01 4a 00 18 00 50 20 41 44 44 20 44 45 42 49 4e 57 33 2c 44 45 42 49 4e 57 34 00 20 01 58 00 28 00 50 20 58 43 4f 50 59 20 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 30 2c 57 31 2c 44 45   ┆D        PDEP420   J   P ADD DEBINW3,DEBINW4   X ( P XCOPY RPOOL(BUFF1),W0,W1,DE┆
0x2566…25b6 (25, 0, 400) 42 49 4e 57 33 2c 57 31 00 20 01 74 00 1a 00 50 44 45 50 34 33 30 20 4d 4f 56 45 20 53 54 52 31 41 2c 4b 45 59 20 00 21 00 10 00 2a 00 50 20 43 42 45 20 53 54 52 31 41 2c 3d 43 27 46 27 2c 44 45 50 34 34 30 20 48 41 4e 44 4c 45 20 46 4f 52   ┆BINW3,W1   t   PDEP430 MOVE STR1A,KEY  !   * P CBE STR1A,=C'F',DEP440 HANDLE FOR┆
0x25b6…2606              4d 41 54 53 00 21 00 2e 00 0e 00 50 20 42 20 44 45 50 4f 4f 4b 20 00 21 00 5c 00 26 00 50 44 45 50 34 34 30 5c 5c 5c 53 54 4f 52 45 20 54 48 45 20 52 45 43 4f 52 44 4c 45 4e 47 54 48 20 4f 46 00 21 00 6e 00 38 00 50 20 58 43 4f 50 59 20 52   ┆MATS ! .   P B DEPOOK  !   & PDEP440   STORE THE RECORDLENGTH OF ! n 8 P XCOPY R┆
0x2606…2656              45 43 4c 4e 54 48 2c 57 30 2c 57 32 2c 42 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 34 20 54 48 45 20 44 41 54 41 52 45 43 4f 52 44 20 00 21 00 98 00 2a 00 50 20 4d 4f 56 45 20 42 49 4e 31 35 2c 57 30 20 47 45 54 20 54 48 45 20 54 4f 54 41 4c   ┆ECLNTH,W0,W2,BPOOL(BUFF1),W4 THE DATARECORD  !   * P MOVE BIN15,W0 GET THE TOTAL┆
0x2656…26a6              20 4e 55 4d 42 45 52 20 4f 46 00 21 00 d4 00 36 00 50 20 58 43 4f 50 59 20 42 49 4e 31 35 2c 57 31 2c 57 31 2c 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 31 37 20 46 4f 52 4d 41 54 52 45 43 4f 52 44 53 20 00 21 01 02 00 24 00 50 20 4d 4f 56   ┆ NUMBER OF !   6 P XCOPY BIN15,W1,W1,RPOOL(BUFF1),W17 FORMATRECORDS  !   $ P MOV┆
0x26a6…26f6              45 20 42 49 4e 31 36 2c 57 30 20 47 45 54 20 54 48 45 20 4e 55 4d 42 45 52 20 4f 46 00 21 01 3c 00 3a 00 50 20 58 43 4f 50 59 20 42 49 4e 31 36 2c 57 31 2c 57 31 2c 52 50 4f 4f 4c 28 42 55 46 46 31 29 2c 57 31 38 20 44 45 53 43 52 49 50 54   ┆E BIN16,W0 GET THE NUMBER OF ! < : P XCOPY BIN16,W1,W1,RPOOL(BUFF1),W18 DESCRIPT┆
0x26f6…2746 (26, 0, 400) 4f 52 52 45 43 4f 52 44 53 20 00 21 01 64 00 26 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 34 2c 42 55 46 46 31 20 53 54 41 52 54 20 4f 46 20 43 48 41 49 4e 00 22 00 12 00 2e 00 50 20 43 42 45 20 42 49 4e 31 36 2c 57 30 2c 44 45 50 34 37 30   ┆ORRECORDS  ! d & P MOVE DEBINW4,BUFF1 START OF CHAIN "   . P CBE BIN16,W0,DEP470┆
0x2746…2796              20 4a 55 4d 50 20 49 46 20 4e 4f 20 44 45 53 43 52 49 50 54 4f 52 00 22 00 3c 00 28 00 50 20 53 55 42 20 42 49 4e 31 35 2c 42 49 4e 31 36 20 4a 55 53 54 20 46 4f 52 4d 41 54 52 45 43 4f 52 44 53 20 00 22 00 6e 00 20 00 50 44 45 50 34 35 30   ┆ JUMP IF NO DESCRIPTOR " < ( P SUB BIN15,BIN16 JUST FORMATRECORDS  " n   PDEP450┆
0x2796…27e6              20 4d 4f 56 45 20 44 45 42 49 4e 57 33 2c 44 45 42 49 4e 57 34 20 00 22 00 9a 00 3c 00 50 20 58 43 4f 50 59 20 44 45 42 49 4e 57 34 2c 57 31 2c 57 31 2c 52 50 4f 4f 4c 28 44 45 42 49 4e 57 33 29 2c 57 38 20 47 45 54 20 4c 49 4e 4b 20 54 4f   ┆ MOVE DEBINW3,DEBINW4  "   < P XCOPY DEBINW4,W1,W1,RPOOL(DEBINW3),W8 GET LINK TO┆
0x27e6…2836              20 4e 45 58 54 20 00 22 00 be 00 26 00 50 20 54 42 54 20 50 4f 4f 4c 31 2c 44 45 50 34 37 35 20 4a 55 4d 50 20 49 46 20 46 4f 52 4d 41 54 53 20 00 22 00 fe 00 18 00 50 44 45 50 34 36 30 20 53 55 42 20 42 49 4e 31 36 2c 57 31 20 00 22 01 28   ┆ NEXT  "   & P TBT POOL1,DEP475 JUMP IF FORMATS  "     PDEP460 SUB BIN16,W1  " (┆
0x2836…2886              00 0e 00 50 20 42 50 20 44 45 50 34 35 30 00 22 01 44 00 22 00 50 44 45 50 34 37 30 20 53 45 54 20 50 4f 4f 4c 31 20 46 4f 52 4d 41 54 52 45 43 4f 52 44 20 00 22 01 56 00 28 00 50 44 45 50 34 37 35 20 41 44 44 20 42 49 4e 31 36 2c 57 31 20   ┆   P BP DEP450 " D " PDEP470 SET POOL1 FORMATRECORD  " V ( PDEP475 ADD BIN16,W1 ┆
0x2886…28d6 (27, 0, 400) 53 45 54 20 46 4c 49 4e 4b 20 49 4e 44 45 58 20 00 22 01 7c 00 1e 00 50 20 4d 4f 56 45 20 46 4c 49 4e 44 28 42 49 4e 31 36 29 2c 44 45 42 49 4e 57 34 00 23 00 18 00 18 00 50 44 45 50 34 38 30 20 53 55 42 20 42 49 4e 31 35 2c 57 31 20 00 23   ┆SET FLINK INDEX  " |   P MOVE FLIND(BIN16),DEBINW4 #     PDEP480 SUB BIN15,W1  #┆
0x28d6…2926              00 3a 00 28 00 50 20 42 4e 5a 20 44 45 50 34 35 30 20 4a 55 4d 50 20 49 46 20 4d 4f 52 45 20 46 4f 52 4d 41 54 52 45 43 53 2e 00 23 00 56 00 0e 00 50 20 42 20 44 45 50 4f 4f 4b 20 00 23 00 82 00 0a 00 50 20 45 4a 45 43 54 00 23 00 94 00 0a   ┆ : ( P BNZ DEP450 JUMP IF MORE FORMATRECS. # V   P B DEPOOK  #     P EJECT #    ┆
0x2926…2976              00 50 44 45 50 4f 35 20 00 23 00 a2 00 12 00 50 20 4d 4f 56 45 20 42 55 46 46 32 2c 57 30 00 23 00 b0 00 14 00 50 20 4d 4f 56 45 20 44 45 42 49 4e 57 33 2c 57 31 00 23 00 c6 00 14 00 50 20 4d 4f 56 45 20 53 54 52 31 41 2c 4b 45 59 20 00 23   ┆ PDEPO5  #     P MOVE BUFF2,W0 #     P MOVE DEBINW3,W1 #     P MOVE STR1A,KEY  #┆
0x2976…29c6              00 de 00 18 00 50 20 43 41 4c 4c 20 53 45 54 42 2c 53 54 52 31 41 2c 57 30 20 00 23 00 f6 00 0a 00 50 44 45 50 4f 35 31 00 23 01 12 00 12 00 50 20 4d 4f 56 45 20 42 49 4e 31 35 2c 57 31 00 23 01 20 00 2c 00 50 20 4d 41 54 43 48 20 52 50 4f   ┆     P CALL SETB,STR1A,W0  #     PDEPO51 #     P MOVE BIN15,W1 #   , P MATCH RPO┆
0x29c6…2a16              4f 4c 28 44 45 42 49 4e 57 33 29 2c 42 49 4e 31 35 2c 57 36 2c 4b 45 59 2c 57 31 2c 57 36 00 23 01 36 00 10 00 50 20 42 4f 4b 20 44 45 50 4f 35 33 20 00 23 01 66 00 0a 00 50 44 45 50 4f 35 32 00 23 01 7a 00 14 00 50 20 41 44 44 20 44 45 42   ┆OL(DEBINW3),BIN15,W6,KEY,W1,W6 # 6   P BOK DEPO53  # f   PDEPO52 # z   P ADD DEB┆
0x2a16…2a66 (28, 0, 400) 49 4e 57 33 2c 57 31 20 00 23 01 88 00 22 00 50 5c 43 41 4c 4c 5c 43 4d 50 49 4e 44 2c 44 45 42 49 4e 57 33 2c 42 50 4f 4f 4c 28 57 31 29 00 24 00 10 00 24 00 50 5c 42 4e 4f 4b 5c 44 45 50 4f 4e 39 5c 4a 55 4d 50 20 49 46 20 4c 41 53 54 20   ┆INW3,W1  #   " P CALL CMPIND,DEBINW3,BPOOL(W1) $   $ P BNOK DEPON9 JUMP IF LAST ┆
0x2a66…2ab6              49 4e 44 45 58 20 00 24 00 36 00 0e 00 50 5c 42 5c 44 45 50 4f 35 31 20 00 24 00 5e 00 0a 00 50 44 45 50 4f 35 33 00 24 00 70 00 30 00 50 20 43 42 4e 45 20 46 43 2c 57 39 2c 44 45 50 4f 35 38 20 4a 55 4d 50 20 49 46 20 4e 4f 54 20 41 43 43   ┆INDEX  $ 6   P B DEPO51  $ ^   PDEPO53 $ p 0 P CBNE FC,W9,DEPO58 JUMP IF NOT ACC┆
0x2ab6…2b06              55 4d 55 4c 41 54 4f 52 53 20 00 24 00 7e 00 14 00 50 20 4d 4f 56 45 20 42 49 4e 31 35 2c 57 31 31 20 00 24 00 b2 00 2c 00 50 20 4d 41 54 43 48 20 52 50 4f 4f 4c 28 44 45 42 49 4e 57 33 29 2c 42 49 4e 31 35 2c 57 36 2c 4b 45 59 2c 57 37 2c   ┆UMULATORS  $ ~   P MOVE BIN15,W11  $   , P MATCH RPOOL(DEBINW3),BIN15,W6,KEY,W7,┆
0x2b06…2b56              57 36 00 24 00 ca 00 10 00 50 20 42 45 52 52 20 44 45 50 4f 35 32 00 24 00 fa 00 0a 00 50 44 45 50 4f 35 38 00 24 01 0e 00 12 00 50 20 4d 4f 56 45 20 42 49 4e 31 35 2c 57 30 00 24 01 1c 00 2c 00 50 20 4d 41 54 43 48 20 52 50 4f 4f 4c 28 44   ┆W6 $     P BERR DEPO52 $     PDEPO58 $     P MOVE BIN15,W0 $   , P MATCH RPOOL(D┆
0x2b56…2ba6              45 42 49 4e 57 33 29 2c 42 49 4e 31 35 2c 57 31 2c 4b 45 59 2c 57 30 2c 57 31 00 24 01 32 00 10 00 50 20 42 45 52 52 20 44 45 50 4f 35 34 00 24 01 62 00 12 00 50 20 4d 4f 56 45 20 42 55 46 46 32 2c 57 31 00 24 01 76 00 0e 00 50 20 42 20 44   ┆EBINW3),BIN15,W1,KEY,W0,W1 $ 2   P BERR DEPO54 $ b   P MOVE BUFF2,W1 $ v   P B D┆

Reduced view