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

⟦41cebca8b⟧ 

    Length: 7344 (0x1cb0)
    Notes: pts_type(SC)
    Names: »MONTIM.SC«

Derivation

└─⟦7b35573c9⟧ Bits:30009690 Philips computer tape "600402"
    └─⟦this⟧ »M:AF/MONTIM.SC«

PTS(SC)

	IDENT MONTIM 	REL 11.0 81-01-26 870105041100 

* 
* 
******************************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   MONTIM = MONITOR CLOCK/DATE PROCESSORS
* 
* 
* 
* 
* 
* 
******************************************************* 
* 
* 
*    THIS MODULE CONTAINS TOSS MONITOR CLOCK/DATE PROCESSORS
* 
*    -GETTIM    GET TIME FROM MONITOR CLOCK 
* 
*    -SETTIM    SET TIME IN MONITOR CLOCK 
* 
*    -GETDAT    GET DATE FROM MONITOR CLOCK 
* 
*    -SETDAT    SET DATE IN MONITOR CLOCK 
* 
	EJECT			MONTIM 
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	GETTIM	GET TIME FROM MONITOR CLOCK 
	ENTRY	SETTIM	SET TIME IN MONITOR CLOCK 
	ENTRY	TDATE	GET/SET DATE IN MONITOR CLOCK
	EJECT			MONTIM 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	MONCLO	MONITOR CLOCK 
	EXTRN	LKMQDI	QUEUE TASK AND DISPATCH 
	EXTRN	TTB:SA	TTAB SAVE AREA
	EJECT			MONTIM 
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	1
* 
	EJECT			MONTIM 
* 
* 
**********
* GETTIM *
**********
* 
* 
*    THIS IS THE GET TIME LKM PROCESSOR.
* 
*    IT IS ENTERED FROM THE LKM HANDLER 
*    WITH ADDRESS TO THE USER TIMER CONTROL 
*    BLOCK IN A8. MONITOR CLOCK IS COPIED INTO
*    TIMER CONTROL BLOCK. 
* 
* 
GETTIM	EQU	*
	LDKL	A7,MONCLO+6	ADDRESS TO MONITOR CLOCK SECOND 
* 
GETDAT	EQU	*	ENTRY USED BY TDATE
	LDK	A3,6	COUNTER 
	LDR*	A6,A7	SECONDS 
	STR	A6,A15	SAVE ON STACK 
	SUK	A7,2 
	LDR*	A6,A7	MINUTES 
	STR	A6,A15	SAVE ON STACK 
	SUK	A7,2 
	LDR*	A6,A7	HOURS 
	ENB
* 
GETT10	CF	A15,BYTASC	CONVERT TO ASCII 
	IFT	MMUPAG=0 
	SC	A6,1,A8	STORE RIGHTHAND CHARACTER 
	ECR	A6,A6
	SCR	A6,A8	STORE LEFTHAND CHARACTER 
	XIF
* 
	EJECT			MONTIM 
* 
* 
	IFT	MMUPAG=1 
	LDR	A4,A8	GET TIMER CONTROL BLOCK ADDRESS
	ANK	A4,1 
	RF(Z)	GETT15	TCB ADDRESS EVEN
	LDR	A1,A6
	EL	A4,1,A8 
	ANK	A4,/FF 
	SLL	A1,8 
	ORR	A1,A4
	ES	A1,1,A8 
	ELR	A4,A8
	SRL	A6,8 
	ANKL	A4,/FF00
	ORR	A6,A4
* 
GETT15	ESR	A6,A8	SET VALUE IN TIMER CONTROL BLOCK 
	XIF
* 
	SUK	A3,2 
	RF(E)	GETT20 
	ADKL	A8,2
	LDR*	A6,A15	GET ACTUAL TIME FROM STACK 
	RB	GETT10
* 
	EJECT			MONTIM 
* 
* 
GETT20	SUK	A7,2 
	LDR*	A6,A7	GET ACCUMULATED 24 HOUR CARRY 
	ST	A6,TTB:SA+14,A5	STORE IN TTAB SAVE AREA A7
* 
TPDIS	EQU	* 
	CMR	A7	CLEAR MIDNIGTH CARRY
	ABL	LKMQDI 
* 
	EJECT			MONTIM 
* 
* 
**********
* SETTIM *
**********
* 
* 
*    THIS IS THE SET TIME LKM PROCESSOR.
* 
*    IT IS ENTERED FROM THE LKM HANDLER WITH
*    ADDRESS TO THE USER TIMER CONTROL BLOCK
*    IN A8. VALUE IN TIMER CONTROL BLOCK IS 
*    COPIED INTO MONITOR CLOCK. 
* 
* 
SETTIM	EQU	*
	LDKL	A7,MONCLO+6	ADDRESS TO MONITOR CLOCK SECOND 
* 
SETDAT	EQU	*	ENTRY USED BY TDATE
	LDK	A3,6	COUNTER 
	ENB
* 
SETT10	EQU	*
	IFT	MMUPAG=0 
	LCR	A6,A8	GET LEFTHAND CHARACTER 
	ECR	A6,A6
	LC	A6,1,A8	GET RIGHTHAND CHARACTER 
	XIF
* 
	EJECT			MONTIM 
* 
* 
	IFT	MMUPAG=1 
	ELR	A6,A8	GET VALUE FROM TIMER CONTROL BLOCK 
	LDR	A4,A8	GET TIMER CONTROL BLOCK ADDRESS
	ANK	A4,1 
	RF(Z)	SETT15	TCB ADDRESS EVEN
	EL	A4,1,A8	CORRECTIONS FOR UNEVEN TCB ADDRESS
	SLL	A6,8 
	SRL	A4,8 
	ORR	A6,A4
* 
SETT15	EQU	*
	XIF
* 
	CF	A15,ASCTBY	CONVERT TO BINARY
	SUK	A3,2	END 
	RF(E)	SETT20 
	ADKL	A8,2
	STR	A6,A15	SAVE ON STACK (HOURS AND MINUTES
	RB	SETT10
* 
	EJECT			MONTIM 
* 
* 
SETT20	EQU	*
	INH
	STR	A6,A7	SECONDS TO MONITOR CLOCK 
	SUK	A7,2 
	LDR*	A6,A15
	STR	A6,A7	MINUTES TO MONITOR CLOCK 
	SUK	A7,2 
	LDR*	A6,A15
	STR	A6,A7	HOURS TO MONITOR CLOCK 
	SUK	A7,2 
	RB	TPDIS 
* 
	EJECT			MONTIM 
* 
* 
********* 
* TDATE * 
********* 
* 
* 
*    THIS IS THE GET/SET DATE LKM PROCESSOR.
* 
*    IT IS ENTERED FROM THE LKM HANDLER 
*    WITH THE FOLLOWING PARAMETERS: 
* 
*    A7 = GET/SET DATE PARAMETER
*         (A7 = 0 MEANS GET DATE, A7 = 1 MEANS SET DATE)
*    A8 = DATE CONTROL BLOCK (DCB)
* 
* 
TDATE	EQU	*	GET/SET DATE LKM PROCESSOR ENTRY
	LDR	A1,A7	SAVE REQUEST PARAMETER 
	LDKL	A7,MONCLO-2	ADDRESS TO DAY
	ADK	A1,0	SET CR
	RB(Z)	GETDAT	GET DATE
	RB	SETDAT	SET DATE 
* 
	EJECT			MONTIM 
* 
* 
**********
* BYTASC *
**********
* 
* 
*    BYTASC = SUBROUTINE TO CONVERT A6-CONTENT
*             FROM BINARY TO ASCII. 
*             RESULT IN A6. 
* 
* 
BYTASC	EQU	*
	LDK	A4,0 
* 
BYTA10	SUK	A6,/A
	RF(N)	BYTA20 
	ADKL	A4,/100 
	RB	BYTA10
* 
BYTA20	ADK	A6,/A
	ADR	A6,A4
	ORKL	A6,/3030
	RTN	A15
* 
	EJECT			MONTIM 
* 
* 
**********
* ASCTBY *
**********
* 
* 
*    ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT
*             FROM ASCII TO BINARY. 
*             RESULT IN A6. 
* 
* 
ASCTBY	EQU	*
	LDR	A4,A6
	ANK	A6,/F
	SRL	A4,8 
	ANK	A4,/F
	RF(E)	ASCT20 
* 
ASCT10	ADK	A6,/A
	SUK	A4,1 
	RB(NE)	ASCT10
* 
ASCT20	RTN	A15
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT MONTIM  REL 11.0 81-01-26 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0052              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004c}
0x0052…0092              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0056}
0x0092…009c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0096}
0x009c…00c4              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00a0}
0x00c4…00ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…0100              Head {h00=0x002e, h01=0x0050, text=»*   MONTIM = MONITOR CLOCK/DATE PROCESSORS«, t00=0x0000, t01=0x00d2}
0x0100…010a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0104}
0x010a…0114              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0128              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0122}
0x0128…0132              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012c}
0x0132…013c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…017c              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x0140}
0x017c…0186              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…0190              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x0190…01d4 (1, 0, 400)  Head {h00=0x0040, h01=0x0050, text=»*    THIS MODULE CONTAINS TOSS MONITOR CLOCK/DATE PROCESSORS«, t00=0x0001, t01=0x0004}
0x01d4…01de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0048}
0x01de…0212              Head {h00=0x0030, h01=0x0050, text=»*    -GETTIM    GET TIME FROM MONITOR CLOCK «, t00=0x0001, t01=0x0052}
0x0212…021c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0086}
0x021c…024e              Head {h00=0x002e, h01=0x0050, text=»*    -SETTIM    SET TIME IN MONITOR CLOCK «, t00=0x0001, t01=0x0090}
0x024e…0258              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0258…028c              Head {h00=0x0030, h01=0x0050, text=»*    -GETDAT    GET DATE FROM MONITOR CLOCK «, t00=0x0001, t01=0x00cc}
0x028c…0296              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0100}
0x0296…02c8              Head {h00=0x002e, h01=0x0050, text=»*    -SETDAT    SET DATE IN MONITOR CLOCK «, t00=0x0001, t01=0x010a}
0x02c8…02d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013c}
0x02d2…02ea              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0001, t01=0x0146}
0x02ea…02f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x015e}
0x02f4…02fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0168}
0x02fe…0312              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0172}
0x0312…0326              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x0186}
0x0326…033a              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x000a}
0x033a…0344              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x0344…034e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0028}
0x034e…0380              Head {h00=0x002e, h01=0x0050, text=» ENTRY GETTIM GET TIME FROM MONITOR CLOCK «, t00=0x0002, t01=0x0032}
0x0380…03b0              Head {h00=0x002c, h01=0x0050, text=» ENTRY SETTIM SET TIME IN MONITOR CLOCK «, t00=0x0002, t01=0x0064}
0x03b0…03e2              Head {h00=0x002e, h01=0x0050, text=» ENTRY TDATE GET/SET DATE IN MONITOR CLOCK«, t00=0x0002, t01=0x0094}
0x03e2…03fa              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0002, t01=0x00c6}
0x03fa…0404              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00de}
0x0404…040e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e8}
0x040e…0424              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x00f2}
0x0424…043a              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x0108}
0x043a…0450              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x011e}
0x0450…045a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0134}
0x045a…0464              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013e}
0x0464…0488              Head {h00=0x0020, h01=0x0050, text=» EXTRN MONCLO MONITOR CLOCK «, t00=0x0002, t01=0x0148}
0x0488…04b6              Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x016c}
0x04b6…04da              Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0003, t01=0x000a}
0x04da…04f2              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0003, t01=0x002e}
0x04f2…04fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0046}
0x04fc…0506              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0050}
0x0506…0538              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x005a}
0x0538…0542              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x008c}
0x0542…0560              Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0003, t01=0x0096}
0x0560…056a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b4}
0x056a…059c              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x00be}
0x059c…05a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00f0}
0x05a6…05d8              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0003, t01=0x00fa}
0x05d8…0606              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0003, t01=0x012c}
0x0606…0610              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015a}
0x0610…0624              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0003, t01=0x0164}
0x0624…062e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0178}
0x062e…0646              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0003, t01=0x0182}
0x0646…0650              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x000a}
0x0650…065a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0014}
0x065a…066c              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0004, t01=0x001e}
0x066c…067e              Head {h00=0x000e, h01=0x0050, text=»* GETTIM *«, t00=0x0004, t01=0x0030}
0x067e…0690              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0004, t01=0x0042}
0x0690…069a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0054}
0x069a…06a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005e}
0x06a4…06d4              Head {h00=0x002c, h01=0x0050, text=»*    THIS IS THE GET TIME LKM PROCESSOR.«, t00=0x0004, t01=0x0068}
0x06d4…06de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0098}
0x06de…070e              Head {h00=0x002c, h01=0x0050, text=»*    IT IS ENTERED FROM THE LKM HANDLER «, t00=0x0004, t01=0x00a2}
0x070e…0742              Head {h00=0x0030, h01=0x0050, text=»*    WITH ADDRESS TO THE USER TIMER CONTROL «, t00=0x0004, t01=0x00d2}
0x0742…0778              Head {h00=0x0032, h01=0x0050, text=»*    BLOCK IN A8. MONITOR CLOCK IS COPIED INTO«, t00=0x0004, t01=0x0106}
0x0778…079a              Head {h00=0x001e, h01=0x0050, text=»*    TIMER CONTROL BLOCK. «, t00=0x0004, t01=0x013c}
0x079a…07a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015e}
0x07a4…07ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0168}
0x07ae…07c2              Head {h00=0x0010, h01=0x0050, text=»GETTIM EQU *«, t00=0x0004, t01=0x0172}
0x07c2…07fc              Head {h00=0x0036, h01=0x0050, text=» LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND «, t00=0x0004, t01=0x0186}
0x07fc…0806              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0030}
0x0806…082e              Head {h00=0x0024, h01=0x0050, text=»GETDAT EQU * ENTRY USED BY TDATE«, t00=0x0005, t01=0x003a}
0x082e…0848              Head {h00=0x0016, h01=0x0050, text=» LDK A3,6 COUNTER «, t00=0x0005, t01=0x0062}
0x0848…0864              Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A7 SECONDS «, t00=0x0005, t01=0x007c}
0x0864…0886              Head {h00=0x001e, h01=0x0050, text=» STR A6,A15 SAVE ON STACK «, t00=0x0005, t01=0x0098}
0x0886…0898              Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0005, t01=0x00ba}
0x0898…08b4              Head {h00=0x0018, h01=0x0050, text=» LDR* A6,A7 MINUTES «, t00=0x0005, t01=0x00cc}
0x08b4…08d6              Head {h00=0x001e, h01=0x0050, text=» STR A6,A15 SAVE ON STACK «, t00=0x0005, t01=0x00e8}
0x08d6…08e8              Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x0005, t01=0x010a}
0x08e8…0902              Head {h00=0x0016, h01=0x0050, text=» LDR* A6,A7 HOURS «, t00=0x0005, t01=0x011c}
0x0902…090e              Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0005, t01=0x0136}
0x090e…0918              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0142}
0x0918…0946              Head {h00=0x002a, h01=0x0050, text=»GETT10 CF A15,BYTASC CONVERT TO ASCII «, t00=0x0005, t01=0x014c}
0x0946…095c              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0005, t01=0x017a}
0x095c…098a              Head {h00=0x002a, h01=0x0050, text=» SC A6,1,A8 STORE RIGHTHAND CHARACTER «, t00=0x0005, t01=0x0190}
0x098a…099c              Head {h00=0x000e, h01=0x0050, text=» ECR A6,A6«, t00=0x0006, t01=0x002e}
0x099c…09c8              Head {h00=0x0028, h01=0x0050, text=» SCR A6,A8 STORE LEFTHAND CHARACTER «, t00=0x0006, t01=0x0040}
0x09c8…09d4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0006, t01=0x006c}
0x09d4…09de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0078}
0x09de…09f6              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0006, t01=0x0082}
0x09f6…0a00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x009a}
0x0a00…0a0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a4}
0x0a0a…0a20              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0006, t01=0x00ae}
0x0a20…0a52              Head {h00=0x002e, h01=0x0050, text=» LDR A4,A8 GET TIMER CONTROL BLOCK ADDRESS«, t00=0x0006, t01=0x00c4}
0x0a52…0a64              Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x0006, t01=0x00f6}
0x0a64…0a8a              Head {h00=0x0022, h01=0x0050, text=» RF(Z) GETT15 TCB ADDRESS EVEN«, t00=0x0006, t01=0x0108}
0x0a8a…0a9c              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0006, t01=0x012e}
0x0a9c…0ab0              Head {h00=0x0010, h01=0x0050, text=» EL A4,1,A8 «, t00=0x0006, t01=0x0140}
0x0ab0…0ac4              Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0006, t01=0x0154}
0x0ac4…0ad6              Head {h00=0x000e, h01=0x0050, text=» SLL A1,8 «, t00=0x0006, t01=0x0168}
0x0ad6…0ae8              Head {h00=0x000e, h01=0x0050, text=» ORR A1,A4«, t00=0x0006, t01=0x017a}
0x0ae8…0afc              Head {h00=0x0010, h01=0x0050, text=» ES A1,1,A8 «, t00=0x0006, t01=0x018c}
0x0afc…0b0e              Head {h00=0x000e, h01=0x0050, text=» ELR A4,A8«, t00=0x0007, t01=0x0010}
0x0b0e…0b20              Head {h00=0x000e, h01=0x0050, text=» SRL A6,8 «, t00=0x0007, t01=0x0022}
0x0b20…0b36              Head {h00=0x0012, h01=0x0050, text=» ANKL A4,/FF00«, t00=0x0007, t01=0x0034}
0x0b36…0b48              Head {h00=0x000e, h01=0x0050, text=» ORR A6,A4«, t00=0x0007, t01=0x004a}
0x0b48…0b52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b52…0b8c              Head {h00=0x0036, h01=0x0050, text=»GETT15 ESR A6,A8 SET VALUE IN TIMER CONTROL BLOCK «, t00=0x0007, t01=0x0066}
0x0b8c…0b98              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0007, t01=0x00a0}
0x0b98…0ba2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ac}
0x0ba2…0bb4              Head {h00=0x000e, h01=0x0050, text=» SUK A3,2 «, t00=0x0007, t01=0x00b6}
0x0bb4…0bca              Head {h00=0x0012, h01=0x0050, text=» RF(E) GETT20 «, t00=0x0007, t01=0x00c8}
0x0bca…0bdc              Head {h00=0x000e, h01=0x0050, text=» ADKL A8,2«, t00=0x0007, t01=0x00de}
0x0bdc…0c0c              Head {h00=0x002c, h01=0x0050, text=» LDR* A6,A15 GET ACTUAL TIME FROM STACK «, t00=0x0007, t01=0x00f0}
0x0c0c…0c1e              Head {h00=0x000e, h01=0x0050, text=» RB GETT10«, t00=0x0007, t01=0x0120}
0x0c1e…0c28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0132}
0x0c28…0c40              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0007, t01=0x013c}
0x0c40…0c4a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0154}
0x0c4a…0c54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x015e}
0x0c54…0c6c              Head {h00=0x0014, h01=0x0050, text=»GETT20 SUK A7,2 «, t00=0x0007, t01=0x0168}
0x0c6c…0c9e              Head {h00=0x002e, h01=0x0050, text=» LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY «, t00=0x0007, t01=0x0180}
0x0c9e…0cd4              Head {h00=0x0032, h01=0x0050, text=» ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7«, t00=0x0008, t01=0x0022}
0x0cd4…0cde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0058}
0x0cde…0cf2              Head {h00=0x0010, h01=0x0050, text=»TPDIS EQU * «, t00=0x0008, t01=0x0062}
0x0cf2…0d16              Head {h00=0x0020, h01=0x0050, text=» CMR A7 CLEAR MIDNIGTH CARRY«, t00=0x0008, t01=0x0076}
0x0d16…0d2a              Head {h00=0x0010, h01=0x0050, text=» ABL LKMQDI «, t00=0x0008, t01=0x009a}
0x0d2a…0d34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ae}
0x0d34…0d4c              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x0008, t01=0x00b8}
0x0d4c…0d56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00d0}
0x0d56…0d60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00da}
0x0d60…0d72              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0008, t01=0x00e4}
0x0d72…0d84              Head {h00=0x000e, h01=0x0050, text=»* SETTIM *«, t00=0x0008, t01=0x00f6}
0x0d84…0d96              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0008, t01=0x0108}
0x0d96…0da0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011a}
0x0da0…0daa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0124}
0x0daa…0dda              Head {h00=0x002c, h01=0x0050, text=»*    THIS IS THE SET TIME LKM PROCESSOR.«, t00=0x0008, t01=0x012e}
0x0dda…0de4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015e}
0x0de4…0e18              Head {h00=0x0030, h01=0x0050, text=»*    IT IS ENTERED FROM THE LKM HANDLER WITH«, t00=0x0008, t01=0x0168}
0x0e18…0e4c              Head {h00=0x0030, h01=0x0050, text=»*    ADDRESS TO THE USER TIMER CONTROL BLOCK«, t00=0x0009, t01=0x000c}
0x0e4c…0e80              Head {h00=0x0030, h01=0x0050, text=»*    IN A8. VALUE IN TIMER CONTROL BLOCK IS «, t00=0x0009, t01=0x0040}
0x0e80…0ea8              Head {h00=0x0024, h01=0x0050, text=»*    COPIED INTO MONITOR CLOCK. «, t00=0x0009, t01=0x0074}
0x0ea8…0eb2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x009c}
0x0eb2…0ebc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a6}
0x0ebc…0ed0              Head {h00=0x0010, h01=0x0050, text=»SETTIM EQU *«, t00=0x0009, t01=0x00b0}
0x0ed0…0f0a              Head {h00=0x0036, h01=0x0050, text=» LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND «, t00=0x0009, t01=0x00c4}
0x0f0a…0f14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00fe}
0x0f14…0f3c              Head {h00=0x0024, h01=0x0050, text=»SETDAT EQU * ENTRY USED BY TDATE«, t00=0x0009, t01=0x0108}
0x0f3c…0f56              Head {h00=0x0016, h01=0x0050, text=» LDK A3,6 COUNTER «, t00=0x0009, t01=0x0130}
0x0f56…0f62              Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0009, t01=0x014a}
0x0f62…0f6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0156}
0x0f6c…0f80              Head {h00=0x0010, h01=0x0050, text=»SETT10 EQU *«, t00=0x0009, t01=0x0160}
0x0f80…0f96              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0009, t01=0x0174}
0x0f96…0fc0              Head {h00=0x0026, h01=0x0050, text=» LCR A6,A8 GET LEFTHAND CHARACTER «, t00=0x0009, t01=0x018a}
0x0fc0…0fd2              Head {h00=0x000e, h01=0x0050, text=» ECR A6,A6«, t00=0x000a, t01=0x0024}
0x0fd2…0ffe              Head {h00=0x0028, h01=0x0050, text=» LC A6,1,A8 GET RIGHTHAND CHARACTER «, t00=0x000a, t01=0x0036}
0x0ffe…100a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000a, t01=0x0062}
0x100a…1014              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x006e}
0x1014…102c              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x000a, t01=0x0078}
0x102c…1036              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0090}
0x1036…1040              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x009a}
0x1040…1056              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000a, t01=0x00a4}
0x1056…108c              Head {h00=0x0032, h01=0x0050, text=» ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK «, t00=0x000a, t01=0x00ba}
0x108c…10be              Head {h00=0x002e, h01=0x0050, text=» LDR A4,A8 GET TIMER CONTROL BLOCK ADDRESS«, t00=0x000a, t01=0x00f0}
0x10be…10d0              Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x000a, t01=0x0122}
0x10d0…10f6              Head {h00=0x0022, h01=0x0050, text=» RF(Z) SETT15 TCB ADDRESS EVEN«, t00=0x000a, t01=0x0134}
0x10f6…112c              Head {h00=0x0032, h01=0x0050, text=» EL A4,1,A8 CORRECTIONS FOR UNEVEN TCB ADDRESS«, t00=0x000a, t01=0x015a}
0x112c…113e              Head {h00=0x000e, h01=0x0050, text=» SLL A6,8 «, t00=0x000a, t01=0x0190}
0x113e…1150              Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x000b, t01=0x0012}
0x1150…1162              Head {h00=0x000e, h01=0x0050, text=» ORR A6,A4«, t00=0x000b, t01=0x0024}
0x1162…116c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0036}
0x116c…1180              Head {h00=0x0010, h01=0x0050, text=»SETT15 EQU *«, t00=0x000b, t01=0x0040}
0x1180…118c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0054}
0x118c…1196              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0060}
0x1196…11be              Head {h00=0x0024, h01=0x0050, text=» CF A15,ASCTBY CONVERT TO BINARY«, t00=0x000b, t01=0x006a}
0x11be…11d4              Head {h00=0x0012, h01=0x0050, text=» SUK A3,2 END «, t00=0x000b, t01=0x0092}
0x11d4…11ea              Head {h00=0x0012, h01=0x0050, text=» RF(E) SETT20 «, t00=0x000b, t01=0x00a8}
0x11ea…11fc              Head {h00=0x000e, h01=0x0050, text=» ADKL A8,2«, t00=0x000b, t01=0x00be}
0x11fc…1230              Head {h00=0x0030, h01=0x0050, text=» STR A6,A15 SAVE ON STACK (HOURS AND MINUTES«, t00=0x000b, t01=0x00d0}
0x1230…1242              Head {h00=0x000e, h01=0x0050, text=» RB SETT10«, t00=0x000b, t01=0x0104}
0x1242…124c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0116}
0x124c…1264              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x000b, t01=0x0120}
0x1264…126e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0138}
0x126e…1278              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0142}
0x1278…128c              Head {h00=0x0010, h01=0x0050, text=»SETT20 EQU *«, t00=0x000b, t01=0x014c}
0x128c…1298              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000b, t01=0x0160}
0x1298…12c4              Head {h00=0x0028, h01=0x0050, text=» STR A6,A7 SECONDS TO MONITOR CLOCK «, t00=0x000b, t01=0x016c}
0x12c4…12d6              Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x000c, t01=0x0008}
0x12d6…12ea              Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x000c, t01=0x001a}
0x12ea…1316              Head {h00=0x0028, h01=0x0050, text=» STR A6,A7 MINUTES TO MONITOR CLOCK «, t00=0x000c, t01=0x002e}
0x1316…1328              Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x000c, t01=0x005a}
0x1328…133c              Head {h00=0x0010, h01=0x0050, text=» LDR* A6,A15«, t00=0x000c, t01=0x006c}
0x133c…1366              Head {h00=0x0026, h01=0x0050, text=» STR A6,A7 HOURS TO MONITOR CLOCK «, t00=0x000c, t01=0x0080}
0x1366…1378              Head {h00=0x000e, h01=0x0050, text=» SUK A7,2 «, t00=0x000c, t01=0x00aa}
0x1378…138a              Head {h00=0x000e, h01=0x0050, text=» RB TPDIS «, t00=0x000c, t01=0x00bc}
0x138a…1394              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ce}
0x1394…13ac              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x000c, t01=0x00d8}
0x13ac…13b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f0}
0x13b6…13c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00fa}
0x13c0…13d2              Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x000c, t01=0x0104}
0x13d2…13e4              Head {h00=0x000e, h01=0x0050, text=»* TDATE * «, t00=0x000c, t01=0x0116}
0x13e4…13f6              Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x000c, t01=0x0128}
0x13f6…1400              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x013a}
0x1400…140a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0144}
0x140a…143e              Head {h00=0x0030, h01=0x0050, text=»*    THIS IS THE GET/SET DATE LKM PROCESSOR.«, t00=0x000c, t01=0x014e}
0x143e…1448              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0182}
0x1448…1478              Head {h00=0x002c, h01=0x0050, text=»*    IT IS ENTERED FROM THE LKM HANDLER «, t00=0x000c, t01=0x018c}
0x1478…14a4              Head {h00=0x0028, h01=0x0050, text=»*    WITH THE FOLLOWING PARAMETERS: «, t00=0x000d, t01=0x002c}
0x14a4…14ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0058}
0x14ae…14d6              Head {h00=0x0024, h01=0x0050, text=»*    A7 = GET/SET DATE PARAMETER«, t00=0x000d, t01=0x0062}
0x14d6…1516              Head {h00=0x003c, h01=0x0050, text=»*         (A7 = 0 MEANS GET DATE, A7 = 1 MEANS SET DATE)«, t00=0x000d, t01=0x008a}
0x1516…1540              Head {h00=0x0026, h01=0x0050, text=»*    A8 = DATE CONTROL BLOCK (DCB)«, t00=0x000d, t01=0x00ca}
0x1540…154a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00f4}
0x154a…1554              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00fe}
0x1554…1588              Head {h00=0x0030, h01=0x0050, text=»TDATE EQU * GET/SET DATE LKM PROCESSOR ENTRY«, t00=0x000d, t01=0x0108}
0x1588…15b2              Head {h00=0x0026, h01=0x0050, text=» LDR A1,A7 SAVE REQUEST PARAMETER «, t00=0x000d, t01=0x013c}
0x15b2…15da              Head {h00=0x0024, h01=0x0050, text=» LDKL A7,MONCLO-2 ADDRESS TO DAY«, t00=0x000d, t01=0x0166}
0x15da…15f2              Head {h00=0x0014, h01=0x0050, text=» ADK A1,0 SET CR«, t00=0x000d, t01=0x018e}
0x15f2…1610              Head {h00=0x001a, h01=0x0050, text=» RB(Z) GETDAT GET DATE«, t00=0x000e, t01=0x0016}
0x1610…162c              Head {h00=0x0018, h01=0x0050, text=» RB SETDAT SET DATE «, t00=0x000e, t01=0x0034}
0x162c…1636              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0050}
0x1636…164e              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x000e, t01=0x005a}
0x164e…1658              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0072}
0x1658…1662              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x007c}
0x1662…1674              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x0086}
0x1674…1686              Head {h00=0x000e, h01=0x0050, text=»* BYTASC *«, t00=0x000e, t01=0x0098}
0x1686…1698              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x00aa}
0x1698…16a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00bc}
0x16a2…16ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00c6}
0x16ac…16e2              Head {h00=0x0032, h01=0x0050, text=»*    BYTASC = SUBROUTINE TO CONVERT A6-CONTENT«, t00=0x000e, t01=0x00d0}
0x16e2…170e              Head {h00=0x0028, h01=0x0050, text=»*             FROM BINARY TO ASCII. «, t00=0x000e, t01=0x0106}
0x170e…1732              Head {h00=0x0020, h01=0x0050, text=»*             RESULT IN A6. «, t00=0x000e, t01=0x0132}
0x1732…173c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0156}
0x173c…1746              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0160}
0x1746…175a              Head {h00=0x0010, h01=0x0050, text=»BYTASC EQU *«, t00=0x000e, t01=0x016a}
0x175a…176c              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x000e, t01=0x017e}
0x176c…1776              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0190}
0x1776…178e              Head {h00=0x0014, h01=0x0050, text=»BYTA10 SUK A6,/A«, t00=0x000f, t01=0x000a}
0x178e…17a4              Head {h00=0x0012, h01=0x0050, text=» RF(N) BYTA20 «, t00=0x000f, t01=0x0022}
0x17a4…17ba              Head {h00=0x0012, h01=0x0050, text=» ADKL A4,/100 «, t00=0x000f, t01=0x0038}
0x17ba…17cc              Head {h00=0x000e, h01=0x0050, text=» RB BYTA10«, t00=0x000f, t01=0x004e}
0x17cc…17d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0060}
0x17d6…17ee              Head {h00=0x0014, h01=0x0050, text=»BYTA20 ADK A6,/A«, t00=0x000f, t01=0x006a}
0x17ee…1800              Head {h00=0x000e, h01=0x0050, text=» ADR A6,A4«, t00=0x000f, t01=0x0082}
0x1800…1816              Head {h00=0x0012, h01=0x0050, text=» ORKL A6,/3030«, t00=0x000f, t01=0x0094}
0x1816…1826              Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x000f, t01=0x00aa}
0x1826…1830              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00ba}
0x1830…1848              Head {h00=0x0014, h01=0x0050, text=» EJECT   MONTIM «, t00=0x000f, t01=0x00c4}
0x1848…1852              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00dc}
0x1852…185c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e6}
0x185c…186e              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x00f0}
0x186e…1880              Head {h00=0x000e, h01=0x0050, text=»* ASCTBY *«, t00=0x000f, t01=0x0102}
0x1880…1892              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000f, t01=0x0114}
0x1892…189c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0126}
0x189c…18a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0130}
0x18a6…18dc              Head {h00=0x0032, h01=0x0050, text=»*    ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT«, t00=0x000f, t01=0x013a}
0x18dc…1908              Head {h00=0x0028, h01=0x0050, text=»*             FROM ASCII TO BINARY. «, t00=0x000f, t01=0x0170}
0x1908…192c              Head {h00=0x0020, h01=0x0050, text=»*             RESULT IN A6. «, t00=0x0010, t01=0x000c}
0x192c…1936              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0030}
0x1936…1940              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x003a}
0x1940…1954              Head {h00=0x0010, h01=0x0050, text=»ASCTBY EQU *«, t00=0x0010, t01=0x0044}
0x1954…1966              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A6«, t00=0x0010, t01=0x0058}
0x1966…1978              Head {h00=0x000e, h01=0x0050, text=» ANK A6,/F«, t00=0x0010, t01=0x006a}
0x1978…198a              Head {h00=0x000e, h01=0x0050, text=» SRL A4,8 «, t00=0x0010, t01=0x007c}
0x198a…199c              Head {h00=0x000e, h01=0x0050, text=» ANK A4,/F«, t00=0x0010, t01=0x008e}
0x199c…19b2              Head {h00=0x0012, h01=0x0050, text=» RF(E) ASCT20 «, t00=0x0010, t01=0x00a0}
0x19b2…19bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b6}
0x19bc…19d4              Head {h00=0x0014, h01=0x0050, text=»ASCT10 ADK A6,/A«, t00=0x0010, t01=0x00c0}
0x19d4…19e6              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x00d8}
0x19e6…19fc              Head {h00=0x0012, h01=0x0050, text=» RB(NE) ASCT10«, t00=0x0010, t01=0x00ea}
0x19fc…1a06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0100}
0x1a06…1a1c              Head {h00=0x0012, h01=0x0050, text=»ASCT20 RTN A15«, t00=0x0010, t01=0x010a}
0x1a1c…1a26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0120}
0x1a26…1a30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012a}
0x1a30…1a3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0134}
0x1a3a…1a46              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0010, t01=0x013e}
0x1a46…1a4a              Head {h00=0x4004, h01=0x0000}
0x1a4a…1a4e              00 10 01 4a                                                                                                                                                                                                                                       ┆   J┆
0x1a4e…1a56 (17, 1, 8)   20 04 00 00 00 11 00 04                                                                                                                                                                                                                           ┆        ┆
0x1a56…1a5e (18, 1, 8)   20 04 00 00 00 02 00 04                                                                                                                                                                                                                           ┆        ┆
0x1a5e…1aae (19, 0, 400) 4d 45 4e 54 20 42 41 53 45 20 00 12 01 6c 00 08 00 50 5c 58 49 46 00 13 00 12 00 06 00 50 2a 20 00 13 00 1e 00 12 00 50 5c 49 46 54 5c 4d 4d 55 50 41 47 3d 30 20 00 13 00 28 00 10 00 50 54 4c 44 53 34 30 5c 45 51 55 5c 2a 00 13 00 3e 00 32   ┆MENT BASE    l   P XIF       P*        P IFT MMUPAG=0    (   PTLDS40 EQU *   > 2┆
0x1aae…1afe              00 50 5c 53 54 2a 5c 41 31 2c 54 54 42 3a 43 42 2c 41 35 5c 55 50 44 41 54 45 20 43 55 52 52 45 4e 54 20 53 45 47 4d 45 4e 54 20 42 41 53 45 20 00 13 00 52 00 08 00 50 5c 58 49 46 00 13 00 88 00 06 00 50 2a 20 00 13 00 94 00 12 00 50 5c 49   ┆ P ST* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE    R   P XIF       P*        P I┆
0x1afe…1b4e              46 54 5c 43 50 55 38 35 32 3d 30 20 00 13 00 9e 00 0e 00 50 5c 4c 44 52 5c 41 36 2c 41 35 00 13 00 b4 00 24 00 50 5c 4d 4c 5c 36 2c 54 54 42 3a 53 41 2b 32 2c 41 36 5c 52 45 53 54 4f 52 45 20 41 31 2d 41 36 20 00 13 00 c6 00 24 00 50 5c 52   ┆FT CPU852=0        P LDR A6,A5     $ P ML 6,TTB:SA+2,A6 RESTORE A1-A6      $ P R┆
0x1b4e…1b9e              54 4e 5c 41 31 35 5c 52 45 54 55 52 4e 20 54 4f 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 20 00 13 00 ee 00 08 00 50 5c 58 49 46 00 13 01 16 00 06 00 50 2a 20 00 13 01 22 00 12 00 50 5c 49 46 54 5c 43 50 55 38 35 32 3d 31 20 00 13 01 2c 00 24   ┆TN A15 RETURN TO CALLING TASK        P XIF       P*    "   P IFT CPU852=1    , $┆
0x1b9e…1bee              00 50 5c 4c 44 5c 41 31 2c 54 54 42 3a 53 41 2b 32 2c 41 35 5c 52 45 53 54 4f 52 45 20 41 31 2d 41 36 00 13 01 42 00 16 00 50 5c 4c 44 5c 41 32 2c 54 54 42 3a 53 41 2b 34 2c 41 35 00 13 01 6a 00 16 00 50 5c 4c 44 5c 41 33 2c 54 54 42 3a 53   ┆ P LD A1,TTB:SA+2,A5 RESTORE A1-A6   B   P LD A2,TTB:SA+4,A5   j   P LD A3,TTB:S┆
0x1bee…1c3e (20, 2, 194) 41 2b 36 2c 41 35 00 13 01 84 00 16 00 50 5c 4c 44 5c 41 34 2c 54 54 42 3a 53 41 2b 38 2c 41 35 00 14 00 0e 00 18 00 50 5c 4c 44 5c 41 36 2c 54 54 42 3a 53 41 2b 31 32 2c 41 35 20 00 14 00 28 00 18 00 50 5c 4c 44 5c 41 35 2c 54 54 42 3a 53   ┆A+6,A5       P LD A4,TTB:SA+8,A5       P LD A6,TTB:SA+12,A5    (   P LD A5,TTB:S┆
0x1c3e…1c8e              41 2b 31 30 2c 41 35 20 00 14 00 44 00 24 00 50 5c 52 54 4e 5c 41 31 35 5c 52 45 54 55 52 4e 20 54 4f 20 43 41 4c 4c 49 4e 47 20 54 41 53 4b 20 00 14 00 60 00 08 00 50 5c 58 49 46 00 14 00 88 00 06 00 50 2a 20 00 14 00 94 00 06 00 50 2a 20   ┆A+10,A5    D $ P RTN A15 RETURN TO CALLING TASK    `   P XIF       P*        P* ┆
0x1c8e…1cb0              00 14 00 9e 00 06 00 50 2a 20 00 14 00 a8 00 08 00 04 5c 45 4e 44 00 14 00 b2 40 04 00 00 00 14 00 be                                                                                                                                             ┆       P*          END    @       ┆

Reduced view