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

⟦b27c5cf9b⟧

    Length: 4662 (0x1236)
    Notes: pts_type(SC)
    Names: »DMFDB.SC«

Derivation

└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
    └─⟦this⟧ »TOSSWORK/DMFDB.SC« 

PTS(SC)

	IDENT DMFDB 	REL 9.2 79-11-16  870105040920


* 
* 
****************************************************
* 
*   PHILIPS TERMINAL SYSTEM  PTS
* 
*   DMFDB  = FILE DESCRIPTOR BLOCKS  FDB
* 
* 
* 
* 
* 
* 
****************************************************
* 
*   ALLOCATE FDB AREA 
*   BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED 
* 
	ENTRY	FDBSTA 
	ENTRY	FDBEND 
	ENTRY	QFDBFL 
	ENTRY	CRNQUE,CRBUFL
	ENTRY	CRNEND 
	ENTRY	MXIND
	EJECT
* 
*   MXSIZ IS THE SIZE OF THE MASTER INDEX AREA IN 
*   WORDS 
* 
X:C	EQU	0 
MXSIZ	EQU	X:C	MASTER INDEX AREA 
CRBUFL	EQU	12	SIZE CRN BUFFER 
* 
*   CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS 
*   WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER 
* 
X:B	EQU	50
CRNBAR	EQU	X:B	CURRENCY AREA
* 
* 
X:A	EQU	250 
* 
*   QFDBAR IS TEHE SIZE OF THE FDB AREA IN WORDS
*   WHERE QFDBFL BYTES ARE USED FOR EACH FDB
* 
QFDBAR	EQU	X:A
* 
X:D	EQU	96
QFDBFL	EQU	X:D	FDB FIX PART LENGTH
* 
	EJECT
* 
FDBSTA	EQU	*
	RES	QFDBAR 
FDBEND	EQU	*
CRNQUE	DATA	0	CRN LINK ROOT 
	RES	CRNBAR 
CRNEND	EQU	*
MXIND	DATA	MXINDE-*	LENGTH INDEX INDEX
	DATA	MXAR	MASTER INDEX ADDR
	DATA	MXSIZ	MASTER INDEX SIEZE
	IFF	MXSIZ=0
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
	DATA	0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 
	XIF
MXINDE	EQU	*	END INDEX INDEX
	DATA	0,0	SIGNIFICANT ZEROES AFTER INDEXINDEX 
MXAR	EQU	*
	RES	MXSIZ
	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT DMFDB  REL 9.2 79-11-16  870105040920«, t00=0x0000, t01=0x0004}
0x0034…003c              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0044              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0040}
0x0044…004e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0048}
0x004e…0058              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0052}
0x0058…0094              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x005c}
0x0094…009e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0098}
0x009e…00c6              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM  PTS«, t00=0x0000, t01=0x00a2}
0x00c6…00d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ca}
0x00d0…0100              Head {h00=0x002c, h01=0x0050, text=»*   DMFDB  = FILE DESCRIPTOR BLOCKS  FDB«, t00=0x0000, t01=0x00d4}
0x0100…010a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0104}
0x010a…0114              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0128              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0122}
0x0128…0132              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012c}
0x0132…013c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0178              Head {h00=0x0038, h01=0x0050, text=»****************************************************«, t00=0x0000, t01=0x0140}
0x0178…0182              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017c}
0x0182…01a0              Head {h00=0x001a, h01=0x0050, text=»*   ALLOCATE FDB AREA «, t00=0x0000, t01=0x0186}
0x01a0…01ec              Head {h00=0x0048, h01=0x0050, text=»*   BY MEANS OF CONDITIONAL ASSEMBLY QFDBAR WORDS WILL BE ALLOCATED «, t00=0x0001, t01=0x0014}
0x01ec…01f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x01f6…020c              Head {h00=0x0012, h01=0x0050, text=» ENTRY FDBSTA «, t00=0x0001, t01=0x006a}
0x020c…0222              Head {h00=0x0012, h01=0x0050, text=» ENTRY FDBEND «, t00=0x0001, t01=0x0080}
0x0222…0238              Head {h00=0x0012, h01=0x0050, text=» ENTRY QFDBFL «, t00=0x0001, t01=0x0096}
0x0238…0254              Head {h00=0x0018, h01=0x0050, text=» ENTRY CRNQUE,CRBUFL«, t00=0x0001, t01=0x00ac}
0x0254…026a              Head {h00=0x0012, h01=0x0050, text=» ENTRY CRNEND «, t00=0x0001, t01=0x00c8}
0x026a…027e              Head {h00=0x0010, h01=0x0050, text=» ENTRY MXIND«, t00=0x0001, t01=0x00de}
0x027e…028c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00f2}
0x028c…0296              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0100}
0x0296…02d0              Head {h00=0x0036, h01=0x0050, text=»*   MXSIZ IS THE SIZE OF THE MASTER INDEX AREA IN «, t00=0x0001, t01=0x010a}
0x02d0…02e2              Head {h00=0x000e, h01=0x0050, text=»*   WORDS «, t00=0x0001, t01=0x0144}
0x02e2…02ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0156}
0x02ec…02fe              Head {h00=0x000e, h01=0x0050, text=»X:C EQU 0 «, t00=0x0001, t01=0x0160}
0x02fe…0326              Head {h00=0x0024, h01=0x0050, text=»MXSIZ EQU X:C MASTER INDEX AREA «, t00=0x0001, t01=0x0172}
0x0326…034c              Head {h00=0x0022, h01=0x0050, text=»CRBUFL EQU 12 SIZE CRN BUFFER «, t00=0x0002, t01=0x000a}
0x034c…0356              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x0356…0396              Head {h00=0x003c, h01=0x0050, text=»*   CRNBAR IS THE SIZE OF THE CRN BUFFER ARERA IN WORDS «, t00=0x0002, t01=0x003a}
0x0396…03ce              Head {h00=0x0034, h01=0x0050, text=»*   WHERE CRBUFL BYTES ARE USED FOR EACH BUFFER «, t00=0x0002, t01=0x007a}
0x03ce…03d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b2}
0x03d8…03ea              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 50«, t00=0x0002, t01=0x00bc}
0x03ea…040e              Head {h00=0x0020, h01=0x0050, text=»CRNBAR EQU X:B CURRENCY AREA«, t00=0x0002, t01=0x00ce}
0x040e…0418              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00f2}
0x0418…0422              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fc}
0x0422…0436              Head {h00=0x0010, h01=0x0050, text=»X:A EQU 250 «, t00=0x0002, t01=0x0106}
0x0436…0440              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011a}
0x0440…0478              Head {h00=0x0034, h01=0x0050, text=»*   QFDBAR IS TEHE SIZE OF THE FDB AREA IN WORDS«, t00=0x0002, t01=0x0124}
0x0478…04ac              Head {h00=0x0030, h01=0x0050, text=»*   WHERE QFDBFL BYTES ARE USED FOR EACH FDB«, t00=0x0002, t01=0x015c}
0x04ac…04b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0190}
0x04b6…04cc              Head {h00=0x0012, h01=0x0050, text=»QFDBAR EQU X:A«, t00=0x0003, t01=0x000a}
0x04cc…04d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0020}
0x04d6…04e8              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 96«, t00=0x0003, t01=0x002a}
0x04e8…0512              Head {h00=0x0026, h01=0x0050, text=»QFDBFL EQU X:D FDB FIX PART LENGTH«, t00=0x0003, t01=0x003c}
0x0512…051c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0066}
0x051c…052a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0070}
0x052a…0534              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007e}
0x0534…0548              Head {h00=0x0010, h01=0x0050, text=»FDBSTA EQU *«, t00=0x0003, t01=0x0088}
0x0548…055c              Head {h00=0x0010, h01=0x0050, text=» RES QFDBAR «, t00=0x0003, t01=0x009c}
0x055c…0570              Head {h00=0x0010, h01=0x0050, text=»FDBEND EQU *«, t00=0x0003, t01=0x00b0}
0x0570…0594              Head {h00=0x0020, h01=0x0050, text=»CRNQUE DATA 0 CRN LINK ROOT «, t00=0x0003, t01=0x00c4}
0x0594…05a8              Head {h00=0x0010, h01=0x0050, text=» RES CRNBAR «, t00=0x0003, t01=0x00e8}
0x05a8…05bc              Head {h00=0x0010, h01=0x0050, text=»CRNEND EQU *«, t00=0x0003, t01=0x00fc}
0x05bc…05ea              Head {h00=0x002a, h01=0x0050, text=»MXIND DATA MXINDE-* LENGTH INDEX INDEX«, t00=0x0003, t01=0x0110}
0x05ea…060e              Head {h00=0x0020, h01=0x0050, text=» DATA MXAR MASTER INDEX ADDR«, t00=0x0003, t01=0x013e}
0x060e…0634              Head {h00=0x0022, h01=0x0050, text=» DATA MXSIZ MASTER INDEX SIEZE«, t00=0x0003, t01=0x0162}
0x0634…0648              Head {h00=0x0010, h01=0x0050, text=» IFF MXSIZ=0«, t00=0x0003, t01=0x0188}
0x0648…0676              Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x0004, t01=0x000c}
0x0676…06a4              Head {h00=0x002a, h01=0x0050, text=» DATA 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 «, t00=0x0004, t01=0x003a}
0x06a4…06b0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0004, t01=0x0068}
0x06b0…06d4              Head {h00=0x0020, h01=0x0050, text=»MXINDE EQU * END INDEX INDEX«, t00=0x0004, t01=0x0074}
0x06d4…070a              Head {h00=0x0032, h01=0x0050, text=» DATA 0,0 SIGNIFICANT ZEROES AFTER INDEXINDEX «, t00=0x0004, t01=0x0098}
0x070a…071c              Head {h00=0x000e, h01=0x0050, text=»MXAR EQU *«, t00=0x0004, t01=0x00ce}
0x071c…072e              Head {h00=0x000e, h01=0x0050, text=» RES MXSIZ«, t00=0x0004, t01=0x00e0}
0x072e…073a              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0004, t01=0x00f2}
0x073a…073e              Head {h00=0x4004, h01=0x0000}
0x073e…0742              00 04 00 fe                                                                                                                                                                                                                                       ┆    ┆
0x0742…074a (5, 1, 8)    20 04 00 00 00 05 00 04                                                                                                                                                                                                                           ┆        ┆
0x074a…079a (6, 0, 400)  00 08 00 50 5c 4c 4b 4d 00 3e 00 04 00 10 00 50 5c 44 41 54 41 5c 33 5c 45 58 49 54 00 3e 00 10 00 08 00 50 5c 58 49 46 00 3e 00 24 00 12 00 50 5c 49 46 54 5c 46 4c 58 44 53 43 3d 31 20 00 3e 00 30 00 0a 00 50 5c 45 4a 45 43 54 00 3e 00 46   ┆   P LKM >     P DATA 3 EXIT >     P XIF > $   P IFT FLXDSC=1  > 0   P EJECT > F┆
0x079a…07ea              00 10 00 50 44 4d 54 39 30 30 5c 45 51 55 5c 2a 00 3e 00 54 00 24 00 50 2a 20 20 20 55 4e 4c 4f 43 4b 20 46 4c 45 58 44 49 53 43 20 49 4e 20 54 48 49 53 20 4c 4f 4f 50 00 3e 00 68 00 06 00 50 2a 20 00 3e 00 90 00 12 00 50 2a 20 20 20 52 45   ┆   PDMT900 EQU * > T $ P*   UNLOCK FLEXDISC IN THIS LOOP > h   P*  >     P*   RE┆
0x07ea…083a              47 49 53 54 45 52 53 20 00 3e 00 9a 00 1c 00 50 2a 20 20 20 41 31 20 3d 20 45 58 54 45 4e 54 20 43 4f 55 4e 54 45 52 20 00 3e 00 b0 00 36 00 50 2a 20 20 20 41 34 20 3d 20 4c 41 53 54 20 56 4f 4c 20 43 4f 44 45 20 46 4c 45 58 44 4f 49 53 43   ┆GISTERS  >     P*   A1 = EXTENT COUNTER  >   6 P*   A4 = LAST VOL CODE FLEXDOISC┆
0x083a…088a              20 20 20 20 41 35 20 3d 20 45 58 54 20 41 44 44 52 20 00 3e 00 d0 00 16 00 50 2a 20 20 20 41 36 20 3d 20 46 44 42 20 41 44 44 52 20 00 3e 01 0a 00 30 00 50 2a 20 20 20 41 38 20 3d 20 45 43 42 20 41 44 44 52 20 20 20 20 20 20 20 20 20 20 41   ┆    A5 = EXT ADDR  >     P*   A6 = FDB ADDR  >   0 P*   A8 = ECB ADDR          A┆
0x088a…08da              39 20 3d 20 44 4d 20 45 43 42 20 41 44 44 52 20 00 3e 01 24 00 14 00 50 2a 20 20 20 41 31 30 2d 41 31 32 20 55 53 45 44 00 3e 01 58 00 06 00 50 2a 20 00 3e 01 70 00 26 00 50 5c 41 44 4b 4c 5c 41 35 2c 45 58 54 45 4c 45 5c 45 58 54 20 4c 45   ┆9 = DM ECB ADDR  > $   P*   A10-A12 USED > X   P*  > p & P ADKL A5,EXTELE EXT LE┆
0x08da…092a (7, 0, 400)  4e 47 54 48 20 49 4e 20 46 44 42 20 00 3e 01 7a 00 1a 00 50 5c 4c 43 52 5c 41 37 2c 41 35 5c 56 4f 4c 55 4d 45 20 43 4f 44 45 00 3f 00 14 00 10 00 50 5c 41 4e 4b 5c 41 37 2c 2f 46 46 20 00 3f 00 32 00 1a 00 50 5c 41 42 4c 28 5a 29 5c 44 4d   ┆NGTH IN FDB  > z   P LCR A7,A5 VOLUME CODE ?     P ANK A7,/FF  ? 2   P ABL(Z) DM┆
0x092a…097a              54 38 38 30 5c 4e 4f 20 43 4f 44 45 00 3f 00 46 00 06 00 50 2a 20 00 3f 00 64 00 26 00 50 2a 20 20 20 46 4c 45 58 44 49 43 53 43 20 49 46 20 42 49 54 20 38 2d 31 33 20 3d 20 31 31 31 31 31 30 00 3f 00 6e 00 06 00 50 2a 20 00 3f 00 98 00 10   ┆T880 NO CODE ? F   P*  ? d & P*   FLEXDICSC IF BIT 8-13 = 111110 ? n   P*  ?    ┆
0x097a…09ca              00 50 5c 41 4e 4b 5c 41 37 2c 2f 46 38 20 00 3f 00 a2 00 10 00 50 5c 53 55 4b 5c 41 37 2c 2f 46 38 20 00 3f 00 b6 00 20 00 50 5c 41 42 4c 28 4e 45 29 5c 44 4d 54 38 38 30 5c 4e 4f 20 46 4c 45 58 44 49 53 43 20 00 3f 00 ca 00 06 00 50 2a 20   ┆ P ANK A7,/F8  ?     P SUK A7,/F8  ?     P ABL(NE) DMT880 NO FLEXDISC  ?     P* ┆
0x09ca…0a1a              00 3f 00 ee 00 36 00 50 2a 20 20 20 49 46 20 53 41 4d 45 20 46 4c 45 58 44 49 53 43 20 41 53 20 4c 41 53 54 2c 20 44 4f 20 4e 4f 54 20 53 43 48 45 43 4b 20 41 47 41 49 4e 20 00 3f 00 f8 00 06 00 50 2a 20 00 3f 01 32 00 0e 00 50 5c 43 43 52   ┆ ?   6 P*   IF SAME FLEXDISC AS LAST, DO NOT SCHECK AGAIN  ?     P*  ? 2   P CCR┆
0x0a1a…0a6a              5c 41 34 2c 41 35 00 3f 01 3c 00 18 00 50 5c 41 42 4c 28 45 29 5c 44 4d 54 38 38 30 5c 53 41 4d 45 20 00 3f 01 4e 00 06 00 50 2a 20 00 3f 01 6a 00 3c 00 50 2a 20 20 20 4e 4f 57 20 53 45 41 52 43 48 20 41 4c 4c 20 46 44 42 53 20 46 4f 52 20   ┆ A4,A5 ? <   P ABL(E) DMT880 SAME  ? N   P*  ? j < P*   NOW SEARCH ALL FDBS FOR ┆
0x0a6a…0aba (8, 0, 400)  54 48 4f 49 53 20 46 4c 45 58 49 42 4c 45 20 44 49 53 43 20 56 4f 4c 20 43 4f 44 45 00 3f 01 74 00 06 00 50 2a 20 00 40 00 24 00 10 00 50 44 4d 54 39 31 30 5c 45 51 55 5c 2a 00 40 00 2e 00 1c 00 50 5c 4c 43 52 5c 41 34 2c 41 35 5c 53 41 56   ┆THOIS FLEXIBLE DISC VOL CODE ? t   P*  @ $   PDMT910 EQU * @ .   P LCR A4,A5 SAV┆
0x0aba…0b0a              45 20 56 4f 4c 20 43 4f 44 45 00 40 00 42 00 22 00 50 5c 4c 44 4b 4c 5c 41 33 2c 46 44 42 53 54 41 5c 46 44 42 20 4c 49 4e 4b 20 52 4f 4f 54 20 00 40 00 62 00 0e 00 50 5c 49 4e 48 5c 5c 5c 49 4e 48 00 40 00 88 00 0e 00 50 5c 52 46 5c 44 4d   ┆E VOL CODE @ B " P LDKL A3,FDBSTA FDB LINK ROOT  @ b   P INH   INH @     P RF DM┆
0x0b0a…0b5a              54 39 32 35 00 40 00 9a 00 10 00 50 44 4d 54 39 32 30 5c 45 51 55 5c 2a 00 40 00 ac 00 18 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 33 5c 46 44 42 20 41 44 44 52 00 40 00 c0 00 10 00 50 44 4d 54 39 32 35 5c 45 51 55 5c 2a 00 40 00 dc 00 1e 00 50   ┆T925 @     PDMT920 EQU * @     P LDR* A3,A3 FDB ADDR @     PDMT925 EQU * @     P┆
0x0b5a…0baa              5c 41 4e 4b 4c 5c 41 33 2c 2f 46 46 46 45 5c 20 20 46 44 42 20 41 44 44 52 20 00 40 00 f0 00 22 00 50 5c 52 46 28 5a 29 5c 44 4d 54 39 38 30 5c 41 4c 4c 20 46 44 42 53 20 43 48 45 43 4b 45 44 00 40 01 12 00 10 00 50 5c 4c 44 52 2a 5c 41 37   ┆ ANKL A3,/FFFE   FDB ADDR  @   " P RF(Z) DMT980 ALL FDBS CHECKED @     P LDR* A7┆
0x0baa…0bfa              2c 41 33 20 00 40 01 38 00 0e 00 50 5c 41 4e 4b 5c 41 37 2c 31 20 00 40 01 4c 00 16 00 50 5c 52 42 28 5a 29 5c 44 4d 54 39 32 30 5c 46 52 45 45 00 40 01 5e 00 0e 00 50 5c 43 57 52 5c 41 36 2c 41 33 00 40 01 78 00 1e 00 50 5c 52 42 28 45 29   ┆,A3  @ 8   P ANK A7,1  @ L   P RB(Z) DMT920 FREE @ ^   P CWR A6,A3 @ x   P RB(E)┆
0x0bfa…0c4a (9, 0, 398)  5c 44 4d 54 39 32 30 5c 43 55 52 52 45 4e 54 20 46 44 42 20 00 40 01 8a 00 1c 00 50 5c 4c 44 4b 5c 41 37 2c 34 5c 45 58 54 45 4e 54 20 43 4f 55 4e 54 45 52 00 41 00 1c 00 18 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 46 44 42 20 41 44 44 52 20   ┆ DMT920 CURRENT FDB  @     P LDK A7,4 EXTENT COUNTER A     P LDR A2,A3 FDB ADDR ┆
0x0c4a…0c9a              00 41 00 3c 00 16 00 50 5c 41 44 4b 4c 5c 41 32 2c 46 44 42 45 58 54 2b 31 20 00 41 00 58 00 1c 00 50 2a 5c 5c 5c 41 44 44 52 20 4f 46 20 31 53 54 20 56 4f 4c 20 43 4f 44 45 00 41 00 72 00 26 00 50 5c 53 55 4b 4c 5c 41 32 2c 45 58 54 45 4c   ┆ A <   P ADKL A2,FDBEXT+1  A X   P*   ADDR OF 1ST VOL CODE A r & P SUKL A2,EXTEL┆
0x0c9a…0cea              45 5c 45 58 54 20 4c 45 4e 47 54 48 20 49 4e 20 46 44 42 20 00 41 00 92 00 10 00 50 44 4d 54 39 33 30 5c 45 51 55 5c 2a 00 41 00 bc 00 0e 00 50 5c 53 55 4b 5c 41 37 2c 31 20 00 41 00 d0 00 26 00 50 5c 52 42 28 4e 29 5c 44 4d 54 39 32 30 5c   ┆E EXT LENGTH IN FDB  A     PDMT930 EQU * A     P SUK A7,1  A   & P RB(N) DMT920 ┆
0x0cea…0d3a              41 4c 4c 20 45 58 54 45 4e 54 53 20 43 48 45 43 4b 45 44 20 00 41 00 e2 00 14 00 50 5c 41 44 4b 4c 5c 41 32 2c 45 58 54 45 4c 45 20 00 41 01 0c 00 1a 00 50 5c 43 43 52 5c 41 34 2c 41 32 5c 56 4f 4c 55 4d 45 20 43 4f 44 45 00 41 01 24 00 28   ┆ALL EXTENTS CHECKED  A     P ADKL A2,EXTELE  A     P CCR A4,A2 VOLUME CODE A $ (┆
0x0d3a…0d88              00 50 5c 41 42 4c 28 45 29 5c 44 4d 54 38 38 30 5c 43 4f 44 45 20 55 53 45 44 2e 20 4e 4f 20 55 4e 4c 4f 43 4b 20 00 41 01 42 00 1a 00 50 5c 52 42 5c 44 4d 54 39 33 30 5c 4e 45 58 54 20 45 58 54 45 4e 54 00 41 01 6e 00 06 00 50 2a 20         ┆ P ABL(E) DMT880 CODE USED. NO UNLOCK  A B   P RB DMT930 NEXT EXTENT A n   P* ┆
0x0d88…0dd8 (10, 0, 398) 00 41 01 8c 00 26 00 50 2a 20 20 20 41 4c 4c 20 46 53 44 42 53 20 43 48 45 43 4b 45 44 2e 20 4d 41 4b 45 20 55 4e 4c 4f 41 44 00 42 00 08 00 06 00 50 2a 20 00 42 00 32 00 10 00 50 44 4d 54 39 38 30 5c 45 51 55 5c 2a 00 42 00 3c 00 0e 00 50   ┆ A   & P*   ALL FSDBS CHECKED. MAKE UNLOAD B     P*  B 2   PDMT980 EQU * B <   P┆
0x0dd8…0e28              5c 45 4e 42 5c 5c 5c 45 4e 42 00 42 00 50 00 06 00 50 2a 20 00 42 00 62 00 36 00 50 2a 20 20 20 4e 4f 54 45 20 54 48 41 54 20 45 43 42 42 55 46 20 49 53 20 41 53 53 55 4d 45 44 20 4e 4f 54 20 54 4f 20 42 45 20 43 48 41 4e 47 45 44 20 00 42   ┆ ENB   ENB B P   P*  B b 6 P*   NOTE THAT ECBBUF IS ASSUMED NOT TO BE CHANGED  B┆
0x0e28…0e78              00 6c 00 1a 00 50 2a 20 20 20 57 49 54 48 20 54 48 49 53 20 52 45 51 55 45 53 54 20 00 42 00 a6 00 06 00 50 2a 20 00 42 00 c4 00 1c 00 50 5c 53 43 5c 41 34 2c 45 43 42 46 43 2c 41 38 5c 56 4f 4c 20 43 4f 44 45 00 42 00 ce 00 06 00 50 2a 20   ┆ l   P*   WITH THIS REQUEST  B     P*  B     P SC A4,ECBFC,A8 VOL CODE B     P* ┆
0x0e78…0ec8              00 42 00 ee 00 18 00 50 5c 49 46 46 5c 44 53 4b 50 41 47 2b 53 57 50 42 4c 4b 3d 30 00 42 00 f8 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 42 01 14 00 24 00 50 5c 43 43 5c 41 34 2c 53 43 54 50 4c 44 2b 31 5c 43 48 45 43 4b 20 46 49 4c 45   ┆ B     P IFF DSKPAG+SWPBLK=0 B     P LDK A1,0  B   $ P CC A4,SCTPLD+1 CHECK FILE┆
0x0ec8…0f16              20 43 4f 44 45 20 00 42 01 26 00 2a 00 50 5c 41 42 4c 28 45 29 5c 44 4d 54 38 38 30 5c 50 52 4f 47 52 41 4d 20 4c 4f 41 44 49 4e 47 20 44 45 56 49 43 45 3f 00 42 01 4e 00 08 00 50 5c 58 49 46 00 42 01 7c 00 06 00 50 2a 20 00 42 01 88         ┆ CODE  B & * P ABL(E) DMT880 PROGRAM LOADING DEVICE? B N   P XIF B |   P*  B  ┆
0x0f16…0f66 (11, 0, 400) 00 12 00 50 5c 49 46 54 5c 46 4c 58 44 53 43 3d 31 20 00 43 00 04 00 1c 00 50 5c 4c 44 4b 5c 41 37 2c 2f 42 38 5c 55 4e 4c 4f 41 44 20 57 41 49 54 20 00 43 00 1a 00 08 00 50 5c 4c 4b 4d 00 43 00 3a 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 43   ┆   P IFT FLXDSC=1  C     P LDK A7,/B8 UNLOAD WAIT  C     P LKM C :   P DATA 1  C┆
0x0f66…0fb6              00 46 00 14 00 50 5c 4c 44 5c 41 31 2c 45 43 42 52 43 2c 41 38 20 00 43 00 56 00 14 00 50 5c 41 4e 4b 5c 41 31 2c 31 5c 49 4e 4f 50 45 52 00 43 00 6e 00 14 00 50 5c 41 42 4c 28 4e 5a 29 5c 44 4d 54 45 52 52 20 00 43 00 86 00 1e 00 50 5c 41   ┆ F   P LD A1,ECBRC,A8  C V   P ANK A1,1 INOPER C n   P ABL(NZ) DMTERR  C     P A┆
0x0fb6…1006              42 4c 5c 44 4d 54 38 38 30 5c 43 48 45 43 4b 20 4e 45 58 54 20 45 58 54 00 43 00 9e 00 08 00 50 5c 58 49 46 00 43 00 c0 00 0a 00 50 5c 45 4a 45 43 54 00 43 00 cc 00 22 00 50 44 4d 54 35 30 30 5c 45 51 55 5c 2a 5c 52 45 41 44 20 56 54 4f 43   ┆BL DMT880 CHECK NEXT EXT C     P XIF C     P EJECT C   " PDMT500 EQU * READ VTOC┆
0x1006…1056              20 52 45 43 4f 52 44 20 00 43 00 da 00 06 00 50 2a 20 00 43 01 00 00 22 00 50 5c 4c 44 5c 41 32 2c 56 54 4f 43 52 4c 5c 56 54 4f 43 20 52 45 43 20 4c 45 4e 47 54 48 20 00 43 01 0a 00 14 00 50 5c 43 57 5c 41 32 2c 45 43 42 52 4c 2c 41 39 20   ┆ RECORD  C     P*  C   " P LD A2,VTOCRL VTOC REC LENGTH  C     P CW A2,ECBRL,A9 ┆
0x1056…10a6              00 43 01 30 00 2a 00 50 5c 52 46 28 4e 47 29 5c 44 4d 54 35 31 30 5c 4d 4f 56 45 20 54 48 45 20 57 48 4f 4c 45 20 56 54 4f 43 20 52 45 43 00 43 01 48 00 20 00 50 5c 4c 44 4b 5c 41 31 2c 2f 38 5c 49 4e 43 4f 52 52 45 43 54 20 4c 45 4e 47 54   ┆ C 0 * P RF(NG) DMT510 MOVE THE WHOLE VTOC REC C H   P LDK A1,/8 INCORRECT LENGT┆
0x10a6…10f6 (12, 0, 400) 48 20 00 43 01 76 00 28 00 50 5c 4f 52 53 5c 41 31 2c 45 43 42 52 43 2c 41 39 5c 53 45 54 20 52 43 20 42 55 54 20 43 4f 4e 54 49 4e 55 45 00 44 00 0a 00 2c 00 50 5c 4c 44 5c 41 32 2c 45 43 42 52 4c 2c 41 39 5c 4d 4f 56 45 20 57 48 41 54 20   ┆H  C v ( P ORS A1,ECBRC,A9 SET RC BUT CONTINUE D   , P LD A2,ECBRL,A9 MOVE WHAT ┆
0x10f6…1146              55 53 45 52 20 54 4f 4c 44 20 59 4f 55 20 00 44 00 36 00 10 00 50 44 4d 54 35 31 30 5c 45 51 55 5c 2a 00 44 00 66 00 14 00 50 5c 53 54 5c 41 32 2c 45 43 42 45 4c 2c 41 39 20 00 44 00 7a 00 1e 00 50 5c 43 46 5c 41 31 34 2c 44 4d 54 52 45 4d   ┆USER TOLD YOU  D 6   PDMT510 EQU * D f   P ST A2,ECBEL,A9  D z   P CF A14,DMTREM┆
0x1146…1196              5c 4d 4f 56 45 20 52 45 43 4f 52 44 00 44 00 92 00 10 00 50 44 4d 41 45 58 5c 45 51 55 5c 2a 20 00 44 00 b4 00 14 00 50 5c 41 42 4c 5c 44 4d 54 41 45 58 5c 45 58 49 54 00 44 00 c8 00 0a 00 50 5c 45 4a 45 43 54 00 44 00 e0 00 22 00 50 44 4d   ┆ MOVE RECORD D     PDMAEX EQU *  D     P ABL DMTAEX EXIT D     P EJECT D   " PDM┆
0x1196…11e6              53 51 57 52 5c 45 51 55 5c 2a 5c 53 45 51 55 45 4e 54 49 41 4c 20 57 52 49 54 45 20 00 44 00 ee 00 06 00 50 2a 20 00 44 01 14 00 1e 00 50 44 4d 52 44 57 52 5c 45 51 55 5c 2a 5c 52 41 4e 44 4f 4d 20 57 52 49 54 45 20 00 44 01 1e 00 06 00 50   ┆SQWR EQU * SEQUENTIAL WRITE  D     P*  D     PDMRDWR EQU * RANDOM WRITE  D     P┆
0x11e6…1236              2a 20 00 44 01 40 00 1e 00 50 44 4d 52 44 44 45 5c 45 51 55 5c 2a 5c 52 41 4e 44 4f 4d 20 44 45 4c 45 54 45 00 44 01 4a 00 06 00 50 2a 20 00 44 01 6c 00 1e 00 50 44 4d 49 4e 53 5c 45 51 55 5c 2a 5c 49 4e 44 45 58 45 44 20 49 4e 53 45 52 54   ┆*  D @   PDMRDDE EQU * RANDOM DELETE D J   P*  D l   PDMINS EQU * INDEXED INSERT┆

Reduced view