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

⟦100bf11eb⟧

    Length: 11032 (0x2b18)
    Notes: pts_type(SC)
    Names: »TDISP.SC«

Derivation

└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
    └─⟦this⟧ »TOSSWORK/TDISP.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/TDISP.SC« 

PTS(SC)

	IDENT TDISP 	REL 11.0 81-01-26 870105041100

* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   TDISP = TOSS DISPATCHER 
* 
**************************************************
* 
* 
*   THIS IS THE TASK DISPATCHER IN TOSS.
*   ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. 
*   THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER
*   QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM.
*   - IF SO, THE RUNNING TASK IS QUEUED AND THE HIGHER
*     PRIORITY TASK IS STARTED. 
*   - IF NOT, RETURN IS GIVEN TO INTERRUPTED PROGRAM. 
* 
*   ENTRY 'DISEND' CALLS TENDIO BEFORE TDISP. 
* 
*   ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND.
* 
*   ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP.
* 
*   ENTRY 'QMEXIT' CALLS QTJOB BEFORE EXIT IS MADE ON MONITOR TASK. 
* 
*   ENTRY 'TEXIT' EXITS A TASK BEFORE TDISP.
* 
*   ENTRY 'TPAUSE' SETS A TASK IN PAUSE STATE BEFORE TDISP. 
* 
*   ENTRY 'ACTDIS' ACTIVATES A TASK BEFORE TDISP. 
* 
*   ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS.
* 
	EJECT			TDISP
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	TDISP	DISPATCHER ENTRY 
	ENTRY	TPAUSE	PAUSE TASK
	ENTRY	TEXIT	EXIT TASK
	ENTRY	MEXIT	EXIT MONITOR TASK
	ENTRY	QMEXIT	QUEUE TASK AND EXIT MONITOR TASK
	ENTRY	ACTDIS	ACTIVATE TASK AND DISPATCH
	ENTRY	DISIOE	I/O ERROR ENTRY 
	ENTRY	DISEND	END I/O AND DISPATCH
	ENTRY	DISQUE	POINTER TO FIRST TASK IN DISP. QUEUE
	ENTRY	PRUN	TTAB ADDRESS OF RUNNING TASK
	ENTRY	RETUR8	LOAD 8 REGISTERS AND RETURN 
	EJECT			TDISP
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	ACTOT	ACTIVATE TASK
	EXTRN	TTB:AP	ACB ADDRESS 
	EXTRN	TTB:SA	SAVE AREA 
	EXTRN	TTB:ST	STATUS
	EXTRN	TTB:PW	PROGRAM STATUS WORD 
	EXTRN	TTB:MT	MMUTAB
	EXTRN	TTB:CB	CURRENT SEGMENT BASE
	EXTRN	TTB:SB	SEGMENT BLOCK ADDRESS 
	EXTRN	SEG:PB	SEGMENT PAGE BLOCK ADDRESS
	EXTRN	PAG:PA	PAGE ADDRESS
	EXTRN	PAG:QB	PAGE QUEUE BACKWARD POINTER 
	EXTRN	TENDIO	END I/O 
	EXTRN	EXIT	PROGRAM EXIT
	EXTRN	QLTDSK	ACTIVATE LDTASK AT ENTRY LT:DSK 
	EXTRN	QTJOB	QUEUE TASK FOR DISPATCHING 
	EXTRN	ACBLAP	LOGICAL ADDRESS OF CODE PAGE
	EXTRN	ACBMMP	MMU TABLE PAGE ENTRY
	EXTRN	ACBNPE	NUMBER OF PAGE ENTRIES
	EJECT			TDISP
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	0
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	1
* 
* 
*	A PROGRAM VERSION USING TOSS DISC PAGING
*	IS OBTAINED BY SETTING DSKPAG EQU 1.
* 
DSKPAG	EQU	0
* 
* 
*	A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING 
*	APPLICATION TASKS AT DIFFERENT PRIORITY LEVELS USING THE
*	SAME SEGMENT IS OBTAINED BY SETTING DIFPRI EQU 1. 
* 
DIFPRI	EQU	0
* 
	EJECT			TDISP
* 
*   D I S Q U E 
* 
*   POINTER TO FIRST TASK IN DISPATCHER QUEUE 
* 
DISQUE	DATA	0 
* 
*   P R U N 
* 
*   TTAB ADDRESS OF RUNNING TASK
* 
PRUN	DATA	0 
	EJECT			TDISP

* 
*   R E T U R 8 
* 
*   LOAD 8 REGISTERS FROM STACK AND RETURN
* 
RETUR8	EQU	*

	IFT	CPU852=0 
	MLR	8,A15
	XIF

	IFT	CPU852=1 
	LDR*	A8,A15
	LDR*	A7,A15
	LDR*	A6,A15
	LDR*	A5,A15
	LDR*	A4,A15
	LDR*	A3,A15
	LDR*	A2,A15
	LDR*	A1,A15
	XIF

	RTN	A15
	EJECT			TDISP

* 
*   Q M E X I T, M E X I T, T E X I T 
* 
*   DO EXIT ON (MONITOR) TASK AND GO TO TDISP 
* 
QMEXIT	CF	A15,QTJOB	QUEUE TASK FOR DISPATCHING
* 
MEXIT	INH 
	LD	A5,PRUN 
	CM	PRUN
* 
TEXIT	EQU	* 
	CF	A15,EXIT
	RF	TDISP 

* 
*   A C T D I S 
* 
*   ACTIVATE TASK AND GO TO TDISP 
* 
ACTDIS	CF	A15,ACTOT 
	RF	TDISP 
	EJECT			TDISP

* 
*   D I S I O E 
* 
*   SET BIT 0 IN ECB RETURN CODE AND GO TO DISEND 
* 
DISIOE	LDKL	A1,/8000

* 
*   D I S E N D 
* 
*   CALL TENDIO AND GO TO TDISP 
* 
DISEND	CF	A15,TENDIO

* 
*   T P A U S E 
* 
*   PAUSE TASK (I. E. GO TO TDISP)
* 
TPAUSE	EQU	*
	EJECT			TDISP
* 
*   T D I S P 
* 
*   THIS IS THE DISPATCHER ENTRY
* 
TDISP	INH	
	LC	A1,18,A15	LOAD PSW FROM STACK 
	ANK	A1,/FC 
	SUK	A1,/C4 
	RB(L)	RETUR8	LEVEL < 49, MONITOR ROUTINE 
* 
*	CHECK DISPATCHER QUEUE
* 
TDISCQ	LDKL	A2,DISQUE 
	LDR*	A3,A2 
	RB(Z)	RETUR8	QUEUE EMPTY 

	LD	A5,PRUN 
	RF(Z)	TDCQ10	IDLE LOOP RUNNING 
	LD	A4,TTB:ST+1,A5	COMPARE RUNNING
	CC	A4,TTB:ST+1,A3	AND QUEUED TASK'S PRIORITIES 
	RB(NG)	RETUR8	RUNNING HIGHER OR SAME 
TDCQ10	LDR*	A6,A3	QUEUED HIGHER 
	STR	A6,A2	REMOVE IT FROM QUEUE 

	IFT	DSKPAG=1 
	LD	A1,TTB:SB,A3	GET SEGMENT BLOCK ADDR 
	RF(Z)	TDISSW	NONE
	LDR*	A7,A1 
	RF(N)	TDISSW	SEGMENT LOADED
	CF	A15,QLTDSK	SEGM NOT LOADED QUEUE LOAD TASK
	RB	TDISCQ	TAKE NEXT TASK INSTEAD 
	XIF
	EJECT			TDISP
* 
*	SWITCH TASKS
* 
TDISSW	ST	A3,PRUN	SET NEW RUNNING TASK
	ADK	A5,0	CHECK OLD RUNNING TASK
	RF(Z)	TDISST	IDLE LOOP 

	ADK	A6,0	QUEUE OLD TASK FIRST ON PRIORITY
	RF(Z)	TDSW20	EMPTY QUEUE 
TDSW10	CC	A4,TTB:ST+1,A6	COMPARE PRIORITIES 
	RF(NG)	TDSW20	SAME OR LOWER PRIORITY FOUND 
	LDR	A2,A6
	LDR*	A6,A2 
	RB(NZ)	TDSW10	STILL SOMETHING IN QUEUE 

TDSW20	STR	A5,A2	PUT IN QUEUE 
	STR	A6,A5
	ST	A14,TTB:SA+28,A5	SAVE REGISTERS 
	LDR	A14,A5 

	IFT	CPU852=0 
	MLR	8,A15
	MS	13,TTB:SA+2,A14 
	MLR	2,A15

	XIF
	IFT	CPU852=1 
	LDR*	A8,A15
	LDR*	A7,A15
	LDR*	A6,A15
	LDR*	A5,A15
	LDR*	A4,A15
	LDR*	A3,A15
	LDR*	A2,A15
	LDR*	A1,A15
	ST	A13,TTB:SA+26,A14 
	ST	A12,TTB:SA+24,A14 
	ST	A11,TTB:SA+22,A14 
	ST	A10,TTB:SA+20,A14 
	ST	A9,TTB:SA+18,A14
	ST	A8,TTB:SA+16,A14
	ST	A7,TTB:SA+14,A14
	ST	A6,TTB:SA+12,A14
	ST	A5,TTB:SA+10,A14
	ST	A4,TTB:SA+8,A14 
	ST	A3,TTB:SA+6,A14 
	ST	A2,TTB:SA+4,A14 
	ST	A1,TTB:SA+2,A14 
	LDR*	A2,A15
	LDR*	A1,A15
	XIF

	ST	A1,TTB:SA,A14	AND PC
	ST	A2,TTB:PW,A14	AND PSW IN TTAB 
	IFT	DSKPAG+DIFPRI=2

	LD	A1,TTB:SB,A14	GET SEGM BLOCK ADDR 
	RF(Z)	TDISST	NONE
	LDR*	A2,A1	GET SEGM STATUS 
	LDKL	A3,/1000
	TM	A2,A3	CHECK IF SEGM USED BY INT TASK
	RF(NZ)	TDISST	YES
	ORRS	A3,A1	SET SEGM USED BY INT TASK 
	LD	A3,SEG:PB,A1
	ST	A14,PAG:QB,A3	AND THAT IT WAS THIS TASK 
	XIF
	EJECT			TDISP
* 
*	START NEW TASK
* 
TDISST	LD	A14,PRUN
	IFT	DSKPAG=1 

	LD	A1,TTB:SB,A14	GET SEGM BLOCK ADDR 
	RF(Z)	TDST30	NONE
	LD	A4,SEG:PB,A1	GET PAGE BLOCK ADDR
	IFT	DIFPRI=0 

	LDR*	A2,A4	CHECK IF PAGE IN PAGQUE 
	RF(Z)	TDST20	NOT IN QUEUE

	XIF
	IFT	DSKPAG+DIFPRI=2

	LDR*	A2,A4	CHECK IF PAGE IN PAGQUE 
	RF(NZ)	TDST10	YES
	LDR*	A3,A1	NO GET SEGM STATUS
	ANKL	A3,/1000	CHECK IF SEGM USED BY INT TASK 
	RF(Z)	TDST20	NO
	CW	A14,PAG:QB,A4	YES CHECK IF IT WAS THIS TASK 
	RF(NE)	TDST20	NO 
	XRRS	A3,A1	YES RESET USED BY INT TASK
	RF	TDST20

	XIF
	IFT	DSKPAG=1 

TDST10	LD	A3,PAG:QB,A4	TAKE PAGE OUT OF QUEUE 
	STR	A2,A3
	ST	A3,PAG:QB,A2
	CMR	A4 

TDST20	LD	A1,PAG:PA,A4	GET PAGE ADDRESS 

	IFT	MMUPAG=1 

	ECR	A2,A1	CALC PHYS PAGE ADDR
	ANK	A2,/FC 
	LDR	A3,A14	AND MMU PAGE ENTRY IN TTAB
	LD	A6,TTB:AP,A14	ACB ADDRESS 
	AD	A3,ACBMMP,A6
	LD	A4,ACBNPE,A6	AND GET NUMBER OF ENTRIES

TDST22	SCR	A2,A3	UPDATE MMU TABLE JUST IN CASE
	SUK	A4,1 
	RF(Z)	TDST25 
	ADK	A2,4 
	ADK	A3,2 
	RB	TDST22

TDST25	EQU	*
	TL	TTB:MT,A14	LOAD MMU TABLE 
	SLL	A1,2	UPDATE BASE IN T:A ALSO JUST IN CASE
	ANKL	A1,/FFE 
	OR	A1,ACBLAP,A6
	ES*	A1,TTB:CB,A14	UPDATE CURRENT SEGMENT BASE
	RF	TDST35
	XIF

	IFT	DSKPAG-MMUPAG=1
	ST*	A1,TTB:CB,A14	UPDATE CURRENT SEGMENT BASE
	XIF

TDST30	EQU	*
	IFT	MMUPAG=1 
	TL	TTB:MT,A14	LOAD MMU TABLE 
	XIF

TDST35	LD	A1,TTB:SA,A14	GET NEW PC
	LD	A2,TTB:PW,A14	AND PSW 
	IFT	CPU852=0 

	MSR	2,A15	PUT PC AND PSW ON STACK
	ML	14,TTB:SA+2,A14	LOAD REGISTERS

	XIF
	IFT	CPU852=1 

	STR	A1,A15	PUT PC
	STR	A2,A15	AND PSW ON STACK
	LD	A1,TTB:SA+2,A14	LOAD REGISTERS
	LD	A2,TTB:SA+4,A14 
	LD	A3,TTB:SA+6,A14 
	LD	A4,TTB:SA+8,A14 
	LD	A5,TTB:SA+10,A14
	LD	A6,TTB:SA+12,A14
	LD	A7,TTB:SA+14,A14
	LD	A8,TTB:SA+16,A14
	LD	A9,TTB:SA+18,A14
	LD	A10,TTB:SA+20,A14 
	LD	A11,TTB:SA+22,A14 
	LD	A12,TTB:SA+24,A14 
	LD	A13,TTB:SA+26,A14 
	LD	A14,TTB:SA+28,A14 

	XIF

	RTN	A15	START THE TASK 

	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT TDISP  REL 11.0 81-01-26 870105041100«, t00=0x0000, t01=0x0004}
0x0034…003c              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…0050              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x0050…008a              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0054}
0x008a…0094              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008e}
0x0094…00bc              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0098}
0x00bc…00c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c0}
0x00c6…00ea              Head {h00=0x0020, h01=0x0050, text=»*   TDISP = TOSS DISPATCHER «, t00=0x0000, t01=0x00ca}
0x00ea…00f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…012e              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x00f8}
0x012e…0138              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0132}
0x0138…0142              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013c}
0x0142…0172              Head {h00=0x002c, h01=0x0050, text=»*   THIS IS THE TASK DISPATCHER IN TOSS.«, t00=0x0000, t01=0x0146}
0x0172…01b4              Head {h00=0x003e, h01=0x0050, text=»*   ENTRY POINT IS 'TDISP' WITH 8 REGISTERS ON A15 STACK. «, t00=0x0000, t01=0x0176}
0x01b4…01f6              Head {h00=0x003e, h01=0x0050, text=»*   THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER«, t00=0x0001, t01=0x0028}
0x01f6…0236              Head {h00=0x003c, h01=0x0050, text=»*   QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM.«, t00=0x0001, t01=0x006a}
0x0236…0274              Head {h00=0x003a, h01=0x0050, text=»*   - IF SO, THE RUNNING TASK IS QUEUED AND THE HIGHER«, t00=0x0001, t01=0x00aa}
0x0274…029c              Head {h00=0x0024, h01=0x0050, text=»*     PRIORITY TASK IS STARTED. «, t00=0x0001, t01=0x00e8}
0x029c…02da              Head {h00=0x003a, h01=0x0050, text=»*   - IF NOT, RETURN IS GIVEN TO INTERRUPTED PROGRAM. «, t00=0x0001, t01=0x0110}
0x02da…02e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014e}
0x02e4…031a              Head {h00=0x0032, h01=0x0050, text=»*   ENTRY 'DISEND' CALLS TENDIO BEFORE TDISP. «, t00=0x0001, t01=0x0158}
0x031a…0324              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018e}
0x0324…035e              Head {h00=0x0036, h01=0x0050, text=»*   ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND.«, t00=0x0002, t01=0x0008}
0x035e…0368              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0042}
0x0368…03a4              Head {h00=0x0038, h01=0x0050, text=»*   ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP.«, t00=0x0002, t01=0x004c}
0x03a4…03ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0088}
0x03ae…03fa              Head {h00=0x0048, h01=0x0050, text=»*   ENTRY 'QMEXIT' CALLS QTJOB BEFORE EXIT IS MADE ON MONITOR TASK. «, t00=0x0002, t01=0x0092}
0x03fa…0404              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00de}
0x0404…0438              Head {h00=0x0030, h01=0x0050, text=»*   ENTRY 'TEXIT' EXITS A TASK BEFORE TDISP.«, t00=0x0002, t01=0x00e8}
0x0438…0442              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x011c}
0x0442…0486              Head {h00=0x0040, h01=0x0050, text=»*   ENTRY 'TPAUSE' SETS A TASK IN PAUSE STATE BEFORE TDISP. «, t00=0x0002, t01=0x0126}
0x0486…0490              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016a}
0x0490…04ca              Head {h00=0x0036, h01=0x0050, text=»*   ENTRY 'ACTDIS' ACTIVATES A TASK BEFORE TDISP. «, t00=0x0002, t01=0x0174}
0x04ca…04d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001e}
0x04d4…051c              Head {h00=0x0044, h01=0x0050, text=»*   ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS.«, t00=0x0003, t01=0x0028}
0x051c…0526              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…053c              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0003, t01=0x007a}
0x053c…0546              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0090}
0x0546…0550              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x009a}
0x0550…0564              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x00a4}
0x0564…0578              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0003, t01=0x00b8}
0x0578…058c              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x00cc}
0x058c…0596              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e0}
0x0596…05a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ea}
0x05a0…05c6              Head {h00=0x0022, h01=0x0050, text=» ENTRY TDISP DISPATCHER ENTRY «, t00=0x0003, t01=0x00f4}
0x05c6…05e6              Head {h00=0x001c, h01=0x0050, text=» ENTRY TPAUSE PAUSE TASK«, t00=0x0003, t01=0x011a}
0x05e6…0604              Head {h00=0x001a, h01=0x0050, text=» ENTRY TEXIT EXIT TASK«, t00=0x0003, t01=0x013a}
0x0604…062a              Head {h00=0x0022, h01=0x0050, text=» ENTRY MEXIT EXIT MONITOR TASK«, t00=0x0003, t01=0x0158}
0x062a…0660              Head {h00=0x0032, h01=0x0050, text=» ENTRY QMEXIT QUEUE TASK AND EXIT MONITOR TASK«, t00=0x0003, t01=0x017e}
0x0660…0690              Head {h00=0x002c, h01=0x0050, text=» ENTRY ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0004, t01=0x0024}
0x0690…06b6              Head {h00=0x0022, h01=0x0050, text=» ENTRY DISIOE I/O ERROR ENTRY «, t00=0x0004, t01=0x0054}
0x06b6…06e0              Head {h00=0x0026, h01=0x0050, text=» ENTRY DISEND END I/O AND DISPATCH«, t00=0x0004, t01=0x007a}
0x06e0…071a              Head {h00=0x0036, h01=0x0050, text=» ENTRY DISQUE POINTER TO FIRST TASK IN DISP. QUEUE«, t00=0x0004, t01=0x00a4}
0x071a…074a              Head {h00=0x002c, h01=0x0050, text=» ENTRY PRUN TTAB ADDRESS OF RUNNING TASK«, t00=0x0004, t01=0x00de}
0x074a…077c              Head {h00=0x002e, h01=0x0050, text=» ENTRY RETUR8 LOAD 8 REGISTERS AND RETURN «, t00=0x0004, t01=0x010e}
0x077c…0792              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0004, t01=0x0140}
0x0792…079c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0156}
0x079c…07a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0160}
0x07a6…07bc              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x016a}
0x07bc…07d2              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x0180}
0x07d2…07e8              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0005, t01=0x0008}
0x07e8…07f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001e}
0x07f2…07fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0028}
0x07fc…081e              Head {h00=0x001e, h01=0x0050, text=» EXTRN ACTOT ACTIVATE TASK«, t00=0x0005, t01=0x0032}
0x081e…0840              Head {h00=0x001e, h01=0x0050, text=» EXTRN TTB:AP ACB ADDRESS «, t00=0x0005, t01=0x0054}
0x0840…0860              Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:SA SAVE AREA «, t00=0x0005, t01=0x0076}
0x0860…087c              Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:ST STATUS«, t00=0x0005, t01=0x0096}
0x087c…08a6              Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0005, t01=0x00b2}
0x08a6…08c2              Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:MT MMUTAB«, t00=0x0005, t01=0x00dc}
0x08c2…08ec              Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:CB CURRENT SEGMENT BASE«, t00=0x0005, t01=0x00f8}
0x08ec…0918              Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK ADDRESS «, t00=0x0005, t01=0x0122}
0x0918…0948              Head {h00=0x002c, h01=0x0050, text=» EXTRN SEG:PB SEGMENT PAGE BLOCK ADDRESS«, t00=0x0005, t01=0x014e}
0x0948…096a              Head {h00=0x001e, h01=0x0050, text=» EXTRN PAG:PA PAGE ADDRESS«, t00=0x0005, t01=0x017e}
0x096a…099c              Head {h00=0x002e, h01=0x0050, text=» EXTRN PAG:QB PAGE QUEUE BACKWARD POINTER «, t00=0x0006, t01=0x0010}
0x099c…09ba              Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0006, t01=0x0042}
0x09ba…09da              Head {h00=0x001c, h01=0x0050, text=» EXTRN EXIT PROGRAM EXIT«, t00=0x0006, t01=0x0060}
0x09da…0a10              Head {h00=0x0032, h01=0x0050, text=» EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK «, t00=0x0006, t01=0x0080}
0x0a10…0a40              Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x0006, t01=0x00b6}
0x0a40…0a72              Head {h00=0x002e, h01=0x0050, text=» EXTRN ACBLAP LOGICAL ADDRESS OF CODE PAGE«, t00=0x0006, t01=0x00e6}
0x0a72…0a9c              Head {h00=0x0026, h01=0x0050, text=» EXTRN ACBMMP MMU TABLE PAGE ENTRY«, t00=0x0006, t01=0x0118}
0x0a9c…0ac8              Head {h00=0x0028, h01=0x0050, text=» EXTRN ACBNPE NUMBER OF PAGE ENTRIES«, t00=0x0006, t01=0x0142}
0x0ac8…0ade              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0006, t01=0x016e}
0x0ade…0ae8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0184}
0x0ae8…0af2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x018e}
0x0af2…0b24              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0008}
0x0b24…0b2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003a}
0x0b2e…0b4c              Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0007, t01=0x0044}
0x0b4c…0b56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0062}
0x0b56…0b88              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x006c}
0x0b88…0b92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009e}
0x0b92…0bc4              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0007, t01=0x00a8}
0x0bc4…0bf2              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x00da}
0x0bf2…0bfc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0108}
0x0bfc…0c10              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0007, t01=0x0112}
0x0c10…0c1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0126}
0x0c1a…0c24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0130}
0x0c24…0c5e              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x013a}
0x0c5e…0c90              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x0174}
0x0c90…0c9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0016}
0x0c9a…0cae              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x0020}
0x0cae…0cb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0034}
0x0cb8…0cc2              Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0008, t01=0x003e}
0x0cc2…0cf4              Head {h00=0x002e, h01=0x002a, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0008, t01=0x0048}
0x0cf4…0d22              Head {h00=0x002a, h01=0x0026, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0008, t01=0x007a}
0x0d22…0d2c              Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0008, t01=0x00a8}
0x0d2c…0d40              Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 0«, t00=0x0008, t01=0x00b2}
0x0d40…0d4a              Head {h00=0x0006, h01=0x0001, text=»* «, t00=0x0008, t01=0x00c6}
0x0d4a…0d54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d0}
0x0d54…0d98              Head {h00=0x0040, h01=0x0050, text=»* A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING «, t00=0x0008, t01=0x00da}
0x0d98…0dda              Head {h00=0x003e, h01=0x0050, text=»* APPLICATION TASKS AT DIFFERENT PRIORITY LEVELS USING THE«, t00=0x0008, t01=0x011e}
0x0dda…0e16              Head {h00=0x0038, h01=0x0050, text=»* SAME SEGMENT IS OBTAINED BY SETTING DIFPRI EQU 1. «, t00=0x0008, t01=0x0160}
0x0e16…0e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x000c}
0x0e20…0e34              Head {h00=0x0010, h01=0x0050, text=»DIFPRI EQU 0«, t00=0x0009, t01=0x0016}
0x0e34…0e3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x002a}
0x0e3e…0e54              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0009, t01=0x0034}
0x0e54…0e5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004a}
0x0e5e…0e76              Head {h00=0x0014, h01=0x0050, text=»*   D I S Q U E «, t00=0x0009, t01=0x0054}
0x0e76…0e80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006c}
0x0e80…0eb6              Head {h00=0x0032, h01=0x0050, text=»*   POINTER TO FIRST TASK IN DISPATCHER QUEUE «, t00=0x0009, t01=0x0076}
0x0eb6…0ec0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ac}
0x0ec0…0ed6              Head {h00=0x0012, h01=0x0050, text=»DISQUE DATA 0 «, t00=0x0009, t01=0x00b6}
0x0ed6…0ee0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00cc}
0x0ee0…0ef4              Head {h00=0x0010, h01=0x0050, text=»*   P R U N «, t00=0x0009, t01=0x00d6}
0x0ef4…0efe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ea}
0x0efe…0f26              Head {h00=0x0024, h01=0x0050, text=»*   TTAB ADDRESS OF RUNNING TASK«, t00=0x0009, t01=0x00f4}
0x0f26…0f30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x011c}
0x0f30…0f44              Head {h00=0x0010, h01=0x0050, text=»PRUN DATA 0 «, t00=0x0009, t01=0x0126}
0x0f44…0f5a              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0009, t01=0x013a}
0x0f5a…0f62              Head {h00=0x0004, h01=0x0050, t00=0x0009, t01=0x0150}
0x0f62…0f6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0158}
0x0f6c…0f84              Head {h00=0x0014, h01=0x0050, text=»*   R E T U R 8 «, t00=0x0009, t01=0x0162}
0x0f84…0f8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x017a}
0x0f8e…0fc0              Head {h00=0x002e, h01=0x0050, text=»*   LOAD 8 REGISTERS FROM STACK AND RETURN«, t00=0x0009, t01=0x0184}
0x0fc0…0fca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0026}
0x0fca…0fde              Head {h00=0x0010, h01=0x0050, text=»RETUR8 EQU *«, t00=0x000a, t01=0x0030}
0x0fde…0fe6              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0044}
0x0fe6…0ffc              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x000a, t01=0x004c}
0x0ffc…100e              Head {h00=0x000e, h01=0x0050, text=» MLR 8,A15«, t00=0x000a, t01=0x0062}
0x100e…101a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x0074}
0x101a…1022              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0080}
0x1022…1038              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x000a, t01=0x0088}
0x1038…104c              Head {h00=0x0010, h01=0x0050, text=» LDR* A8,A15«, t00=0x000a, t01=0x009e}
0x104c…1060              Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A15«, t00=0x000a, t01=0x00b2}
0x1060…1074              Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x000a, t01=0x00c6}
0x1074…1088              Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A15«, t00=0x000a, t01=0x00da}
0x1088…109c              Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A15«, t00=0x000a, t01=0x00ee}
0x109c…10b0              Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x000a, t01=0x0102}
0x10b0…10c4              Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x000a, t01=0x0116}
0x10c4…10d8              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x000a, t01=0x012a}
0x10d8…10e4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x013e}
0x10e4…10ec              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x014a}
0x10ec…10fc              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x000a, t01=0x0152}
0x10fc…1112              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x000a, t01=0x0162}
0x1112…111a              Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0178}
0x111a…1124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0180}
0x1124…1152              Head {h00=0x002a, h01=0x0050, text=»*   Q M E X I T, M E X I T, T E X I T «, t00=0x000a, t01=0x018a}
0x1152…115c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0028}
0x115c…1192              Head {h00=0x0032, h01=0x0050, text=»*   DO EXIT ON (MONITOR) TASK AND GO TO TDISP «, t00=0x000b, t01=0x0032}
0x1192…119c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0068}
0x119c…11d2              Head {h00=0x0032, h01=0x0050, text=»QMEXIT CF A15,QTJOB QUEUE TASK FOR DISPATCHING«, t00=0x000b, t01=0x0072}
0x11d2…11dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a8}
0x11dc…11ee              Head {h00=0x000e, h01=0x0050, text=»MEXIT INH «, t00=0x000b, t01=0x00b2}
0x11ee…1202              Head {h00=0x0010, h01=0x0050, text=» LD A5,PRUN «, t00=0x000b, t01=0x00c4}
0x1202…1212              Head {h00=0x000c, h01=0x0050, text=» CM PRUN«, t00=0x000b, t01=0x00d8}
0x1212…121c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00e8}
0x121c…1230              Head {h00=0x0010, h01=0x0050, text=»TEXIT EQU * «, t00=0x000b, t01=0x00f2}
0x1230…1244              Head {h00=0x0010, h01=0x0050, text=» CF A15,EXIT«, t00=0x000b, t01=0x0106}
0x1244…1256              Head {h00=0x000e, h01=0x0050, text=» RF TDISP «, t00=0x000b, t01=0x011a}
0x1256…125e              Head {h00=0x0004, h01=0x0050, t00=0x000b, t01=0x012c}
0x125e…1268              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0134}
0x1268…1280              Head {h00=0x0014, h01=0x0050, text=»*   A C T D I S «, t00=0x000b, t01=0x013e}
0x1280…128a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0156}
0x128a…12b4              Head {h00=0x0026, h01=0x0050, text=»*   ACTIVATE TASK AND GO TO TDISP «, t00=0x000b, t01=0x0160}
0x12b4…12be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x018a}
0x12be…12da (12, 0, 398) Head {h00=0x0018, h01=0x0050, text=»ACTDIS CF A15,ACTOT «, t00=0x000c, t01=0x0004}
0x12da…12ec              Head {h00=0x000e, h01=0x0050, text=» RF TDISP «, t00=0x000c, t01=0x0020}
0x12ec…1302              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x000c, t01=0x0032}
0x1302…130a              Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x0048}
0x130a…1314              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0050}
0x1314…132c              Head {h00=0x0014, h01=0x0050, text=»*   D I S I O E «, t00=0x000c, t01=0x005a}
0x132c…1336              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0072}
0x1336…1370              Head {h00=0x0036, h01=0x0050, text=»*   SET BIT 0 IN ECB RETURN CODE AND GO TO DISEND «, t00=0x000c, t01=0x007c}
0x1370…137a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00b6}
0x137a…1396              Head {h00=0x0018, h01=0x0050, text=»DISIOE LDKL A1,/8000«, t00=0x000c, t01=0x00c0}
0x1396…139e              Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00dc}
0x139e…13a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00e4}
0x13a8…13c0              Head {h00=0x0014, h01=0x0050, text=»*   D I S E N D «, t00=0x000c, t01=0x00ee}
0x13c0…13ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0106}
0x13ca…13f2              Head {h00=0x0024, h01=0x0050, text=»*   CALL TENDIO AND GO TO TDISP «, t00=0x000c, t01=0x0110}
0x13f2…13fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0138}
0x13fc…1418              Head {h00=0x0018, h01=0x0050, text=»DISEND CF A15,TENDIO«, t00=0x000c, t01=0x0142}
0x1418…1420              Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x015e}
0x1420…142a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0166}
0x142a…1442              Head {h00=0x0014, h01=0x0050, text=»*   T P A U S E «, t00=0x000c, t01=0x0170}
0x1442…144c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0188}
0x144c…1476 (13, 0, 400) Head {h00=0x0026, h01=0x0050, text=»*   PAUSE TASK (I. E. GO TO TDISP)«, t00=0x000d, t01=0x0004}
0x1476…1480              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x002e}
0x1480…1494              Head {h00=0x0010, h01=0x0050, text=»TPAUSE EQU *«, t00=0x000d, t01=0x0038}
0x1494…14aa              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x000d, t01=0x004c}
0x14aa…14b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0062}
0x14b4…14ca              Head {h00=0x0012, h01=0x0050, text=»*   T D I S P «, t00=0x000d, t01=0x006c}
0x14ca…14d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0082}
0x14d4…14fc              Head {h00=0x0024, h01=0x0050, text=»*   THIS IS THE DISPATCHER ENTRY«, t00=0x000d, t01=0x008c}
0x14fc…1506              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00b4}
0x1506…1518              Head {h00=0x000e, h01=0x0050, text=»TDISP INH «, t00=0x000d, t01=0x00be}
0x1518…1542              Head {h00=0x0026, h01=0x0050, text=» LC A1,18,A15 LOAD PSW FROM STACK «, t00=0x000d, t01=0x00d0}
0x1542…1556              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FC «, t00=0x000d, t01=0x00fa}
0x1556…156a              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/C4 «, t00=0x000d, t01=0x010e}
0x156a…159c              Head {h00=0x002e, h01=0x0050, text=» RB(L) RETUR8 LEVEL < 49, MONITOR ROUTINE «, t00=0x000d, t01=0x0122}
0x159c…15a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0154}
0x15a6…15c6              Head {h00=0x001c, h01=0x0050, text=»* CHECK DISPATCHER QUEUE«, t00=0x000d, t01=0x015e}
0x15c6…15d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x017e}
0x15d0…15ee              Head {h00=0x001a, h01=0x0050, text=»TDISCQ LDKL A2,DISQUE «, t00=0x000d, t01=0x0188}
0x15ee…1602              Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x000e, t01=0x0016}
0x1602…1624              Head {h00=0x001e, h01=0x0050, text=» RB(Z) RETUR8 QUEUE EMPTY «, t00=0x000e, t01=0x002a}
0x1624…162c              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x004c}
0x162c…1640              Head {h00=0x0010, h01=0x0050, text=» LD A5,PRUN «, t00=0x000e, t01=0x0054}
0x1640…1668              Head {h00=0x0024, h01=0x0050, text=» RF(Z) TDCQ10 IDLE LOOP RUNNING «, t00=0x000e, t01=0x0068}
0x1668…1692              Head {h00=0x0026, h01=0x0050, text=» LD A4,TTB:ST+1,A5 COMPARE RUNNING«, t00=0x000e, t01=0x0090}
0x1692…16ca              Head {h00=0x0034, h01=0x0050, text=» CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIORITIES «, t00=0x000e, t01=0x00ba}
0x16ca…16f8              Head {h00=0x002a, h01=0x0050, text=» RB(NG) RETUR8 RUNNING HIGHER OR SAME «, t00=0x000e, t01=0x00f2}
0x16f8…1720              Head {h00=0x0024, h01=0x0050, text=»TDCQ10 LDR* A6,A3 QUEUED HIGHER «, t00=0x000e, t01=0x0120}
0x1720…1748              Head {h00=0x0024, h01=0x0050, text=» STR A6,A2 REMOVE IT FROM QUEUE «, t00=0x000e, t01=0x0148}
0x1748…1750              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0170}
0x1750…1766              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x000e, t01=0x0178}
0x1766…1796              Head {h00=0x002c, h01=0x0050, text=» LD A1,TTB:SB,A3 GET SEGMENT BLOCK ADDR «, t00=0x000e, t01=0x018e}
0x1796…17b0              Head {h00=0x0016, h01=0x0050, text=» RF(Z) TDISSW NONE«, t00=0x000f, t01=0x002e}
0x17b0…17c4              Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A1 «, t00=0x000f, t01=0x0048}
0x17c4…17e8              Head {h00=0x0020, h01=0x0050, text=» RF(N) TDISSW SEGMENT LOADED«, t00=0x000f, t01=0x005c}
0x17e8…181e              Head {h00=0x0032, h01=0x0050, text=» CF A15,QLTDSK SEGM NOT LOADED QUEUE LOAD TASK«, t00=0x000f, t01=0x0080}
0x181e…1848              Head {h00=0x0026, h01=0x0050, text=» RB TDISCQ TAKE NEXT TASK INSTEAD «, t00=0x000f, t01=0x00b6}
0x1848…1854              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x00e0}
0x1854…186a              Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x000f, t01=0x00ec}
0x186a…1874              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0102}
0x1874…188a              Head {h00=0x0012, h01=0x0050, text=»* SWITCH TASKS«, t00=0x000f, t01=0x010c}
0x188a…1894              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0122}
0x1894…18c2              Head {h00=0x002a, h01=0x0050, text=»TDISSW ST A3,PRUN SET NEW RUNNING TASK«, t00=0x000f, t01=0x012c}
0x18c2…18ea              Head {h00=0x0024, h01=0x0050, text=» ADK A5,0 CHECK OLD RUNNING TASK«, t00=0x000f, t01=0x015a}
0x18ea…190a              Head {h00=0x001c, h01=0x0050, text=» RF(Z) TDISST IDLE LOOP «, t00=0x000f, t01=0x0182}
0x190a…1912              Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0012}
0x1912…1944              Head {h00=0x002e, h01=0x0050, text=» ADK A6,0 QUEUE OLD TASK FIRST ON PRIORITY«, t00=0x0010, t01=0x001a}
0x1944…1966              Head {h00=0x001e, h01=0x0050, text=» RF(Z) TDSW20 EMPTY QUEUE «, t00=0x0010, t01=0x004c}
0x1966…199a              Head {h00=0x0030, h01=0x0050, text=»TDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES «, t00=0x0010, t01=0x006e}
0x199a…19ce              Head {h00=0x0030, h01=0x0050, text=» RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND «, t00=0x0010, t01=0x00a2}
0x19ce…19e0              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A6«, t00=0x0010, t01=0x00d6}
0x19e0…19f4              Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A2 «, t00=0x0010, t01=0x00e8}
0x19f4…1a24              Head {h00=0x002c, h01=0x0050, text=» RB(NZ) TDSW10 STILL SOMETHING IN QUEUE «, t00=0x0010, t01=0x00fc}
0x1a24…1a2c              Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x012c}
0x1a2c…1a52              Head {h00=0x0022, h01=0x0050, text=»TDSW20 STR A5,A2 PUT IN QUEUE «, t00=0x0010, t01=0x0134}
0x1a52…1a64              Head {h00=0x000e, h01=0x0050, text=» STR A6,A5«, t00=0x0010, t01=0x015a}
0x1a64…1a90              Head {h00=0x0028, h01=0x0050, text=» ST A14,TTB:SA+28,A5 SAVE REGISTERS «, t00=0x0010, t01=0x016c}
0x1a90…1aa4              Head {h00=0x0010, h01=0x0050, text=» LDR A14,A5 «, t00=0x0011, t01=0x0008}
0x1aa4…1aac              Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x001c}
0x1aac…1ac2              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0011, t01=0x0024}
0x1ac2…1ad4              Head {h00=0x000e, h01=0x0050, text=» MLR 8,A15«, t00=0x0011, t01=0x003a}
0x1ad4…1af0              Head {h00=0x0018, h01=0x0050, text=» MS 13,TTB:SA+2,A14 «, t00=0x0011, t01=0x004c}
0x1af0…1b02              Head {h00=0x000e, h01=0x0050, text=» MLR 2,A15«, t00=0x0011, t01=0x0068}
0x1b02…1b0a              Head {h00=0x0004, h01=0x0050, t00=0x0011, t01=0x007a}
0x1b0a…1b16              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0082}
0x1b16…1b2c              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0011, t01=0x008e}
0x1b2c…1b40              Head {h00=0x0010, h01=0x0050, text=» LDR* A8,A15«, t00=0x0011, t01=0x00a4}
0x1b40…1b54              Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A15«, t00=0x0011, t01=0x00b8}
0x1b54…1b68              Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x0011, t01=0x00cc}
0x1b68…1b7c              Head {h00=0x0010, h01=0x0050, text=» LDR* A5,A15«, t00=0x0011, t01=0x00e0}
0x1b7c…1b90              Head {h00=0x0010, h01=0x0050, text=» LDR* A4,A15«, t00=0x0011, t01=0x00f4}
0x1b90…1ba4              Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x0011, t01=0x0108}
0x1ba4…1bb8              Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0011, t01=0x011c}
0x1bb8…1bcc              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0011, t01=0x0130}
0x1bcc…1bea              Head {h00=0x001a, h01=0x0050, text=» ST A13,TTB:SA+26,A14 «, t00=0x0011, t01=0x0144}
0x1bea…1c08              Head {h00=0x001a, h01=0x0050, text=» ST A12,TTB:SA+24,A14 «, t00=0x0011, t01=0x0162}
0x1c08…1c26              Head {h00=0x001a, h01=0x0050, text=» ST A11,TTB:SA+22,A14 «, t00=0x0011, t01=0x0180}
0x1c26…1c44              Head {h00=0x001a, h01=0x0050, text=» ST A10,TTB:SA+20,A14 «, t00=0x0012, t01=0x000e}
0x1c44…1c60              Head {h00=0x0018, h01=0x0050, text=» ST A9,TTB:SA+18,A14«, t00=0x0012, t01=0x002c}
0x1c60…1c7c              Head {h00=0x0018, h01=0x0050, text=» ST A8,TTB:SA+16,A14«, t00=0x0012, t01=0x0048}
0x1c7c…1c98              Head {h00=0x0018, h01=0x0050, text=» ST A7,TTB:SA+14,A14«, t00=0x0012, t01=0x0064}
0x1c98…1cb4              Head {h00=0x0018, h01=0x0050, text=» ST A6,TTB:SA+12,A14«, t00=0x0012, t01=0x0080}
0x1cb4…1cd0              Head {h00=0x0018, h01=0x0050, text=» ST A5,TTB:SA+10,A14«, t00=0x0012, t01=0x009c}
0x1cd0…1cec              Head {h00=0x0018, h01=0x0050, text=» ST A4,TTB:SA+8,A14 «, t00=0x0012, t01=0x00b8}
0x1cec…1d08              Head {h00=0x0018, h01=0x0050, text=» ST A3,TTB:SA+6,A14 «, t00=0x0012, t01=0x00d4}
0x1d08…1d24              Head {h00=0x0018, h01=0x0050, text=» ST A2,TTB:SA+4,A14 «, t00=0x0012, t01=0x00f0}
0x1d24…1d40              Head {h00=0x0018, h01=0x0050, text=» ST A1,TTB:SA+2,A14 «, t00=0x0012, t01=0x010c}
0x1d40…1d54              Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A15«, t00=0x0012, t01=0x0128}
0x1d54…1d68              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0012, t01=0x013c}
0x1d68…1d74              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0150}
0x1d74…1d7c              Head {h00=0x0004, h01=0x0050, t00=0x0012, t01=0x015c}
0x1d7c…1d9c              Head {h00=0x001c, h01=0x0050, text=» ST A1,TTB:SA,A14 AND PC«, t00=0x0012, t01=0x0164}
0x1d9c…1dc6              Head {h00=0x0026, h01=0x0050, text=» ST A2,TTB:PW,A14 AND PSW IN TTAB «, t00=0x0012, t01=0x0184}
0x1dc6…1de2              Head {h00=0x0018, h01=0x0050, text=» IFT DSKPAG+DIFPRI=2«, t00=0x0013, t01=0x001e}
0x1de2…1dea              Head {h00=0x0004, h01=0x0050, t00=0x0013, t01=0x003a}
0x1dea…1e18              Head {h00=0x002a, h01=0x0050, text=» LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR «, t00=0x0013, t01=0x0042}
0x1e18…1e32              Head {h00=0x0016, h01=0x0050, text=» RF(Z) TDISST NONE«, t00=0x0013, t01=0x0070}
0x1e32…1e56              Head {h00=0x0020, h01=0x0050, text=» LDR* A2,A1 GET SEGM STATUS «, t00=0x0013, t01=0x008a}
0x1e56…1e6c              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/1000«, t00=0x0013, t01=0x00ae}
0x1e6c…1e9c              Head {h00=0x002c, h01=0x0050, text=» TM A2,A3 CHECK IF SEGM USED BY INT TASK«, t00=0x0013, t01=0x00c4}
0x1e9c…1eb6              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TDISST YES«, t00=0x0013, t01=0x00f4}
0x1eb6…1ee4              Head {h00=0x002a, h01=0x0050, text=» ORRS A3,A1 SET SEGM USED BY INT TASK «, t00=0x0013, t01=0x010e}
0x1ee4…1efc              Head {h00=0x0014, h01=0x0050, text=» LD A3,SEG:PB,A1«, t00=0x0013, t01=0x013c}
0x1efc…1f30              Head {h00=0x0030, h01=0x0050, text=» ST A14,PAG:QB,A3 AND THAT IT WAS THIS TASK «, t00=0x0013, t01=0x0154}
0x1f30…1f3c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0188}
0x1f3c…1f52 (20, 0, 398) Head {h00=0x0012, h01=0x0050, text=» EJECT   TDISP«, t00=0x0014, t01=0x0004}
0x1f52…1f5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x001a}
0x1f5c…1f74              Head {h00=0x0014, h01=0x0050, text=»* START NEW TASK«, t00=0x0014, t01=0x0024}
0x1f74…1f7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x003c}
0x1f7e…1f98              Head {h00=0x0016, h01=0x0050, text=»TDISST LD A14,PRUN«, t00=0x0014, t01=0x0046}
0x1f98…1fae              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x0014, t01=0x0060}
0x1fae…1fb6              Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0076}
0x1fb6…1fe4              Head {h00=0x002a, h01=0x0050, text=» LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR «, t00=0x0014, t01=0x007e}
0x1fe4…1ffe              Head {h00=0x0016, h01=0x0050, text=» RF(Z) TDST30 NONE«, t00=0x0014, t01=0x00ac}
0x1ffe…202a              Head {h00=0x0028, h01=0x0050, text=» LD A4,SEG:PB,A1 GET PAGE BLOCK ADDR«, t00=0x0014, t01=0x00c6}
0x202a…2040              Head {h00=0x0012, h01=0x0050, text=» IFT DIFPRI=0 «, t00=0x0014, t01=0x00f2}
0x2040…2048              Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x0108}
0x2048…2074              Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 CHECK IF PAGE IN PAGQUE «, t00=0x0014, t01=0x0110}
0x2074…2096              Head {h00=0x001e, h01=0x0050, text=» RF(Z) TDST20 NOT IN QUEUE«, t00=0x0014, t01=0x013c}
0x2096…209e              Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x015e}
0x209e…20aa              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x0166}
0x20aa…20c6              Head {h00=0x0018, h01=0x0050, text=» IFT DSKPAG+DIFPRI=2«, t00=0x0014, t01=0x0172}
0x20c6…20ce              Head {h00=0x0004, h01=0x0050, t00=0x0014, t01=0x018e}
0x20ce…20fa              Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A4 CHECK IF PAGE IN PAGQUE «, t00=0x0015, t01=0x0008}
0x20fa…2114              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) TDST10 YES«, t00=0x0015, t01=0x0034}
0x2114…213a              Head {h00=0x0022, h01=0x0050, text=» LDR* A3,A1 NO GET SEGM STATUS«, t00=0x0015, t01=0x004e}
0x213a…2170              Head {h00=0x0032, h01=0x0050, text=» ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK «, t00=0x0015, t01=0x0074}
0x2170…2188              Head {h00=0x0014, h01=0x0050, text=» RF(Z) TDST20 NO«, t00=0x0015, t01=0x00aa}
0x2188…21c0              Head {h00=0x0034, h01=0x0050, text=» CW A14,PAG:QB,A4 YES CHECK IF IT WAS THIS TASK «, t00=0x0015, t01=0x00c2}
0x21c0…21da              Head {h00=0x0016, h01=0x0050, text=» RF(NE) TDST20 NO «, t00=0x0015, t01=0x00fa}
0x21da…2208              Head {h00=0x002a, h01=0x0050, text=» XRRS A3,A1 YES RESET USED BY INT TASK«, t00=0x0015, t01=0x0114}
0x2208…221a              Head {h00=0x000e, h01=0x0050, text=» RF TDST20«, t00=0x0015, t01=0x0142}
0x221a…2222              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0154}
0x2222…222e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x015c}
0x222e…2244              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x0015, t01=0x0168}
0x2244…224c              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x017e}
0x224c…2282              Head {h00=0x0032, h01=0x0050, text=»TDST10 LD A3,PAG:QB,A4 TAKE PAGE OUT OF QUEUE «, t00=0x0015, t01=0x0186}
0x2282…2294              Head {h00=0x000e, h01=0x0050, text=» STR A2,A3«, t00=0x0016, t01=0x002c}
0x2294…22ac              Head {h00=0x0014, h01=0x0050, text=» ST A3,PAG:QB,A2«, t00=0x0016, t01=0x003e}
0x22ac…22bc              Head {h00=0x000c, h01=0x0050, text=» CMR A4 «, t00=0x0016, t01=0x0056}
0x22bc…22c4              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0066}
0x22c4…22f4              Head {h00=0x002c, h01=0x0050, text=»TDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS «, t00=0x0016, t01=0x006e}
0x22f4…22fc              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x009e}
0x22fc…2312              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0016, t01=0x00a6}
0x2312…231a              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00bc}
0x231a…2340              Head {h00=0x0022, h01=0x0050, text=» ECR A2,A1 CALC PHYS PAGE ADDR«, t00=0x0016, t01=0x00c4}
0x2340…2354              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x0016, t01=0x00ea}
0x2354…2382              Head {h00=0x002a, h01=0x0050, text=» LDR A3,A14 AND MMU PAGE ENTRY IN TTAB«, t00=0x0016, t01=0x00fe}
0x2382…23a8              Head {h00=0x0022, h01=0x0050, text=» LD A6,TTB:AP,A14 ACB ADDRESS «, t00=0x0016, t01=0x012c}
0x23a8…23c0              Head {h00=0x0014, h01=0x0050, text=» AD A3,ACBMMP,A6«, t00=0x0016, t01=0x0152}
0x23c0…23f2              Head {h00=0x002e, h01=0x0050, text=» LD A4,ACBNPE,A6 AND GET NUMBER OF ENTRIES«, t00=0x0016, t01=0x016a}
0x23f2…23fa              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x000c}
0x23fa…2430              Head {h00=0x0032, h01=0x0050, text=»TDST22 SCR A2,A3 UPDATE MMU TABLE JUST IN CASE«, t00=0x0017, t01=0x0014}
0x2430…2442              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0017, t01=0x004a}
0x2442…2458              Head {h00=0x0012, h01=0x0050, text=» RF(Z) TDST25 «, t00=0x0017, t01=0x005c}
0x2458…246a              Head {h00=0x000e, h01=0x0050, text=» ADK A2,4 «, t00=0x0017, t01=0x0072}
0x246a…247c              Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0017, t01=0x0084}
0x247c…248e              Head {h00=0x000e, h01=0x0050, text=» RB TDST22«, t00=0x0017, t01=0x0096}
0x248e…2496              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00a8}
0x2496…24aa              Head {h00=0x0010, h01=0x0050, text=»TDST25 EQU *«, t00=0x0017, t01=0x00b0}
0x24aa…24d0              Head {h00=0x0022, h01=0x0050, text=» TL TTB:MT,A14 LOAD MMU TABLE «, t00=0x0017, t01=0x00c4}
0x24d0…2506              Head {h00=0x0032, h01=0x0050, text=» SLL A1,2 UPDATE BASE IN T:A ALSO JUST IN CASE«, t00=0x0017, t01=0x00ea}
0x2506…251c              Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/FFE «, t00=0x0017, t01=0x0120}
0x251c…2534              Head {h00=0x0014, h01=0x0050, text=» OR A1,ACBLAP,A6«, t00=0x0017, t01=0x0136}
0x2534…256a              Head {h00=0x0032, h01=0x0050, text=» ES* A1,TTB:CB,A14 UPDATE CURRENT SEGMENT BASE«, t00=0x0017, t01=0x014e}
0x256a…257c              Head {h00=0x000e, h01=0x0050, text=» RF TDST35«, t00=0x0017, t01=0x0184}
0x257c…2588              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0008}
0x2588…2590              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0014}
0x2590…25ac              Head {h00=0x0018, h01=0x0050, text=» IFT DSKPAG-MMUPAG=1«, t00=0x0018, t01=0x001c}
0x25ac…25e2              Head {h00=0x0032, h01=0x0050, text=» ST* A1,TTB:CB,A14 UPDATE CURRENT SEGMENT BASE«, t00=0x0018, t01=0x0038}
0x25e2…25ee              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x006e}
0x25ee…25f6              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x007a}
0x25f6…260a              Head {h00=0x0010, h01=0x0050, text=»TDST30 EQU *«, t00=0x0018, t01=0x0082}
0x260a…2620              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0018, t01=0x0096}
0x2620…2646              Head {h00=0x0022, h01=0x0050, text=» TL TTB:MT,A14 LOAD MMU TABLE «, t00=0x0018, t01=0x00ac}
0x2646…2652              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00d2}
0x2652…265a              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00de}
0x265a…2684              Head {h00=0x0026, h01=0x0050, text=»TDST35 LD A1,TTB:SA,A14 GET NEW PC«, t00=0x0018, t01=0x00e6}
0x2684…26a6              Head {h00=0x001e, h01=0x0050, text=» LD A2,TTB:PW,A14 AND PSW «, t00=0x0018, t01=0x0110}
0x26a6…26bc              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0018, t01=0x0132}
0x26bc…26c4              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0148}
0x26c4…26ee              Head {h00=0x0026, h01=0x0050, text=» MSR 2,A15 PUT PC AND PSW ON STACK«, t00=0x0018, t01=0x0150}
0x26ee…2718              Head {h00=0x0026, h01=0x0050, text=» ML 14,TTB:SA+2,A14 LOAD REGISTERS«, t00=0x0018, t01=0x017a}
0x2718…2720              Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0014}
0x2720…272c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x001c}
0x272c…2742              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0019, t01=0x0028}
0x2742…274a              Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x003e}
0x274a…2764              Head {h00=0x0016, h01=0x0050, text=» STR A1,A15 PUT PC«, t00=0x0019, t01=0x0046}
0x2764…2788              Head {h00=0x0020, h01=0x0050, text=» STR A2,A15 AND PSW ON STACK«, t00=0x0019, t01=0x0060}
0x2788…27b2              Head {h00=0x0026, h01=0x0050, text=» LD A1,TTB:SA+2,A14 LOAD REGISTERS«, t00=0x0019, t01=0x0084}
0x27b2…27ce              Head {h00=0x0018, h01=0x0050, text=» LD A2,TTB:SA+4,A14 «, t00=0x0019, t01=0x00ae}
0x27ce…27ea              Head {h00=0x0018, h01=0x0050, text=» LD A3,TTB:SA+6,A14 «, t00=0x0019, t01=0x00ca}
0x27ea…2806              Head {h00=0x0018, h01=0x0050, text=» LD A4,TTB:SA+8,A14 «, t00=0x0019, t01=0x00e6}
0x2806…2822              Head {h00=0x0018, h01=0x0050, text=» LD A5,TTB:SA+10,A14«, t00=0x0019, t01=0x0102}
0x2822…283e              Head {h00=0x0018, h01=0x0050, text=» LD A6,TTB:SA+12,A14«, t00=0x0019, t01=0x011e}
0x283e…285a              Head {h00=0x0018, h01=0x0050, text=» LD A7,TTB:SA+14,A14«, t00=0x0019, t01=0x013a}
0x285a…2876              Head {h00=0x0018, h01=0x0050, text=» LD A8,TTB:SA+16,A14«, t00=0x0019, t01=0x0156}
0x2876…2892              Head {h00=0x0018, h01=0x0050, text=» LD A9,TTB:SA+18,A14«, t00=0x0019, t01=0x0172}
0x2892…28b0              Head {h00=0x001a, h01=0x0050, text=» LD A10,TTB:SA+20,A14 «, t00=0x0019, t01=0x018e}
0x28b0…28ce              Head {h00=0x001a, h01=0x0050, text=» LD A11,TTB:SA+22,A14 «, t00=0x001a, t01=0x001c}
0x28ce…28ec              Head {h00=0x001a, h01=0x0050, text=» LD A12,TTB:SA+24,A14 «, t00=0x001a, t01=0x003a}
0x28ec…290a              Head {h00=0x001a, h01=0x0050, text=» LD A13,TTB:SA+26,A14 «, t00=0x001a, t01=0x0058}
0x290a…2928              Head {h00=0x001a, h01=0x0050, text=» LD A14,TTB:SA+28,A14 «, t00=0x001a, t01=0x0076}
0x2928…2930              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0094}
0x2930…293c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x009c}
0x293c…2944              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00a8}
0x2944…2964              Head {h00=0x001c, h01=0x0050, text=» RTN A15 START THE TASK «, t00=0x001a, t01=0x00b0}
0x2964…296c              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x00d0}
0x296c…2978              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x001a, t01=0x00d8}
0x2978…297c              Head {h00=0x4004, h01=0x0000}
0x297c…2980              00 1a 00 e4                                                                                                                                                                                                                                       ┆    ┆
0x2980…2988 (27, 1, 8)   20 04 00 00 00 1b 00 04                                                                                                                                                                                                                           ┆        ┆
0x2988…29d8 (28, 0, 400) 00 32 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54 00 04 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ 2 P*                                           *  T   2 P*                     ┆
0x29d8…2a28              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54 00 3a 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 41 4c 4f 43 53 47 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54   ┆                      *  T : 2 P*                ALOCSG                     *  T┆
0x2a28…2a78              00 70 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3d 3d 3d 3d 3d 3d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54 00 a6 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ p 2 P*                ======                     *  T   2 P*                   ┆
0x2a78…2ac8              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54 00 dc 00 32 00 50 2a 20 20 20 52 45 53 45 52 56 45 20 50 41 47 45 53 20 46 4f 52 20 52 45 53 49 44 45 4e 54 20 53 45 47 4d 45 4e 54 53 20 20 20 20 20 2a 20   ┆                        *  T   2 P*   RESERVE PAGES FOR RESIDENT SEGMENTS     * ┆
0x2ac8…2b18              00 54 01 12 00 32 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 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 00 54 01 48 00 32 00 50 2a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆ T   2 P*                                           *  T H 2 P*                 ┆

Reduced view