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

⟦3fc103b0a⟧

    Length: 17490 (0x4452)
    Notes: pts_type(SC)
    Names: »LRPINT.SC«

Derivation

└─⟦7a1dcd5a9⟧ Bits:30009673 Philips computer tape "600134"
    └─⟦this⟧ »PTMON/LRPINT.SC« 
└─⟦928b1fd3e⟧ Bits:30009671 Philips computer tape "600131"
    └─⟦this⟧ »UPDATE/LRPINT.SC« 

PTS(SC)

	IDENT LRPINT 	REL 11.0 81-09-16 870105041100 

			=2, POWER FAIL IN MOVES
			REL 11.0 81-07-27
			=1,60 HZ COND BUG
			REL 11.0 81-01-26

* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   LRPINT = INTERRUPT HANDLERS FOR LKM, RTC
*            AND POWER FAILURE
* 
* 
* 
* 
* 
**************************************************
* 
* 
*   THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS 
*   FOR TOSS. THESE ARE:
* 
*   -IHLKM:  LKM INTERRUPT
* 
*   -IHRTC:  RTC INTERRUPT
* 
*   -IHPFAR: POWER FAILURE INTERRUPT
* 
*   THE FOLLOWING ENTRIES ARE USED TO QUEUE TASKS:
* 
*   -LKMRQE: SET A7 = -1, QUEUE TASK AND DISPATCH 
* 
*   -LKMSRC: SET A7 TO RETURN CODE (C(A2)), QUEUE TASK AND DISPATCH 
* 
*   -LKMQDI: QUEUE TASK AND DISPATCH
* 
	EJECT			LRPINT 
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	IHLKM	LKM INTERRUPT HANDLER
	ENTRY	LKM030	SPECIAL TLDSEG REQUEST ERROR ENTRY
	ENTRY	LKMRQE	LKM REQUEST ERROR 
	ENTRY	LKMERR	HALT SYSTEM DUE TO FATAL LKM ERROR
	ENTRY	LKMQDI	QUEUE TASK AND DISPATCH 
	ENTRY	LKMSRC	SET RETURN CODE IN A7 TO USER 
	ENTRY	IHRTC	RTC INTERRUPT HANDLER
	ENTRY	TIMQUE	POINTER TO FIRST BLOCK IN TIMER QUEUE 
	ENTRY	MONCLO	MONITOR CLOCK 
	ENTRY	IHPFAR	POWER FAILURE INTERRUPT HANDLER 
	ENTRY	INIFLG	INITIALIZATION FLAG 
	ENTRY	PFPOST	PWF POST PROCESSING FLAG
	EJECT			LRPINT 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	DISQUE	DISPATCHER QUEUE
	EXTRN	PRUN	TTAB OF RUNNING TASK
	EXTRN	MEXIT	MONITOR TASK EXIT
	EXTRN	MONMMU	MONITOR (SYSTEM) MMU TABLE
	EXTRN	QTJOB	QUEUE TASK 
	EXTRN	QMJOB	QUEUE MONITOR TASK 
	EXTRN	SWL48	SWITCH TO LEVEL 48 
	EXTRN	SWLXY	SWITCH TO LEVEL XY 
	EXTRN	FREBLK	SET BLOCK FREE
	EXTRN	SAVE8	SAVE 8 REGISTERS 
	EXTRN	PFINIT	RESTART OF DEVICES
	EXTRN	HALT	HALT MODULE 
	EXTRN	INTSAV	INTERRUPT SAVE MODULE 
	EXTRN	RELPAG	RELEASE PAGE
	EXTRN	TLDSEG	LOAD SEGMENT LKM PROCESSOR
	EXTRN	TTB:SB	SEGMENT BLOCK POINTER 
	EXTRN	TTB:PW	PROGRAM STATUS WORD 
	EXTRN	TTB:SA	FIRST WORD OF SAVE AREA IN TTAB 
	EXTRN	LKMAL	LKM REQUEST TABLE
	EJECT			LRPINT 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	0
* 
* 
*	A PROGRAM VERSION USING TOSS DISC PAGING
*	IS OBTAINED BY SETTING DSKPAG EQU 1.
* 
DSKPAG	EQU	0
* 
* 
*	A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS
*	IS OBTAINED BY SETTING MONCLK EQU 0.
* 
X:A	EQU	1 
MONCLK	EQU	X:A
* 
	EJECT			LRPINT 
* 
* 
*	A PROGRAM VERSION SUPPORTING DATE FUNCTIONS 
*	IS OBTAINED BY SETTING MONDAT = MONCLK = 1. 
* 
X:B	EQU	0 
MONDAT	EQU	X:B
* 
* 
*	A PROGRAM VERSION WITH MONITOR CLOCK FUNCTIONS
*	ADAPTED TO 60 HERTZ NET FREQUENCY (USA/CANADA)
*	IS OBTAINED BY SETTING NETFRQ EQU 60. 
*	NOTICE THAT THE DEFAULT VALUE SHOULD BE 50. 
* 
NETFRQ	EQU	50 
* 
	EJECT			LRPINT 
* 
* 
*   I H L K M 
* 
* 
*   THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING
*   STEPS ARE CARRIED OUT:
* 
*   - IF STACK OVERFLOW SYSTEM HALTS. 
* 
*   - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING TASK
* 
*   - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO 
*     APPROPRIATE LKM PROCESSOR.
* 
*   EXIT CONDITIONS ARE:
* 
*   A4 = LABEL ADDRESS OF LKM REQUEST 
*        (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) 
*   A5 = TTAB ADDRESS OF CALLING TASK 
*   A6 = LKM DATA DIRECTIVE 
*   A2, A3 ARE DESTROYED
* 
*   ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING TASK
* 
* 
IHLKM	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	RIT	/1D	RESET INTERNAL INTERRUPT FLAG
* 
	EJECT			LRPINT 
* 
* 
	ST	A15,LKM010	SAVE A15 
	LD	A15,PRUN	LOAD TTAB ADDRESS
* 
	IFT	CPU852=1 
	ADKL	A15,TTB:SA+28	SET A15 TO LAST IN SAVE AREA
	STR	A14,A15	SAVE USER REGISTERS, -A14
	STR	A13,A15	-A13 
	STR	A12,A15	-A12 
	STR	A11,A15	-A11 
	STR	A10,A15	-A10 
	STR	A9,A15	-A9 
	STR	A8,A15	-A8 
	STR	A7,A15	-A7 
	STR	A6,A15	-A6 
	STR	A5,A15	-A5 
	STR	A4,A15	-A4 
	STR	A3,A15	-A3 
	STR	A2,A15	-A2 
	STR	A1,A15	-A1 
	XIF
* 
	IFT	CPU852=0 
	MS	14,TTB:SA+2,A15	SAVE A1-A14 IN TTAB SAVE AREA 
	XIF
* 
	LD	A5,PRUN	TTAB ADDRESS OF CALLING TASK
	LDKL	A15,0	RESTORE A15 STACK POINTER 
LKM010	EQU	*-2
* 
	EJECT			LRPINT 
* 
*   GET LKM REQUEST PARAMETERS
* 
	LDR*	A3,A15
	LDR*	A2,A15	LOAD P.C. AND ADJUST STACK POINTER 
	ST	A3,TTB:PW,A5	STORE PSW IN TTAB
* 
	IFT	MMUPAG=0 
	LD	A3,-2,A2	INSTRUCTION CODE 
	LDR*	A6,A2	DATA DIRECTIVE
	XIF
* 
	IFT	MMUPAG=1 
	ANK	A3,1 
	RF(NZ)	LKM015	USER MODE
	TL	MONMMU	NO, LOAD MONITOR MMU TABLE 
* 
LKM015	EQU	*
 	EL	A3,-2,A2	INSTRUCTION CODE
	ELR	A6,A2	DATA DIRECTIVE 
	XIF
* 
	CWK	A3,/2804 
	RF(E)	LKM025	LKM 
	CWK	A3,/6300 
	RF(E)	LKM025	TRAP
* 
*   STACK OVERFLOW: HALT SYSTEM 
* 
	LDK	A1,7	HALT PARAMETER
	RF	LKM070	HALT SYSTEM DUE TO STACK OVERFLOW
* 
	EJECT			LRPINT 
* 
* 
LKM025	EQU	*
	ADK	A2,2	UPDATE DISPATCH ADDRESS 
* 
	IFF	MMUPAG+DSKPAG=0
	CWK	A6,9	CHECK DATA DIRECTIVE
	ABL(E)	TLDSEG	LOAD SEGMENT REQUEST 
	XIF
* 
	IFT	DSKPAG=1 
	LD	A3,TTB:SB,A5	SEGMENT BLOCK ADDRESS
	RF(Z)	LKM030	NO SEGMENT
	LCR	A4,A3	SEGMENT STATUS 
	ANK	A4,/5E	CHECK IF CORE RESIDENT OR...
	RF(NZ)	LKM030	...USED BY AN INTERRUPTED TASK 
	CF	A15,RELPAG	RELEASE PAGE 
	XIF
* 
	EJECT			LRPINT 
* 
* 
LKM030	EQU	*
	CM	PRUN	INDICATE IDLE LOOP RUNNING 
	CF	A15,SWL48	SWITCH TO LEVEL 48
	LDK	A4,0 
	LDR	A3,A6	DATA DIRECTIVE 
	RF(NN)	LKM050	NO LABEL 
* 
*   LKM REQUEST WITH LABEL
* 
	IFT	MMUPAG=0 
	LDR*	A4,A2	LABEL 
	XIF
* 
	IFT	MMUPAG=1 
	ELR	A4,A2	LABEL
	XIF
* 
	ADK	A2,2	ADJUST DISPATCH ADDRESS 
	NGR	A3,A3	MAKE DATA DIRECTIVE POSITIVE 
* 
	EJECT			LRPINT 
* 
*   UPDATE TTB:SA AND GO TO LKM PROCESSOR 
* 
LKM050	EQU	*
	ST	A2,TTB:SA,A5	SET NEXT DISPATCH ADDRESS
	ADR	A3,A3	INDEX IN LKMAL 
	RF(Z)	LKMQDI	TASK SWITCH REQUEST 
	CW	A3,LKMAL
	RF(NL)	LKMRQE	INVALID DATA DIRECTIVE 
	INH
	LD	A3,LKMAL,A3 
	ABR(NZ)	A3	BRANCH TO LKM PROCESSOR 
* 
	EJECT			LRPINT 
* 
* 
*   L K M E R R 
* 
* 
LKMERR	LDK	A1,15	INDICATE REQUESTED LKM PROC. NOT PRESENT 
* 
LKM070	EQU	*
	CF	A15,HALT	HALT SYSTEM
* 
* 
*   L K M R Q E 
* 
*   SET A7 = -1, QUEUE TASK AND DISPATCH. 
* 
*   A5 = TTAB ADDRESS 
* 
* 
LKMRQE	EQU	*
	LDKL	A2,-1 
* 
* 
*   L K M S R C 
* 
*   SET A7 = A2, QUEUE TASK AND DISPATCH. 
* 
*   A2 = RETURN CODE
*   A5 = TTAB ADDRESS 
* 
* 
LKMSRC	EQU	*
	ST	A2,TTB:SA+14,A5	SET RETURN CODE IN SAVE AREA A7 
	EJECT
* 
* 
*   L K M Q D I 
* 
*   QUEUE TASK AND DISPATCH.
* 
*   A5 = TTAB ADDRESS 
* 
* 
LKMQDI	EQU	*
	CF	A15,QTJOB 
* 
T:DISP	EQU	*	COMMON EXIT TO DISPATCHER
	ABL	TDISP	GO TO DISPATCHER 
* 
	EJECT			LRPINT 

* 
*   I H P F A R 
* 
*   THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER.
* 



	DATA	0	SEGMENT BLOCK ADDRESS 
	DATA	0 
TTABPF	DATA	0	TTAB FOR POWER FAIL 
	DATA	'#P'
	DATA	0 
A15SAV	DATA	0 
	DATA	/00C0 
	DATA	PFTASK





PFX	DATA	1	POWER ON/OFF INDICATOR 
			P=POWER IS ON, N=POWER IS OFF

INIFLG	DATA	1	INITIALIZATION FLAG 
			NZ=INITIALIZATION

PFPOST	DATA	0	PWF POST PROCESSING FLAG
			NZ=PWF POST PROCESSING 
	EJECT			LRPINT 

* 
*   POWER FAIL/AUTO RESTART INTERRUPT 
* 

IHPFAR	EQU	*	 
	ST	P,INTSAV	SAVE LAST INTERRUPT
	RIT	/17	RESET INTERNAL INTERRUPT 
	C1S	PFX	INDICATE POWER ON OR OFF 
	RF(P)	POWON	POWER ON 
* 
*   POWER OFF 
* 
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A14 ON STACK
	STR	A9,A15 
	STR	A10,A15
	STR	A11,A15
	STR	A12,A15
	STR	A13,A15
	STR	A14,A15
	XIF

	IFT	CPU852=0 
	MSR	14,A15	SAVE A1-A14 ON STACK
	XIF
	IFT	MMUPAG=1 
	TS	-30,A15	SAVE MMU TABLE	=2 
	XIF

	ST	A15,A15SAV	SAVE A15 FOR BETTER TIMES
	HLT
	EJECT			LRPINT 

* 
*   POWER ON
* 

POWON	LD	A15,A15SAV	RELOAD A15

	IFT	MMUPAG=1 
	TL	-30,A15	RESTORE MMU TABLE	=2
	XIF
	IFT	CPU852=1 
	LDR*	A14,A15	RESTORE A9-A14
	LDR*	A13,A15 
	LDR*	A12,A15 
	LDR*	A11,A15 
	LDR*	A10,A15 
	LDR*	A9,A15
	XIF

	IFT	CPU852=0 
	MLR	14,A15	RESTORE A9-A14
	MSR	8,A15
	XIF

	LD	A1,DISQUE	QUEUE PFTASK FIRST FOR DISPATCHING
	LDKL	A2,TTABPF 
	CWR	A1,A2
	RB(E)	T:DISP	ALREADY QUEUED, PWF DURING PFPOST 
	STR	A1,A2
	ST	A2,DISQUE 
	IM	PFPOST	INDICATE PWF POST PROCESSING 
	RB	T:DISP
	EJECT			LRPINT 

* 
*   POWER FAIL TASK 
*   STARTED AFTER ALL PWF POST PROCESSING 
* 

PFTASK	CM	PFPOST	CLEAR PWF POST PROC FLAG 
	CM	INIFLG	AND INIT FLAG
	CF	A15,PFINIT	RESTART I/O DEVICES
	CM	PRUN	EXIT PFTASK
	RB	T:DISP
	EJECT			LRPINT 
* 
*   I H R T C 
* 
*   THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER.
*   THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS.
* 
IHRTC	ST	P,INTSAV	SAVE LAST INTERRUPT 
	RIT	/1B	RESET INTERRUPT FLAG 
	IM	COUNT 
	RF(P)	RTC010	CHECK TIMER QUEUE 
	RTN	A15
* 
RTC010	EQU	*
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 ON STACK
	XIF
* 
	EJECT			LRPINT 
* 
* 
	IFT	NETFRQ=50
	LDKL	A4,-4	SET 100 MS SWITCH 
	XIF
* 
	IFT	NETFRQ=60
	LDKL	A4,-5	SET 100 MS SWITCH 
	XIF
	ST	A4,COUNT		=1
* 
	LDKL	A2,CLOCK	QUEUE CLOCK ROUTINE AS MJOB
	CF	A15,QMJOB 
* 
	IFT	MONCLK=1 
	IM	SECOND
	RF(P)	RTC025	UPDATE MONITOR CLOCK
	XIF
* 
SWDISP	EQU	*
	CF	A15,SWLXY	SWITCH TO LEVEL XY
	RB	T:DISP
* 
	EJECT			LRPINT 
* 
* 
	IFT	MONCLK=1 
* 
*   MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. 
* 
RTC025	EQU	*
	LDKL	A4,-9	SET SECOND SWITCH 
	ST	A4,SECOND 
	LDK	A4,4 
* 
MCLO10	LDK	A3,60	NUMBER OF MINUTES AND SECONDS
* 
MCLO20	IM	MONCLO+2,A4	INCREMENT TIME
	XR	A3,MONCLO+2,A4	CHANGE MINUTES OR HOURS
	RB(NE)	SWDISP	GO TO DISPATCHER 
	CM	MONCLO+2,A4	RESTART TIME COUNTER
	SUK	A4,2	END 
	RF(N)	MCLO30	MIDNIGHT CARRY AND WE HAVE A NEW DAY
	RB(P)	MCLO10	UPDATE MINUTES
	LDK	A3,24	UPDATE HOURS 
	RB	MCLO20
* 
MCLO30	EQU	*
	IM	MCARRY	INCREMENT MIDNIGHT CARRY 
* 
	EJECT			LRPINT 
* 
* 
	IFT	MONDAT=1 
* 
*	UPDATE DAY, MONTH AND YEAR
* 
	IFT	CPU852=1 
	LDKL	A1,MONTH	MONTH ADDRESS
	LDKL	A2,DAY	DAY ADDRESS
	LDK	A3,1 
	XIF
* 
	IFT	MONCLK+MONDAT=2
	IFT	CPU852=0 
	MLK	3
	DATA	MONTH,DAY,1	MONTH AND DAY ADDRESS TO A1 AND A2
	XIF
* 
	IFT	MONCLK+MONDAT=2
	IMR	A2	INCREMENT DAY 
	LDR*	A4,A1	MONTH 
	LDR	A6,A4
	LDR*	A5,A2	NEW DAY 
	SUK	A5,29	CHECK IF DAY WAS 28
	RF(Z)	MCLO40	YES, GO AND CHECK IF FEBRUARY 
	SUK	A5,2	CHECK IF DAY WAS 30 
	RF(Z)	MCLO60	YES 
	SUK	A5,1	CHECK IF DAY WAS 31 
	RB(NZ)	SWDISP	NO, RETURN 
	RF	MCLO50	YES, WE HAVE A NEW MONTH 
* 
MCLO40	EQU	*
	SUK	A6,2	CHECK IF FEBRUARY 
	RB(NZ)	SWDISP	NO, RETURN 
* 
	EJECT			LRPINT 
* 
*	CHANGE TO NEW MONTH (AND YEAR?) 
* 
* 
MCLO50	EQU	*
	STR	A3,A2	SET DAY := 1 
	IMR	A1	INCREMENT MONTH 
	SUK	A4,12	CHECK IF MONTH WAS DECEMBER
	RB(NZ)	SWDISP	NO, RETURN 
	STR	A3,A1	SET MONTH TO JANUARY 
	IM	YEAR	HAPPY NEW YEAR!!!
	RB	SWDISP	RETURN 
* 
MCLO60	EQU	*
	LDR	A7,A6	MONTH
	ANK	A6,1 
	RF(Z)	MCLO70	MONTH EVEN
	SUK	A7,7 
	RB(P)	MCLO50	SEPTEMBER OR NOVEMBER 
	RB	SWDISP	JANUARY, MARCH, MAY OR JULY
* 
MCLO70	EQU	*
	SUK	A7,7 
	RB(N)	MCLO50	APRIL OR JUNE 
	XIF
* 
	IFT	MONCLK=1 
	RB	SWDISP	RETURN 
	XIF
* 
	EJECT			LRPINT 
* 
* 
*   M O N C L O 
* 
* 
	IFT	MONCLK+MONDAT=2
	DATA	0	THIS WORD USED BY MONTIM (TDATE)
YEAR	DATA	0 
MONTH	DATA	0
DAY	DATA	0
	XIF
* 
MONCLO	EQU	*
	IFT	MONCLK=1 
MCARRY	DATA	0	ACKUMULATED 24 HOUR CARRY 
	DATA	0	HOUR
	DATA	0	MINUTE
	DATA	0	SECOND
SECOND	DATA	0	SECOND SWITCH 
	XIF
* 
	EJECT			LRPINT 
* 
*   CLOCK ROUTINE STARTED EACH 100 MS.
* 
CLOCK	INH 
	LDKL	A4,TIMQUE	LOAD FIRST TIMER ADDRESS
* 
CLK10	LDR	A6,A4 
* 
CLK20	LDR*	A4,A6	TIMER BLOCK
	ABL(Z)	MEXIT	END OF QUEUE
	IM	4,A4	INCREMENT TIMER
	RB(N)	CLK10	NOT TIME OUT 
	RF(Z)	CLK30	TIME OUT 
	LDR*	A3,A4	RELEASE TIMER 
	STR	A3,A6
	CF	A15,FREBLK
	LDR	A4,A2
	CF	A15,FREBLK
	RB	CLK20 
* 
	EJECT			LRPINT 
* 
* 
CLK30	CF	A15,CLK40	CALL TIME OUT ROUTINE
	CF	A15,SWL48	SWITCH TO LEVEL 48
	INH
	RB	CLK10 
* 
CLK40	EQU	* 
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 ON STACK
	XIF
* 
	LDKL	A1,/C4C0	LEVEL 49 AND ENABLE
	ST	A1,18,A15	SET NEW PSW ON STACK
	LD	A2,2,A4	LOAD DISP BLOCK 
	LD	A1,4,A2	PARAMETER 
	ABI	2,A2	GO TO TIME OUT ROUTINE
* 
* 
COUNT	DATA	0	100 MS SWITCH
* 
* 
*   T I M Q U E 
* 
*   POINTER TO FIRST BLOCK IN TIMER QUEUE 
* 
* 
TIMQUE	EQU	*
	DATA	0 
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT LRPINT  REL 11.0 81-09-16 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0060              Head {h00=0x001e, h01=0x0050, text=»   =2, POWER FAIL IN MOVES«, t00=0x0000, t01=0x0042}
0x0060…007c              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-07-27«, t00=0x0000, t01=0x0064}
0x007c…0098              Head {h00=0x0018, h01=0x0050, text=»   =1,60 HZ COND BUG«, t00=0x0000, t01=0x0080}
0x0098…00b4              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0000, t01=0x009c}
0x00b4…00bc              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x00b8}
0x00bc…00c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c0}
0x00c6…00d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ca}
0x00d0…010a              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x00d4}
0x010a…0114              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…013c              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0118}
0x013c…0146              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0140}
0x0146…017a              Head {h00=0x0030, h01=0x0050, text=»*   LRPINT = INTERRUPT HANDLERS FOR LKM, RTC«, t00=0x0000, t01=0x014a}
0x017a…01a0              Head {h00=0x0022, h01=0x0050, text=»*            AND POWER FAILURE«, t00=0x0000, t01=0x017e}
0x01a0…01aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0014}
0x01aa…01b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x001e}
0x01b4…01be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0028}
0x01be…01c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0032}
0x01c8…01d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003c}
0x01d2…020c              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x0046}
0x020c…0216              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0080}
0x0216…0220              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008a}
0x0220…025e              Head {h00=0x003a, h01=0x0050, text=»*   THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS «, t00=0x0001, t01=0x0094}
0x025e…027e              Head {h00=0x001c, h01=0x0050, text=»*   FOR TOSS. THESE ARE:«, t00=0x0001, t01=0x00d2}
0x027e…0288              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f2}
0x0288…02aa              Head {h00=0x001e, h01=0x0050, text=»*   -IHLKM:  LKM INTERRUPT«, t00=0x0001, t01=0x00fc}
0x02aa…02b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x011e}
0x02b4…02d6              Head {h00=0x001e, h01=0x0050, text=»*   -IHRTC:  RTC INTERRUPT«, t00=0x0001, t01=0x0128}
0x02d6…02e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014a}
0x02e0…030c              Head {h00=0x0028, h01=0x0050, text=»*   -IHPFAR: POWER FAILURE INTERRUPT«, t00=0x0001, t01=0x0154}
0x030c…0316              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0180}
0x0316…0350              Head {h00=0x0036, h01=0x0050, text=»*   THE FOLLOWING ENTRIES ARE USED TO QUEUE TASKS:«, t00=0x0001, t01=0x018a}
0x0350…035a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0034}
0x035a…0394              Head {h00=0x0036, h01=0x0050, text=»*   -LKMRQE: SET A7 = -1, QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x003e}
0x0394…039e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0078}
0x039e…03ea              Head {h00=0x0048, h01=0x0050, text=»*   -LKMSRC: SET A7 TO RETURN CODE (C(A2)), QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x0082}
0x03ea…03f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ce}
0x03f4…0420              Head {h00=0x0028, h01=0x0050, text=»*   -LKMQDI: QUEUE TASK AND DISPATCH«, t00=0x0002, t01=0x00d8}
0x0420…042a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0104}
0x042a…0442              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0002, t01=0x010e}
0x0442…044c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0126}
0x044c…0456              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0130}
0x0456…046a              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x013a}
0x046a…047e              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x014e}
0x047e…0492              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0162}
0x0492…049c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x049c…04a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0180}
0x04a6…04d0              Head {h00=0x0026, h01=0x0050, text=» ENTRY IHLKM LKM INTERRUPT HANDLER«, t00=0x0002, t01=0x018a}
0x04d0…0508              Head {h00=0x0034, h01=0x0050, text=» ENTRY LKM030 SPECIAL TLDSEG REQUEST ERROR ENTRY«, t00=0x0003, t01=0x0024}
0x0508…0530              Head {h00=0x0024, h01=0x0050, text=» ENTRY LKMRQE LKM REQUEST ERROR «, t00=0x0003, t01=0x005c}
0x0530…0568              Head {h00=0x0034, h01=0x0050, text=» ENTRY LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR«, t00=0x0003, t01=0x0084}
0x0568…0596              Head {h00=0x002a, h01=0x0050, text=» ENTRY LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0003, t01=0x00bc}
0x0596…05ca              Head {h00=0x0030, h01=0x0050, text=» ENTRY LKMSRC SET RETURN CODE IN A7 TO USER «, t00=0x0003, t01=0x00ea}
0x05ca…05f4              Head {h00=0x0026, h01=0x0050, text=» ENTRY IHRTC RTC INTERRUPT HANDLER«, t00=0x0003, t01=0x011e}
0x05f4…0630              Head {h00=0x0038, h01=0x0050, text=» ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x0003, t01=0x0148}
0x0630…0654              Head {h00=0x0020, h01=0x0050, text=» ENTRY MONCLO MONITOR CLOCK «, t00=0x0003, t01=0x0184}
0x0654…068a              Head {h00=0x0032, h01=0x0050, text=» ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER «, t00=0x0004, t01=0x0018}
0x068a…06b4              Head {h00=0x0026, h01=0x0050, text=» ENTRY INIFLG INITIALIZATION FLAG «, t00=0x0004, t01=0x004e}
0x06b4…06e2              Head {h00=0x002a, h01=0x0050, text=» ENTRY PFPOST PWF POST PROCESSING FLAG«, t00=0x0004, t01=0x0078}
0x06e2…06fa              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0004, t01=0x00a6}
0x06fa…0704              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00be}
0x0704…070e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00c8}
0x070e…0724              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x00d2}
0x0724…073a              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x00e8}
0x073a…0750              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x00fe}
0x0750…075a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0114}
0x075a…0764              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x011e}
0x0764…0784              Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0004, t01=0x0128}
0x0784…07aa              Head {h00=0x0022, h01=0x0050, text=» EXTRN DISQUE DISPATCHER QUEUE«, t00=0x0004, t01=0x0148}
0x07aa…07d2              Head {h00=0x0024, h01=0x0050, text=» EXTRN PRUN TTAB OF RUNNING TASK«, t00=0x0004, t01=0x016e}
0x07d2…07f8              Head {h00=0x0022, h01=0x0050, text=» EXTRN MEXIT MONITOR TASK EXIT«, t00=0x0005, t01=0x0008}
0x07f8…0828              Head {h00=0x002c, h01=0x0050, text=» EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE«, t00=0x0005, t01=0x002e}
0x0828…0848              Head {h00=0x001c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK «, t00=0x0005, t01=0x005e}
0x0848…0870              Head {h00=0x0024, h01=0x0050, text=» EXTRN QMJOB QUEUE MONITOR TASK «, t00=0x0005, t01=0x007e}
0x0870…0898              Head {h00=0x0024, h01=0x0050, text=» EXTRN SWL48 SWITCH TO LEVEL 48 «, t00=0x0005, t01=0x00a6}
0x0898…08c0              Head {h00=0x0024, h01=0x0050, text=» EXTRN SWLXY SWITCH TO LEVEL XY «, t00=0x0005, t01=0x00ce}
0x08c0…08e4              Head {h00=0x0020, h01=0x0050, text=» EXTRN FREBLK SET BLOCK FREE«, t00=0x0005, t01=0x00f6}
0x08e4…090a              Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0005, t01=0x011a}
0x090a…0932              Head {h00=0x0024, h01=0x0050, text=» EXTRN PFINIT RESTART OF DEVICES«, t00=0x0005, t01=0x0140}
0x0932…0952              Head {h00=0x001c, h01=0x0050, text=» EXTRN HALT HALT MODULE «, t00=0x0005, t01=0x0168}
0x0952…097e              Head {h00=0x0028, h01=0x0050, text=» EXTRN INTSAV INTERRUPT SAVE MODULE «, t00=0x0005, t01=0x0188}
0x097e…09a0              Head {h00=0x001e, h01=0x0050, text=» EXTRN RELPAG RELEASE PAGE«, t00=0x0006, t01=0x0024}
0x09a0…09d0              Head {h00=0x002c, h01=0x0050, text=» EXTRN TLDSEG LOAD SEGMENT LKM PROCESSOR«, t00=0x0006, t01=0x0046}
0x09d0…09fc              Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK POINTER «, t00=0x0006, t01=0x0076}
0x09fc…0a26              Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0006, t01=0x00a2}
0x0a26…0a5c              Head {h00=0x0032, h01=0x0050, text=» EXTRN TTB:SA FIRST WORD OF SAVE AREA IN TTAB «, t00=0x0006, t01=0x00cc}
0x0a5c…0a82              Head {h00=0x0022, h01=0x0050, text=» EXTRN LKMAL LKM REQUEST TABLE«, t00=0x0006, t01=0x0102}
0x0a82…0a9a              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0006, t01=0x0128}
0x0a9a…0aa4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0140}
0x0aa4…0aae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014a}
0x0aae…0ae0              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0006, t01=0x0154}
0x0ae0…0aea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0186}
0x0aea…0b08              Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0006, t01=0x0190}
0x0b08…0b12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001e}
0x0b12…0b44              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0007, t01=0x0028}
0x0b44…0b4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005a}
0x0b4e…0b80              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0007, t01=0x0064}
0x0b80…0bae              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0007, t01=0x0096}
0x0bae…0bb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c4}
0x0bb8…0bcc              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0007, t01=0x00ce}
0x0bcc…0bd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00e2}
0x0bd6…0be0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ec}
0x0be0…0c1a              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0007, t01=0x00f6}
0x0c1a…0c4c              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0007, t01=0x0130}
0x0c4c…0c56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0162}
0x0c56…0c6a              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 0«, t00=0x0007, t01=0x016c}
0x0c6a…0c74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0180}
0x0c74…0c7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x018a}
0x0c7e…0cb0 (8, 0, 400)  Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS DISC PAGING«, t00=0x0008, t01=0x0004}
0x0cb0…0cde              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING DSKPAG EQU 1.«, t00=0x0008, t01=0x0036}
0x0cde…0ce8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0064}
0x0ce8…0cfc              Head {h00=0x0010, h01=0x0050, text=»DSKPAG EQU 0«, t00=0x0008, t01=0x006e}
0x0cfc…0d06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0082}
0x0d06…0d10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x008c}
0x0d10…0d4c              Head {h00=0x0038, h01=0x0050, text=»* A PROGRAM VERSION USING NO MONITOR CLOCK FUNCTIONS«, t00=0x0008, t01=0x0096}
0x0d4c…0d7a              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MONCLK EQU 0.«, t00=0x0008, t01=0x00d2}
0x0d7a…0d84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0100}
0x0d84…0d96              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 1 «, t00=0x0008, t01=0x010a}
0x0d96…0dac              Head {h00=0x0012, h01=0x0050, text=»MONCLK EQU X:A«, t00=0x0008, t01=0x011c}
0x0dac…0db6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0132}
0x0db6…0dce              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0008, t01=0x013c}
0x0dce…0dd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0154}
0x0dd8…0de2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015e}
0x0de2…0e18              Head {h00=0x0032, h01=0x0050, text=»* A PROGRAM VERSION SUPPORTING DATE FUNCTIONS «, t00=0x0008, t01=0x0168}
0x0e18…0e4e              Head {h00=0x0032, h01=0x0050, text=»* IS OBTAINED BY SETTING MONDAT = MONCLK = 1. «, t00=0x0009, t01=0x000e}
0x0e4e…0e58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0044}
0x0e58…0e6a              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x0009, t01=0x004e}
0x0e6a…0e80              Head {h00=0x0012, h01=0x0050, text=»MONDAT EQU X:B«, t00=0x0009, t01=0x0060}
0x0e80…0e8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0076}
0x0e8a…0e94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0080}
0x0e94…0ecc              Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION WITH MONITOR CLOCK FUNCTIONS«, t00=0x0009, t01=0x008a}
0x0ecc…0f04              Head {h00=0x0034, h01=0x0050, text=»* ADAPTED TO 60 HERTZ NET FREQUENCY (USA/CANADA)«, t00=0x0009, t01=0x00c2}
0x0f04…0f34              Head {h00=0x002c, h01=0x0050, text=»* IS OBTAINED BY SETTING NETFRQ EQU 60. «, t00=0x0009, t01=0x00fa}
0x0f34…0f6a              Head {h00=0x0032, h01=0x0050, text=»* NOTICE THAT THE DEFAULT VALUE SHOULD BE 50. «, t00=0x0009, t01=0x012a}
0x0f6a…0f74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0160}
0x0f74…0f8a              Head {h00=0x0012, h01=0x0050, text=»NETFRQ EQU 50 «, t00=0x0009, t01=0x016a}
0x0f8a…0f94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0180}
0x0f94…0fac              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0009, t01=0x018a}
0x0fac…0fb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0012}
0x0fb6…0fc0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001c}
0x0fc0…0fd6              Head {h00=0x0012, h01=0x0050, text=»*   I H L K M «, t00=0x000a, t01=0x0026}
0x0fd6…0fe0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003c}
0x0fe0…0fea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0046}
0x0fea…1026              Head {h00=0x0038, h01=0x0050, text=»*   THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING«, t00=0x000a, t01=0x0050}
0x1026…1048              Head {h00=0x001e, h01=0x0050, text=»*   STEPS ARE CARRIED OUT:«, t00=0x000a, t01=0x008c}
0x1048…1052              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00ae}
0x1052…1080              Head {h00=0x002a, h01=0x0050, text=»*   - IF STACK OVERFLOW SYSTEM HALTS. «, t00=0x000a, t01=0x00b8}
0x1080…108a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e6}
0x108a…10d2              Head {h00=0x0044, h01=0x0050, text=»*   - ELSE REGISTERS A1 - A14 ARE SAVED IN TTAB FOR RUNNING TASK«, t00=0x000a, t01=0x00f0}
0x10d2…10dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0138}
0x10dc…111a              Head {h00=0x003a, h01=0x0050, text=»*   - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO «, t00=0x000a, t01=0x0142}
0x111a…1142              Head {h00=0x0024, h01=0x0050, text=»*     APPROPRIATE LKM PROCESSOR.«, t00=0x000a, t01=0x0180}
0x1142…114c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0018}
0x114c…116c              Head {h00=0x001c, h01=0x0050, text=»*   EXIT CONDITIONS ARE:«, t00=0x000b, t01=0x0022}
0x116c…1176              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0042}
0x1176…11a4              Head {h00=0x002a, h01=0x0050, text=»*   A4 = LABEL ADDRESS OF LKM REQUEST «, t00=0x000b, t01=0x004c}
0x11a4…11e0              Head {h00=0x0038, h01=0x0050, text=»*        (A4 = 0 INDICATES NO LABEL IN LKM REQUEST) «, t00=0x000b, t01=0x007a}
0x11e0…120e              Head {h00=0x002a, h01=0x0050, text=»*   A5 = TTAB ADDRESS OF CALLING TASK «, t00=0x000b, t01=0x00b6}
0x120e…1232              Head {h00=0x0020, h01=0x0050, text=»*   A6 = LKM DATA DIRECTIVE «, t00=0x000b, t01=0x00e4}
0x1232…1252              Head {h00=0x001c, h01=0x0050, text=»*   A2, A3 ARE DESTROYED«, t00=0x000b, t01=0x0108}
0x1252…125c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0128}
0x125c…129e              Head {h00=0x003e, h01=0x0050, text=»*   ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING TASK«, t00=0x000b, t01=0x0132}
0x129e…12a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0174}
0x12a8…12b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x017e}
0x12b2…12c6              Head {h00=0x0010, h01=0x0050, text=»IHLKM EQU * «, t00=0x000b, t01=0x0188}
0x12c6…12ee              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x000c, t01=0x000c}
0x12ee…131c              Head {h00=0x002a, h01=0x0050, text=» RIT /1D RESET INTERNAL INTERRUPT FLAG«, t00=0x000c, t01=0x0034}
0x131c…1326              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0062}
0x1326…133e              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x000c, t01=0x006c}
0x133e…1348              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0084}
0x1348…1352              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1352…1372              Head {h00=0x001c, h01=0x0050, text=» ST A15,LKM010 SAVE A15 «, t00=0x000c, t01=0x0098}
0x1372…1398              Head {h00=0x0022, h01=0x0050, text=» LD A15,PRUN LOAD TTAB ADDRESS«, t00=0x000c, t01=0x00b8}
0x1398…13a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00de}
0x13a2…13b8              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x000c, t01=0x00e8}
0x13b8…13f0              Head {h00=0x0034, h01=0x0050, text=» ADKL A15,TTB:SA+28 SET A15 TO LAST IN SAVE AREA«, t00=0x000c, t01=0x00fe}
0x13f0…141e              Head {h00=0x002a, h01=0x0050, text=» STR A14,A15 SAVE USER REGISTERS, -A14«, t00=0x000c, t01=0x0136}
0x141e…1438              Head {h00=0x0016, h01=0x0050, text=» STR A13,A15 -A13 «, t00=0x000c, t01=0x0164}
0x1438…1452              Head {h00=0x0016, h01=0x0050, text=» STR A12,A15 -A12 «, t00=0x000c, t01=0x017e}
0x1452…146c              Head {h00=0x0016, h01=0x0050, text=» STR A11,A15 -A11 «, t00=0x000d, t01=0x0008}
0x146c…1486              Head {h00=0x0016, h01=0x0050, text=» STR A10,A15 -A10 «, t00=0x000d, t01=0x0022}
0x1486…149e              Head {h00=0x0014, h01=0x0050, text=» STR A9,A15 -A9 «, t00=0x000d, t01=0x003c}
0x149e…14b6              Head {h00=0x0014, h01=0x0050, text=» STR A8,A15 -A8 «, t00=0x000d, t01=0x0054}
0x14b6…14ce              Head {h00=0x0014, h01=0x0050, text=» STR A7,A15 -A7 «, t00=0x000d, t01=0x006c}
0x14ce…14e6              Head {h00=0x0014, h01=0x0050, text=» STR A6,A15 -A6 «, t00=0x000d, t01=0x0084}
0x14e6…14fe              Head {h00=0x0014, h01=0x0050, text=» STR A5,A15 -A5 «, t00=0x000d, t01=0x009c}
0x14fe…1516              Head {h00=0x0014, h01=0x0050, text=» STR A4,A15 -A4 «, t00=0x000d, t01=0x00b4}
0x1516…152e              Head {h00=0x0014, h01=0x0050, text=» STR A3,A15 -A3 «, t00=0x000d, t01=0x00cc}
0x152e…1546              Head {h00=0x0014, h01=0x0050, text=» STR A2,A15 -A2 «, t00=0x000d, t01=0x00e4}
0x1546…155e              Head {h00=0x0014, h01=0x0050, text=» STR A1,A15 -A1 «, t00=0x000d, t01=0x00fc}
0x155e…156a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0114}
0x156a…1574              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0120}
0x1574…158a              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x000d, t01=0x012a}
0x158a…15c4              Head {h00=0x0036, h01=0x0050, text=» MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA «, t00=0x000d, t01=0x0140}
0x15c4…15d0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x017a}
0x15d0…15da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0186}
0x15da…160a              Head {h00=0x002c, h01=0x0050, text=» LD A5,PRUN TTAB ADDRESS OF CALLING TASK«, t00=0x000d, t01=0x0190}
0x160a…1638              Head {h00=0x002a, h01=0x0050, text=» LDKL A15,0 RESTORE A15 STACK POINTER «, t00=0x000e, t01=0x0030}
0x1638…164e              Head {h00=0x0012, h01=0x0050, text=»LKM010 EQU *-2«, t00=0x000e, t01=0x005e}
0x164e…1658              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0074}
0x1658…1670              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x000e, t01=0x007e}
0x1670…167a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0096}
0x167a…16a0              Head {h00=0x0022, h01=0x0050, text=»*   GET LKM REQUEST PARAMETERS«, t00=0x000e, t01=0x00a0}
0x16a0…16aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c6}
0x16aa…16be              Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A15«, t00=0x000e, t01=0x00d0}
0x16be…16f6              Head {h00=0x0034, h01=0x0050, text=» LDR* A2,A15 LOAD P.C. AND ADJUST STACK POINTER «, t00=0x000e, t01=0x00e4}
0x16f6…1720              Head {h00=0x0026, h01=0x0050, text=» ST A3,TTB:PW,A5 STORE PSW IN TTAB«, t00=0x000e, t01=0x011c}
0x1720…172a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0146}
0x172a…1740              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x0150}
0x1740…1766              Head {h00=0x0022, h01=0x0050, text=» LD A3,-2,A2 INSTRUCTION CODE «, t00=0x000e, t01=0x0166}
0x1766…1788              Head {h00=0x001e, h01=0x0050, text=» LDR* A6,A2 DATA DIRECTIVE«, t00=0x000e, t01=0x018c}
0x1788…1794              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x001e}
0x1794…179e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x002a}
0x179e…17b4              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0034}
0x17b4…17c6              Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x000f, t01=0x004a}
0x17c6…17e6              Head {h00=0x001c, h01=0x0050, text=» RF(NZ) LKM015 USER MODE«, t00=0x000f, t01=0x005c}
0x17e6…1814              Head {h00=0x002a, h01=0x0050, text=» TL MONMMU NO, LOAD MONITOR MMU TABLE «, t00=0x000f, t01=0x007c}
0x1814…181e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00aa}
0x181e…1832              Head {h00=0x0010, h01=0x0050, text=»LKM015 EQU *«, t00=0x000f, t01=0x00b4}
0x1832…1858              Head {h00=0x0022, h01=0x0050, text=»  EL A3,-2,A2 INSTRUCTION CODE«, t00=0x000f, t01=0x00c8}
0x1858…187a              Head {h00=0x001e, h01=0x0050, text=» ELR A6,A2 DATA DIRECTIVE «, t00=0x000f, t01=0x00ee}
0x187a…1886              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0110}
0x1886…1890              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x011c}
0x1890…18a6              Head {h00=0x0012, h01=0x0050, text=» CWK A3,/2804 «, t00=0x000f, t01=0x0126}
0x18a6…18c0              Head {h00=0x0016, h01=0x0050, text=» RF(E) LKM025 LKM «, t00=0x000f, t01=0x013c}
0x18c0…18d6              Head {h00=0x0012, h01=0x0050, text=» CWK A3,/6300 «, t00=0x000f, t01=0x0156}
0x18d6…18f0              Head {h00=0x0016, h01=0x0050, text=» RF(E) LKM025 TRAP«, t00=0x000f, t01=0x016c}
0x18f0…18fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0186}
0x18fa…1922              Head {h00=0x0024, h01=0x0050, text=»*   STACK OVERFLOW: HALT SYSTEM «, t00=0x000f, t01=0x0190}
0x1922…192c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0028}
0x192c…194c              Head {h00=0x001c, h01=0x0050, text=» LDK A1,7 HALT PARAMETER«, t00=0x0010, t01=0x0032}
0x194c…1980              Head {h00=0x0030, h01=0x0050, text=» RF LKM070 HALT SYSTEM DUE TO STACK OVERFLOW«, t00=0x0010, t01=0x0052}
0x1980…198a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0086}
0x198a…19a2              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0010, t01=0x0090}
0x19a2…19ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a8}
0x19ac…19b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b2}
0x19b6…19ca              Head {h00=0x0010, h01=0x0050, text=»LKM025 EQU *«, t00=0x0010, t01=0x00bc}
0x19ca…19f4              Head {h00=0x0026, h01=0x0050, text=» ADK A2,2 UPDATE DISPATCH ADDRESS «, t00=0x0010, t01=0x00d0}
0x19f4…19fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00fa}
0x19fe…1a1a              Head {h00=0x0018, h01=0x0050, text=» IFF MMUPAG+DSKPAG=0«, t00=0x0010, t01=0x0104}
0x1a1a…1a40              Head {h00=0x0022, h01=0x0050, text=» CWK A6,9 CHECK DATA DIRECTIVE«, t00=0x0010, t01=0x0120}
0x1a40…1a6c              Head {h00=0x0028, h01=0x0050, text=» ABL(E) TLDSEG LOAD SEGMENT REQUEST «, t00=0x0010, t01=0x0146}
0x1a6c…1a78              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0172}
0x1a78…1a82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017e}
0x1a82…1a98              Head {h00=0x0012, h01=0x0050, text=» IFT DSKPAG=1 «, t00=0x0010, t01=0x0188}
0x1a98…1ac6              Head {h00=0x002a, h01=0x0050, text=» LD A3,TTB:SB,A5 SEGMENT BLOCK ADDRESS«, t00=0x0011, t01=0x000e}
0x1ac6…1ae6              Head {h00=0x001c, h01=0x0050, text=» RF(Z) LKM030 NO SEGMENT«, t00=0x0011, t01=0x003c}
0x1ae6…1b08              Head {h00=0x001e, h01=0x0050, text=» LCR A4,A3 SEGMENT STATUS «, t00=0x0011, t01=0x005c}
0x1b08…1b38              Head {h00=0x002c, h01=0x0050, text=» ANK A4,/5E CHECK IF CORE RESIDENT OR...«, t00=0x0011, t01=0x007e}
0x1b38…1b6e              Head {h00=0x0032, h01=0x0050, text=» RF(NZ) LKM030 ...USED BY AN INTERRUPTED TASK «, t00=0x0011, t01=0x00ae}
0x1b6e…1b92              Head {h00=0x0020, h01=0x0050, text=» CF A15,RELPAG RELEASE PAGE «, t00=0x0011, t01=0x00e4}
0x1b92…1b9e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0108}
0x1b9e…1ba8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0114}
0x1ba8…1bc0              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0011, t01=0x011e}
0x1bc0…1bca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0136}
0x1bca…1bd4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0140}
0x1bd4…1be8              Head {h00=0x0010, h01=0x0050, text=»LKM030 EQU *«, t00=0x0011, t01=0x014a}
0x1be8…1c14              Head {h00=0x0028, h01=0x0050, text=» CM PRUN INDICATE IDLE LOOP RUNNING «, t00=0x0011, t01=0x015e}
0x1c14…1c3c              Head {h00=0x0024, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48«, t00=0x0011, t01=0x018a}
0x1c3c…1c4e              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0012, t01=0x0022}
0x1c4e…1c70              Head {h00=0x001e, h01=0x0050, text=» LDR A3,A6 DATA DIRECTIVE «, t00=0x0012, t01=0x0034}
0x1c70…1c90              Head {h00=0x001c, h01=0x0050, text=» RF(NN) LKM050 NO LABEL «, t00=0x0012, t01=0x0056}
0x1c90…1c9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0076}
0x1c9a…1cbc              Head {h00=0x001e, h01=0x0050, text=»*   LKM REQUEST WITH LABEL«, t00=0x0012, t01=0x0080}
0x1cbc…1cc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a2}
0x1cc6…1cdc              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0012, t01=0x00ac}
0x1cdc…1cf6              Head {h00=0x0016, h01=0x0050, text=» LDR* A4,A2 LABEL «, t00=0x0012, t01=0x00c2}
0x1cf6…1d02              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x00dc}
0x1d02…1d0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e8}
0x1d0c…1d22              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0012, t01=0x00f2}
0x1d22…1d3a              Head {h00=0x0014, h01=0x0050, text=» ELR A4,A2 LABEL«, t00=0x0012, t01=0x0108}
0x1d3a…1d46              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x0120}
0x1d46…1d50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x012c}
0x1d50…1d7a              Head {h00=0x0026, h01=0x0050, text=» ADK A2,2 ADJUST DISPATCH ADDRESS «, t00=0x0012, t01=0x0136}
0x1d7a…1daa              Head {h00=0x002c, h01=0x0050, text=» NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE «, t00=0x0012, t01=0x0160}
0x1daa…1db4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0190}
0x1db4…1dcc              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0013, t01=0x000a}
0x1dcc…1dd6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0022}
0x1dd6…1e08              Head {h00=0x002e, h01=0x0050, text=»*   UPDATE TTB:SA AND GO TO LKM PROCESSOR «, t00=0x0013, t01=0x002c}
0x1e08…1e12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x005e}
0x1e12…1e26              Head {h00=0x0010, h01=0x0050, text=»LKM050 EQU *«, t00=0x0013, t01=0x0068}
0x1e26…1e58              Head {h00=0x002e, h01=0x0050, text=» ST A2,TTB:SA,A5 SET NEXT DISPATCH ADDRESS«, t00=0x0013, t01=0x007c}
0x1e58…1e7a              Head {h00=0x001e, h01=0x0050, text=» ADR A3,A3 INDEX IN LKMAL «, t00=0x0013, t01=0x00ae}
0x1e7a…1ea4              Head {h00=0x0026, h01=0x0050, text=» RF(Z) LKMQDI TASK SWITCH REQUEST «, t00=0x0013, t01=0x00d0}
0x1ea4…1eb8              Head {h00=0x0010, h01=0x0050, text=» CW A3,LKMAL«, t00=0x0013, t01=0x00fa}
0x1eb8…1ee6              Head {h00=0x002a, h01=0x0050, text=» RF(NL) LKMRQE INVALID DATA DIRECTIVE «, t00=0x0013, t01=0x010e}
0x1ee6…1ef2              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0013, t01=0x013c}
0x1ef2…1f0a              Head {h00=0x0014, h01=0x0050, text=» LD A3,LKMAL,A3 «, t00=0x0013, t01=0x0148}
0x1f0a…1f36              Head {h00=0x0028, h01=0x0050, text=» ABR(NZ) A3 BRANCH TO LKM PROCESSOR «, t00=0x0013, t01=0x0160}
0x1f36…1f40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x018c}
0x1f40…1f58              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0014, t01=0x0008}
0x1f58…1f62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0020}
0x1f62…1f6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x002a}
0x1f6c…1f84              Head {h00=0x0014, h01=0x0050, text=»*   L K M E R R «, t00=0x0014, t01=0x0034}
0x1f84…1f8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004c}
0x1f8e…1f98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0056}
0x1f98…1fda              Head {h00=0x003e, h01=0x0050, text=»LKMERR LDK A1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT «, t00=0x0014, t01=0x0060}
0x1fda…1fe4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00a2}
0x1fe4…1ff8              Head {h00=0x0010, h01=0x0050, text=»LKM070 EQU *«, t00=0x0014, t01=0x00ac}
0x1ff8…2018              Head {h00=0x001c, h01=0x0050, text=» CF A15,HALT HALT SYSTEM«, t00=0x0014, t01=0x00c0}
0x2018…2022              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00e0}
0x2022…202c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00ea}
0x202c…2044              Head {h00=0x0014, h01=0x0050, text=»*   L K M R Q E «, t00=0x0014, t01=0x00f4}
0x2044…204e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x010c}
0x204e…2080              Head {h00=0x002e, h01=0x0050, text=»*   SET A7 = -1, QUEUE TASK AND DISPATCH. «, t00=0x0014, t01=0x0116}
0x2080…208a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0148}
0x208a…20a8              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0014, t01=0x0152}
0x20a8…20b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0170}
0x20b2…20bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x017a}
0x20bc…20d0              Head {h00=0x0010, h01=0x0050, text=»LKMRQE EQU *«, t00=0x0014, t01=0x0184}
0x20d0…20e4              Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0015, t01=0x0008}
0x20e4…20ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x001c}
0x20ee…20f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0026}
0x20f8…2110              Head {h00=0x0014, h01=0x0050, text=»*   L K M S R C «, t00=0x0015, t01=0x0030}
0x2110…211a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0048}
0x211a…214c              Head {h00=0x002e, h01=0x0050, text=»*   SET A7 = A2, QUEUE TASK AND DISPATCH. «, t00=0x0015, t01=0x0052}
0x214c…2156              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0084}
0x2156…2172              Head {h00=0x0018, h01=0x0050, text=»*   A2 = RETURN CODE«, t00=0x0015, t01=0x008e}
0x2172…2190              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0015, t01=0x00aa}
0x2190…219a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c8}
0x219a…21a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d2}
0x21a4…21b8              Head {h00=0x0010, h01=0x0050, text=»LKMSRC EQU *«, t00=0x0015, t01=0x00dc}
0x21b8…21f4              Head {h00=0x0038, h01=0x0050, text=» ST A2,TTB:SA+14,A5 SET RETURN CODE IN SAVE AREA A7 «, t00=0x0015, t01=0x00f0}
0x21f4…2202              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x012c}
0x2202…220c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x013a}
0x220c…2216              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0144}
0x2216…222e              Head {h00=0x0014, h01=0x0050, text=»*   L K M Q D I «, t00=0x0015, t01=0x014e}
0x222e…2238              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0166}
0x2238…225c              Head {h00=0x0020, h01=0x0050, text=»*   QUEUE TASK AND DISPATCH.«, t00=0x0015, t01=0x0170}
0x225c…2266 (22, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0004}
0x2266…2284              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0016, t01=0x000e}
0x2284…228e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x002c}
0x228e…2298              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0036}
0x2298…22ac              Head {h00=0x0010, h01=0x0050, text=»LKMQDI EQU *«, t00=0x0016, t01=0x0040}
0x22ac…22c2              Head {h00=0x0012, h01=0x0050, text=» CF A15,QTJOB «, t00=0x0016, t01=0x0054}
0x22c2…22cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x006a}
0x22cc…22fa              Head {h00=0x002a, h01=0x0050, text=»T:DISP EQU * COMMON EXIT TO DISPATCHER«, t00=0x0016, t01=0x0074}
0x22fa…231e              Head {h00=0x0020, h01=0x0050, text=» ABL TDISP GO TO DISPATCHER «, t00=0x0016, t01=0x00a2}
0x231e…2328              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00c6}
0x2328…2340              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0016, t01=0x00d0}
0x2340…2348              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x00e8}
0x2348…2352              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00f0}
0x2352…236a              Head {h00=0x0014, h01=0x0050, text=»*   I H P F A R «, t00=0x0016, t01=0x00fa}
0x236a…2374              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0112}
0x2374…23b6              Head {h00=0x003e, h01=0x0050, text=»*   THIS IS THE POWER FAIL/AUTO RESTART INTERRUPT HANDLER.«, t00=0x0016, t01=0x011c}
0x23b6…23c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x015e}
0x23c0…23c8              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0168}
0x23c8…23d0              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0170}
0x23d0…23d8              Head {h00=0x0004, h01=0x0050, t00=0x0016, t01=0x0178}
0x23d8…23fe              Head {h00=0x0022, h01=0x0050, text=» DATA 0 SEGMENT BLOCK ADDRESS «, t00=0x0016, t01=0x0180}
0x23fe…240e              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0017, t01=0x0016}
0x240e…2438              Head {h00=0x0026, h01=0x0050, text=»TTABPF DATA 0 TTAB FOR POWER FAIL «, t00=0x0017, t01=0x0026}
0x2438…244a              Head {h00=0x000e, h01=0x0050, text=» DATA '#P'«, t00=0x0017, t01=0x0050}
0x244a…245a              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0017, t01=0x0062}
0x245a…2470              Head {h00=0x0012, h01=0x0050, text=»A15SAV DATA 0 «, t00=0x0017, t01=0x0072}
0x2470…2484              Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x0017, t01=0x0088}
0x2484…2498              Head {h00=0x0010, h01=0x0050, text=» DATA PFTASK«, t00=0x0017, t01=0x009c}
0x2498…24a0              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00b0}
0x24a0…24a8              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00b8}
0x24a8…24b0              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00c0}
0x24b0…24b8              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00c8}
0x24b8…24c0              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x00d0}
0x24c0…24ea              Head {h00=0x0026, h01=0x0050, text=»PFX DATA 1 POWER ON/OFF INDICATOR «, t00=0x0017, t01=0x00d8}
0x24ea…2512              Head {h00=0x0024, h01=0x0050, text=»   P=POWER IS ON, N=POWER IS OFF«, t00=0x0017, t01=0x0102}
0x2512…251a              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x012a}
0x251a…2544              Head {h00=0x0026, h01=0x0050, text=»INIFLG DATA 1 INITIALIZATION FLAG «, t00=0x0017, t01=0x0132}
0x2544…2560              Head {h00=0x0018, h01=0x0050, text=»   NZ=INITIALIZATION«, t00=0x0017, t01=0x015c}
0x2560…2568              Head {h00=0x0004, h01=0x0050, t00=0x0017, t01=0x0178}
0x2568…2596              Head {h00=0x002a, h01=0x0050, text=»PFPOST DATA 0 PWF POST PROCESSING FLAG«, t00=0x0017, t01=0x0180}
0x2596…25b8              Head {h00=0x001e, h01=0x0050, text=»   NZ=PWF POST PROCESSING «, t00=0x0018, t01=0x001e}
0x25b8…25d0              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0018, t01=0x0040}
0x25d0…25d8              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0058}
0x25d8…25e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0060}
0x25e2…2610              Head {h00=0x002a, h01=0x0050, text=»*   POWER FAIL/AUTO RESTART INTERRUPT «, t00=0x0018, t01=0x006a}
0x2610…261a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0098}
0x261a…2622              Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x00a2}
0x2622…2638              Head {h00=0x0012, h01=0x0050, text=»IHPFAR EQU *  «, t00=0x0018, t01=0x00aa}
0x2638…2660              Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x0018, t01=0x00c0}
0x2660…268a              Head {h00=0x0026, h01=0x0050, text=» RIT /17 RESET INTERNAL INTERRUPT «, t00=0x0018, t01=0x00e8}
0x268a…26b4              Head {h00=0x0026, h01=0x0050, text=» C1S PFX INDICATE POWER ON OR OFF «, t00=0x0018, t01=0x0112}
0x26b4…26d2              Head {h00=0x001a, h01=0x0050, text=» RF(P) POWON POWER ON «, t00=0x0018, t01=0x013c}
0x26d2…26dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x015a}
0x26dc…26f2              Head {h00=0x0012, h01=0x0050, text=»*   POWER OFF «, t00=0x0018, t01=0x0164}
0x26f2…26fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x017a}
0x26fc…2712              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0018, t01=0x0184}
0x2712…273c              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A14 ON STACK«, t00=0x0019, t01=0x000a}
0x273c…2750              Head {h00=0x0010, h01=0x0050, text=» STR A9,A15 «, t00=0x0019, t01=0x0034}
0x2750…2764              Head {h00=0x0010, h01=0x0050, text=» STR A10,A15«, t00=0x0019, t01=0x0048}
0x2764…2778              Head {h00=0x0010, h01=0x0050, text=» STR A11,A15«, t00=0x0019, t01=0x005c}
0x2778…278c              Head {h00=0x0010, h01=0x0050, text=» STR A12,A15«, t00=0x0019, t01=0x0070}
0x278c…27a0              Head {h00=0x0010, h01=0x0050, text=» STR A13,A15«, t00=0x0019, t01=0x0084}
0x27a0…27b4              Head {h00=0x0010, h01=0x0050, text=» STR A14,A15«, t00=0x0019, t01=0x0098}
0x27b4…27c0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00ac}
0x27c0…27c8              Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x00b8}
0x27c8…27de              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0019, t01=0x00c0}
0x27de…2806              Head {h00=0x0024, h01=0x0050, text=» MSR 14,A15 SAVE A1-A14 ON STACK«, t00=0x0019, t01=0x00d6}
0x2806…2812              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00fe}
0x2812…2828              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0019, t01=0x010a}
0x2828…284e              Head {h00=0x0022, h01=0x0050, text=» TS -30,A15 SAVE MMU TABLE =2 «, t00=0x0019, t01=0x0120}
0x284e…285a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0146}
0x285a…2862              Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x0152}
0x2862…2892              Head {h00=0x002c, h01=0x0050, text=» ST A15,A15SAV SAVE A15 FOR BETTER TIMES«, t00=0x0019, t01=0x015a}
0x2892…289e              Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x0019, t01=0x018a}
0x289e…28b6              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x001a, t01=0x0008}
0x28b6…28be              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0020}
0x28be…28c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0028}
0x28c8…28dc              Head {h00=0x0010, h01=0x0050, text=»*   POWER ON«, t00=0x001a, t01=0x0032}
0x28dc…28e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0046}
0x28e6…28ee              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0050}
0x28ee…2914              Head {h00=0x0022, h01=0x0050, text=»POWON LD A15,A15SAV RELOAD A15«, t00=0x001a, t01=0x0058}
0x2914…291c              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x007e}
0x291c…2932              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x001a, t01=0x0086}
0x2932…295a              Head {h00=0x0024, h01=0x0050, text=» TL -30,A15 RESTORE MMU TABLE =2«, t00=0x001a, t01=0x009c}
0x295a…2966              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00c4}
0x2966…297c              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001a, t01=0x00d0}
0x297c…29a0              Head {h00=0x0020, h01=0x0050, text=» LDR* A14,A15 RESTORE A9-A14«, t00=0x001a, t01=0x00e6}
0x29a0…29b6              Head {h00=0x0012, h01=0x0050, text=» LDR* A13,A15 «, t00=0x001a, t01=0x010a}
0x29b6…29cc              Head {h00=0x0012, h01=0x0050, text=» LDR* A12,A15 «, t00=0x001a, t01=0x0120}
0x29cc…29e2              Head {h00=0x0012, h01=0x0050, text=» LDR* A11,A15 «, t00=0x001a, t01=0x0136}
0x29e2…29f8              Head {h00=0x0012, h01=0x0050, text=» LDR* A10,A15 «, t00=0x001a, t01=0x014c}
0x29f8…2a0c              Head {h00=0x0010, h01=0x0050, text=» LDR* A9,A15«, t00=0x001a, t01=0x0162}
0x2a0c…2a18              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0176}
0x2a18…2a20              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0182}
0x2a20…2a36              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001a, t01=0x018a}
0x2a36…2a58              Head {h00=0x001e, h01=0x0050, text=» MLR 14,A15 RESTORE A9-A14«, t00=0x001b, t01=0x0010}
0x2a58…2a6a              Head {h00=0x000e, h01=0x0050, text=» MSR 8,A15«, t00=0x001b, t01=0x0032}
0x2a6a…2a76              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x0044}
0x2a76…2a7e              Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0050}
0x2a7e…2ab6              Head {h00=0x0034, h01=0x0050, text=» LD A1,DISQUE QUEUE PFTASK FIRST FOR DISPATCHING«, t00=0x001b, t01=0x0058}
0x2ab6…2ace              Head {h00=0x0014, h01=0x0050, text=» LDKL A2,TTABPF «, t00=0x001b, t01=0x0090}
0x2ace…2ae0              Head {h00=0x000e, h01=0x0050, text=» CWR A1,A2«, t00=0x001b, t01=0x00a8}
0x2ae0…2b18              Head {h00=0x0034, h01=0x0050, text=» RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST «, t00=0x001b, t01=0x00ba}
0x2b18…2b2a              Head {h00=0x000e, h01=0x0050, text=» STR A1,A2«, t00=0x001b, t01=0x00f2}
0x2b2a…2b40              Head {h00=0x0012, h01=0x0050, text=» ST A2,DISQUE «, t00=0x001b, t01=0x0104}
0x2b40…2b70              Head {h00=0x002c, h01=0x0050, text=» IM PFPOST INDICATE PWF POST PROCESSING «, t00=0x001b, t01=0x011a}
0x2b70…2b82              Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001b, t01=0x014a}
0x2b82…2b9a              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x001b, t01=0x015c}
0x2b9a…2ba2              Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0174}
0x2ba2…2bac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x017c}
0x2bac…2bc8              Head {h00=0x0018, h01=0x0050, text=»*   POWER FAIL TASK «, t00=0x001b, t01=0x0186}
0x2bc8…2bfa              Head {h00=0x002e, h01=0x0050, text=»*   STARTED AFTER ALL PWF POST PROCESSING «, t00=0x001c, t01=0x0012}
0x2bfa…2c04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0044}
0x2c04…2c0c              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x004e}
0x2c0c…2c3e              Head {h00=0x002e, h01=0x0050, text=»PFTASK CM PFPOST CLEAR PWF POST PROC FLAG «, t00=0x001c, t01=0x0056}
0x2c3e…2c5e              Head {h00=0x001c, h01=0x0050, text=» CM INIFLG AND INIT FLAG«, t00=0x001c, t01=0x0088}
0x2c5e…2c88              Head {h00=0x0026, h01=0x0050, text=» CF A15,PFINIT RESTART I/O DEVICES«, t00=0x001c, t01=0x00a8}
0x2c88…2ca4              Head {h00=0x0018, h01=0x0050, text=» CM PRUN EXIT PFTASK«, t00=0x001c, t01=0x00d2}
0x2ca4…2cb6              Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001c, t01=0x00ee}
0x2cb6…2cce              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x001c, t01=0x0100}
0x2cce…2cd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0118}
0x2cd8…2cee              Head {h00=0x0012, h01=0x0050, text=»*   I H R T C «, t00=0x001c, t01=0x0122}
0x2cee…2cf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0138}
0x2cf8…2d32              Head {h00=0x0036, h01=0x0050, text=»*   THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER.«, t00=0x001c, t01=0x0142}
0x2d32…2d6c              Head {h00=0x0036, h01=0x0050, text=»*   THE TIMER QUEUE WILL BE PROCESSED EACH 100 MS.«, t00=0x001c, t01=0x017c}
0x2d6c…2d76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0026}
0x2d76…2da4              Head {h00=0x002a, h01=0x0050, text=»IHRTC ST P,INTSAV SAVE LAST INTERRUPT «, t00=0x001d, t01=0x0030}
0x2da4…2dca              Head {h00=0x0022, h01=0x0050, text=» RIT /1B RESET INTERRUPT FLAG «, t00=0x001d, t01=0x005e}
0x2dca…2ddc              Head {h00=0x000e, h01=0x0050, text=» IM COUNT «, t00=0x001d, t01=0x0084}
0x2ddc…2e04              Head {h00=0x0024, h01=0x0050, text=» RF(P) RTC010 CHECK TIMER QUEUE «, t00=0x001d, t01=0x0096}
0x2e04…2e14              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x001d, t01=0x00be}
0x2e14…2e1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ce}
0x2e1e…2e32              Head {h00=0x0010, h01=0x0050, text=»RTC010 EQU *«, t00=0x001d, t01=0x00d8}
0x2e32…2e48              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x001d, t01=0x00ec}
0x2e48…2e72              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x001d, t01=0x0102}
0x2e72…2e7e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x012c}
0x2e7e…2e88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0138}
0x2e88…2e9e              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001d, t01=0x0142}
0x2e9e…2ec4              Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x001d, t01=0x0158}
0x2ec4…2ed0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x017e}
0x2ed0…2eda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x018a}
0x2eda…2ef2 (30, 0, 400) Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x001e, t01=0x0004}
0x2ef2…2efc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x001c}
0x2efc…2f06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0026}
0x2f06…2f1c              Head {h00=0x0012, h01=0x0050, text=» IFT NETFRQ=50«, t00=0x001e, t01=0x0030}
0x2f1c…2f42              Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-4 SET 100 MS SWITCH «, t00=0x001e, t01=0x0046}
0x2f42…2f4e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x006c}
0x2f4e…2f58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0078}
0x2f58…2f6e              Head {h00=0x0012, h01=0x0050, text=» IFT NETFRQ=60«, t00=0x001e, t01=0x0082}
0x2f6e…2f94              Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-5 SET 100 MS SWITCH «, t00=0x001e, t01=0x0098}
0x2f94…2fa0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00be}
0x2fa0…2fb8              Head {h00=0x0014, h01=0x0050, text=» ST A4,COUNT  =1«, t00=0x001e, t01=0x00ca}
0x2fb8…2fc2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00e2}
0x2fc2…2ff4              Head {h00=0x002e, h01=0x0050, text=» LDKL A2,CLOCK QUEUE CLOCK ROUTINE AS MJOB«, t00=0x001e, t01=0x00ec}
0x2ff4…300a              Head {h00=0x0012, h01=0x0050, text=» CF A15,QMJOB «, t00=0x001e, t01=0x011e}
0x300a…3014              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0134}
0x3014…302a              Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x001e, t01=0x013e}
0x302a…303c              Head {h00=0x000e, h01=0x0050, text=» IM SECOND«, t00=0x001e, t01=0x0154}
0x303c…3066              Head {h00=0x0026, h01=0x0050, text=» RF(P) RTC025 UPDATE MONITOR CLOCK«, t00=0x001e, t01=0x0166}
0x3066…3072              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x0190}
0x3072…307c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x000c}
0x307c…3090              Head {h00=0x0010, h01=0x0050, text=»SWDISP EQU *«, t00=0x001f, t01=0x0016}
0x3090…30b8              Head {h00=0x0024, h01=0x0050, text=» CF A15,SWLXY SWITCH TO LEVEL XY«, t00=0x001f, t01=0x002a}
0x30b8…30ca              Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x001f, t01=0x0052}
0x30ca…30d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0064}
0x30d4…30ec              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x001f, t01=0x006e}
0x30ec…30f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0086}
0x30f6…3100              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0090}
0x3100…3116              Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x001f, t01=0x009a}
0x3116…3120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b0}
0x3120…3160              Head {h00=0x003c, h01=0x0050, text=»*   MONITOR CLOCK UPDATING ROUTINE STARTED EACH SECOND. «, t00=0x001f, t01=0x00ba}
0x3160…316a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00fa}
0x316a…317e              Head {h00=0x0010, h01=0x0050, text=»RTC025 EQU *«, t00=0x001f, t01=0x0104}
0x317e…31a4              Head {h00=0x0022, h01=0x0050, text=» LDKL A4,-9 SET SECOND SWITCH «, t00=0x001f, t01=0x0118}
0x31a4…31ba              Head {h00=0x0012, h01=0x0050, text=» ST A4,SECOND «, t00=0x001f, t01=0x013e}
0x31ba…31cc              Head {h00=0x000e, h01=0x0050, text=» LDK A4,4 «, t00=0x001f, t01=0x0154}
0x31cc…31d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0166}
0x31d6…320c              Head {h00=0x0032, h01=0x0050, text=»MCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS«, t00=0x001f, t01=0x0170}
0x320c…3216              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0016}
0x3216…3242              Head {h00=0x0028, h01=0x0050, text=»MCLO20 IM MONCLO+2,A4 INCREMENT TIME«, t00=0x0020, t01=0x0020}
0x3242…3274              Head {h00=0x002e, h01=0x0050, text=» XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS«, t00=0x0020, t01=0x004c}
0x3274…329c              Head {h00=0x0024, h01=0x0050, text=» RB(NE) SWDISP GO TO DISPATCHER «, t00=0x0020, t01=0x007e}
0x329c…32c8              Head {h00=0x0028, h01=0x0050, text=» CM MONCLO+2,A4 RESTART TIME COUNTER«, t00=0x0020, t01=0x00a6}
0x32c8…32de              Head {h00=0x0012, h01=0x0050, text=» SUK A4,2 END «, t00=0x0020, t01=0x00d2}
0x32de…3318              Head {h00=0x0036, h01=0x0050, text=» RF(N) MCLO30 MIDNIGHT CARRY AND WE HAVE A NEW DAY«, t00=0x0020, t01=0x00e8}
0x3318…333c              Head {h00=0x0020, h01=0x0050, text=» RB(P) MCLO10 UPDATE MINUTES«, t00=0x0020, t01=0x0122}
0x333c…335c              Head {h00=0x001c, h01=0x0050, text=» LDK A3,24 UPDATE HOURS «, t00=0x0020, t01=0x0146}
0x335c…336e              Head {h00=0x000e, h01=0x0050, text=» RB MCLO20«, t00=0x0020, t01=0x0166}
0x336e…3378              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0178}
0x3378…338c              Head {h00=0x0010, h01=0x0050, text=»MCLO30 EQU *«, t00=0x0020, t01=0x0182}
0x338c…33b8              Head {h00=0x0028, h01=0x0050, text=» IM MCARRY INCREMENT MIDNIGHT CARRY «, t00=0x0021, t01=0x0008}
0x33b8…33c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0034}
0x33c2…33da              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0021, t01=0x003e}
0x33da…33e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0056}
0x33e4…33ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0060}
0x33ee…3404              Head {h00=0x0012, h01=0x0050, text=» IFT MONDAT=1 «, t00=0x0021, t01=0x006a}
0x3404…340e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0080}
0x340e…3432              Head {h00=0x0020, h01=0x0050, text=»* UPDATE DAY, MONTH AND YEAR«, t00=0x0021, t01=0x008a}
0x3432…343c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ae}
0x343c…3452              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x00b8}
0x3452…3476              Head {h00=0x0020, h01=0x0050, text=» LDKL A1,MONTH MONTH ADDRESS«, t00=0x0021, t01=0x00ce}
0x3476…3496              Head {h00=0x001c, h01=0x0050, text=» LDKL A2,DAY DAY ADDRESS«, t00=0x0021, t01=0x00f2}
0x3496…34a8              Head {h00=0x000e, h01=0x0050, text=» LDK A3,1 «, t00=0x0021, t01=0x0112}
0x34a8…34b4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0124}
0x34b4…34be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0130}
0x34be…34da              Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0021, t01=0x013a}
0x34da…34f0              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0021, t01=0x0156}
0x34f0…34fe              Head {h00=0x000a, h01=0x0050, text=» MLK 3«, t00=0x0021, t01=0x016c}
0x34fe…353a              Head {h00=0x0038, h01=0x0050, text=» DATA MONTH,DAY,1 MONTH AND DAY ADDRESS TO A1 AND A2«, t00=0x0021, t01=0x017a}
0x353a…3546              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x0026}
0x3546…3550              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0032}
0x3550…356c              Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0022, t01=0x003c}
0x356c…358a              Head {h00=0x001a, h01=0x0050, text=» IMR A2 INCREMENT DAY «, t00=0x0022, t01=0x0058}
0x358a…35a4              Head {h00=0x0016, h01=0x0050, text=» LDR* A4,A1 MONTH «, t00=0x0022, t01=0x0076}
0x35a4…35b6              Head {h00=0x000e, h01=0x0050, text=» LDR A6,A4«, t00=0x0022, t01=0x0090}
0x35b6…35d2              Head {h00=0x0018, h01=0x0050, text=» LDR* A5,A2 NEW DAY «, t00=0x0022, t01=0x00a2}
0x35d2…35f8              Head {h00=0x0022, h01=0x0050, text=» SUK A5,29 CHECK IF DAY WAS 28«, t00=0x0022, t01=0x00be}
0x35f8…362c              Head {h00=0x0030, h01=0x0050, text=» RF(Z) MCLO40 YES, GO AND CHECK IF FEBRUARY «, t00=0x0022, t01=0x00e4}
0x362c…3652              Head {h00=0x0022, h01=0x0050, text=» SUK A5,2 CHECK IF DAY WAS 30 «, t00=0x0022, t01=0x0118}
0x3652…366c              Head {h00=0x0016, h01=0x0050, text=» RF(Z) MCLO60 YES «, t00=0x0022, t01=0x013e}
0x366c…3692              Head {h00=0x0022, h01=0x0050, text=» SUK A5,1 CHECK IF DAY WAS 31 «, t00=0x0022, t01=0x0158}
0x3692…36b4              Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0022, t01=0x017e}
0x36b4…36e0              Head {h00=0x0028, h01=0x0050, text=» RF MCLO50 YES, WE HAVE A NEW MONTH «, t00=0x0023, t01=0x0010}
0x36e0…36ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x003c}
0x36ea…36fe              Head {h00=0x0010, h01=0x0050, text=»MCLO40 EQU *«, t00=0x0023, t01=0x0046}
0x36fe…3722              Head {h00=0x0020, h01=0x0050, text=» SUK A6,2 CHECK IF FEBRUARY «, t00=0x0023, t01=0x005a}
0x3722…3744              Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0023, t01=0x007e}
0x3744…374e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00a0}
0x374e…3766              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0023, t01=0x00aa}
0x3766…3770              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00c2}
0x3770…379a              Head {h00=0x0026, h01=0x0050, text=»* CHANGE TO NEW MONTH (AND YEAR?) «, t00=0x0023, t01=0x00cc}
0x379a…37a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00f6}
0x37a4…37ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0100}
0x37ae…37c2              Head {h00=0x0010, h01=0x0050, text=»MCLO50 EQU *«, t00=0x0023, t01=0x010a}
0x37c2…37e2              Head {h00=0x001c, h01=0x0050, text=» STR A3,A2 SET DAY := 1 «, t00=0x0023, t01=0x011e}
0x37e2…3802              Head {h00=0x001c, h01=0x0050, text=» IMR A1 INCREMENT MONTH «, t00=0x0023, t01=0x013e}
0x3802…3830              Head {h00=0x002a, h01=0x0050, text=» SUK A4,12 CHECK IF MONTH WAS DECEMBER«, t00=0x0023, t01=0x015e}
0x3830…3852              Head {h00=0x001e, h01=0x0050, text=» RB(NZ) SWDISP NO, RETURN «, t00=0x0023, t01=0x018c}
0x3852…387a              Head {h00=0x0024, h01=0x0050, text=» STR A3,A1 SET MONTH TO JANUARY «, t00=0x0024, t01=0x001e}
0x387a…389c              Head {h00=0x001e, h01=0x0050, text=» IM YEAR HAPPY NEW YEAR!!!«, t00=0x0024, t01=0x0046}
0x389c…38b6              Head {h00=0x0016, h01=0x0050, text=» RB SWDISP RETURN «, t00=0x0024, t01=0x0068}
0x38b6…38c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0082}
0x38c0…38d4              Head {h00=0x0010, h01=0x0050, text=»MCLO60 EQU *«, t00=0x0024, t01=0x008c}
0x38d4…38ec              Head {h00=0x0014, h01=0x0050, text=» LDR A7,A6 MONTH«, t00=0x0024, t01=0x00a0}
0x38ec…38fe              Head {h00=0x000e, h01=0x0050, text=» ANK A6,1 «, t00=0x0024, t01=0x00b8}
0x38fe…391e              Head {h00=0x001c, h01=0x0050, text=» RF(Z) MCLO70 MONTH EVEN«, t00=0x0024, t01=0x00ca}
0x391e…3930              Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0024, t01=0x00ea}
0x3930…395c              Head {h00=0x0028, h01=0x0050, text=» RB(P) MCLO50 SEPTEMBER OR NOVEMBER «, t00=0x0024, t01=0x00fc}
0x395c…398a              Head {h00=0x002a, h01=0x0050, text=» RB SWDISP JANUARY, MARCH, MAY OR JULY«, t00=0x0024, t01=0x0128}
0x398a…3994              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0156}
0x3994…39a8              Head {h00=0x0010, h01=0x0050, text=»MCLO70 EQU *«, t00=0x0024, t01=0x0160}
0x39a8…39ba              Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0024, t01=0x0174}
0x39ba…39de              Head {h00=0x0020, h01=0x0050, text=» RB(N) MCLO50 APRIL OR JUNE «, t00=0x0024, t01=0x0186}
0x39de…39ea              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x001a}
0x39ea…39f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0026}
0x39f4…3a0a              Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0025, t01=0x0030}
0x3a0a…3a24              Head {h00=0x0016, h01=0x0050, text=» RB SWDISP RETURN «, t00=0x0025, t01=0x0046}
0x3a24…3a30              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0060}
0x3a30…3a3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006c}
0x3a3a…3a52              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0025, t01=0x0076}
0x3a52…3a5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x008e}
0x3a5c…3a66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0098}
0x3a66…3a7e              Head {h00=0x0014, h01=0x0050, text=»*   M O N C L O «, t00=0x0025, t01=0x00a2}
0x3a7e…3a88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ba}
0x3a88…3a92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00c4}
0x3a92…3aae              Head {h00=0x0018, h01=0x0050, text=» IFT MONCLK+MONDAT=2«, t00=0x0025, t01=0x00ce}
0x3aae…3ade              Head {h00=0x002c, h01=0x0050, text=» DATA 0 THIS WORD USED BY MONTIM (TDATE)«, t00=0x0025, t01=0x00ea}
0x3ade…3af2              Head {h00=0x0010, h01=0x0050, text=»YEAR DATA 0 «, t00=0x0025, t01=0x011a}
0x3af2…3b06              Head {h00=0x0010, h01=0x0050, text=»MONTH DATA 0«, t00=0x0025, t01=0x012e}
0x3b06…3b18              Head {h00=0x000e, h01=0x0050, text=»DAY DATA 0«, t00=0x0025, t01=0x0142}
0x3b18…3b24              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0154}
0x3b24…3b2e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0160}
0x3b2e…3b42              Head {h00=0x0010, h01=0x0050, text=»MONCLO EQU *«, t00=0x0025, t01=0x016a}
0x3b42…3b58              Head {h00=0x0012, h01=0x0050, text=» IFT MONCLK=1 «, t00=0x0025, t01=0x017e}
0x3b58…3b88 (38, 0, 400) Head {h00=0x002c, h01=0x0050, text=»MCARRY DATA 0 ACKUMULATED 24 HOUR CARRY «, t00=0x0026, t01=0x0004}
0x3b88…3b9c              Head {h00=0x0010, h01=0x0050, text=» DATA 0 HOUR«, t00=0x0026, t01=0x0034}
0x3b9c…3bb2              Head {h00=0x0012, h01=0x0050, text=» DATA 0 MINUTE«, t00=0x0026, t01=0x0048}
0x3bb2…3bc8              Head {h00=0x0012, h01=0x0050, text=» DATA 0 SECOND«, t00=0x0026, t01=0x005e}
0x3bc8…3bec              Head {h00=0x0020, h01=0x0050, text=»SECOND DATA 0 SECOND SWITCH «, t00=0x0026, t01=0x0074}
0x3bec…3bf8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x0098}
0x3bf8…3c02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a4}
0x3c02…3c1a              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0026, t01=0x00ae}
0x3c1a…3c24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c6}
0x3c24…3c52              Head {h00=0x002a, h01=0x0050, text=»*   CLOCK ROUTINE STARTED EACH 100 MS.«, t00=0x0026, t01=0x00d0}
0x3c52…3c5c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00fe}
0x3c5c…3c6e              Head {h00=0x000e, h01=0x0050, text=»CLOCK INH «, t00=0x0026, t01=0x0108}
0x3c6e…3c9e              Head {h00=0x002c, h01=0x0050, text=» LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS«, t00=0x0026, t01=0x011a}
0x3c9e…3ca8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x014a}
0x3ca8…3cc0              Head {h00=0x0014, h01=0x0050, text=»CLK10 LDR A6,A4 «, t00=0x0026, t01=0x0154}
0x3cc0…3cca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x016c}
0x3cca…3cee              Head {h00=0x0020, h01=0x0050, text=»CLK20 LDR* A4,A6 TIMER BLOCK«, t00=0x0026, t01=0x0176}
0x3cee…3d10              Head {h00=0x001e, h01=0x0050, text=» ABL(Z) MEXIT END OF QUEUE«, t00=0x0027, t01=0x000a}
0x3d10…3d30              Head {h00=0x001c, h01=0x0050, text=» IM 4,A4 INCREMENT TIMER«, t00=0x0027, t01=0x002c}
0x3d30…3d52              Head {h00=0x001e, h01=0x0050, text=» RB(N) CLK10 NOT TIME OUT «, t00=0x0027, t01=0x004c}
0x3d52…3d70              Head {h00=0x001a, h01=0x0050, text=» RF(Z) CLK30 TIME OUT «, t00=0x0027, t01=0x006e}
0x3d70…3d92              Head {h00=0x001e, h01=0x0050, text=» LDR* A3,A4 RELEASE TIMER «, t00=0x0027, t01=0x008c}
0x3d92…3da4              Head {h00=0x000e, h01=0x0050, text=» STR A3,A6«, t00=0x0027, t01=0x00ae}
0x3da4…3dba              Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x0027, t01=0x00c0}
0x3dba…3dcc              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0027, t01=0x00d6}
0x3dcc…3de2              Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x0027, t01=0x00e8}
0x3de2…3df4              Head {h00=0x000e, h01=0x0050, text=» RB CLK20 «, t00=0x0027, t01=0x00fe}
0x3df4…3dfe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0110}
0x3dfe…3e16              Head {h00=0x0014, h01=0x0050, text=» EJECT   LRPINT «, t00=0x0027, t01=0x011a}
0x3e16…3e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0132}
0x3e20…3e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x013c}
0x3e2a…3e5a              Head {h00=0x002c, h01=0x0050, text=»CLK30 CF A15,CLK40 CALL TIME OUT ROUTINE«, t00=0x0027, t01=0x0146}
0x3e5a…3e82              Head {h00=0x0024, h01=0x0050, text=» CF A15,SWL48 SWITCH TO LEVEL 48«, t00=0x0027, t01=0x0176}
0x3e82…3e8e              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0028, t01=0x000e}
0x3e8e…3ea0              Head {h00=0x000e, h01=0x0050, text=» RB CLK10 «, t00=0x0028, t01=0x001a}
0x3ea0…3eaa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x002c}
0x3eaa…3ebe              Head {h00=0x0010, h01=0x0050, text=»CLK40 EQU * «, t00=0x0028, t01=0x0036}
0x3ebe…3ed4              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0028, t01=0x004a}
0x3ed4…3efe              Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0028, t01=0x0060}
0x3efe…3f0a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x008a}
0x3f0a…3f14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0096}
0x3f14…3f2a              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0028, t01=0x00a0}
0x3f2a…3f50              Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0028, t01=0x00b6}
0x3f50…3f5c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x00dc}
0x3f5c…3f66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e8}
0x3f66…3f90              Head {h00=0x0026, h01=0x0050, text=» LDKL A1,/C4C0 LEVEL 49 AND ENABLE«, t00=0x0028, t01=0x00f2}
0x3f90…3fba              Head {h00=0x0026, h01=0x0050, text=» ST A1,18,A15 SET NEW PSW ON STACK«, t00=0x0028, t01=0x011c}
0x3fba…3fde              Head {h00=0x0020, h01=0x0050, text=» LD A2,2,A4 LOAD DISP BLOCK «, t00=0x0028, t01=0x0146}
0x3fde…3ffc              Head {h00=0x001a, h01=0x0050, text=» LD A1,4,A2 PARAMETER «, t00=0x0028, t01=0x016a}
0x3ffc…4024              Head {h00=0x0024, h01=0x0050, text=» ABI 2,A2 GO TO TIME OUT ROUTINE«, t00=0x0028, t01=0x0188}
0x4024…402e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0020}
0x402e…4038              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x002a}
0x4038…405a              Head {h00=0x001e, h01=0x0050, text=»COUNT DATA 0 100 MS SWITCH«, t00=0x0029, t01=0x0034}
0x405a…4064              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0056}
0x4064…406e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0060}
0x406e…4086              Head {h00=0x0014, h01=0x0050, text=»*   T I M Q U E «, t00=0x0029, t01=0x006a}
0x4086…4090              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0082}
0x4090…40c2              Head {h00=0x002e, h01=0x0050, text=»*   POINTER TO FIRST BLOCK IN TIMER QUEUE «, t00=0x0029, t01=0x008c}
0x40c2…40cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00be}
0x40cc…40d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c8}
0x40d6…40ea              Head {h00=0x0010, h01=0x0050, text=»TIMQUE EQU *«, t00=0x0029, t01=0x00d2}
0x40ea…40fa              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0029, t01=0x00e6}
0x40fa…4104              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00f6}
0x4104…410e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0100}
0x410e…4118              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x010a}
0x4118…4124              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0029, t01=0x0114}
0x4124…4128              Head {h00=0x4004, h01=0x0000}
0x4128…412c              00 29 01 20                                                                                                                                                                                                                                       ┆ )  ┆
0x412c…4134 (42, 1, 8)   20 04 00 00 00 2a 00 04                                                                                                                                                                                                                           ┆     *  ┆
0x4134…4184 (43, 0, 398) 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 00 2a 01 68 00 0e 00 50 5c 45 4a 45 43 54 5c 5c 5c 20 00 2b 00 28 00 3e 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆-------------------------------  * h   P EJECT     + ( > P**********************┆
0x4184…41d4              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 00 2b 00 3a 00 06 00 50 2a 20 00 2b 00 7c 00 20 00 50 2a 5c 4c 49 4e 45 20 43 4f 4e 54 52 4f 4c 20 43 48 41 52 20 45 51 55 3a 53 5c   ┆************************************ + :   P*  + |   P* LINE CONTROL CHAR EQU:S ┆
0x41d4…4224              5c 20 00 2b 00 86 00 0a 00 50 2a 5c 5c 5c 5c 20 00 2b 00 aa 00 3e 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   ┆   +     P*      +   > P********************************************************┆
0x4224…4274              2a 2a 00 2b 00 b8 00 06 00 50 2a 20 00 2b 00 fa 00 26 00 50 53 46 5c 45 51 55 5c 58 27 31 44 27 5c 53 54 41 52 54 20 46 49 45 4c 44 20 43 48 41 52 41 43 54 45 52 00 2b 01 04 00 10 00 50 53 59 4e 5c 45 51 55 5c 2f 31 36 20 00 2b 01 2e 00 10   ┆** +     P*  +   & PSF EQU X'1D' START FIELD CHARACTER +     PSYN EQU /16  + .  ┆
0x4274…42c2              00 50 53 54 58 5c 45 51 55 5c 2f 30 32 20 00 2b 01 42 00 10 00 50 45 54 58 5c 45 51 55 5c 2f 30 33 20 00 2b 01 56 00 10 00 50 45 54 42 5c 45 51 55 5c 2f 31 37 20 00 2b 01 6a 00 10 00 50 49 54 42 5c 45 51 55 5c 2f 31 46 20 00 2b 01 7e         ┆ PSTX EQU /02  + B   PETX EQU /03  + V   PETB EQU /17  + j   PITB EQU /1F  + ~┆
0x42c2…4312 (44, 0, 400) 00 10 00 50 53 4f 48 5c 45 51 55 5c 2f 30 31 20 00 2c 00 04 00 10 00 50 45 4e 51 5c 45 51 55 5c 2f 30 35 20 00 2c 00 18 00 10 00 50 44 4c 45 5c 45 51 55 5c 2f 31 30 20 00 2c 00 2c 00 10 00 50 45 4f 54 5c 45 51 55 5c 2f 30 34 20 00 2c 00 40   ┆   PSOH EQU /01  ,     PENQ EQU /05  ,     PDLE EQU /10  , ,   PEOT EQU /04  , @┆
0x4312…4362              00 10 00 50 4e 41 4b 5c 45 51 55 5c 2f 31 35 20 00 2c 00 54 00 10 00 50 45 53 43 5c 45 51 55 5c 2f 31 42 20 00 2c 00 68 00 10 00 50 53 42 41 5c 45 51 55 5c 2f 31 31 20 00 2c 00 7c 00 0e 00 50 47 50 5c 45 51 55 5c 2f 32 32 00 2c 00 90 00 12   ┆   PNAK EQU /15  , T   PESC EQU /1B  , h   PSBA EQU /11  , |   PGP EQU /22 ,    ┆
0x4362…43b2              00 50 52 44 42 43 4f 4d 5c 45 51 55 5c 2f 33 32 00 2c 00 a2 00 12 00 50 52 44 4d 43 4f 4d 5c 45 51 55 5c 2f 33 36 00 2c 00 b8 00 0a 00 50 5c 45 4a 45 43 54 00 2c 00 ce 00 10 00 50 5c 49 46 54 5c 43 4f 44 45 3d 30 20 00 2c 00 dc 00 10 00 50   ┆ PRDBCOM EQU /32 ,     PRDMCOM EQU /36 ,     P EJECT ,     P IFT CODE=0  ,     P┆
0x43b2…4402              50 41 52 5c 45 51 55 5c 2f 38 30 20 00 2c 00 f0 00 10 00 50 52 56 49 5c 45 51 55 5c 2f 33 43 20 00 2c 01 04 00 10 00 50 41 43 4b 30 5c 45 51 55 5c 2f 33 30 00 2c 01 18 00 10 00 50 41 43 4b 31 5c 45 51 55 5c 2f 33 31 00 2c 01 2c 00 10 00 50   ┆PAR EQU /80  ,     PRVI EQU /3C  ,     PACK0 EQU /30 ,     PACK1 EQU /31 , ,   P┆
0x4402…4452              44 43 31 5c 45 51 55 5c 2f 31 31 20 00 2c 01 40 00 10 00 50 5c 49 46 54 5c 4d 53 56 31 3d 30 20 00 2c 01 54 00 10 00 50 57 41 43 4b 5c 45 51 55 5c 2f 33 42 00 2c 01 68 00 08 00 50 5c 58 49 46 00 2c 01 7c 00 10 00 50 5c 49 46 54 5c 43 4f 44   ┆DC1 EQU /11  , @   P IFT MSV1=0  , T   PWACK EQU /3B , h   P XIF , |   P IFT COD┆

Reduced view