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

⟦d40175f4c⟧ 

    Length: 4752 (0x1290)
    Notes: pts_type(SC)
    Names: »EBCDIC.SC«

Derivation

└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
    └─⟦this⟧ »M:167D/EBCDIC.SC«

PTS(SC)

	IDENT EBCDIC 	REL 8.2 78-09-15  870105040820 

* 
************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   EBCDIC = EBCDIC/ASCII TABLE 
* 
* 
* 
* 
* 
* 
************************************************* 
* 
	ENTRY	TASCII 
	ENTRY	TEBCDIC
* 
* 
*  CONDITIONAL ASSEMBLY  (SEE ALSO DRDC15)
* 
X:A	EQU	1	CODE , 0=ASCII , 1=EBCDIC   (DRDC15)
CODE	EQU	X:A
X:B	EQU	1	READ COMMAND HANDLING IF = 1  (DRDC15)
RCOM	EQU	X:B
	EJECT
* 
* 
*	TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII
* 
* 
TASCII	EQU	*
	IFT	CODE=1 
	DATA	/0001,/0203,/0009,/0000	00-07 
	DATA	/0000,/0000,/0C00,/0000	08-0F 
	DATA	/1011,/1213,/000A,/0000	10-17 
	DATA	/0019,/0000,/1C1D,/1E1F	18-1F 
	DATA	/0000,/0000,/0000,/171B	20-27 
	DATA	/0000,/0000,/0005,/0000	28-2F 
	DATA	/0000,/1600,/0000,/0004	30-37 
	DATA	/0000,/0000,/1415,/001A	38-3F 
	DATA	/2041,/4243,/4445,/4647	40-47 
	DATA	/4849,/5B2E,/3C28,/2B21	48-4F 
	DATA	/264A,/4B4C,/4D4E,/4F50	50-57 
	DATA	/5152,/5D24,/2A29,/3B5E	58-5F 
	DATA	/2D2F,/5354,/5556,/5758	60-67 
	DATA	/595A,/7C2C,/255F,/3E3F	68-6F 
	DATA	/1831,/3233,/3435,/3637	70-77 
	DATA	/3839,/3A23,/4027,/3D22	78-7F 
	DATA	/2061,/6263,/6465,/6667	80-87 
	DATA	/6869,/5B2E,/3C28,/2B21	88-8F 
	DATA	/266A,/6B6C,/6D6E,/6F70	90-97 
	DATA	/7172,/5D24,/2A29,/3B5E	98-9F 
	DATA	/2D2F,/7374,/7576,/7778	A0-A7 
	DATA	/797A,/7C2C,/255F,/3E3F	A8-AF 
	DATA	/3031,/3233,/3435,/3637	B0-B7 
	DATA	/3839,/3A23,/4027,/3D22	B8-BF 
	DATA	/2041,/4243,/4445,/4647	C0-C7 
	DATA	/4849,/5B2E,/3C28,/2B21	C8-CF 
	DATA	/264A,/4B4C,/4D4E,/4F50	D0-D7 
	DATA	/5152,/5D24,/2A29,/3B5E	D8-DF 
	DATA	/2D2F,/5354,/5556,/5758	E0-E7 
	DATA	/595A,/7C2C,/255F,/3E3F	E8-EF 
	DATA	/3031,/3233,/3435,/3637	F0-F7 
	DATA	/3839,/3A23,/4027,/3DFF	F8-FF 
	XIF
	EJECT
* 
* 
*	TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC
* 
* 
TEBCDIC	EQU	* 
	IFF	CODE+RCOM=0
	DATA	/0001,/0203,/372D,/0000	00-07 
	DATA	/0005,/1500,/0C00,/0000	08-0F 
	DATA	/1011,/1213,/3C3D,/3226	10-17 
	DATA	/7019,/3F27,/1C1D,/1E1F	18-1F 
	DATA	/404F,/7F7B,/5B6C,/507D	20-27 
	DATA	/4D5D,/5C4E,/6B60,/4B61	28-2F 
	DATA	/F0F1,/F2F3,/F4F5,/F6F7	30-37 
	DATA	/F8F9,/7A5E,/4C7E,/6E6F	38-3F 
	DATA	/7CC1,/C2C3,/C4C5,/C6C7	40-47 
	DATA	/C8C9,/D1D2,/D3D4,/D5D6	48-4F 
	DATA	/D7D8,/D9E2,/E3E4,/E5E6	50-57 
	DATA	/E7E8,/E94A,/005A,/5F6D	58-5F 
	DATA	/0081,/8283,/8485,/8687	60-67 
	DATA	/8889,/9192,/9394,/9596	68-6F 
	DATA	/9798,/99A2,/A3A4,/A5A6	70-77 
	DATA	/A7A8,/A91C,/6A00,/00E0	78-7F 
	DATA	/544F,/5353	SPEC. FLEX CHAR. 'TOSS'  80-84
	XIF
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT EBCDIC  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0080              Head {h00=0x0034, h01=0x0050, text=»************************************************«, t00=0x0000, t01=0x004c}
0x0080…008a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00b2              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008e}
0x00b2…00bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00e4              Head {h00=0x0024, h01=0x0050, text=»*   EBCDIC = EBCDIC/ASCII TABLE «, t00=0x0000, t01=0x00c0}
0x00e4…00ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x00ee…00f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x00f8…0102              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…015a              Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x0000, t01=0x0124}
0x015a…0164              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015e}
0x0164…017a              Head {h00=0x0012, h01=0x0050, text=» ENTRY TASCII «, t00=0x0000, t01=0x0168}
0x017a…0190              Head {h00=0x0012, h01=0x0050, text=» ENTRY TEBCDIC«, t00=0x0000, t01=0x017e}
0x0190…019a (1, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0004}
0x019a…01a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a4…01d6              Head {h00=0x002e, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY  (SEE ALSO DRDC15)«, t00=0x0001, t01=0x0018}
0x01d6…01e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x004a}
0x01e0…0216              Head {h00=0x0032, h01=0x0050, text=»X:A EQU 1 CODE , 0=ASCII , 1=EBCDIC   (DRDC15)«, t00=0x0001, t01=0x0054}
0x0216…022a              Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:A«, t00=0x0001, t01=0x008a}
0x022a…0262              Head {h00=0x0034, h01=0x0050, text=»X:B EQU 1 READ COMMAND HANDLING IF = 1  (DRDC15)«, t00=0x0001, t01=0x009e}
0x0262…0276              Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:B«, t00=0x0001, t01=0x00d6}
0x0276…0284              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00ea}
0x0284…028e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f8}
0x028e…0298              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0102}
0x0298…02ce              Head {h00=0x0032, h01=0x0050, text=»* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII«, t00=0x0001, t01=0x010c}
0x02ce…02d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0142}
0x02d8…02e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014c}
0x02e2…02f6              Head {h00=0x0010, h01=0x0050, text=»TASCII EQU *«, t00=0x0001, t01=0x0156}
0x02f6…030a              Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0001, t01=0x016a}
0x030a…0336              Head {h00=0x0028, h01=0x0050, text=» DATA /0001,/0203,/0009,/0000 00-07 «, t00=0x0001, t01=0x017e}
0x0336…0362              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0C00,/0000 08-0F «, t00=0x0002, t01=0x001a}
0x0362…038e              Head {h00=0x0028, h01=0x0050, text=» DATA /1011,/1213,/000A,/0000 10-17 «, t00=0x0002, t01=0x0046}
0x038e…03ba              Head {h00=0x0028, h01=0x0050, text=» DATA /0019,/0000,/1C1D,/1E1F 18-1F «, t00=0x0002, t01=0x0072}
0x03ba…03e6              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0000,/171B 20-27 «, t00=0x0002, t01=0x009e}
0x03e6…0412              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0005,/0000 28-2F «, t00=0x0002, t01=0x00ca}
0x0412…043e              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/1600,/0000,/0004 30-37 «, t00=0x0002, t01=0x00f6}
0x043e…046a              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/1415,/001A 38-3F «, t00=0x0002, t01=0x0122}
0x046a…0496              Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 40-47 «, t00=0x0002, t01=0x014e}
0x0496…04c2              Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 48-4F «, t00=0x0002, t01=0x017a}
0x04c2…04ee              Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 50-57 «, t00=0x0003, t01=0x0016}
0x04ee…051a              Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E 58-5F «, t00=0x0003, t01=0x0042}
0x051a…0546              Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 60-67 «, t00=0x0003, t01=0x006e}
0x0546…0572              Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F 68-6F «, t00=0x0003, t01=0x009a}
0x0572…059e              Head {h00=0x0028, h01=0x0050, text=» DATA /1831,/3233,/3435,/3637 70-77 «, t00=0x0003, t01=0x00c6}
0x059e…05ca              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 78-7F «, t00=0x0003, t01=0x00f2}
0x05ca…05f6              Head {h00=0x0028, h01=0x0050, text=» DATA /2061,/6263,/6465,/6667 80-87 «, t00=0x0003, t01=0x011e}
0x05f6…0622              Head {h00=0x0028, h01=0x0050, text=» DATA /6869,/5B2E,/3C28,/2B21 88-8F «, t00=0x0003, t01=0x014a}
0x0622…064e              Head {h00=0x0028, h01=0x0050, text=» DATA /266A,/6B6C,/6D6E,/6F70 90-97 «, t00=0x0003, t01=0x0176}
0x064e…067a              Head {h00=0x0028, h01=0x0050, text=» DATA /7172,/5D24,/2A29,/3B5E 98-9F «, t00=0x0004, t01=0x0012}
0x067a…06a6              Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/7374,/7576,/7778 A0-A7 «, t00=0x0004, t01=0x003e}
0x06a6…06d2              Head {h00=0x0028, h01=0x0050, text=» DATA /797A,/7C2C,/255F,/3E3F A8-AF «, t00=0x0004, t01=0x006a}
0x06d2…06fe              Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 B0-B7 «, t00=0x0004, t01=0x0096}
0x06fe…072a              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 B8-BF «, t00=0x0004, t01=0x00c2}
0x072a…0756              Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 C0-C7 «, t00=0x0004, t01=0x00ee}
0x0756…0782              Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 C8-CF «, t00=0x0004, t01=0x011a}
0x0782…07ae              Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 «, t00=0x0004, t01=0x0146}
0x07ae…07da              Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E D8-DF «, t00=0x0004, t01=0x0172}
0x07da…0806              Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 E0-E7 «, t00=0x0005, t01=0x000e}
0x0806…0832              Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F E8-EF «, t00=0x0005, t01=0x003a}
0x0832…085e              Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 F0-F7 «, t00=0x0005, t01=0x0066}
0x085e…088a              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3DFF F8-FF «, t00=0x0005, t01=0x0092}
0x088a…0896              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0005, t01=0x00be}
0x0896…08a4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x00ca}
0x08a4…08ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d8}
0x08ae…08b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e2}
0x08b8…08ee              Head {h00=0x0032, h01=0x0050, text=»* TABLE FOR CONVERSION OF ASCII CODE TO EBCDIC«, t00=0x0005, t01=0x00ec}
0x08ee…08f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0122}
0x08f8…0902              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012c}
0x0902…0918              Head {h00=0x0012, h01=0x0050, text=»TEBCDIC EQU * «, t00=0x0005, t01=0x0136}
0x0918…0930              Head {h00=0x0014, h01=0x0050, text=» IFF CODE+RCOM=0«, t00=0x0005, t01=0x014c}
0x0930…095c              Head {h00=0x0028, h01=0x0050, text=» DATA /0001,/0203,/372D,/0000 00-07 «, t00=0x0005, t01=0x0164}
0x095c…0988              Head {h00=0x0028, h01=0x0050, text=» DATA /0005,/1500,/0C00,/0000 08-0F «, t00=0x0005, t01=0x0190}
0x0988…09b4              Head {h00=0x0028, h01=0x0050, text=» DATA /1011,/1213,/3C3D,/3226 10-17 «, t00=0x0006, t01=0x002c}
0x09b4…09e0              Head {h00=0x0028, h01=0x0050, text=» DATA /7019,/3F27,/1C1D,/1E1F 18-1F «, t00=0x0006, t01=0x0058}
0x09e0…0a0c              Head {h00=0x0028, h01=0x0050, text=» DATA /404F,/7F7B,/5B6C,/507D 20-27 «, t00=0x0006, t01=0x0084}
0x0a0c…0a38              Head {h00=0x0028, h01=0x0050, text=» DATA /4D5D,/5C4E,/6B60,/4B61 28-2F «, t00=0x0006, t01=0x00b0}
0x0a38…0a64              Head {h00=0x0028, h01=0x0050, text=» DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 «, t00=0x0006, t01=0x00dc}
0x0a64…0a90              Head {h00=0x0028, h01=0x0050, text=» DATA /F8F9,/7A5E,/4C7E,/6E6F 38-3F «, t00=0x0006, t01=0x0108}
0x0a90…0abc              Head {h00=0x0028, h01=0x0050, text=» DATA /7CC1,/C2C3,/C4C5,/C6C7 40-47 «, t00=0x0006, t01=0x0134}
0x0abc…0ae8              Head {h00=0x0028, h01=0x0050, text=» DATA /C8C9,/D1D2,/D3D4,/D5D6 48-4F «, t00=0x0006, t01=0x0160}
0x0ae8…0b14              Head {h00=0x0028, h01=0x0050, text=» DATA /D7D8,/D9E2,/E3E4,/E5E6 50-57 «, t00=0x0006, t01=0x018c}
0x0b14…0b40              Head {h00=0x0028, h01=0x0050, text=» DATA /E7E8,/E94A,/005A,/5F6D 58-5F «, t00=0x0007, t01=0x0028}
0x0b40…0b6c              Head {h00=0x0028, h01=0x0050, text=» DATA /0081,/8283,/8485,/8687 60-67 «, t00=0x0007, t01=0x0054}
0x0b6c…0b98              Head {h00=0x0028, h01=0x0050, text=» DATA /8889,/9192,/9394,/9596 68-6F «, t00=0x0007, t01=0x0080}
0x0b98…0bc4              Head {h00=0x0028, h01=0x0050, text=» DATA /9798,/99A2,/A3A4,/A5A6 70-77 «, t00=0x0007, t01=0x00ac}
0x0bc4…0bf0              Head {h00=0x0028, h01=0x0050, text=» DATA /A7A8,/A91C,/6A00,/00E0 78-7F «, t00=0x0007, t01=0x00d8}
0x0bf0…0c28              Head {h00=0x0034, h01=0x0050, text=» DATA /544F,/5353 SPEC. FLEX CHAR. 'TOSS'  80-84«, t00=0x0007, t01=0x0104}
0x0c28…0c34              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x013c}
0x0c34…0c40              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0007, t01=0x0148}
0x0c40…0c44              Head {h00=0x4004, h01=0x0000}
0x0c44…0c48              00 07 01 54                                                                                                                                                                                                                                       ┆   T┆
0x0c48…0c50 (8, 1, 8)    20 04 00 00 00 08 00 04                                                                                                                                                                                                                           ┆        ┆
0x0c50…0ca0 (9, 0, 400)  00 10 00 50 52 45 4d 30 36 5c 45 51 55 5c 2a 20 00 29 00 04 00 10 00 50 5c 41 44 52 5c 41 34 2c 41 36 5c 20 00 29 00 18 00 14 00 50 52 45 4d 31 30 5c 4c 44 52 2a 5c 41 33 2c 41 32 00 29 00 2c 00 26 00 50 5c 52 42 28 5a 29 5c 47 42 55 46 31   ┆   PREM06 EQU *  )     P ADR A4,A6   )     PREM10 LDR* A3,A2 ) , & P RB(Z) GBUF1┆
0x0ca0…0cf0              30 5c 4e 4f 54 20 4f 4e 20 51 55 45 55 45 3a 20 52 45 54 55 52 4e 00 29 00 44 00 0e 00 50 5c 43 57 52 5c 41 33 2c 41 34 00 29 00 6e 00 10 00 50 5c 52 46 28 45 29 5c 52 45 4d 31 35 00 29 00 80 00 18 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 47   ┆0 NOT ON QUEUE: RETURN ) D   P CWR A3,A4 ) n   P RF(E) REM15 )     P LDR A2,A3 G┆
0x0cf0…0d40              45 54 20 4e 45 58 54 20 00 29 00 94 00 0e 00 50 5c 52 42 5c 52 45 4d 31 30 20 00 29 00 b0 00 1c 00 50 52 45 4d 31 35 5c 4c 44 52 2a 5c 41 33 2c 41 34 5c 52 45 4d 4f 56 45 20 00 29 00 c2 00 0e 00 50 5c 53 54 52 5c 41 33 2c 41 32 00 29 00 e2   ┆ET NEXT  )     P RB REM10  )     PREM15 LDR* A3,A4 REMOVE  )     P STR A3,A2 )  ┆
0x0d40…0d90              00 16 00 50 5c 52 42 5c 47 42 55 46 31 30 5c 52 45 54 55 52 4e 20 00 29 00 f4 00 0a 00 50 5c 45 4a 45 43 54 00 29 01 0e 00 06 00 50 2a 20 00 29 01 1c 00 06 00 50 2a 20 00 29 01 26 00 06 00 50 2a 20 00 29 01 30 00 2a 00 50 2a 5c 49 4e 53 45   ┆   P RB GBUF10 RETURN  )     P EJECT )     P*  )     P*  ) &   P*  ) 0 * P* INSE┆
0x0d90…0de0              52 54 20 44 57 54 20 49 4e 20 47 45 54 20 57 52 49 54 45 20 42 55 46 46 45 52 20 51 55 45 55 45 00 29 01 3a 00 06 00 50 2a 20 00 29 01 68 00 10 00 50 5c 49 46 46 5c 54 42 55 46 4c 3d 30 00 29 01 72 00 18 00 50 2a 5c 41 32 2c 41 33 2c 41 34   ┆RT DWT IN GET WRITE BUFFER QUEUE ) :   P*  ) h   P IFF TBUFL=0 ) r   P* A2,A3,A4┆
0x0de0…0e30 (10, 0, 400) 20 44 45 53 54 52 4f 59 45 44 00 29 01 86 00 0c 00 50 2a 5c 41 36 3d 44 57 54 00 2a 00 12 00 06 00 50 2a 20 00 2a 00 22 00 2a 00 50 49 4e 53 47 57 51 5c 4c 44 4b 4c 5c 41 32 2c 44 43 47 57 51 5c 47 45 54 20 51 55 45 55 45 20 41 4e 43 48 4f   ┆ DESTROYED )     P* A6=DWT *     P*  * " * PINSGWQ LDKL A2,DCGWQ GET QUEUE ANCHO┆
0x0e30…0e80              52 20 00 2a 00 2c 00 0e 00 50 5c 52 42 5c 49 4e 53 57 51 31 00 2a 00 5a 00 06 00 50 2a 20 00 2a 00 6c 00 06 00 50 2a 20 00 2a 00 76 00 2c 00 50 2a 5c 52 45 4d 4f 56 45 20 44 57 54 20 46 52 4f 4d 20 47 45 54 20 57 52 49 54 45 20 42 55 46 46   ┆R  * ,   P RB INSWQ1 * Z   P*  * l   P*  * v , P* REMOVE DWT FROM GET WRITE BUFF┆
0x0e80…0ed0              45 52 20 51 55 45 55 45 00 2a 00 80 00 06 00 50 2a 20 00 2a 00 b0 00 18 00 50 2a 5c 41 32 2c 41 33 2c 41 34 20 44 45 53 54 52 4f 59 45 44 00 2a 00 ba 00 0c 00 50 2a 5c 41 36 3d 44 57 54 00 2a 00 d6 00 06 00 50 2a 20 00 2a 00 e6 00 2a 00 50   ┆ER QUEUE *     P*  *     P* A2,A3,A4 DESTROYED *     P* A6=DWT *     P*  *   * P┆
0x0ed0…0f20              52 45 4d 4f 56 47 5c 4c 44 4b 4c 5c 41 32 2c 44 43 47 57 51 5c 47 45 54 20 51 55 45 55 45 20 41 4e 43 48 4f 52 20 00 2a 00 f0 00 0e 00 50 5c 52 42 5c 52 45 4d 30 35 20 00 2a 01 1e 00 08 00 50 5c 58 49 46 00 2a 01 30 00 0a 00 50 5c 45 4a 45   ┆REMOVG LDKL A2,DCGWQ GET QUEUE ANCHOR  *     P RB REM05  *     P XIF * 0   P EJE┆
0x0f20…0f70              43 54 00 2a 01 3c 00 06 00 50 2a 20 00 2a 01 4a 00 06 00 50 2a 20 00 2a 01 54 00 20 00 50 2a 5c 49 4e 53 45 52 54 20 44 57 54 20 49 4e 20 53 54 41 54 55 53 20 51 55 45 55 45 00 2a 01 5e 00 06 00 50 2a 20 00 2a 01 82 00 10 00 50 5c 49 46 46   ┆CT * <   P*  * J   P*  * T   P* INSERT DWT IN STATUS QUEUE * ^   P*  *     P IFF┆
0x0f70…0fc0 (11, 0, 400) 5c 53 54 41 54 3d 30 20 00 2a 01 8c 00 18 00 50 2a 5c 41 32 2c 41 33 2c 41 34 20 44 45 53 54 52 4f 59 45 44 00 2b 00 10 00 0c 00 50 2a 5c 41 36 3d 44 57 54 00 2b 00 2c 00 06 00 50 2a 20 00 2b 00 3c 00 28 00 50 49 4e 53 53 51 5c 4c 44 4b 4c   ┆ STAT=0  *     P* A2,A3,A4 DESTROYED +     P* A6=DWT + ,   P*  + < ( PINSSQ LDKL┆
0x0fc0…1010              5c 41 32 2c 44 43 53 54 51 5c 47 45 54 20 51 55 45 55 45 20 41 4e 43 48 4f 52 00 2b 00 46 00 12 00 50 5c 4c 44 4b 5c 41 34 2c 44 57 54 53 51 20 00 2b 00 72 00 0e 00 50 5c 52 42 5c 49 4e 53 57 51 32 00 2b 00 88 00 06 00 50 2a 20 00 2b 00 9a   ┆ A2,DCSTQ GET QUEUE ANCHOR + F   P LDK A4,DWTSQ  + r   P RB INSWQ2 +     P*  +  ┆
0x1010…1060              00 06 00 50 2a 20 00 2b 00 a4 00 22 00 50 2a 5c 52 45 4d 4f 56 45 20 44 57 54 20 46 52 4f 4d 20 53 54 41 54 55 53 20 51 55 45 55 45 00 2b 00 ae 00 06 00 50 2a 20 00 2b 00 d4 00 18 00 50 2a 5c 41 32 2c 41 33 2c 41 34 20 44 45 53 54 52 4f 59   ┆   P*  +   " P* REMOVE DWT FROM STATUS QUEUE +     P*  +     P* A2,A3,A4 DESTROY┆
0x1060…10b0              45 44 00 2b 00 de 00 0c 00 50 2a 5c 41 36 3d 44 57 54 00 2b 00 fa 00 06 00 50 2a 20 00 2b 01 0a 00 2a 00 50 52 45 4d 4f 56 53 5c 4c 44 4b 4c 5c 41 32 2c 44 43 53 54 51 5c 47 45 54 20 51 55 45 55 45 20 41 4e 43 48 4f 52 20 00 2b 01 14 00 12   ┆ED +     P* A6=DWT +     P*  +   * PREMOVS LDKL A2,DCSTQ GET QUEUE ANCHOR  +    ┆
0x10b0…1100              00 50 5c 4c 44 4b 5c 41 34 2c 44 57 54 53 51 20 00 2b 01 42 00 0e 00 50 5c 52 42 5c 52 45 4d 30 36 20 00 2b 01 58 00 08 00 50 5c 58 49 46 00 2b 01 6a 00 0a 00 50 5c 45 4a 45 43 54 00 2b 01 76 00 06 00 50 2a 20 00 2b 01 84 00 06 00 50 2a 20   ┆ P LDK A4,DWTSQ  + B   P RB REM06  + X   P XIF + j   P EJECT + v   P*  +     P* ┆
0x1100…1150 (12, 0, 400) 00 2b 01 8e 00 24 00 50 2a 5c 51 55 45 55 45 20 41 4c 4c 4f 43 41 54 45 44 20 52 45 43 45 49 56 45 20 42 55 46 46 45 52 00 2c 00 08 00 06 00 50 2a 20 00 2c 00 30 00 14 00 50 2a 5c 41 34 3d 42 55 46 46 45 52 20 41 44 44 52 00 2c 00 3a 00 16   ┆ +   $ P* QUEUE ALLOCATED RECEIVE BUFFER ,     P*  , 0   P* A4=BUFFER ADDR , :  ┆
0x1150…11a0              00 50 2a 5c 41 32 2c 41 33 20 44 45 53 54 52 4f 59 45 44 20 00 2c 00 52 00 06 00 50 2a 20 00 2c 00 6c 00 10 00 50 51 52 42 55 46 5c 45 51 55 5c 2a 20 00 2c 00 76 00 12 00 50 5c 49 46 54 5c 4d 45 53 50 41 53 3d 31 20 00 2c 00 8a 00 28 00 50   ┆ P* A2,A3 DESTROYED  , R   P*  , l   PQRBUF EQU *  , v   P IFT MESPAS=1  ,   ( P┆
0x11a0…11f0              5c 4c 44 4b 4c 5c 41 32 2c 44 57 31 35 30 30 5c 51 55 45 55 45 20 4f 4e 20 44 43 2d 54 41 53 4b 20 44 57 54 00 2c 00 a0 00 08 00 50 5c 58 49 46 00 2c 00 cc 00 12 00 50 5c 49 46 54 5c 4d 45 53 50 41 53 3d 30 20 00 2c 00 d8 00 24 00 50 5c 4c   ┆ LDKL A2,DW1500 QUEUE ON DC-TASK DWT ,     P XIF ,     P IFT MESPAS=0  ,   $ P L┆
0x11f0…1240              44 52 5c 41 32 2c 41 36 5c 51 55 45 55 45 20 4f 4e 20 54 45 52 4d 49 4e 41 4c 20 44 57 54 00 2c 00 ee 00 08 00 50 5c 58 49 46 00 2c 01 16 00 2c 00 50 5c 41 44 4b 5c 41 32 2c 44 57 54 52 51 5c 42 45 47 49 4e 4e 49 4e 47 20 4f 46 20 52 45 43   ┆DR A2,A6 QUEUE ON TERMINAL DWT ,     P XIF ,   , P ADK A2,DWTRQ BEGINNING OF REC┆
0x1240…1290              45 49 56 45 20 51 55 45 55 45 00 2c 01 22 00 10 00 50 51 52 31 30 30 5c 45 51 55 5c 2a 20 00 2c 01 52 00 10 00 50 5c 4c 44 52 2a 5c 41 33 2c 41 32 20 00 2c 01 66 00 24 00 50 5c 52 46 28 5a 29 5c 51 52 32 30 30 5c 45 4e 44 20 4f 46 20 51 55   ┆EIVE QUEUE , "   PQR100 EQU *  , R   P LDR* A3,A2  , f $ P RF(Z) QR200 END OF QU┆

Reduced view