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

⟦a85a1b37b⟧

    Length: 23140 (0x5a64)
    Notes: pts_type(SC)
    Names: »C:FUC.SC«

Derivation

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

PTS(SC)

	IDENT C:FUC 	CONPAC REL=1.0 DATE= 80.04.29 
			UPDATE #6 77.11.16 JES 
*************************************************************** 
* 
*	CONCENTRATOR APPLICATION PACKAGE  PEAB-T
* 
*	PROGRAMMER:  PER OMAN / PAN 
* 
* 
*	C : F U C 
* 
* 
*   * 
*   THIS MODULE CONTAINS THE CONCENTRATOR FUNCTIONS HANDLING
* 
* - K:LR  READ MESSAGE FROM TERMINAL LINE 
* 
* - K:LW  WRITE MESSAGE ON TERMINAL LINE
*   * 
* 
* 
*	THE MODULE CONTAINS THE SUBROUTINES:
* 
*	NAME	REVDAT	VERSION 
* 
*	K:LR	77.09.15	1 
*	K:LW	77.09.27	1 
* 
****************************************************************
	EJECT		IDENT C:FUC 
* 
* 
*	ENTRY ADDRESSES 
* 
*************************************************************** 
* 
*		ENTRY	DESCRIPTION
* 
	ENTRY	K:LR	READ TERMINAL LINE
	ENTRY	K:LW	WRITE ON TERMINAL LINE
	EJECT		IDENT C:FUC 
* 
* 
*	EXTERNAL REFERENSES 
* 
*************************************************************** 
* 
*		ADDRESS	IN MODULE
* 
	EXTRN	K:LP	C:BPL 
* 
	EXTRN	K:CONF	C:FIG 
	EXTRN	K:LEND 
	EXTRN	K:LTC
	EXTRN	K:LST
	EXTRN	K:TCST 
	EXTRN	K:REPC 
* 
	EXTRN	K:LINB	C:TCA 
	EXTRN	K:LUTE 
	EXTRN	K:CCZ
	EXTRN	K:OPEN 
	EXTRN	K:CCST 
* 
	EXTRN	K:DPOP	C:FUA 
* 
	EXTRN	K:F346	C:TXT 
	EXTRN	K:F326 
	EXTRN	K:F347 
	EXTRN	K:F390	****	LOOP TXT 
	EXTRN	K:F391	****	LOOP TXT 
* 
	EXTRN	K:ST10	C:SUB 
	EXTRN	K:LD10 
	EXTRN	K:CNT
	EXTRN	K:TIME 
	EJECT		IDENT C:FUC 
* 
*  HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST 
* 
	NLIST
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
	EJECT		IDENT C:EQU **COMMON AREA FRAME** 
* 
*   EXTERNALS 
* 
	EXTRN	T:ADD
	EXTRN	T:ADDC 
	EXTRN	T:SUB
	EXTRN	T:SUBC 
* 
	EXTRN	T:MUL	TOSS-MULDIV
	EXTRN	T:MULC 
	EXTRN	T:DIV
	EXTRN	T:DIVC 
	EJECT		IDENT C:EQU 
* 
*   FORMS FOR FORMAT CODES
* 
EOL	FORM	8=1,8	END OF FORMAT LIST 
EOR	FORM	8=9,8	END OF RECORD
TXT	FORM	8=/10,8	TEXT ELEMENT 
CONTXT	FORM	8=/12,8	TEXT CONSTANT ELEMENT 
IMTXT	FORM	8=/11,8	IMIDEATE TEXT CONSTANT 
ENDSUB	FORM	16=/1700	END OF SUBFORMAT 
COND	FORM	8=/1F,8	CONDITIONAL FORMAT
FILLER	FORM	8,8	FILLER
SPACE	FORM	8=/20,8	SPACE
PICT	FORM	1=1,7,8	PICTURE 
PICREF	FORM	8,8,16	GENERATE FORMS 
BYTE	FORM	8,8 
BCD	FORM	4=0,12 
ASCII	FORM	4=8,12 
ADD	FORM	16=/F6A1,16=T:ADD,8,8
ADDC	FORM	16=/F6A1,16=T:ADDC,8,8
SUB	FORM	16=/F6A1,16=T:SUB,8,8
SUBC	FORM	16=/F6A1,16=T:SUBC,8,8
MUL	FORM	16=/F6A1,16=T:MUL,8,8,8,8
MULC	FORM	16=/F6A1,16=T:MULC,8,8,8,8
DIV	FORM	16=/F6A1,16=T:DIV,8,8,8,8
DIVC	FORM	16=/F6A1,16=T:DIVC,8,8,8,8
	EJECT		IDENT C:EQU 
* 
*   CONSTANT TCA EQUATES
* 
CA1	EQU	/10 
CB1	EQU	/20 
CB10	EQU	/21
CB100	EQU	/22 
CB1000	EQU	/23
CB32K	EQU	/24 
YEAR	EQU	/30
MONTH	EQU	/31 
DAY	EQU	/32 
HOUR	EQU	/40
MIN	EQU	/41 
SEC	EQU	/42 
* 
*   LINE WORKBLOCKS EQUATES 
* 
LIN	EQU	/10	LINE NBR
LINBC	EQU	/11	BUSY COUNTER
LINTC	EQU	/12	TRANS COUNTER 
LINEC	EQU	/13	ERROR COUNTER 
LINHUR	EQU	/14	TIME OF LAST TRANS 
LINMIN	EQU	/15
LINSEC	EQU	/16
* 
*   TC WORKBLOCK EQUATES
* 
TC	EQU	/20
TCBC	EQU	/21
TCTC	EQU	/22
TCEC	EQU	/23
TCHUR	EQU	/24 
TCMIN	EQU	/25 
TCSEC	EQU	/26 
	EJECT		IDENT C:EQU 
* 
*   CC WORKBLOCK RESPONSETIME EQUATES 
* 
CC1	EQU	/30 
CC2	EQU	/31 
CC3	EQU	/32 
CC4	EQU	/33 
CC5	EQU	/34 
CC6	EQU	/35 
CC7	EQU	/36 
CC8	EQU	/37 
CC9	EQU	/38 
CC10	EQU	/39
CC11	EQU	/3A
CC12	EQU	/3B
* 
*   CC WORKBLOCK EQUATES
* 
CCTO	EQU	/40	TIME OUT COUNTER 
CCTC	EQU	/41
CCEC	EQU	/42
CCSUP	EQU	/43	SUPERV MSGS COUNTER 
CCHUR	EQU	/44	TIME OF LAST REPLY
CCMIN	EQU	/45 
CCSEC	EQU	/46 
	EJECT		IDENT C:EQU 
* 
*    NETWORK WORKBLOCK EQUATES
* 
NWTC	EQU	/5D	ACCUMULATED TRANS COUNTER
NWEC	EQU	/5E	ACC ERROR COUNT
* 
PCNT1	EQU	/50	% INTERVALS 
PCNT2	EQU	/51 
PCNT3	EQU	/52 
PCNT4	EQU	/53 
PCNT5	EQU	/54 
PCNT6	EQU	/55 
PCNT7	EQU	/56 
PCNT8	EQU	/57 
PCNT9	EQU	/58 
PCNT10	EQU	/59
PCNT11	EQU	/5A
PCNT12	EQU	/5B
* 
RSPTIM	EQU	/5C	RESPONSE TIME
PCNTW	EQU	/5F	% WORK AREA 1 
PCNTW2	EQU	/6C	%WORK AREA 2 
* 
*  CC TEXT-INTERVAL EQUATES 
* 
IN1	EQU	/60 
IN2	EQU	/61 
IN3	EQU	/62 
IN4	EQU	/63 
IN5	EQU	/64 
IN6	EQU	/65 
IN7	EQU	/66 
IN8	EQU	/67 
IN9	EQU	/68 
IN10	EQU	/69
IN11	EQU	/6A
IN12	EQU	/6B
	EJECT		IDENT C:EQU 
* 
CVTCLK	EQU	/98	ADDRESS TO MONITOR CLOCK 
* 
IDXBL	EQU	-4	INDEX IN CC-BUFFER TO LENGTH 
ORIGIN	EQU	-4	INDEX TO COMMAND ORIGIN INDICATOR IN TCA
INPBL	EQU	-4	INDEX TO INPUT BUFFER LENGTH 
* 
K:EBA	EQU	2	ECB EQUATES 
K:ERL	EQU	4 
K:EEL	EQU	6 
K:ERC	EQU	8 
K:ECW	EQU	10
* 
* 
TCAWBL	EQU	6	INDEX IN TCA TO LINE WB
TCAWBT	EQU	10	INDEX IN TCA TO TC WB 
	EJECT		IDENT C:EQU 
******************************************************* 
* 
*   SYSTEM ADAPTION PARAMETERS
* 
* KEYBOARD KONTROL KEYS 
K:KKEY	EQU	/2F	ENTRY K KEY
K:UKEY	EQU	/28	ENTER U KEY
K:EOR	EQU	/2A	END OF RECORD KEY 
CANCEL	EQU	/23	CANCEL KEY 
* TIME OUT VALUES OF TRUNK LINE 
K:WTIM	EQU	60	CC WRITE REQUEST TIME OUT (X100 MS) 
K:QTIM	EQU	600	CC EXCHANGE REQUEST TIME OUT (X100 MS) 
* BUFFER LENGTHS
K:CCBL	EQU	1150	CCWRITE BUFFER LENGTH (WORDS) 
K:EDBL	EQU	50	EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) 
K:BLTC	EQU	64	LENGTH OF CASSETTE BUFFER (WORDS) 
K:KBL	EQU	70	KB BUF LENGTH IN WORDS 
K:KBBL	EQU	K:KBL+K:KBL	IN CHARS 
K:GPBL	EQU	60	GP BUF LENGTH IN WORDS
K:S0BL	EQU	60	SIMULATED TERMINAL 0 BUF (WORDS)
K:INBL	EQU	1150	TERMINAL LINE INPUT BUF LENGTH (WORDS)
	EJECT
* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION 
K:CCAD	EQU	0	CONCENTRATOR ADDRESS 
			LEFT BYTE = SELECT ADDR. 
			RIGHT BYTE = POLL ADDR.
K:SIMZ	EQU	0	SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES
			AND SYSTEM MESSAGES
K:SIMS	EQU	0	SIM. TERM. FOR SUPERVISORY MESSAGES
K:FCS	EQU	0	DEVICE FILE CODE OF K:SIMS IF USED

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT C:FUC  CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x0034…0056              Head {h00=0x001e, h01=0x0050, text=»   UPDATE #6 77.11.16 JES «, t00=0x0000, t01=0x0038}
0x0056…009e              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0000, t01=0x005a}
0x009e…00a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00a2}
0x00a8…00da              Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE  PEAB-T«, t00=0x0000, t01=0x00ac}
0x00da…00e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00de}
0x00e4…010a              Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER:  PER OMAN / PAN «, t00=0x0000, t01=0x00e8}
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…0132              Head {h00=0x0010, h01=0x0050, text=»* C : F U C «, t00=0x0000, t01=0x0122}
0x0132…013c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0146              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…0154              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0000, t01=0x014a}
0x0154…0198              Head {h00=0x0040, h01=0x0050, text=»*   THIS MODULE CONTAINS THE CONCENTRATOR FUNCTIONS HANDLING«, t00=0x0000, t01=0x0158}
0x0198…01a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01d4              Head {h00=0x002e, h01=0x0050, text=»* - K:LR  READ MESSAGE FROM TERMINAL LINE «, t00=0x0001, t01=0x0016}
0x01d4…01de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0048}
0x01de…020e              Head {h00=0x002c, h01=0x0050, text=»* - K:LW  WRITE MESSAGE ON TERMINAL LINE«, t00=0x0001, t01=0x0052}
0x020e…021c              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x0082}
0x021c…0226              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0090}
0x0226…0230              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009a}
0x0230…025e              Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x00a4}
0x025e…0268              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00d2}
0x0268…0286              Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x00dc}
0x0286…0290              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…02aa              Head {h00=0x0016, h01=0x0050, text=»* K:LR 77.09.15 1 «, t00=0x0001, t01=0x0104}
0x02aa…02c4              Head {h00=0x0016, h01=0x0050, text=»* K:LW 77.09.27 1 «, t00=0x0001, t01=0x011e}
0x02c4…02ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0138}
0x02ce…0316              Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x0142}
0x0316…0332              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUC «, t00=0x0001, t01=0x018a}
0x0332…033c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0016}
0x033c…0346              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0020}
0x0346…0360              Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x002a}
0x0360…036a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0044}
0x036a…03b2              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x004e}
0x03b2…03bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0096}
0x03bc…03d8              Head {h00=0x0018, h01=0x0050, text=»*  ENTRY DESCRIPTION«, t00=0x0002, t01=0x00a0}
0x03d8…03e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00bc}
0x03e2…0408              Head {h00=0x0022, h01=0x0050, text=» ENTRY K:LR READ TERMINAL LINE«, t00=0x0002, t01=0x00c6}
0x0408…0432              Head {h00=0x0026, h01=0x0050, text=» ENTRY K:LW WRITE ON TERMINAL LINE«, t00=0x0002, t01=0x00ec}
0x0432…044e              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUC «, t00=0x0002, t01=0x0116}
0x044e…0458              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x0458…0462              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013c}
0x0462…0480              Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0002, t01=0x0146}
0x0480…048a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0164}
0x048a…04d2              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x016e}
0x04d2…04dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0026}
0x04dc…04f8              Head {h00=0x0018, h01=0x0050, text=»*  ADDRESS IN MODULE«, t00=0x0003, t01=0x0030}
0x04f8…0502              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004c}
0x0502…051c              Head {h00=0x0016, h01=0x0050, text=» EXTRN K:LP C:BPL «, t00=0x0003, t01=0x0056}
0x051c…0526              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…0542              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:CONF C:FIG «, t00=0x0003, t01=0x007a}
0x0542…0558              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LEND «, t00=0x0003, t01=0x0096}
0x0558…056c              Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LTC«, t00=0x0003, t01=0x00ac}
0x056c…0580              Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LST«, t00=0x0003, t01=0x00c0}
0x0580…0596              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TCST «, t00=0x0003, t01=0x00d4}
0x0596…05ac              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:REPC «, t00=0x0003, t01=0x00ea}
0x05ac…05b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0100}
0x05b6…05d2              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:LINB C:TCA «, t00=0x0003, t01=0x010a}
0x05d2…05e8              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LUTE «, t00=0x0003, t01=0x0126}
0x05e8…05fc              Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CCZ«, t00=0x0003, t01=0x013c}
0x05fc…0612              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:OPEN «, t00=0x0003, t01=0x0150}
0x0612…0628              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:CCST «, t00=0x0003, t01=0x0166}
0x0628…0632              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x017c}
0x0632…064e              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:DPOP C:FUA «, t00=0x0003, t01=0x0186}
0x064e…0658              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x0658…0674              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:F346 C:TXT «, t00=0x0004, t01=0x001c}
0x0674…068a              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F326 «, t00=0x0004, t01=0x0038}
0x068a…06a0              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:F347 «, t00=0x0004, t01=0x004e}
0x06a0…06c4              Head {h00=0x0020, h01=0x0050, text=» EXTRN K:F390 **** LOOP TXT «, t00=0x0004, t01=0x0064}
0x06c4…06e8              Head {h00=0x0020, h01=0x0050, text=» EXTRN K:F391 **** LOOP TXT «, t00=0x0004, t01=0x0088}
0x06e8…06f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00ac}
0x06f2…070e              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:ST10 C:SUB «, t00=0x0004, t01=0x00b6}
0x070e…0724              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:LD10 «, t00=0x0004, t01=0x00d2}
0x0724…0738              Head {h00=0x0010, h01=0x0050, text=» EXTRN K:CNT«, t00=0x0004, t01=0x00e8}
0x0738…074e              Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TIME «, t00=0x0004, t01=0x00fc}
0x074e…076a              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUC «, t00=0x0004, t01=0x0112}
0x076a…0774              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012e}
0x0774…07c4              Head {h00=0x004c, h01=0x0050, text=»*  HERE IS THE MODULE 'C:EQU' WITH COMMON EQUATES INCLUDED WITHOUT LIST «, t00=0x0004, t01=0x0138}
0x07c4…07ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0188}
0x07ce…07dc (5, 0, 400)  Head {h00=0x000a, h01=0x0050, text=» NLIST«, t00=0x0005, t01=0x0004}
0x07dc…07e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0012}
0x07e6…07f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001c}
0x07f0…07fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0026}
0x07fa…0804              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0030}
0x0804…080e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003a}
0x080e…0818              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0044}
0x0818…0822              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x004e}
0x0822…082c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0058}
0x082c…0836              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0062}
0x0836…0840              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x006c}
0x0840…084a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0076}
0x084a…0854              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0080}
0x0854…085e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008a}
0x085e…0868              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0094}
0x0868…0872              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x009e}
0x0872…087c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a8}
0x087c…0886              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b2}
0x0886…0890              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00bc}
0x0890…089a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c6}
0x089a…08a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d0}
0x08a4…08ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00da}
0x08ae…08b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e4}
0x08b8…08c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ee}
0x08c2…08cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f8}
0x08cc…08d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0102}
0x08d6…08e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010c}
0x08e0…08ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0116}
0x08ea…08f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0120}
0x08f4…08fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x012a}
0x08fe…0908              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0134}
0x0908…0912              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013e}
0x0912…091c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0148}
0x091c…0926              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0152}
0x0926…0930              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x015c}
0x0930…093a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0166}
0x093a…0944              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0170}
0x0944…094e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x017a}
0x094e…0958              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0184}
0x0958…0962              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x018e}
0x0962…096c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x096c…0976              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0012}
0x0976…0980              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x001c}
0x0980…098a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0026}
0x098a…0994              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0030}
0x0994…099e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003a}
0x099e…09a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0044}
0x09a8…09b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004e}
0x09b2…09bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0058}
0x09bc…09c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0062}
0x09c6…09d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x006c}
0x09d0…09da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0076}
0x09da…09e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0080}
0x09e4…09ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008a}
0x09ee…09f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0094}
0x09f8…0a02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009e}
0x0a02…0a0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a8}
0x0a0c…0a16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b2}
0x0a16…0a20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00bc}
0x0a20…0a2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c6}
0x0a2a…0a34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00d0}
0x0a34…0a3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00da}
0x0a3e…0a48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00e4}
0x0a48…0a52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ee}
0x0a52…0a5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f8}
0x0a5c…0a66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0102}
0x0a66…0a70              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010c}
0x0a70…0a7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0116}
0x0a7a…0a84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0120}
0x0a84…0a8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012a}
0x0a8e…0a98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0134}
0x0a98…0aca              Head {h00=0x002e, h01=0x0050, text=» EJECT  IDENT C:EQU **COMMON AREA FRAME** «, t00=0x0006, t01=0x013e}
0x0aca…0ad4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0170}
0x0ad4…0aea              Head {h00=0x0012, h01=0x0050, text=»*   EXTERNALS «, t00=0x0006, t01=0x017a}
0x0aea…0af4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0190}
0x0af4…0b08              Head {h00=0x0010, h01=0x0050, text=» EXTRN T:ADD«, t00=0x0007, t01=0x000a}
0x0b08…0b1e              Head {h00=0x0012, h01=0x0050, text=» EXTRN T:ADDC «, t00=0x0007, t01=0x001e}
0x0b1e…0b32              Head {h00=0x0010, h01=0x0050, text=» EXTRN T:SUB«, t00=0x0007, t01=0x0034}
0x0b32…0b48              Head {h00=0x0012, h01=0x0050, text=» EXTRN T:SUBC «, t00=0x0007, t01=0x0048}
0x0b48…0b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005e}
0x0b52…0b72              Head {h00=0x001c, h01=0x0050, text=» EXTRN T:MUL TOSS-MULDIV«, t00=0x0007, t01=0x0068}
0x0b72…0b88              Head {h00=0x0012, h01=0x0050, text=» EXTRN T:MULC «, t00=0x0007, t01=0x0088}
0x0b88…0b9c              Head {h00=0x0010, h01=0x0050, text=» EXTRN T:DIV«, t00=0x0007, t01=0x009e}
0x0b9c…0bb2              Head {h00=0x0012, h01=0x0050, text=» EXTRN T:DIVC «, t00=0x0007, t01=0x00b2}
0x0bb2…0bce              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x0007, t01=0x00c8}
0x0bce…0bd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e4}
0x0bd8…0bfa              Head {h00=0x001e, h01=0x0050, text=»*   FORMS FOR FORMAT CODES«, t00=0x0007, t01=0x00ee}
0x0bfa…0c04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0110}
0x0c04…0c2e              Head {h00=0x0026, h01=0x0050, text=»EOL FORM 8=1,8 END OF FORMAT LIST «, t00=0x0007, t01=0x011a}
0x0c2e…0c52              Head {h00=0x0020, h01=0x0050, text=»EOR FORM 8=9,8 END OF RECORD«, t00=0x0007, t01=0x0144}
0x0c52…0c78              Head {h00=0x0022, h01=0x0050, text=»TXT FORM 8=/10,8 TEXT ELEMENT «, t00=0x0007, t01=0x0168}
0x0c78…0caa              Head {h00=0x002e, h01=0x0050, text=»CONTXT FORM 8=/12,8 TEXT CONSTANT ELEMENT «, t00=0x0007, t01=0x018e}
0x0caa…0cdc              Head {h00=0x002e, h01=0x0050, text=»IMTXT FORM 8=/11,8 IMIDEATE TEXT CONSTANT «, t00=0x0008, t01=0x0030}
0x0cdc…0d0a              Head {h00=0x002a, h01=0x0050, text=»ENDSUB FORM 16=/1700 END OF SUBFORMAT «, t00=0x0008, t01=0x0062}
0x0d0a…0d36              Head {h00=0x0028, h01=0x0050, text=»COND FORM 8=/1F,8 CONDITIONAL FORMAT«, t00=0x0008, t01=0x0090}
0x0d36…0d54              Head {h00=0x001a, h01=0x0050, text=»FILLER FORM 8,8 FILLER«, t00=0x0008, t01=0x00bc}
0x0d54…0d74              Head {h00=0x001c, h01=0x0050, text=»SPACE FORM 8=/20,8 SPACE«, t00=0x0008, t01=0x00da}
0x0d74…0d96              Head {h00=0x001e, h01=0x0050, text=»PICT FORM 1=1,7,8 PICTURE «, t00=0x0008, t01=0x00fa}
0x0d96…0dc0              Head {h00=0x0026, h01=0x0050, text=»PICREF FORM 8,8,16 GENERATE FORMS «, t00=0x0008, t01=0x011c}
0x0dc0…0dd6              Head {h00=0x0012, h01=0x0050, text=»BYTE FORM 8,8 «, t00=0x0008, t01=0x0146}
0x0dd6…0dee              Head {h00=0x0014, h01=0x0050, text=»BCD FORM 4=0,12 «, t00=0x0008, t01=0x015c}
0x0dee…0e08              Head {h00=0x0016, h01=0x0050, text=»ASCII FORM 4=8,12 «, t00=0x0008, t01=0x0174}
0x0e08…0e2e              Head {h00=0x0022, h01=0x0050, text=»ADD FORM 16=/F6A1,16=T:ADD,8,8«, t00=0x0008, t01=0x018e}
0x0e2e…0e56              Head {h00=0x0024, h01=0x0050, text=»ADDC FORM 16=/F6A1,16=T:ADDC,8,8«, t00=0x0009, t01=0x0024}
0x0e56…0e7c              Head {h00=0x0022, h01=0x0050, text=»SUB FORM 16=/F6A1,16=T:SUB,8,8«, t00=0x0009, t01=0x004c}
0x0e7c…0ea4              Head {h00=0x0024, h01=0x0050, text=»SUBC FORM 16=/F6A1,16=T:SUBC,8,8«, t00=0x0009, t01=0x0072}
0x0ea4…0ece              Head {h00=0x0026, h01=0x0050, text=»MUL FORM 16=/F6A1,16=T:MUL,8,8,8,8«, t00=0x0009, t01=0x009a}
0x0ece…0efa              Head {h00=0x0028, h01=0x0050, text=»MULC FORM 16=/F6A1,16=T:MULC,8,8,8,8«, t00=0x0009, t01=0x00c4}
0x0efa…0f24              Head {h00=0x0026, h01=0x0050, text=»DIV FORM 16=/F6A1,16=T:DIV,8,8,8,8«, t00=0x0009, t01=0x00f0}
0x0f24…0f50              Head {h00=0x0028, h01=0x0050, text=»DIVC FORM 16=/F6A1,16=T:DIVC,8,8,8,8«, t00=0x0009, t01=0x011a}
0x0f50…0f6c              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x0009, t01=0x0146}
0x0f6c…0f76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0162}
0x0f76…0f96              Head {h00=0x001c, h01=0x0050, text=»*   CONSTANT TCA EQUATES«, t00=0x0009, t01=0x016c}
0x0f96…0fa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018c}
0x0fa0…0fb4              Head {h00=0x0010, h01=0x0050, text=»CA1 EQU /10 «, t00=0x000a, t01=0x0008}
0x0fb4…0fc8              Head {h00=0x0010, h01=0x0050, text=»CB1 EQU /20 «, t00=0x000a, t01=0x001c}
0x0fc8…0fdc              Head {h00=0x0010, h01=0x0050, text=»CB10 EQU /21«, t00=0x000a, t01=0x0030}
0x0fdc…0ff2              Head {h00=0x0012, h01=0x0050, text=»CB100 EQU /22 «, t00=0x000a, t01=0x0044}
0x0ff2…1008              Head {h00=0x0012, h01=0x0050, text=»CB1000 EQU /23«, t00=0x000a, t01=0x005a}
0x1008…101e              Head {h00=0x0012, h01=0x0050, text=»CB32K EQU /24 «, t00=0x000a, t01=0x0070}
0x101e…1032              Head {h00=0x0010, h01=0x0050, text=»YEAR EQU /30«, t00=0x000a, t01=0x0086}
0x1032…1048              Head {h00=0x0012, h01=0x0050, text=»MONTH EQU /31 «, t00=0x000a, t01=0x009a}
0x1048…105c              Head {h00=0x0010, h01=0x0050, text=»DAY EQU /32 «, t00=0x000a, t01=0x00b0}
0x105c…1070              Head {h00=0x0010, h01=0x0050, text=»HOUR EQU /40«, t00=0x000a, t01=0x00c4}
0x1070…1084              Head {h00=0x0010, h01=0x0050, text=»MIN EQU /41 «, t00=0x000a, t01=0x00d8}
0x1084…1098              Head {h00=0x0010, h01=0x0050, text=»SEC EQU /42 «, t00=0x000a, t01=0x00ec}
0x1098…10a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0100}
0x10a2…10c6              Head {h00=0x0020, h01=0x0050, text=»*   LINE WORKBLOCKS EQUATES «, t00=0x000a, t01=0x010a}
0x10c6…10d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x012e}
0x10d0…10ec              Head {h00=0x0018, h01=0x0050, text=»LIN EQU /10 LINE NBR«, t00=0x000a, t01=0x0138}
0x10ec…110e              Head {h00=0x001e, h01=0x0050, text=»LINBC EQU /11 BUSY COUNTER«, t00=0x000a, t01=0x0154}
0x110e…1132              Head {h00=0x0020, h01=0x0050, text=»LINTC EQU /12 TRANS COUNTER «, t00=0x000a, t01=0x0176}
0x1132…1156              Head {h00=0x0020, h01=0x0050, text=»LINEC EQU /13 ERROR COUNTER «, t00=0x000b, t01=0x000a}
0x1156…1180              Head {h00=0x0026, h01=0x0050, text=»LINHUR EQU /14 TIME OF LAST TRANS «, t00=0x000b, t01=0x002e}
0x1180…1196              Head {h00=0x0012, h01=0x0050, text=»LINMIN EQU /15«, t00=0x000b, t01=0x0058}
0x1196…11ac              Head {h00=0x0012, h01=0x0050, text=»LINSEC EQU /16«, t00=0x000b, t01=0x006e}
0x11ac…11b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0084}
0x11b6…11d6              Head {h00=0x001c, h01=0x0050, text=»*   TC WORKBLOCK EQUATES«, t00=0x000b, t01=0x008e}
0x11d6…11e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ae}
0x11e0…11f2              Head {h00=0x000e, h01=0x0050, text=»TC EQU /20«, t00=0x000b, t01=0x00b8}
0x11f2…1206              Head {h00=0x0010, h01=0x0050, text=»TCBC EQU /21«, t00=0x000b, t01=0x00ca}
0x1206…121a              Head {h00=0x0010, h01=0x0050, text=»TCTC EQU /22«, t00=0x000b, t01=0x00de}
0x121a…122e              Head {h00=0x0010, h01=0x0050, text=»TCEC EQU /23«, t00=0x000b, t01=0x00f2}
0x122e…1244              Head {h00=0x0012, h01=0x0050, text=»TCHUR EQU /24 «, t00=0x000b, t01=0x0106}
0x1244…125a              Head {h00=0x0012, h01=0x0050, text=»TCMIN EQU /25 «, t00=0x000b, t01=0x011c}
0x125a…1270              Head {h00=0x0012, h01=0x0050, text=»TCSEC EQU /26 «, t00=0x000b, t01=0x0132}
0x1270…128c              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x000b, t01=0x0148}
0x128c…1296              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0164}
0x1296…12c4              Head {h00=0x002a, h01=0x0050, text=»*   CC WORKBLOCK RESPONSETIME EQUATES «, t00=0x000b, t01=0x016e}
0x12c4…12ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x000c}
0x12ce…12e2              Head {h00=0x0010, h01=0x0050, text=»CC1 EQU /30 «, t00=0x000c, t01=0x0016}
0x12e2…12f6              Head {h00=0x0010, h01=0x0050, text=»CC2 EQU /31 «, t00=0x000c, t01=0x002a}
0x12f6…130a              Head {h00=0x0010, h01=0x0050, text=»CC3 EQU /32 «, t00=0x000c, t01=0x003e}
0x130a…131e              Head {h00=0x0010, h01=0x0050, text=»CC4 EQU /33 «, t00=0x000c, t01=0x0052}
0x131e…1332              Head {h00=0x0010, h01=0x0050, text=»CC5 EQU /34 «, t00=0x000c, t01=0x0066}
0x1332…1346              Head {h00=0x0010, h01=0x0050, text=»CC6 EQU /35 «, t00=0x000c, t01=0x007a}
0x1346…135a              Head {h00=0x0010, h01=0x0050, text=»CC7 EQU /36 «, t00=0x000c, t01=0x008e}
0x135a…136e              Head {h00=0x0010, h01=0x0050, text=»CC8 EQU /37 «, t00=0x000c, t01=0x00a2}
0x136e…1382              Head {h00=0x0010, h01=0x0050, text=»CC9 EQU /38 «, t00=0x000c, t01=0x00b6}
0x1382…1396              Head {h00=0x0010, h01=0x0050, text=»CC10 EQU /39«, t00=0x000c, t01=0x00ca}
0x1396…13aa              Head {h00=0x0010, h01=0x0050, text=»CC11 EQU /3A«, t00=0x000c, t01=0x00de}
0x13aa…13be              Head {h00=0x0010, h01=0x0050, text=»CC12 EQU /3B«, t00=0x000c, t01=0x00f2}
0x13be…13c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0106}
0x13c8…13e8              Head {h00=0x001c, h01=0x0050, text=»*   CC WORKBLOCK EQUATES«, t00=0x000c, t01=0x0110}
0x13e8…13f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0130}
0x13f2…1418              Head {h00=0x0022, h01=0x0050, text=»CCTO EQU /40 TIME OUT COUNTER «, t00=0x000c, t01=0x013a}
0x1418…142c              Head {h00=0x0010, h01=0x0050, text=»CCTC EQU /41«, t00=0x000c, t01=0x0160}
0x142c…1440              Head {h00=0x0010, h01=0x0050, text=»CCEC EQU /42«, t00=0x000c, t01=0x0174}
0x1440…146a              Head {h00=0x0026, h01=0x0050, text=»CCSUP EQU /43 SUPERV MSGS COUNTER «, t00=0x000c, t01=0x0188}
0x146a…1492              Head {h00=0x0024, h01=0x0050, text=»CCHUR EQU /44 TIME OF LAST REPLY«, t00=0x000d, t01=0x0022}
0x1492…14a8              Head {h00=0x0012, h01=0x0050, text=»CCMIN EQU /45 «, t00=0x000d, t01=0x004a}
0x14a8…14be              Head {h00=0x0012, h01=0x0050, text=»CCSEC EQU /46 «, t00=0x000d, t01=0x0060}
0x14be…14da              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x000d, t01=0x0076}
0x14da…14e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0092}
0x14e4…150a              Head {h00=0x0022, h01=0x0050, text=»*    NETWORK WORKBLOCK EQUATES«, t00=0x000d, t01=0x009c}
0x150a…1514              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00c2}
0x1514…1542              Head {h00=0x002a, h01=0x0050, text=»NWTC EQU /5D ACCUMULATED TRANS COUNTER«, t00=0x000d, t01=0x00cc}
0x1542…1566              Head {h00=0x0020, h01=0x0050, text=»NWEC EQU /5E ACC ERROR COUNT«, t00=0x000d, t01=0x00fa}
0x1566…1570              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011e}
0x1570…1592              Head {h00=0x001e, h01=0x0050, text=»PCNT1 EQU /50 % INTERVALS «, t00=0x000d, t01=0x0128}
0x1592…15a8              Head {h00=0x0012, h01=0x0050, text=»PCNT2 EQU /51 «, t00=0x000d, t01=0x014a}
0x15a8…15be              Head {h00=0x0012, h01=0x0050, text=»PCNT3 EQU /52 «, t00=0x000d, t01=0x0160}
0x15be…15d4              Head {h00=0x0012, h01=0x0050, text=»PCNT4 EQU /53 «, t00=0x000d, t01=0x0176}
0x15d4…15ea              Head {h00=0x0012, h01=0x0050, text=»PCNT5 EQU /54 «, t00=0x000d, t01=0x018c}
0x15ea…1600              Head {h00=0x0012, h01=0x0050, text=»PCNT6 EQU /55 «, t00=0x000e, t01=0x0012}
0x1600…1616              Head {h00=0x0012, h01=0x0050, text=»PCNT7 EQU /56 «, t00=0x000e, t01=0x0028}
0x1616…162c              Head {h00=0x0012, h01=0x0050, text=»PCNT8 EQU /57 «, t00=0x000e, t01=0x003e}
0x162c…1642              Head {h00=0x0012, h01=0x0050, text=»PCNT9 EQU /58 «, t00=0x000e, t01=0x0054}
0x1642…1658              Head {h00=0x0012, h01=0x0050, text=»PCNT10 EQU /59«, t00=0x000e, t01=0x006a}
0x1658…166e              Head {h00=0x0012, h01=0x0050, text=»PCNT11 EQU /5A«, t00=0x000e, t01=0x0080}
0x166e…1684              Head {h00=0x0012, h01=0x0050, text=»PCNT12 EQU /5B«, t00=0x000e, t01=0x0096}
0x1684…168e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x168e…16b2              Head {h00=0x0020, h01=0x0050, text=»RSPTIM EQU /5C RESPONSE TIME«, t00=0x000e, t01=0x00b6}
0x16b2…16d6              Head {h00=0x0020, h01=0x0050, text=»PCNTW EQU /5F % WORK AREA 1 «, t00=0x000e, t01=0x00da}
0x16d6…16fa              Head {h00=0x0020, h01=0x0050, text=»PCNTW2 EQU /6C %WORK AREA 2 «, t00=0x000e, t01=0x00fe}
0x16fa…1704              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0122}
0x1704…1728              Head {h00=0x0020, h01=0x0050, text=»*  CC TEXT-INTERVAL EQUATES «, t00=0x000e, t01=0x012c}
0x1728…1732              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0150}
0x1732…1746              Head {h00=0x0010, h01=0x0050, text=»IN1 EQU /60 «, t00=0x000e, t01=0x015a}
0x1746…175a              Head {h00=0x0010, h01=0x0050, text=»IN2 EQU /61 «, t00=0x000e, t01=0x016e}
0x175a…176e              Head {h00=0x0010, h01=0x0050, text=»IN3 EQU /62 «, t00=0x000e, t01=0x0182}
0x176e…1782              Head {h00=0x0010, h01=0x0050, text=»IN4 EQU /63 «, t00=0x000f, t01=0x0008}
0x1782…1796              Head {h00=0x0010, h01=0x0050, text=»IN5 EQU /64 «, t00=0x000f, t01=0x001c}
0x1796…17aa              Head {h00=0x0010, h01=0x0050, text=»IN6 EQU /65 «, t00=0x000f, t01=0x0030}
0x17aa…17be              Head {h00=0x0010, h01=0x0050, text=»IN7 EQU /66 «, t00=0x000f, t01=0x0044}
0x17be…17d2              Head {h00=0x0010, h01=0x0050, text=»IN8 EQU /67 «, t00=0x000f, t01=0x0058}
0x17d2…17e6              Head {h00=0x0010, h01=0x0050, text=»IN9 EQU /68 «, t00=0x000f, t01=0x006c}
0x17e6…17fa              Head {h00=0x0010, h01=0x0050, text=»IN10 EQU /69«, t00=0x000f, t01=0x0080}
0x17fa…180e              Head {h00=0x0010, h01=0x0050, text=»IN11 EQU /6A«, t00=0x000f, t01=0x0094}
0x180e…1822              Head {h00=0x0010, h01=0x0050, text=»IN12 EQU /6B«, t00=0x000f, t01=0x00a8}
0x1822…183e              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x000f, t01=0x00bc}
0x183e…1848              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d8}
0x1848…1878              Head {h00=0x002c, h01=0x0050, text=»CVTCLK EQU /98 ADDRESS TO MONITOR CLOCK «, t00=0x000f, t01=0x00e2}
0x1878…1882              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0112}
0x1882…18b4              Head {h00=0x002e, h01=0x0050, text=»IDXBL EQU -4 INDEX IN CC-BUFFER TO LENGTH «, t00=0x000f, t01=0x011c}
0x18b4…18f2              Head {h00=0x003a, h01=0x0050, text=»ORIGIN EQU -4 INDEX TO COMMAND ORIGIN INDICATOR IN TCA«, t00=0x000f, t01=0x014e}
0x18f2…1924              Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x000f, t01=0x018c}
0x1924…192e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002e}
0x192e…194e              Head {h00=0x001c, h01=0x0050, text=»K:EBA EQU 2 ECB EQUATES «, t00=0x0010, t01=0x0038}
0x194e…1962              Head {h00=0x0010, h01=0x0050, text=»K:ERL EQU 4 «, t00=0x0010, t01=0x0058}
0x1962…1976              Head {h00=0x0010, h01=0x0050, text=»K:EEL EQU 6 «, t00=0x0010, t01=0x006c}
0x1976…198a              Head {h00=0x0010, h01=0x0050, text=»K:ERC EQU 8 «, t00=0x0010, t01=0x0080}
0x198a…199e              Head {h00=0x0010, h01=0x0050, text=»K:ECW EQU 10«, t00=0x0010, t01=0x0094}
0x199e…19a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a8}
0x19a8…19b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b2…19de              Head {h00=0x0028, h01=0x0050, text=»TCAWBL EQU 6 INDEX IN TCA TO LINE WB«, t00=0x0010, t01=0x00bc}
0x19de…1a0a              Head {h00=0x0028, h01=0x0050, text=»TCAWBT EQU 10 INDEX IN TCA TO TC WB «, t00=0x0010, t01=0x00e8}
0x1a0a…1a26              Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:EQU «, t00=0x0010, t01=0x0114}
0x1a26…1a66              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0010, t01=0x0130}
0x1a66…1a70              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0170}
0x1a70…1a96              Head {h00=0x0022, h01=0x0050, text=»*   SYSTEM ADAPTION PARAMETERS«, t00=0x0010, t01=0x017a}
0x1a96…1aa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0010}
0x1aa0…1ac0              Head {h00=0x001c, h01=0x0050, text=»* KEYBOARD KONTROL KEYS «, t00=0x0011, t01=0x001a}
0x1ac0…1ae2              Head {h00=0x001e, h01=0x0050, text=»K:KKEY EQU /2F ENTRY K KEY«, t00=0x0011, t01=0x003a}
0x1ae2…1b04              Head {h00=0x001e, h01=0x0050, text=»K:UKEY EQU /28 ENTER U KEY«, t00=0x0011, t01=0x005c}
0x1b04…1b2c              Head {h00=0x0024, h01=0x0050, text=»K:EOR EQU /2A END OF RECORD KEY «, t00=0x0011, t01=0x007e}
0x1b2c…1b4e              Head {h00=0x001e, h01=0x0050, text=»CANCEL EQU /23 CANCEL KEY «, t00=0x0011, t01=0x00a6}
0x1b4e…1b76              Head {h00=0x0024, h01=0x0050, text=»* TIME OUT VALUES OF TRUNK LINE «, t00=0x0011, t01=0x00c8}
0x1b76…1bb0              Head {h00=0x0036, h01=0x0050, text=»K:WTIM EQU 60 CC WRITE REQUEST TIME OUT (X100 MS) «, t00=0x0011, t01=0x00f0}
0x1bb0…1bee              Head {h00=0x003a, h01=0x0050, text=»K:QTIM EQU 600 CC EXCHANGE REQUEST TIME OUT (X100 MS) «, t00=0x0011, t01=0x012a}
0x1bee…1c06              Head {h00=0x0014, h01=0x0050, text=»* BUFFER LENGTHS«, t00=0x0011, t01=0x0168}
0x1c06…1c3c              Head {h00=0x0032, h01=0x0050, text=»K:CCBL EQU 1150 CCWRITE BUFFER LENGTH (WORDS) «, t00=0x0011, t01=0x0180}
0x1c3c…1c7c              Head {h00=0x003c, h01=0x0050, text=»K:EDBL EQU 50 EDIT BUFFER LENGTH OF POOL K:OPED (WORDS) «, t00=0x0012, t01=0x0026}
0x1c7c…1cb4              Head {h00=0x0034, h01=0x0050, text=»K:BLTC EQU 64 LENGTH OF CASSETTE BUFFER (WORDS) «, t00=0x0012, t01=0x0066}
0x1cb4…1ce0              Head {h00=0x0028, h01=0x0050, text=»K:KBL EQU 70 KB BUF LENGTH IN WORDS «, t00=0x0012, t01=0x009e}
0x1ce0…1d08              Head {h00=0x0024, h01=0x0050, text=»K:KBBL EQU K:KBL+K:KBL IN CHARS «, t00=0x0012, t01=0x00ca}
0x1d08…1d34              Head {h00=0x0028, h01=0x0050, text=»K:GPBL EQU 60 GP BUF LENGTH IN WORDS«, t00=0x0012, t01=0x00f2}
0x1d34…1d6a              Head {h00=0x0032, h01=0x0050, text=»K:S0BL EQU 60 SIMULATED TERMINAL 0 BUF (WORDS)«, t00=0x0012, t01=0x011e}
0x1d6a…1da8              Head {h00=0x003a, h01=0x0050, text=»K:INBL EQU 1150 TERMINAL LINE INPUT BUF LENGTH (WORDS)«, t00=0x0012, t01=0x0154}
0x1da8…1db6 (19, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0004}
0x1db6…1e0a              Head {h00=0x0050, h01=0x0050, text=»* COMMUNICATION ADDRESSES FOR TRUNK LINE. IF SPECIFIED AT SYSTEM GENERATION «, t00=0x0013, t01=0x0012}
0x1e0a…1e34              Head {h00=0x0026, h01=0x0050, text=»K:CCAD EQU 0 CONCENTRATOR ADDRESS «, t00=0x0013, t01=0x0066}
0x1e34…1e58              Head {h00=0x0020, h01=0x0050, text=»   LEFT BYTE = SELECT ADDR. «, t00=0x0013, t01=0x0090}
0x1e58…1e7a              Head {h00=0x001e, h01=0x0050, text=»   RIGHT BYTE = POLL ADDR.«, t00=0x0013, t01=0x00b4}
0x1e7a…1eb6              Head {h00=0x0038, h01=0x0050, text=»K:SIMZ EQU 0 SIM. TERM. FOR COMMANDS/SYSTEM MESSAGES«, t00=0x0013, t01=0x00d6}
0x1eb6…1ed4              Head {h00=0x001a, h01=0x0050, text=»   AND SYSTEM MESSAGES«, t00=0x0013, t01=0x0112}
0x1ed4…1f0c              Head {h00=0x0034, h01=0x0050, text=»K:SIMS EQU 0 SIM. TERM. FOR SUPERVISORY MESSAGES«, t00=0x0013, t01=0x0130}
0x1f0c…1f42              Head {h00=0x0032, h01=0x0050, text=»K:FCS EQU 0 DEVICE FILE CODE OF K:SIMS IF USED«, t00=0x0013, t01=0x0168}
0x1f42…1f46              Head {h00=0x0054, h01=0x0050}
0x1f46…1f4a              Head {h00=0x2a20, h01=0x5349}
0x1f4a…1f90              4d 55 4c 41 54 45 44 20 54 45 52 4d 49 4e 41 4c 20 41 44 44 52 45 53 53 45 53 20 46 4f 52 20 49 4e 51 55 49 52 59 2e 20 52 49 47 48 54 20 42 59 54 45 2e 20 49 46 20 53 50 45 43 49 46 49 45 44 20 41 54 20 53 59                                 ┆MULATED TERMINAL ADDRESSES FOR INQUIRY. RIGHT BYTE. IF SPECIFIED AT SY┆
0x1f90…1fe0              53 54 45 4d 20 47 00 14 00 0e 00 20 00 50 4b 3a 53 41 31 5c 45 51 55 5c 30 5c 53 49 4d 2e 20 54 45 52 4d 2e 20 4e 42 52 20 31 00 14 00 66 00 16 00 50 4b 3a 53 41 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 20 00 14 00 8a 00 16 00 50 4b 3a 53 41   ┆STEM G       PK:SA1 EQU 0 SIM. TERM. NBR 1   f   PK:SA2 EQU 0 NBR 2        PK:SA┆
0x1fe0…2030              33 5c 45 51 55 5c 30 5c 4e 42 52 20 33 20 00 14 00 a4 00 16 00 50 4b 3a 53 41 34 5c 45 51 55 5c 30 5c 4e 42 52 20 34 20 00 14 00 be 00 16 00 50 4b 3a 53 41 35 5c 45 51 55 5c 30 5c 4e 42 52 20 35 20 00 14 00 d8 00 16 00 50 4b 3a 53 41 36 5c   ┆3 EQU 0 NBR 3        PK:SA4 EQU 0 NBR 4        PK:SA5 EQU 0 NBR 5        PK:SA6 ┆
0x2030…2080              45 51 55 5c 30 5c 4e 42 52 20 36 20 00 14 00 f2 00 16 00 50 4b 3a 53 41 37 5c 45 51 55 5c 30 5c 4e 42 52 20 37 20 00 14 01 0c 00 16 00 50 4b 3a 53 41 38 5c 45 51 55 5c 30 5c 4e 42 52 20 38 20 00 14 01 26 00 16 00 50 4b 3a 53 41 39 5c 45 51   ┆EQU 0 NBR 6        PK:SA7 EQU 0 NBR 7        PK:SA8 EQU 0 NBR 8    &   PK:SA9 EQ┆
0x2080…20c6              55 5c 30 5c 4e 42 52 20 39 20 00 14 01 40 00 18 00 50 4b 3a 53 41 31 30 5c 45 51 55 5c 30 5c 4e 42 52 20 31 30 20 00 14 01 5a 00 18 00 50 4b 3a 53 41 31 31 5c 45 51 55 5c 30 5c 4e 42 52 20 31 31 20 00 14 01 76                                 ┆U 0 NBR 9    @   PK:SA10 EQU 0 NBR 10    Z   PK:SA11 EQU 0 NBR 11    v┆
0x20c6…2116 (21, 0, 400) 00 18 00 50 4b 3a 53 41 31 32 5c 45 51 55 5c 30 5c 4e 42 52 20 31 32 20 00 15 00 04 00 18 00 50 4b 3a 53 41 31 33 5c 45 51 55 5c 30 5c 4e 42 52 20 31 33 20 00 15 00 20 00 18 00 50 4b 3a 53 41 31 34 5c 45 51 55 5c 30 5c 4e 42 52 20 31 34 20   ┆   PK:SA12 EQU 0 NBR 12        PK:SA13 EQU 0 NBR 13        PK:SA14 EQU 0 NBR 14 ┆
0x2116…2166              00 15 00 3c 00 18 00 50 4b 3a 53 41 31 35 5c 45 51 55 5c 30 5c 4e 42 52 20 31 35 20 00 15 00 58 00 18 00 50 4b 3a 53 41 31 36 5c 45 51 55 5c 30 5c 4e 42 52 20 31 36 20 00 15 00 74 00 18 00 50 4b 3a 53 41 31 37 5c 45 51 55 5c 30 5c 4e 42 52   ┆   <   PK:SA15 EQU 0 NBR 15    X   PK:SA16 EQU 0 NBR 16    t   PK:SA17 EQU 0 NBR┆
0x2166…21b6              20 31 37 20 00 15 00 90 00 18 00 50 4b 3a 53 41 31 38 5c 45 51 55 5c 30 5c 4e 42 52 20 31 38 20 00 15 00 ac 00 18 00 50 4b 3a 53 41 31 39 5c 45 51 55 5c 30 5c 4e 42 52 20 31 39 20 00 15 00 c8 00 18 00 50 4b 3a 53 41 32 30 5c 45 51 55 5c 30   ┆ 17        PK:SA18 EQU 0 NBR 18        PK:SA19 EQU 0 NBR 19        PK:SA20 EQU 0┆
0x21b6…2206              5c 4e 42 52 20 32 30 20 00 15 00 e4 00 18 00 50 4b 3a 53 41 32 31 5c 45 51 55 5c 30 5c 4e 42 52 20 32 31 20 00 15 01 00 00 18 00 50 4b 3a 53 41 32 32 5c 45 51 55 5c 30 5c 4e 42 52 20 32 32 20 00 15 01 1c 00 18 00 50 4b 3a 53 41 32 33 5c 45   ┆ NBR 20        PK:SA21 EQU 0 NBR 21        PK:SA22 EQU 0 NBR 22        PK:SA23 E┆
0x2206…2256              51 55 5c 30 5c 4e 42 52 20 32 33 20 00 15 01 38 00 18 00 50 4b 3a 53 41 32 34 5c 45 51 55 5c 30 5c 4e 42 52 20 32 34 20 00 15 01 54 00 18 00 50 4b 3a 53 41 32 35 5c 45 51 55 5c 30 5c 4e 42 52 20 32 35 20 00 15 01 70 00 18 00 50 4b 3a 53 41   ┆QU 0 NBR 23    8   PK:SA24 EQU 0 NBR 24    T   PK:SA25 EQU 0 NBR 25    p   PK:SA┆
0x2256…22a6 (22, 0, 400) 32 36 5c 45 51 55 5c 30 5c 4e 42 52 20 32 36 20 00 15 01 8c 00 0a 00 50 5c 45 4a 45 43 54 00 16 00 18 00 3c 00 50 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   ┆26 EQU 0 NBR 26        P EJECT     < P******************************************┆
0x22a6…22f6              2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 16 00 26 00 06 00 50 2a 20 00 16 00 66 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 16 00 70 00 28 00 50   ┆*************    &   P*    f , P*   PARAMETERS FOR CONDITIONAL ASSEMBLY    p ( P┆
0x22f6…2346              2a 20 20 20 4f 46 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 50 41 43 4b 41 47 45 20 4d 4f 44 55 4c 45 53 20 00 16 00 a0 00 06 00 50 2a 20 00 16 00 cc 00 3c 00 50 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   ┆*   OF CONCENTRATOR PACKAGE MODULES        P*      < P**************************┆
0x2346…2396              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 20 00 16 00 d6 00 1c 00 50 58 3a 41 5c 45 51 55 5c 32 5c 2a 20 20 4e 4c 49 4e 45 20 3c 3d 31 30 20 00 16 01 16 00 20 00 50 5c 5c 5c 4e 55 4d 42 45 52 20   ┆*****************************        PX:A EQU 2 *  NLINE <=10        P   NUMBER ┆
0x2396…23e6              4f 46 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 16 01 36 00 1a 00 50 58 3a 42 5c 45 51 55 5c 31 35 5c 2a 20 20 4e 54 43 20 3c 3d 38 30 00 16 01 5a 00 2e 00 50 5c 5c 5c 54 4f 54 41 4c 20 4e 55 4d 42 45 52 20 4f 46 20 54 43 3a 53 20   ┆OF TERMINAL LINES    6   PX:B EQU 15 *  NTC <=80   Z . P   TOTAL NUMBER OF TC:S ┆
0x23e6…2436 (23, 0, 400) 4f 4e 20 54 45 52 4d 49 4e 41 4c 20 4c 49 4e 45 53 20 00 16 01 78 00 1c 00 50 58 3a 43 5c 45 51 55 5c 32 36 5c 2a 20 20 4e 53 49 4d 20 3c 3d 32 36 20 00 17 00 1a 00 24 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 53 49 4d 55 4c 41 54 45 44   ┆ON TERMINAL LINES    x   PX:C EQU 26 *  NSIM <=26      $ P   NUMBER OF SIMULATED┆
0x2436…2486              20 54 45 52 4d 49 4e 41 4c 53 00 17 00 3a 00 14 00 50 5c 5c 5c 46 4f 52 20 49 4e 51 55 49 52 49 45 53 00 17 00 62 00 16 00 50 58 3a 44 5c 45 51 55 5c 30 5c 2a 20 20 4c 4f 4f 50 20 00 17 00 7a 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4d   ┆ TERMINALS   :   P   FOR INQUIRIES   b   PX:D EQU 0 *  LOOP    z . P   IF = 0. M┆
0x2486…24d6              55 4c 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 2e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 17 00 94 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20   ┆ULTIPOINT CONFIG. DOWNSTREAMS      . P   IF = 1. LOOP CONFIGURATION DOWNSTREAMS ┆
0x24d6…2526              00 17 00 c6 00 1c 00 50 58 3a 45 5c 45 51 55 5c 34 5c 2a 20 20 4e 53 50 4f 4f 4c 20 3c 3d 34 20 00 17 00 f8 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 45 44 49 54 20 42 55 46 46 45 52 53 20 46 4f 52 20 53 50 4f 4f 4c 20 00 17 01 18   ┆       PX:E EQU 4 *  NSPOOL <=4      ( P   NUMBER OF EDIT BUFFERS FOR SPOOL     ┆
0x2526…2576              00 22 00 50 5c 5c 5c 46 55 4e 43 54 49 4f 4e 20 54 4f 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 2e 00 17 01 44 00 20 00 50 58 3a 46 5c 45 51 55 5c 34 5c 2a 20 20 30 3c 20 4e 54 50 4c 49 4e 20 3c 3d 34 30 20 00 17 01 6a 00 28 00 50 5c 5c   ┆ " P   FUNCTION TO OPERATORS TERM.   D   PX:F EQU 4 *  0< NTPLIN <=40    j ( P  ┆
0x2576…25c6 (24, 0, 400) 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 49 4e 20 50 4f 4f 4c 20 27 54 50 4c 49 4e 27 20 00 17 01 8e 00 26 00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 46 52 4f 4d 20 54 43 3a 53 00 18 00 2a   ┆ NUMBER OF TRASKS IN POOL 'TPLIN'      & P   HANDLING TRANSACTIONS FROM TC:S   *┆
0x25c6…2616              00 1e 00 50 58 3a 47 5c 45 51 55 5c 32 5c 2a 20 20 30 3c 20 4e 54 50 53 55 50 20 3c 3d 35 00 18 00 54 00 28 00 50 5c 5c 5c 4e 55 4d 42 45 52 20 4f 46 20 54 52 41 53 4b 53 20 49 4e 20 50 4f 4f 4c 20 27 54 50 53 55 50 27 20 00 18 00 76 00 2c   ┆   PX:G EQU 2 *  0< NTPSUP <=5   T ( P   NUMBER OF TRASKS IN POOL 'TPSUP'    v ,┆
0x2616…2666              00 50 5c 5c 5c 48 41 4e 44 4c 49 4e 47 20 54 52 41 4e 53 41 43 54 49 4f 4e 53 20 46 52 4f 4d 20 4d 41 49 4e 20 46 52 41 4d 45 00 18 00 a2 00 1c 00 50 5c 5c 5c 4f 52 20 4f 50 45 52 41 54 4f 52 53 20 54 45 52 4d 49 4e 41 4c 00 18 00 d2 00 18   ┆ P   HANDLING TRANSACTIONS FROM MAIN FRAME       P   OR OPERATORS TERMINAL      ┆
0x2666…26b6              00 50 58 3a 48 5c 45 51 55 5c 31 5c 2a 20 20 4c 49 4e 54 53 54 20 00 18 00 f2 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e 20 4e 4f 20 4c 49 4e 45 20 54 45 53 54 20 43 4f 4d 4d 41 4e 44 20 00 18 01 0e 00 30 00 50 5c 5c 5c 49 46 20 3d 20 31 2e   ┆ PX:H EQU 1 *  LINTST      $ P   IF = 0. NO LINE TEST COMMAND      0 P   IF = 1.┆
0x26b6…2706              20 4c 49 4e 45 20 54 45 53 54 20 46 41 43 49 4c 49 54 59 20 28 34 2d 57 49 52 45 20 4f 4e 4c 59 29 20 00 18 01 36 00 18 00 50 58 3a 49 5c 45 51 55 5c 32 5c 2a 20 20 4f 4e 4c 49 4e 45 20 00 18 01 6a 00 24 00 50 5c 5c 5c 49 46 20 3d 20 30 2e   ┆ LINE TEST FACILITY (4-WIRE ONLY)    6   PX:I EQU 2 *  ONLINE    j $ P   IF = 0.┆
0x2706…2756 (25, 0, 400) 20 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 18 01 86 00 28 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4f 4e 2f 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 19 00 1e 00 24 00 50 5c 5c 5c 49 46 20   ┆ OFF LINE CONCENTRATOR     ( P   IF = 1. ON/OFF LINE CONCENTRATOR      $ P   IF ┆
0x2756…27a6              3d 20 32 2e 20 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 00 19 00 4a 00 18 00 50 58 3a 4b 5c 45 51 55 5c 31 5c 2a 20 20 53 45 54 41 44 52 20 00 19 00 72 00 06 00 50 2a 20 00 19 00 8e 00 06 00 50 2a 20 00 19 00 98 00 06   ┆= 2. ON LINE CONCENTRATOR    J   PX:K EQU 1 *  SETADR    r   P*        P*       ┆
0x27a6…27f6              00 50 2a 20 00 19 00 a2 00 06 00 50 2a 20 00 19 00 ac 00 06 00 50 2a 20 00 19 00 b6 00 06 00 50 2a 20 00 19 00 c0 00 06 00 50 2a 20 00 19 00 ca 00 0a 00 50 5c 4c 49 53 54 20 00 19 00 d4 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20   ┆ P*        P*        P*        P*        P*        P LIST        P EJECT  IDENT ┆
0x27f6…2846              43 3a 46 55 43 20 00 19 00 e2 00 06 00 50 2a 20 00 19 00 fe 00 06 00 50 2a 20 00 19 01 08 00 2c 00 50 2a 20 20 20 50 41 52 41 4d 45 54 45 52 53 20 46 4f 52 20 43 4f 4e 44 49 54 49 4f 4e 41 4c 20 41 53 53 45 4d 42 4c 59 20 00 19 01 12 00 22   ┆C:FUC        P*        P*      , P*   PARAMETERS FOR CONDITIONAL ASSEMBLY      "┆
0x2846…2896              00 50 2a 20 20 20 53 50 45 43 49 46 49 45 44 20 49 4e 20 4d 4f 44 55 4c 45 20 43 3a 45 51 55 20 00 19 01 42 00 06 00 50 2a 20 00 19 01 68 00 40 00 50 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   ┆ P*   SPECIFIED IN MODULE C:EQU    B   P*    h @ P******************************┆
0x2896…28e6 (26, 0, 398) 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 00 19 01 72 00 3e 00 50 4c 4f 4f 50 5c 45 51 55 5c 58 3a 44 5c 49 46 20 3d 20 30 2e 20 4d 55 4c 54 49 50 4f 49 4e 54 20 43 4f 4e 46 49 47 55 52 41 54   ┆******************************   r > PLOOP EQU X:D IF = 0. MULTIPOINT CONFIGURAT┆
0x28e6…2936              49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 1a 00 26 00 2e 00 50 5c 5c 5c 49 46 20 3d 20 31 2e 20 4c 4f 4f 50 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 44 4f 57 4e 53 54 52 45 41 4d 53 20 00 1a 00 68 00 2e 00 50 4f 4e 4c 49 4e 45   ┆ION DOWNSTREAMS    & . P   IF = 1. LOOP CONFIGURATION DOWNSTREAMS    h . PONLINE┆
0x2936…2986              5c 45 51 55 5c 58 3a 49 5c 49 46 3d 30 2e 20 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 1a 00 9a 00 24 00 50 5c 5c 5c 49 46 3d 31 2e 4f 4e 2f 4f 46 46 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 1a 00 cc   ┆ EQU X:I IF=0. OFF LINE CONCENTRATOR     $ P   IF=1.ON/OFF LINE CONCENTRATOR    ┆
0x2986…29d6              00 20 00 50 5c 5c 5c 49 46 3d 32 2e 4f 4e 20 4c 49 4e 45 20 43 4f 4e 43 45 4e 54 52 41 54 4f 52 00 1a 00 f4 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 1a 01 18 00 46 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆   P   IF=2.ON LINE CONCENTRATOR       P EJECT  IDENT C:FUC      F P************┆
0x29d6…2a24              2a 2a 2a 2a 2a 2a 2a 20 4b 20 3a 20 4c 20 52 20 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 20 00 1a 01 34 00 06 00 50 2a 20 00 1a 01 7e 00 06 00 50 2a 20 00 1a 01 88         ┆******* K : L R *************************************    4   P*    ~   P*     ┆
0x2a24…2a74 (27, 0, 400) 00 06 00 50 2a 20 00 1b 00 04 00 18 00 50 2a 53 55 42 52 4f 55 54 49 4e 45 20 20 4b 20 3a 20 4c 20 52 00 1b 00 0e 00 36 00 50 2a 43 4f 4e 43 45 4e 54 52 41 54 4f 52 20 46 55 4e 43 54 49 4f 4e 20 52 45 41 44 49 4e 47 20 54 48 45 20 54 45 52   ┆   P*        P*SUBROUTINE  K : L R     6 P*CONCENTRATOR FUNCTION READING THE TER┆
0x2a74…2ac4              4d 49 4e 41 4c 20 4c 49 4e 45 53 2e 00 1b 00 2a 00 06 00 50 2a 20 00 1b 00 64 00 06 00 50 2a 20 00 1b 00 6e 00 06 00 50 2a 20 00 1b 00 78 00 22 00 50 2a 20 43 41 4c 4c 20 53 45 51 55 45 4e 43 45 3a 5c 43 46 20 20 20 41 31 34 2c 4b 3a 4c 52   ┆MINAL LINES.   *   P*    d   P*    n   P*    x " P* CALL SEQUENCE: CF   A14,K:LR┆
0x2ac4…2b14              00 1b 00 82 00 06 00 50 2a 20 00 1b 00 a8 00 26 00 50 2a 20 20 20 45 4e 54 52 59 20 50 41 52 41 4d 3a 5c 41 31 33 20 3d 20 54 43 41 20 50 4f 49 4e 54 45 52 00 1b 00 b2 00 06 00 50 2a 20 00 1b 00 dc 00 24 00 50 2a 20 20 20 53 55 42 52 4f 55   ┆       P*      & P*   ENTRY PARAM: A13 = TCA POINTER       P*      $ P*   SUBROU┆
0x2b14…2b64              54 49 4e 45 53 3a 5c 4b 3a 44 50 4f 50 20 49 4e 20 43 3a 46 55 41 00 1b 00 e6 00 16 00 50 2a 5c 5c 4b 3a 43 4e 54 20 49 4e 20 43 3a 53 55 42 20 00 1b 01 0e 00 06 00 50 2a 20 00 1b 01 28 00 3a 00 50 2a 20 20 52 45 54 55 52 4e 20 50 41 52 41   ┆TINES: K:DPOP IN C:FUA       P*  K:CNT IN C:SUB        P*    ( : P*  RETURN PARA┆
0x2b64…2bb4              4d 3a 5c 4b 3a 4c 49 4e 42 20 43 4f 4e 54 41 49 4e 53 20 41 20 4d 45 53 53 41 47 45 20 57 49 54 48 20 4c 45 4e 47 54 48 00 1b 01 32 00 2a 00 50 2a 5c 5c 49 4e 20 4b 3a 4c 49 4e 42 2d 34 20 41 4e 44 20 54 43 20 41 4e 44 20 4c 49 4e 45 20 41   ┆M: K:LINB CONTAINS A MESSAGE WITH LENGTH   2 * P*  IN K:LINB-4 AND TC AND LINE A┆
0x2bb4…2c04 (28, 0, 400) 44 44 52 45 53 53 00 1b 01 70 00 14 00 50 2a 5c 5c 49 4e 20 4b 3a 4c 49 4e 42 2d 32 2e 20 00 1c 00 0e 00 1e 00 50 2a 5c 5c 4b 3a 57 42 4c 20 49 53 20 46 49 4c 4c 45 44 20 49 4e 20 54 43 41 20 00 1c 00 26 00 1e 00 50 2a 5c 5c 4b 3a 57 42 54   ┆DDRESS   p   P*  IN K:LINB-2.        P*  K:WBL IS FILLED IN TCA    &   P*  K:WBT┆
0x2c04…2c54              43 20 20 22 20 20 20 22 20 20 20 20 22 20 20 20 22 20 00 1c 00 48 00 06 00 50 2a 20 00 1c 00 6a 00 1c 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 56 49 41 20 41 31 34 00 1c 00 74 00 06 00 50 2a 20 00 1c 00 94 00 1a 00 50 2a 20   ┆C  "   "    "   "    H   P*    j   P*  RETURN METOD: VIA A14   t   P*        P* ┆
0x2c54…2ca4              20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 4e 4f 4e 45 20 00 1c 00 9e 00 06 00 50 2a 20 00 1c 00 bc 00 1e 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 32 20 57 4f 52 44 53 20 00 1c 00 c6 00 06 00 50 2a 20 00 1c 00 e8 00 16   ┆ CHANGED REGS: NONE        P*        P*  STACKER NEED: 12 WORDS        P*       ┆
0x2ca4…2cf4              00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 1c 00 f2 00 06 00 50 2a 20 00 1c 01 0c 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 54 52 41 53 4b 00 1c 01 16 00 06 00 50 2a 20 00 1c 01 34 00 06 00 50 2a 20   ┆ P*   LIMITATIONS:         P*        P*  CALLING TASK: TRASK       P*    4   P* ┆
0x2cf4…2d44              00 1c 01 3e 00 44 00 50 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 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1c 01 48 00 18 00 50   ┆   > D P***************************************************************    H   P┆
0x2d44…2d94 (29, 0, 398) 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 1c 01 90 00 06 00 50 2a 20 00 1d 00 1c 00 06 00 50 2a 20 00 1d 00 26 00 26 00 50 2a 20 20 20 47 45 54 20 4c 49 4e 45 20 52 45 41 44 20 45 43 42 20 41 4e 44 20 46 49 4c 4c 20 49   ┆ EJECT  IDENT C:FUC        P*        P*    & & P*   GET LINE READ ECB AND FILL I┆
0x2d94…2de4              54 20 00 1d 00 30 00 06 00 50 2a 20 00 1d 00 5a 00 06 00 50 2a 20 00 1d 00 64 00 0e 00 50 4b 3a 4c 52 5c 45 51 55 5c 2a 00 1d 00 6e 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 53 54 31 30 5c 53 41 56 45 20 31 30 20 52 45 47 53 20 00 1d 00 80   ┆T    0   P*    Z   P*    d   PK:LR EQU *   n   P CF A14,K:ST10 SAVE 10 REGS     ┆
0x2de4…2e34              00 0e 00 50 4c 52 31 30 5c 45 51 55 5c 2a 00 1d 00 a4 00 0e 00 50 5c 4c 44 4b 5c 41 37 2c 31 20 00 1d 00 b6 00 08 00 50 5c 4c 4b 4d 00 1d 00 c8 00 1e 00 50 5c 44 41 54 41 5c 2d 37 2c 4b 3a 4c 50 5c 47 45 54 20 4c 49 4e 45 20 45 43 42 00 1d   ┆   PLR10 EQU *       P LDK A7,1        P LKM       P DATA -7,K:LP GET LINE ECB  ┆
0x2e34…2e84              00 d4 00 10 00 50 5c 4c 44 52 5c 41 37 2c 41 31 33 20 00 1d 00 f6 00 38 00 50 5c 41 44 4b 4c 5c 41 37 2c 4b 3a 4c 49 4e 42 2d 32 5c 43 4f 4d 50 45 4e 53 41 54 45 20 46 4f 52 20 44 52 49 56 45 52 20 43 4f 4e 54 52 4f 4c 20 57 4f 52 44 00 1d   ┆     P LDR A7,A13      8 P ADKL A7,K:LINB-2 COMPENSATE FOR DRIVER CONTROL WORD  ┆
0x2e84…2ed2              01 0a 00 22 00 50 5c 53 54 5c 41 37 2c 4b 3a 45 42 41 2c 41 38 5c 42 55 46 46 45 52 20 41 44 44 52 45 53 53 00 1d 01 46 00 14 00 50 5c 4c 44 4b 4c 5c 41 37 2c 4b 3a 49 4e 42 4c 20 00 1d 01 6c 00 0e 00 50 5c 41 44 52 5c 41 37 2c 41 37         ┆   " P ST A7,K:EBA,A8 BUFFER ADDRESS   F   P LDKL A7,K:INBL    l   P ADR A7,A7┆
0x2ed2…2ee0 (30, 0, 400) 00 1d 01 84 00 1e 00 50 5c 53 54 5c 41 37                                                                                                                                                                                                         ┆       P ST A7┆
0x2ee0…2f30              2c 4b 3a 45 52 4c 2c 41 38 5c 4d 41 58 20 4c 45 4e 47 54 48 00 1e 00 08 00 06 00 50 2a 20 00 1e 00 2a 00 22 00 50 2a 20 20 20 43 41 4c 43 55 4c 41 54 45 20 4c 49 4e 45 20 57 42 20 41 44 44 52 45 53 53 20 00 1e 00 34 00 06 00 50 2a 20 00 1e   ┆,K:ERL,A8 MAX LENGTH       P*    * " P*   CALCULATE LINE WB ADDRESS    4   P*   ┆
0x2f30…2f4a              00 5a 00 10 00 50 5c 4c 44 52 2a 5c 41 31 2c 41 38 20 00 1e 00 64 00 10 00 50                                                                                                                                                                     ┆ Z   P LDR* A1,A8    d   P┆
0x2f4a…4a64              […elided…]
0x4a64…4ab0              20 20 20 20 20 20 20 2f 30 30 30 34 20 43 4f 44 45 20 43 48 45 43 4b 20 45 52 52 4f 52 20 00 2f 00 f2 00 2e 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 30 30 31 30 20 4c 49 4e 45 20 43 4c               ┆       /0004 CODE CHECK ERROR  /   . P*                        /0010 LINE CL┆
0x4ab0…4af0              4f 53 45 44 00 2f 01 2a 00 2e 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 30 30 32 30 20 54 43 20 49 4e 41 43 54 49 56 45 00 2f 01 5c 00 36 00 50 2a 20                                                   ┆OSED / * . P*                        /0020 TC INACTIVE /   6 P* ┆
0x4af0…4b40 (48, 0, 400) 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2f 30 30 34 30 20 54 43 20 4e 4f 54 20 49 4e 20 50 4f 4c 4c 20 4c 49 53 54 00 2f 01 8e 00 2a 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                       /0040 TC NOT IN POLL LIST /   * P*                       ┆
0x4b40…4b90              20 2f 38 30 30 30 20 54 43 20 42 55 53 59 00 30 00 38 00 1e 00 50 2a 5c 5c 41 38 20 3d 20 57 52 49 54 45 20 45 43 42 20 41 44 44 52 45 53 53 20 00 30 00 66 00 12 00 50 2a 5c 5c 43 4e 44 20 49 53 20 53 45 54 20 00 30 00 88 00 06 00 50 2a 20   ┆ /8000 TC BUSY 0 8   P*  A8 = WRITE ECB ADDRESS  0 f   P*  CND IS SET  0     P* ┆
0x4b90…4be0              00 30 00 9e 00 1c 00 50 2a 20 20 52 45 54 55 52 4e 20 4d 45 54 4f 44 3a 5c 44 49 52 45 43 54 20 00 30 00 a8 00 06 00 50 2a 20 00 30 00 c8 00 1a 00 50 2a 20 20 43 48 41 4e 47 45 44 20 52 45 47 53 3a 5c 41 31 2c 41 38 00 30 00 d2 00 06 00 50   ┆ 0     P*  RETURN METOD: DIRECT  0     P*  0     P*  CHANGED REGS: A1,A8 0     P┆
0x4be0…4c30              2a 20 00 30 00 f0 00 1e 00 50 2a 20 20 53 54 41 43 4b 45 52 20 4e 45 45 44 3a 5c 31 33 20 57 4f 52 44 53 20 00 30 00 fa 00 06 00 50 2a 20 00 30 01 1c 00 16 00 50 2a 20 20 20 4c 49 4d 49 54 41 54 49 4f 4e 53 3a 5c 20 00 30 01 26 00 06 00 50   ┆*  0     P*  STACKER NEED: 13 WORDS  0     P*  0     P*   LIMITATIONS:   0 &   P┆
0x4c30…4c80              2a 20 00 30 01 40 00 1a 00 50 2a 20 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 3a 5c 54 52 41 53 4b 00 30 01 4a 00 06 00 50 2a 20 00 30 01 68 00 44 00 50 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   ┆*  0 @   P*  CALLING TASK: TRASK 0 J   P*  0 h D P******************************┆
0x4c80…4cd0 (49, 0, 400) 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 20 00 30 01 72 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 31 00 2a 00 06 00 50 2a 20 00 31 00 46 00 1a 00 50   ┆*********************************  0 r   P EJECT  IDENT C:FUC  1 *   P*  1 F   P┆
0x4cd0…4d20              2a 20 20 20 50 52 45 50 41 52 45 20 4f 55 54 50 55 54 20 45 43 42 00 31 00 50 00 06 00 50 2a 20 00 31 00 6e 00 0e 00 50 4b 3a 4c 57 5c 45 51 55 5c 2a 00 31 00 78 00 10 00 50 5c 4c 44 5c 41 31 2c 2d 32 2c 41 32 00 31 00 8a 00 28 00 50 5c 53   ┆*   PREPARE OUTPUT ECB 1 P   P*  1 n   PK:LW EQU * 1 x   P LD A1,-2,A2 1   ( P S┆
0x4d20…4d70              54 52 5c 41 31 2c 41 31 34 5c 53 41 56 45 20 4c 49 4e 54 20 41 4e 44 20 54 43 20 41 44 44 52 45 53 53 00 31 00 9e 00 10 00 50 5c 53 55 4b 4c 5c 41 31 34 2c 32 20 00 31 00 ca 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 53 54 31 30 5c 53 41 56   ┆TR A1,A14 SAVE LINT AND TC ADDRESS 1     P SUKL A14,2  1     P CF A14,K:ST10 SAV┆
0x4d70…4dc0              45 20 31 30 20 52 45 47 53 20 00 31 00 de 00 14 00 50 5c 4c 44 4b 4c 5c 41 38 2c 4b 3a 4c 55 54 45 20 00 31 01 02 00 1c 00 50 5c 41 44 52 5c 41 38 2c 41 31 33 5c 45 43 42 20 41 44 44 52 45 53 53 20 00 31 01 1a 00 0e 00 50 5c 4c 44 52 5c 41   ┆E 10 REGS  1     P LDKL A8,K:LUTE  1     P ADR A8,A13 ECB ADDRESS  1     P LDR A┆
0x4dc0…4e10              31 2c 41 32 00 31 01 3a 00 2a 00 50 5c 53 55 4b 5c 41 31 2c 32 5c 52 45 53 45 52 56 45 20 44 52 49 56 45 52 20 43 4f 4e 54 52 4f 4c 20 57 4f 52 44 20 00 31 01 4c 00 22 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 42 41 2c 41 38 5c 42 55 46 46 45 52   ┆1,A2 1 : * P SUK A1,2 RESERVE DRIVER CONTROL WORD  1 L " P ST A1,K:EBA,A8 BUFFER┆
0x4e10…4e60 (50, 0, 400) 20 41 44 44 52 45 53 53 00 31 01 7a 00 10 00 50 5c 4c 44 5c 41 31 2c 2d 34 2c 41 32 00 32 00 10 00 22 00 50 5c 41 44 4b 5c 41 31 2c 32 5c 44 52 49 56 45 52 20 43 4f 4e 54 52 4f 4c 20 57 4f 52 44 20 00 32 00 24 00 1a 00 50 5c 53 54 5c 41 31   ┆ ADDRESS 1 z   P LD A1,-4,A2 2   " P ADK A1,2 DRIVER CONTROL WORD  2 $   P ST A1┆
0x4e60…4eb0              2c 4b 3a 45 52 4c 2c 41 38 5c 4c 45 4e 47 54 48 00 32 00 4a 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 32 00 68 00 10 00 50 5c 4c 43 5c 41 31 2c 2d 31 2c 41 32 00 32 00 7a 00 0e 00 50 5c 41 44 52 5c 41 31 2c 41 31 00 32 00 8e 00 10 00 50   ┆,K:ERL,A8 LENGTH 2 J   P LDK A1,0  2 h   P LC A1,-1,A2 2 z   P ADR A1,A1 2     P┆
0x4eb0…4f00              5c 41 44 4b 5c 41 31 2c 2f 37 46 20 00 32 00 a0 00 18 00 50 5c 53 54 52 5c 41 31 2c 41 38 5c 46 49 4c 45 20 43 4f 44 45 00 32 00 b4 00 22 00 50 5c 4c 44 5c 41 33 2c 2d 32 2c 41 32 5c 53 41 56 45 20 4c 49 4e 45 20 41 4e 44 20 54 43 20 00 32   ┆ ADK A1,/7F  2     P STR A1,A8 FILE CODE 2   " P LD A3,-2,A2 SAVE LINE AND TC  2┆
0x4f00…4f50              00 d0 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 32 00 f6 00 06 00 50 2a 20 00 32 01 12 00 16 00 50 2a 20 20 20 57 52 49 54 45 20 52 45 51 55 45 53 54 20 00 32 01 1c 00 06 00 50 2a 20 00 32 01 36 00 1c 00 50   ┆     P EJECT  IDENT C:FUC  2     P*  2     P*   WRITE REQUEST  2     P*  2 6   P┆
0x4f50…4fa0              5c 4c 44 4b 5c 41 37 2c 2f 38 36 5c 4f 52 44 45 52 3a 20 57 52 49 54 45 00 32 01 40 00 08 00 50 5c 4c 4b 4d 00 32 01 60 00 0c 00 50 5c 44 41 54 41 5c 31 20 00 32 01 6c 00 24 00 50 5c 53 54 5c 41 33 2c 2d 32 2c 41 32 5c 52 45 53 54 4f 52 45   ┆ LDK A7,/86 ORDER: WRITE 2 @   P LKM 2 `   P DATA 1  2 l $ P ST A3,-2,A2 RESTORE┆
0x4fa0…4ff0 (51, 0, 400) 20 4c 49 4e 45 20 41 4e 44 20 54 43 00 32 01 7c 00 06 00 50 2a 20 00 33 00 14 00 1c 00 50 2a 20 20 20 41 4e 41 4c 59 53 45 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 33 00 1e 00 20 00 50 2a 5c 42 49 54 20 31 35 20 4d 4f 44 45 4d 20 4e 4f 54   ┆ LINE AND TC 2 |   P*  3     P*   ANALYSE RETURN CODE  3     P* BIT 15 MODEM NOT┆
0x4ff0…5040              20 4f 50 45 52 41 42 4c 45 20 00 33 00 3e 00 1e 00 50 2a 5c 42 49 54 20 31 33 20 43 4f 44 45 20 43 48 45 43 4b 20 45 52 52 4f 52 20 00 33 00 62 00 18 00 50 2a 5c 42 49 54 20 31 31 20 4c 49 4e 45 20 43 4c 4f 53 45 44 00 33 00 84 00 18 00 50   ┆ OPERABLE  3 >   P* BIT 13 CODE CHECK ERROR  3 b   P* BIT 11 LINE CLOSED 3     P┆
0x5040…5090              2a 5c 42 49 54 20 31 30 20 54 43 20 49 4e 41 43 54 49 56 45 00 33 00 a0 00 24 00 50 2a 5c 42 49 54 20 30 37 20 52 45 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 4f 43 43 55 52 52 45 44 00 33 00 bc 00 14 00 50 2a 5c 42 49 54 20 30 32 20 54 43 20   ┆* BIT 10 TC INACTIVE 3   $ P* BIT 07 RETRANSMISSION OCCURRED 3     P* BIT 02 TC ┆
0x5090…50e0              42 55 53 59 00 33 00 e4 00 24 00 50 2a 5c 42 49 54 20 30 39 20 54 43 20 4e 4f 54 20 49 4e 20 50 4f 4c 4c 49 4e 47 20 4c 49 53 54 20 00 33 00 fc 00 06 00 50 2a 20 00 33 01 24 00 34 00 50 2a 20 20 20 43 4f 4d 42 49 4e 45 44 20 52 45 54 55 52   ┆BUSY 3   $ P* BIT 09 TC NOT IN POLLING LIST  3     P*  3 $ 4 P*   COMBINED RETUR┆
0x50e0…5130              4e 20 43 4f 44 45 53 3a 20 42 49 54 28 31 33 2b 31 30 29 2c 42 49 54 28 31 33 2b 30 37 29 00 33 01 2e 00 06 00 50 2a 20 00 33 01 66 00 24 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 5c 47 45 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20   ┆N CODES: BIT(13+10),BIT(13+07) 3 .   P*  3 f $ P LD A1,K:ERC,A8 GET RETURN CODE ┆
0x5130…5180 (52, 0, 400) 00 33 01 70 00 1a 00 50 5c 52 46 28 5a 29 5c 4c 57 34 30 30 5c 54 52 41 4e 53 4d 20 4f 4b 00 34 00 08 00 1a 00 50 5c 4c 44 4b 4c 5c 41 33 2c 2f 30 30 32 30 5c 42 49 54 20 31 30 20 00 34 00 26 00 0e 00 50 5c 54 4d 5c 41 31 2c 41 33 20 00 34   ┆ 3 p   P RF(Z) LW400 TRANSM OK 4     P LDKL A3,/0020 BIT 10  4 &   P TM A1,A3  4┆
0x5180…51d0              00 44 00 12 00 50 5c 52 46 28 4e 5a 29 5c 4c 57 33 30 30 20 00 34 00 56 00 1a 00 50 5c 4c 44 4b 4c 5c 41 33 2c 2f 30 31 30 30 5c 42 49 54 20 30 37 20 00 34 00 6c 00 0e 00 50 5c 54 4d 5c 41 31 2c 41 33 20 00 34 00 8a 00 12 00 50 5c 52 46 28   ┆ D   P RF(NZ) LW300  4 V   P LDKL A3,/0100 BIT 07  4 l   P TM A1,A3  4     P RF(┆
0x51d0…5220              4e 5a 29 5c 4c 57 31 30 30 20 00 34 00 9c 00 1a 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 44 46 46 46 5c 42 49 54 20 30 32 20 00 34 00 b2 00 10 00 50 5c 52 46 28 5a 29 5c 4c 57 32 30 30 00 34 00 d0 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 31 20   ┆NZ) LW100  4     P ANKL A1,/DFFF BIT 02  4     P RF(Z) LW200 4     P IFT LOOP=1 ┆
0x5220…5270              00 34 00 e4 00 18 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 46 42 46 46 5c 2a 2a 2a 2a 20 00 34 00 f8 00 2a 00 50 5c 52 46 28 4e 5a 29 5c 4c 57 45 4e 44 5c 2a 2a 2a 2a 4e 4f 54 20 55 4e 44 45 52 20 52 45 4f 50 45 4e 49 4e 47 20 00 34 01 14 00 14   ┆ 4     P ANKL A1,/FBFF ****  4   * P RF(NZ) LWEND ****NOT UNDER REOPENING  4    ┆
0x5270…52c0              00 50 5c 4c 44 4b 5c 41 31 2c 2f 31 30 5c 2a 2a 2a 2a 00 34 01 42 00 30 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 43 57 2c 41 38 5c 2a 2a 2a 2a 43 48 41 4e 47 45 20 52 43 20 54 4f 20 54 43 20 49 4e 41 43 54 49 56 45 00 34 01 5a 00 08 00 50 5c 58   ┆ P LDK A1,/10 **** 4 B 0 P ST A1,K:ECW,A8 ****CHANGE RC TO TC INACTIVE 4 Z   P X┆
0x52c0…5310 (53, 0, 400) 49 46 00 34 01 8e 00 1c 00 50 5c 52 46 5c 4c 57 45 4e 44 5c 42 49 54 20 31 35 2c 31 33 2c 2c 31 31 20 00 35 00 0a 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 35 00 2a 00 06 00 50 2a 20 00 35 00 46 00 20 00 50   ┆IF 4     P RF LWEND BIT 15,13,,11  5     P EJECT  IDENT C:FUC  5 *   P*  5 F   P┆
0x5310…5360              2a 20 20 20 43 4f 55 4e 54 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 45 52 52 4f 52 00 35 00 50 00 06 00 50 2a 20 00 35 00 74 00 10 00 50 4c 57 31 30 30 5c 45 51 55 5c 2a 20 00 35 00 7e 00 12 00 50 5c 41 4e 4b 4c 5c 41 31 2c 2f 46 45 46 46   ┆*   COUNT TRANSMISSION ERROR 5 P   P*  5 t   PLW100 EQU *  5 ~   P ANKL A1,/FEFF┆
0x5360…53b0              00 35 00 92 00 2c 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 5c 43 4c 45 41 52 20 52 45 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 42 49 54 00 35 00 a8 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 31 20 00 35 00 d8 00 12 00 50 5c 4c 44 4b 5c 41   ┆ 5   , P ST A1,K:ERC,A8 CLEAR RETRANSMISSION BIT 5     P LDK A2,1  5     P LDK A┆
0x53b0…5400              37 2c 4c 49 4e 45 43 20 00 35 00 ea 00 22 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4e 54 5c 43 4f 55 4e 54 20 45 52 52 4f 52 2f 4c 49 4e 45 00 35 01 00 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 30 20 00 35 01 26 00 0e 00 50 5c 4c 44 4b 5c 41   ┆7,LINEC  5   " P CF A14,K:CNT COUNT ERROR/LINE 5     P IFT LOOP=0  5 &   P LDK A┆
0x5400…5450              32 2c 31 20 00 35 01 3a 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 54 43 45 43 00 35 01 4c 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4e 54 5c 43 4f 55 4e 54 20 45 52 52 4f 52 2f 54 43 00 35 01 60 00 08 00 50 5c 58 49 46 00 35 01 84 00 1e 00 50   ┆2,1  5 :   P LDK A7,TCEC 5 L   P CF A14,K:CNT COUNT ERROR/TC 5 `   P XIF 5     P┆
0x5450…54a0 (54, 0, 400) 5c 52 46 5c 4c 57 34 30 30 5c 45 4e 44 20 55 53 45 52 20 52 45 51 55 45 53 54 00 35 01 90 00 06 00 50 2a 20 00 36 00 22 00 22 00 50 2a 20 20 20 43 4f 55 4e 54 20 4e 42 52 20 4f 46 20 54 49 4d 45 53 20 54 43 20 42 55 53 59 00 36 00 2c 00 06   ┆ RF LW400 END USER REQUEST 5     P*  6 " " P*   COUNT NBR OF TIMES TC BUSY 6 ,  ┆
0x54a0…54f0              00 50 2a 20 00 36 00 52 00 10 00 50 4c 57 32 30 30 5c 45 51 55 5c 2a 20 00 36 00 5c 00 1a 00 50 5c 52 46 5c 4c 57 32 30 31 5c 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 44 4b 00 36 00 70 00 0e 00 50 5c 4c 44 4b 5c 41 32 2c 31 20 00 36 00 8e 00 12 00 50   ┆ P*  6 R   PLW200 EQU *  6     P RF LW201  *********DK 6 p   P LDK A2,1  6     P┆
0x54f0…5540              5c 4c 44 4b 5c 41 37 2c 4c 49 4e 42 43 20 00 36 00 a0 00 22 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4e 54 5c 43 4f 55 4e 54 20 42 55 53 59 2f 4c 49 4e 45 20 00 36 00 b6 00 10 00 50 5c 49 46 54 5c 4c 4f 4f 50 3d 30 20 00 36 00 dc 00 0e 00 50   ┆ LDK A7,LINBC  6   " P CF A14,K:CNT COUNT BUSY/LINE  6     P IFT LOOP=0  6     P┆
0x5540…5590              5c 4c 44 4b 5c 41 32 2c 31 20 00 36 00 f0 00 10 00 50 5c 4c 44 4b 5c 41 37 2c 54 43 42 43 00 36 01 02 00 20 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 43 4e 54 5c 43 4f 55 4e 54 20 42 55 53 59 2f 54 43 20 00 36 01 16 00 08 00 50 5c 58 49 46 00 36   ┆ LDK A2,1  6     P LDK A7,TCBC 6     P CF A14,K:CNT COUNT BUSY/TC  6     P XIF 6┆
0x5590…55e0              01 3a 00 1e 00 50 4c 57 32 30 31 5c 45 51 55 5c 2a 5c 5c 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 44 4b 20 00 36 01 46 00 12 00 50 5c 4c 44 4b 4c 5c 41 31 2c 2f 38 30 30 30 00 36 01 68 00 24 00 50 5c 53 54 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 5c 53 45   ┆ :   PLW201 EQU *  **********DK  6 F   P LDKL A1,/8000 6 h $ P ST A1,K:ERC,A8 SE┆
0x55e0…5630 (55, 0, 398) 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 36 01 7e 00 0e 00 50 5c 52 46 5c 4c 57 45 4e 44 20 00 37 00 16 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 37 00 28 00 06 00 50 2a 20 00 37 00 44 00 14 00 50 2a 20   ┆T RETURN CODE  6 ~   P RF LWEND  7     P EJECT  IDENT C:FUC  7 (   P*  7 D   P* ┆
0x5630…5680              20 20 54 43 20 49 4e 41 43 54 49 56 45 20 00 37 00 4e 00 24 00 50 2a 20 20 20 49 4e 44 49 43 41 54 45 20 41 4e 44 20 50 52 49 4e 54 20 49 4e 41 43 54 49 56 45 20 00 37 00 66 00 06 00 50 2a 20 00 37 00 8e 00 2c 00 50 4c 57 33 30 30 5c 4c 44   ┆  TC INACTIVE  7 N $ P*   INDICATE AND PRINT INACTIVE  7 f   P*  7   , PLW300 LD┆
0x5680…56d0              5c 41 32 2c 54 43 41 57 42 54 2c 41 31 33 5c 47 45 54 20 54 43 20 57 4f 52 4b 42 4c 4f 43 4b 20 00 37 00 98 00 26 00 50 5c 43 4d 5c 4b 3a 54 43 53 54 2c 41 32 5c 49 4e 44 49 43 41 54 45 20 54 43 20 49 4e 41 43 54 49 56 45 00 37 00 c8 00 2c   ┆ A2,TCAWBT,A13 GET TC WORKBLOCK  7   & P CM K:TCST,A2 INDICATE TC INACTIVE 7   ,┆
0x56d0…5720              00 50 5c 43 46 5c 41 31 34 2c 4b 3a 44 50 4f 50 5c 27 4c 49 4e 45 20 4c 4c 20 54 43 20 54 54 20 49 4e 41 43 54 49 56 45 27 20 00 37 00 f2 00 10 00 50 5c 44 41 54 41 5c 4b 3a 46 33 34 37 00 37 01 22 00 0e 00 50 5c 52 46 5c 4c 57 45 4e 44 20   ┆ P CF A14,K:DPOP 'LINE LL TC TT INACTIVE'  7     P DATA K:F347 7 "   P RF LWEND ┆
0x5720…576e              00 37 01 36 00 18 00 50 5c 45 4a 45 43 54 5c 5c 49 44 45 4e 54 20 43 3a 46 55 43 20 00 37 01 48 00 06 00 50 2a 20 00 37 01 64 00 20 00 50 2a 20 20 20 54 52 41 4e 53 4d 49 53 53 49 4f 4e 20 53 55 43 43 45 53 53 46 55 4c 20 00 37 01 6e         ┆ 7 6   P EJECT  IDENT C:FUC  7 H   P*  7 d   P*   TRANSMISSION SUCCESSFUL  7 n┆
0x576e…57be (56, 0, 400) 00 06 00 50 2a 20 00 38 00 04 00 3a 00 50 2a 20 20 20 44 45 43 52 45 4d 45 4e 54 20 52 45 50 4c 59 20 43 4f 55 4e 54 45 52 20 49 46 20 4e 4f 54 20 53 55 50 45 52 56 49 53 4f 52 59 20 4d 45 53 53 41 47 45 00 38 00 0e 00 1c 00 50 2a 20 20 20   ┆   P*  8   : P*   DECREMENT REPLY COUNTER IF NOT SUPERVISORY MESSAGE 8     P*   ┆
0x57be…580e              41 32 20 3d 20 42 55 46 46 45 52 20 41 44 44 52 45 53 53 20 00 38 00 4c 00 06 00 50 2a 20 00 38 00 6c 00 10 00 50 4c 57 34 30 30 5c 45 51 55 5c 2a 20 00 38 00 76 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 38 00 8a 00 16 00 50 5c 4c 43 52   ┆A2 = BUFFER ADDRESS  8 L   P*  8 l   PLW400 EQU *  8 v   P LDK A1,0  8     P LCR┆
0x580e…585e              5c 41 31 2c 41 32 5c 47 45 54 20 53 54 41 00 38 00 9c 00 10 00 50 5c 43 57 5c 41 31 2c 4b 3a 43 43 5a 00 38 00 b6 00 24 00 50 5c 52 46 28 45 29 5c 4c 57 45 4e 44 5c 53 55 50 45 52 56 49 53 4f 52 59 20 4d 45 53 53 41 47 45 00 38 00 ca 00 16   ┆ A1,A2 GET STA 8     P CW A1,K:CCZ 8   $ P RF(E) LWEND SUPERVISORY MESSAGE 8    ┆
0x585e…58ae              00 50 5c 4c 44 5c 41 31 2c 4b 3a 52 45 50 43 2c 41 31 33 20 00 38 00 f2 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 31 20 00 38 01 0c 00 30 00 50 5c 52 46 28 4e 4e 29 5c 4c 57 34 31 30 5c 4e 4f 54 20 55 4e 44 45 52 46 4c 4f 57 20 49 4e 20 52 45 50   ┆ P LD A1,K:REPC,A13  8     P SUK A1,1  8   0 P RF(NN) LW410 NOT UNDERFLOW IN REP┆
0x58ae…58fe              4c 59 20 43 4f 55 4e 54 45 52 00 38 01 1e 00 0e 00 50 5c 4c 44 4b 5c 41 31 2c 30 20 00 38 01 52 00 10 00 50 4c 57 34 31 30 5c 45 51 55 5c 2a 20 00 38 01 64 00 2e 00 50 5c 53 54 5c 41 31 2c 4b 3a 52 45 50 43 2c 41 31 33 5c 4e 45 57 20 52 45   ┆LY COUNTER 8     P LDK A1,0  8 R   PLW410 EQU *  8 d . P ST A1,K:REPC,A13 NEW RE┆
0x58fe…594e (57, 2, 350) 50 4c 59 20 43 4f 55 4e 54 45 52 20 56 41 4c 55 45 20 00 38 01 78 00 06 00 50 2a 20 00 39 00 1a 00 0e 00 50 2a 20 20 20 52 45 54 55 52 4e 00 39 00 24 00 06 00 50 2a 20 00 39 00 36 00 10 00 50 4c 57 45 4e 44 5c 45 51 55 5c 2a 20 00 39 00 40   ┆PLY COUNTER VALUE  8 x   P*  9     P*   RETURN 9 $   P*  9 6   PLWEND EQU *  9 @┆
0x594e…599e              00 22 00 50 5c 43 46 5c 41 31 34 2c 4b 3a 4c 44 31 30 5c 52 45 4c 4f 41 44 20 31 30 20 52 45 47 53 20 00 39 00 54 00 10 00 50 5c 4c 44 5c 41 38 2c 32 2c 41 31 34 00 39 00 7a 00 2c 00 50 5c 53 54 5c 41 38 2c 2d 32 2c 41 32 5c 52 45 53 54 4f   ┆ " P CF A14,K:LD10 RELOAD 10 REGS  9 T   P LD A8,2,A14 9 z , P ST A8,-2,A2 RESTO┆
0x599e…59ee              52 45 20 4c 49 4e 45 20 41 4e 44 20 54 43 20 41 44 44 52 45 53 53 00 39 00 8e 00 26 00 50 5c 41 44 4b 4c 5c 41 31 34 2c 36 5c 50 52 45 50 41 52 45 20 44 49 52 45 43 54 20 52 45 54 55 52 4e 20 00 39 00 be 00 14 00 50 5c 4c 44 4b 4c 5c 41 38   ┆RE LINE AND TC ADDRESS 9   & P ADKL A14,6 PREPARE DIRECT RETURN  9     P LDKL A8┆
0x59ee…5a3e              2c 4b 3a 4c 55 54 45 20 00 39 00 e8 00 10 00 50 5c 41 44 52 5c 41 38 2c 41 31 33 20 00 39 01 00 00 24 00 50 5c 4c 44 5c 41 31 2c 4b 3a 45 52 43 2c 41 38 5c 47 45 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 39 01 14 00 0e 00 50 5c 41 42 52   ┆,K:LUTE  9     P ADR A8,A13  9   $ P LD A1,K:ERC,A8 GET RETURN CODE  9     P ABR┆
0x5a3e…5a5c              2a 5c 41 31 34 20 00 39 01 3c 00 08 00 50 5c 45 4e 44 00 39 01 4e 40 04 00 00 00 39 01 5a                                                                                                                                                         ┆* A14  9 <   P END 9 N@    9 Z┆
0x5a5c…5a64 (58, 1, 8)   20 04 00 00 00 3a 00 04                                                                                                                                                                                                                           ┆     :  ┆

Reduced view