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

⟦400f05a62⟧ 

    Length: 4604 (0x11fc)
    Notes: pts_type(SC)
    Names: »C:ASCI.SC«

Derivation

└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
    └─⟦this⟧ »BDKAPP/C:ASCI.SC«

PTS(SC)

	IDENT C:ASCI 	REL 8.3 79-06-25  870105040830 

* 
************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   EBCDIC = EBCDIC/ASCII TABLE 
* 
* 
* 
* 
* 
* 
************************************************* 
* 
	ENTRY	TASCII 
* 
* 
*  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	/7F01,/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,/232E,/3C28,/2B21	48-4F 
	DATA	/264A,/4B4C,/4D4E,/4F50	50-57 
	DATA	/5152,/245D,/2A29,/3B5E	58-5F 
	DATA	/2D2F,/5354,/5556,/5758	60-67 
	DATA	/595A,/402C,/255F,/3E3F	68-6F 
	DATA	/1831,/3233,/3435,/3637	70-77 
	DATA	/3839,/3A5B,/5C27,/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	/7F2F,/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
	END

HexDump

0x0000…0036 (0, 0, 398)  Head {h00=0x0032, h01=0x0050, text=» IDENT C:ASCI  REL 8.3 79-06-25  870105040830 «, 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…0184              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017e}
0x0184…018e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0188}
0x018e…01c0 (1, 0, 398)  Head {h00=0x002e, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY  (SEE ALSO DRDC15)«, t00=0x0001, t01=0x0004}
0x01c0…01ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0036}
0x01ca…0200              Head {h00=0x0032, h01=0x0050, text=»X:A EQU 1 CODE , 0=ASCII , 1=EBCDIC   (DRDC15)«, t00=0x0001, t01=0x0040}
0x0200…0214              Head {h00=0x0010, h01=0x0050, text=»CODE EQU X:A«, t00=0x0001, t01=0x0076}
0x0214…024c              Head {h00=0x0034, h01=0x0050, text=»X:B EQU 1 READ COMMAND HANDLING IF = 1  (DRDC15)«, t00=0x0001, t01=0x008a}
0x024c…0260              Head {h00=0x0010, h01=0x0050, text=»RCOM EQU X:B«, t00=0x0001, t01=0x00c2}
0x0260…026e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x00d6}
0x026e…0278              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e4}
0x0278…0282              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ee}
0x0282…02b8              Head {h00=0x0032, h01=0x0050, text=»* TABLE FOR CONVERSION OF EBCDIC CODE TO ASCII«, t00=0x0001, t01=0x00f8}
0x02b8…02c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012e}
0x02c2…02cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0138}
0x02cc…02e0              Head {h00=0x0010, h01=0x0050, text=»TASCII EQU *«, t00=0x0001, t01=0x0142}
0x02e0…02f4              Head {h00=0x0010, h01=0x0050, text=» IFT CODE=1 «, t00=0x0001, t01=0x0156}
0x02f4…0320              Head {h00=0x0028, h01=0x0050, text=» DATA /7F01,/0203,/0009,/0000 00-07 «, t00=0x0001, t01=0x016a}
0x0320…034c              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0C00,/0000 08-0F «, t00=0x0002, t01=0x0008}
0x034c…0378              Head {h00=0x0028, h01=0x0050, text=» DATA /1011,/1213,/000A,/0000 10-17 «, t00=0x0002, t01=0x0034}
0x0378…03a4              Head {h00=0x0028, h01=0x0050, text=» DATA /0019,/0000,/1C1D,/1E1F 18-1F «, t00=0x0002, t01=0x0060}
0x03a4…03d0              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0000,/171B 20-27 «, t00=0x0002, t01=0x008c}
0x03d0…03fc              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/0005,/0000 28-2F «, t00=0x0002, t01=0x00b8}
0x03fc…0428              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/1600,/0000,/0004 30-37 «, t00=0x0002, t01=0x00e4}
0x0428…0454              Head {h00=0x0028, h01=0x0050, text=» DATA /0000,/0000,/1415,/001A 38-3F «, t00=0x0002, t01=0x0110}
0x0454…0480              Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 40-47 «, t00=0x0002, t01=0x013c}
0x0480…04ac              Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/232E,/3C28,/2B21 48-4F «, t00=0x0002, t01=0x0168}
0x04ac…04d8 (3, 0, 400)  Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 50-57 «, t00=0x0003, t01=0x0004}
0x04d8…0504              Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/245D,/2A29,/3B5E 58-5F «, t00=0x0003, t01=0x0030}
0x0504…0530              Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/5354,/5556,/5758 60-67 «, t00=0x0003, t01=0x005c}
0x0530…055c              Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/402C,/255F,/3E3F 68-6F «, t00=0x0003, t01=0x0088}
0x055c…0588              Head {h00=0x0028, h01=0x0050, text=» DATA /1831,/3233,/3435,/3637 70-77 «, t00=0x0003, t01=0x00b4}
0x0588…05b4              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A5B,/5C27,/3D22 78-7F «, t00=0x0003, t01=0x00e0}
0x05b4…05e0              Head {h00=0x0028, h01=0x0050, text=» DATA /2061,/6263,/6465,/6667 80-87 «, t00=0x0003, t01=0x010c}
0x05e0…060c              Head {h00=0x0028, h01=0x0050, text=» DATA /6869,/5B2E,/3C28,/2B21 88-8F «, t00=0x0003, t01=0x0138}
0x060c…0638              Head {h00=0x0028, h01=0x0050, text=» DATA /266A,/6B6C,/6D6E,/6F70 90-97 «, t00=0x0003, t01=0x0164}
0x0638…0664              Head {h00=0x0028, h01=0x0050, text=» DATA /7172,/5D24,/2A29,/3B5E 98-9F «, t00=0x0003, t01=0x0190}
0x0664…0690              Head {h00=0x0028, h01=0x0050, text=» DATA /2D2F,/7374,/7576,/7778 A0-A7 «, t00=0x0004, t01=0x002c}
0x0690…06bc              Head {h00=0x0028, h01=0x0050, text=» DATA /797A,/7C2C,/255F,/3E3F A8-AF «, t00=0x0004, t01=0x0058}
0x06bc…06e8              Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 B0-B7 «, t00=0x0004, t01=0x0084}
0x06e8…0714              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3D22 B8-BF «, t00=0x0004, t01=0x00b0}
0x0714…0740              Head {h00=0x0028, h01=0x0050, text=» DATA /2041,/4243,/4445,/4647 C0-C7 «, t00=0x0004, t01=0x00dc}
0x0740…076c              Head {h00=0x0028, h01=0x0050, text=» DATA /4849,/5B2E,/3C28,/2B21 C8-CF «, t00=0x0004, t01=0x0108}
0x076c…0798              Head {h00=0x0028, h01=0x0050, text=» DATA /264A,/4B4C,/4D4E,/4F50 D0-D7 «, t00=0x0004, t01=0x0134}
0x0798…07c4              Head {h00=0x0028, h01=0x0050, text=» DATA /5152,/5D24,/2A29,/3B5E D8-DF «, t00=0x0004, t01=0x0160}
0x07c4…07f0              Head {h00=0x0028, h01=0x0050, text=» DATA /7F2F,/5354,/5556,/5758 E0-E7 «, t00=0x0004, t01=0x018c}
0x07f0…081c              Head {h00=0x0028, h01=0x0050, text=» DATA /595A,/7C2C,/255F,/3E3F E8-EF «, t00=0x0005, t01=0x0028}
0x081c…0848              Head {h00=0x0028, h01=0x0050, text=» DATA /3031,/3233,/3435,/3637 F0-F7 «, t00=0x0005, t01=0x0054}
0x0848…0874              Head {h00=0x0028, h01=0x0050, text=» DATA /3839,/3A23,/4027,/3DFF F8-FF «, t00=0x0005, t01=0x0080}
0x0874…0880              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0005, t01=0x00ac}
0x0880…088c              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0005, t01=0x00b8}
0x088c…0890              Head {h00=0x4004, h01=0x0000}
0x0890…0894              00 05 00 c4                                                                                                                                                                                                                                       ┆    ┆
0x0894…089c (6, 1, 8)    20 04 00 00 00 06 00 04                                                                                                                                                                                                                           ┆        ┆
0x089c…08ec (7, 0, 400)  31 35 2c 53 45 54 49 4d 45 20 00 56 01 7c 00 26 00 50 20 20 20 20 20 20 20 20 20 44 41 54 41 20 20 20 20 20 20 20 53 45 4c 31 31 32 2c 54 49 4d 53 45 4c 20 00 57 00 12 00 1c 00 50 20 20 20 20 20 20 20 20 20 41 42 4c 20 20 20 20 20 20 20 54   ┆15,SETIME  V | & P         DATA       SEL112,TIMSEL  W     P         ABL       T┆
0x08ec…093c              44 49 53 50 00 57 00 3c 00 18 00 50 53 45 4c 31 31 32 20 20 20 45 51 55 20 20 20 20 20 20 20 2a 00 57 00 5c 00 20 00 50 20 20 20 20 20 20 20 20 20 43 46 20 20 20 20 20 20 20 20 41 31 35 2c 4c 44 52 45 47 00 57 00 78 00 40 00 50 2a 2a 2a 2a   ┆DISP W <   PSEL112   EQU       * W     P         CF        A15,LDREG W x @ P****┆
0x093c…098c              2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 44 45 4e 4d 41 52 4b 20 45 4e 44 00 57 00 9c 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 30 20 00 57 00 e0   ┆*********************************************DENMARK END W     P IFF STAT=0  W  ┆
0x098c…09dc              00 1e 00 50 5c 4c 44 5c 41 31 2c 44 57 54 53 54 2c 41 36 5c 47 45 54 20 53 54 41 54 55 53 00 57 00 f4 00 0e 00 50 5c 4c 44 52 5c 41 33 2c 41 31 00 57 01 16 00 0e 00 50 5c 41 4e 4b 5c 41 31 2c 31 20 00 57 01 28 00 24 00 50 5c 52 46 28 5a 29   ┆   P LD A1,DWTST,A6 GET STATUS W     P LDR A3,A1 W     P ANK A1,1  W ( $ P RF(Z)┆
0x09dc…0a2c              5c 53 45 4c 31 31 30 5c 4e 4f 20 50 45 4e 44 49 4e 47 20 53 54 41 54 55 53 20 00 57 01 3a 00 1a 00 50 5c 43 46 5c 41 35 2c 54 52 52 56 49 5c 53 45 4e 44 20 52 56 49 20 00 57 01 62 00 08 00 50 5c 58 49 46 00 57 01 80 00 10 00 50 5c 49 46 46   ┆ SEL110 NO PENDING STATUS  W :   P CF A5,TRRVI SEND RVI  W b   P XIF W     P IFF┆
0x0a2c…0a7c (8, 0, 400)  5c 53 54 41 54 3d 31 20 00 57 01 8c 00 0e 00 50 5c 52 46 5c 53 45 4c 31 31 30 00 58 00 10 00 08 00 50 5c 58 49 46 00 58 00 22 00 10 00 50 53 45 4c 31 30 30 5c 45 51 55 5c 2a 00 58 00 2e 00 0c 00 50 5c 41 42 4c 5c 42 52 4d 00 58 00 42 00 10   ┆ STAT=1  W     P RF SEL110 X     P XIF X "   PSEL100 EQU * X .   P ABL BRM X B  ┆
0x0a7c…0acc              00 50 53 45 4c 31 31 30 5c 45 51 55 5c 2a 00 58 00 52 00 16 00 50 5c 49 46 54 5c 53 54 41 54 2b 4e 4f 57 41 43 4b 3d 31 00 58 00 66 00 0e 00 50 5c 41 4e 4b 5c 41 33 2c 38 20 00 58 00 80 00 18 00 50 5c 52 46 28 4e 5a 29 5c 53 45 4c 31 31 35   ┆ PSEL110 EQU * X R   P IFT STAT+NOWACK=1 X f   P ANK A3,8  X     P RF(NZ) SEL115┆
0x0acc…0b1c              5c 42 55 53 59 20 00 58 00 92 00 08 00 50 5c 58 49 46 00 58 00 ae 00 16 00 50 5c 49 46 54 5c 53 54 41 54 2b 4e 4f 57 41 43 4b 3d 32 00 58 00 ba 00 0e 00 50 5c 41 4e 4b 5c 41 33 2c 38 20 00 58 00 d4 00 22 00 50 5c 52 46 28 5a 29 5c 53 45 4c   ┆ BUSY  X     P XIF X     P IFT STAT+NOWACK=2 X     P ANK A3,8  X   " P RF(Z) SEL┆
0x0b1c…0b6c              31 31 31 5c 44 45 56 49 43 45 20 4e 4f 54 20 42 55 53 59 20 00 58 00 e6 00 20 00 50 5c 43 46 5c 41 35 2c 54 52 57 41 43 4b 5c 54 52 41 4e 53 4d 49 54 20 57 41 43 4b 20 00 58 01 0c 00 0c 00 50 5c 41 42 4c 5c 42 52 4d 00 58 01 30 00 10 00 50   ┆111 DEVICE NOT BUSY  X     P CF A5,TRWACK TRANSMIT WACK  X     P ABL BRM X 0   P┆
0x0b6c…0bbc              53 45 4c 31 31 31 5c 45 51 55 5c 2a 00 58 01 40 00 08 00 50 5c 58 49 46 00 58 01 54 00 12 00 50 5c 4c 44 5c 41 31 2c 44 43 52 42 55 46 20 00 58 01 60 00 24 00 50 5c 52 46 28 4e 5a 29 5c 53 45 4c 31 32 30 5c 42 55 46 46 45 52 20 41 56 41 49   ┆SEL111 EQU * X @   P XIF X T   P LD A1,DCRBUF  X ` $ P RF(NZ) SEL120 BUFFER AVAI┆
0x0bbc…0c0c (9, 0, 400)  4c 41 42 4c 45 20 00 58 01 76 00 10 00 50 53 45 4c 31 31 35 5c 45 51 55 5c 2a 00 59 00 0e 00 16 00 50 5c 49 46 46 5c 53 54 41 54 2b 4e 4f 57 41 43 4b 3d 32 00 59 00 22 00 1c 00 50 5c 43 46 5c 41 35 2c 54 52 57 41 43 4b 5c 53 45 4e 44 20 57   ┆LABLE  X v   PSEL115 EQU * Y     P IFF STAT+NOWACK=2 Y "   P CF A5,TRWACK SEND W┆
0x0c0c…0c5c              41 43 4b 20 00 59 00 3c 00 08 00 50 5c 58 49 46 00 59 00 5c 00 0e 00 50 5c 52 42 5c 53 45 4c 31 30 30 00 59 00 68 00 10 00 50 53 45 4c 31 32 30 5c 45 51 55 5c 2a 00 59 00 7a 00 2c 00 50 5c 43 46 5c 41 35 2c 50 52 52 45 43 5c 50 52 45 50 41   ┆ACK  Y <   P XIF Y     P RB SEL100 Y h   PSEL120 EQU * Y z , P CF A5,PRREC PREPA┆
0x0c5c…0cac              52 45 20 46 4f 52 20 54 45 58 54 20 52 45 43 45 50 54 49 4f 4e 20 00 59 00 8e 00 1c 00 50 5c 43 46 5c 41 35 2c 54 52 41 43 4b 5c 53 45 4e 44 20 41 43 4b 2c 30 20 00 59 00 be 00 0e 00 50 5c 52 42 5c 53 45 4c 31 30 30 00 59 00 de 00 0a 00 50   ┆RE FOR TEXT RECEPTION  Y     P CF A5,TRACK SEND ACK,0  Y     P RB SEL100 Y     P┆
0x0cac…0cfc              5c 45 4a 45 43 54 00 59 00 f0 00 06 00 50 2a 20 00 59 00 fe 00 06 00 50 2a 20 00 59 01 08 00 20 00 50 2a 5c 50 52 45 50 41 52 45 20 46 4f 52 20 54 45 58 54 20 52 45 43 45 50 54 49 4f 4e 00 59 01 12 00 06 00 50 2a 20 00 59 01 36 00 06 00 50   ┆ EJECT Y     P*  Y     P*  Y     P* PREPARE FOR TEXT RECEPTION Y     P*  Y 6   P┆
0x0cfc…0d4c              2a 20 00 59 01 40 00 10 00 50 50 52 52 45 43 5c 45 51 55 5c 2a 20 00 59 01 4a 00 1c 00 50 5c 49 4d 5c 58 53 45 4c 5c 53 45 54 20 27 53 45 4c 45 43 54 45 44 27 20 00 59 01 5e 00 20 00 50 5c 43 4d 5c 46 42 41 58 5c 52 45 53 45 54 20 42 55 46   ┆*  Y @   PPRREC EQU *  Y J   P IM XSEL SET 'SELECTED'  Y ^   P CM FBAX RESET BUF┆
0x0d4c…0d9c (10, 0, 400) 46 45 52 20 49 4e 44 45 58 20 00 59 01 7e 00 10 00 50 5c 49 46 54 5c 43 4f 44 45 3d 31 20 00 5a 00 12 00 2e 00 50 5c 4c 43 5c 41 32 2c 54 45 42 43 44 49 43 2c 41 32 5c 54 52 41 4e 53 4c 41 54 45 20 53 54 41 20 54 4f 20 45 42 43 44 49 43 20   ┆FER INDEX  Y ~   P IFT CODE=1  Z   . P LC A2,TEBCDIC,A2 TRANSLATE STA TO EBCDIC ┆
0x0d9c…0dec              00 5a 00 26 00 08 00 50 5c 58 49 46 00 5a 00 58 00 24 00 50 5c 53 54 5c 41 32 2c 2b 34 2c 41 31 5c 53 41 56 45 20 53 54 41 20 49 4e 20 42 55 46 46 45 52 20 00 5a 00 64 00 0c 00 50 5c 49 4d 5c 58 53 54 41 00 5a 00 8c 00 22 00 50 5c 53 54 5c   ┆ Z &   P XIF Z X $ P ST A2,+4,A1 SAVE STA IN BUFFER  Z d   P IM XSTA Z   " P ST ┆
0x0dec…0e3c              41 36 2c 46 44 57 54 49 4e 5c 53 54 4f 52 45 20 49 4e 50 55 54 20 44 57 54 20 00 5a 00 9c 00 0c 00 50 5c 52 54 4e 5c 41 35 20 00 5a 00 c2 00 0a 00 50 5c 45 4a 45 43 54 00 5a 00 d2 00 06 00 50 2a 20 00 5a 00 e0 00 06 00 50 2a 20 00 5a 00 ea   ┆A6,FDWTIN STORE INPUT DWT  Z     P RTN A5  Z     P EJECT Z     P*  Z     P*  Z  ┆
0x0e3c…0e8c              00 24 00 50 2a 5c 47 45 4e 45 52 41 4c 20 50 4f 4c 4c 20 48 41 53 20 42 45 45 4e 20 52 45 43 45 49 56 45 44 00 5a 00 f4 00 06 00 50 2a 20 00 5a 01 1c 00 06 00 50 2a 20 00 5a 01 26 00 10 00 50 47 50 4f 4c 4c 5c 45 51 55 5c 2a 20 00 5a 01 30   ┆ $ P* GENERAL POLL HAS BEEN RECEIVED Z     P*  Z     P*  Z &   PGPOLL EQU *  Z 0┆
0x0e8c…0edc              00 14 00 50 5c 4c 44 5c 41 31 2c 58 41 43 4b 5c 5c 3d 32 20 00 5a 01 44 00 26 00 50 5c 52 46 28 5a 29 5c 50 4f 4c 30 32 30 5c 41 43 4b 20 4e 4f 54 20 45 58 50 45 43 54 45 44 5c 3d 32 20 00 5a 01 5c 00 22 00 50 50 4f 4c 30 31 30 5c 43 46 5c   ┆   P LD A1,XACK  =2  Z D & P RF(Z) POL020 ACK NOT EXPECTED =2  Z   " PPOL010 CF ┆
0x0edc…0f2c (11, 0, 400) 41 35 2c 54 52 45 4e 51 5c 53 45 4e 44 20 45 4e 51 5c 3d 32 00 5a 01 86 00 2a 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 52 4f 43 45 44 55 52 45 20 54 49 4d 45 52 5c 3d 32 20 00 5b 00 1c 00 22 00 50 5c 41 42 4c 5c 42   ┆A5,TRENQ SEND ENQ =2 Z   * P CF A5,SPTIM START PROCEDURE TIMER =2  [   " P ABL B┆
0x0f2c…0f7c              52 4d 5c 57 41 49 54 20 46 4f 52 20 52 45 53 50 4f 4e 53 45 5c 3d 32 20 00 5b 00 4a 00 14 00 50 50 4f 4c 30 32 30 5c 45 51 55 5c 2a 5c 5c 3d 32 00 5b 00 70 00 22 00 50 5c 43 46 5c 41 35 2c 43 50 54 49 4d 5c 43 48 45 43 4b 20 50 4f 4c 4c 20   ┆RM WAIT FOR RESPONSE =2  [ J   PPOL020 EQU *  =2 [ p " P CF A5,CPTIM CHECK POLL ┆
0x0f7c…0fcc              54 49 4d 45 52 20 00 5b 00 88 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 30 20 00 5b 00 ae 00 12 00 50 5c 4c 44 5c 41 36 2c 44 43 53 54 51 5c 20 00 5b 00 c2 00 26 00 50 5c 52 46 28 5a 29 5c 50 4f 4c 31 31 30 5c 4e 4f 20 53 54 41 54 55 53 20   ┆TIMER  [     P IFF STAT=0  [     P LD A6,DCSTQ   [   & P RF(Z) POL110 NO STATUS ┆
0x0fcc…101c              54 4f 20 42 45 20 53 45 4e 54 00 5b 00 d8 00 22 00 50 5c 53 55 4b 5c 41 36 2c 44 57 54 53 51 5c 47 45 54 20 44 57 54 20 41 44 44 52 45 53 53 20 00 5b 01 02 00 10 00 50 50 4f 4c 30 35 30 5c 45 51 55 5c 2a 00 5b 01 28 00 1c 00 50 5c 43 46 5c   ┆TO BE SENT [   " P SUK A6,DWTSQ GET DWT ADDRESS  [     PPOL050 EQU * [ (   P CF ┆
0x101c…106c              41 35 2c 54 52 53 54 41 5c 53 45 4e 44 20 53 54 41 54 55 53 00 5b 01 3c 00 26 00 50 5c 43 46 5c 41 35 2c 53 50 54 49 4d 5c 53 54 41 52 54 20 50 52 4f 43 45 44 55 52 45 20 54 49 4d 45 52 00 5b 01 5c 00 20 00 50 5c 49 4d 5c 58 41 43 4b 5c 53   ┆A5,TRSTA SEND STATUS [ < & P CF A5,SPTIM START PROCEDURE TIMER [     P IM XACK S┆
0x106c…10bc (12, 0, 400) 45 54 20 27 41 43 4b 20 45 58 50 45 43 54 45 44 27 20 00 5b 01 86 00 08 00 50 5c 58 49 46 00 5c 00 1a 00 10 00 50 5c 49 46 46 5c 53 54 41 54 3d 31 20 00 5c 00 26 00 0e 00 50 5c 52 46 5c 50 4f 4c 31 31 30 00 5c 00 3a 00 08 00 50 5c 58 49 46   ┆ET 'ACK EXPECTED'  [     P XIF       P IFF STAT=1    &   P RF POL110   :   P XIF┆
0x10bc…110c              00 5c 00 4c 00 10 00 50 50 4f 4c 31 30 30 5c 45 51 55 5c 2a 00 5c 00 58 00 0c 00 50 5c 41 42 4c 5c 42 52 4d 00 5c 00 6c 00 10 00 50 50 4f 4c 31 31 30 5c 45 51 55 5c 2a 00 5c 00 7c 00 10 00 50 5c 4c 44 5c 41 36 2c 44 43 57 52 51 00 5c 00 90   ┆   L   PPOL100 EQU *   X   P ABL BRM   l   PPOL110 EQU *   |   P LD A6,DCWRQ    ┆
0x110c…115c              00 22 00 50 5c 52 46 28 4e 5a 29 5c 50 4f 4c 31 32 30 5c 57 52 49 54 45 20 4f 4e 20 51 55 45 55 45 20 00 5c 00 a4 00 10 00 50 50 4f 4c 31 31 35 5c 45 51 55 5c 2a 00 5c 00 ca 00 1a 00 50 5c 43 46 5c 41 35 2c 54 52 45 4f 54 5c 53 45 4e 44 20   ┆ " P RF(NZ) POL120 WRITE ON QUEUE        PPOL115 EQU *       P CF A5,TREOT SEND ┆
0x115c…11ac              45 4f 54 20 00 5c 00 de 00 0e 00 50 5c 52 42 5c 50 4f 4c 31 30 30 00 5c 00 fc 00 10 00 50 50 4f 4c 31 32 30 5c 45 51 55 5c 2a 00 5c 01 0e 00 22 00 50 5c 53 55 4b 5c 41 36 2c 44 57 54 57 51 5c 47 45 54 20 44 57 54 20 41 44 44 52 45 53 53 20   ┆EOT        P RB POL100       PPOL120 EQU *     " P SUK A6,DWTWQ GET DWT ADDRESS ┆
0x11ac…11fc              00 5c 01 22 00 10 00 50 50 4f 4c 31 32 35 5c 45 51 55 5c 2a 00 5c 01 48 00 24 00 50 5c 4c 44 5c 41 38 2c 44 57 54 45 43 42 2c 41 36 5c 47 45 54 20 45 43 42 20 41 44 44 52 45 53 53 00 5c 01 5c 00 12 00 50 5c 52 46 28 4e 5a 29 5c 50 4f 4c 31   ┆   "   PPOL125 EQU *   H $ P LD A8,DWTECB,A6 GET ECB ADDRESS       P RF(NZ) POL1┆

Reduced view