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

⟦b5ac6a9fd⟧

    Length: 4750 (0x128e)
    Notes: pts_type(SC)
    Names: »EBCDIC.SC«

Derivation

└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
    └─⟦this⟧ »IBM3270/EBCDIC.SC« 
└─⟦bdcaa0fa2⟧ Bits:30009700 Philips computer tape "600999"
    └─⟦this⟧ »IBM3270/EBCDIC.SC« 

	IDENT EBCDIC 	REL 9.2 79-11-16  870105040920 

* 
************************************************
* 
*   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	/1E81,/8283,/8485,/8687	60-67 
	DATA	/8889,/9192,/9394,/9596	68-6F 
	DATA	/9798,/99A2,/A3A4,/A5A6	70-77 
	DATA	/A7A8,/A91C,/6A00,/0000	78-7F 
	DATA	/544F,/5353	SPEC. FLEX CHAR. 'TOSS'  80-84
	XIF
	END

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT EBCDIC  REL 9.2 79-11-16  870105040920 «, 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 /1E81,/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,/0000 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)  5c 53 55 4b 5c 41 31 2c 31 20 00 60 01 90 00 28 00 50 5c 52 46 28 5a 29 5c 4f 55 54 33 35 30 5c 4f 52 44 45 52 20 32 37 3a 53 54 41 52 54 20 50 4f 4c 4c 49 4e 47 00 61 00 12 00 10 00 50 5c 53 55 4b 5c 41 31 2c 2f 31 30 20 00 61 00 3e 00 22   ┆ SUK A1,1  `   ( P RF(Z) OUT350 ORDER 27:START POLLING a     P SUK A1,/10  a > "┆
0x0ca0…0cf0              00 50 5c 52 46 28 5a 29 5c 4f 55 54 31 30 30 5c 4f 52 44 45 52 20 33 37 3a 4f 50 45 4e 20 54 43 00 61 00 52 00 0a 00 50 5c 45 4a 45 43 54 00 61 00 78 00 06 00 50 2a 20 00 61 00 86 00 18 00 50 2a 20 20 4f 52 44 45 52 20 33 38 3a 43 4c 4f 53   ┆ P RF(Z) OUT100 ORDER 37:OPEN TC a R   P EJECT a x   P*  a     P*  ORDER 38:CLOS┆
0x0cf0…0d40              45 20 54 43 00 61 00 90 00 06 00 50 2a 20 00 61 00 ac 00 28 00 50 5c 4c 43 5c 41 33 2c 44 57 54 4f 52 2c 41 36 5c 47 45 54 20 49 4e 44 45 58 20 49 4e 20 50 4f 4c 4c 49 53 54 00 61 00 b6 00 10 00 50 5c 41 4e 4b 5c 41 33 2c 2f 46 46 20 00 61   ┆E TC a     P*  a   ( P LC A3,DWTOR,A6 GET INDEX IN POLLIST a     P ANK A3,/FF  a┆
0x0d40…0d90              00 e2 00 0e 00 50 5c 41 44 52 5c 41 33 2c 41 36 00 61 00 f6 00 10 00 50 5c 4c 44 52 2a 5c 41 32 2c 41 33 20 00 61 01 08 00 2c 00 50 5c 4c 44 5c 41 32 2c 50 4c 49 53 54 2c 41 33 5c 52 45 4c 4f 41 44 20 50 2d 4c 49 53 54 20 50 4f 49 4e 54 45   ┆     P ADR A3,A6 a     P LDR* A2,A3  a   , P LD A2,PLIST,A3 RELOAD P-LIST POINTE┆
0x0d90…0de0              52 5c 3d 31 00 61 01 1c 00 10 00 50 5c 43 4d 5c 50 4c 49 53 54 2c 41 33 00 61 01 4c 00 0e 00 50 5c 4c 44 52 5c 41 31 2c 41 33 00 61 01 60 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 32 20 00 61 01 72 00 10 00 50 5c 43 4d 5c 50 4c 49 53 54 2c 41 31   ┆R =1 a     P CM PLIST,A3 a L   P LDR A1,A3 a `   P SUK A1,2  a r   P CM PLIST,A1┆
0x0de0…0e30 (10, 0, 398) 00 61 01 84 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 62 00 08 00 24 00 50 5c 43 46 5c 41 31 35 2c 54 45 4e 44 49 4f 5c 43 4f 4d 50 4c 45 54 45 20 52 45 51 55 45 53 54 20 00 62 00 1a 00 06 00 50 2a 20 00 62 00 42 00 2a 00 50 2a 20 44 49   ┆ a     P LDK A1,0  b   $ P CF A15,TENDIO COMPLETE REQUEST  b     P*  b B * P* DI┆
0x0e30…0e80              53 43 4f 4e 4e 45 43 54 20 54 43 20 41 46 54 45 52 20 43 4f 4d 50 4c 45 54 45 20 52 45 51 55 45 53 54 00 62 00 4c 00 06 00 50 2a 20 00 62 00 7a 00 0e 00 50 5c 4c 44 52 5c 41 31 2c 41 32 00 62 00 84 00 10 00 50 5c 41 4e 4b 5c 41 31 2c 2f 37   ┆SCONNECT TC AFTER COMPLETE REQUEST b L   P*  b z   P LDR A1,A2 b     P ANK A1,/7┆
0x0e80…0ed0              46 20 00 62 00 96 00 0e 00 50 5c 45 43 52 5c 41 31 2c 41 31 00 62 00 aa 00 12 00 50 5c 4f 52 4b 5c 41 31 2c 54 44 49 53 43 20 00 62 00 bc 00 10 00 50 5c 43 46 5c 41 35 2c 54 52 55 46 20 00 62 00 d2 00 12 00 50 5c 43 46 5c 41 35 2c 52 44 55   ┆F  b     P ECR A1,A1 b     P ORK A1,TDISC  b     P CF A5,TRUF  b     P CF A5,RDU┆
0x0ed0…0f20              53 54 49 20 00 62 00 e6 00 12 00 50 5c 43 46 5c 41 35 2c 48 41 4c 54 49 4e 20 00 62 00 fc 00 0e 00 50 5c 41 42 4c 5c 42 4d 4d 31 30 00 62 01 12 00 0a 00 50 5c 45 4a 45 43 54 00 62 01 24 00 06 00 50 2a 20 00 62 01 32 00 18 00 50 2a 20 20 4f   ┆STI  b     P CF A5,HALTIN  b     P ABL BMM10 b     P EJECT b $   P*  b 2   P*  O┆
0x0f20…0f6e              52 44 45 52 20 33 37 3a 4f 50 45 4e 20 54 43 20 00 62 01 3c 00 06 00 50 2a 20 00 62 01 58 00 10 00 50 4f 55 54 31 30 30 5c 45 51 55 5c 2a 00 62 01 62 00 1c 00 50 5c 4c 44 5c 41 32 2c 45 43 42 43 57 2c 41 38 5c 47 45 54 20 54 43 41 20         ┆RDER 37:OPEN TC  b <   P*  b X   POUT100 EQU * b b   P LD A2,ECBCW,A8 GET TCA ┆
0x0f6e…0fbe (11, 0, 400) 00 62 01 76 00 22 00 50 5c 43 46 5c 41 31 35 2c 46 49 4e 44 54 43 5c 41 4c 52 45 41 44 59 20 50 52 45 53 45 4e 54 00 63 00 08 00 14 00 50 5c 52 46 28 50 29 5c 4f 55 54 31 30 35 5c 4e 4f 00 63 00 2e 00 22 00 50 5c 52 46 5c 4f 55 54 33 30 30   ┆ b v " P CF A15,FINDTC ALREADY PRESENT c     P RF(P) OUT105 NO c . " P RF OUT300┆
0x0fbe…100e              5c 54 43 20 41 4c 52 45 41 44 59 20 49 4e 20 4c 49 53 54 20 00 63 00 46 00 10 00 50 4f 55 54 31 30 35 5c 45 51 55 5c 2a 00 63 00 6c 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 30 20 00 63 00 80 00 26 00 50 5c 43 46 5c 41 31 35 2c 46 49 4e 44 54 43   ┆ TC ALREADY IN LIST  c F   POUT105 EQU * c l   P LDK A2,0  c   & P CF A15,FINDTC┆
0x100e…105e              5c 53 45 41 52 43 48 20 45 4d 50 54 59 20 50 4c 41 43 45 20 00 63 00 92 00 12 00 50 5c 52 46 28 5a 29 5c 4f 55 54 31 31 30 20 00 63 00 bc 00 24 00 50 5c 4c 44 4b 4c 5c 41 31 2c 4c 53 54 4f 56 46 5c 50 4f 4c 4c 49 53 54 20 4f 56 45 52 46 4c   ┆ SEARCH EMPTY PLACE  c     P RF(Z) OUT110  c   $ P LDKL A1,LSTOVF POLLIST OVERFL┆
0x105e…10ae              4f 57 00 63 00 d2 00 20 00 50 5c 52 46 5c 4f 55 54 33 31 30 5c 43 4f 4d 50 4c 45 54 45 20 52 45 51 55 45 53 54 20 00 63 00 fa 00 10 00 50 4f 55 54 31 31 30 5c 45 51 55 5c 2a 00 63 01 1e 00 2a 00 50 5c 53 43 5c 41 34 2c 44 57 54 4f 52 2c 41   ┆OW c     P RF OUT310 COMPLETE REQUEST  c     POUT110 EQU * c   * P SC A4,DWTOR,A┆
0x10ae…10fe              36 5c 53 41 56 45 20 49 4e 44 45 58 20 49 4e 20 50 4f 4c 4c 49 53 54 20 00 63 01 32 00 1c 00 50 5c 4c 44 5c 41 31 2c 45 43 42 43 57 2c 41 38 5c 47 45 54 20 54 43 41 20 00 63 01 60 00 24 00 50 5c 4f 52 4b 4c 5c 41 31 2c 2f 38 30 30 30 5c 53   ┆6 SAVE INDEX IN POLLIST  c 2   P LD A1,ECBCW,A8 GET TCA  c ` $ P ORKL A1,/8000 S┆
0x10fe…114e (12, 0, 400) 45 54 20 54 43 41 20 49 4e 41 43 54 49 56 45 20 00 63 01 80 00 26 00 50 5c 53 54 52 5c 41 31 2c 41 33 5c 49 4e 53 45 52 54 52 20 54 43 41 20 49 4e 20 50 4f 4c 4c 49 53 54 20 00 64 00 18 00 22 00 50 5c 4c 44 52 5c 41 32 2c 41 33 5c 43 4c 45   ┆ET TCA INACTIVE  c   & P STR A1,A3 INSERTR TCA IN POLLIST  d   " P LDR A2,A3 CLE┆
0x114e…119e              41 52 20 43 4f 55 4e 54 45 52 53 20 41 52 45 41 00 64 00 42 00 0e 00 50 5c 53 55 4b 5c 41 32 2c 32 20 00 64 00 68 00 0c 00 50 5c 43 4d 52 5c 41 32 20 00 64 00 7a 00 14 00 50 5c 4c 44 4b 4c 5c 41 32 2c 52 54 59 4c 49 4d 20 00 64 00 8a 00 14   ┆AR COUNTERS AREA d B   P SUK A2,2  d h   P CMR A2  d z   P LDKL A2,RTYLIM  d    ┆
0x119e…11ee              00 50 5c 53 54 5c 41 32 2c 44 57 54 52 54 59 2c 41 36 00 64 00 a2 00 06 00 50 2a 20 00 64 00 ba 00 34 00 50 2a 20 20 53 45 4e 44 20 53 4e 52 4d 20 41 4e 44 20 57 41 49 54 20 57 49 54 48 20 54 49 4d 45 2d 4f 55 54 20 53 55 50 45 52 56 49 53   ┆ P ST A2,DWTRTY,A6 d     P*  d   4 P*  SEND SNRM AND WAIT WITH TIME-OUT SUPERVIS┆
0x11ee…123e              49 4f 4e 20 00 64 00 c4 00 06 00 50 2a 20 00 64 00 fc 00 10 00 50 53 53 4e 52 4d 5c 45 51 55 5c 2a 20 00 64 01 06 00 14 00 50 5c 4c 44 5c 41 31 2c 45 43 42 43 57 2c 41 38 20 00 64 01 1a 00 1e 00 50 5c 41 4e 4b 5c 41 31 2c 2f 37 46 5c 47 45   ┆ION  d     P*  d     PSSNRM EQU *  d     P LD A1,ECBCW,A8  d     P ANK A1,/7F GE┆
0x123e…128e              54 20 54 43 20 41 44 44 52 45 53 53 00 64 01 32 00 0e 00 50 5c 45 43 52 5c 41 31 2c 41 31 00 64 01 54 00 24 00 50 5c 4f 52 4b 5c 41 31 2c 54 53 4e 52 4d 5c 4d 45 52 47 45 20 57 49 54 48 20 43 2d 46 49 45 4c 44 00 64 01 66 00 10 00 50 4f 55   ┆T TC ADDRESS d 2   P ECR A1,A1 d T $ P ORK A1,TSNRM MERGE WITH C-FIELD d f   POU┆

Reduced view