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

⟦fac0dd38c⟧ 

    Length: 7762 (0x1e52)
    Notes: pts_type(SC)
    Names: »INIMON.SC«

Derivation

└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
    └─⟦this⟧ »TOSSWORK/INIMON.SC«

PTS(SC)

	IDENT INIMON 	REL 8.2 78-09-15  870105040820 

**
*************************************************** 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   INIMON = INITIALIZE MONITOR 
* 
* 
* 
* 
* 
* 
*************************************************** 
*   NOTE!  THIS VERSION OF INIMON IS ONLY USED IN 
*          PROGRAM DEBUGGING PHASE
*************************************************** 
* 
* THIS MODULE IS USED TO INITIALIAZE THE MONITOR
* AND START THE DISPATCHER. IT IS STARTED AFTER 
* PROGRAM LOAD. 
* 
	EJECT
* 
* THE FOLLOWING TTAB FIELDS ARE RESET:- 
* 
* TTB:SA  PROGRAM COUNTER 
* TTB:PP  PENDING PROGRAM POINTER 
* 
* 
* THE FOLLOWING DWT FIELDS ARE RESET:-
* 
* DWTST  STATUS IS SET TO /8000 
* DWTTQ   TERMINAL ON QUEUE FOR THIS DEVICE 
* DWTECB   DWT-ADDRESS
* 
* INTERTASK COM. DWT ONLY: FIRST WORD IS RESET
* 
* 
* PRUN IS SET TO FIRST USER TERMINAL
* 
* THE STACKBASE IS LOADED INTO REGISTER A15 AND 
* THE STACK IS INITIATED TO PERMIT START OF 
* THE SYSTEM WITH THE FIRST USER PROGRAM IN TCTAB 
* 
* TIMER QUEUE IS RESET. 
* MOREOVER ADDRESSES TO TIMER POINTERS DECLARED 
* IN FIRST WORD IN SECOND PART OF A TIMER BLOCK 
* SECTION ARE RESET.
* 
* 
* ALL BLOCKS IN THE BLOCK SECTION ARE SET FREE. 
* 
* BUFFER QUEUE IS RESET.
* 
* 
*  ATTACH CHAIN IS RESET
* 
	EJECT
* 
*	ENTRY POINTS
* 
	ENTRY	INIMON	MODULE ENTRY POINT
* 
*	EXTERNAL REFERENCES 
* 
	EXTRN	TCTAB
	EXTRN	TTB:SA	SAVE AREA FOR TERMINAL
	EXTRN	TTB:PP	PENDING PROGRAM POINTER 
	EXTRN	TTB:ST	STATUS
	EXTRN	TTB:ID	TERMINAL IDENTIFICATION 
	EXTRN	TTB:TD	TERMINAL DEVICES
	EXTRN	DWTST	STATUS 
	EXTRN	DWTADR	ACTIVATION ADDRESS
	EXTRN	DWTECB	DWT-ADDRESS 
	EXTRN	DWTTQ	TERMINAL ON QUEUE
	EXTRN	BLOCKL	LENGTH OF BLOCK POOL
	EXTRN	FREQUE	FREE BLOCK IN QUEUE 
	EXTRN	GBQUE	START OF BUFFER QUEUE
	EXTRN	STB	STACK BASE 
	EXTRN	DISQUE	JOB QUEUE ANCHOR
	EXTRN	TIMQUE	TIMER QUEUE ANCHOR
	EXTRN	PRUN	TTAB FOR RUNNING PROGRAM
	EXTRN	PFINIT	INIT AFTER MASTER CLEAR 
	EXTRN	CDTAB	COMMON DEVICE TABLE
	EXTRN	APL	APPLICATION LOADER 
	EXTRN	CVTMSZ	MEMORY SIZE 
	EXTRN	CVTSBA	BEGINNING OF BUFFER POOL
	EXTRN	CVTEBA	END OF BUFFER POOL
	EXTRN	CVTSTB	STACK BASE IN CVT 
	EXTRN	CVTAPS	APPLICATION START ADDRESS 
	EXTRN	INIFLG	INITIALIZATION FLAG 
	EXTRN	LOOP	IDLE LOOP 
	EXTRN	BLOCKS	COMMON BLOCK POOL 
	EXTRN	ATT:CH	ATTACH CHAIN ANCHOR 
	EXTRN	ITADI	INTERTASK ACTIVATION READ
	EXTRN	ITADO	INTERTASK ACTIVATION WRITE 
* 
	EJECT
* 
* 
* RESET TTAB FIELDS AND TERMINAL DEVICES
* 
* 
INIMON	EQU	*
	INH		 INHIBIT INTERRUPTS 
	LDK	A7,0 
	LD*	A1,TCTAB	TCTAB LENGTH
	AD	A1,TCTAB	+ BASE ADDRESS 

INI100	SUK	A1,2 
	CW	A1,TCTAB
	RF(E)	INI200	ALL TERMINALS INITIALIZED 

	LDR*	A5,A1	TTAB ADDRESS
	LDKL	A2,/80FF
	ANS	A2,TTB:ST,A5	RESET STATUS
	CM	TTB:PP,A5	RESET PENDING POINTER 
	CM	TTB:SA,A5	RESET DISPATCH ADDRESS
	LDKL	A14,INI100	RETURN ADDRESS 
	LDKL	A2,TTB:TD	
	ADR	A2,A5	TTAB CONFIGURATION PART ADDRESS
	ABL	RSTDEV	RESET TERMINAL DEVICES
	EJECT
* 
* 
* RESET COMMON DEVICES
* 
* 
INI200	EQU	*
	LDKL	A14,INI210	ACTION AFTER RESET 
	LD	A2,CDTAB	DEVICE TABLE ADDRESS 
	ABL	RSTDEV 
	EJECT
* 
* 
* RESET DEVICES FOR A TERMINAL/COMMON 
* 
* ENTRY PARAMETERS: 
* 
* A2 = TABLE ADDRESS
* A14= RETURN ADDRESS 
* 
* A1 AND A5 MAY NOT BE DESTRYED 
* 
* 
RSTDEV	EQU	*
	LDR*	A3,A2	GET TABLE LENGTH
	LDR	A4,A2
	LDKL	A8,/80
RST100	EQU	*
	SUK	A3,4 
	ABR(N)	A14	ALL DEVICES RESET 
	ADK	A4,4	ADJUST ADDRESS TO DWT 
	LDR*	A6,A4	GET DWT ADDRESS 
	RB(Z)	RST100	DWT NOT IN SYSTEM 
	LDKL	A9,ITADI
	CW	A9,DWTADR,A6	INTERTASK DWT? 
	RF(E)	RST120	YES!
	LDKL	A9,ITADO
	CW	A9,DWTADR,A6	INTERTASK DWT? 
	RF(NE)	RST130	NO!
RST120	CMR	A6	RESET WORD 0
RST130	EQU	*
	SC	A8,DWTST,A6	RESET DWT STATUS
	CM	DWTECB,A6	RESET ECB 
	CM	DWTTQ,A6	RESET TERMINAL QUEUE 
	RB	RST100	NEXT DEVICE
	EJECT
* 
* 
* RESET BLOCK POOL
* 
* 
INI210	EQU	*
	LDKL	A4,TIMQUE	TIMER QUEUE 
INI214	EQU	*
	LDR*	A4,A4	NEXT TIMER BLOCK IN QUEUE 
	RF(Z)	INI218	NO MORE 
	LD*	A3,2,A4	GET TIMER POINTER ADDRESS
	RB(Z)	INI214 
	CMR	A3	RESET TIMER POINTER 
	RB	INI214
INI218	EQU	*
	CM	TIMQUE	RESET TIMER QUEUE
	LD	A1,BLOCKL	LENGTH OF BLOCK POOL
	LD	A2,BLOCKS	BLOCK POOL ADDRESS
	ST	A2,FREQUE	INITIALIZE FREE QUEUE POINTER 
INI220	EQU	*
	SUK	A1,6 
	RF(N)	INI230	ALL DONE
	LDR	A3,A2
	ADK	A2,6 
	STR	A2,A3	STORE ADDRESS TO NEXT FREE POSITION
	RB	INI220
INI230	CMR	A3	END OF FREE BLOCKS
* 
*    RESET BUFFER QUEUE 
* 
	CM	GBQUE 

	EJECT
* 
*  RESET ATTACH CHAIN 
* 
	CM	ATT:CH
* 
* 
*   INITIALIZE STACK
* 
INI250	LD	A15,CVTSTB	LOAD STACK BASE
	LDKL	A1,LOOP 
	STR	A1,A15 
	LDKL	A1,/FC00
	STR	A1,A15 
	SUKL	A15,28
	LDK	A1,0 
	STR	A1,A15 
	EJECT
* 
* 
* FIND FIRST USER PROGRAM 
* 
* 

	LD	A1,TCTAB	TCTAB ADDRESS
	LDR*	A4,A1	TCTAB LENGTH
INIM50	ADK	A1,2 
	SUK	A4,2 
	RF(NZ)	INIM60
	HLT		NO USER TASK FOUND

INIM60	LDR*	A5,A1	TTAB ADDRESS
	LD	A2,TTB:ID,A5	TASK IDENTIFICATION
	RB(N)	INIM50	MONITOR TASK
	ST	A5,PRUN	SET TTAB FOR RUNNING PROGRAM
	CMR	A5 
	LD	A7,TTB:ST,A5	GET USER LEVEL 
	SRC	A7,6 
	CM	DISQUE	NO JOBS ON QUEUE 
	EJECT
* 
* 
* START SYSTEM
* 
* 
INI510	EQU	*
	CM	INIFLG
	IM	INIFLG
	LDKL	A13,WAITIS
	STR	A13,A15	USER START ADDRESS 
	STR	A7,A15	AND LEVEL 
	ABL	PFINIT	INITIALIZE DEVICES
WAITIS	EQU	*
	LDKL	A8,10 
	LKM
	DATA	6 
	ABI	CVTAPS 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT INIMON  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»**«, t00=0x0000, t01=0x0042}
0x0048…0084              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0000, t01=0x004c}
0x0084…008e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0088}
0x008e…00b6              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0092}
0x00b6…00c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ba}
0x00c0…00e8              Head {h00=0x0024, h01=0x0050, text=»*   INIMON = INITIALIZE MONITOR «, t00=0x0000, t01=0x00c4}
0x00e8…00f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ec}
0x00f2…00fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f6}
0x00fc…0106              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x0106…0110              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x0110…011a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0114}
0x011a…0124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011e}
0x0124…0160              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0000, t01=0x0128}
0x0160…019a              Head {h00=0x0036, h01=0x0050, text=»*   NOTE!  THIS VERSION OF INIMON IS ONLY USED IN «, t00=0x0000, t01=0x0164}
0x019a…01c4              Head {h00=0x0026, h01=0x0050, text=»*          PROGRAM DEBUGGING PHASE«, t00=0x0001, t01=0x000e}
0x01c4…0200              Head {h00=0x0038, h01=0x0050, text=»*************************************************** «, t00=0x0001, t01=0x0038}
0x0200…020a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0074}
0x020a…0242              Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS USED TO INITIALIAZE THE MONITOR«, t00=0x0001, t01=0x007e}
0x0242…027a              Head {h00=0x0034, h01=0x0050, text=»* AND START THE DISPATCHER. IT IS STARTED AFTER «, t00=0x0001, t01=0x00b6}
0x027a…0292              Head {h00=0x0014, h01=0x0050, text=»* PROGRAM LOAD. «, t00=0x0001, t01=0x00ee}
0x0292…029c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0106}
0x029c…02aa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0110}
0x02aa…02b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011e}
0x02b4…02e4              Head {h00=0x002c, h01=0x0050, text=»* THE FOLLOWING TTAB FIELDS ARE RESET:- «, t00=0x0001, t01=0x0128}
0x02e4…02ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0158}
0x02ee…0310              Head {h00=0x001e, h01=0x0050, text=»* TTB:SA  PROGRAM COUNTER «, t00=0x0001, t01=0x0162}
0x0310…033a              Head {h00=0x0026, h01=0x0050, text=»* TTB:PP  PENDING PROGRAM POINTER «, t00=0x0001, t01=0x0184}
0x033a…0344              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x0344…034e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0028}
0x034e…037c              Head {h00=0x002a, h01=0x0050, text=»* THE FOLLOWING DWT FIELDS ARE RESET:-«, t00=0x0002, t01=0x0032}
0x037c…0386              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0060}
0x0386…03ae              Head {h00=0x0024, h01=0x0050, text=»* DWTST  STATUS IS SET TO /8000 «, t00=0x0002, t01=0x006a}
0x03ae…03e2              Head {h00=0x0030, h01=0x0050, text=»* DWTTQ   TERMINAL ON QUEUE FOR THIS DEVICE «, t00=0x0002, t01=0x0092}
0x03e2…0400              Head {h00=0x001a, h01=0x0050, text=»* DWTECB   DWT-ADDRESS«, t00=0x0002, t01=0x00c6}
0x0400…040a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e4}
0x040a…0440              Head {h00=0x0032, h01=0x0050, text=»* INTERTASK COM. DWT ONLY: FIRST WORD IS RESET«, t00=0x0002, t01=0x00ee}
0x0440…044a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0124}
0x044a…0454              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x012e}
0x0454…0480              Head {h00=0x0028, h01=0x0050, text=»* PRUN IS SET TO FIRST USER TERMINAL«, t00=0x0002, t01=0x0138}
0x0480…048a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0164}
0x048a…04c2              Head {h00=0x0034, h01=0x0050, text=»* THE STACKBASE IS LOADED INTO REGISTER A15 AND «, t00=0x0002, t01=0x016e}
0x04c2…04f6              Head {h00=0x0030, h01=0x0050, text=»* THE STACK IS INITIATED TO PERMIT START OF «, t00=0x0003, t01=0x0016}
0x04f6…0530              Head {h00=0x0036, h01=0x0050, text=»* THE SYSTEM WITH THE FIRST USER PROGRAM IN TCTAB «, t00=0x0003, t01=0x004a}
0x0530…053a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0084}
0x053a…055a              Head {h00=0x001c, h01=0x0050, text=»* TIMER QUEUE IS RESET. «, t00=0x0003, t01=0x008e}
0x055a…0592              Head {h00=0x0034, h01=0x0050, text=»* MOREOVER ADDRESSES TO TIMER POINTERS DECLARED «, t00=0x0003, t01=0x00ae}
0x0592…05ca              Head {h00=0x0034, h01=0x0050, text=»* IN FIRST WORD IN SECOND PART OF A TIMER BLOCK «, t00=0x0003, t01=0x00e6}
0x05ca…05e6              Head {h00=0x0018, h01=0x0050, text=»* SECTION ARE RESET.«, t00=0x0003, t01=0x011e}
0x05e6…05f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013a}
0x05f0…05fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0144}
0x05fa…0632              Head {h00=0x0034, h01=0x0050, text=»* ALL BLOCKS IN THE BLOCK SECTION ARE SET FREE. «, t00=0x0003, t01=0x014e}
0x0632…063c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0186}
0x063c…065c              Head {h00=0x001c, h01=0x0050, text=»* BUFFER QUEUE IS RESET.«, t00=0x0003, t01=0x0190}
0x065c…0666              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0020}
0x0666…0670              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002a}
0x0670…0690              Head {h00=0x001c, h01=0x0050, text=»*  ATTACH CHAIN IS RESET«, t00=0x0004, t01=0x0034}
0x0690…069a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0054}
0x069a…06a8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x005e}
0x06a8…06b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b2…06c8              Head {h00=0x0012, h01=0x0050, text=»* ENTRY POINTS«, t00=0x0004, t01=0x0076}
0x06c8…06d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x008c}
0x06d2…06fa              Head {h00=0x0024, h01=0x0050, text=» ENTRY INIMON MODULE ENTRY POINT«, t00=0x0004, t01=0x0096}
0x06fa…0704              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00be}
0x0704…0722              Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENCES «, t00=0x0004, t01=0x00c8}
0x0722…072c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e6}
0x072c…0740              Head {h00=0x0010, h01=0x0050, text=» EXTRN TCTAB«, t00=0x0004, t01=0x00f0}
0x0740…076c              Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SA SAVE AREA FOR TERMINAL«, t00=0x0004, t01=0x0104}
0x076c…079a              Head {h00=0x002a, h01=0x0050, text=» EXTRN TTB:PP PENDING PROGRAM POINTER «, t00=0x0004, t01=0x0130}
0x079a…07b6              Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:ST STATUS«, t00=0x0004, t01=0x015e}
0x07b6…07e4              Head {h00=0x002a, h01=0x0050, text=» EXTRN TTB:ID TERMINAL IDENTIFICATION «, t00=0x0004, t01=0x017a}
0x07e4…080a              Head {h00=0x0022, h01=0x0050, text=» EXTRN TTB:TD TERMINAL DEVICES«, t00=0x0005, t01=0x0018}
0x080a…0826              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0005, t01=0x003e}
0x0826…084e              Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTADR ACTIVATION ADDRESS«, t00=0x0005, t01=0x005a}
0x084e…0870              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB DWT-ADDRESS «, t00=0x0005, t01=0x0082}
0x0870…0896              Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTQ TERMINAL ON QUEUE«, t00=0x0005, t01=0x00a4}
0x0896…08c0              Head {h00=0x0026, h01=0x0050, text=» EXTRN BLOCKL LENGTH OF BLOCK POOL«, t00=0x0005, t01=0x00ca}
0x08c0…08ea              Head {h00=0x0026, h01=0x0050, text=» EXTRN FREQUE FREE BLOCK IN QUEUE «, t00=0x0005, t01=0x00f4}
0x08ea…0914              Head {h00=0x0026, h01=0x0050, text=» EXTRN GBQUE START OF BUFFER QUEUE«, t00=0x0005, t01=0x011e}
0x0914…0932              Head {h00=0x001a, h01=0x0050, text=» EXTRN STB STACK BASE «, t00=0x0005, t01=0x0148}
0x0932…0958              Head {h00=0x0022, h01=0x0050, text=» EXTRN DISQUE JOB QUEUE ANCHOR«, t00=0x0005, t01=0x0166}
0x0958…0980              Head {h00=0x0024, h01=0x0050, text=» EXTRN TIMQUE TIMER QUEUE ANCHOR«, t00=0x0005, t01=0x018c}
0x0980…09ac              Head {h00=0x0028, h01=0x0050, text=» EXTRN PRUN TTAB FOR RUNNING PROGRAM«, t00=0x0006, t01=0x0024}
0x09ac…09da              Head {h00=0x002a, h01=0x0050, text=» EXTRN PFINIT INIT AFTER MASTER CLEAR «, t00=0x0006, t01=0x0050}
0x09da…0a02              Head {h00=0x0024, h01=0x0050, text=» EXTRN CDTAB COMMON DEVICE TABLE«, t00=0x0006, t01=0x007e}
0x0a02…0a28              Head {h00=0x0022, h01=0x0050, text=» EXTRN APL APPLICATION LOADER «, t00=0x0006, t01=0x00a6}
0x0a28…0a4a              Head {h00=0x001e, h01=0x0050, text=» EXTRN CVTMSZ MEMORY SIZE «, t00=0x0006, t01=0x00cc}
0x0a4a…0a78              Head {h00=0x002a, h01=0x0050, text=» EXTRN CVTSBA BEGINNING OF BUFFER POOL«, t00=0x0006, t01=0x00ee}
0x0a78…0aa0              Head {h00=0x0024, h01=0x0050, text=» EXTRN CVTEBA END OF BUFFER POOL«, t00=0x0006, t01=0x011c}
0x0aa0…0ac8              Head {h00=0x0024, h01=0x0050, text=» EXTRN CVTSTB STACK BASE IN CVT «, t00=0x0006, t01=0x0144}
0x0ac8…0af8              Head {h00=0x002c, h01=0x0050, text=» EXTRN CVTAPS APPLICATION START ADDRESS «, t00=0x0006, t01=0x016c}
0x0af8…0b22              Head {h00=0x0026, h01=0x0050, text=» EXTRN INIFLG INITIALIZATION FLAG «, t00=0x0007, t01=0x000c}
0x0b22…0b40              Head {h00=0x001a, h01=0x0050, text=» EXTRN LOOP IDLE LOOP «, t00=0x0007, t01=0x0036}
0x0b40…0b68              Head {h00=0x0024, h01=0x0050, text=» EXTRN BLOCKS COMMON BLOCK POOL «, t00=0x0007, t01=0x0054}
0x0b68…0b92              Head {h00=0x0026, h01=0x0050, text=» EXTRN ATT:CH ATTACH CHAIN ANCHOR «, t00=0x0007, t01=0x007c}
0x0b92…0bc0              Head {h00=0x002a, h01=0x0050, text=» EXTRN ITADI INTERTASK ACTIVATION READ«, t00=0x0007, t01=0x00a6}
0x0bc0…0bf0              Head {h00=0x002c, h01=0x0050, text=» EXTRN ITADO INTERTASK ACTIVATION WRITE «, t00=0x0007, t01=0x00d4}
0x0bf0…0bfa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0104}
0x0bfa…0c08              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x010e}
0x0c08…0c12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x011c}
0x0c12…0c1c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0126}
0x0c1c…0c4c              Head {h00=0x002c, h01=0x0050, text=»* RESET TTAB FIELDS AND TERMINAL DEVICES«, t00=0x0007, t01=0x0130}
0x0c4c…0c56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0160}
0x0c56…0c60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x016a}
0x0c60…0c74              Head {h00=0x0010, h01=0x0050, text=»INIMON EQU *«, t00=0x0007, t01=0x0174}
0x0c74…0c96              Head {h00=0x001e, h01=0x0050, text=» INH   INHIBIT INTERRUPTS «, t00=0x0007, t01=0x0188}
0x0c96…0ca8              Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0008, t01=0x001a}
0x0ca8…0cca              Head {h00=0x001e, h01=0x0050, text=» LD* A1,TCTAB TCTAB LENGTH«, t00=0x0008, t01=0x002c}
0x0cca…0cee              Head {h00=0x0020, h01=0x0050, text=» AD A1,TCTAB + BASE ADDRESS «, t00=0x0008, t01=0x004e}
0x0cee…0cf6              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x0072}
0x0cf6…0d0e              Head {h00=0x0014, h01=0x0050, text=»INI100 SUK A1,2 «, t00=0x0008, t01=0x007a}
0x0d0e…0d22              Head {h00=0x0010, h01=0x0050, text=» CW A1,TCTAB«, t00=0x0008, t01=0x0092}
0x0d22…0d52              Head {h00=0x002c, h01=0x0050, text=» RF(E) INI200 ALL TERMINALS INITIALIZED «, t00=0x0008, t01=0x00a6}
0x0d52…0d5a              Head {h00=0x0004, h01=0x0050, t00=0x0008, t01=0x00d6}
0x0d5a…0d7a              Head {h00=0x001c, h01=0x0050, text=» LDR* A5,A1 TTAB ADDRESS«, t00=0x0008, t01=0x00de}
0x0d7a…0d90              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/80FF«, t00=0x0008, t01=0x00fe}
0x0d90…0db6              Head {h00=0x0022, h01=0x0050, text=» ANS A2,TTB:ST,A5 RESET STATUS«, t00=0x0008, t01=0x0114}
0x0db6…0de2              Head {h00=0x0028, h01=0x0050, text=» CM TTB:PP,A5 RESET PENDING POINTER «, t00=0x0008, t01=0x013a}
0x0de2…0e0e              Head {h00=0x0028, h01=0x0050, text=» CM TTB:SA,A5 RESET DISPATCH ADDRESS«, t00=0x0008, t01=0x0166}
0x0e0e…0e36 (9, 0, 400)  Head {h00=0x0024, h01=0x0050, text=» LDKL A14,INI100 RETURN ADDRESS «, t00=0x0009, t01=0x0004}
0x0e36…0e4e              Head {h00=0x0014, h01=0x0050, text=» LDKL A2,TTB:TD «, t00=0x0009, t01=0x002c}
0x0e4e…0e80              Head {h00=0x002e, h01=0x0050, text=» ADR A2,A5 TTAB CONFIGURATION PART ADDRESS«, t00=0x0009, t01=0x0044}
0x0e80…0eaa              Head {h00=0x0026, h01=0x0050, text=» ABL RSTDEV RESET TERMINAL DEVICES«, t00=0x0009, t01=0x0076}
0x0eaa…0eb8              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x00a0}
0x0eb8…0ec2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ae}
0x0ec2…0ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b8}
0x0ecc…0eea              Head {h00=0x001a, h01=0x0050, text=»* RESET COMMON DEVICES«, t00=0x0009, t01=0x00c2}
0x0eea…0ef4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e0}
0x0ef4…0efe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ea}
0x0efe…0f12              Head {h00=0x0010, h01=0x0050, text=»INI200 EQU *«, t00=0x0009, t01=0x00f4}
0x0f12…0f3e              Head {h00=0x0028, h01=0x0050, text=» LDKL A14,INI210 ACTION AFTER RESET «, t00=0x0009, t01=0x0108}
0x0f3e…0f68              Head {h00=0x0026, h01=0x0050, text=» LD A2,CDTAB DEVICE TABLE ADDRESS «, t00=0x0009, t01=0x0134}
0x0f68…0f7c              Head {h00=0x0010, h01=0x0050, text=» ABL RSTDEV «, t00=0x0009, t01=0x015e}
0x0f7c…0f8a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0172}
0x0f8a…0f94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0180}
0x0f94…0f9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018a}
0x0f9e…0fcc (10, 0, 400) Head {h00=0x002a, h01=0x0050, text=»* RESET DEVICES FOR A TERMINAL/COMMON «, t00=0x000a, t01=0x0004}
0x0fcc…0fd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0032}
0x0fd6…0ff2              Head {h00=0x0018, h01=0x0050, text=»* ENTRY PARAMETERS: «, t00=0x000a, t01=0x003c}
0x0ff2…0ffc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0058}
0x0ffc…1018              Head {h00=0x0018, h01=0x0050, text=»* A2 = TABLE ADDRESS«, t00=0x000a, t01=0x0062}
0x1018…1036              Head {h00=0x001a, h01=0x0050, text=»* A14= RETURN ADDRESS «, t00=0x000a, t01=0x007e}
0x1036…1040              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009c}
0x1040…1068              Head {h00=0x0024, h01=0x0050, text=»* A1 AND A5 MAY NOT BE DESTRYED «, t00=0x000a, t01=0x00a6}
0x1068…1072              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ce}
0x1072…107c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d8}
0x107c…1090              Head {h00=0x0010, h01=0x0050, text=»RSTDEV EQU *«, t00=0x000a, t01=0x00e2}
0x1090…10b4              Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A2 GET TABLE LENGTH«, t00=0x000a, t01=0x00f6}
0x10b4…10c6              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x000a, t01=0x011a}
0x10c6…10da              Head {h00=0x0010, h01=0x0050, text=» LDKL A8,/80«, t00=0x000a, t01=0x012c}
0x10da…10ee              Head {h00=0x0010, h01=0x0050, text=»RST100 EQU *«, t00=0x000a, t01=0x0140}
0x10ee…1100              Head {h00=0x000e, h01=0x0050, text=» SUK A3,4 «, t00=0x000a, t01=0x0154}
0x1100…1126              Head {h00=0x0022, h01=0x0050, text=» ABR(N) A14 ALL DEVICES RESET «, t00=0x000a, t01=0x0166}
0x1126…114e              Head {h00=0x0024, h01=0x0050, text=» ADK A4,4 ADJUST ADDRESS TO DWT «, t00=0x000a, t01=0x018c}
0x114e…1172              Head {h00=0x0020, h01=0x0050, text=» LDR* A6,A4 GET DWT ADDRESS «, t00=0x000b, t01=0x0024}
0x1172…119a              Head {h00=0x0024, h01=0x0050, text=» RB(Z) RST100 DWT NOT IN SYSTEM «, t00=0x000b, t01=0x0048}
0x119a…11b0              Head {h00=0x0012, h01=0x0050, text=» LDKL A9,ITADI«, t00=0x000b, t01=0x0070}
0x11b0…11d8              Head {h00=0x0024, h01=0x0050, text=» CW A9,DWTADR,A6 INTERTASK DWT? «, t00=0x000b, t01=0x0086}
0x11d8…11f2              Head {h00=0x0016, h01=0x0050, text=» RF(E) RST120 YES!«, t00=0x000b, t01=0x00ae}
0x11f2…1208              Head {h00=0x0012, h01=0x0050, text=» LDKL A9,ITADO«, t00=0x000b, t01=0x00c8}
0x1208…1230              Head {h00=0x0024, h01=0x0050, text=» CW A9,DWTADR,A6 INTERTASK DWT? «, t00=0x000b, t01=0x00de}
0x1230…124a              Head {h00=0x0016, h01=0x0050, text=» RF(NE) RST130 NO!«, t00=0x000b, t01=0x0106}
0x124a…126c              Head {h00=0x001e, h01=0x0050, text=»RST120 CMR A6 RESET WORD 0«, t00=0x000b, t01=0x0120}
0x126c…1280              Head {h00=0x0010, h01=0x0050, text=»RST130 EQU *«, t00=0x000b, t01=0x0142}
0x1280…12a8              Head {h00=0x0024, h01=0x0050, text=» SC A8,DWTST,A6 RESET DWT STATUS«, t00=0x000b, t01=0x0156}
0x12a8…12c8              Head {h00=0x001c, h01=0x0050, text=» CM DWTECB,A6 RESET ECB «, t00=0x000b, t01=0x017e}
0x12c8…12f2              Head {h00=0x0026, h01=0x0050, text=» CM DWTTQ,A6 RESET TERMINAL QUEUE «, t00=0x000c, t01=0x000e}
0x12f2…1310              Head {h00=0x001a, h01=0x0050, text=» RB RST100 NEXT DEVICE«, t00=0x000c, t01=0x0038}
0x1310…131e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0056}
0x131e…1328              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0064}
0x1328…1332              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x006e}
0x1332…134c              Head {h00=0x0016, h01=0x0050, text=»* RESET BLOCK POOL«, t00=0x000c, t01=0x0078}
0x134c…1356              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0092}
0x1356…1360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009c}
0x1360…1374              Head {h00=0x0010, h01=0x0050, text=»INI210 EQU *«, t00=0x000c, t01=0x00a6}
0x1374…1398              Head {h00=0x0020, h01=0x0050, text=» LDKL A4,TIMQUE TIMER QUEUE «, t00=0x000c, t01=0x00ba}
0x1398…13ac              Head {h00=0x0010, h01=0x0050, text=»INI214 EQU *«, t00=0x000c, t01=0x00de}
0x13ac…13da              Head {h00=0x002a, h01=0x0050, text=» LDR* A4,A4 NEXT TIMER BLOCK IN QUEUE «, t00=0x000c, t01=0x00f2}
0x13da…13f8              Head {h00=0x001a, h01=0x0050, text=» RF(Z) INI218 NO MORE «, t00=0x000c, t01=0x0120}
0x13f8…1426              Head {h00=0x002a, h01=0x0050, text=» LD* A3,2,A4 GET TIMER POINTER ADDRESS«, t00=0x000c, t01=0x013e}
0x1426…143c              Head {h00=0x0012, h01=0x0050, text=» RB(Z) INI214 «, t00=0x000c, t01=0x016c}
0x143c…1460              Head {h00=0x0020, h01=0x0050, text=» CMR A3 RESET TIMER POINTER «, t00=0x000c, t01=0x0182}
0x1460…1472              Head {h00=0x000e, h01=0x0050, text=» RB INI214«, t00=0x000d, t01=0x0016}
0x1472…1486              Head {h00=0x0010, h01=0x0050, text=»INI218 EQU *«, t00=0x000d, t01=0x0028}
0x1486…14aa              Head {h00=0x0020, h01=0x0050, text=» CM TIMQUE RESET TIMER QUEUE«, t00=0x000d, t01=0x003c}
0x14aa…14d4              Head {h00=0x0026, h01=0x0050, text=» LD A1,BLOCKL LENGTH OF BLOCK POOL«, t00=0x000d, t01=0x0060}
0x14d4…14fc              Head {h00=0x0024, h01=0x0050, text=» LD A2,BLOCKS BLOCK POOL ADDRESS«, t00=0x000d, t01=0x008a}
0x14fc…1530              Head {h00=0x0030, h01=0x0050, text=» ST A2,FREQUE INITIALIZE FREE QUEUE POINTER «, t00=0x000d, t01=0x00b2}
0x1530…1544              Head {h00=0x0010, h01=0x0050, text=»INI220 EQU *«, t00=0x000d, t01=0x00e6}
0x1544…1556              Head {h00=0x000e, h01=0x0050, text=» SUK A1,6 «, t00=0x000d, t01=0x00fa}
0x1556…1574              Head {h00=0x001a, h01=0x0050, text=» RF(N) INI230 ALL DONE«, t00=0x000d, t01=0x010c}
0x1574…1586              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000d, t01=0x012a}
0x1586…1598              Head {h00=0x000e, h01=0x0050, text=» ADK A2,6 «, t00=0x000d, t01=0x013c}
0x1598…15ce              Head {h00=0x0032, h01=0x0050, text=» STR A2,A3 STORE ADDRESS TO NEXT FREE POSITION«, t00=0x000d, t01=0x014e}
0x15ce…15e0              Head {h00=0x000e, h01=0x0050, text=» RB INI220«, t00=0x000d, t01=0x0184}
0x15e0…1608              Head {h00=0x0024, h01=0x0050, text=»INI230 CMR A3 END OF FREE BLOCKS«, t00=0x000e, t01=0x0008}
0x1608…1612              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0030}
0x1612…1632              Head {h00=0x001c, h01=0x0050, text=»*    RESET BUFFER QUEUE «, t00=0x000e, t01=0x003a}
0x1632…163c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x005a}
0x163c…164e              Head {h00=0x000e, h01=0x0050, text=» CM GBQUE «, t00=0x000e, t01=0x0064}
0x164e…1656              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0076}
0x1656…1664              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x007e}
0x1664…166e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x008c}
0x166e…168c              Head {h00=0x001a, h01=0x0050, text=»*  RESET ATTACH CHAIN «, t00=0x000e, t01=0x0096}
0x168c…1696              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b4}
0x1696…16a8              Head {h00=0x000e, h01=0x0050, text=» CM ATT:CH«, t00=0x000e, t01=0x00be}
0x16a8…16b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d0}
0x16b2…16bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00da}
0x16bc…16d8              Head {h00=0x0018, h01=0x0050, text=»*   INITIALIZE STACK«, t00=0x000e, t01=0x00e4}
0x16d8…16e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0100}
0x16e2…170e              Head {h00=0x0028, h01=0x0050, text=»INI250 LD A15,CVTSTB LOAD STACK BASE«, t00=0x000e, t01=0x010a}
0x170e…1724              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,LOOP «, t00=0x000e, t01=0x0136}
0x1724…1738              Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x000e, t01=0x014c}
0x1738…174e              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FC00«, t00=0x000e, t01=0x0160}
0x174e…1762              Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x000e, t01=0x0176}
0x1762…1776              Head {h00=0x0010, h01=0x0050, text=» SUKL A15,28«, t00=0x000e, t01=0x018a}
0x1776…1788              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000f, t01=0x000e}
0x1788…179c              Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x000f, t01=0x0020}
0x179c…17aa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0034}
0x17aa…17b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0042}
0x17b4…17be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x004c}
0x17be…17e0              Head {h00=0x001e, h01=0x0050, text=»* FIND FIRST USER PROGRAM «, t00=0x000f, t01=0x0056}
0x17e0…17ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0078}
0x17ea…17f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0082}
0x17f4…17fc              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x008c}
0x17fc…181e              Head {h00=0x001e, h01=0x0050, text=» LD A1,TCTAB TCTAB ADDRESS«, t00=0x000f, t01=0x0094}
0x181e…183e              Head {h00=0x001c, h01=0x0050, text=» LDR* A4,A1 TCTAB LENGTH«, t00=0x000f, t01=0x00b6}
0x183e…1856              Head {h00=0x0014, h01=0x0050, text=»INIM50 ADK A1,2 «, t00=0x000f, t01=0x00d6}
0x1856…1868              Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x000f, t01=0x00ee}
0x1868…187e              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) INIM60«, t00=0x000f, t01=0x0100}
0x187e…189e              Head {h00=0x001c, h01=0x0050, text=» HLT  NO USER TASK FOUND«, t00=0x000f, t01=0x0116}
0x189e…18a6              Head {h00=0x0004, h01=0x0050, t00=0x000f, t01=0x0136}
0x18a6…18cc              Head {h00=0x0022, h01=0x0050, text=»INIM60 LDR* A5,A1 TTAB ADDRESS«, t00=0x000f, t01=0x013e}
0x18cc…18f8              Head {h00=0x0028, h01=0x0050, text=» LD A2,TTB:ID,A5 TASK IDENTIFICATION«, t00=0x000f, t01=0x0164}
0x18f8…191a              Head {h00=0x001e, h01=0x0050, text=» RB(N) INIM50 MONITOR TASK«, t00=0x000f, t01=0x0190}
0x191a…194a              Head {h00=0x002c, h01=0x0050, text=» ST A5,PRUN SET TTAB FOR RUNNING PROGRAM«, t00=0x0010, t01=0x0022}
0x194a…195a              Head {h00=0x000c, h01=0x0050, text=» CMR A5 «, t00=0x0010, t01=0x0052}
0x195a…1982              Head {h00=0x0024, h01=0x0050, text=» LD A7,TTB:ST,A5 GET USER LEVEL «, t00=0x0010, t01=0x0062}
0x1982…1994              Head {h00=0x000e, h01=0x0050, text=» SRC A7,6 «, t00=0x0010, t01=0x008a}
0x1994…19b8              Head {h00=0x0020, h01=0x0050, text=» CM DISQUE NO JOBS ON QUEUE «, t00=0x0010, t01=0x009c}
0x19b8…19c6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00c0}
0x19c6…19d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ce}
0x19d0…19da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00d8}
0x19da…19f0              Head {h00=0x0012, h01=0x0050, text=»* START SYSTEM«, t00=0x0010, t01=0x00e2}
0x19f0…19fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f8}
0x19fa…1a04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0102}
0x1a04…1a18              Head {h00=0x0010, h01=0x0050, text=»INI510 EQU *«, t00=0x0010, t01=0x010c}
0x1a18…1a2a              Head {h00=0x000e, h01=0x0050, text=» CM INIFLG«, t00=0x0010, t01=0x0120}
0x1a2a…1a3c              Head {h00=0x000e, h01=0x0050, text=» IM INIFLG«, t00=0x0010, t01=0x0132}
0x1a3c…1a54              Head {h00=0x0014, h01=0x0050, text=» LDKL A13,WAITIS«, t00=0x0010, t01=0x0144}
0x1a54…1a7c              Head {h00=0x0024, h01=0x0050, text=» STR A13,A15 USER START ADDRESS «, t00=0x0010, t01=0x015c}
0x1a7c…1a9a              Head {h00=0x001a, h01=0x0050, text=» STR A7,A15 AND LEVEL «, t00=0x0010, t01=0x0184}
0x1a9a…1ac0              Head {h00=0x0022, h01=0x0050, text=» ABL PFINIT INITIALIZE DEVICES«, t00=0x0011, t01=0x0012}
0x1ac0…1ad4              Head {h00=0x0010, h01=0x0050, text=»WAITIS EQU *«, t00=0x0011, t01=0x0038}
0x1ad4…1ae8              Head {h00=0x0010, h01=0x0050, text=» LDKL A8,10 «, t00=0x0011, t01=0x004c}
0x1ae8…1af4              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0011, t01=0x0060}
0x1af4…1b04              Head {h00=0x000c, h01=0x0050, text=» DATA 6 «, t00=0x0011, t01=0x006c}
0x1b04…1b18              Head {h00=0x0010, h01=0x0050, text=» ABI CVTAPS «, t00=0x0011, t01=0x007c}
0x1b18…1b24              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0011, t01=0x0090}
0x1b24…1b28              Head {h00=0x4004, h01=0x0000}
0x1b28…1b2c              00 11 00 9c                                                                                                                                                                                                                                       ┆    ┆
0x1b2c…1b34 (18, 1, 8)   20 04 00 00 00 12 00 04                                                                                                                                                                                                                           ┆        ┆
0x1b34…1b84 (19, 0, 398) 20 44 52 49 56 45 52 20 00 4a 01 66 00 06 00 50 2a 20 00 4b 00 10 00 22 00 50 2a 20 20 20 20 41 37 20 4d 55 53 54 20 4e 4f 54 20 42 45 20 44 45 53 54 52 4f 59 45 44 20 00 4b 00 1a 00 36 00 50 2a 20 20 20 20 54 48 45 20 45 43 48 4f 2d 52 4f   ┆ DRIVER  J f   P*  K   " P*    A7 MUST NOT BE DESTROYED  K   6 P*    THE ECHO-RO┆
0x1b84…1bd4              55 54 49 4e 45 20 53 48 4f 55 4c 44 20 42 45 20 54 45 52 4d 49 4e 41 54 45 44 20 57 49 54 48 20 41 20 00 4b 00 40 00 1a 00 50 2a 20 20 20 20 4a 55 4d 50 20 54 4f 20 27 45 43 48 52 54 4e 27 2e 00 4b 00 7a 00 06 00 50 2a 20 00 4b 00 98 00 10   ┆UTINE SHOULD BE TERMINATED WITH A  K @   P*    JUMP TO 'ECHRTN'. K z   P*  K    ┆
0x1bd4…1c24              00 50 45 43 48 45 4e 44 5c 45 51 55 5c 2a 00 4b 00 a2 00 06 00 50 2a 20 00 4b 00 b6 00 10 00 50 5c 49 46 54 5c 43 45 43 48 4f 3d 31 00 4b 00 c0 00 06 00 50 2a 20 00 4b 00 d4 00 24 00 50 5c 4c 44 4b 4c 5c 41 37 2c 2f 38 30 30 30 5c 49 4e 44   ┆ PECHEND EQU * K     P*  K     P IFT CECHO=1 K     P*  K   $ P LDKL A7,/8000 IND┆
0x1c24…1c74              49 43 41 54 45 20 45 4e 44 20 49 2f 4f 20 00 4b 00 de 00 08 00 50 5c 58 49 46 00 4b 01 06 00 0e 00 50 45 43 48 4f 5c 45 51 55 5c 2a 00 4b 01 12 00 10 00 50 5c 49 46 54 5c 43 45 43 48 4f 3d 31 00 4b 01 24 00 26 00 50 5c 53 54 5c 41 33 2c 44   ┆ICATE END I/O  K     P XIF K     PECHO EQU * K     P IFT CECHO=1 K $ & P ST A3,D┆
0x1c74…1cc2              57 54 41 33 2c 41 36 5c 53 41 56 45 20 41 33 2d 41 35 20 49 4e 20 44 57 54 20 00 4b 01 38 00 14 00 50 5c 53 54 5c 41 34 2c 44 57 54 41 34 2c 41 36 20 00 4b 01 62 00 14 00 50 5c 53 54 5c 41 35 2c 44 57 54 41 35 2c 41 36 20 00 4b 01 7a         ┆WTA3,A6 SAVE A3-A5 IN DWT  K 8   P ST A4,DWTA4,A6  K b   P ST A5,DWTA5,A6  K z┆
0x1cc2…1d12 (20, 0, 400) 00 1a 00 50 5c 4c 44 5c 41 31 2c 44 57 54 53 54 2c 41 36 5c 53 54 41 54 55 53 00 4c 00 04 00 0e 00 50 5c 53 4c 4c 5c 41 31 2c 32 20 00 4c 00 22 00 24 00 50 5c 52 46 28 4e 4e 29 5c 52 45 54 55 52 5c 4e 4f 20 45 43 48 4f 20 52 45 51 55 45 53   ┆   P LD A1,DWTST,A6 STATUS L     P SLL A1,2  L " $ P RF(NN) RETUR NO ECHO REQUES┆
0x1d12…1d62              54 45 44 20 00 4c 00 34 00 30 00 50 5c 4c 44 52 5c 41 34 2c 41 36 5c 53 41 56 45 20 44 57 54 2d 41 44 44 52 45 53 53 20 4f 46 20 49 4e 50 55 54 20 44 45 56 49 43 45 20 00 4c 00 5c 00 32 00 50 5c 4c 44 5c 41 36 2c 44 57 54 45 43 48 2c 41 36   ┆TED  L 4 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE  L   2 P LD A6,DWTECH,A6┆
0x1d62…1db2              5c 44 57 54 2d 41 44 44 52 45 53 53 20 4f 46 20 4f 55 54 50 55 54 20 44 45 56 49 43 45 20 00 4c 00 90 00 36 00 50 5c 53 54 5c 41 34 2c 44 57 54 57 41 54 2c 41 36 5c 53 41 56 45 20 44 57 54 2d 41 44 44 52 45 53 53 20 4f 46 20 49 4e 50 55 54   ┆ DWT-ADDRESS OF OUTPUT DEVICE  L   6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT┆
0x1db2…1e02              20 44 45 56 49 43 45 20 00 4c 00 c6 00 14 00 50 5c 4c 44 4b 4c 5c 41 35 2c 44 57 54 53 42 32 20 00 4c 01 00 00 26 00 50 5c 41 44 52 5c 41 35 2c 41 36 5c 53 54 41 43 4b 42 41 53 45 2d 41 44 44 52 45 53 53 20 49 4e 20 41 35 00 4c 01 18 00 2e   ┆ DEVICE  L     P LDKL A5,DWTSB2  L   & P ADR A5,A6 STACKBASE-ADDRESS IN A5 L   .┆
0x1e02…1e52              00 50 5c 4c 44 5c 41 31 2c 44 57 54 41 44 52 2c 41 36 5c 41 44 44 52 45 53 53 20 54 4f 20 41 44 44 52 45 53 53 2d 42 4c 4f 43 4b 20 00 4c 01 42 00 32 00 50 5c 41 42 49 5c 36 2c 41 31 5c 47 4f 20 54 4f 20 45 43 48 4f 2d 52 4f 55 54 49 4e 45   ┆ P LD A1,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK  L B 2 P ABI 6,A1 GO TO ECHO-ROUTINE┆

Reduced view