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

⟦a41876635⟧ 

    Length: 4422 (0x1146)
    Notes: pts_type(SC)
    Names: »DRCD01.SC«

Derivation

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

PTS(SC)

	IDENT DRCD01 	REL 8.2 78-09-15  870105040820 

* 
**********************************************: 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRCD01 = DRIVER COT ALPHA DISPLAY 
* 
* 
* 
* 
* 
* 
*********************************************** 
* 
*    THIS DRIVER HANDLES OUTPUT TO COT ALPHA DISPLAY. 
* 
*   THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT.
* 
* 
*    THE DRIVER CONSISTS OF THE FOLLOWING PARTS:
* 
*    A C C D :    ACTIVATION PART 
*    I H C D :    INTERRUPT HANDLER 
* 
*    R C C D :     RECOVERY ROUTINE 
* 
* 
*    THE FOLLOWING ORDERS ARE TREATED:
* 
*    ORDER 06:   WRITE
	EJECT
* 
* 
*    NORMAL REGISTER USAGE: 
* 
*    REGISTER A1: RETURN CODE 
*             A2: OUTPUT CHARACTER
*             A3: WORK REGISTER 
*             A4: WORK REGISTER 
*             A5: WORK REGISTER 
*             A6: DWT-ADDRESS 
*             A7: ORDER 
*             A8: ECB-ADDRESS 
* 
* 
*    SYSTEM ADAPTATION
* 
	EJECT
* 
* 
*********************** 
*    ENTRIES          * 
*********************** 
* 
	ENTRY	CDAD 
* 
************************************* 
*    EXTERNALS                    * 
************************************* 
	EXTRN	SAVE8	SAVE REGS
	EXTRN	TENDIO	END I/O 
	EXTRN	DISEND	PERFORM END I/O AND DISPATCH
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	OUTPUT	OUTPUT CHAR.
	EXTRN	LDREG	LOAD REGISTERS AND RETURN
	EXTRN	GETCHR	GET CHARACTER 
	EXTRN	DISIOE	I/O REQUEST ERROR 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTOR	ORDER
	EXTRN	ECHRTN	RETURN FROM ECHO ROUTINE
* 
* 
******************************* 
*    CONSTANTS                * 
******************************* 
* 
DWTBC	EQU	/3
* 
************************* 
*      TABLES           * 
************************* 
* 
CDAD	EQU	*
	DATA	ACCD	ACTIVATION DRIVER
	DATA	IHCD	INTERRUPT HANDLER
	DATA	RCCD	RECOVERY ROUTINE 
	DATA	ECHOCD	DEVICE DEPENDENT ECHO ROUTINE
* 
* 
* 
	EJECT
* 
* 
*[
******************************************* 
*    CONDITIONAL ASSEMBLY               * 
******************************************* 
* 
* 
* 
* 
********************************************
*    DWT-DISPLACEMENTS                     *
********************************************
* 
	EJECT
* 
*    A C C D
* 
*    ACTIVATION PART: CHECH VALIDITY OF ORDERS
*                     AND STARTS THE PROCESSING 
* 
ACCD	EQU	*
	SUK	A7,6	CORRECT ORDER ? 
	ABL(NE)	DISIOE	REQUEST ERROR 
	LDK	A3,0	START BUFFER INDEX
	LDK	A4,0 
ACCD10	EQU	*
	CF	A15,GETCHR	GET ONE CHARACTER
	LDR	A1,A1	LAST CHARACTER 
	RF(E)	ACCD20	YES 
	CWK	A2,/07 
	RF(NE)	ACCD15
	LDK	A2,4 
	SC	A2,DWTBC,A6 
	RB	ACCD10
ACCD15	EQU	*
	CF	A5,OUTPUT 
	RB	ACCD10
ACCD20	EQU	*
	LD	A2,DWTST,A6 
	ORK	A2,3 
	CF	A5,OUTPUT 
	SC	A1,DWTBC,A6	RESET RIGHT BYTE
	RF	ENDIO 
	EJECT
* 
*   I H C D 
* 
*    INTERRUPT HANDLER: PROCESS OF INTERRUPT
* 
IHCD	EQU	*
	LD	A4,DWTST,A6	STATUS
	RF(N)	EXIT 
	LDR	A1,A1	RETURN CODE
	RF(NE)	ENDIO	YES END I/O 
	ABL	LDREG
EXIT	ABL	TDISP
ENDIO	ABL	DISEND
	EJECT
* 
*    E C H O C D
* 
*    ECHOCD = DEVICE DEPENDENT ECHO SUBROUTINE
* 
ECHOCD	EQU	*
	LDR	A7,A7	EOR ?
	RF(N)	ECHO10 
	CF	A5,OUTPUT	SEND CHARACTER
ECHO10	ABL	ECHRTN 
	EJECT
* 
*    R C C D
* 
* 
RCCD	EQU	*
	CF	A15,SAVE8 
	LD	A7,DWTST,A6 
	RB(N)	EXIT 
	LDK	A1,2 
	RB	ENDIO 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRCD01  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0080              Head {h00=0x0034, h01=0x0050, text=»**********************************************: «, t00=0x0000, t01=0x004c}
0x0080…008a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00b2              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008e}
0x00b2…00bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00ea              Head {h00=0x002a, h01=0x0050, text=»*   DRCD01 = DRIVER COT ALPHA DISPLAY «, t00=0x0000, t01=0x00c0}
0x00ea…00f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…00fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x00fe…0108              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x0108…0112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…011c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…015e              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0000, t01=0x012a}
0x015e…0168              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0162}
0x0168…01a6              Head {h00=0x003a, h01=0x0050, text=»*    THIS DRIVER HANDLES OUTPUT TO COT ALPHA DISPLAY. «, t00=0x0000, t01=0x016c}
0x01a6…01b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x001a}
0x01b0…01ee              Head {h00=0x003a, h01=0x0050, text=»*   THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT.«, t00=0x0001, t01=0x0024}
0x01ee…01f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0202              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x006c}
0x0202…023a              Head {h00=0x0034, h01=0x0050, text=»*    THE DRIVER CONSISTS OF THE FOLLOWING PARTS:«, t00=0x0001, t01=0x0076}
0x023a…0244              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ae}
0x0244…026e              Head {h00=0x0026, h01=0x0050, text=»*    A C C D :    ACTIVATION PART «, t00=0x0001, t01=0x00b8}
0x026e…029a              Head {h00=0x0028, h01=0x0050, text=»*    I H C D :    INTERRUPT HANDLER «, t00=0x0001, t01=0x00e2}
0x029a…02a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x010e}
0x02a4…02d0              Head {h00=0x0028, h01=0x0050, text=»*    R C C D :     RECOVERY ROUTINE «, t00=0x0001, t01=0x0118}
0x02d0…02da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0144}
0x02da…02e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x014e}
0x02e4…0312              Head {h00=0x002a, h01=0x0050, text=»*    THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0001, t01=0x0158}
0x0312…031c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0186}
0x031c…033a              Head {h00=0x001a, h01=0x0050, text=»*    ORDER 06:   WRITE«, t00=0x0001, t01=0x0190}
0x033a…0348              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x001e}
0x0348…0352              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x002c}
0x0352…035c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0036}
0x035c…0380              Head {h00=0x0020, h01=0x0050, text=»*    NORMAL REGISTER USAGE: «, t00=0x0002, t01=0x0040}
0x0380…038a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0064}
0x038a…03b0              Head {h00=0x0022, h01=0x0050, text=»*    REGISTER A1: RETURN CODE «, t00=0x0002, t01=0x006e}
0x03b0…03da              Head {h00=0x0026, h01=0x0050, text=»*             A2: OUTPUT CHARACTER«, t00=0x0002, t01=0x0094}
0x03da…0402              Head {h00=0x0024, h01=0x0050, text=»*             A3: WORK REGISTER «, t00=0x0002, t01=0x00be}
0x0402…042a              Head {h00=0x0024, h01=0x0050, text=»*             A4: WORK REGISTER «, t00=0x0002, t01=0x00e6}
0x042a…0452              Head {h00=0x0024, h01=0x0050, text=»*             A5: WORK REGISTER «, t00=0x0002, t01=0x010e}
0x0452…0478              Head {h00=0x0022, h01=0x0050, text=»*             A6: DWT-ADDRESS «, t00=0x0002, t01=0x0136}
0x0478…0498              Head {h00=0x001c, h01=0x0050, text=»*             A7: ORDER «, t00=0x0002, t01=0x015c}
0x0498…04be              Head {h00=0x0022, h01=0x0050, text=»*             A8: ECB-ADDRESS «, t00=0x0002, t01=0x017c}
0x04be…04c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x04c8…04d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001c}
0x04d2…04f0              Head {h00=0x001a, h01=0x0050, text=»*    SYSTEM ADAPTATION«, t00=0x0003, t01=0x0026}
0x04f0…04fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0044}
0x04fa…0508              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x004e}
0x0508…0512              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005c}
0x0512…051c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0066}
0x051c…053c              Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0003, t01=0x0070}
0x053c…055c              Head {h00=0x001c, h01=0x0050, text=»*    ENTRIES          * «, t00=0x0003, t01=0x0090}
0x055c…057c              Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0003, t01=0x00b0}
0x057c…0586              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d0}
0x0586…059a              Head {h00=0x0010, h01=0x0050, text=» ENTRY CDAD «, t00=0x0003, t01=0x00da}
0x059a…05a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ee}
0x05a4…05d2              Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0003, t01=0x00f8}
0x05d2…05fe              Head {h00=0x0028, h01=0x0050, text=»*    EXTERNALS                    * «, t00=0x0003, t01=0x0126}
0x05fe…062c              Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0003, t01=0x0152}
0x062c…064a              Head {h00=0x001a, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS«, t00=0x0003, t01=0x0180}
0x064a…0668              Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0004, t01=0x000e}
0x0668…069a              Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND PERFORM END I/O AND DISPATCH«, t00=0x0004, t01=0x002c}
0x069a…06c0              Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x005e}
0x06c0…06e2              Head {h00=0x001e, h01=0x0050, text=» EXTRN OUTPUT OUTPUT CHAR.«, t00=0x0004, t01=0x0084}
0x06e2…0710              Head {h00=0x002a, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS AND RETURN«, t00=0x0004, t01=0x00a6}
0x0710…0734              Head {h00=0x0020, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER «, t00=0x0004, t01=0x00d4}
0x0734…075c              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0004, t01=0x00f8}
0x075c…0778              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x0120}
0x0778…0792              Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0004, t01=0x013c}
0x0792…07c0              Head {h00=0x002a, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO ROUTINE«, t00=0x0004, t01=0x0156}
0x07c0…07ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0184}
0x07ca…07d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018e}
0x07d4…07fc              Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x0005, t01=0x0008}
0x07fc…0824              Head {h00=0x0024, h01=0x0050, text=»*    CONSTANTS                * «, t00=0x0005, t01=0x0030}
0x0824…084c              Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x0005, t01=0x0058}
0x084c…0856              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0080}
0x0856…086a              Head {h00=0x0010, h01=0x0050, text=»DWTBC EQU /3«, t00=0x0005, t01=0x008a}
0x086a…0874              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x009e}
0x0874…0896              Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0005, t01=0x00a8}
0x0896…08b8              Head {h00=0x001e, h01=0x0050, text=»*      TABLES           * «, t00=0x0005, t01=0x00ca}
0x08b8…08da              Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0005, t01=0x00ec}
0x08da…08e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x010e}
0x08e4…08f6              Head {h00=0x000e, h01=0x0050, text=»CDAD EQU *«, t00=0x0005, t01=0x0118}
0x08f6…091a              Head {h00=0x0020, h01=0x0050, text=» DATA ACCD ACTIVATION DRIVER«, t00=0x0005, t01=0x012a}
0x091a…093e              Head {h00=0x0020, h01=0x0050, text=» DATA IHCD INTERRUPT HANDLER«, t00=0x0005, t01=0x014e}
0x093e…0962              Head {h00=0x0020, h01=0x0050, text=» DATA RCCD RECOVERY ROUTINE «, t00=0x0005, t01=0x0172}
0x0962…0994              Head {h00=0x002e, h01=0x0050, text=» DATA ECHOCD DEVICE DEPENDENT ECHO ROUTINE«, t00=0x0006, t01=0x0008}
0x0994…099e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x003a}
0x099e…09a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0044}
0x09a8…09b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x004e}
0x09b2…09c0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0058}
0x09c0…09ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0066}
0x09ca…09d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0070}
0x09d4…09de              Head {h00=0x0006, h01=0x0050, text=»*[«, t00=0x0006, t01=0x007a}
0x09de…0a12              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x0084}
0x0a12…0a44              Head {h00=0x002e, h01=0x0050, text=»*    CONDITIONAL ASSEMBLY               * «, t00=0x0006, t01=0x00b8}
0x0a44…0a78              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x00ea}
0x0a78…0a82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011e}
0x0a82…0a8c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0128}
0x0a8c…0a96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0132}
0x0a96…0aa0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013c}
0x0aa0…0ad4              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0006, t01=0x0146}
0x0ad4…0b08              Head {h00=0x0030, h01=0x0050, text=»*    DWT-DISPLACEMENTS                     *«, t00=0x0006, t01=0x017a}
0x0b08…0b3c              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0007, t01=0x001e}
0x0b3c…0b46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0x0b46…0b54              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x005c}
0x0b54…0b5e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x006a}
0x0b5e…0b72              Head {h00=0x0010, h01=0x0050, text=»*    A C C D«, t00=0x0007, t01=0x0074}
0x0b72…0b7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0088}
0x0b7c…0bb2              Head {h00=0x0032, h01=0x0050, text=»*    ACTIVATION PART: CHECH VALIDITY OF ORDERS«, t00=0x0007, t01=0x0092}
0x0bb2…0bea              Head {h00=0x0034, h01=0x0050, text=»*                     AND STARTS THE PROCESSING «, t00=0x0007, t01=0x00c8}
0x0bea…0bf4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0100}
0x0bf4…0c06              Head {h00=0x000e, h01=0x0050, text=»ACCD EQU *«, t00=0x0007, t01=0x010a}
0x0c06…0c28              Head {h00=0x001e, h01=0x0050, text=» SUK A7,6 CORRECT ORDER ? «, t00=0x0007, t01=0x011c}
0x0c28…0c4e              Head {h00=0x0022, h01=0x0050, text=» ABL(NE) DISIOE REQUEST ERROR «, t00=0x0007, t01=0x013e}
0x0c4e…0c72              Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0007, t01=0x0164}
0x0c72…0c84              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0007, t01=0x0188}
0x0c84…0c98              Head {h00=0x0010, h01=0x0050, text=»ACCD10 EQU *«, t00=0x0008, t01=0x000a}
0x0c98…0cc0              Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCHR GET ONE CHARACTER«, t00=0x0008, t01=0x001e}
0x0cc0…0ce2              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER «, t00=0x0008, t01=0x0046}
0x0ce2…0cfc              Head {h00=0x0016, h01=0x0050, text=» RF(E) ACCD20 YES «, t00=0x0008, t01=0x0068}
0x0cfc…0d10              Head {h00=0x0010, h01=0x0050, text=» CWK A2,/07 «, t00=0x0008, t01=0x0082}
0x0d10…0d26              Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACCD15«, t00=0x0008, t01=0x0096}
0x0d26…0d38              Head {h00=0x000e, h01=0x0050, text=» LDK A2,4 «, t00=0x0008, t01=0x00ac}
0x0d38…0d50              Head {h00=0x0014, h01=0x0050, text=» SC A2,DWTBC,A6 «, t00=0x0008, t01=0x00be}
0x0d50…0d62              Head {h00=0x000e, h01=0x0050, text=» RB ACCD10«, t00=0x0008, t01=0x00d6}
0x0d62…0d76              Head {h00=0x0010, h01=0x0050, text=»ACCD15 EQU *«, t00=0x0008, t01=0x00e8}
0x0d76…0d8c              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0008, t01=0x00fc}
0x0d8c…0d9e              Head {h00=0x000e, h01=0x0050, text=» RB ACCD10«, t00=0x0008, t01=0x0112}
0x0d9e…0db2              Head {h00=0x0010, h01=0x0050, text=»ACCD20 EQU *«, t00=0x0008, t01=0x0124}
0x0db2…0dca              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0008, t01=0x0138}
0x0dca…0ddc              Head {h00=0x000e, h01=0x0050, text=» ORK A2,3 «, t00=0x0008, t01=0x0150}
0x0ddc…0df2              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0008, t01=0x0162}
0x0df2…0e1a              Head {h00=0x0024, h01=0x0050, text=» SC A1,DWTBC,A6 RESET RIGHT BYTE«, t00=0x0008, t01=0x0178}
0x0e1a…0e2c              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0009, t01=0x0010}
0x0e2c…0e3a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0022}
0x0e3a…0e44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0030}
0x0e44…0e58              Head {h00=0x0010, h01=0x0050, text=»*   I H C D «, t00=0x0009, t01=0x003a}
0x0e58…0e62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004e}
0x0e62…0e96              Head {h00=0x0030, h01=0x0050, text=»*    INTERRUPT HANDLER: PROCESS OF INTERRUPT«, t00=0x0009, t01=0x0058}
0x0e96…0ea0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008c}
0x0ea0…0eb2              Head {h00=0x000e, h01=0x0050, text=»IHCD EQU *«, t00=0x0009, t01=0x0096}
0x0eb2…0ed0              Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 STATUS«, t00=0x0009, t01=0x00a8}
0x0ed0…0ee4              Head {h00=0x0010, h01=0x0050, text=» RF(N) EXIT «, t00=0x0009, t01=0x00c6}
0x0ee4…0f02              Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x0009, t01=0x00da}
0x0f02…0f24              Head {h00=0x001e, h01=0x0050, text=» RF(NE) ENDIO YES END I/O «, t00=0x0009, t01=0x00f8}
0x0f24…0f36              Head {h00=0x000e, h01=0x0050, text=» ABL LDREG«, t00=0x0009, t01=0x011a}
0x0f36…0f4c              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0009, t01=0x012c}
0x0f4c…0f64              Head {h00=0x0014, h01=0x0050, text=»ENDIO ABL DISEND«, t00=0x0009, t01=0x0142}
0x0f64…0f72              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x015a}
0x0f72…0f7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0168}
0x0f7c…0f94              Head {h00=0x0014, h01=0x0050, text=»*    E C H O C D«, t00=0x0009, t01=0x0172}
0x0f94…0f9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x018a}
0x0f9e…0fd4 (10, 0, 400) Head {h00=0x0032, h01=0x0050, text=»*    ECHOCD = DEVICE DEPENDENT ECHO SUBROUTINE«, t00=0x000a, t01=0x0004}
0x0fd4…0fde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003a}
0x0fde…0ff2              Head {h00=0x0010, h01=0x0050, text=»ECHOCD EQU *«, t00=0x000a, t01=0x0044}
0x0ff2…100a              Head {h00=0x0014, h01=0x0050, text=» LDR A7,A7 EOR ?«, t00=0x000a, t01=0x0058}
0x100a…1020              Head {h00=0x0012, h01=0x0050, text=» RF(N) ECHO10 «, t00=0x000a, t01=0x0070}
0x1020…1044              Head {h00=0x0020, h01=0x0050, text=» CF A5,OUTPUT SEND CHARACTER«, t00=0x000a, t01=0x0086}
0x1044…105e              Head {h00=0x0016, h01=0x0050, text=»ECHO10 ABL ECHRTN «, t00=0x000a, t01=0x00aa}
0x105e…106c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00c4}
0x106c…1076              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d2}
0x1076…108a              Head {h00=0x0010, h01=0x0050, text=»*    R C C D«, t00=0x000a, t01=0x00dc}
0x108a…1094              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00f0}
0x1094…109e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00fa}
0x109e…10b0              Head {h00=0x000e, h01=0x0050, text=»RCCD EQU *«, t00=0x000a, t01=0x0104}
0x10b0…10c6              Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x000a, t01=0x0116}
0x10c6…10de              Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTST,A6 «, t00=0x000a, t01=0x012c}
0x10de…10f2              Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x000a, t01=0x0144}
0x10f2…1104              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x000a, t01=0x0158}
0x1104…1116              Head {h00=0x000e, h01=0x0050, text=» RB ENDIO «, t00=0x000a, t01=0x016a}
0x1116…1120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017c}
0x1120…112a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0186}
0x112a…1136              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000a, t01=0x0190}
0x1136…113a              Head {h00=0x4004, h01=0x0000}
0x113a…113e              00 0b 00 0c                                                                                                                                                                                                                                       ┆    ┆
0x113e…1146 (12, 1, 8)   20 04 00 00 00 0c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view