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

⟦14a0d8064⟧

    Length: 7834 (0x1e9a)
    Notes: pts_type(SC)
    Names: »TPROC.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »TOSSWORK/TPROC.SC« 
└─⟦48601905a⟧ Bits:30009668 Philips computer tape "600121"
    └─⟦this⟧ »M:TU10/TPROC.SC« 
└─⟦d2a299635⟧ Bits:30009698 Philips computer tape "600415"
    └─⟦this⟧ »M:TU10/TPROC.SC« 

PTS(SC)

	IDENT TPROC 	REL 10.0 80-03-14 870105041000

* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   TPROC = TOSS LKM PROCESSORS 
* 
* 
* 
* 
* 
* 
**************************************************
* 
* 
*   THIS MODULE CONTAINS THE FOLLOWING
*   TOSS LKM PROCESSORS:
* 
*   - TWAIT  = WAIT 
* 
*   - TMWAIT = MULTIPLE WAIT
* 
*   - TACTOT = ACTIVATE/RESTART TASK
* 
	EJECT			TPROC
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	TWAIT	WAIT PROCESSOR 
	ENTRY	TMWAIT	MULTIPLE WAIT PROCESSOR 
	ENTRY	TACTOT	ACTIVATE/RESTART PROCESSOR
	EJECT			TPROC
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	QTJOB	QUEUE TASK FOR DISPATCHING 
	EXTRN	LKMQDI	QUEUE TASK AND DISPATCH 
	EXTRN	ACTDIS	ACTIVATE TASK AND DISPATCH
	EXTRN	LKMRQE	LKM REQUEST ERROR 
	EXTRN	FNDDWT	FIND DWT ADDRESS FROM FILE CODE 
	EXTRN	FNDTID	FIND TTAB ADDRESS FROM TASK ID
	EXTRN	TTB:SA	TTAB SAVE AREA
	EXTRN	DWTST	DWT STATUS 
	EXTRN	DWTTAB	TTAB ADDRESS
	EXTRN	DWTWAT	WAIT/ACTIVATE INDICATOR 
	EJECT			TPROC
* 
* 
***************************************** 
* 
*	CONDITIONAL ASSEMBLY
* 
***************************************** 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	0
* 
	EJECT			TPROC
* 
* 
********
* WAIT *
********
* 
* 
*   THIS IS THE WAIT LKM PROCESSOR. 
* 
*   THIS MODULE IS ENTERED WHEN THE TASK
*   WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. 
* 
*   IT IS ENTERED FROM THE LKM HANDLER
*   WITH THE FOLLOWING PARAMETERS:
* 
*   A5 = TTAB ADDRESS 
*   A8 = ECB ADDRESS
* 
* 
TWAIT	CF	A15,FNDDWT	SEARCH DWT ADDRESS
	ADK	A6,0	SET CR
	RF(Z)	TP:RQE	FILE CODE NOT FOUND 
* 
	IFT	MMUPAG=0 
	LDR*	A1,A8	RETURN IF EVENT COMPLETED 
	XIF
* 
	IFT	MMUPAG=1 
	ELR	A1,A8	RETURN IF EVENT COMPLETED
	XIF
* 
	RF(N)	TP:QDI	I/O ALREADY COMPLETED 
	IM	DWTWAT,A6	NO, SET WAIT INDICATOR IN DWT 
* 
T:DISP	ABL	TDISP	GO TO DISPATCHER 
* 
	EJECT			TPROC
* 
* 
**********
* TACTOT *
**********
* 
* 
*   THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR.
* 
*   THIS MODULE IS ENTERED FROM THE LKM HANDLER 
*   WHEN A TASK HAS TO BE ACTIVATED.
* 
*   THE FOLLOWING PARAMETERS ARE SUPPLIED:- 
* 
*   A1 = PARAMETER WHEN A4 NOT ZERO 
*   A4 = START ADDRESS AT ACTIVATION, ELSE ZERO 
*   A5 = TTAB 
*   A7 = IDENTIFICATION FOR TASK TO BE ACTIVATED
* 
* 
TACTOT	EQU	*
	CF	A15,FNDTID	FIND TTAB ADDRESS
	ADK	A2,0	SET CR
	RF(Z)	TP:RQE	TASK NOT IN SYSTEM
	CF	A15,QTJOB	QUEUE CALLING TASK FOR DISPATCHING
	LD	A3,TTB:SA+6,A5	GET SEGMENT NUMBER 
	LDR	A5,A2
	LDR	A2,A4
	RF(Z)	TP:QDI	RESTART: QUEUE FOR DISPATCHING
	ABL	ACTDIS	ACTIVATE TASK AND DISPATCH
* 
	EJECT			TPROC
* 
* 
**********
* TMWAIT *
**********
* 
* 
*   THIS IS THE MULTIPLE WAIT LKM PROCESSOR.
* 
*   IT IS ENTERED FROM THE LKM HANDLER
*   WITH THE FOLLOWING PARAMETERS:
* 
*   A5 = TTAB ADDRESS 
*   A7 = ECBBLK ADDRESS 
* 
*   WHEN ONE OF THE SPECIFIED EVENTS IS COMPLETED,
*   RETURN IS MADE TO THE CALLING TASK VIA TENDIO 
*   WITH THE FOLLOWING PARAMETERS:
* 
*   A8 = ECB ADDRESS OF COMPLETED EVENT 
* 
*   IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO).
* 
*   NOTICE THAT ALL EVENTS MUST HAVE
*   BEEN ISSUED IN THE NO WAIT MODE.
* 
* 
	EJECT			TPROC
* 
* 
TMWAIT	EQU	*	MULTIPLE WAIT ENTRY
	LDK	A3,0 
* 
	IFT	MMUPAG=0 
	LDR*	A1,A7	GET NO OF ECB:S IN ECBBLK 
	XIF
* 
	IFT	MMUPAG=1 
	ELR	A1,A7	GET NO OF ECB:S IN ECBBLK
	XIF
* 
	RF(NP)	TP:RQE	REQUEST ERROR IF <= 0
* 
TMW:10	EQU	*
	ADK	A7,2	POINT TO NEXT ECB ADDRESS IN ECBBLK 
* 
	IFT	MMUPAG=0 
	LDR*	A8,A7	GET ECB ADDRESS 
	LDR*	A2,A8	GET FIRST WORD OF ECB 
	XIF
* 
	IFT	MMUPAG=1 
	ELR	A8,A7	GET ECB ADDRESS
	ELR	A2,A8	GET FIRST WORD OF ECB
	XIF
* 
	RF(N)	TMW:30	I/O ALREADY COMPLETED 
	CF	A15,FNDDWT	NO, SEARCH DWT ADDRESS FROM FILE CODE
	ADK	A6,0	SET CR
	RF(Z)	TP:RQE	NOT FOUND 
* 
	EJECT			TPROC
* 
* 
	LD	A2,DWTST,A6	GET DWT STATUS
	RF(N)	TP:RQE	NOT BUSY
	CW	A5,DWTTAB,A6
	RF(NE)	TP:RQE	REQUEST NOT ISSUED BY THIS TASK
	LD	A2,DWTWAT,A6	GET WAIT/ACTIVATE INDICATOR
	RF(NZ)	TP:RQE	REQUEST ISSUED WITH WAIT 
	ORK	A6,1	SET BIT 15
	ADK	A3,0	CHECK FLAG IF FIRST ECB TO WAIT FOR 
	RF(NZ)	TMW:20	NOT THE FIRST ECB IN ECBBLK
	LDR	A9,A6	SAVE FIRST DWT ADDRESS 
	LDR	A3,A6
* 
TMW:20	EQU	*
	ST	A6,DWTWAT,A9	CHAIN THIS DWT WITH THE ONE BEFORE 
	LDR	A9,A6	SAVE THIS DWT ADDRESS
	SUK	A1,1 
	RB(P)	TMW:10	MORE ECB:S IN ECBBLK
	ST	A3,DWTWAT,A9	NO, SET FIRST DWT ADDRESS IN THE LAST
	RB	T:DISP	GO TO DISPATCHER 
* 
TMW:30	EQU	*
	ST	A8,TTB:SA+16,A5	UPDATE A8 IN TTAB SAVE AREA 
	ADK	A3,0	CHECK FLAG IF FIRST ECB TO WAIT FOR 
	RF(Z)	TP:QDI	FIRST ECB IN ECBBLK 
* 
TMW:40	ADKL	A3,DWTWAT	POINT TO WAIT/ACTIVATE INDICATOR
	LDR*	A2,A3	GET NEXT DWT ADDRESS
	RF(Z)	TP:QDI	NO MORE DWT:S 
	CMR	A3	SET TO NO WAIT AGAIN
	LDR	A3,A2
	RB	TMW:40
* 
	EJECT			TPROC
* 
* 
TP:RQE	EQU	*
	ABL	LKMRQE	LKM REQUEST ERROR 
* 
TP:QDI	EQU	*
	ABL	LKMQDI	QUEUE TASK AND DISPATCH 
* 
* 
* 
	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT TPROC  REL 10.0 80-03-14 870105041000«, t00=0x0000, t01=0x0004}
0x0034…003c              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…0050              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x0050…008a              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0054}
0x008a…0094              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008e}
0x0094…00bc              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0098}
0x00bc…00c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c0}
0x00c6…00ee              Head {h00=0x0024, h01=0x0050, text=»*   TPROC = TOSS LKM PROCESSORS «, t00=0x0000, t01=0x00ca}
0x00ee…00f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x00f8…0102              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0164              Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x012e}
0x0164…016e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…0178              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x0178…01a6              Head {h00=0x002a, h01=0x0050, text=»*   THIS MODULE CONTAINS THE FOLLOWING«, t00=0x0000, t01=0x017c}
0x01a6…01c6              Head {h00=0x001c, h01=0x0050, text=»*   TOSS LKM PROCESSORS:«, t00=0x0001, t01=0x001a}
0x01c6…01d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003a}
0x01d0…01ec              Head {h00=0x0018, h01=0x0050, text=»*   - TWAIT  = WAIT «, t00=0x0001, t01=0x0044}
0x01ec…01f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x01f6…021a              Head {h00=0x0020, h01=0x0050, text=»*   - TMWAIT = MULTIPLE WAIT«, t00=0x0001, t01=0x006a}
0x021a…0224              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008e}
0x0224…0250              Head {h00=0x0028, h01=0x0050, text=»*   - TACTOT = ACTIVATE/RESTART TASK«, t00=0x0001, t01=0x0098}
0x0250…025a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x025a…0270              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0001, t01=0x00ce}
0x0270…027a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e4}
0x027a…0284              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ee}
0x0284…0298              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00f8}
0x0298…02ac              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x010c}
0x02ac…02c0              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0120}
0x02c0…02ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0134}
0x02ca…02d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013e}
0x02d4…02f8              Head {h00=0x0020, h01=0x0050, text=» ENTRY TWAIT WAIT PROCESSOR «, t00=0x0001, t01=0x0148}
0x02f8…0326              Head {h00=0x002a, h01=0x0050, text=» ENTRY TMWAIT MULTIPLE WAIT PROCESSOR «, t00=0x0001, t01=0x016c}
0x0326…0356              Head {h00=0x002c, h01=0x0050, text=» ENTRY TACTOT ACTIVATE/RESTART PROCESSOR«, t00=0x0002, t01=0x000a}
0x0356…036c              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0002, t01=0x003a}
0x036c…0376              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0050}
0x0376…0380              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…0396              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0064}
0x0396…03ac              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x007a}
0x03ac…03c2              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0090}
0x03c2…03cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a6}
0x03cc…03d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b0}
0x03d6…03f6              Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x00ba}
0x03f6…0426              Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x0002, t01=0x00da}
0x0426…0454              Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x010a}
0x0454…0484              Head {h00=0x002c, h01=0x0050, text=» EXTRN ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0002, t01=0x0138}
0x0484…04ac              Head {h00=0x0024, h01=0x0050, text=» EXTRN LKMRQE LKM REQUEST ERROR «, t00=0x0002, t01=0x0168}
0x04ac…04e2              Head {h00=0x0032, h01=0x0050, text=» EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE «, t00=0x0002, t01=0x0190}
0x04e2…0516              Head {h00=0x0030, h01=0x0050, text=» EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID«, t00=0x0003, t01=0x0036}
0x0516…053a              Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0003, t01=0x006a}
0x053a…055a              Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x008e}
0x055a…057c              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0003, t01=0x00ae}
0x057c…05aa              Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTWAT WAIT/ACTIVATE INDICATOR «, t00=0x0003, t01=0x00d0}
0x05aa…05c0              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0003, t01=0x00fe}
0x05c0…05ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0114}
0x05ca…05d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011e}
0x05d4…0606              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x0128}
0x0606…0610              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015a}
0x0610…062e              Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0003, t01=0x0164}
0x062e…0638              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0182}
0x0638…066a              Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x018c}
0x066a…0674              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002e}
0x0674…06a6              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0004, t01=0x0038}
0x06a6…06d4              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0004, t01=0x006a}
0x06d4…06de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0098}
0x06de…06f2              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0004, t01=0x00a2}
0x06f2…06fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b6}
0x06fc…0712              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0004, t01=0x00c0}
0x0712…071c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d6}
0x071c…0726              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e0}
0x0726…0736              Head {h00=0x000c, h01=0x0050, text=»********«, t00=0x0004, t01=0x00ea}
0x0736…0746              Head {h00=0x000c, h01=0x0050, text=»* WAIT *«, t00=0x0004, t01=0x00fa}
0x0746…0756              Head {h00=0x000c, h01=0x0050, text=»********«, t00=0x0004, t01=0x010a}
0x0756…0760              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x011a}
0x0760…076a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0124}
0x076a…0796              Head {h00=0x0028, h01=0x0050, text=»*   THIS IS THE WAIT LKM PROCESSOR. «, t00=0x0004, t01=0x012e}
0x0796…07a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015a}
0x07a0…07d0              Head {h00=0x002c, h01=0x0050, text=»*   THIS MODULE IS ENTERED WHEN THE TASK«, t00=0x0004, t01=0x0164}
0x07d0…080a (5, 0, 400)  Head {h00=0x0036, h01=0x0050, text=»*   WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. «, t00=0x0005, t01=0x0004}
0x080a…0814              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003e}
0x0814…0842              Head {h00=0x002a, h01=0x0050, text=»*   IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0005, t01=0x0048}
0x0842…086c              Head {h00=0x0026, h01=0x0050, text=»*   WITH THE FOLLOWING PARAMETERS:«, t00=0x0005, t01=0x0076}
0x086c…0876              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a0}
0x0876…0894              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0005, t01=0x00aa}
0x0894…08b0              Head {h00=0x0018, h01=0x0050, text=»*   A8 = ECB ADDRESS«, t00=0x0005, t01=0x00c8}
0x08b0…08ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e4}
0x08ba…08c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ee}
0x08c4…08f2              Head {h00=0x002a, h01=0x0050, text=»TWAIT CF A15,FNDDWT SEARCH DWT ADDRESS«, t00=0x0005, t01=0x00f8}
0x08f2…090a              Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x0005, t01=0x0126}
0x090a…0934              Head {h00=0x0026, h01=0x0050, text=» RF(Z) TP:RQE FILE CODE NOT FOUND «, t00=0x0005, t01=0x013e}
0x0934…093e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0168}
0x093e…0954              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0005, t01=0x0172}
0x0954…0982              Head {h00=0x002a, h01=0x0050, text=» LDR* A1,A8 RETURN IF EVENT COMPLETED «, t00=0x0005, t01=0x0188}
0x0982…098e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0006, t01=0x0026}
0x098e…0998              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0032}
0x0998…09ae              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0006, t01=0x003c}
0x09ae…09da              Head {h00=0x0028, h01=0x0050, text=» ELR A1,A8 RETURN IF EVENT COMPLETED«, t00=0x0006, t01=0x0052}
0x09da…09e6              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0006, t01=0x007e}
0x09e6…09f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008a}
0x09f0…0a1c              Head {h00=0x0028, h01=0x0050, text=» RF(N) TP:QDI I/O ALREADY COMPLETED «, t00=0x0006, t01=0x0094}
0x0a1c…0a50              Head {h00=0x0030, h01=0x0050, text=» IM DWTWAT,A6 NO, SET WAIT INDICATOR IN DWT «, t00=0x0006, t01=0x00c0}
0x0a50…0a5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x0a5a…0a84              Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x0006, t01=0x00fe}
0x0a84…0a8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0128}
0x0a8e…0aa4              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0006, t01=0x0132}
0x0aa4…0aae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0148}
0x0aae…0ab8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab8…0aca              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0006, t01=0x015c}
0x0aca…0adc              Head {h00=0x000e, h01=0x0050, text=»* TACTOT *«, t00=0x0006, t01=0x016e}
0x0adc…0aee              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0006, t01=0x0180}
0x0aee…0af8 (7, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b02…0b3e              Head {h00=0x0038, h01=0x0050, text=»*   THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR.«, t00=0x0007, t01=0x0018}
0x0b3e…0b48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b48…0b80              Head {h00=0x0034, h01=0x0050, text=»*   THIS MODULE IS ENTERED FROM THE LKM HANDLER «, t00=0x0007, t01=0x005e}
0x0b80…0bac              Head {h00=0x0028, h01=0x0050, text=»*   WHEN A TASK HAS TO BE ACTIVATED.«, t00=0x0007, t01=0x0096}
0x0bac…0bb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb6…0bea              Head {h00=0x0030, h01=0x0050, text=»*   THE FOLLOWING PARAMETERS ARE SUPPLIED:- «, t00=0x0007, t01=0x00cc}
0x0bea…0bf4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0100}
0x0bf4…0c20              Head {h00=0x0028, h01=0x0050, text=»*   A1 = PARAMETER WHEN A4 NOT ZERO «, t00=0x0007, t01=0x010a}
0x0c20…0c58              Head {h00=0x0034, h01=0x0050, text=»*   A4 = START ADDRESS AT ACTIVATION, ELSE ZERO «, t00=0x0007, t01=0x0136}
0x0c58…0c6e              Head {h00=0x0012, h01=0x0050, text=»*   A5 = TTAB «, t00=0x0007, t01=0x016e}
0x0c6e…0ca6              Head {h00=0x0034, h01=0x0050, text=»*   A7 = IDENTIFICATION FOR TASK TO BE ACTIVATED«, t00=0x0007, t01=0x0184}
0x0ca6…0cb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002c}
0x0cb0…0cba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cba…0cce              Head {h00=0x0010, h01=0x0050, text=»TACTOT EQU *«, t00=0x0008, t01=0x0040}
0x0cce…0cf6              Head {h00=0x0024, h01=0x0050, text=» CF A15,FNDTID FIND TTAB ADDRESS«, t00=0x0008, t01=0x0054}
0x0cf6…0d0e              Head {h00=0x0014, h01=0x0050, text=» ADK A2,0 SET CR«, t00=0x0008, t01=0x007c}
0x0d0e…0d36              Head {h00=0x0024, h01=0x0050, text=» RF(Z) TP:RQE TASK NOT IN SYSTEM«, t00=0x0008, t01=0x0094}
0x0d36…0d6e              Head {h00=0x0034, h01=0x0050, text=» CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING«, t00=0x0008, t01=0x00bc}
0x0d6e…0d9c              Head {h00=0x002a, h01=0x0050, text=» LD A3,TTB:SA+6,A5 GET SEGMENT NUMBER «, t00=0x0008, t01=0x00f4}
0x0d9c…0dae              Head {h00=0x000e, h01=0x0050, text=» LDR A5,A2«, t00=0x0008, t01=0x0122}
0x0dae…0dc0              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0008, t01=0x0134}
0x0dc0…0df4              Head {h00=0x0030, h01=0x0050, text=» RF(Z) TP:QDI RESTART: QUEUE FOR DISPATCHING«, t00=0x0008, t01=0x0146}
0x0df4…0e22              Head {h00=0x002a, h01=0x0050, text=» ABL ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0008, t01=0x017a}
0x0e22…0e2c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0018}
0x0e2c…0e42              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0009, t01=0x0022}
0x0e42…0e4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0038}
0x0e4c…0e56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0042}
0x0e56…0e68              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x004c}
0x0e68…0e7a              Head {h00=0x000e, h01=0x0050, text=»* TMWAIT *«, t00=0x0009, t01=0x005e}
0x0e7a…0e8c              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x0070}
0x0e8c…0e96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0082}
0x0e96…0ea0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008c}
0x0ea0…0ed4              Head {h00=0x0030, h01=0x0050, text=»*   THIS IS THE MULTIPLE WAIT LKM PROCESSOR.«, t00=0x0009, t01=0x0096}
0x0ed4…0ede              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ede…0f0c              Head {h00=0x002a, h01=0x0050, text=»*   IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0009, t01=0x00d4}
0x0f0c…0f36              Head {h00=0x0026, h01=0x0050, text=»*   WITH THE FOLLOWING PARAMETERS:«, t00=0x0009, t01=0x0102}
0x0f36…0f40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012c}
0x0f40…0f5e              Head {h00=0x001a, h01=0x0050, text=»*   A5 = TTAB ADDRESS «, t00=0x0009, t01=0x0136}
0x0f5e…0f7e              Head {h00=0x001c, h01=0x0050, text=»*   A7 = ECBBLK ADDRESS «, t00=0x0009, t01=0x0154}
0x0f7e…0f88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0174}
0x0f88…0fc2              Head {h00=0x0036, h01=0x0050, text=»*   WHEN ONE OF THE SPECIFIED EVENTS IS COMPLETED,«, t00=0x0009, t01=0x017e}
0x0fc2…0ffc              Head {h00=0x0036, h01=0x0050, text=»*   RETURN IS MADE TO THE CALLING TASK VIA TENDIO «, t00=0x000a, t01=0x0028}
0x0ffc…1026              Head {h00=0x0026, h01=0x0050, text=»*   WITH THE FOLLOWING PARAMETERS:«, t00=0x000a, t01=0x0062}
0x1026…1030              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x008c}
0x1030…1060              Head {h00=0x002c, h01=0x0050, text=»*   A8 = ECB ADDRESS OF COMPLETED EVENT «, t00=0x000a, t01=0x0096}
0x1060…106a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c6}
0x106a…10ac              Head {h00=0x003e, h01=0x0050, text=»*   IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO).«, t00=0x000a, t01=0x00d0}
0x10ac…10b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0112}
0x10b6…10e2              Head {h00=0x0028, h01=0x0050, text=»*   NOTICE THAT ALL EVENTS MUST HAVE«, t00=0x000a, t01=0x011c}
0x10e2…110e              Head {h00=0x0028, h01=0x0050, text=»*   BEEN ISSUED IN THE NO WAIT MODE.«, t00=0x000a, t01=0x0148}
0x110e…1118              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0174}
0x1118…1122              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017e}
0x1122…1138              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x000a, t01=0x0188}
0x1138…1142              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000e}
0x1142…114c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0018}
0x114c…1174              Head {h00=0x0024, h01=0x0050, text=»TMWAIT EQU * MULTIPLE WAIT ENTRY«, t00=0x000b, t01=0x0022}
0x1174…1186              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x000b, t01=0x004a}
0x1186…1190              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005c}
0x1190…11a6              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000b, t01=0x0066}
0x11a6…11d4              Head {h00=0x002a, h01=0x0050, text=» LDR* A1,A7 GET NO OF ECB:S IN ECBBLK «, t00=0x000b, t01=0x007c}
0x11d4…11e0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00aa}
0x11e0…11ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b6}
0x11ea…1200              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000b, t01=0x00c0}
0x1200…122c              Head {h00=0x0028, h01=0x0050, text=» ELR A1,A7 GET NO OF ECB:S IN ECBBLK«, t00=0x000b, t01=0x00d6}
0x122c…1238              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0102}
0x1238…1242              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010e}
0x1242…126e              Head {h00=0x0028, h01=0x0050, text=» RF(NP) TP:RQE REQUEST ERROR IF <= 0«, t00=0x000b, t01=0x0118}
0x126e…1278              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0144}
0x1278…128c              Head {h00=0x0010, h01=0x0050, text=»TMW:10 EQU *«, t00=0x000b, t01=0x014e}
0x128c…12c2              Head {h00=0x0032, h01=0x0050, text=» ADK A7,2 POINT TO NEXT ECB ADDRESS IN ECBBLK «, t00=0x000b, t01=0x0162}
0x12c2…12cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0008}
0x12cc…12e2              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000c, t01=0x0012}
0x12e2…1306              Head {h00=0x0020, h01=0x0050, text=» LDR* A8,A7 GET ECB ADDRESS «, t00=0x000c, t01=0x0028}
0x1306…1330              Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A8 GET FIRST WORD OF ECB «, t00=0x000c, t01=0x004c}
0x1330…133c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0076}
0x133c…1346              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0082}
0x1346…135c              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000c, t01=0x008c}
0x135c…137e              Head {h00=0x001e, h01=0x0050, text=» ELR A8,A7 GET ECB ADDRESS«, t00=0x000c, t01=0x00a2}
0x137e…13a6              Head {h00=0x0024, h01=0x0050, text=» ELR A2,A8 GET FIRST WORD OF ECB«, t00=0x000c, t01=0x00c4}
0x13a6…13b2              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00ec}
0x13b2…13bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f8}
0x13bc…13e8              Head {h00=0x0028, h01=0x0050, text=» RF(N) TMW:30 I/O ALREADY COMPLETED «, t00=0x000c, t01=0x0102}
0x13e8…1424              Head {h00=0x0038, h01=0x0050, text=» CF A15,FNDDWT NO, SEARCH DWT ADDRESS FROM FILE CODE«, t00=0x000c, t01=0x012e}
0x1424…143c              Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x000c, t01=0x016a}
0x143c…145c              Head {h00=0x001c, h01=0x0050, text=» RF(Z) TP:RQE NOT FOUND «, t00=0x000c, t01=0x0182}
0x145c…1466              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0012}
0x1466…147c              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x000d, t01=0x001c}
0x147c…1486              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0032}
0x1486…1490              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003c}
0x1490…14b6              Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT STATUS«, t00=0x000d, t01=0x0046}
0x14b6…14d4              Head {h00=0x001a, h01=0x0050, text=» RF(N) TP:RQE NOT BUSY«, t00=0x000d, t01=0x006c}
0x14d4…14ec              Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x000d, t01=0x008a}
0x14ec…1522              Head {h00=0x0032, h01=0x0050, text=» RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK«, t00=0x000d, t01=0x00a2}
0x1522…1556              Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR«, t00=0x000d, t01=0x00d8}
0x1556…1586              Head {h00=0x002c, h01=0x0050, text=» RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT «, t00=0x000d, t01=0x010c}
0x1586…15a2              Head {h00=0x0018, h01=0x0050, text=» ORK A6,1 SET BIT 15«, t00=0x000d, t01=0x013c}
0x15a2…15d8              Head {h00=0x0032, h01=0x0050, text=» ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR «, t00=0x000d, t01=0x0158}
0x15d8…160a              Head {h00=0x002e, h01=0x0050, text=» RF(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK«, t00=0x000d, t01=0x018e}
0x160a…1634              Head {h00=0x0026, h01=0x0050, text=» LDR A9,A6 SAVE FIRST DWT ADDRESS «, t00=0x000e, t01=0x0030}
0x1634…1646              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x000e, t01=0x005a}
0x1646…1650              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006c}
0x1650…1664              Head {h00=0x0010, h01=0x0050, text=»TMW:20 EQU *«, t00=0x000e, t01=0x0076}
0x1664…16a0              Head {h00=0x0038, h01=0x0050, text=» ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE «, t00=0x000e, t01=0x008a}
0x16a0…16c8              Head {h00=0x0024, h01=0x0050, text=» LDR A9,A6 SAVE THIS DWT ADDRESS«, t00=0x000e, t01=0x00c6}
0x16c8…16da              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000e, t01=0x00ee}
0x16da…1704              Head {h00=0x0026, h01=0x0050, text=» RB(P) TMW:10 MORE ECB:S IN ECBBLK«, t00=0x000e, t01=0x0100}
0x1704…1742              Head {h00=0x003a, h01=0x0050, text=» ST A3,DWTWAT,A9 NO, SET FIRST DWT ADDRESS IN THE LAST«, t00=0x000e, t01=0x012a}
0x1742…1766              Head {h00=0x0020, h01=0x0050, text=» RB T:DISP GO TO DISPATCHER «, t00=0x000e, t01=0x0168}
0x1766…1770              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018c}
0x1770…1784              Head {h00=0x0010, h01=0x0050, text=»TMW:30 EQU *«, t00=0x000f, t01=0x0008}
0x1784…17bc              Head {h00=0x0034, h01=0x0050, text=» ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA «, t00=0x000f, t01=0x001c}
0x17bc…17f2              Head {h00=0x0032, h01=0x0050, text=» ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR «, t00=0x000f, t01=0x0054}
0x17f2…181c              Head {h00=0x0026, h01=0x0050, text=» RF(Z) TP:QDI FIRST ECB IN ECBBLK «, t00=0x000f, t01=0x008a}
0x181c…1826              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b4}
0x1826…1864              Head {h00=0x003a, h01=0x0050, text=»TMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR«, t00=0x000f, t01=0x00be}
0x1864…188c              Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A3 GET NEXT DWT ADDRESS«, t00=0x000f, t01=0x00fc}
0x188c…18b0              Head {h00=0x0020, h01=0x0050, text=» RF(Z) TP:QDI NO MORE DWT:S «, t00=0x000f, t01=0x0124}
0x18b0…18d4              Head {h00=0x0020, h01=0x0050, text=» CMR A3 SET TO NO WAIT AGAIN«, t00=0x000f, t01=0x0148}
0x18d4…18e6              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000f, t01=0x016c}
0x18e6…18f8              Head {h00=0x000e, h01=0x0050, text=» RB TMW:40«, t00=0x000f, t01=0x017e}
0x18f8…1902              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0190}
0x1902…1918              Head {h00=0x0012, h01=0x0050, text=» EJECT   TPROC«, t00=0x0010, t01=0x000a}
0x1918…1922              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0020}
0x1922…192c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192c…1940              Head {h00=0x0010, h01=0x0050, text=»TP:RQE EQU *«, t00=0x0010, t01=0x0034}
0x1940…1966              Head {h00=0x0022, h01=0x0050, text=» ABL LKMRQE LKM REQUEST ERROR «, t00=0x0010, t01=0x0048}
0x1966…1970              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006e}
0x1970…1984              Head {h00=0x0010, h01=0x0050, text=»TP:QDI EQU *«, t00=0x0010, t01=0x0078}
0x1984…19b0              Head {h00=0x0028, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0010, t01=0x008c}
0x19b0…19ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b8}
0x19ba…19c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c2}
0x19c4…19ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00cc}
0x19ce…19da              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0010, t01=0x00d6}
0x19da…19de              Head {h00=0x4004, h01=0x0000}
0x19de…19e2              00 10 00 e2                                                                                                                                                                                                                                       ┆    ┆
0x19e2…19ea (17, 1, 8)   20 04 00 00 00 11 00 04                                                                                                                                                                                                                           ┆        ┆
0x19ea…1a3a (18, 0, 400) 52 20 49 4e 46 5c 3d 33 00 41 01 78 00 26 00 50 5c 53 55 4b 5c 41 33 2c 31 5c 44 45 43 20 54 52 41 4e 53 46 45 52 20 43 4f 55 4e 54 45 52 5c 3d 33 20 00 42 00 10 00 2c 00 50 5c 52 42 28 50 29 5c 52 43 44 59 31 32 5c 4e 4f 54 20 45 4e 4f 55   ┆R INF =3 A x & P SUK A3,1 DEC TRANSFER COUNTER =3  B   , P RB(P) RCDY12 NOT ENOU┆
0x1a3a…1a8a              47 48 20 4f 46 20 54 52 41 4e 53 46 45 52 53 5c 3d 33 00 42 00 3a 00 2e 00 50 5c 4c 44 4b 5c 41 32 2c 43 54 59 43 4f 44 5c 53 45 4e 44 20 27 53 45 54 20 43 4f 55 4e 54 52 59 20 43 4f 44 45 27 5c 3d 31 20 00 42 00 6a 00 16 00 50 5c 43 46 5c   ┆GH OF TRANSFERS =3 B : . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1  B j   P CF ┆
0x1a8a…1ada              41 35 2c 4f 55 54 50 55 54 5c 5c 3d 31 20 00 42 00 9c 00 2a 00 50 5c 4c 44 4b 5c 41 32 2c 43 4f 55 4e 54 52 59 5c 53 45 4e 44 20 27 43 4f 55 4e 54 52 59 20 43 4f 44 45 27 5c 3d 31 00 42 00 b6 00 14 00 50 5c 4f 52 4b 5c 41 32 2c 2f 33 30 5c   ┆A5,OUTPUT  =1  B   * P LDK A2,COUNTRY SEND 'COUNTRY CODE' =1 B     P ORK A2,/30 ┆
0x1ada…1b2a              5c 3d 31 20 00 42 00 e4 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 5c 3d 31 20 00 42 00 fc 00 0a 00 50 5c 5c 5c 5c 3d 33 00 42 01 16 00 0a 00 50 5c 5c 5c 5c 3d 33 00 42 01 24 00 14 00 50 52 43 44 59 31 34 5c 45 51 55 5c 2a 5c 5c   ┆ =1  B     P CF A5,OUTPUT  =1  B     P    =3 B     P    =3 B $   PRCDY14 EQU *  ┆
0x1b2a…1b7a              3d 33 00 42 01 32 00 0e 00 50 5c 58 49 46 5c 5c 5c 3d 31 20 00 42 01 4a 00 28 00 50 5c 4c 44 5c 41 33 2c 44 57 54 53 54 2c 41 36 5c 53 41 56 45 20 53 54 41 54 55 53 20 57 4f 52 44 5c 3d 33 20 00 42 01 5c 00 22 00 50 5c 4c 44 4b 5c 41 32 2c   ┆=3 B 2   P XIF   =1  B J ( P LD A3,DWTST,A6 SAVE STATUS WORD =3  B   " P LDK A2,┆
0x1b7a…1bca (19, 0, 400) 43 4c 45 48 4f 4d 5c 43 4c 45 41 52 20 41 4e 44 20 48 4f 4d 45 20 00 42 01 88 00 16 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 5c 53 45 4e 44 00 43 00 1e 00 12 00 50 5c 4c 44 4b 4c 5c 41 32 2c 2f 31 30 31 20 00 43 00 38 00 36 00 50 5c 53   ┆CLEHOM CLEAR AND HOME  B     P CF A5,OUTPUT SEND C     P LDKL A2,/101  C 8 6 P S┆
0x1bca…1c1a              54 5c 41 32 2c 44 57 54 41 50 2c 41 36 5c 53 45 54 20 48 45 41 44 20 4c 49 4e 45 2d 41 4e 44 2d 50 4f 53 49 54 49 4f 4e 20 43 4f 55 4e 54 45 52 00 43 00 4e 00 1e 00 50 5c 4c 44 52 5c 41 33 2c 41 33 5c 47 45 54 20 4f 4c 44 20 53 54 41 54 55   ┆T A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C N   P LDR A3,A3 GET OLD STATU┆
0x1c1a…1c6a              53 20 00 43 00 88 00 1a 00 50 5c 52 42 28 4e 29 5c 45 4e 44 49 4f 5c 4e 4f 54 20 42 55 53 59 20 00 43 00 aa 00 22 00 50 5c 4c 44 4b 5c 41 31 2c 4f 50 45 52 52 5c 53 45 54 20 52 45 54 55 52 4e 20 43 4f 44 45 20 00 43 00 c8 00 16 00 50 52 43   ┆S  C     P RB(N) ENDIO NOT BUSY  C   " P LDK A1,OPERR SET RETURN CODE  C     PRC┆
0x1c6a…1cba              44 59 31 35 5c 41 42 4c 5c 41 44 59 34 32 30 20 00 43 00 ee 00 0a 00 50 5c 45 4a 45 43 54 00 43 01 08 00 06 00 50 2a 20 00 43 01 16 00 28 00 50 2a 20 20 20 20 4c 52 43 2d 45 52 52 4f 52 20 49 4e 20 42 4c 4f 43 4b 20 53 45 4e 54 20 52 45 4d   ┆DY15 ABL ADY420  C     P EJECT C     P*  C   ( P*    LRC-ERROR IN BLOCK SENT REM┆
0x1cba…1d0a              4f 54 45 20 00 43 01 20 00 06 00 50 2a 20 00 43 01 4c 00 10 00 50 52 43 44 59 32 30 5c 45 51 55 5c 2a 00 43 01 56 00 18 00 50 5c 53 55 4b 5c 41 37 2c 35 5c 4f 52 44 45 52 20 35 20 3f 20 00 43 01 6a 00 16 00 50 5c 52 46 28 4e 45 29 5c 52 43   ┆OTE  C     P*  C L   PRCDY20 EQU * C V   P SUK A7,5 ORDER 5 ?  C j   P RF(NE) RC┆
0x1d0a…1d5a (20, 0, 400) 44 59 32 35 5c 4e 4f 20 00 43 01 86 00 28 00 50 5c 4c 44 4b 5c 41 31 2c 32 5c 49 4e 44 49 43 41 54 45 20 54 48 52 4f 55 47 48 50 55 54 20 45 52 52 4f 52 20 00 44 00 10 00 0e 00 50 5c 52 42 5c 52 43 44 59 31 35 00 44 00 3c 00 26 00 50 52 43   ┆DY25 NO  C   ( P LDK A1,2 INDICATE THROUGHPUT ERROR  D     P RB RCDY15 D < & PRC┆
0x1d5a…1daa              44 59 32 35 5c 4c 44 4b 5c 41 32 2c 53 54 58 5c 53 54 41 52 54 20 4f 46 20 4d 45 53 53 41 47 45 00 44 00 4e 00 12 00 50 5c 43 46 5c 41 35 2c 4f 55 54 50 55 54 20 00 44 00 78 00 34 00 50 5c 4c 43 5c 41 34 2c 44 57 54 42 43 2c 41 36 5c 47 45   ┆DY25 LDK A2,STX START OF MESSAGE D N   P CF A5,OUTPUT  D x 4 P LC A4,DWTBC,A6 GE┆
0x1daa…1dfa              54 20 4e 55 4d 42 45 52 20 4f 46 20 50 4f 53 49 54 49 4f 4e 53 20 54 4f 20 42 41 43 4b 20 00 44 00 8e 00 10 00 50 5c 41 4e 4b 5c 41 34 2c 2f 46 46 20 00 44 00 c6 00 12 00 50 5c 52 46 28 45 29 5c 52 43 44 59 33 30 20 00 44 00 da 00 2e 00 50   ┆T NUMBER OF POSITIONS TO BACK  D     P ANK A4,/FF  D     P RF(E) RCDY30  D   . P┆
0x1dfa…1e4a              5c 43 46 5c 41 35 2c 42 41 43 43 41 4e 5c 53 45 4e 44 20 42 41 43 4b 53 50 41 43 45 53 20 41 4e 44 20 52 55 42 20 4f 55 54 20 00 44 00 f0 00 20 00 50 5c 4c 44 4b 5c 41 33 2c 32 5c 53 54 41 52 54 20 42 55 46 46 45 52 20 49 4e 44 45 58 00 44   ┆ CF A5,BACCAN SEND BACKSPACES AND RUB OUT  D     P LDK A3,2 START BUFFER INDEX D┆
0x1e4a…1e9a              01 22 00 16 00 50 52 43 44 59 33 30 5c 41 42 4c 5c 41 43 44 59 39 30 20 00 44 01 46 00 0a 00 50 5c 45 4a 45 43 54 00 44 01 60 00 06 00 50 2a 20 00 44 01 6e 00 14 00 50 2a 20 20 20 20 45 20 43 20 48 20 4f 20 44 20 59 00 44 01 78 00 06 00 50   ┆ "   PRCDY30 ABL ACDY90  D F   P EJECT D `   P*  D n   P*    E C H O D Y D x   P┆

Reduced view