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

⟦8cfb309ca⟧ 

    Length: 58984 (0xe668)
    Notes: pts_type(SC)
    Names: »DRDU01.SC«

Derivation

└─⟦173d42e04⟧ Bits:30009663 Philips computer tape "600105"
    └─⟦this⟧ »TOSSWORK/DRDU01.SC«

PTS(SC)

	IDENT DRDU01 	REL 10.0 80-03-14 870105041000 

* 
* 
**************************************************
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRDU01 = DRIVER FOR ONE/TWO DISC UNITS
* 
*   PTS 6875 (X1215) AND/OR PTS 6876 (X1216)
* 
* 
* 
* 
* 
**************************************************
* 
* 
*   THIS DISC DRIVER HANDLES UP TO TWO DISC 
*   DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP 
*   ON MULTIPLEX CHANNEL
* 
* 
*   THE FOLLOWING ORDERS ARE TREATED :
* 
*   /00    TEST STATUS
*   /01    BASIC READ 
*   /05    BASIC WRITE
*   /11    PHYSICAL READ
*   /15    PHYSICAL WRITE 
*   /1F    FORMAT VOLUME
* 
	EJECT			DRDU01			DRDU01
* 
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	DUADR	ACTIVATION ADDRESS 
	ENTRY	DUON	RECOVERY ROUTINE
	ENTRY	IHDU1	INTERRUPT HANDLER DISC UNIT NO. 1
	ENTRY	IHDU	INTERRUPT HANDLER DISC UNIT NO. 1 
	ENTRY	IHDU2	INTERRUPT HANDLER DISC UNIT NO. 2
	ENTRY	DWDU01	DWT ADDRESS DISC UNIT NO. 1 
	EJECT			DRDU01 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	TDISP	DISPATCHER 
	EXTRN	TENDIO	END I/O 
	EXTRN	SAVE8	SAVE REGS. A1-A8 ON A15 STACK
	EXTRN	NVLCHK	CHECK IF NEW VOLUME LOADED
	EXTRN	VOLGET	PUT VOLUME NAME IN DWT SET NVL
	EXTRN	VOLNAM	VOLUME NAME FROM DWT TO USER BUFFER 
	EXTRN	VOLCLR	CLEAR VOLUME NAMES IN DWT 
	EXTRN	INXDWT	DOUBLED INDEX + DWT ADDRESS 
	EXTRN	DISIOE	REQUEST ERROR 
	EXTRN	INIFLG	INITIALIZATION FLAG 
	EXTRN	PFPOST	PWF POST PROCESSING FLAG
	EXTRN	INTSAV	SAVE AREA LAST INTERRUPT
	EXTRN	SETIMP	TIMER 
	EXTRN	TTB:MT 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTECB	ECB ADDRESS 
	EXTRN	DWTOR	DWT INDEX AND ORDER
	EXTRN	DWTA2	SAVE AREA A2 
	EXTRN	DWTA4	SAVE AREA A4 
	EXTRN	DWTA5	SAVE AREA A5 
	EXTRN	DWTSB1	STACK BASE 1 IN DWT 
	EXTRN	DWTSB2	STACK BASE 2 IN DWT 
	EXTRN	DWTUEC	USER ECB ADDRESS
	EXTRN	DWTORD	SAVE AREA FOR ORDER 
	EXTRN	DWTNVL	NEM VOLUME LOADED INDICATORS
	EXTRN	DWTVOL	VOLUME NAMES
	EXTRN	DWTTAB	TTAB ADDRESS
	EXTRN	ECBBA	ECB BUFFER ADDRESS 
	EXTRN	ECBRL	ECB REQUESTED LENGTH 
	EXTRN	ECBEL	ECB EFFECTIVE LENGTH 
	EXTRN	ECBRC	ECB RETURN CODE
	EXTRN	ECBCW1	ECB 1:ST CONTROL WORD 
	EXTRN	ECBCW2	ECB 2:ND CONTROL WORD 
	EJECT			DRDU01 
* 
* 
**************************
*                        *
*  CONDITIONAL ASSEMBLY  *
*                        *
**************************
* 
* 
*   READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15
*   BY SETTING X:A = 0
* 
X:A	EQU	0 
RAW	EQU	X:A 
* 
* 
*   THIS DRIVER CAN HANDLE TWO DISC UNITS 
*   IF X:B := 2 
* 
X:B	EQU	1 
NUNITS	EQU	X:B
* 
* 
*	A PROGRAM VERSION USING TOSS MMU PAGING 
*	IS OBTAINED BY SETTING MMUPAG EQU 1.
* 
MMUPAG	EQU	0
* 
* 
*	A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
*	SET IS OBTAINED BY SETTING CPU852 EQU 0.
* 
CPU852	EQU	1
* 
	EJECT		DRDU01
* 
* 
*	A PROGRAM VERSION USING THE INSTRUCTION SET OF
*	CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 
* 
X:E	EQU	0 
CPU857	EQU	X:E
* 
* 
*	PROGRAM VERSION FOR FORMAT
*	A2 IS OBTAINED BY SETTING VERSA2 EQU 1
*	A3 IS OBTAINED BY SETTING VERSA3 EQU 1
* 
X:C	EQU	1 
VERSA2	EQU	X:C
* 
X:D	EQU	1 
VERSA3	EQU	X:D
* 
	EJECT			DRDU01			DRDU01
* 
* 
************* 
* CONSTANTS * 
************* 
* 
* 
DAF1	EQU	/28	DEVICE ADDRESS FIXED DISC NO. 1
DAC1	EQU	/08	DEVICE ADDRESS CARTRIDGE DISC NO. 1
DAF2	EQU	/38	DEVICE ADDRESS FIXED DISC NO. 2
DAC2	EQU	/18	DEVICE ADDRESS CARTRIDGE DISC NO. 2
WER1	EQU	/10	MULTIPLEXOR ADDRESS
CUADR	EQU	/08	CONTROL UNIT ADDRESS
* 
MAXSEC	EQU	6528	MAX NO OF SECTORS ON UNPACKED PTS 6875
SECLEN	EQU	256	SECTOR LENGTH, CHARACTERS
PHSECL	EQU	384	PHYSICAL SECTOR LENGTH 
QRETRY	EQU	4	NO OF RETRIES
TIME	EQU	1000	1 MIN 40 SEC
* 
DEVIND	EQU	10 
* 
	EJECT			DRDU01			DRDU01
* 
* 
	DATA	0	INDICATES NO MMU BUFFER 
	DATA	DEVIND	DISC DEVICE INDEX
DUADR	DATA	DUAD	ACTIVATION ADDRESS
	DATA	0	ABORT ROUTINE ADDRESS 
* 
	IFT	VERSA3=1 
BUFFER	RES	193
	XIF
* 
	IFT	VERSA3=0 
BUFFER	RES	25 
* 
	IFT	RAW=1
	RES	103
	XIF
* 
	EJECT			DRDU01			DRDU01
* 
* 
***************** 
*               * 
*  ACTIVATION   * 
*               * 
***************** 
* 
* 
DUAD	EQU	*
	CM	DWTRTY,A6	RETRY INDICATOR 
	CM	DWTFBU,A6	RESET DRIVER BUFFER INDICATOR 
	LDK	A1,0 
	LC	A1,DWTOR,A6	GET INDEX 
	IFT	NUNITS=1 
	SUK	A1,1 
	XIF
	IFT	NUNITS=2 
	SUK	A1,3 
	XIF
	RF(P)	DUERR	FAULT IN INDEX 
* 
DUA:00	EQU	*
* 
	LDK	A5,DWTSB3
	ADR	A5,A6	LOAD STACK BASE
	IFT	MMUPAG=1 
	MLR	2,A8	GET 18 BIT BUFFER ADDRESS 
	SLC	A1,4	MOST SIGN. BITS 
	ANK	A1,3 
	SRL	A2,1	WORD ADDDRESS 
	CF	A5,MMULOG	GET LOGICAL ADDRESS 
	XIF
* 
	CF	A15,NVLCHK	CHECK IF NEW VOLUME LOADED 
*			SAVE INDEX AND ORDER
	ADK	A7,0	SET CR
	RF(NZ)	DUA:05	NOT TEST STATUS ORDER
* 
	EJECT		DRDU01
* 
* 
********************* 
*                   * 
*   TEST STATUS     * 
*                   * 
********************* 
* 
* 
	ORS	A1,ECBRC,A8	NVL BIT
	LDKL	A2,/200 
	ANS	A2,DWTOR,A6	VO:NAM ON FIRST OR SECOND UNIT 
	LDK	A2,1 
	ST	A2,DWTSAV,A6	INDICATE TEST STATUS 
	CF	A5,VO:NAM	READ VOLUME NAME
	ADK	A1,0 
	RF(NZ)	TESEND	NOT OPERABLE 
	LD	A2,DWTORD,A6	RESTORE INDEX AND ORDER
	ST	A2,DWTOR,A6 
	LD	A8,DWTECB,A6	ECB ADDRESS
	CF	A15,VOLNAM	TRANSFER VOLUME NAME TO USER BUFFER
	LDK	A1,0	RESET RETURN CODE 
TESEND	EQU	*
	LDKL	A2,-1 
	ST	A2,DWTSAV,A6	INDICATE TEST STATUS DONE
	ABL	END:IO	PERFORM ENDIO 
* 
	EJECT			DRDU01 
* 
*************************************** 
*                                     * 
*   NEW VOLUME LOADED CHECK           * 
*   ORDER CODE CHECK                  * 
*                                     * 
*************************************** 
* 
*   INPUT: A1=NVL RETURN CODE FROM NVLCHK 
*          A7=ORDER CODE
* 
* 
DUA:05	EQU	*
	ADK	A1,0	CHECK IF NEW VOLUME LOADED
	ABL(NZ)	END:IO	PERFORM TENDIO
	SUK	A7,1 
	RF(Z)	DUA:10	BASIC READ
	SUK	A7,4 
	RF(Z)	DUA:10	BASIC WRITE 
	SUK	A7,12	 
	RF(Z)	DUA:10	PHYSICAL READ 
	SUK	A7,4 
	RF(Z)	DUA:10	PHYSICAL WRITE
	SUK	A7,10
	RF(Z)	FORMAT	FORMAT VOLUME 
* 
DUERR	ABL	DISIOE	REQUEST ERROR
* 
INCLEN	EQU	*	REQUESTED LENGTH ERROR 
	LDKL	A1,/8008
	ABL	END:20	
	EJECT		DRDU01
* 
* 
**************************
*                        *
*   FORMAT VOLUME         * 
*                        *
**************************
* 
* 
FORMAT	EQU	*
	LDK	A7,204	NUMBER OF CYLINDERS ON PTS 6875 
	LD	A1,ECBCW1,A8	GET DISC TYPE
	IFT	VERSA2+VERSA3=2
	ECR	A2,A1
	XIF
	ANK	A1,1 
	RF(NZ)	FORM03	PTS 6875 
	ADK	A7,204	PTS 6876
FORM03	EQU	*
* 
	IFT	VERSA2+VERSA3=2
	LDKL	A3,BUFFER 
	LDKL	A1,/C001	WRITE ONE WORD 
	ANK	A2,3 
	SUK	A2,3 
	RF(NZ)	FORM05	A1 OR A2 
	LDKL	A1,/C0C1	WRITE 386 BYTES
	ADKL	A3,PHSECL 
FORM05	EQU	*
	ST	A1,DWTFBU,A6	SAVE 1ST WER 
	XIF
* 
	IFT	VERSA2=1 
	IFT	VERSA3=0 
	LDKL	A3,BUFFER 
	XIF
* 
	IFT	VERSA2=0 
	IFT	VERSA3=1 
	LDKL	A3,BUFFER+PHSECL	POSITION FOR CYL ID
	XIF
* 
	STR	A3,A6	DRIVER BUFFER POINTER
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CM	DWTCYL,A2	CYLINDER ZERO 
	XIF
	IFT	NUNITS=1 
	CM	DWTCYL,A6	CYLINDER ZERO 
	XIF
* 
	EJECT		DRDU01
* 
* 
FORM20	EQU	*
	LDK	A4,QRETRY
FORM30	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI	GET UNIT INDEX
	XIF
	CF	A5,SEEK	SEEK CYLINDER 
	SLL	A1,5	STATUS
	RF(NN)	FORM40	SEEK ERROR 
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	LD	A1,DWTCYL,A2
	XIF
	IFT	NUNITS=1 
	LD	A1,DWTCYL,A6
	XIF
	ST*	A1,0,A6	PREPARE DRIVER BUFFER WITH CYL. ID 
	LDK	A3,0 
	CF	A5,SKEW	WRITE SECTOR 0 ON EVEN CYLINDERS
*			WRITE SECTOR 8 ON ODD CYLINDERS 
	ORK	A3,1	ORDER CODE: WRITE 
* 
	IFT	VERSA2+VERSA3=2
	LD	A1,DWTFBU,A6	GET 1ST WER
	XIF
* 
	IFT	VERSA2=1 
	IFT	VERSA3=0 
	LDKL	A1,/C002
	XIF
* 
	IFT	VERSA2=0 
	IFT	VERSA3=1 
	LDKL	A1,/C0C1	1ST WER WRITE 386 BYTES
	XIF
* 
	LDKL	A2,BUFFER 
	CF	A5,CIO:50	CIO:50 SECTOR 
	ANK	A1,/1F 
	RF(NZ)	FORM40	WRITE ERROR
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	IM	DWTCYL,A2 
	XIF
	IFT	NUNITS=1 
	IM	DWTCYL,A6 
	XIF
	SUK	A7,1	DECREMENT CYLINDER COUNTER
	RB(NZ)	FORM20
	LD	A2,ECBCW1,A8	GET FORMAT AND TYPE OF DISC
	ABL	TRANPA	PUT FORMAT AND TYPE IN DWT
FORM40	EQU	*
	CF	A5,SEEKZ	SEEK CYLINDER 0
	SLL	A1,6 
	RF(N)	FORM50	SEEK ERROR
	SUK	A4,1	RETRY COUNTER 
	RB(NZ)	FORM30	RETRY
FORM50	EQU	*
	LDK	A1,2	SEEK ERROR RETURN CODE
	ABL	END:IO	PERFORM END IO
	EJECT			DRDU01			DRDU01
* 
* 
************************************************* 
*                                               * 
*   CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * 
*   AND SECTOR NUMBER                           * 
*   SAVE BUFFER ADDRESS AND SET SECTOR COUNTER  * 
*                                               * 
************************************************* 
* 
*   INPUT: ECB
*   OUTPUT: A7=SECTOR COUNTER 
*           DWTUBU=USER BUFFER POINTER
* 
* 
DUA:10	EQU	*
	LD	A3,ECBRL,A8	REQUESTED LENGTH
	RB(Z)	INCLEN 
	ECR	A7,A3	DIVIDE BY 256 TO GET NUMBER OF SECTORS 
	ANK	A3,/FF	SET CONDITION REGISTER
	RB(NZ)	INCLEN	NOT AN INTEGER NUMBER OF SECTORS 
	LD	A3,ECBCW2,A8	SECTOR NUMBER WHERE THE BUFFER BEGIN 
	RB(N)	DUERR	INCORRECT SECTOR NUMBER
	CW	A3,DWTSMX,A2
	RB(NL)	DUERR	INCORRECT SECTOR NUMBER 
	ADR	A3,A7
	CW	A3,DWTSMX,A2
	RB(G)	INCLEN	SECTOR NUMBER OVERFLOW
* 
	IFT	MMUPAG=0 
	LD	A1,ECBBA,A8 
	ST	A1,DWTUBU,A6	USER BUFFER POINTER
	XIF
* 
	EJECT		DRDU01
* 
	IFT	VERSA2+VERSA3=2
* 
* 
******************************
*                            *
*   DISC VERSION SEPARATION  *
*                            *
***************************** 
* 
* 
	LD	A2,DWTFOR,A2
	SUK	A2,2 
	RF(Z)	RW:800	VERSION A2
	XIF
* 
	EJECT		DRDU01
* 
	IFT	VERSA3=1 
* 
************************************* 
*                                   * 
*                                   * 
*   GET PHYSICAL SECTOR NUMBER BY   * 
*   DIVIDE BY 3                     * 
*                                   * 
************************************* 
* 
	IFT	CPU852=0 
	LDK	A1,0	PREPARE FOR DIVISION
	LD	A2,ECBCW2,A8	GET LOGICAL SECTOR NUMBER
	DVK	3
*   A1=REMAINER=LOGICAL SECTOR POSITION 
*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852=1 
	LD	A1,ECBCW2,A8
	LDR	A3,A1	SECTOR NUMBER
	LDK	A2,0 
DVK:00	EQU	*
	ADR	A2,A3	I:= I+I/4
	SRL	A3,2	I:= I/4 
	RB(NZ)	DVK:00
	SRL	A2,2	TRUNCATE
	SUR	A1,A2
	SUR	A1,A2
	SUR	A1,A2	REST AFTER LOOP
	SUK	A2,1 
DVK:10	EQU	*
	ADK	A2,1 
	SUK	A1,3	DIVIDE BY 3 
	RB(NN)	DVK:10
	ADK	A1,3	REST
*   A1=REMAINER=LOGICAL SECTOR POSITION 
*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC
* 
	EJECT		DRDU01
	XIF
* 
	IFT	VERSA3=1 
* 
************************************* 
*                                   * 
*   SAVE PHYSICAL SECTOR NUMBER     * 
*   AND SECTOR POSITION             * 
*   BRANCH ACCORDING TO SECTOR      * 
*   POSITION                        * 
*                                   * 
************************************* 
* 
*   INPUT: A1=SECTOR POSITION INDICATOR 
*          A2=LOGICAL SECTOR NUMBER / 3 
* 
* 
	ADR	A2,A2
	STR	A2,A6	SAVE PHYSICAL SECTOR NUMBER
	SUK	A1,1 
	IFT	RAW=1
	ST	A1,DWTSEP,A6	SAVE SECTOR POSITION 
	ST	A2,DWTSEI,A6	SAVE 1ST PHYS. SECTOR NUMBER 
	XIF
* 
	IFT	VERSA3=1 
*			LOGICAL SECTOR POSITION 
	RF(N)	RW:300	,XXXX  ,      , 
	RF(Z)	RW:200	,    XX,XX    , 
*			,      ,  XXXX, 
* 
	EJECT		DRDU01
* 
************************************* 
*                                   * 
*   READ/WRITE FROM SECTOR IN       * 
*   POSITION ,      ,  xxxx,        * 
*                                   * 
************************************* 
* 
	IMR	A6	LOG. SECTOR IN NEXT PHYSICAL
	IFT	RAW=1
	IM	DWTSEI,A6	SAVE FOR READ AFTER WRITE 
	XIF
* 
	IFT	VERSA3=1 
	CF	A5,IOROUT 
	DATA	/0084 
	SUK	A7,1 
	RF	RW:300
* 
	EJECT		DRDU01
* 
************************************* 
*                                   * 
*   READ/WRITE FROM SECTOR IN       * 
*   POSITION ,    xx,               * 
*                                   * 
************************************* 
* 
* 
RW:200	EQU	*
	CF	A5,IOROUT 
	DATA	/0048 
	SUK	A7,2	NUMBER OF SECTORS 
	RF(N)	RW:230	1 SECTOR IN IO
	RF(NZ)	RW:260	>2 SECTORS IN IO 
*			,    XX,XXXXXX, 
	CF	A5,IOROUT 
	DATA	/00C0 
	RF	RW:600
RW:230	EQU	*	,    XX,XX    ,
	CF	A5,IOROUT 
	DATA	/0040 
	RF	RW:600
RW:260	EQU	*	,    XX,XXXXXX,
	CF	A5,IOROUT 
	DATA	/80C0 
* 
	EJECT		DRDU01
* 
************************************
*                                  *
*   DIRECT READ/WRITE AS LONG      *
*   AS POSIBLE                     *
*                                  *
************************************
* 
* 
RW:300	EQU	*
	SUK	A7,3	SECTOR COUNTER
	RF(NG)	RW:500	LESS THAN FOUR SECTORS IN IO 
	CF	A5,IOROUT 
	DATA	/80C0 
	CF	A5,IOROUT 
	DATA	/80C0 
	RB	RW:300
* 
	EJECT		DRDU01
* 
************************************
*                                  *
*   READ/WRITE ON THE LAST SECTORS *
*   IN IO                          *
*                                  *
************************************
* 
* 
RW:500	EQU	*
	RF(Z)	RW:580	3 SECTORS 
	ADK	A7,2 
	RF(P)	RW:560	2 SECTORS 
	RF(N)	RW:600	0 SECTORS 
RW:530	EQU	*	,XXXX  ,      ,
	CF	A5,IOROUT 
	DATA	/0080 
	RF	RW:600
RW:560	EQU	*	,XXXXXX,XX    ,
	CF	A5,IOROUT 
	DATA	/80C0 
	CF	A5,IOROUT 
	DATA	/0040 
	RF	RW:600
RW:580	EQU	*	,XXXXXX,XXXXXX,
	CF	A5,IOROUT 
	DATA	/80C0 
	CF	A5,IOROUT 
	DATA	/00C0 
* 
	EJECT		DRDU01
* 
* 
RW:600	EQU	*
	IFT	RAW=1
* 
************************
*                      *
*   READ AFTER WRITE   *
*                      *
************************
* 
*   DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO
*   1ST POS IN DWT=LAST PHYSICAL SECTOR NUMBER IN IO
*   A7=SECTOR COUNTER 
* 
	LD	A7,DWTOR,A6 
	ANK	A7,/FF	GET ORDER 
	SUK	A7,/15 
	RF(NZ)	RW:700	NOT PHYSICAL WRITE 
	LDKL	A2,-/100
	LD	A1,DWTSEP,A6	GET 1ST SECTOR POSITION
	RF(Z)	RW:645	,    XX,
	RF(P)	RW:640	,  XXXX,
	ADK	A2,/80 
RW:640	EQU	*
	ADK	A2,/80 
RW:645	EQU	*
	ST	A2,ECBEL,A8	PREPARE EFFECTIVE LENGTH
	LD	A1,DWTSEI,A6	RAW FROM THIS SECTOR 
	LDR*	A7,A6	GET LAST SECTOR NO
	SUR	A7,A1	GET NUMBER OF PHYSICAL SECTORS 
	STR	A1,A6
* 
	EJECT		DRDU01
* 
* 
RW:650	EQU	*
	CF	A5,IOROUT 
	DATA	/40C0 
	IMR	A6	NEXT PHYSICAL SECTOR
	LDKL	A1,PHSECL 
	ADS	A1,ECBEL,A8	UPDATE ECBEL 
	SUK	A7,1 
	RB(NZ)	RW:650
	LD	A7,ECBRL,A8 
	ST	A7,ECBEL,A8	CORRECT EFFECTIVE LENGTH
	XIF
* 
	IFT	VERSA3=1 
RW:700	EQU	*
	LDK	A1,0	RETURN CODE 
	ABL	END:20	ENDIO 
* 
	XIF
* 
	EJECT		DRDU01
* 
	IFT	VERSA2=1 
* 
* 
********************************* 
*                               * 
*   DISC FORMAT A2              * 
*                               * 
********************************* 
* 
* 
RW:800	EQU	*
	CF	A5,DIV31
	IFT	RAW=1
	ST	A7,DWTSEI,A6	SAVE NUMBER OF SECTORS FOR READ AFTER WRITE
	XIF
* 
	IFT	VERSA2=1 
RW:850	EQU	*
	CF	A5,IOROUT 
	DATA	/A080	INDICATE FORMAT A2
	LDKL	A1,/100 
	ADS	A1,DWTUBU,A6	UPDATE USER BUFFER POINTER
	SUK	A7,1 
	RB(NZ)	RW:850	MORE SECTORS IN IO 
* 
	EJECT		DRDU01
* 
* 
	IFT	RAW=1
	LD	A7,DWTOR,A6	GET ORDER 
	ANK	A7,/FF 
	SUK	A7,/15 
* 
	IFT	VERSA3=1 
	RB(NZ)	RW:700	NOT PHYSICAL WRITE 
	XIF
* 
	IFT	VERSA3=0 
	IFT	VERSA2=1 
	IFT	RAW=1
	RF(NZ)	RW:905
	XIF
* 
	IFT	VERSA2=1 
	IFT	RAW=1
	CM	ECBEL,A8	PREPARE FOR READ AFTER WRITE 
	LD	A7,DWTSEI,A6
	CF	A5,DIV31
* 
	EJECT		DRDU01
* 
* 
RW:900	EQU	*
	CF	A5,IOROUT 
	DATA	/E080	READ AFTER WRITE
	SUK	A7,1 
	RB(NZ)	RW:900
	XIF
* 
	IFT	VERSA2+VERSA3=2
	RB	RW:700
	XIF
* 
	IFT	VERSA3=0 
	IFT	VERSA2=1 
RW:905	EQU	*
	LDK	A1,0	RESET RETURN CODE 
	ABL	END:20 
	XIF
* 
	EJECT		DRDU01
* 
*********************************************** 
*                                             * 
*   IOROUT PERFORM READ OR WRITE AND SEEK     * 
*   IF NECESSARY                              * 
*                                             * 
*********************************************** 
* 
*   INPUT : ONE DATA WORD AFTER CF
*          BIT 0 :INDICATES DIRECT IO 
*          BIT 1 :INDICATES READ AFTER WRITE
*          BIT 2 :INDICATES FORMAT A2 
*          BIT 8-11:NUMBER OF WORDS/16
*          BIT12-15:START IN DRIVER BUFFER/32 
*   AFTER SEEK THE CYLINDER ID WILL BE CHECKED BY A READ
*   DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER 
*   DWTRTY INDICATES RETRIES DONE 
*   DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER
* 
IOROUT	EQU	*
	LDR*	A3,A6	GET PHYSICAL SECTOR NUMBER
	SRL	A3,5	GET CYLINDER NUMBER 
* 
	IFT	VERSA2+VERSA3=2
	LD*	A4,4,A5	GET DATA WORD
	SLL	A4,2 
	RF(NN)	SEE:05	FORMAT A3
	ADK	A3,0 
	XIF
* 
	EJECT		DRDU01
* 
* 
	IFT	VERSA2=1 
	RF(NZ)	SEE:05	NOT CYLINDER 0 
	CF	A5,SEEKZ
	SLL	A1,6 
	RF(N)	SEE:20	ERROR 
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CM	DWTCYL,A2	CYLINDER ZERO 
	RF	VA2BR 
	XIF
	IFT	VERSA2=1 
	IFT	NUNITS=1 
	CM	DWTCYL,A6 
	RF	VA2BR 
	XIF
* 
	EJECT		DRDU01
* 
* 
SEE:05	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CW	A3,DWTCYL,A2	COMPARE WITH PRESENT 
	XIF
	IFT	NUNITS=1 
	CW	A3,DWTCYL,A6
	XIF
* 
	IFT	VERSA2=1 
	IFT	VERSA3=0 
	RF(E)	VA2:00 
	XIF
* 
	IFT	VERSA2=0 
	IFT	VERSA3=1 
	RF(E)	SEE:90	HEAD IN POSITION
	XIF
* 
	IFT	VERSA2+VERSA3=2
	RF(NE)	SEE:07	NOT SAME CYLINDER
	ADK	A4,0 
	RF(N)	VA2BR	FORMAT A2
	RF	SEE:90
* 
	EJECT		DRDU01
* 
* 
SEE:07	EQU	*
	XIF
* 
	IFT	NUNITS=1 
	ST	A3,DWTCYL,A6	NEW CYLINDER NUMBER
	XIF
* 
	IFT	NUNITS=2 
	ST	A3,DWTCYL,A2	NEW CYLINDER 
	XIF
	LDK	A4,QRETRY	NUMBER OF RETRIES
SEE:10	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI	DOUBLED UNIT INDEX
	XIF
	CF	A5,SEEK 
	SLC	A1,5	RETURN CODE 
	RF(N)	SEE:30	OK
* 
	EJECT		DRDU01
* 
* 
SEE:15	EQU	*
	CF	A5,SEEKZ	SEEK CYL ZERO
	SLC	A1,6	RETURN CODE 
	RF(N)	SEE:20	ERROR 
	IM	DWTRTY,A6	INDICATE RETRY
	SUK	A4,1	RETRY COUNTER 
	RB(NZ)	SEE:10	TRY AGAIN
SEE:20	EQU	*
	LDKL	A3,/FFFF
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	ST	A3,DWTCYL,A2	DUMMY CYLINDER NUMBER
	XIF
	IFT	NUNITS=1 
	ST	A3,DWTCYL,A6	DUMMY CYLINDER NUMBER
	XIF
	LDK	A1,/02	RETURN CODE 
	RF	SEE:35	END IO 
* 
	EJECT		DRDU01
* 
* 
SEE:30	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	XIF
	IFT	VERSA2+VERSA3=2
	LD*	A1,4,A5	GET DATA WORD
	SLL	A1,2 
	RF(NN)	SEE:31	FORMAT A3
	XIF
* 
	IFT	VERSA2=1 
	EJECT		DRDU01
* 
* 
*   FORMAT A2 
* 
	LDK	A3,0 
	CF	A5,SKEW 
	LDKL	A1,/8002	READ 2 WORDS 
	LDKL	A2,BUFFER	READ TO DRIVER BUFFER 
	CF	A5,CIO:50 
	ANK	A1,/1F	ERROR CHECK 
	RF(NZ)	SEE:32
	LD	A3,BUFFER	GET CYL ID
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CW	A3,DWTCYL,A2	CHECK IF SAME CYLINDER 
	XIF
	IFT	VERSA2=1 
	IFT	NUNITS=1 
	CW	A3,DWTCYL,A6	CHECK IF SAME CYLINDER 
	XIF
	IFT	VERSA2=1 
	RB(NE)	SEE:15	NOT SAME CYL ID
VA2BR	EQU	* 
	ABL	VA2:00 
	XIF
* 
	IFT	VERSA3=1 
	EJECT		DRDU01
* 
* 
*   FORMAT A3 
* 
SEE:31	EQU	*
	IFT	NUNITS=2 
	LD	A3,DWTCYL,A2
	XIF
	IFT	VERSA3=1 
	IFT	NUNITS=1 
	LD	A3,DWTCYL,A6
	XIF
* 
	IFT	VERSA3=1 
	SLL	A3,5	GET SECTOR NUMBER 
	ST	A3,DWTBSE,A6	SAVE FOR BSELOD
	LDK	A3,0 
	CF	A5,SKEW	TO READ SECTOR 0 OR 8 ON DISC 
	IM	DWTFBU,A6	INDICATE READ TO DRIVER BUFFER
	CF	A5,READ 
	LD	A3,DWTBSE,A6	GET SECTOR NUMBER FOR BSELOD 
	ANK	A1,/1F	ERROR CODE CHECK
	CF	A5,BSEL00 
	RF(Z)	SEE:40	OK
	XIF
* 
SEE:32	EQU	*
	IM	DWTRTY,A6	INDICATE RETRY
	SUK	A4,1	RETRY COUNTER 
	RB(NZ)	SEE:15	RETRY
SEE:35	EQU	*
	ABL	END:10 
* 
	IFT	VERSA3=1 
* 
	EJECT		DRDU01
* 
* 
SEE:40	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	LD	A3,DWTCYL,A2	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	IFT	NUNITS=1 
	LD	A3,DWTCYL,A6	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	CW	A3,BUFFER+PHSECL	COMPARE WITH CYL ID
	RB(NE)	SEE:15	RETRY
* 
	EJECT		DRDU01
* 
************************* 
*                       * 
*   READ AND WRITE      * 
*   FORMAT A3           * 
*                       * 
************************* 
* 
SEE:90	EQU	*
	LD	A4,DWTOR,A6	GET ORDER 
	ANK	A4,4 
	RF(Z)	READ00	READ ORDER
	LD*	A2,4,A5
	RF(N)	WRIT20	WRITE DIRECT FROM USER BUFFER 
	SLL	A2,1 
	IFT	RAW=1
	RF(N)	READWR	READ AFTER WRITE
	XIF
* 
	IFT	VERSA3=1 
	CWK	A2,PHSECL	 
	RF(E)	WRIT10	WRITE FROM DRIVER BUFFER
	IM	DWTFBU,A6	INDICATE READ TO DRIVER BUFFER
	CF	A5,REA:00	READ BEFORE WRITE 
* 
	EJECT		DRDU01
* 
* 
WRIT10	EQU	*
	LD*	A2,4,A5	GET DATA WORD
	LDR	A4,A2
	ANK	A4,/C0	GET NUMBER OF WORDS TO MOVE 
	SLL	A4,1	BYTES 
	ANK	A2,/F	BEG ADRESS IN DRIVER BUFFER
	SLL	A2,5 
	CF	A5,MOVWRI	MOVE TO DRIVER BUFFER 
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	LD	A2,DWTCYL,A2	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	IFT	NUNITS=1 
	LD	A2,DWTCYL,A6	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	ST	A2,BUFFER+PHSECL	PUT IN DRIVER BUFFER 
	IM	DWTFBU,A6	INDICATE WRITE FROM DRIVER BUFFER 
	CF	A5,WRI:00	WRITE FROM DRIVER BUFFER
	RF	SEE:95
* 
	EJECT		DRDU01
* 
* 
WRIT20	EQU	*
	IFT	MMUPAG=0 
	LDKL	A2,PHSECL	PHYSICAL SECTOR LENGTH
	ADS	A2,DWTUBU,A6	UPDATE USER BUFFER POINTER
	LD*	A4,DWTUBU,A6	GET WORD IN USER BUFFER 
	ST	A4,DWTSWD,A6	SAVE WORD
	IM	DWTFSW,A6	INDICATE SAVED WORD 
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	LD	A2,DWTCYL,A2	GET CYLINDER NUMBER
	ST*	A2,DWTUBU,A6	PUT IN USER BUFFER
	XIF
	IFT	VERSA3=1 
	IFT	MMUPAG=0 
	IFT	NUNITS=1 
	LD	A2,DWTCYL,A6
	ST*	A2,DWTUBU,A6	PUT IN USER BUFFER
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	LD	A4,DWTCYL,A2	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	IFT	NUNITS=1 
	LD	A4,DWTCYL,A6	GET CYLINDER NUMBER
	XIF
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	ML	2,DWTBA1,A6	GET PHYSICAL BUFFER ADDRESS 
	RF(Z)	WRIT30	SYSTEM AREA 
	TS	-30,A15	SAVE REGISTERS ON STACK 
	TL	DWTPAG,A6	LOAD PAGE WITH CYL ID 
	LD	A2,DWTUBU,A6	GET LOGICAL BUFFER POINTER 
	EL	A3,PHSECL,A2	GET WORD TO SAVE 
	ES	A4,PHSECL,A2	PUT CYL ID IN POSITION 
	TL	-30,A15	GET REGISTERS 
	RF	WRIT40
WRIT30	EQU	*
	SLL	A2,1	BYTE ADDRESS
	LD	A3,PHSECL,A2	GET WORD TO BE SAVED 
	ST	A4,PHSECL,A2	CYL ID IN POSITION 
WRIT40	EQU	*
	ST	A3,DWTSWD,A6	SAVA WORD
	IM	DWTFSW,A6	INDICATE SAVED WORD 
	XIF
* 
	IFT	VERSA3=1 
	CM	DWTFBU,A6	INDICATE WRITE FROM USER BUFFER 
	CF	A5,WRI:00	WRITE SECTOR FROM USER BUFFER 
	CF	A5,REWORD	RESTORE WORD TO USER BUFFER 
	RF	SEE:95
* 
	EJECT		DRDU01
* 
* 
	IFT	RAW=1
READWR	EQU	*
	CF	A5,REA:10	READ AFTER WRITE
	RF	SEE:97
	XIF
* 
	IFT	VERSA3=1 
READ00	EQU	*
	LD*	A2,4,A5	GET DATA WORD
	RF(N)	READ20	DIRECT READ 
	IM	DWTFBU,A6	INDICATE READ TO DRIVER BUFFER
	CF	A5,REA:00	READ TO DRIVER BUFFER 
	LD*	A1,4,A5	GET DATA WORD
	SLL	A1,1 
	LDR	A4,A1
	ANKL	A4,/180	GET NUMBER OF BYTES TO BE MOVED 
	ANK	A1,/18	GET POSITION
	SLL	A1,4 
	CF	A5,MOVRED 
	RF	SEE:95
READ20	EQU	*
	IFT	MMUPAG=0 
	LDKL	A3,PHSECL 
	ADS	A3,DWTUBU,A6	UPDATE USER BUFFER POINTER
	XIF
* 
	IFT	VERSA3=1 
	CM	DWTFBU,A6	INDICATE READ TO USER BUFFER
	CF	A5,REA:00	READ TO USER BUFFER 
SEE:95	EQU	*
	IMR	A6	UPDATE PHYSICAL SECTOR POINTER
	XIF
* 
	EJECT		DRDU01
* 
* 
SEE:96	EQU	*
	LD*	A2,4,A5	GET DATA WORD
	ANK	A2,/C0	LENGTH
	SLL	A2,1 
	ADS	A2,ECBEL,A8	UPDATE ECBEL 
* 
	IFT	MMUPAG=1 
	LDK	A1,0 
	SRL	A2,1	WORD MODE 
	DA	DWTBA1,A6	UPDATE PHYSICAL BUFFER ADDRESS
	CF	A5,MMULOG	GET LOGICAL ADDRESS 
	XIF
* 
SEE:97	EQU	*
	LDK	A1,2	UPDATE RETURN 
	ADS	A1,4,A5
	RTN	A5 
* 
	EJECT		DRDU01
* 
	IFT	VERSA2=1 
* 
* 
********************************
*                              *
*   DISC FORMAT A2             *
*                              *
********************************
* 
* 
VA2:00	EQU	*
	LDK	A4,QRETRY	RETRIES
VA2:10	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	XIF
	IFT	VERSA2=1 
	CF	A5,INLACE	INTERLACE AND SKEW
* 
	IFT	MMUPAG=0 
	LDKL	A1,/8080	1ST WER
	IFT	RAW=1
	LD*	A2,4,A5
	SLL	A2,1 
	RF(NN)	VA2:20	NOT READ AFTER WRITE 
	LDKL	A2,BUFFER 
	RF	VA2:35
VA2:20	EQU	*
	XIF
* 
	IFT	VERSA2=1 
	IFT	MMUPAG=1 
	LDKL	A1,/0808	1ST WER SHIFTED
	XIF
* 
	IFT	VERSA2=1 
	IFT	RAW=1
	IFT	MMUPAG=1 
	LD*	A2,4,A5
	SLL	A2,1 
	RF(NN)	VA2:20	NOT READ AFTER WRITE 
	LDKL	A1,/8080
	LDKL	A2,BUFFER 
	RF	VA2:35
VA2:20	EQU	*
	XIF
* 
	IFT	VERSA2=1 
	LD	A2,DWTOR,A6	GET ORDER 
	ANK	A2,4 
	RF(Z)	VA2:30	READ
* 
	IFT	MMUPAG=0 
	LDKL	A1,/C080
	XIF
* 
	IFT	VERSA2=1 
	IFT	MMUPAG=1 
	LDKL	A1,/080C	1ST WER SHIFTED
	XIF
* 
	IFT	VERSA2=1 
	ADK	A3,1	ORDER CODE FOR WRITE
* 
	EJECT		DRDU01
* 
* 
VA2:30	EQU	*
* 
	IFT	MMUPAG=0 
	LD	A2,DWTUBU,A6	2ND WER
	XIF
* 
	IFT	VERSA2=1 
	IFT	MMUPAG=1 
	LDK	A2,0 
	DA	DWTBA1,A6 
	SRC	A1,4	1ST WER IN POSITION 
	SLL	A2,1	2ND WER IN POSITION 
	XIF
* 
	IFT	VERSA2=1 
VA2:35	EQU	*
	CF	A5,CIO:50 
	ANK	A1,/1F 
	RF(Z)	VA2:40	IO ERROR
	IM	DWTRTY,A6 
	SUK	A4,1 
	RB(NZ)	VA2:10	RETRY
	RF	WRI:50	ERROR
* 
	EJECT		DRDU01
* 
* 
VA2:40	EQU	*
	LDR*	A3,A6	GET PHYSICAL SECTOR NUMBER
	ADK	A3,1	NEXT SECTOR 
	LDR	A2,A3
	CWK	A2,31
	RF(NE)	VA2:50	NOT CYLINDER 0 
	ADK	A3,2	CYLINDER 0 TO CYLINDER 1
VA2:50	EQU	*
	ANK	A2,/1F 
	RF(NZ)	VA2:60	SAME CYLINDER
	ADK	A3,1	NEW CYLINDER
VA2:60	EQU	*
	STR	A3,A6	PHYSICAL SECTOR NUMBER 
	RB	SEE:96
	XIF
* 
	IFT	VERSA3=1 
	EJECT		DRDU01
* 
****************************
*                          *
*   SUBROUTINES FOR WRITE  *
*   FROM USER BUFFER:      *
*   FROM DRIVER     :      *
*                          *
****************************
* 
WRI:00	EQU	*
	LDK	A4,QRETRY	RETRIES
WRI:20	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	XIF
	IFT	VERSA3=1 
	CF	A5,INLACE	INTERLACE SECTOR NUMBER 
	CF	A5,WRITE	CIO
	ANK	A1,/1F	RETURN CODE ? 
	CF	A5,BSELOD 
	RF(Z)	WRI:80	NO RETURN CODE
	IM	DWTRTY,A6	INDICATE RETRY
	SUK	A4,1	DECREMENT RETRY COUNTER 
	RB(NZ)	WRI:20
	CF	A5,REWORD	RESTORE WORD IF NECESSARY 
	XIF
* 
WRI:50	EQU	*
	ABL	END:10	ERROR END IO
* 
	IFT	VERSA3=1 
* 
WRI:80	EQU	*
	RTN	A5 
* 
	EJECT		DRDU01
* 
********************************* 
*                               * 
*   SUBROUTINES FOR READ TO     * 
*   USER BUFFER :               * 
*   DRIVER BUFFER :             * 
*                               * 
********************************* 
* 
REA:00	EQU	*
	LD	A3,DWTOR,A6	GET INDEX 
	ANKL	A3,/300 
	SLL	A3,6	IN POSITION 
	ORR*	A3,A6	ADD SECTOR NUMBER 
	CW	A3,DWTBSE,A6	ALLREADY READ ?
	RF(E)	REA:85 
REA:10	EQU	*
	LDK	A4,QRETRY
REA:20	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	XIF
	IFT	VERSA3=1 
	CF	A5,INLACE	INTERLACE SECTOR NUMBER 
	CF	A5,READ	READ SECTOR 
	ANK	A1,/F
	CF	A5,BSELOD	UPDATE DRIVER BUFFER INDICATOR
	RF(Z)	REA:30	NO RETURN CODE
REA:25	EQU	*
	IM	DWTRTY,A6	INDICATE RETRY
	SUK	A4,1	DECREMENT RETRY COUNTER 
	RB(NZ)	REA:20	RETRY
	ABL	END:20 
* 
	EJECT		DRDU01
* 
* 
REA:30	EQU	*
	LD	A2,DWTFBU,A6
	RF(NZ)	REA:40	READ TO DRIVER BUFFER
	IFT	MMUPAG=0 
	LD*	A3,DWTUBU,A6	GET CYLINDER ID FROM USER BUFFER
	RF	REA:50
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	ML	2,DWTBA1,A6	GET PHYSICAL ADDRESS
	RF(Z)	REA:35	SYSTEM AREA 
	TS	-30,A15	SAVE REGISTERS
	TL	DWTPAG,A6	LOAD MMUPAGE
	LD	A3,DWTUBU,A6	GET LOGICAL BUFFER POINTER 
	EL	A3,PHSECL,A3	GET CYL ID 
	TL	-30,A15	RESET REGISTERS 
	RF	REA:50
REA:35	EQU	*
	SLL	A2,1	ADDRESS TO BYTE MODE
	LD	A3,PHSECL,A2	GET CYL ID 
	RF	REA:50
	XIF
* 
	IFT	VERSA3=1 
REA:40	EQU	*
	LD	A3,BUFFER+PHSECL	GET CYL ID 
REA:50	EQU	*
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CW	A3,DWTCYL,A2
	XIF
	IFT	VERSA3=1 
	IFT	NUNITS=1 
	CW	A3,DWTCYL,A6
	XIF
	IFT	VERSA3=1 
	RF(E)	REA:90	RIGHT CYLINDER ID 
	LDK	A1,2	SEEK ERROR
* 
	EJECT		DRDU01
* 
* 
	RB	REA:25
REA:85	EQU	*
	LD	A1,DWTFBU,A6
	RF(NZ)	REA:90	READ TO DRIVER BUFFER
	LDKL	A4,/180	BYTES TO BE MOVED 
	IFT	MMUPAG=0 
	NGR	A2,A4
	ADS	A2,DWTUBU,A6	RESET USER BUFFER POINTER FOR DIRECT MOVE 
	XIF
	IFT	VERSA3=1 
	CF	A5,MOVRED	MOVE TO USER BUFFER 
REA:90	EQU	*
	RTN	A5 
* 
	EJECT		DRDU01
* 
* 
************************************* 
*                                   * 
*   SUBROUTINES FOR MOVING WORDS    * 
*   USER BUFFER TO DRIVER BUFFER: 
*   MOVWRI                          * 
*   DRIVER BUFFER TO USER BUFFER    * 
*   MOVRED                          * 
*                                   * 
************************************* 
* 
*   A1   BUFFER ADDRESS IN
*   A2   BUFFER ADDRESS OUT 
*   A4   BUFFER LENGTH
*   A3   USED 
* 
MOVRED	EQU	*
	ADKL	A1,BUFFER 
	IFT	MMUPAG+CPU857=0
	LD	A2,DWTUBU,A6	PRESENT POINT IN USER BUFFER 
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852+MMUPAG=0
	IFT	CPU857=1 
	LD	A2,DWTUBU,A6	GET USER BUFFER POINTER
	ADS	A4,DWTUBU,A6	UPDATE USER BUFFER POINTER
	MVB	A4 
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852=0 
	IFT	MMUPAG=1 
	LD	A2,DWTBA2,A6	GET PHYSICAL BUFFER ADDRESS
	SLL	A2,1	BYTE MODE 
	TS	-30,A15	SAVE REGISTERS
	TL	DWTPAG,A6 
	LD	A2,DWTUBU,A6	GET LOGICAL ADDRESS
	MVSU	A4
	XIF
* 
	IFT	VERSA3=1 
	RF	MOV:00
* 
	EJECT		DRDU01
* 
* 
MOVWRI	EQU	*
	ADKL	A2,BUFFER	DRIVER BUFFER POINTER 
	IFT	MMUPAG+CPU857=0
	LD	A1,DWTUBU,A6	PRESENT POINT IN USER BUFFER 
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852+MMUPAG=0
	IFT	CPU857=1 
	LD	A1,DWTUBU,A6	GET USER BUFFER POINTER
	ADS	A4,DWTUBU,A6	UPDATE USER BUFFER POINTER
	MVB	A4 
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852=0 
	IFT	MMUPAG=1 
	LD	A1,DWTBA2,A6	GET PHYSICAL BUFFER ADDRESS
	SLL	A1,1	BYTE MODE 
	TS	-30,A15	SAVE REGISTERS
	TL	DWTPAG,A6 
	LD	A1,DWTUBU,A6	GET LOGICAL ADDRESS
	MVUS	A4
	XIF
* 
	IFT	VERSA3=1 
MOV:00	EQU	*
	IFT	MMUPAG+CPU857=0
	ADS	A4,DWTUBU,A6	UPDATE USER BUFFER POINTER
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	TL	-30,A15	RESET REGISTERS 
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG+CPU857=0
	IFT	CPU852=1 
* 
	EJECT		DRDU01
* 
* 
MOV:10	EQU	*
	LDR*	A3,A1 
	STR	A3,A2
	ADK	A1,2 
	ADK	A2,2 
	SUK	A4,2 
	RB(P)	MOV:10 
	XIF
* 
	IFT	VERSA3=1 
	IFT	CPU852=0 
	IFT	MMUPAG+CPU857=0
	MSR	12,A15	SAVE REGISTERS ON STACK 
	LDR	A11,A4	NUMBER OF BYTES 
	LDR	A10,A2	OUTPUT ADDRESS
	LDR	A9,A1	INPUT ADDRESS
	LDKL	A12,16	BYTES IN EACH LOOP 
MOV:15	EQU	*
	MLR	8,A9 
	MSR	8,A10
	ADR	A10,A12
	ADR	A9,A12 
	SUR	A11,A12
	RB(P)	MOV:15 
	MLR	12,A15	RESTORE REGISTERS FROM STACK
	XIF
* 
	IFT	VERSA3=1 
	RTN	A5 
* 
	XIF
* 
	IFT	VERSA2=1 
	EJECT		DRDU01
* 
* 
*************************** 
*                         * 
*   DIV31                 * 
*                         * 
*************************** 
* 
*   INPUT: ECBCW2=LOGICAL SECTOR NUMBER 
*   OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER
* 
DIV31	EQU	* 
* 
	IFT	CPU852=1 
	LD	A1,ECBCW2,A8	GET LOGICAL SECTOR NUMBER
	LDR	A3,A1
	LDK	A2,0 
DIV:20	EQU	*
	ADR	A2,A3	I0:=I0+I1
	SRL	A3,5	I1:=I1/32 
	RB(NZ)	DIV:20
	LDR	A3,A2
	ANKL	A3,/FFE0	32*
	SRL	A2,5	TRUNCATE
	SUR	A3,A2
	SUR	A3,A1
	ADK	A3,31
	RF(P)	DIV:30 
	ADK	A2,1	NEXT CYLINDER 
DIV:30	EQU	*
	ADK	A2,0 
	RF(Z)	DIV:50	CYLINDER 0
	ADR	A1,A2
	ADK	A1,1 
* 
	EJECT		DRDU01
* 
* 
DIV:50	EQU	*
	STR	A1,A6	PUT PHYSICAL SECTOR NUMBER IN DWT
	RTN	A5 
* 
	XIF
* 
	IFT	VERSA2=1 
	IFT	CPU852=0 
	LD	A2,ECBCW2,A8	GET SECTOR NUMBER
	STR	A2,A6	PHYSICAL SECTOR NUMBER 
	LDK	A1,0 
	DVK	31 
	ADK	A2,0 
	RF(Z)	DIV:10	CYLINDER 0
	ADK	A2,1 
DIV:10	EQU	*
	ADRS	A2,A6	PHYSICAL SECTOR NUMBER
	RTN	A5 
	XIF
* 
	EJECT		DRDU01
* 
********************************* 
*                               * 
*   SUBROUTINES FOR             * 
*   INTERLACING AND/OR          * 
*   SKEWING                     * 
*                               * 
********************************* 
* 
*  OUTPUT : A3 CONTAINING INTERLACED AND SKEWED SECTOR NUMBER 
* 
INLACE	EQU	*
	LDR*	A3,A6	GET PHYSICAL SECTOR NUMBER
	LDR	A1,A3
	ADR	A3,A3
	ADR	A3,A1	INTERLACING FACTOR 3 
SKEW	EQU	*
	IFT	NUNITS=2 
	LD	A2,DWTCYL,A2	GET CYLINDER NUMBER
	XIF
	IFT	NUNITS=1 
	LD	A2,DWTCYL,A6	GET CYLINDER NUMBER
	XIF
	ANK	A2,1 
	RF(Z)	INLAC5	EVEN CYLINDER 
	ADK	A3,8	SKEW FACTOR 180 DEG.
INLAC5	EQU	*
	ANK	A3,/1F 
	SLL	A3,2	IN POSITION 
	RTN	A5 
* 
	IFT	NUNITS=2 
	EJECT		DRDU01
* 
* 
**********
* INXUNI *
**********
* 
*   OUTPUT  A2=DOUBLED UNIT INDEX + DWT ADDRESS 
* 
INXUNI	EQU	*
	LC	A2,DWTOR,A6 
	ANK	A2,2 
	ADR	A2,A6
	RTN	A5 
	XIF
* 
	IFT	MMUPAG=1 
	EJECT		DRDU01
* 
* 
******************************************
*                                        *
*   MMULOG : GET LOGICAL ADDRESS AND     *
*            PAGE                        *
*                                        *
******************************************
* 
* 
MMULOG	EQU	*
	MS	2,DWTBA1,A6	SAVE PHYSICAL WORD ADDRESS
	DLA	4
	SRC	A1,6	IN POSITION 
	ST	A1,DWTPAG,A6	PAGE 
	ADKL	A1,/400	NEXT PAGE 
	ST	A1,DWTPAG+2,A6	PSEUDO MMU TABLE 
	SRL	A2,3 
	ST	A2,DWTUBU,A6	LOGICAL ADDRESS
	RTN	A5 
* 
	XIF
* 
	EJECT			DRDU01 
* 
	IFT	VERSA3=1 
* 
* 
******************************
* 
*  UPDATE DRIVER BUFFER INDICATOR 
* 
******************************* 
* 
*   INPUT  A1=RETURN CODE (AFTER READ)
*   OUTPUT DWTBSE=DRIVER BUFFER INDICATOR 
* 
BSELOD	EQU	*
	LDR*	A3,A6	GET READ SECTOR NUMBER
BSEL00	EQU	*	FROM SEEK VERIFY 
	LD	A2,DWTFBU,A6
	RF(Z)	BSEL50	READ/WRITE TO USER BUFFER 
	LDKL	A2,/FFFF	DUMMY
	ADK	A1,0 
	RF(NZ)	BSEL40	READ ERROR 
	LD	A2,DWTOR,A6	GET INDEX 
	ANKL	A2,/300 
	SLL	A2,6 
	ORR	A2,A3
BSEL40	EQU	*
	ST	A2,DWTBSE,A6	UPDATE DRIVER BUFFER INDICATOR 
BSEL50	EQU	*
	RTN	A5 
* 
	EJECT		DRDU01
* 
* 
*************************************** 
*                                     * 
*   RESTORE WORD TO USER BUFFER       * 
*   IF NECESSARY                      * 
*                                     * 
*************************************** 
* 
*   INPUT: DWTFSW=SAVED WORD INDICATOR
*          DWTSWD=SAVED WORD
*          DWTUBU=POINTER TO USER BUFFER
* 
REWORD	EQU	*
	LD	A3,DWTFSW,A6
	RF(Z)	REWO50	NO SAVED WORD 
	LD	A3,DWTSWD,A6
	IFT	MMUPAG=1 
	ML	2,DWTBA1,A6	GET BUFFER ADDRESS
	RF(Z)	REWO20	SYSTEM AREA 
	TS	-30,A15	SAVE REGISTERS
	TL	DWTPAG,A6	SET MMU REGISTERS 
	LD	A2,DWTUBU,A6	GET LOGICAL BUFFER ADDRESS 
	ES	A3,PHSECL,A2	RESTORE SAVED WORD 
	TL	-30,A15	RESET REGISTERS 
	RF	REWO50
REWO20	EQU	*
	SLL	A2,1	BYTE MODE 
	ST	A3,PHSECL,A2	RESTORE WORD 
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=0 
	ST*	A3,DWTUBU,A6	RESTORE SAVED WORD
	XIF
* 
	IFT	VERSA3=1 
	CM	DWTFSW,A6	INDICATE NO SAVED WORD
REWO50	EQU	*
	RTN	A5 
* 
	XIF
* 
	EJECT			DRDU01			DRDU01
* 
* 
******************* 
*                 * 
*  SEEK CYLINDER  * 
*                 * 
******************* 
* 
* 
SEEK	EQU	*
	IFT	NUNITS=2 
	LD	A3,DWTCYL,A2	CYLINDER NUMBER
	XIF
	IFT	NUNITS=1 
	LD	A3,DWTCYL,A6
	XIF
	SLL	A3,3 
	ORK	A3,2 
	RF	CIO	EXECUTE CIO-START 
* 
SEEKZ	EQU	* 
	LDK	A3,3 
	RF	CIO	EXECUTE CIO-START 
* 
	EJECT		DRDU01
* 
* 
**********************************
*                                *
*   CIO: READ AND WRITE          *
*                                *
**********************************
* 
*  INPUT: A3=PHYSICAL SECTOR NUMBER SHIFTED 
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=0 
READ	EQU	*
	LDKL	A1,/80C1	1ST WER
	RF	CIO:20
WRITE	EQU	* 
	LDKL	A1,/C0C1	1ST WER
	ADK	A3,1	ORDER CODE
CIO:20	EQU	*
	LD	A2,DWTFBU,A6
	RF(NZ)	CIO:30	IO FROM/TO DRIVER BUFFER 
	LD	A2,DWTUBU,A6	USER BUFFER POINTER
	SUKL	A2,PHSECL 
	RF	CIO:50
CIO:30	EQU	*
	LDKL	A2,BUFFER	DRIVER BUFFER ADDRESS 
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
READ	EQU	*
	LDKL	A1,/0C18	1ST WER SHIFTED
	RF	CIO:20
WRITE	EQU	* 
	LDKL	A1,/0C1C	1ST WER SHIFTED
	ADK	A3,1	ORDER CODE
CIO:20	EQU	*
	LD	A2,DWTFBU,A6
	RF(NZ)	CIO:30	IO FROM/TO DRIVER BUFFER 
	DA	DWTBA1,A6	GET USER BUFFER ADDRESS 
	SLL	A2,1	BYTE MODE ADDRESS 
	RF	CIO:40
CIO:30	EQU	*
	LDKL	A2,BUFFER	DRIVER BUFFER ADDRESS 
CIO:40	EQU	*
	SRC	A1,4	1ST WER IN POSITION 
	XIF
* 
CIO:50	EQU	*
	WER	A1,WER1
	WER	A2,WER1+1
* 
	EJECT			DRDU01			DRDU01
* 
* 
CIO	EQU	* 
	ST	A4,DWTA4,A6	SAVE A4 
	LD	A2,PFPOST 
	RF(NZ)	CIOAB	PWF POST PROCESSING ON
	CF	A15,INXDWT	GET INDEXED DWT ADDRESS
	EX	DWTCIO,A4	EXECUTE CIO-START 
	ABL(3)	END:30	CU ADDRESS UNKNOWN 
CIOAB	EQU	* 
	ST	A5,DWTA5,A6	           A5 
	ST	A7,DWTA2,A6	SAVE SECTOR COUNTER 
* 
T:DISP	ABL	TDISP	GO TO DISPATCHER 
* 
	EJECT			DRDU01			DRDU01
* 
* 
**********************
*                    *
*  RECOVERY ROUTINE  *
*                    *
**********************
* 
* 
DUON	EQU	*
* 
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 ON STACK
	XIF
* 
	LDKL	A6,DWDU01 
	LDK	A5,DWTSB3	GET STACK BASE 
	ADR	A5,A6
	CM	DWTST,A6	UNIT BUSY
	CM	DWTSAV,A6	INDICATE RECOVERY 
	LD	A1,INIFLG	INITIALIZATION FLAG 
	RF(NZ)	DUON05	NOT POWER UP 
* 
	EJECT		DRDU01
* 
* 
	CM	DWTOR,A6	1ST UNIT 
	CF	A5,SEEKZ	TEST IF OPERABLE 
	ANK	A1,1 
	RF(NZ)	DUON26	NOT OPERABLE 
	IFT	NUNITS=2 
	LDK	A1,2 
	SC	A1,DWTOR,A6	NEXT UNIT 
	CF	A5,SEEKZ
	ANK	A1,1 
	RF(NZ)	DUON26	NOT OPERABLE 
	XIF
* 
	EJECT			DRDU01 
* 
* 
DUON05	EQU	*
	CM	DWTOR,A6
	CF	A5,VO:NAM	READ VOLUME NAME
	ANK	A1,1 
	RF(Z)	DUON07	NO ERROR
	CM	DWTOR,A6	PREPARE FOR VOLCLR 
	LDK	A1,12
	CF	A15,VOLCLR
DUON07	EQU	*
	IFT	NUNITS=2 
	LDK	A1,2	OTHER DISC UNIT 
	SC	A1,DWTOR,A6 
	CF	A5,VO:NAM 
	ANK	A1,1 
	RF(Z)	DUON08	NO ERROR
	LDK	A1,2	OTHER DISC UNIT 
	SC	A1,DWTOR,A6 
	LDK	A1,12
	CF	A15,VOLCLR
DUON08	EQU	*
	XIF
	IM	DWTST,A6	INDICATE VOLUME NAMES READ 
	LDKL	A1,-1 
	ST	A1,DWTSAV,A6	RECOVERY DONE
* 
	EJECT		DRDU01
* 
* 
	LD	A8,DWTECB,A6	GET ECB ADDRESS
	RF(Z)	END:IO	NO REQUEST ON?
* 
DUON10	LD	A7,DWTORD,A6	GET ORDER
	ST	A7,DWTOR,A6	RESTORE INDEX AND ORDER 
	ANK	A7,/3F 
* 
	IFT	VERSA3=1 
	CF	A5,REWORD	RESTORE WORD IF NECESSARY 
	XIF
* 
	CM	ECBEL,A8	RESET EFFECTIVE LENGTH 
	ABL	DUA:00	REPEAT REQUEST
* 
	EJECT			DRDU01 
* 
*    READY INTERRUPT
* 
DUREDY	LD	A1,TIMER
	RF(Z)	DUON50	NO TIMER ACTIVE 
* 
	IFT	NUNITS=1 
	CM*	TIMER	KILL TIMER 
	RF	DUON40
	XIF
* 
	IFT	NUNITS=2 
	RB	T:DISP	TIMER ACTIVE 
	XIF
* 
	EJECT			DRDU01 
* 
* 
DUON26	EQU	*
	LDKL	A4,TIMER	TIMER POINTER ADDRESS
	LDR*	A3,A4 
	RF(Z)	DUON30	NO TIMER ACTIVE 
	LDKL	A1,-TIME
	STR	A1,A3	RESTART TIMER
	RB	T:DISP
* 
* 
DUON30	CF	A15,SETIMP	START TIMER
	DATA	DUON40,TIME	TIME OUT ADDRESS, TIME
	RB	T:DISP
* 
*   TIME OUT
* 
DUON40	LDKL	A6,DWDU01 
	CM	TIMER 
DUON50	EQU	*
	CM	DWTST,A6	SET UNIT BUSY
	CM	DWTSAV,A6	INDICATE RECOVERY 
	LDK	A5,DWTSB3	GET STACK BASE 
	ADR	A5,A6
	RB	DUON05
* 
	EJECT			DRDU01			DRDU01
* 
* 
*********************** 
*                     * 
*  INTERRUPT HANDLER  * 
*                     * 
*********************** 
* 
* 
IHDU	EQU	*
IHDU1	EQU	* 
IHDU2	EQU	* 
	ST	P,INTSAV	SAVE LAST INTERRUPT
* 
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8 ON STACK 
	XIF
* 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 ON STACK
	XIF
* 
	LDKL	A6,DWDU01	DISC UNIT NO. 1 
* 
	EJECT			DRDU01 
* 
* 
IHDU10	SST	A1,CUADR	GET STATUS
IHDU20	ANKL	A1,/460F	MASK RETURN CODE 
	SLL	A1,1 
	RB(N)	DUREDY	READY INTERRUPT 
	SRL	A1,1 
	LDR	A2,A1
	ANKL	A2,/200	SEEK ERROR
	RF(Z)	IHDU30 
	ANKL	A1,/440F	MOVE SEEK ERROR BIT
	ORK	A1,/02 
IHDU30	EQU	*
	LD	A8,DWTECB,A6	ECB ADDRESS
	LD	A2,DWTSAV,A6
	RF(NN)	GET 
	LDR	A3,A1
	ANK	A3,1 
	RF(NZ)	END:IO	DISC UNIT NOT OPERABLE 
* 
GET	LD	A5,DWTA5,A6	RELOAD REGISTERS A5
	LD	A4,DWTA4,A6	                 A4 
	LD	A7,DWTA2,A6	GET SECTOR COUNTER
	RTN	A5 
* 
	EJECT			DRDU01			DRDU01
* 
* 
******************* 
*                 * 
*  PERFORM ENDIO  * 
*                 * 
******************* 
* 
* 
END:30	EQU	*	CU ADDRESS UNKNOWN 
	LDK	A1,1	NOT OPERABLE
	ST	A1,DWTST,A6	INDICATE RECOVERY DONE
	RF	END:IO
END:10	EQU	*
* 
	IFT	RAW=1
	LD*	A7,DWTSB3-2,A6	GET 1ST RETURN ADDRESS
	SLL	A7,1 
	RF(N)	END:20	READ AFTER WRITE
	LD	A7,DWTORD,A6
	ANK	A7,/FF	GET ORDER 
	SUK	A7,/15 
	RF(NZ)	END:20	NOT READ AFTER WRITE 
	CM	ECBEL,A8	RESET SECTORS DONE 
	XIF
* 
END:20	EQU	*
	LDKL	A2,/FF00
	ANS	A2,ECBEL,A8
	LD	A2,DWTRTY,A6	GET RETRY INDICATOR
	RF(Z)	END:IO	NO RETRIES DONE 
	ORKL	A1,/100	SET BIT 7 IN RETURN CODE
	EJECT		DRDU01
* 
* 
END:IO	EQU	*
	CF	A15,TENDIO	PERFORM ENDIO
 	ABL	TDISP	GO TO DISPATCHER
* 
	EJECT			DRDU01 
* 
* 
VO:NAM	EQU	*
 	CF	A5,SEEKZ	SEEK SECTOR 0 
	ANK	A1,1 
	RF(NZ)	VO:NA8	SEEK-,THROUGHPUT ERROR,NOT OPERABLE
	CMR	A6	SECTOR 0
	IFT	NUNITS=2 
	CF	A5,INXUNI 
	CM	DWTCYL,A2	CYLINDER 0
	XIF
	IFT	NUNITS=1 
	CM	DWTCYL,A6 
	XIF
	LDK	A3,0	SECTOR 0
* 
	IFT	VERSA3=1 
	IM	DWTFBU,A6	READ TO DRIVER BUFFER 
	CF	A5,READ 
	ANK	A1,3 
	CF	A5,BSELOD	UPDATE DRIVER BUFFER INDICATOR
	XIF
* 
	IFT	VERSA3=0 
	LDKL	A1,/8019	READ SECTOR ZERO 
	LDKL	A2,BUFFER	TO DRIVER BUFFER
	CF	A5,CIO:50 
	ANK	A1,3	ERROR ? 
	XIF
* 
	RF(NZ)	VO:NA8	THROUGHPUT ERROR,NOT OPERABLE
	LDKL	A2,BUFFER 
	LDK	A3,/F0	FILE CODE 
	LD	A1,DWTSAV,A6
	RF(Z)	VO:NA6 
	LDKL	A3,/80F0	INDICATE TEST STATUS 
VO:NA6	EQU	*
	CF	A15,VOLGET	VOLUMR NAME TO DWT INDICATE NVL
	EJECT			DRDU01 
* 
* 
DUNA40	EQU	*
	LDK	A1,1 
	LDK	A7,1	TO INDICATE NOT TRANSFER PARAMETER ORDER
	LD	A2,BUFFER+32	CHECK IF TOSS DISC 
	CWK	A2,'TO'
	RF(NE)	DUNA70	NO TOSS
	LD	A2,BUFFER+40	CHECK IF RELEASE 10 OR GREATER 
	CWK	A2,/2031 
	RF(NE)	DUNA70	REL LESS THAN 10 
	LD	A2,BUFFER+48	GET FORMAT AND DEVICE TYPE PARAMETER 
TRANPA	EQU	*	LABEL FOR TRANSFER PARAMETER ORDER 
	CF	A15,INXDWT	GET INDEXED DWT ADDRESS
	ECR	A3,A2	SEPARATE THE PARAMETERS
	ANK	A3,/3
	ANK	A2,/3
	ST	A3,DWTFOR,A4	SAVE FORMAT PARAMETER
	LDKL	A1,6324	SECTORS ON VERSION A2 
	SUK	A3,2	FORMAT ?
	RF(Z)	DUNA60	VERSION A2
	RF(N)	DUNA50	VERSION A1
	ADK	A1,204	VERSION A3
DUNA50	EQU	*
	ADKL	A1,9588-6324
DUNA60	EQU	*
	SUK	A2,1 
	RF(Z)	DUNA70	PTS 6875
	ADR	A1,A1	PTS 6876 2*MAXSEC ON PTS 6875
DUNA70	EQU	*
	ST	A1,DWTSMX,A4	MAX SECTOR NO IN DWT 
	LDK	A1,0	RESET RETURN CODE FOR TRANSFER PARAM. 
	ADK	A7,0	CHECK IF TRANSFER PARAMETER 
	RB(Z)	END:20 
* 
	EJECT		DRDU01
* 
* 
	LD	A4,DWTA4,A6	RESTORE RETRY COUNTER 
	LC	A1,DWTOR,A6 
	ADK	A1,1 
	SC	A1,DWTOR,A6 
	ANK	A1,1 
	RB(NZ)	VO:NAM
	RF	VO:NA9
VO:NA8	EQU	*
	LDK	A1,1	ERROR CODE
VO:NA9	EQU	*
	RTN	A5 
* 
*   TIMER POINTER 
* 
TIMER	DATA	0	TIMER POINTER
* 
	EJECT			DRDU01			DRDU01
* 
* 
************************************* 
*                                   * 
*   DEVICE WORK TABLE               * 
*                                   * 
************************************* 
* 
* 
DWDU01	EQU	*
	DATA	0	PHYSICAL SECTOR NUMBER
	DATA	/8000	DWT STATUS
	DATA	0	ECB ADDRESS 
	DATA	0	ORDER 
	DATA	DUADR	ACTIVATION ADDRESS
	DATA	0	TTAB ADDRESS
	DATA	0	WAIT/ACTIVATE INDICATOR 
	DATA	0	TERMINAL QUEUE
* 
	IFT	MMUPAG=1 
	DATA	0	SAVE AREA USER ECB ADDRESS
	DATA	ECBDU1	MMU ECB ADDRESS
	XIF
* 
DWTFSW	EQU	*-DWDU01 
	DATA	0 
	DATA	0,0,0	SAVE AREA FOR REGISTERS 
DWTBSE	EQU	*-DWDU01 
	DATA	0 
DWTUBU	EQU	*-DWDU01	USER BUFFER POINTER 
	DATA	0 
DWTSWD	EQU	*-DWDU01 
	DATA	0 
* 
	EJECT		DRDU01
* 
* 
DWTRTY	EQU	*-DWDU01 
	DATA	0 
	DATA	0 
	DATA	/C000	FIXED 
	DATA	/8000	NEW VOLUME LOADED INDICATOR CARTR. 1
	DATA	/C000	FIXED 
	DATA	/8000	NEW VOLUME LOADED IND. CARTR. 2 
	DATA	/FFFF,/FFFF,/FFFF	VOLUME NAME 1ST FIXED 
	DATA	/FFFF,/FFFF,/FFFF	VOLUME NAME 1ST CARTRIDGE 
* 
	IFT	NUNITS=2 
	DATA	/FFFF,/FFFF,/FFFF	VOLUME NAME 2ND FIXED 
	DATA	/FFFF,/FFFF,/FFFF	VOLUME NAME 2ND CARTRIDGE 
	XIF
* 
	EJECT		DRDU01
* 
* 
DWTSAV	EQU	*-DWDU01 
	DATA	-1
DWTFBU	EQU	*-DWDU01	FLAG INDICATING IO TO DRIVER BUF
	DATA	0 
DWTCIO	EQU	*-DWDU01	CIO-START 
	CIO	A3,1,DAF1
	CIO	A3,1,DAC1
* 
	IFT	NUNITS=2 
	CIO	A3,1,DAF2
	CIO	A3,1,DAC2
	XIF
* 
DWTCYL	EQU	*-DWDU01 
	DATA	/FFFF	CYLINDER NUMBER 
* 
	IFT	NUNITS=2 
	DATA	/FFFF	2ND UNIT
	XIF
* 
DWTSMX	EQU	*-DWDU01 
	DATA	1	MAX SECTORS ON FIXED DISC 
	DATA	1	MAX SECTORS ON CARTRIDGE
* 
	IFT	NUNITS=2 
	DATA	1	2ND UNIT
	DATA	1	2ND UNIT
	XIF
* 
DWTFOR	EQU	*-DWDU01 
	DATA	0	DISC FORMAT ON FIXED
	DATA	0	DISC FORMAT CARTRIDGE 
* 
	IFT	NUNITS=2 
	DATA	0 
	DATA	0 
	XIF
* 
	DATA	0,0	STACK 
	DATA	0,0	STACK 
	DATA	0,0 
DWTSB3	EQU	*-DWDU01-2 
* 
	IFT	RAW=1
DWTSEP	EQU	*-DWDU01 
	DATA	0 
DWTSEI	EQU	*-DWDU01 
	DATA	0 
	XIF
* 
	IFT	MMUPAG=1 
ECBDU1	EQU	*
	DATA	0,0,0,0,0,0,0 
DWTBA1	EQU	*-DWDU01 
	DATA	0 
DWTBA2	EQU	*-DWDU01 
	DATA	0 
DWTPAG	EQU	*-DWDU01	MMU PAGE
	DATA	0 
	DATA	0 
	XIF
* 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDU01  REL 10.0 80-03-14 870105041000 «, 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…008c               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0056}
0x008c…0096               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0090}
0x0096…00be               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x009a}
0x00be…00c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00fa               Head {h00=0x002e, h01=0x0050, text=»*   DRDU01 = DRIVER FOR ONE/TWO DISC UNITS«, t00=0x0000, t01=0x00cc}
0x00fa…0104               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fe}
0x0104…0138               Head {h00=0x0030, h01=0x0050, text=»*   PTS 6875 (X1215) AND/OR PTS 6876 (X1216)«, t00=0x0000, t01=0x0108}
0x0138…0142               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013c}
0x0142…014c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0146}
0x014c…0156               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0150}
0x0156…0160               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015a}
0x0160…016a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…01a4               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x016e}
0x01a4…01ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0018}
0x01ae…01b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0022}
0x01b8…01ec               Head {h00=0x0030, h01=0x0050, text=»*   THIS DISC DRIVER HANDLES UP TO TWO DISC «, t00=0x0001, t01=0x002c}
0x01ec…0224               Head {h00=0x0034, h01=0x0050, text=»*   DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP «, t00=0x0001, t01=0x0060}
0x0224…0244               Head {h00=0x001c, h01=0x0050, text=»*   ON MULTIPLEX CHANNEL«, t00=0x0001, t01=0x0098}
0x0244…024e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b8}
0x024e…0258               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c2}
0x0258…0286               Head {h00=0x002a, h01=0x0050, text=»*   THE FOLLOWING ORDERS ARE TREATED :«, t00=0x0001, t01=0x00cc}
0x0286…0290               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…02ae               Head {h00=0x001a, h01=0x0050, text=»*   /00    TEST STATUS«, t00=0x0001, t01=0x0104}
0x02ae…02cc               Head {h00=0x001a, h01=0x0050, text=»*   /01    BASIC READ «, t00=0x0001, t01=0x0122}
0x02cc…02ea               Head {h00=0x001a, h01=0x0050, text=»*   /05    BASIC WRITE«, t00=0x0001, t01=0x0140}
0x02ea…030a               Head {h00=0x001c, h01=0x0050, text=»*   /11    PHYSICAL READ«, t00=0x0001, t01=0x015e}
0x030a…032c               Head {h00=0x001e, h01=0x0050, text=»*   /15    PHYSICAL WRITE «, t00=0x0001, t01=0x017e}
0x032c…034c               Head {h00=0x001c, h01=0x0050, text=»*   /1F    FORMAT VOLUME«, t00=0x0002, t01=0x0010}
0x034c…0356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0030}
0x0356…0376               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0002, t01=0x003a}
0x0376…0380               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…038a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0064}
0x038a…039e               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x006e}
0x039e…03b2               Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0002, t01=0x0082}
0x03b2…03c6               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0002, t01=0x0096}
0x03c6…03d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00aa}
0x03d0…03da               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b4}
0x03da…0402               Head {h00=0x0024, h01=0x0050, text=» ENTRY DUADR ACTIVATION ADDRESS «, t00=0x0002, t01=0x00be}
0x0402…0426               Head {h00=0x0020, h01=0x0050, text=» ENTRY DUON RECOVERY ROUTINE«, t00=0x0002, t01=0x00e6}
0x0426…045c               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1«, t00=0x0002, t01=0x010a}
0x045c…0492               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU INTERRUPT HANDLER DISC UNIT NO. 1 «, t00=0x0002, t01=0x0140}
0x0492…04c8               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU2 INTERRUPT HANDLER DISC UNIT NO. 2«, t00=0x0002, t01=0x0176}
0x04c8…04fa               Head {h00=0x002e, h01=0x0050, text=» ENTRY DWDU01 DWT ADDRESS DISC UNIT NO. 1 «, t00=0x0003, t01=0x001c}
0x04fa…0512               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0003, t01=0x004e}
0x0512…051c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0066}
0x051c…0526               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0070}
0x0526…053c               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x007a}
0x053c…0552               Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0090}
0x0552…0568               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x00a6}
0x0568…0572               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…057c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c6}
0x057c…059c               Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0003, t01=0x00d0}
0x059c…05ba               Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0003, t01=0x00f0}
0x05ba…05ec               Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK«, t00=0x0003, t01=0x010e}
0x05ec…061c               Head {h00=0x002c, h01=0x0050, text=» EXTRN NVLCHK CHECK IF NEW VOLUME LOADED«, t00=0x0003, t01=0x0140}
0x061c…0650               Head {h00=0x0030, h01=0x0050, text=» EXTRN VOLGET PUT VOLUME NAME IN DWT SET NVL«, t00=0x0003, t01=0x0170}
0x0650…068a               Head {h00=0x0036, h01=0x0050, text=» EXTRN VOLNAM VOLUME NAME FROM DWT TO USER BUFFER «, t00=0x0004, t01=0x0014}
0x068a…06ba               Head {h00=0x002c, h01=0x0050, text=» EXTRN VOLCLR CLEAR VOLUME NAMES IN DWT «, t00=0x0004, t01=0x004e}
0x06ba…06ec               Head {h00=0x002e, h01=0x0050, text=» EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS «, t00=0x0004, t01=0x007e}
0x06ec…0710               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0004, t01=0x00b0}
0x0710…073a               Head {h00=0x0026, h01=0x0050, text=» EXTRN INIFLG INITIALIZATION FLAG «, t00=0x0004, t01=0x00d4}
0x073a…0768               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST PWF POST PROCESSING FLAG«, t00=0x0004, t01=0x00fe}
0x0768…0796               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x012c}
0x0796…07b2               Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0004, t01=0x015a}
0x07b2…07c8               Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:MT «, t00=0x0004, t01=0x0176}
0x07c8…07e4               Head {h00=0x0018, h01=0x0013, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x018c}
0x07e4…0806               Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0005, t01=0x0018}
0x0806…082e               Head {h00=0x0024, h01=0x0020, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0005, t01=0x003a}
0x082e…0850               Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA2 SAVE AREA A2 «, t00=0x0005, t01=0x0062}
0x0850…0872               Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0005, t01=0x0084}
0x0872…0894               Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0005, t01=0x00a6}
0x0894…08be               Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0005, t01=0x00c8}
0x08be…08e8               Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0005, t01=0x00f2}
0x08e8…090e               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB ADDRESS«, t00=0x0005, t01=0x011c}
0x090e…0938               Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTORD SAVE AREA FOR ORDER «, t00=0x0005, t01=0x0142}
0x0938…096a               Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTNVL NEM VOLUME LOADED INDICATORS«, t00=0x0005, t01=0x016c}
0x096a…098c               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAMES«, t00=0x0006, t01=0x000e}
0x098c…09ae               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0006, t01=0x0030}
0x09ae…09d6               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0006, t01=0x0052}
0x09d6…0a00               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0006, t01=0x007a}
0x0a00…0a2a               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0006, t01=0x00a4}
0x0a2a…0a4e               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0006, t01=0x00ce}
0x0a4e…0a7a               Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW1 ECB 1:ST CONTROL WORD «, t00=0x0006, t01=0x00f2}
0x0a7a…0aa6               Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW2 ECB 2:ND CONTROL WORD «, t00=0x0006, t01=0x011e}
0x0aa6…0abe               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0006, t01=0x014a}
0x0abe…0ac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0x0ac8…0ad2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0x0ad2…0af4               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0006, t01=0x0176}
0x0af4…0b16               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0007, t01=0x0008}
0x0b16…0b38               Head {h00=0x001e, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY  *«, t00=0x0007, t01=0x002a}
0x0b38…0b5a               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0007, t01=0x004c}
0x0b5a…0b7c               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0007, t01=0x006e}
0x0b7c…0b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0090}
0x0b86…0b90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0x0b90…0bca               Head {h00=0x0036, h01=0x0050, text=»*   READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15«, t00=0x0007, t01=0x00a4}
0x0bca…0be8               Head {h00=0x001a, h01=0x0050, text=»*   BY SETTING X:A = 0«, t00=0x0007, t01=0x00de}
0x0be8…0bf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fc}
0x0bf2…0c04               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0007, t01=0x0106}
0x0c04…0c18               Head {h00=0x0010, h01=0x0050, text=»RAW EQU X:A «, t00=0x0007, t01=0x0118}
0x0c18…0c22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x012c}
0x0c22…0c2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0136}
0x0c2c…0c5e               Head {h00=0x002e, h01=0x0050, text=»*   THIS DRIVER CAN HANDLE TWO DISC UNITS «, t00=0x0007, t01=0x0140}
0x0c5e…0c76               Head {h00=0x0014, h01=0x0050, text=»*   IF X:B := 2 «, t00=0x0007, t01=0x0172}
0x0c76…0c80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x018a}
0x0c80…0c92 (8, 0, 400)   Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0008, t01=0x0004}
0x0c92…0ca8               Head {h00=0x0012, h01=0x0050, text=»NUNITS EQU X:B«, t00=0x0008, t01=0x0016}
0x0ca8…0cb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002c}
0x0cb2…0cbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cbc…0cee               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0008, t01=0x0040}
0x0cee…0d1c               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0008, t01=0x0072}
0x0d1c…0d26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00a0}
0x0d26…0d3a               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0008, t01=0x00aa}
0x0d3a…0d44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00be}
0x0d44…0d4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c8}
0x0d4e…0d88               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0008, t01=0x00d2}
0x0d88…0dba               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0008, t01=0x010c}
0x0dba…0dc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x013e}
0x0dc4…0dd8               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0008, t01=0x0148}
0x0dd8…0de2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015c}
0x0de2…0df8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0008, t01=0x0166}
0x0df8…0e02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x017c}
0x0e02…0e0c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0186}
0x0e0c…0e44               Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING THE INSTRUCTION SET OF«, t00=0x0008, t01=0x0190}
0x0e44…0e7a               Head {h00=0x0032, h01=0x0050, text=»* CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 «, t00=0x0009, t01=0x0038}
0x0e7a…0e84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006e}
0x0e84…0e96               Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x0009, t01=0x0078}
0x0e96…0eac               Head {h00=0x0012, h01=0x0050, text=»CPU857 EQU X:E«, t00=0x0009, t01=0x008a}
0x0eac…0eb6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a0}
0x0eb6…0ec0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00aa}
0x0ec0…0ee4               Head {h00=0x0020, h01=0x0050, text=»* PROGRAM VERSION FOR FORMAT«, t00=0x0009, t01=0x00b4}
0x0ee4…0f14               Head {h00=0x002c, h01=0x0050, text=»* A2 IS OBTAINED BY SETTING VERSA2 EQU 1«, t00=0x0009, t01=0x00d8}
0x0f14…0f44               Head {h00=0x002c, h01=0x0050, text=»* A3 IS OBTAINED BY SETTING VERSA3 EQU 1«, t00=0x0009, t01=0x0108}
0x0f44…0f4e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0138}
0x0f4e…0f60               Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x0009, t01=0x0142}
0x0f60…0f76               Head {h00=0x0012, h01=0x0050, text=»VERSA2 EQU X:C«, t00=0x0009, t01=0x0154}
0x0f76…0f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x016a}
0x0f80…0f92               Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x0009, t01=0x0174}
0x0f92…0fa8               Head {h00=0x0012, h01=0x0050, text=»VERSA3 EQU X:D«, t00=0x0009, t01=0x0186}
0x0fa8…0fb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x000c}
0x0fb2…0fd2               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000a, t01=0x0016}
0x0fd2…0fdc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0036}
0x0fdc…0fe6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0040}
0x0fe6…0ffc               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x004a}
0x0ffc…1012               Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000a, t01=0x0060}
0x1012…1028               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0076}
0x1028…1032               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x008c}
0x1032…103c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0096}
0x103c…1070               Head {h00=0x0030, h01=0x0050, text=»DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1«, t00=0x000a, t01=0x00a0}
0x1070…10a8               Head {h00=0x0034, h01=0x0050, text=»DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1«, t00=0x000a, t01=0x00d4}
0x10a8…10dc               Head {h00=0x0030, h01=0x0050, text=»DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2«, t00=0x000a, t01=0x010c}
0x10dc…1114               Head {h00=0x0034, h01=0x0050, text=»DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2«, t00=0x000a, t01=0x0140}
0x1114…113c               Head {h00=0x0024, h01=0x0050, text=»WER1 EQU /10 MULTIPLEXOR ADDRESS«, t00=0x000a, t01=0x0178}
0x113c…1166               Head {h00=0x0026, h01=0x0050, text=»CUADR EQU /08 CONTROL UNIT ADDRESS«, t00=0x000b, t01=0x0010}
0x1166…1170               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003a}
0x1170…11ae               Head {h00=0x003a, h01=0x0050, text=»MAXSEC EQU 6528 MAX NO OF SECTORS ON UNPACKED PTS 6875«, t00=0x000b, t01=0x0044}
0x11ae…11de               Head {h00=0x002c, h01=0x0050, text=»SECLEN EQU 256 SECTOR LENGTH, CHARACTERS«, t00=0x000b, t01=0x0082}
0x11de…120c               Head {h00=0x002a, h01=0x0050, text=»PHSECL EQU 384 PHYSICAL SECTOR LENGTH «, t00=0x000b, t01=0x00b2}
0x120c…122e               Head {h00=0x001e, h01=0x0050, text=»QRETRY EQU 4 NO OF RETRIES«, t00=0x000b, t01=0x00e0}
0x122e…1250               Head {h00=0x001e, h01=0x0050, text=»TIME EQU 1000 1 MIN 40 SEC«, t00=0x000b, t01=0x0102}
0x1250…125a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0124}
0x125a…1270               Head {h00=0x0012, h01=0x0050, text=»DEVIND EQU 10 «, t00=0x000b, t01=0x012e}
0x1270…127a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0144}
0x127a…129a               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000b, t01=0x014e}
0x129a…12a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x016e}
0x12a4…12ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0178}
0x12ae…12d6               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x000b, t01=0x0182}
0x12d6…12fc               Head {h00=0x0022, h01=0x0050, text=» DATA DEVIND DISC DEVICE INDEX«, t00=0x000c, t01=0x001a}
0x12fc…1326               Head {h00=0x0026, h01=0x0050, text=»DUADR DATA DUAD ACTIVATION ADDRESS«, t00=0x000c, t01=0x0040}
0x1326…134c               Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000c, t01=0x006a}
0x134c…1356               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0090}
0x1356…136c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x000c, t01=0x009a}
0x136c…1382               Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 193«, t00=0x000c, t01=0x00b0}
0x1382…138e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00c6}
0x138e…1398               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d2}
0x1398…13ae               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x000c, t01=0x00dc}
0x13ae…13c4               Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 25 «, t00=0x000c, t01=0x00f2}
0x13c4…13ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0108}
0x13ce…13e0               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x000c, t01=0x0112}
0x13e0…13f0               Head {h00=0x000c, h01=0x0050, text=» RES 103«, t00=0x000c, t01=0x0124}
0x13f0…13fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0134}
0x13fc…1406               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0140}
0x1406…1426               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000c, t01=0x014a}
0x1426…1430               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016a}
0x1430…143a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0174}
0x143a…1454               Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000c, t01=0x017e}
0x1454…146e               Head {h00=0x0016, h01=0x0050, text=»*               * «, t00=0x000d, t01=0x0008}
0x146e…1488               Head {h00=0x0016, h01=0x0050, text=»*  ACTIVATION   * «, t00=0x000d, t01=0x0022}
0x1488…14a2               Head {h00=0x0016, h01=0x0050, text=»*               * «, t00=0x000d, t01=0x003c}
0x14a2…14bc               Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000d, t01=0x0056}
0x14bc…14c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0070}
0x14c6…14d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x007a}
0x14d0…14e2               Head {h00=0x000e, h01=0x0050, text=»DUAD EQU *«, t00=0x000d, t01=0x0084}
0x14e2…1508               Head {h00=0x0022, h01=0x0050, text=» CM DWTRTY,A6 RETRY INDICATOR «, t00=0x000d, t01=0x0096}
0x1508…153c               Head {h00=0x0030, h01=0x0050, text=» CM DWTFBU,A6 RESET DRIVER BUFFER INDICATOR «, t00=0x000d, t01=0x00bc}
0x153c…154e               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000d, t01=0x00f0}
0x154e…1570               Head {h00=0x001e, h01=0x0050, text=» LC A1,DWTOR,A6 GET INDEX «, t00=0x000d, t01=0x0102}
0x1570…1586               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x000d, t01=0x0124}
0x1586…1598               Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000d, t01=0x013a}
0x1598…15a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x014c}
0x15a4…15ba               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x000d, t01=0x0158}
0x15ba…15cc               Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x000d, t01=0x016e}
0x15cc…15d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0180}
0x15d8…15fc               Head {h00=0x0020, h01=0x0050, text=» RF(P) DUERR FAULT IN INDEX «, t00=0x000d, t01=0x018c}
0x15fc…1606               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0020}
0x1606…161a               Head {h00=0x0010, h01=0x0050, text=»DUA:00 EQU *«, t00=0x000e, t01=0x002a}
0x161a…1624               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003e}
0x1624…163a               Head {h00=0x0012, h01=0x0050, text=» LDK A5,DWTSB3«, t00=0x000e, t01=0x0048}
0x163a…165c               Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 LOAD STACK BASE«, t00=0x000e, t01=0x005e}
0x165c…1672               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x0080}
0x1672…169e               Head {h00=0x0028, h01=0x0050, text=» MLR 2,A8 GET 18 BIT BUFFER ADDRESS «, t00=0x000e, t01=0x0096}
0x169e…16c0               Head {h00=0x001e, h01=0x0050, text=» SLC A1,4 MOST SIGN. BITS «, t00=0x000e, t01=0x00c2}
0x16c0…16d2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x000e, t01=0x00e4}
0x16d2…16f2               Head {h00=0x001c, h01=0x0050, text=» SRL A2,1 WORD ADDDRESS «, t00=0x000e, t01=0x00f6}
0x16f2…171c               Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x000e, t01=0x0116}
0x171c…1728               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0140}
0x1728…1732               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x014c}
0x1732…1764               Head {h00=0x002e, h01=0x0050, text=» CF A15,NVLCHK CHECK IF NEW VOLUME LOADED «, t00=0x000e, t01=0x0156}
0x1764…1784               Head {h00=0x001c, h01=0x0050, text=»*   SAVE INDEX AND ORDER«, t00=0x000e, t01=0x0188}
0x1784…179c               Head {h00=0x0014, h01=0x0050, text=» ADK A7,0 SET CR«, t00=0x000f, t01=0x0018}
0x179c…17c8               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DUA:05 NOT TEST STATUS ORDER«, t00=0x000f, t01=0x0030}
0x17c8…17d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x005c}
0x17d2…17e8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x000f, t01=0x0066}
0x17e8…17f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x007c}
0x17f2…17fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0086}
0x17fc…181a               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000f, t01=0x0090}
0x181a…1838               Head {h00=0x001a, h01=0x0050, text=»*                   * «, t00=0x000f, t01=0x00ae}
0x1838…1856               Head {h00=0x001a, h01=0x0050, text=»*   TEST STATUS     * «, t00=0x000f, t01=0x00cc}
0x1856…1874               Head {h00=0x001a, h01=0x0050, text=»*                   * «, t00=0x000f, t01=0x00ea}
0x1874…1892               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000f, t01=0x0108}
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…18c6               Head {h00=0x001c, h01=0x0050, text=» ORS A1,ECBRC,A8 NVL BIT«, t00=0x000f, t01=0x013a}
0x18c6…18dc               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/200 «, t00=0x000f, t01=0x015a}
0x18dc…1914               Head {h00=0x0034, h01=0x0050, text=» ANS A2,DWTOR,A6 VO:NAM ON FIRST OR SECOND UNIT «, t00=0x000f, t01=0x0170}
0x1914…1926               Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0010, t01=0x0018}
0x1926…1954               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS «, t00=0x0010, t01=0x002a}
0x1954…197a               Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0010, t01=0x0058}
0x197a…198c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x0010, t01=0x007e}
0x198c…19b0               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TESEND NOT OPERABLE «, t00=0x0010, t01=0x0090}
0x19b0…19e0               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTORD,A6 RESTORE INDEX AND ORDER«, t00=0x0010, t01=0x00b4}
0x19e0…19f8               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTOR,A6 «, t00=0x0010, t01=0x00e4}
0x19f8…1a1c               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0010, t01=0x00fc}
0x1a1c…1a56               Head {h00=0x0036, h01=0x0050, text=» CF A15,VOLNAM TRANSFER VOLUME NAME TO USER BUFFER«, t00=0x0010, t01=0x0120}
0x1a56…1a7a               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0010, t01=0x015a}
0x1a7a…1a8e               Head {h00=0x0010, h01=0x0050, text=»TESEND EQU *«, t00=0x0010, t01=0x017e}
0x1a8e…1aa2 (17, 0, 400)  Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0011, t01=0x0004}
0x1aa2…1ad4               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS DONE«, t00=0x0011, t01=0x0018}
0x1ad4…1af6               Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM ENDIO «, t00=0x0011, t01=0x004a}
0x1af6…1b00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x006c}
0x1b00…1b18               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0011, t01=0x0076}
0x1b18…1b22               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008e}
0x1b22…1b52               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0011, t01=0x0098}
0x1b52…1b82               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x0011, t01=0x00c8}
0x1b82…1bb2               Head {h00=0x002c, h01=0x0050, text=»*   NEW VOLUME LOADED CHECK           * «, t00=0x0011, t01=0x00f8}
0x1bb2…1be2               Head {h00=0x002c, h01=0x0050, text=»*   ORDER CODE CHECK                  * «, t00=0x0011, t01=0x0128}
0x1be2…1c12               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x0011, t01=0x0158}
0x1c12…1c42               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0011, t01=0x0188}
0x1c42…1c4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0028}
0x1c4c…1c7e               Head {h00=0x002e, h01=0x0050, text=»*   INPUT: A1=NVL RETURN CODE FROM NVLCHK «, t00=0x0012, t01=0x0032}
0x1c7e…1c9e               Head {h00=0x001c, h01=0x0050, text=»*          A7=ORDER CODE«, t00=0x0012, t01=0x0064}
0x1c9e…1ca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0084}
0x1ca8…1cb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x008e}
0x1cb2…1cc6               Head {h00=0x0010, h01=0x0050, text=»DUA:05 EQU *«, t00=0x0012, t01=0x0098}
0x1cc6…1cf2               Head {h00=0x0028, h01=0x0050, text=» ADK A1,0 CHECK IF NEW VOLUME LOADED«, t00=0x0012, t01=0x00ac}
0x1cf2…1d18               Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) END:IO PERFORM TENDIO«, t00=0x0012, t01=0x00d8}
0x1d18…1d2a               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0012, t01=0x00fe}
0x1d2a…1d4a               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:10 BASIC READ«, t00=0x0012, t01=0x0110}
0x1d4a…1d5c               Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0012, t01=0x0130}
0x1d5c…1d7e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUA:10 BASIC WRITE «, t00=0x0012, t01=0x0142}
0x1d7e…1d92               Head {h00=0x0010, h01=0x0050, text=» SUK A7,12  «, t00=0x0012, t01=0x0164}
0x1d92…1db6               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL READ «, t00=0x0012, t01=0x0178}
0x1db6…1dc8               Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0013, t01=0x000c}
0x1dc8…1dec               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL WRITE«, t00=0x0013, t01=0x001e}
0x1dec…1dfe               Head {h00=0x000e, h01=0x0050, text=» SUK A7,10«, t00=0x0013, t01=0x0042}
0x1dfe…1e22               Head {h00=0x0020, h01=0x0050, text=» RF(Z) FORMAT FORMAT VOLUME «, t00=0x0013, t01=0x0054}
0x1e22…1e2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0078}
0x1e2c…1e52               Head {h00=0x0022, h01=0x0050, text=»DUERR ABL DISIOE REQUEST ERROR«, t00=0x0013, t01=0x0082}
0x1e52…1e5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00a8}
0x1e5c…1e88               Head {h00=0x0028, h01=0x0050, text=»INCLEN EQU * REQUESTED LENGTH ERROR «, t00=0x0013, t01=0x00b2}
0x1e88…1e9e               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8008«, t00=0x0013, t01=0x00de}
0x1e9e…1eb2               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0013, t01=0x00f4}
0x1eb2…1ec8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0013, t01=0x0108}
0x1ec8…1ed2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x011e}
0x1ed2…1edc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0128}
0x1edc…1efe               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0013, t01=0x0132}
0x1efe…1f20               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0013, t01=0x0154}
0x1f20…1f44               Head {h00=0x0020, h01=0x0050, text=»*   FORMAT VOLUME         * «, t00=0x0013, t01=0x0176}
0x1f44…1f66               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0014, t01=0x000a}
0x1f66…1f88               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0014, t01=0x002c}
0x1f88…1f92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x004e}
0x1f92…1f9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0058}
0x1f9c…1fb0               Head {h00=0x0010, h01=0x0050, text=»FORMAT EQU *«, t00=0x0014, t01=0x0062}
0x1fb0…1fe4               Head {h00=0x0030, h01=0x0050, text=» LDK A7,204 NUMBER OF CYLINDERS ON PTS 6875 «, t00=0x0014, t01=0x0076}
0x1fe4…200a               Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DISC TYPE«, t00=0x0014, t01=0x00aa}
0x200a…2026               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0014, t01=0x00d0}
0x2026…2038               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x0014, t01=0x00ec}
0x2038…2044               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x00fe}
0x2044…2056               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0014, t01=0x010a}
0x2056…2076               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM03 PTS 6875 «, t00=0x0014, t01=0x011c}
0x2076…2092               Head {h00=0x0018, h01=0x0050, text=» ADK A7,204 PTS 6876«, t00=0x0014, t01=0x013c}
0x2092…20a6               Head {h00=0x0010, h01=0x0050, text=»FORM03 EQU *«, t00=0x0014, t01=0x0158}
0x20a6…20b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x016c}
0x20b0…20cc               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0014, t01=0x0176}
0x20cc…20e4 (21, 0, 400)  Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0015, t01=0x0004}
0x20e4…210a               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C001 WRITE ONE WORD «, t00=0x0015, t01=0x001c}
0x210a…211c               Head {h00=0x000e, h01=0x0050, text=» ANK A2,3 «, t00=0x0015, t01=0x0042}
0x211c…212e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,3 «, t00=0x0015, t01=0x0054}
0x212e…214e               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM05 A1 OR A2 «, t00=0x0015, t01=0x0066}
0x214e…2174               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C0C1 WRITE 386 BYTES«, t00=0x0015, t01=0x0086}
0x2174…218c               Head {h00=0x0014, h01=0x0050, text=» ADKL A3,PHSECL «, t00=0x0015, t01=0x00ac}
0x218c…21a0               Head {h00=0x0010, h01=0x0050, text=»FORM05 EQU *«, t00=0x0015, t01=0x00c4}
0x21a0…21c6               Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTFBU,A6 SAVE 1ST WER «, t00=0x0015, t01=0x00d8}
0x21c6…21d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00fe}
0x21d2…21dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x010a}
0x21dc…21f2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0015, t01=0x0114}
0x21f2…2208               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0015, t01=0x012a}
0x2208…2220               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0015, t01=0x0140}
0x2220…222c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0158}
0x222c…2236               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0164}
0x2236…224c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0015, t01=0x016e}
0x224c…2262               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0015, t01=0x0184}
0x2262…2294               Head {h00=0x002e, h01=0x0050, text=» LDKL A3,BUFFER+PHSECL POSITION FOR CYL ID«, t00=0x0016, t01=0x000a}
0x2294…22a0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x003c}
0x22a0…22aa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0048}
0x22aa…22d2               Head {h00=0x0024, h01=0x0050, text=» STR A3,A6 DRIVER BUFFER POINTER«, t00=0x0016, t01=0x0052}
0x22d2…22e8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0016, t01=0x007a}
0x22e8…22fe               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0016, t01=0x0090}
0x22fe…2322               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0016, t01=0x00a6}
0x2322…232e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00ca}
0x232e…2344               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0016, t01=0x00d6}
0x2344…2368               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A6 CYLINDER ZERO «, t00=0x0016, t01=0x00ec}
0x2368…2374               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x0110}
0x2374…237e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x011c}
0x237e…2394               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0016, t01=0x0126}
0x2394…239e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x013c}
0x239e…23a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0146}
0x23a8…23bc               Head {h00=0x0010, h01=0x0050, text=»FORM20 EQU *«, t00=0x0016, t01=0x0150}
0x23bc…23d2               Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0016, t01=0x0164}
0x23d2…23e6               Head {h00=0x0010, h01=0x0050, text=»FORM30 EQU *«, t00=0x0016, t01=0x017a}
0x23e6…23fc               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0016, t01=0x018e}
0x23fc…2420               Head {h00=0x0020, h01=0x0050, text=» CF A5,INXUNI GET UNIT INDEX«, t00=0x0017, t01=0x0014}
0x2420…242c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0038}
0x242c…244e               Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEK SEEK CYLINDER «, t00=0x0017, t01=0x0044}
0x244e…2466               Head {h00=0x0014, h01=0x0050, text=» SLL A1,5 STATUS«, t00=0x0017, t01=0x0066}
0x2466…2488               Head {h00=0x001e, h01=0x0050, text=» RF(NN) FORM40 SEEK ERROR «, t00=0x0017, t01=0x007e}
0x2488…249e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0017, t01=0x00a0}
0x249e…24b4               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0017, t01=0x00b6}
0x24b4…24cc               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A2«, t00=0x0017, t01=0x00cc}
0x24cc…24d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00e4}
0x24d8…24ee               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0017, t01=0x00f0}
0x24ee…2506               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A6«, t00=0x0017, t01=0x0106}
0x2506…2512               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x011e}
0x2512…254a               Head {h00=0x0034, h01=0x0050, text=» ST* A1,0,A6 PREPARE DRIVER BUFFER WITH CYL. ID «, t00=0x0017, t01=0x012a}
0x254a…255c               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0017, t01=0x0162}
0x255c…2590               Head {h00=0x0030, h01=0x0050, text=» CF A5,SKEW WRITE SECTOR 0 ON EVEN CYLINDERS«, t00=0x0017, t01=0x0174}
0x2590…25bc               Head {h00=0x0028, h01=0x0050, text=»*   WRITE SECTOR 8 ON ODD CYLINDERS «, t00=0x0018, t01=0x0018}
0x25bc…25e0               Head {h00=0x0020, h01=0x0050, text=» ORK A3,1 ORDER CODE: WRITE «, t00=0x0018, t01=0x0044}
0x25e0…25ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0068}
0x25ea…2606               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0018, t01=0x0072}
0x2606…262a               Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTFBU,A6 GET 1ST WER«, t00=0x0018, t01=0x008e}
0x262a…2636               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00b2}
0x2636…2640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00be}
0x2640…2656               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0018, t01=0x00c8}
0x2656…266c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0018, t01=0x00de}
0x266c…2682               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C002«, t00=0x0018, t01=0x00f4}
0x2682…268e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x010a}
0x268e…2698               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0116}
0x2698…26ae               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0018, t01=0x0120}
0x26ae…26c4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0018, t01=0x0136}
0x26c4…26f2               Head {h00=0x002a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER WRITE 386 BYTES«, t00=0x0018, t01=0x014c}
0x26f2…26fe               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x017a}
0x26fe…2708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0186}
0x2708…2720               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0018, t01=0x0190}
0x2720…2744               Head {h00=0x0020, h01=0x0050, text=» CF A5,CIO:50 CIO:50 SECTOR «, t00=0x0019, t01=0x0018}
0x2744…2758               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x0019, t01=0x003c}
0x2758…277a               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) FORM40 WRITE ERROR«, t00=0x0019, t01=0x0050}
0x277a…2790               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0019, t01=0x0072}
0x2790…27a6               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0019, t01=0x0088}
0x27a6…27bc               Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A2 «, t00=0x0019, t01=0x009e}
0x27bc…27c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00b4}
0x27c8…27de               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0019, t01=0x00c0}
0x27de…27f4               Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A6 «, t00=0x0019, t01=0x00d6}
0x27f4…2800               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00ec}
0x2800…282c               Head {h00=0x0028, h01=0x0050, text=» SUK A7,1 DECREMENT CYLINDER COUNTER«, t00=0x0019, t01=0x00f8}
0x282c…2842               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) FORM20«, t00=0x0019, t01=0x0124}
0x2842…2876               Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET FORMAT AND TYPE OF DISC«, t00=0x0019, t01=0x013a}
0x2876…28a4               Head {h00=0x002a, h01=0x0050, text=» ABL TRANPA PUT FORMAT AND TYPE IN DWT«, t00=0x0019, t01=0x016e}
0x28a4…28b8               Head {h00=0x0010, h01=0x0050, text=»FORM40 EQU *«, t00=0x001a, t01=0x000c}
0x28b8…28dc               Head {h00=0x0020, h01=0x0050, text=» CF A5,SEEKZ SEEK CYLINDER 0«, t00=0x001a, t01=0x0020}
0x28dc…28ee               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x001a, t01=0x0044}
0x28ee…290e               Head {h00=0x001c, h01=0x0050, text=» RF(N) FORM50 SEEK ERROR«, t00=0x001a, t01=0x0056}
0x290e…292e               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x001a, t01=0x0076}
0x292e…294a               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) FORM30 RETRY«, t00=0x001a, t01=0x0096}
0x294a…295e               Head {h00=0x0010, h01=0x0050, text=»FORM50 EQU *«, t00=0x001a, t01=0x00b2}
0x295e…2986               Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 SEEK ERROR RETURN CODE«, t00=0x001a, t01=0x00c6}
0x2986…29a8               Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM END IO«, t00=0x001a, t01=0x00ee}
0x29a8…29c8               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x001a, t01=0x0110}
0x29c8…29d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0130}
0x29d2…29dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x013a}
0x29dc…2a16               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001a, t01=0x0144}
0x2a16…2a50               Head {h00=0x0036, h01=0x0050, text=»*                                               * «, t00=0x001a, t01=0x017e}
0x2a50…2a8a               Head {h00=0x0036, h01=0x0050, text=»*   CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * «, t00=0x001b, t01=0x0028}
0x2a8a…2ac4               Head {h00=0x0036, h01=0x0050, text=»*   AND SECTOR NUMBER                           * «, t00=0x001b, t01=0x0062}
0x2ac4…2afe               Head {h00=0x0036, h01=0x0050, text=»*   SAVE BUFFER ADDRESS AND SET SECTOR COUNTER  * «, t00=0x001b, t01=0x009c}
0x2afe…2b38               Head {h00=0x0036, h01=0x0050, text=»*                                               * «, t00=0x001b, t01=0x00d6}
0x2b38…2b72               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001b, t01=0x0110}
0x2b72…2b7c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x014a}
0x2b7c…2b92               Head {h00=0x0012, h01=0x0050, text=»*   INPUT: ECB«, t00=0x001b, t01=0x0154}
0x2b92…2bb8               Head {h00=0x0022, h01=0x0050, text=»*   OUTPUT: A7=SECTOR COUNTER «, t00=0x001b, t01=0x016a}
0x2bb8…2be6               Head {h00=0x002a, h01=0x0050, text=»*           DWTUBU=USER BUFFER POINTER«, t00=0x001b, t01=0x0190}
0x2be6…2bf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x002e}
0x2bf0…2bfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0038}
0x2bfa…2c0e               Head {h00=0x0010, h01=0x0050, text=»DUA:10 EQU *«, t00=0x001c, t01=0x0042}
0x2c0e…2c36               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x001c, t01=0x0056}
0x2c36…2c4c               Head {h00=0x0012, h01=0x0050, text=» RB(Z) INCLEN «, t00=0x001c, t01=0x007e}
0x2c4c…2c86               Head {h00=0x0036, h01=0x0050, text=» ECR A7,A3 DIVIDE BY 256 TO GET NUMBER OF SECTORS «, t00=0x001c, t01=0x0094}
0x2c86…2cb0               Head {h00=0x0026, h01=0x0050, text=» ANK A3,/FF SET CONDITION REGISTER«, t00=0x001c, t01=0x00ce}
0x2cb0…2ce8               Head {h00=0x0034, h01=0x0050, text=» RB(NZ) INCLEN NOT AN INTEGER NUMBER OF SECTORS «, t00=0x001c, t01=0x00f8}
0x2ce8…2d26               Head {h00=0x003a, h01=0x0050, text=» LD A3,ECBCW2,A8 SECTOR NUMBER WHERE THE BUFFER BEGIN «, t00=0x001c, t01=0x0130}
0x2d26…2d52               Head {h00=0x0028, h01=0x0050, text=» RB(N) DUERR INCORRECT SECTOR NUMBER«, t00=0x001c, t01=0x016e}
0x2d52…2d6a               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001d, t01=0x000a}
0x2d6a…2d98               Head {h00=0x002a, h01=0x0050, text=» RB(NL) DUERR INCORRECT SECTOR NUMBER «, t00=0x001d, t01=0x0022}
0x2d98…2daa               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x001d, t01=0x0050}
0x2daa…2dc2               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001d, t01=0x0062}
0x2dc2…2dee               Head {h00=0x0028, h01=0x0050, text=» RB(G) INCLEN SECTOR NUMBER OVERFLOW«, t00=0x001d, t01=0x007a}
0x2dee…2df8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00a6}
0x2df8…2e0e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001d, t01=0x00b0}
0x2e0e…2e26               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A8 «, t00=0x001d, t01=0x00c6}
0x2e26…2e52               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTUBU,A6 USER BUFFER POINTER«, t00=0x001d, t01=0x00de}
0x2e52…2e5e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001d, t01=0x010a}
0x2e5e…2e68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0116}
0x2e68…2e7e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x001d, t01=0x0120}
0x2e7e…2e88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0136}
0x2e88…2ea4               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x001d, t01=0x0140}
0x2ea4…2eae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x015c}
0x2eae…2eb8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0166}
0x2eb8…2ede               Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x001d, t01=0x0170}
0x2ede…2f04               Head {h00=0x0022, h01=0x0050, text=»*                            *«, t00=0x001e, t01=0x0008}
0x2f04…2f2a               Head {h00=0x0022, h01=0x0050, text=»*   DISC VERSION SEPARATION  *«, t00=0x001e, t01=0x002e}
0x2f2a…2f50               Head {h00=0x0022, h01=0x0050, text=»*                            *«, t00=0x001e, t01=0x0054}
0x2f50…2f76               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x001e, t01=0x007a}
0x2f76…2f80               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00a0}
0x2f80…2f8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00aa}
0x2f8a…2fa2               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFOR,A2«, t00=0x001e, t01=0x00b4}
0x2fa2…2fb4               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x001e, t01=0x00cc}
0x2fb4…2fd4               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:800 VERSION A2«, t00=0x001e, t01=0x00de}
0x2fd4…2fe0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00fe}
0x2fe0…2fea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x010a}
0x2fea…3000               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x001e, t01=0x0114}
0x3000…300a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x012a}
0x300a…3020               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x001e, t01=0x0134}
0x3020…302a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x014a}
0x302a…3058               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x001e, t01=0x0154}
0x3058…3086               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x001e, t01=0x0182}
0x3086…30b4               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x001f, t01=0x0020}
0x30b4…30e2               Head {h00=0x002a, h01=0x0050, text=»*   GET PHYSICAL SECTOR NUMBER BY   * «, t00=0x001f, t01=0x004e}
0x30e2…3110               Head {h00=0x002a, h01=0x0050, text=»*   DIVIDE BY 3                     * «, t00=0x001f, t01=0x007c}
0x3110…313e               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x001f, t01=0x00aa}
0x313e…316c               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x001f, t01=0x00d8}
0x316c…3176               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0106}
0x3176…318c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x001f, t01=0x0110}
0x318c…31b2               Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 PREPARE FOR DIVISION«, t00=0x001f, t01=0x0126}
0x31b2…31e4               Head {h00=0x002e, h01=0x0050, text=» LD A2,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x001f, t01=0x014c}
0x31e4…31f2               Head {h00=0x000a, h01=0x0050, text=» DVK 3«, t00=0x001f, t01=0x017e}
0x31f2…3222               Head {h00=0x002c, h01=0x0050, text=»*   A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x001f, t01=0x018c}
0x3222…3258               Head {h00=0x0032, h01=0x0050, text=»*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0020, t01=0x002c}
0x3258…3264               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0020, t01=0x0062}
0x3264…326e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x006e}
0x326e…3284               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0020, t01=0x0078}
0x3284…329a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0020, t01=0x008e}
0x329a…32b2               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW2,A8«, t00=0x0020, t01=0x00a4}
0x32b2…32d2               Head {h00=0x001c, h01=0x0050, text=» LDR A3,A1 SECTOR NUMBER«, t00=0x0020, t01=0x00bc}
0x32d2…32e4               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0020, t01=0x00dc}
0x32e4…32f8               Head {h00=0x0010, h01=0x0050, text=»DVK:00 EQU *«, t00=0x0020, t01=0x00ee}
0x32f8…3314               Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I:= I+I/4«, t00=0x0020, t01=0x0102}
0x3314…332e               Head {h00=0x0016, h01=0x0050, text=» SRL A3,2 I:= I/4 «, t00=0x0020, t01=0x011e}
0x332e…3344               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DVK:00«, t00=0x0020, t01=0x0138}
0x3344…335e               Head {h00=0x0016, h01=0x0050, text=» SRL A2,2 TRUNCATE«, t00=0x0020, t01=0x014e}
0x335e…3370               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0020, t01=0x0168}
0x3370…3382               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0020, t01=0x017a}
0x3382…33a4               Head {h00=0x001e, h01=0x0050, text=» SUR A1,A2 REST AFTER LOOP«, t00=0x0020, t01=0x018c}
0x33a4…33b6               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0021, t01=0x001e}
0x33b6…33ca               Head {h00=0x0010, h01=0x0050, text=»DVK:10 EQU *«, t00=0x0021, t01=0x0030}
0x33ca…33dc               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0021, t01=0x0044}
0x33dc…33fa               Head {h00=0x001a, h01=0x0050, text=» SUK A1,3 DIVIDE BY 3 «, t00=0x0021, t01=0x0056}
0x33fa…3410               Head {h00=0x0012, h01=0x0050, text=» RB(NN) DVK:10«, t00=0x0021, t01=0x0074}
0x3410…3426               Head {h00=0x0012, h01=0x0050, text=» ADK A1,3 REST«, t00=0x0021, t01=0x008a}
0x3426…3456               Head {h00=0x002c, h01=0x0050, text=»*   A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x0021, t01=0x00a0}
0x3456…348c               Head {h00=0x0032, h01=0x0050, text=»*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0021, t01=0x00d0}
0x348c…3496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0106}
0x3496…34ac               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0021, t01=0x0110}
0x34ac…34b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0126}
0x34b8…34c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0132}
0x34c2…34d8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0021, t01=0x013c}
0x34d8…34e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0152}
0x34e2…3510               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0021, t01=0x015c}
0x3510…353e               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0021, t01=0x018a}
0x353e…356c               Head {h00=0x002a, h01=0x0050, text=»*   SAVE PHYSICAL SECTOR NUMBER     * «, t00=0x0022, t01=0x0028}
0x356c…359a               Head {h00=0x002a, h01=0x0050, text=»*   AND SECTOR POSITION             * «, t00=0x0022, t01=0x0056}
0x359a…35c8               Head {h00=0x002a, h01=0x0050, text=»*   BRANCH ACCORDING TO SECTOR      * «, t00=0x0022, t01=0x0084}
0x35c8…35f6               Head {h00=0x002a, h01=0x0050, text=»*   POSITION                        * «, t00=0x0022, t01=0x00b2}
0x35f6…3624               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0022, t01=0x00e0}
0x3624…3652               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0022, t01=0x010e}
0x3652…365c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x013c}
0x365c…368c               Head {h00=0x002c, h01=0x0050, text=»*   INPUT: A1=SECTOR POSITION INDICATOR «, t00=0x0022, t01=0x0146}
0x368c…36bc               Head {h00=0x002c, h01=0x0050, text=»*          A2=LOGICAL SECTOR NUMBER / 3 «, t00=0x0022, t01=0x0176}
0x36bc…36c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0016}
0x36c6…36d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0020}
0x36d0…36e2               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x0023, t01=0x002a}
0x36e2…3710               Head {h00=0x002a, h01=0x0050, text=» STR A2,A6 SAVE PHYSICAL SECTOR NUMBER«, t00=0x0023, t01=0x003c}
0x3710…3722               Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0023, t01=0x006a}
0x3722…3734               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0023, t01=0x007c}
0x3734…3762               Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSEP,A6 SAVE SECTOR POSITION «, t00=0x0023, t01=0x008e}
0x3762…3798               Head {h00=0x0032, h01=0x0050, text=» ST A2,DWTSEI,A6 SAVE 1ST PHYS. SECTOR NUMBER «, t00=0x0023, t01=0x00bc}
0x3798…37a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x00f2}
0x37a4…37ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00fe}
0x37ae…37c4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0023, t01=0x0108}
0x37c4…37e8               Head {h00=0x0020, h01=0x001b, text=»*   LOGICAL SECTOR POSITION «, t00=0x0023, t01=0x011e}
0x37e8…380e               Head {h00=0x0022, h01=0x0050, text=» RF(N) RW:300 ,XXXX  ,      , «, t00=0x0023, t01=0x0142}
0x380e…3834               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RW:200 ,    XX,XX    , «, t00=0x0023, t01=0x0168}
0x3834…3850               Head {h00=0x0018, h01=0x0013, text=»*   ,      ,  XXXX, «, t00=0x0023, t01=0x018e}
0x3850…385a               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x001a}
0x385a…3870               Head {h00=0x0012, h01=0x000e, text=» EJECT  DRDU01«, t00=0x0024, t01=0x0024}
0x3870…387a               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x003a}
0x387a…38a8               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0024, t01=0x0044}
0x38a8…38d6               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0024, t01=0x0072}
0x38d6…3904               Head {h00=0x002a, h01=0x0050, text=»*   READ/WRITE FROM SECTOR IN       * «, t00=0x0024, t01=0x00a0}
0x3904…3932               Head {h00=0x002a, h01=0x0050, text=»*   POSITION ,      ,  xxxx,        * «, t00=0x0024, t01=0x00ce}
0x3932…3960               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0024, t01=0x00fc}
0x3960…398e               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0024, t01=0x012a}
0x398e…3998               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0024, t01=0x0158}
0x3998…39c4               Head {h00=0x0028, h01=0x0050, text=» IMR A6 LOG. SECTOR IN NEXT PHYSICAL«, t00=0x0024, t01=0x0162}
0x39c4…39d6               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0024, t01=0x018e}
0x39d6…3a06               Head {h00=0x002c, h01=0x0050, text=» IM DWTSEI,A6 SAVE FOR READ AFTER WRITE «, t00=0x0025, t01=0x0010}
0x3a06…3a12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0025, t01=0x0040}
0x3a12…3a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x004c}
0x3a1c…3a32               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0025, t01=0x0056}
0x3a32…3a48               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0025, t01=0x006c}
0x3a48…3a5c               Head {h00=0x0010, h01=0x0050, text=» DATA /0084 «, t00=0x0025, t01=0x0082}
0x3a5c…3a6e               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0025, t01=0x0096}
0x3a6e…3a80               Head {h00=0x000e, h01=0x0050, text=» RF RW:300«, t00=0x0025, t01=0x00a8}
0x3a80…3a8a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ba}
0x3a8a…3aa0               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0025, t01=0x00c4}
0x3aa0…3aaa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00da}
0x3aaa…3ad8               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0025, t01=0x00e4}
0x3ad8…3b06               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0025, t01=0x0112}
0x3b06…3b34               Head {h00=0x002a, h01=0x0050, text=»*   READ/WRITE FROM SECTOR IN       * «, t00=0x0025, t01=0x0140}
0x3b34…3b62               Head {h00=0x002a, h01=0x0050, text=»*   POSITION ,    xx,               * «, t00=0x0025, t01=0x016e}
0x3b62…3b90               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0026, t01=0x000c}
0x3b90…3bbe               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0026, t01=0x003a}
0x3bbe…3bc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0068}
0x3bc8…3bd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0072}
0x3bd2…3be6               Head {h00=0x0010, h01=0x0050, text=»RW:200 EQU *«, t00=0x0026, t01=0x007c}
0x3be6…3bfc               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0026, t01=0x0090}
0x3bfc…3c10               Head {h00=0x0010, h01=0x0050, text=» DATA /0048 «, t00=0x0026, t01=0x00a6}
0x3c10…3c34               Head {h00=0x0020, h01=0x0050, text=» SUK A7,2 NUMBER OF SECTORS «, t00=0x0026, t01=0x00ba}
0x3c34…3c58               Head {h00=0x0020, h01=0x0050, text=» RF(N) RW:230 1 SECTOR IN IO«, t00=0x0026, t01=0x00de}
0x3c58…3c80               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RW:260 >2 SECTORS IN IO «, t00=0x0026, t01=0x0102}
0x3c80…3c9c               Head {h00=0x0018, h01=0x0050, text=»*   ,    XX,XXXXXX, «, t00=0x0026, t01=0x012a}
0x3c9c…3cb2               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0026, t01=0x0146}
0x3cb2…3cc6               Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x0026, t01=0x015c}
0x3cc6…3cd8               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0026, t01=0x0170}
0x3cd8…3cfc               Head {h00=0x0020, h01=0x0050, text=»RW:230 EQU * ,    XX,XX    ,«, t00=0x0026, t01=0x0182}
0x3cfc…3d12               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0016}
0x3d12…3d26               Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x0027, t01=0x002c}
0x3d26…3d38               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0027, t01=0x0040}
0x3d38…3d5c               Head {h00=0x0020, h01=0x0050, text=»RW:260 EQU * ,    XX,XXXXXX,«, t00=0x0027, t01=0x0052}
0x3d5c…3d72               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0076}
0x3d72…3d86               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0027, t01=0x008c}
0x3d86…3d90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a0}
0x3d90…3da6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0027, t01=0x00aa}
0x3da6…3db0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c0}
0x3db0…3ddc               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0027, t01=0x00ca}
0x3ddc…3e08               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0027, t01=0x00f6}
0x3e08…3e34               Head {h00=0x0028, h01=0x0050, text=»*   DIRECT READ/WRITE AS LONG      *«, t00=0x0027, t01=0x0122}
0x3e34…3e60               Head {h00=0x0028, h01=0x0050, text=»*   AS POSIBLE                     *«, t00=0x0027, t01=0x014e}
0x3e60…3e8c               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0027, t01=0x017a}
0x3e8c…3eb8               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x0016}
0x3eb8…3ec2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0042}
0x3ec2…3ecc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x004c}
0x3ecc…3ee0               Head {h00=0x0010, h01=0x0050, text=»RW:300 EQU *«, t00=0x0028, t01=0x0056}
0x3ee0…3f00               Head {h00=0x001c, h01=0x0050, text=» SUK A7,3 SECTOR COUNTER«, t00=0x0028, t01=0x006a}
0x3f00…3f34               Head {h00=0x0030, h01=0x0050, text=» RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO «, t00=0x0028, t01=0x008a}
0x3f34…3f4a               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0028, t01=0x00be}
0x3f4a…3f5e               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0028, t01=0x00d4}
0x3f5e…3f74               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0028, t01=0x00e8}
0x3f74…3f88               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0028, t01=0x00fe}
0x3f88…3f9a               Head {h00=0x000e, h01=0x0050, text=» RB RW:300«, t00=0x0028, t01=0x0112}
0x3f9a…3fa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0124}
0x3fa4…3fba               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0028, t01=0x012e}
0x3fba…3fc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0144}
0x3fc4…3ff0               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x014e}
0x3ff0…401c               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0028, t01=0x017a}
0x401c…4048               Head {h00=0x0028, h01=0x0050, text=»*   READ/WRITE ON THE LAST SECTORS *«, t00=0x0029, t01=0x0016}
0x4048…4074               Head {h00=0x0028, h01=0x0050, text=»*   IN IO                          *«, t00=0x0029, t01=0x0042}
0x4074…40a0               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0029, t01=0x006e}
0x40a0…40cc               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0029, t01=0x009a}
0x40cc…40d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c6}
0x40d6…40e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d0}
0x40e0…40f4               Head {h00=0x0010, h01=0x0050, text=»RW:500 EQU *«, t00=0x0029, t01=0x00da}
0x40f4…4114               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:580 3 SECTORS «, t00=0x0029, t01=0x00ee}
0x4114…4126               Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x0029, t01=0x010e}
0x4126…4146               Head {h00=0x001c, h01=0x0050, text=» RF(P) RW:560 2 SECTORS «, t00=0x0029, t01=0x0120}
0x4146…4166               Head {h00=0x001c, h01=0x0050, text=» RF(N) RW:600 0 SECTORS «, t00=0x0029, t01=0x0140}
0x4166…418a               Head {h00=0x0020, h01=0x0050, text=»RW:530 EQU * ,XXXX  ,      ,«, t00=0x0029, t01=0x0160}
0x418a…41a0               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0029, t01=0x0184}
0x41a0…41b4               Head {h00=0x0010, h01=0x0050, text=» DATA /0080 «, t00=0x002a, t01=0x000a}
0x41b4…41c6               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002a, t01=0x001e}
0x41c6…41ea               Head {h00=0x0020, h01=0x0050, text=»RW:560 EQU * ,XXXXXX,XX    ,«, t00=0x002a, t01=0x0030}
0x41ea…4200               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x0054}
0x4200…4214               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002a, t01=0x006a}
0x4214…422a               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x007e}
0x422a…423e               Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x002a, t01=0x0094}
0x423e…4250               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002a, t01=0x00a8}
0x4250…4274               Head {h00=0x0020, h01=0x0050, text=»RW:580 EQU * ,XXXXXX,XXXXXX,«, t00=0x002a, t01=0x00ba}
0x4274…428a               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x00de}
0x428a…429e               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002a, t01=0x00f4}
0x429e…42b4               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x0108}
0x42b4…42c8               Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x002a, t01=0x011e}
0x42c8…42d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0132}
0x42d2…42e8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002a, t01=0x013c}
0x42e8…42f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0152}
0x42f2…42fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x015c}
0x42fc…4310               Head {h00=0x0010, h01=0x0050, text=»RW:600 EQU *«, t00=0x002a, t01=0x0166}
0x4310…4322               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x002a, t01=0x017a}
0x4322…432c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x018c}
0x432c…434c               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002b, t01=0x0008}
0x434c…436c               Head {h00=0x001c, h01=0x0050, text=»*                      *«, t00=0x002b, t01=0x0028}
0x436c…438c               Head {h00=0x001c, h01=0x0050, text=»*   READ AFTER WRITE   *«, t00=0x002b, t01=0x0048}
0x438c…43ac               Head {h00=0x001c, h01=0x0050, text=»*                      *«, t00=0x002b, t01=0x0068}
0x43ac…43cc               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002b, t01=0x0088}
0x43cc…43d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00a8}
0x43d6…440a               Head {h00=0x0030, h01=0x0050, text=»*   DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002b, t01=0x00b2}
0x440a…4446               Head {h00=0x0038, h01=0x0050, text=»*   1ST POS IN DWT=LAST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002b, t01=0x00e6}
0x4446…4464               Head {h00=0x001a, h01=0x0050, text=»*   A7=SECTOR COUNTER «, t00=0x002b, t01=0x0122}
0x4464…446e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0140}
0x446e…4486               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x002b, t01=0x014a}
0x4486…44a4               Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x002b, t01=0x0162}
0x44a4…44b8               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x002b, t01=0x0180}
0x44b8…44e2 (44, 0, 400)  Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x002c, t01=0x0004}
0x44e2…44f8               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,-/100«, t00=0x002c, t01=0x002e}
0x44f8…4528               Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION«, t00=0x002c, t01=0x0044}
0x4528…4546               Head {h00=0x001a, h01=0x0050, text=» RF(Z) RW:645 ,    XX,«, t00=0x002c, t01=0x0074}
0x4546…4564               Head {h00=0x001a, h01=0x0050, text=» RF(P) RW:640 ,  XXXX,«, t00=0x002c, t01=0x0092}
0x4564…4578               Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002c, t01=0x00b0}
0x4578…458c               Head {h00=0x0010, h01=0x0050, text=»RW:640 EQU *«, t00=0x002c, t01=0x00c4}
0x458c…45a0               Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002c, t01=0x00d8}
0x45a0…45b4               Head {h00=0x0010, h01=0x0050, text=»RW:645 EQU *«, t00=0x002c, t01=0x00ec}
0x45b4…45e4               Head {h00=0x002c, h01=0x0050, text=» ST A2,ECBEL,A8 PREPARE EFFECTIVE LENGTH«, t00=0x002c, t01=0x0100}
0x45e4…4612               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTSEI,A6 RAW FROM THIS SECTOR «, t00=0x002c, t01=0x0130}
0x4612…4638               Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 GET LAST SECTOR NO«, t00=0x002c, t01=0x015e}
0x4638…466a               Head {h00=0x002e, h01=0x0050, text=» SUR A7,A1 GET NUMBER OF PHYSICAL SECTORS «, t00=0x002c, t01=0x0184}
0x466a…467c               Head {h00=0x000e, h01=0x0050, text=» STR A1,A6«, t00=0x002d, t01=0x0026}
0x467c…4686               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0038}
0x4686…469c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002d, t01=0x0042}
0x469c…46a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0058}
0x46a6…46b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0062}
0x46b0…46c4               Head {h00=0x0010, h01=0x0050, text=»RW:650 EQU *«, t00=0x002d, t01=0x006c}
0x46c4…46da               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002d, t01=0x0080}
0x46da…46ee               Head {h00=0x0010, h01=0x0050, text=» DATA /40C0 «, t00=0x002d, t01=0x0096}
0x46ee…4712               Head {h00=0x0020, h01=0x0050, text=» IMR A6 NEXT PHYSICAL SECTOR«, t00=0x002d, t01=0x00aa}
0x4712…472a               Head {h00=0x0014, h01=0x0050, text=» LDKL A1,PHSECL «, t00=0x002d, t01=0x00ce}
0x472a…4750               Head {h00=0x0022, h01=0x0050, text=» ADS A1,ECBEL,A8 UPDATE ECBEL «, t00=0x002d, t01=0x00e6}
0x4750…4762               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x002d, t01=0x010c}
0x4762…4778               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:650«, t00=0x002d, t01=0x011e}
0x4778…4790               Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRL,A8 «, t00=0x002d, t01=0x0134}
0x4790…47c0               Head {h00=0x002c, h01=0x0050, text=» ST A7,ECBEL,A8 CORRECT EFFECTIVE LENGTH«, t00=0x002d, t01=0x014c}
0x47c0…47cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002d, t01=0x017c}
0x47cc…47d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0188}
0x47d6…47ec (46, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x002e, t01=0x0004}
0x47ec…4800               Head {h00=0x0010, h01=0x0050, text=»RW:700 EQU *«, t00=0x002e, t01=0x001a}
0x4800…481e               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x002e, t01=0x002e}
0x481e…4838               Head {h00=0x0016, h01=0x0050, text=» ABL END:20 ENDIO «, t00=0x002e, t01=0x004c}
0x4838…4842               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0066}
0x4842…484e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0070}
0x484e…4858               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x007c}
0x4858…486e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002e, t01=0x0086}
0x486e…4878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x009c}
0x4878…488e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x002e, t01=0x00a6}
0x488e…4898               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00bc}
0x4898…48a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00c6}
0x48a2…48cc               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002e, t01=0x00d0}
0x48cc…48f6               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x002e, t01=0x00fa}
0x48f6…4920               Head {h00=0x0026, h01=0x0050, text=»*   DISC FORMAT A2              * «, t00=0x002e, t01=0x0124}
0x4920…494a               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x002e, t01=0x014e}
0x494a…4974               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002e, t01=0x0178}
0x4974…497e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0012}
0x497e…4988               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x001c}
0x4988…499c               Head {h00=0x0010, h01=0x0050, text=»RW:800 EQU *«, t00=0x002f, t01=0x0026}
0x499c…49b0               Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x002f, t01=0x003a}
0x49b0…49c2               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x002f, t01=0x004e}
0x49c2…4a06               Head {h00=0x0040, h01=0x0050, text=» ST A7,DWTSEI,A6 SAVE NUMBER OF SECTORS FOR READ AFTER WRITE«, t00=0x002f, t01=0x0060}
0x4a06…4a12               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x00a4}
0x4a12…4a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00b0}
0x4a1c…4a32               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x002f, t01=0x00ba}
0x4a32…4a46               Head {h00=0x0010, h01=0x0050, text=»RW:850 EQU *«, t00=0x002f, t01=0x00d0}
0x4a46…4a5c               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002f, t01=0x00e4}
0x4a5c…4a82               Head {h00=0x0022, h01=0x0050, text=» DATA /A080 INDICATE FORMAT A2«, t00=0x002f, t01=0x00fa}
0x4a82…4a98               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x002f, t01=0x0120}
0x4a98…4acc               Head {h00=0x0030, h01=0x0050, text=» ADS A1,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x002f, t01=0x0136}
0x4acc…4ade               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x002f, t01=0x016a}
0x4ade…4b08               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:850 MORE SECTORS IN IO «, t00=0x002f, t01=0x017c}
0x4b08…4b12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0016}
0x4b12…4b28               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0030, t01=0x0020}
0x4b28…4b32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0036}
0x4b32…4b3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0040}
0x4b3c…4b4e               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x004a}
0x4b4e…4b70               Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x0030, t01=0x005c}
0x4b70…4b84               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0030, t01=0x007e}
0x4b84…4b98               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0030, t01=0x0092}
0x4b98…4ba2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00a6}
0x4ba2…4bb8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0030, t01=0x00b0}
0x4bb8…4be2               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x0030, t01=0x00c6}
0x4be2…4bee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x00f0}
0x4bee…4bf8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x00fc}
0x4bf8…4c0e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0030, t01=0x0106}
0x4c0e…4c24               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0030, t01=0x011c}
0x4c24…4c36               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x0132}
0x4c36…4c4c               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RW:905«, t00=0x0030, t01=0x0144}
0x4c4c…4c58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x015a}
0x4c58…4c62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0166}
0x4c62…4c78               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0030, t01=0x0170}
0x4c78…4c8a               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x0186}
0x4c8a…4cbc               Head {h00=0x002e, h01=0x0050, text=» CM ECBEL,A8 PREPARE FOR READ AFTER WRITE «, t00=0x0031, t01=0x0008}
0x4cbc…4cd4               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTSEI,A6«, t00=0x0031, t01=0x003a}
0x4cd4…4ce8               Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x0031, t01=0x0052}
0x4ce8…4cf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0066}
0x4cf2…4d08               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0031, t01=0x0070}
0x4d08…4d12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0086}
0x4d12…4d1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0090}
0x4d1c…4d30               Head {h00=0x0010, h01=0x0050, text=»RW:900 EQU *«, t00=0x0031, t01=0x009a}
0x4d30…4d46               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0031, t01=0x00ae}
0x4d46…4d6a               Head {h00=0x0020, h01=0x0050, text=» DATA /E080 READ AFTER WRITE«, t00=0x0031, t01=0x00c4}
0x4d6a…4d7c               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0031, t01=0x00e8}
0x4d7c…4d92               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:900«, t00=0x0031, t01=0x00fa}
0x4d92…4d9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0110}
0x4d9e…4da8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x011c}
0x4da8…4dc4               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0031, t01=0x0126}
0x4dc4…4dd6               Head {h00=0x000e, h01=0x0050, text=» RB RW:700«, t00=0x0031, t01=0x0142}
0x4dd6…4de2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0154}
0x4de2…4dec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0160}
0x4dec…4e02               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0031, t01=0x016a}
0x4e02…4e18               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0031, t01=0x0180}
0x4e18…4e2c               Head {h00=0x0010, h01=0x0050, text=»RW:905 EQU *«, t00=0x0032, t01=0x0008}
0x4e2c…4e50               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0032, t01=0x001c}
0x4e50…4e64               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0032, t01=0x0040}
0x4e64…4e70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x0054}
0x4e70…4e7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0060}
0x4e7a…4e90               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0032, t01=0x006a}
0x4e90…4e9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0080}
0x4e9a…4ed2               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0032, t01=0x008a}
0x4ed2…4f0a               Head {h00=0x0034, h01=0x0050, text=»*                                             * «, t00=0x0032, t01=0x00c2}
0x4f0a…4f42               Head {h00=0x0034, h01=0x0050, text=»*   IOROUT PERFORM READ OR WRITE AND SEEK     * «, t00=0x0032, t01=0x00fa}
0x4f42…4f7a               Head {h00=0x0034, h01=0x0050, text=»*   IF NECESSARY                              * «, t00=0x0032, t01=0x0132}
0x4f7a…4fb2               Head {h00=0x0034, h01=0x0050, text=»*                                             * «, t00=0x0032, t01=0x016a}
0x4fb2…4fea               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0033, t01=0x0012}
0x4fea…4ff4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x004a}
0x4ff4…501e               Head {h00=0x0026, h01=0x0050, text=»*   INPUT : ONE DATA WORD AFTER CF«, t00=0x0033, t01=0x0054}
0x501e…504c               Head {h00=0x002a, h01=0x0050, text=»*          BIT 0 :INDICATES DIRECT IO «, t00=0x0033, t01=0x007e}
0x504c…5080               Head {h00=0x0030, h01=0x0050, text=»*          BIT 1 :INDICATES READ AFTER WRITE«, t00=0x0033, t01=0x00ac}
0x5080…50ae               Head {h00=0x002a, h01=0x0050, text=»*          BIT 2 :INDICATES FORMAT A2 «, t00=0x0033, t01=0x00e0}
0x50ae…50dc               Head {h00=0x002a, h01=0x0050, text=»*          BIT 8-11:NUMBER OF WORDS/16«, t00=0x0033, t01=0x010e}
0x50dc…5112               Head {h00=0x0032, h01=0x0050, text=»*          BIT12-15:START IN DRIVER BUFFER/32 «, t00=0x0033, t01=0x013c}
0x5112…5152               Head {h00=0x003c, h01=0x0050, text=»*   AFTER SEEK THE CYLINDER ID WILL BE CHECKED BY A READ«, t00=0x0033, t01=0x0172}
0x5152…5196               Head {h00=0x0040, h01=0x0050, text=»*   DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER «, t00=0x0034, t01=0x0022}
0x5196…51c0               Head {h00=0x0026, h01=0x0050, text=»*   DWTRTY INDICATES RETRIES DONE «, t00=0x0034, t01=0x0066}
0x51c0…520c               Head {h00=0x0048, h01=0x0050, text=»*   DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER«, t00=0x0034, t01=0x0090}
0x520c…5216               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00dc}
0x5216…522a               Head {h00=0x0010, h01=0x0050, text=»IOROUT EQU *«, t00=0x0034, t01=0x00e6}
0x522a…5258               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0034, t01=0x00fa}
0x5258…527e               Head {h00=0x0022, h01=0x0050, text=» SRL A3,5 GET CYLINDER NUMBER «, t00=0x0034, t01=0x0128}
0x527e…5288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x014e}
0x5288…52a4               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0034, t01=0x0158}
0x52a4…52c6               Head {h00=0x001e, h01=0x0050, text=» LD* A4,4,A5 GET DATA WORD«, t00=0x0034, t01=0x0174}
0x52c6…52d8               Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0035, t01=0x0008}
0x52d8…52f8               Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:05 FORMAT A3«, t00=0x0035, t01=0x001a}
0x52f8…530a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,0 «, t00=0x0035, t01=0x003a}
0x530a…5316               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x004c}
0x5316…5320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0058}
0x5320…5336               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0035, t01=0x0062}
0x5336…5340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0078}
0x5340…534a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0082}
0x534a…5360               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0035, t01=0x008c}
0x5360…5386               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SEE:05 NOT CYLINDER 0 «, t00=0x0035, t01=0x00a2}
0x5386…539a               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0035, t01=0x00c8}
0x539a…53ac               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0035, t01=0x00dc}
0x53ac…53c8               Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x0035, t01=0x00ee}
0x53c8…53de               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0035, t01=0x010a}
0x53de…53f4               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0035, t01=0x0120}
0x53f4…5418               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0035, t01=0x0136}
0x5418…542a               Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0035, t01=0x015a}
0x542a…5436               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0035, t01=0x016c}
0x5436…544c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0035, t01=0x0178}
0x544c…5462               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0035, t01=0x018e}
0x5462…5478               Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0036, t01=0x0014}
0x5478…548a               Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0036, t01=0x002a}
0x548a…5496               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x003c}
0x5496…54a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0048}
0x54a0…54b6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0036, t01=0x0052}
0x54b6…54c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0068}
0x54c0…54ca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0072}
0x54ca…54de               Head {h00=0x0010, h01=0x0050, text=»SEE:05 EQU *«, t00=0x0036, t01=0x007c}
0x54de…54f4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0036, t01=0x0090}
0x54f4…550a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0036, t01=0x00a6}
0x550a…5538               Head {h00=0x002a, h01=0x0050, text=» CW A3,DWTCYL,A2 COMPARE WITH PRESENT «, t00=0x0036, t01=0x00bc}
0x5538…5544               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x00ea}
0x5544…555a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0036, t01=0x00f6}
0x555a…5572               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0036, t01=0x010c}
0x5572…557e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0124}
0x557e…5588               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0130}
0x5588…559e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0036, t01=0x013a}
0x559e…55b4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0036, t01=0x0150}
0x55b4…55ca               Head {h00=0x0012, h01=0x0050, text=» RF(E) VA2:00 «, t00=0x0036, t01=0x0166}
0x55ca…55d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x017c}
0x55d6…55e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0188}
0x55e0…55f6 (55, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0037, t01=0x0004}
0x55f6…560c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0037, t01=0x001a}
0x560c…5632               Head {h00=0x0022, h01=0x0050, text=» RF(E) SEE:90 HEAD IN POSITION«, t00=0x0037, t01=0x0030}
0x5632…563e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0056}
0x563e…5648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0062}
0x5648…5664               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0037, t01=0x006c}
0x5664…568c               Head {h00=0x0024, h01=0x0050, text=» RF(NE) SEE:07 NOT SAME CYLINDER«, t00=0x0037, t01=0x0088}
0x568c…569e               Head {h00=0x000e, h01=0x0050, text=» ADK A4,0 «, t00=0x0037, t01=0x00b0}
0x569e…56bc               Head {h00=0x001a, h01=0x0050, text=» RF(N) VA2BR FORMAT A2«, t00=0x0037, t01=0x00c2}
0x56bc…56ce               Head {h00=0x000e, h01=0x0050, text=» RF SEE:90«, t00=0x0037, t01=0x00e0}
0x56ce…56d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x00f2}
0x56d8…56ee               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0037, t01=0x00fc}
0x56ee…56f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0112}
0x56f8…5702               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x011c}
0x5702…5716               Head {h00=0x0010, h01=0x0050, text=»SEE:07 EQU *«, t00=0x0037, t01=0x0126}
0x5716…5722               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x013a}
0x5722…572c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0146}
0x572c…5742               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0037, t01=0x0150}
0x5742…576e               Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTCYL,A6 NEW CYLINDER NUMBER«, t00=0x0037, t01=0x0166}
0x576e…577a (56, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0004}
0x577a…5784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0010}
0x5784…579a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0038, t01=0x001a}
0x579a…57c0               Head {h00=0x0022, h01=0x0050, text=» ST A3,DWTCYL,A2 NEW CYLINDER «, t00=0x0038, t01=0x0030}
0x57c0…57cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0056}
0x57cc…57f4               Head {h00=0x0024, h01=0x0050, text=» LDK A4,QRETRY NUMBER OF RETRIES«, t00=0x0038, t01=0x0062}
0x57f4…5808               Head {h00=0x0010, h01=0x0050, text=»SEE:10 EQU *«, t00=0x0038, t01=0x008a}
0x5808…581e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0038, t01=0x009e}
0x581e…5846               Head {h00=0x0024, h01=0x0050, text=» CF A5,INXUNI DOUBLED UNIT INDEX«, t00=0x0038, t01=0x00b4}
0x5846…5852               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x00dc}
0x5852…5866               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEK «, t00=0x0038, t01=0x00e8}
0x5866…5884               Head {h00=0x001a, h01=0x0050, text=» SLC A1,5 RETURN CODE «, t00=0x0038, t01=0x00fc}
0x5884…589c               Head {h00=0x0014, h01=0x0050, text=» RF(N) SEE:30 OK«, t00=0x0038, t01=0x011a}
0x589c…58a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0132}
0x58a6…58bc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0038, t01=0x013c}
0x58bc…58c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0152}
0x58c6…58d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x015c}
0x58d0…58e4               Head {h00=0x0010, h01=0x0050, text=»SEE:15 EQU *«, t00=0x0038, t01=0x0166}
0x58e4…5906               Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEKZ SEEK CYL ZERO«, t00=0x0038, t01=0x017a}
0x5906…5924               Head {h00=0x001a, h01=0x0050, text=» SLC A1,6 RETURN CODE «, t00=0x0039, t01=0x000c}
0x5924…5940               Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x0039, t01=0x002a}
0x5940…5964               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0039, t01=0x0046}
0x5964…5984               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x0039, t01=0x006a}
0x5984…59a4               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) SEE:10 TRY AGAIN«, t00=0x0039, t01=0x008a}
0x59a4…59b8               Head {h00=0x0010, h01=0x0050, text=»SEE:20 EQU *«, t00=0x0039, t01=0x00aa}
0x59b8…59ce               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFF«, t00=0x0039, t01=0x00be}
0x59ce…59e4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0039, t01=0x00d4}
0x59e4…59fa               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0039, t01=0x00ea}
0x59fa…5a28               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A2 DUMMY CYLINDER NUMBER«, t00=0x0039, t01=0x0100}
0x5a28…5a34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x012e}
0x5a34…5a4a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0039, t01=0x013a}
0x5a4a…5a78               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A6 DUMMY CYLINDER NUMBER«, t00=0x0039, t01=0x0150}
0x5a78…5a84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x017e}
0x5a84…5aa4               Head {h00=0x001c, h01=0x0050, text=» LDK A1,/02 RETURN CODE «, t00=0x0039, t01=0x018a}
0x5aa4…5abe               Head {h00=0x0016, h01=0x0050, text=» RF SEE:35 END IO «, t00=0x003a, t01=0x001a}
0x5abe…5ac8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0034}
0x5ac8…5ade               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003a, t01=0x003e}
0x5ade…5ae8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0054}
0x5ae8…5af2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x005e}
0x5af2…5b06               Head {h00=0x0010, h01=0x0050, text=»SEE:30 EQU *«, t00=0x003a, t01=0x0068}
0x5b06…5b1c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003a, t01=0x007c}
0x5b1c…5b32               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003a, t01=0x0092}
0x5b32…5b3e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x00a8}
0x5b3e…5b5a               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x003a, t01=0x00b4}
0x5b5a…5b7c               Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x003a, t01=0x00d0}
0x5b7c…5b8e               Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x003a, t01=0x00f2}
0x5b8e…5bae               Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:31 FORMAT A3«, t00=0x003a, t01=0x0104}
0x5bae…5bba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0124}
0x5bba…5bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0130}
0x5bc4…5bda               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003a, t01=0x013a}
0x5bda…5bf0               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003a, t01=0x0150}
0x5bf0…5bfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0166}
0x5bfa…5c04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0170}
0x5c04…5c1a               Head {h00=0x0012, h01=0x0050, text=»*   FORMAT A2 «, t00=0x003a, t01=0x017a}
0x5c1a…5c24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0190}
0x5c24…5c36               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003b, t01=0x000a}
0x5c36…5c4a               Head {h00=0x0010, h01=0x0050, text=» CF A5,SKEW «, t00=0x003b, t01=0x001c}
0x5c4a…5c6e               Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8002 READ 2 WORDS «, t00=0x003b, t01=0x0030}
0x5c6e…5c9c               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER READ TO DRIVER BUFFER «, t00=0x003b, t01=0x0054}
0x5c9c…5cb2               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x003b, t01=0x0082}
0x5cb2…5cd2               Head {h00=0x001c, h01=0x0050, text=» ANK A1,/1F ERROR CHECK «, t00=0x003b, t01=0x0098}
0x5cd2…5ce8               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEE:32«, t00=0x003b, t01=0x00b8}
0x5ce8…5d08               Head {h00=0x001c, h01=0x0050, text=» LD A3,BUFFER GET CYL ID«, t00=0x003b, t01=0x00ce}
0x5d08…5d1e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003b, t01=0x00ee}
0x5d1e…5d34               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003b, t01=0x0104}
0x5d34…5d64               Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A2 CHECK IF SAME CYLINDER «, t00=0x003b, t01=0x011a}
0x5d64…5d70               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x014a}
0x5d70…5d86               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003b, t01=0x0156}
0x5d86…5d9c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003b, t01=0x016c}
0x5d9c…5dcc               Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A6 CHECK IF SAME CYLINDER «, t00=0x003b, t01=0x0182}
0x5dcc…5dd8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0022}
0x5dd8…5dee               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003c, t01=0x002e}
0x5dee…5e14               Head {h00=0x0022, h01=0x0050, text=» RB(NE) SEE:15 NOT SAME CYL ID«, t00=0x003c, t01=0x0044}
0x5e14…5e28               Head {h00=0x0010, h01=0x0050, text=»VA2BR EQU * «, t00=0x003c, t01=0x006a}
0x5e28…5e3c               Head {h00=0x0010, h01=0x0050, text=» ABL VA2:00 «, t00=0x003c, t01=0x007e}
0x5e3c…5e48               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x0092}
0x5e48…5e52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x009e}
0x5e52…5e68               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003c, t01=0x00a8}
0x5e68…5e7e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003c, t01=0x00be}
0x5e7e…5e88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00d4}
0x5e88…5e92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00de}
0x5e92…5ea8               Head {h00=0x0012, h01=0x0050, text=»*   FORMAT A3 «, t00=0x003c, t01=0x00e8}
0x5ea8…5eb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x00fe}
0x5eb2…5ec6               Head {h00=0x0010, h01=0x0050, text=»SEE:31 EQU *«, t00=0x003c, t01=0x0108}
0x5ec6…5edc               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003c, t01=0x011c}
0x5edc…5ef4               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A2«, t00=0x003c, t01=0x0132}
0x5ef4…5f00               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x014a}
0x5f00…5f16               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003c, t01=0x0156}
0x5f16…5f2c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003c, t01=0x016c}
0x5f2c…5f44               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x003c, t01=0x0182}
0x5f44…5f50               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x000a}
0x5f50…5f5a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0016}
0x5f5a…5f70               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003d, t01=0x0020}
0x5f70…5f94               Head {h00=0x0020, h01=0x0050, text=» SLL A3,5 GET SECTOR NUMBER «, t00=0x003d, t01=0x0036}
0x5f94…5fbc               Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTBSE,A6 SAVE FOR BSELOD«, t00=0x003d, t01=0x005a}
0x5fbc…5fce               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003d, t01=0x0082}
0x5fce…6000               Head {h00=0x002e, h01=0x0050, text=» CF A5,SKEW TO READ SECTOR 0 OR 8 ON DISC «, t00=0x003d, t01=0x0094}
0x6000…6034               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x003d, t01=0x00c6}
0x6034…6048               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x003d, t01=0x00fa}
0x6048…607e               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTBSE,A6 GET SECTOR NUMBER FOR BSELOD «, t00=0x003d, t01=0x010e}
0x607e…60a2               Head {h00=0x0020, h01=0x0050, text=» ANK A1,/1F ERROR CODE CHECK«, t00=0x003d, t01=0x0144}
0x60a2…60b8               Head {h00=0x0012, h01=0x0050, text=» CF A5,BSEL00 «, t00=0x003d, t01=0x0168}
0x60b8…60d0               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SEE:40 OK«, t00=0x003d, t01=0x017e}
0x60d0…60dc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x0008}
0x60dc…60e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0014}
0x60e6…60fa               Head {h00=0x0010, h01=0x0050, text=»SEE:32 EQU *«, t00=0x003e, t01=0x001e}
0x60fa…611e               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x003e, t01=0x0032}
0x611e…613e               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x003e, t01=0x0056}
0x613e…615a               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) SEE:15 RETRY«, t00=0x003e, t01=0x0076}
0x615a…616e               Head {h00=0x0010, h01=0x0050, text=»SEE:35 EQU *«, t00=0x003e, t01=0x0092}
0x616e…6182               Head {h00=0x0010, h01=0x0050, text=» ABL END:10 «, t00=0x003e, t01=0x00a6}
0x6182…618c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00ba}
0x618c…61a2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003e, t01=0x00c4}
0x61a2…61ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00da}
0x61ac…61c2               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003e, t01=0x00e4}
0x61c2…61cc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00fa}
0x61cc…61d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0104}
0x61d6…61ea               Head {h00=0x0010, h01=0x0050, text=»SEE:40 EQU *«, t00=0x003e, t01=0x010e}
0x61ea…6200               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003e, t01=0x0122}
0x6200…6216               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003e, t01=0x0138}
0x6216…6242               Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x003e, t01=0x014e}
0x6242…624e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x017a}
0x624e…6264               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003e, t01=0x0186}
0x6264…627a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003f, t01=0x000c}
0x627a…62a6               Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x003f, t01=0x0022}
0x62a6…62b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x004e}
0x62b2…62c8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003f, t01=0x005a}
0x62c8…62f8               Head {h00=0x002c, h01=0x0050, text=» CW A3,BUFFER+PHSECL COMPARE WITH CYL ID«, t00=0x003f, t01=0x0070}
0x62f8…6314               Head {h00=0x0018, h01=0x0050, text=» RB(NE) SEE:15 RETRY«, t00=0x003f, t01=0x00a0}
0x6314…631e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00bc}
0x631e…6334               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003f, t01=0x00c6}
0x6334…633e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00dc}
0x633e…6360               Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x003f, t01=0x00e6}
0x6360…6382               Head {h00=0x001e, h01=0x0050, text=»*                       * «, t00=0x003f, t01=0x0108}
0x6382…63a4               Head {h00=0x001e, h01=0x0050, text=»*   READ AND WRITE      * «, t00=0x003f, t01=0x012a}
0x63a4…63c6               Head {h00=0x001e, h01=0x0050, text=»*   FORMAT A3           * «, t00=0x003f, t01=0x014c}
0x63c6…63e8               Head {h00=0x001e, h01=0x0050, text=»*                       * «, t00=0x003f, t01=0x016e}
0x63e8…640a               Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x003f, t01=0x0190}
0x640a…6414               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0022}
0x6414…6428               Head {h00=0x0010, h01=0x0050, text=»SEE:90 EQU *«, t00=0x0040, t01=0x002c}
0x6428…644a               Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTOR,A6 GET ORDER «, t00=0x0040, t01=0x0040}
0x644a…645c               Head {h00=0x000e, h01=0x0050, text=» ANK A4,4 «, t00=0x0040, t01=0x0062}
0x645c…647c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ00 READ ORDER«, t00=0x0040, t01=0x0074}
0x647c…6490               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x0040, t01=0x0094}
0x6490…64c4               Head {h00=0x0030, h01=0x0050, text=» RF(N) WRIT20 WRITE DIRECT FROM USER BUFFER «, t00=0x0040, t01=0x00a8}
0x64c4…64d6               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0040, t01=0x00dc}
0x64d6…64e8               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0040, t01=0x00ee}
0x64e8…650e               Head {h00=0x0022, h01=0x0050, text=» RF(N) READWR READ AFTER WRITE«, t00=0x0040, t01=0x0100}
0x650e…651a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0126}
0x651a…6524               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0132}
0x6524…653a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0040, t01=0x013c}
0x653a…6552               Head {h00=0x0014, h01=0x0050, text=» CWK A2,PHSECL  «, t00=0x0040, t01=0x0152}
0x6552…6580               Head {h00=0x002a, h01=0x0050, text=» RF(E) WRIT10 WRITE FROM DRIVER BUFFER«, t00=0x0040, t01=0x016a}
0x6580…65b4               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0041, t01=0x0008}
0x65b4…65dc               Head {h00=0x0024, h01=0x0050, text=» CF A5,REA:00 READ BEFORE WRITE «, t00=0x0041, t01=0x003c}
0x65dc…65e6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0064}
0x65e6…65fc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0041, t01=0x006e}
0x65fc…6606               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0084}
0x6606…6610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x008e}
0x6610…6624               Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0041, t01=0x0098}
0x6624…6646               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0041, t01=0x00ac}
0x6646…6658               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0041, t01=0x00ce}
0x6658…6688               Head {h00=0x002c, h01=0x0050, text=» ANK A4,/C0 GET NUMBER OF WORDS TO MOVE «, t00=0x0041, t01=0x00e0}
0x6688…66a0               Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 BYTES «, t00=0x0041, t01=0x0110}
0x66a0…66ce               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/F BEG ADRESS IN DRIVER BUFFER«, t00=0x0041, t01=0x0128}
0x66ce…66e0               Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x0041, t01=0x0156}
0x66e0…670c               Head {h00=0x0028, h01=0x0050, text=» CF A5,MOVWRI MOVE TO DRIVER BUFFER «, t00=0x0041, t01=0x0168}
0x670c…6722 (66, 0, 398)  Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0042, t01=0x0004}
0x6722…6738               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0042, t01=0x001a}
0x6738…6764               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0042, t01=0x0030}
0x6764…6770               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x005c}
0x6770…6786               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0042, t01=0x0068}
0x6786…679c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0042, t01=0x007e}
0x679c…67c8               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0042, t01=0x0094}
0x67c8…67d4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0042, t01=0x00c0}
0x67d4…67ea               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0042, t01=0x00cc}
0x67ea…681c               Head {h00=0x002e, h01=0x0050, text=» ST A2,BUFFER+PHSECL PUT IN DRIVER BUFFER «, t00=0x0042, t01=0x00e2}
0x681c…6854               Head {h00=0x0034, h01=0x0050, text=» IM DWTFBU,A6 INDICATE WRITE FROM DRIVER BUFFER «, t00=0x0042, t01=0x0114}
0x6854…6882               Head {h00=0x002a, h01=0x0050, text=» CF A5,WRI:00 WRITE FROM DRIVER BUFFER«, t00=0x0042, t01=0x014c}
0x6882…6894               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0042, t01=0x017a}
0x6894…689e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x018c}
0x689e…68b4               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0043, t01=0x0008}
0x68b4…68be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x001e}
0x68be…68c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0028}
0x68c8…68dc               Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0043, t01=0x0032}
0x68dc…68f2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0043, t01=0x0046}
0x68f2…6920               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,PHSECL PHYSICAL SECTOR LENGTH«, t00=0x0043, t01=0x005c}
0x6920…6954               Head {h00=0x0030, h01=0x0050, text=» ADS A2,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0043, t01=0x008a}
0x6954…6986               Head {h00=0x002e, h01=0x0050, text=» LD* A4,DWTUBU,A6 GET WORD IN USER BUFFER «, t00=0x0043, t01=0x00be}
0x6986…69a8               Head {h00=0x001e, h01=0x0050, text=» ST A4,DWTSWD,A6 SAVE WORD«, t00=0x0043, t01=0x00f0}
0x69a8…69d2               Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0043, t01=0x0112}
0x69d2…69e8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0043, t01=0x013c}
0x69e8…69fe               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0043, t01=0x0152}
0x69fe…6a2a               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0043, t01=0x0168}
0x6a2a…6a56 (68, 0, 400)  Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0044, t01=0x0004}
0x6a56…6a62               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x0030}
0x6a62…6a78               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x003c}
0x6a78…6a8e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0044, t01=0x0052}
0x6a8e…6aa4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0044, t01=0x0068}
0x6aa4…6abc               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTCYL,A6«, t00=0x0044, t01=0x007e}
0x6abc…6ae8               Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0044, t01=0x0096}
0x6ae8…6af4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x00c2}
0x6af4…6afe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00ce}
0x6afe…6b14               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x00d8}
0x6b14…6b2a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0044, t01=0x00ee}
0x6b2a…6b40               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0044, t01=0x0104}
0x6b40…6b56               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0044, t01=0x011a}
0x6b56…6b82               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0044, t01=0x0130}
0x6b82…6b8e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0044, t01=0x015c}
0x6b8e…6ba4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0044, t01=0x0168}
0x6ba4…6bba               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0044, t01=0x017e}
0x6bba…6bd0 (69, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0045, t01=0x0004}
0x6bd0…6bfc               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0045, t01=0x001a}
0x6bfc…6c08               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0046}
0x6c08…6c1e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0045, t01=0x0052}
0x6c1e…6c34               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0045, t01=0x0068}
0x6c34…6c68               Head {h00=0x0030, h01=0x0050, text=» ML 2,DWTBA1,A6 GET PHYSICAL BUFFER ADDRESS «, t00=0x0045, t01=0x007e}
0x6c68…6c8a               Head {h00=0x001e, h01=0x0050, text=» RF(Z) WRIT30 SYSTEM AREA «, t00=0x0045, t01=0x00b2}
0x6c8a…6cb6               Head {h00=0x0028, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS ON STACK «, t00=0x0045, t01=0x00d4}
0x6cb6…6ce2               Head {h00=0x0028, h01=0x0050, text=» TL DWTPAG,A6 LOAD PAGE WITH CYL ID «, t00=0x0045, t01=0x0100}
0x6ce2…6d16               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0045, t01=0x012c}
0x6d16…6d40               Head {h00=0x0026, h01=0x0050, text=» EL A3,PHSECL,A2 GET WORD TO SAVE «, t00=0x0045, t01=0x0160}
0x6d40…6d70               Head {h00=0x002c, h01=0x0050, text=» ES A4,PHSECL,A2 PUT CYL ID IN POSITION «, t00=0x0045, t01=0x018a}
0x6d70…6d92               Head {h00=0x001e, h01=0x0050, text=» TL -30,A15 GET REGISTERS «, t00=0x0046, t01=0x002a}
0x6d92…6da4               Head {h00=0x000e, h01=0x0050, text=» RF WRIT40«, t00=0x0046, t01=0x004c}
0x6da4…6db8               Head {h00=0x0010, h01=0x0050, text=»WRIT30 EQU *«, t00=0x0046, t01=0x005e}
0x6db8…6dd6               Head {h00=0x001a, h01=0x0050, text=» SLL A2,1 BYTE ADDRESS«, t00=0x0046, t01=0x0072}
0x6dd6…6e04               Head {h00=0x002a, h01=0x0050, text=» LD A3,PHSECL,A2 GET WORD TO BE SAVED «, t00=0x0046, t01=0x0090}
0x6e04…6e30               Head {h00=0x0028, h01=0x0050, text=» ST A4,PHSECL,A2 CYL ID IN POSITION «, t00=0x0046, t01=0x00be}
0x6e30…6e44               Head {h00=0x0010, h01=0x0050, text=»WRIT40 EQU *«, t00=0x0046, t01=0x00ea}
0x6e44…6e66               Head {h00=0x001e, h01=0x0050, text=» ST A3,DWTSWD,A6 SAVA WORD«, t00=0x0046, t01=0x00fe}
0x6e66…6e90               Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0046, t01=0x0120}
0x6e90…6e9c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x014a}
0x6e9c…6ea6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x0156}
0x6ea6…6ebc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0046, t01=0x0160}
0x6ebc…6ef2               Head {h00=0x0032, h01=0x0050, text=» CM DWTFBU,A6 INDICATE WRITE FROM USER BUFFER «, t00=0x0046, t01=0x0176}
0x6ef2…6f26               Head {h00=0x0030, h01=0x0050, text=» CF A5,WRI:00 WRITE SECTOR FROM USER BUFFER «, t00=0x0047, t01=0x001c}
0x6f26…6f58               Head {h00=0x002e, h01=0x0050, text=» CF A5,REWORD RESTORE WORD TO USER BUFFER «, t00=0x0047, t01=0x0050}
0x6f58…6f6a               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0047, t01=0x0082}
0x6f6a…6f74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0094}
0x6f74…6f8a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0047, t01=0x009e}
0x6f8a…6f94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00b4}
0x6f94…6f9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x00be}
0x6f9e…6fb0               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0047, t01=0x00c8}
0x6fb0…6fc4               Head {h00=0x0010, h01=0x0050, text=»READWR EQU *«, t00=0x0047, t01=0x00da}
0x6fc4…6fea               Head {h00=0x0022, h01=0x0050, text=» CF A5,REA:10 READ AFTER WRITE«, t00=0x0047, t01=0x00ee}
0x6fea…6ffc               Head {h00=0x000e, h01=0x0050, text=» RF SEE:97«, t00=0x0047, t01=0x0114}
0x6ffc…7008               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0126}
0x7008…7012               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0132}
0x7012…7028               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0047, t01=0x013c}
0x7028…703c               Head {h00=0x0010, h01=0x0050, text=»READ00 EQU *«, t00=0x0047, t01=0x0152}
0x703c…705e               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0047, t01=0x0166}
0x705e…7080               Head {h00=0x001e, h01=0x0050, text=» RF(N) READ20 DIRECT READ «, t00=0x0047, t01=0x0188}
0x7080…70b4               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0048, t01=0x001a}
0x70b4…70e0               Head {h00=0x0028, h01=0x0050, text=» CF A5,REA:00 READ TO DRIVER BUFFER «, t00=0x0048, t01=0x004e}
0x70e0…7102               Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x0048, t01=0x007a}
0x7102…7114               Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0048, t01=0x009c}
0x7114…7126               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0048, t01=0x00ae}
0x7126…715c               Head {h00=0x0032, h01=0x0050, text=» ANKL A4,/180 GET NUMBER OF BYTES TO BE MOVED «, t00=0x0048, t01=0x00c0}
0x715c…717c               Head {h00=0x001c, h01=0x0050, text=» ANK A1,/18 GET POSITION«, t00=0x0048, t01=0x00f6}
0x717c…718e               Head {h00=0x000e, h01=0x0050, text=» SLL A1,4 «, t00=0x0048, t01=0x0116}
0x718e…71a4               Head {h00=0x0012, h01=0x0050, text=» CF A5,MOVRED «, t00=0x0048, t01=0x0128}
0x71a4…71b6               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0048, t01=0x013e}
0x71b6…71ca               Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0048, t01=0x0150}
0x71ca…71e0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0048, t01=0x0164}
0x71e0…71f8               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,PHSECL «, t00=0x0048, t01=0x017a}
0x71f8…722c (73, 0, 398)  Head {h00=0x0030, h01=0x0050, text=» ADS A3,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0049, t01=0x0004}
0x722c…7238               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0038}
0x7238…7242               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0044}
0x7242…7258               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0049, t01=0x004e}
0x7258…728a               Head {h00=0x002e, h01=0x0050, text=» CM DWTFBU,A6 INDICATE READ TO USER BUFFER«, t00=0x0049, t01=0x0064}
0x728a…72b4               Head {h00=0x0026, h01=0x0050, text=» CF A5,REA:00 READ TO USER BUFFER «, t00=0x0049, t01=0x0096}
0x72b4…72c8               Head {h00=0x0010, h01=0x0050, text=»SEE:95 EQU *«, t00=0x0049, t01=0x00c0}
0x72c8…72f6               Head {h00=0x002a, h01=0x0050, text=» IMR A6 UPDATE PHYSICAL SECTOR POINTER«, t00=0x0049, t01=0x00d4}
0x72f6…7302               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x0102}
0x7302…730c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x010e}
0x730c…7322               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0049, t01=0x0118}
0x7322…732c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x012e}
0x732c…7336               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0138}
0x7336…734a               Head {h00=0x0010, h01=0x0050, text=»SEE:96 EQU *«, t00=0x0049, t01=0x0142}
0x734a…736c               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0049, t01=0x0156}
0x736c…7386               Head {h00=0x0016, h01=0x0050, text=» ANK A2,/C0 LENGTH«, t00=0x0049, t01=0x0178}
0x7386…7398 (74, 0, 398)  Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004a, t01=0x0004}
0x7398…73be               Head {h00=0x0022, h01=0x0050, text=» ADS A2,ECBEL,A8 UPDATE ECBEL «, t00=0x004a, t01=0x0016}
0x73be…73c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x003c}
0x73c8…73de               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004a, t01=0x0046}
0x73de…73f0               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x004a, t01=0x005c}
0x73f0…740c               Head {h00=0x0018, h01=0x0050, text=» SRL A2,1 WORD MODE «, t00=0x004a, t01=0x006e}
0x740c…7440               Head {h00=0x0030, h01=0x0050, text=» DA DWTBA1,A6 UPDATE PHYSICAL BUFFER ADDRESS«, t00=0x004a, t01=0x008a}
0x7440…746a               Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x004a, t01=0x00be}
0x746a…7476               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x00e8}
0x7476…7480               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00f4}
0x7480…7494               Head {h00=0x0010, h01=0x0050, text=»SEE:97 EQU *«, t00=0x004a, t01=0x00fe}
0x7494…74b4               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 UPDATE RETURN «, t00=0x004a, t01=0x0112}
0x74b4…74c8               Head {h00=0x0010, h01=0x0050, text=» ADS A1,4,A5«, t00=0x004a, t01=0x0132}
0x74c8…74d8               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x004a, t01=0x0146}
0x74d8…74e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0156}
0x74e2…74f8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x004a, t01=0x0160}
0x74f8…7502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0176}
0x7502…7518               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004a, t01=0x0180}
0x7518…7522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0008}
0x7522…752c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0012}
0x752c…7554               Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x001c}
0x7554…757c               Head {h00=0x0024, h01=0x0050, text=»*                              *«, t00=0x004b, t01=0x0044}
0x757c…75a4               Head {h00=0x0024, h01=0x0050, text=»*   DISC FORMAT A2             *«, t00=0x004b, t01=0x006c}
0x75a4…75cc               Head {h00=0x0024, h01=0x0050, text=»*                              *«, t00=0x004b, t01=0x0094}
0x75cc…75f4               Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x00bc}
0x75f4…75fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00e4}
0x75fe…7608               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x00ee}
0x7608…761c               Head {h00=0x0010, h01=0x0050, text=»VA2:00 EQU *«, t00=0x004b, t01=0x00f8}
0x761c…763a               Head {h00=0x001a, h01=0x0050, text=» LDK A4,QRETRY RETRIES«, t00=0x004b, t01=0x010c}
0x763a…764e               Head {h00=0x0010, h01=0x0050, text=»VA2:10 EQU *«, t00=0x004b, t01=0x012a}
0x764e…7664               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x004b, t01=0x013e}
0x7664…767a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x004b, t01=0x0154}
0x767a…7686               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004b, t01=0x016a}
0x7686…769c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004b, t01=0x0176}
0x769c…76c4               Head {h00=0x0024, h01=0x0050, text=» CF A5,INLACE INTERLACE AND SKEW«, t00=0x004b, t01=0x018c}
0x76c4…76ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0024}
0x76ce…76e4               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004c, t01=0x002e}
0x76e4…7702               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8080 1ST WER«, t00=0x004c, t01=0x0044}
0x7702…7714               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004c, t01=0x0062}
0x7714…7728               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004c, t01=0x0074}
0x7728…773a               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004c, t01=0x0088}
0x773a…7766               Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004c, t01=0x009a}
0x7766…777e               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004c, t01=0x00c6}
0x777e…7790               Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004c, t01=0x00de}
0x7790…77a4               Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004c, t01=0x00f0}
0x77a4…77b0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0104}
0x77b0…77ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0110}
0x77ba…77d0               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x011a}
0x77d0…77e6               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004c, t01=0x0130}
0x77e6…780c               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0808 1ST WER SHIFTED«, t00=0x004c, t01=0x0146}
0x780c…7818               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x016c}
0x7818…7822               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0178}
0x7822…7838               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x0182}
0x7838…784a               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004d, t01=0x0008}
0x784a…7860               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004d, t01=0x001a}
0x7860…7874               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004d, t01=0x0030}
0x7874…7886               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004d, t01=0x0044}
0x7886…78b2               Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004d, t01=0x0056}
0x78b2…78c8               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8080«, t00=0x004d, t01=0x0082}
0x78c8…78e0               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004d, t01=0x0098}
0x78e0…78f2               Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004d, t01=0x00b0}
0x78f2…7906               Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004d, t01=0x00c2}
0x7906…7912               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x00d6}
0x7912…791c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x00e2}
0x791c…7932               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004d, t01=0x00ec}
0x7932…7954               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x004d, t01=0x0102}
0x7954…7966               Head {h00=0x000e, h01=0x0050, text=» ANK A2,4 «, t00=0x004d, t01=0x0124}
0x7966…7980               Head {h00=0x0016, h01=0x0050, text=» RF(Z) VA2:30 READ«, t00=0x004d, t01=0x0136}
0x7980…798a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0150}
0x798a…79a0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004d, t01=0x015a}
0x79a0…79b6               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C080«, t00=0x004d, t01=0x0170}
0x79b6…79c2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0186}
0x79c2…79cc (78, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0004}
0x79cc…79e2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x000e}
0x79e2…79f8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004e, t01=0x0024}
0x79f8…7a1e               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/080C 1ST WER SHIFTED«, t00=0x004e, t01=0x003a}
0x7a1e…7a2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x0060}
0x7a2a…7a34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x006c}
0x7a34…7a4a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x0076}
0x7a4a…7a70               Head {h00=0x0022, h01=0x0050, text=» ADK A3,1 ORDER CODE FOR WRITE«, t00=0x004e, t01=0x008c}
0x7a70…7a7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00b2}
0x7a7a…7a90               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x004e, t01=0x00bc}
0x7a90…7a9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00d2}
0x7a9a…7aa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00dc}
0x7aa4…7ab8               Head {h00=0x0010, h01=0x0050, text=»VA2:30 EQU *«, t00=0x004e, t01=0x00e6}
0x7ab8…7ac2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00fa}
0x7ac2…7ad8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004e, t01=0x0104}
0x7ad8…7af8               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTUBU,A6 2ND WER«, t00=0x004e, t01=0x011a}
0x7af8…7b04               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x013a}
0x7b04…7b0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0146}
0x7b0e…7b24               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x0150}
0x7b24…7b3a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004e, t01=0x0166}
0x7b3a…7b4c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004e, t01=0x017c}
0x7b4c…7b62               Head {h00=0x0012, h01=0x0050, text=» DA DWTBA1,A6 «, t00=0x004e, t01=0x018e}
0x7b62…7b88               Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x004f, t01=0x0014}
0x7b88…7bae               Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 2ND WER IN POSITION «, t00=0x004f, t01=0x003a}
0x7bae…7bba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x0060}
0x7bba…7bc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x006c}
0x7bc4…7bda               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004f, t01=0x0076}
0x7bda…7bee               Head {h00=0x0010, h01=0x0050, text=»VA2:35 EQU *«, t00=0x004f, t01=0x008c}
0x7bee…7c04               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x004f, t01=0x00a0}
0x7c04…7c18               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x004f, t01=0x00b6}
0x7c18…7c36               Head {h00=0x001a, h01=0x0050, text=» RF(Z) VA2:40 IO ERROR«, t00=0x004f, t01=0x00ca}
0x7c36…7c4c               Head {h00=0x0012, h01=0x0050, text=» IM DWTRTY,A6 «, t00=0x004f, t01=0x00e8}
0x7c4c…7c5e               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004f, t01=0x00fe}
0x7c5e…7c7a               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) VA2:10 RETRY«, t00=0x004f, t01=0x0110}
0x7c7a…7c92               Head {h00=0x0014, h01=0x0050, text=» RF WRI:50 ERROR«, t00=0x004f, t01=0x012c}
0x7c92…7c9c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0144}
0x7c9c…7cb2               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x004f, t01=0x014e}
0x7cb2…7cbc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0164}
0x7cbc…7cc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x016e}
0x7cc6…7cda               Head {h00=0x0010, h01=0x0050, text=»VA2:40 EQU *«, t00=0x004f, t01=0x0178}
0x7cda…7d08               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x004f, t01=0x018c}
0x7d08…7d26               Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEXT SECTOR «, t00=0x0050, t01=0x002a}
0x7d26…7d38               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0050, t01=0x0048}
0x7d38…7d4a               Head {h00=0x000e, h01=0x0050, text=» CWK A2,31«, t00=0x0050, t01=0x005a}
0x7d4a…7d70               Head {h00=0x0022, h01=0x0050, text=» RF(NE) VA2:50 NOT CYLINDER 0 «, t00=0x0050, t01=0x006c}
0x7d70…7d9a               Head {h00=0x0026, h01=0x0050, text=» ADK A3,2 CYLINDER 0 TO CYLINDER 1«, t00=0x0050, t01=0x0092}
0x7d9a…7dae               Head {h00=0x0010, h01=0x0050, text=»VA2:50 EQU *«, t00=0x0050, t01=0x00bc}
0x7dae…7dc2               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x0050, t01=0x00d0}
0x7dc2…7de6               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) VA2:60 SAME CYLINDER«, t00=0x0050, t01=0x00e4}
0x7de6…7e04               Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEW CYLINDER«, t00=0x0050, t01=0x0108}
0x7e04…7e18               Head {h00=0x0010, h01=0x0050, text=»VA2:60 EQU *«, t00=0x0050, t01=0x0126}
0x7e18…7e42               Head {h00=0x0026, h01=0x0050, text=» STR A3,A6 PHYSICAL SECTOR NUMBER «, t00=0x0050, t01=0x013a}
0x7e42…7e54               Head {h00=0x000e, h01=0x0050, text=» RB SEE:96«, t00=0x0050, t01=0x0164}
0x7e54…7e60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0050, t01=0x0176}
0x7e60…7e6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0182}
0x7e6a…7e80               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0050, t01=0x018c}
0x7e80…7e96               Head {h00=0x0012, h01=0x000e, text=» EJECT  DRDU01«, t00=0x0051, t01=0x0012}
0x7e96…7ea0               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0051, t01=0x0028}
0x7ea0…7ec4               Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x0032}
0x7ec4…7ee8               Head {h00=0x0020, h01=0x0050, text=»*                          *«, t00=0x0051, t01=0x0056}
0x7ee8…7f0c               Head {h00=0x0020, h01=0x0050, text=»*   SUBROUTINES FOR WRITE  *«, t00=0x0051, t01=0x007a}
0x7f0c…7f30               Head {h00=0x0020, h01=0x0050, text=»*   FROM USER BUFFER:      *«, t00=0x0051, t01=0x009e}
0x7f30…7f54               Head {h00=0x0020, h01=0x0050, text=»*   FROM DRIVER     :      *«, t00=0x0051, t01=0x00c2}
0x7f54…7f78               Head {h00=0x0020, h01=0x0050, text=»*                          *«, t00=0x0051, t01=0x00e6}
0x7f78…7f9c               Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x010a}
0x7f9c…7fa6               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0051, t01=0x012e}
0x7fa6…7fba               Head {h00=0x0010, h01=0x0050, text=»WRI:00 EQU *«, t00=0x0051, t01=0x0138}
0x7fba…7fd8               Head {h00=0x001a, h01=0x0016, text=» LDK A4,QRETRY RETRIES«, t00=0x0051, t01=0x014c}
0x7fd8…7fec               Head {h00=0x0010, h01=0x0050, text=»WRI:20 EQU *«, t00=0x0051, t01=0x016a}
0x7fec…8002               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0051, t01=0x017e}
0x8002…8018 (82, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0052, t01=0x0004}
0x8018…8024               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x001a}
0x8024…803a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0052, t01=0x0026}
0x803a…8068               Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0052, t01=0x003c}
0x8068…8080               Head {h00=0x0014, h01=0x0010, text=» CF A5,WRITE CIO«, t00=0x0052, t01=0x006a}
0x8080…80a2               Head {h00=0x001e, h01=0x0019, text=» ANK A1,/1F RETURN CODE ? «, t00=0x0052, t01=0x0082}
0x80a2…80b8               Head {h00=0x0012, h01=0x0050, text=» CF A5,BSELOD «, t00=0x0052, t01=0x00a4}
0x80b8…80dc               Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRI:80 NO RETURN CODE«, t00=0x0052, t01=0x00ba}
0x80dc…8100               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0052, t01=0x00de}
0x8100…812a               Head {h00=0x0026, h01=0x0021, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0052, t01=0x0102}
0x812a…8140               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) WRI:20«, t00=0x0052, t01=0x012c}
0x8140…8170               Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0052, t01=0x0142}
0x8170…817c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x0172}
0x817c…8186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x017e}
0x8186…819a               Head {h00=0x0010, h01=0x0050, text=»WRI:50 EQU *«, t00=0x0052, t01=0x0188}
0x819a…81ba               Head {h00=0x001c, h01=0x0050, text=» ABL END:10 ERROR END IO«, t00=0x0053, t01=0x000c}
0x81ba…81c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x002c}
0x81c4…81da               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0053, t01=0x0036}
0x81da…81e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x004c}
0x81e4…81f8               Head {h00=0x0010, h01=0x0050, text=»WRI:80 EQU *«, t00=0x0053, t01=0x0056}
0x81f8…8208               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0053, t01=0x006a}
0x8208…8212               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0053, t01=0x007a}
0x8212…8228               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0053, t01=0x0084}
0x8228…8232               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x009a}
0x8232…825c               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0053, t01=0x00a4}
0x825c…8286               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0053, t01=0x00ce}
0x8286…82b0               Head {h00=0x0026, h01=0x0050, text=»*   SUBROUTINES FOR READ TO     * «, t00=0x0053, t01=0x00f8}
0x82b0…82da               Head {h00=0x0026, h01=0x0050, text=»*   USER BUFFER :               * «, t00=0x0053, t01=0x0122}
0x82da…8304               Head {h00=0x0026, h01=0x0050, text=»*   DRIVER BUFFER :             * «, t00=0x0053, t01=0x014c}
0x8304…832e               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0053, t01=0x0176}
0x832e…8358               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0054, t01=0x0010}
0x8358…8362               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x003a}
0x8362…8376               Head {h00=0x0010, h01=0x0050, text=»REA:00 EQU *«, t00=0x0054, t01=0x0044}
0x8376…8398               Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTOR,A6 GET INDEX «, t00=0x0054, t01=0x0058}
0x8398…83ae               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/300 «, t00=0x0054, t01=0x007a}
0x83ae…83cc               Head {h00=0x001a, h01=0x0050, text=» SLL A3,6 IN POSITION «, t00=0x0054, t01=0x0090}
0x83cc…83f2               Head {h00=0x0022, h01=0x0050, text=» ORR* A3,A6 ADD SECTOR NUMBER «, t00=0x0054, t01=0x00ae}
0x83f2…841a               Head {h00=0x0024, h01=0x0050, text=» CW A3,DWTBSE,A6 ALLREADY READ ?«, t00=0x0054, t01=0x00d4}
0x841a…8430               Head {h00=0x0012, h01=0x0050, text=» RF(E) REA:85 «, t00=0x0054, t01=0x00fc}
0x8430…8444               Head {h00=0x0010, h01=0x0050, text=»REA:10 EQU *«, t00=0x0054, t01=0x0112}
0x8444…845a               Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0054, t01=0x0126}
0x845a…846e               Head {h00=0x0010, h01=0x0050, text=»REA:20 EQU *«, t00=0x0054, t01=0x013c}
0x846e…8484               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0054, t01=0x0150}
0x8484…849a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0054, t01=0x0166}
0x849a…84a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0054, t01=0x017c}
0x84a6…84bc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0054, t01=0x0188}
0x84bc…84ea               Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0055, t01=0x000e}
0x84ea…850a               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ SECTOR «, t00=0x0055, t01=0x003c}
0x850a…851c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0055, t01=0x005c}
0x851c…8550               Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0055, t01=0x006e}
0x8550…8574               Head {h00=0x0020, h01=0x0050, text=» RF(Z) REA:30 NO RETURN CODE«, t00=0x0055, t01=0x00a2}
0x8574…8588               Head {h00=0x0010, h01=0x0050, text=»REA:25 EQU *«, t00=0x0055, t01=0x00c6}
0x8588…85ac               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0055, t01=0x00da}
0x85ac…85d6               Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0055, t01=0x00fe}
0x85d6…85f2               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) REA:20 RETRY«, t00=0x0055, t01=0x0128}
0x85f2…8606               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0055, t01=0x0144}
0x8606…8610               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0158}
0x8610…8626               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0055, t01=0x0162}
0x8626…8630               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0178}
0x8630…863a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0055, t01=0x0182}
0x863a…864e               Head {h00=0x0010, h01=0x0050, text=»REA:30 EQU *«, t00=0x0055, t01=0x018c}
0x864e…8666               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0056, t01=0x0010}
0x8666…8692               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) REA:40 READ TO DRIVER BUFFER«, t00=0x0056, t01=0x0028}
0x8692…86a8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0056, t01=0x0054}
0x86a8…86e2               Head {h00=0x0036, h01=0x0050, text=» LD* A3,DWTUBU,A6 GET CYLINDER ID FROM USER BUFFER«, t00=0x0056, t01=0x006a}
0x86e2…86f4               Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0056, t01=0x00a4}
0x86f4…8700               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x00b6}
0x8700…870a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x00c2}
0x870a…8720               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0056, t01=0x00cc}
0x8720…8736               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0056, t01=0x00e2}
0x8736…8762               Head {h00=0x0028, h01=0x0050, text=» ML 2,DWTBA1,A6 GET PHYSICAL ADDRESS«, t00=0x0056, t01=0x00f8}
0x8762…8784               Head {h00=0x001e, h01=0x0050, text=» RF(Z) REA:35 SYSTEM AREA «, t00=0x0056, t01=0x0124}
0x8784…87a6               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x0056, t01=0x0146}
0x87a6…87c8               Head {h00=0x001e, h01=0x0050, text=» TL DWTPAG,A6 LOAD MMUPAGE«, t00=0x0056, t01=0x0168}
0x87c8…87fc               Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0056, t01=0x018a}
0x87fc…8820               Head {h00=0x0020, h01=0x0050, text=» EL A3,PHSECL,A3 GET CYL ID «, t00=0x0057, t01=0x002e}
0x8820…8844               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x0057, t01=0x0052}
0x8844…8856               Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0057, t01=0x0076}
0x8856…886a               Head {h00=0x0010, h01=0x0050, text=»REA:35 EQU *«, t00=0x0057, t01=0x0088}
0x886a…8890               Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 ADDRESS TO BYTE MODE«, t00=0x0057, t01=0x009c}
0x8890…88b4               Head {h00=0x0020, h01=0x0050, text=» LD A3,PHSECL,A2 GET CYL ID «, t00=0x0057, t01=0x00c2}
0x88b4…88c6               Head {h00=0x000e, h01=0x0050, text=» RF REA:50«, t00=0x0057, t01=0x00e6}
0x88c6…88d2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00f8}
0x88d2…88dc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x0104}
0x88dc…88f2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0057, t01=0x010e}
0x88f2…8906               Head {h00=0x0010, h01=0x0050, text=»REA:40 EQU *«, t00=0x0057, t01=0x0124}
0x8906…892e               Head {h00=0x0024, h01=0x0050, text=» LD A3,BUFFER+PHSECL GET CYL ID «, t00=0x0057, t01=0x0138}
0x892e…8942               Head {h00=0x0010, h01=0x0050, text=»REA:50 EQU *«, t00=0x0057, t01=0x0160}
0x8942…8958               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0057, t01=0x0174}
0x8958…896e               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0057, t01=0x018a}
0x896e…8986               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A2«, t00=0x0058, t01=0x0010}
0x8986…8992               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0028}
0x8992…89a8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0058, t01=0x0034}
0x89a8…89be               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0058, t01=0x004a}
0x89be…89d6               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0058, t01=0x0060}
0x89d6…89e2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0058, t01=0x0078}
0x89e2…89f8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0058, t01=0x0084}
0x89f8…8a20               Head {h00=0x0024, h01=0x0050, text=» RF(E) REA:90 RIGHT CYLINDER ID «, t00=0x0058, t01=0x009a}
0x8a20…8a3c               Head {h00=0x0018, h01=0x0050, text=» LDK A1,2 SEEK ERROR«, t00=0x0058, t01=0x00c2}
0x8a3c…8a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00de}
0x8a46…8a5c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0058, t01=0x00e8}
0x8a5c…8a66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x00fe}
0x8a66…8a70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0108}
0x8a70…8a82               Head {h00=0x000e, h01=0x0050, text=» RB REA:25«, t00=0x0058, t01=0x0112}
0x8a82…8a96               Head {h00=0x0010, h01=0x0050, text=»REA:85 EQU *«, t00=0x0058, t01=0x0124}
0x8a96…8aae               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTFBU,A6«, t00=0x0058, t01=0x0138}
0x8aae…8ada               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) REA:90 READ TO DRIVER BUFFER«, t00=0x0058, t01=0x0150}
0x8ada…8b02               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,/180 BYTES TO BE MOVED «, t00=0x0058, t01=0x017c}
0x8b02…8b18               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0059, t01=0x0014}
0x8b18…8b2a               Head {h00=0x000e, h01=0x0050, text=» NGR A2,A4«, t00=0x0059, t01=0x002a}
0x8b2a…8b6e               Head {h00=0x0040, h01=0x0050, text=» ADS A2,DWTUBU,A6 RESET USER BUFFER POINTER FOR DIRECT MOVE «, t00=0x0059, t01=0x003c}
0x8b6e…8b7a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0080}
0x8b7a…8b90               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0059, t01=0x008c}
0x8b90…8bba               Head {h00=0x0026, h01=0x0050, text=» CF A5,MOVRED MOVE TO USER BUFFER «, t00=0x0059, t01=0x00a2}
0x8bba…8bce               Head {h00=0x0010, h01=0x0050, text=»REA:90 EQU *«, t00=0x0059, t01=0x00cc}
0x8bce…8bde               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0059, t01=0x00e0}
0x8bde…8be8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x00f0}
0x8be8…8bfe               Head {h00=0x0012, h01=0x000e, text=» EJECT  DRDU01«, t00=0x0059, t01=0x00fa}
0x8bfe…8c08               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x0110}
0x8c08…8c12               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0059, t01=0x011a}
0x8c12…8c40               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0059, t01=0x0124}
0x8c40…8c6e               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0059, t01=0x0152}
0x8c6e…8c9c               Head {h00=0x002a, h01=0x0050, text=»*   SUBROUTINES FOR MOVING WORDS    * «, t00=0x0059, t01=0x0180}
0x8c9c…8cc6               Head {h00=0x0026, h01=0x0050, text=»*   USER BUFFER TO DRIVER BUFFER: «, t00=0x005a, t01=0x001e}
0x8cc6…8cf4               Head {h00=0x002a, h01=0x0050, text=»*   MOVWRI                          * «, t00=0x005a, t01=0x0048}
0x8cf4…8d22               Head {h00=0x002a, h01=0x0050, text=»*   DRIVER BUFFER TO USER BUFFER    * «, t00=0x005a, t01=0x0076}
0x8d22…8d50               Head {h00=0x002a, h01=0x0050, text=»*   MOVRED                          * «, t00=0x005a, t01=0x00a4}
0x8d50…8d7e               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x005a, t01=0x00d2}
0x8d7e…8dac               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x005a, t01=0x0100}
0x8dac…8db6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x012e}
0x8db6…8dd8               Head {h00=0x001e, h01=0x001a, text=»*   A1   BUFFER ADDRESS IN«, t00=0x005a, t01=0x0138}
0x8dd8…8dfc               Head {h00=0x0020, h01=0x001b, text=»*   A2   BUFFER ADDRESS OUT «, t00=0x005a, t01=0x015a}
0x8dfc…8e1a               Head {h00=0x001a, h01=0x0016, text=»*   A4   BUFFER LENGTH«, t00=0x005a, t01=0x017e}
0x8e1a…8e30               Head {h00=0x0012, h01=0x000d, text=»*   A3   USED «, t00=0x005b, t01=0x000c}
0x8e30…8e3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0022}
0x8e3a…8e4e               Head {h00=0x0010, h01=0x0050, text=»MOVRED EQU *«, t00=0x005b, t01=0x002c}
0x8e4e…8e66               Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFFER «, t00=0x005b, t01=0x0040}
0x8e66…8e82               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005b, t01=0x0058}
0x8e82…8eb8               Head {h00=0x0032, h01=0x0050, text=» LD A2,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005b, t01=0x0074}
0x8eb8…8ec4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x00aa}
0x8ec4…8ece               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x00b6}
0x8ece…8ee4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005b, t01=0x00c0}
0x8ee4…8f00               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005b, t01=0x00d6}
0x8f00…8f16               Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005b, t01=0x00f2}
0x8f16…8f46               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005b, t01=0x0108}
0x8f46…8f7a               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005b, t01=0x0138}
0x8f7a…8f8a               Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005b, t01=0x016c}
0x8f8a…8f96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x017c}
0x8f96…8fa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x0188}
0x8fa0…8fb6 (92, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005c, t01=0x0004}
0x8fb6…8fcc               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005c, t01=0x001a}
0x8fcc…8fe2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005c, t01=0x0030}
0x8fe2…9016               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005c, t01=0x0046}
0x9016…9032               Head {h00=0x0018, h01=0x0050, text=» SLL A2,1 BYTE MODE «, t00=0x005c, t01=0x007a}
0x9032…9054               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005c, t01=0x0096}
0x9054…906a               Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005c, t01=0x00b8}
0x906a…9096               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005c, t01=0x00ce}
0x9096…90a6               Head {h00=0x000c, h01=0x0050, text=» MVSU A4«, t00=0x005c, t01=0x00fa}
0x90a6…90b2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x010a}
0x90b2…90bc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0116}
0x90bc…90d2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005c, t01=0x0120}
0x90d2…90e4               Head {h00=0x000e, h01=0x0050, text=» RF MOV:00«, t00=0x005c, t01=0x0136}
0x90e4…90ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0148}
0x90ee…9104               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x005c, t01=0x0152}
0x9104…910e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0168}
0x910e…9118               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0172}
0x9118…912c               Head {h00=0x0010, h01=0x0050, text=»MOVWRI EQU *«, t00=0x005c, t01=0x017c}
0x912c…915a               Head {h00=0x002a, h01=0x0050, text=» ADKL A2,BUFFER DRIVER BUFFER POINTER «, t00=0x005c, t01=0x0190}
0x915a…9176               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005d, t01=0x002e}
0x9176…91ac               Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005d, t01=0x004a}
0x91ac…91b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0080}
0x91b8…91c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x008c}
0x91c2…91d8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x0096}
0x91d8…91f4               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005d, t01=0x00ac}
0x91f4…920a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005d, t01=0x00c8}
0x920a…923a               Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005d, t01=0x00de}
0x923a…926e               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005d, t01=0x010e}
0x926e…927e               Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005d, t01=0x0142}
0x927e…928a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0152}
0x928a…9294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x015e}
0x9294…92aa               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x0168}
0x92aa…92c0               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005d, t01=0x017e}
0x92c0…92d6 (94, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005e, t01=0x0004}
0x92d6…930a               Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005e, t01=0x001a}
0x930a…9326               Head {h00=0x0018, h01=0x0050, text=» SLL A1,1 BYTE MODE «, t00=0x005e, t01=0x004e}
0x9326…9348               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005e, t01=0x006a}
0x9348…935e               Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005e, t01=0x008c}
0x935e…938a               Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005e, t01=0x00a2}
0x938a…939a               Head {h00=0x000c, h01=0x0050, text=» MVUS A4«, t00=0x005e, t01=0x00ce}
0x939a…93a6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00de}
0x93a6…93b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00ea}
0x93b0…93c6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x00f4}
0x93c6…93da               Head {h00=0x0010, h01=0x000c, text=»MOV:00 EQU *«, t00=0x005e, t01=0x010a}
0x93da…93f6               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005e, t01=0x011e}
0x93f6…942a               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005e, t01=0x013a}
0x942a…9436               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x016e}
0x9436…9440               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x017a}
0x9440…9456               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x0184}
0x9456…946c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005f, t01=0x000a}
0x946c…9490               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x005f, t01=0x0020}
0x9490…949c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x0044}
0x949c…94a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0050}
0x94a6…94bc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005f, t01=0x005a}
0x94bc…94d8               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005f, t01=0x0070}
0x94d8…94ee               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x005f, t01=0x008c}
0x94ee…94f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00a2}
0x94f8…950e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x005f, t01=0x00ac}
0x950e…9518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00c2}
0x9518…9522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00cc}
0x9522…9536               Head {h00=0x0010, h01=0x0050, text=»MOV:10 EQU *«, t00=0x005f, t01=0x00d6}
0x9536…954a               Head {h00=0x0010, h01=0x000b, text=» LDR* A3,A1 «, t00=0x005f, t01=0x00ea}
0x954a…955c               Head {h00=0x000e, h01=0x000a, text=» STR A3,A2«, t00=0x005f, t01=0x00fe}
0x955c…956e               Head {h00=0x000e, h01=0x0009, text=» ADK A1,2 «, t00=0x005f, t01=0x0110}
0x956e…9580               Head {h00=0x000e, h01=0x0009, text=» ADK A2,2 «, t00=0x005f, t01=0x0122}
0x9580…9592               Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x005f, t01=0x0134}
0x9592…95a8               Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:10 «, t00=0x005f, t01=0x0146}
0x95a8…95b4               Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x005f, t01=0x015c}
0x95b4…95be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0168}
0x95be…95d4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005f, t01=0x0172}
0x95d4…95ea               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005f, t01=0x0188}
0x95ea…9606               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x0060, t01=0x000e}
0x9606…9632               Head {h00=0x0028, h01=0x0050, text=» MSR 12,A15 SAVE REGISTERS ON STACK «, t00=0x0060, t01=0x002a}
0x9632…9656               Head {h00=0x0020, h01=0x0050, text=» LDR A11,A4 NUMBER OF BYTES «, t00=0x0060, t01=0x0056}
0x9656…9678               Head {h00=0x001e, h01=0x0050, text=» LDR A10,A2 OUTPUT ADDRESS«, t00=0x0060, t01=0x007a}
0x9678…9698               Head {h00=0x001c, h01=0x0050, text=» LDR A9,A1 INPUT ADDRESS«, t00=0x0060, t01=0x009c}
0x9698…96c0               Head {h00=0x0024, h01=0x0050, text=» LDKL A12,16 BYTES IN EACH LOOP «, t00=0x0060, t01=0x00bc}
0x96c0…96d4               Head {h00=0x0010, h01=0x0050, text=»MOV:15 EQU *«, t00=0x0060, t01=0x00e4}
0x96d4…96e6               Head {h00=0x000e, h01=0x0050, text=» MLR 8,A9 «, t00=0x0060, t01=0x00f8}
0x96e6…96f8               Head {h00=0x000e, h01=0x0050, text=» MSR 8,A10«, t00=0x0060, t01=0x010a}
0x96f8…970c               Head {h00=0x0010, h01=0x0050, text=» ADR A10,A12«, t00=0x0060, t01=0x011c}
0x970c…9720               Head {h00=0x0010, h01=0x0050, text=» ADR A9,A12 «, t00=0x0060, t01=0x0130}
0x9720…9734               Head {h00=0x0010, h01=0x0050, text=» SUR A11,A12«, t00=0x0060, t01=0x0144}
0x9734…974a               Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:15 «, t00=0x0060, t01=0x0158}
0x974a…977a               Head {h00=0x002c, h01=0x0050, text=» MLR 12,A15 RESTORE REGISTERS FROM STACK«, t00=0x0060, t01=0x016e}
0x977a…9786               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x000e}
0x9786…9790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x001a}
0x9790…97a6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0061, t01=0x0024}
0x97a6…97b6               Head {h00=0x000c, h01=0x0007, text=» RTN A5 «, t00=0x0061, t01=0x003a}
0x97b6…97c0               Head {h00=0x0006, h01=0x0003, text=»* «, t00=0x0061, t01=0x004a}
0x97c0…97cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0061, t01=0x0054}
0x97cc…97d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0060}
0x97d6…97ec               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0061, t01=0x006a}
0x97ec…9802               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0061, t01=0x0080}
0x9802…980c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0096}
0x980c…9816               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00a0}
0x9816…983a               Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x00aa}
0x983a…985e               Head {h00=0x0020, h01=0x0050, text=»*                         * «, t00=0x0061, t01=0x00ce}
0x985e…9882               Head {h00=0x0020, h01=0x0050, text=»*   DIV31                 * «, t00=0x0061, t01=0x00f2}
0x9882…98a6               Head {h00=0x0020, h01=0x0050, text=»*                         * «, t00=0x0061, t01=0x0116}
0x98a6…98ca               Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x013a}
0x98ca…98d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x015e}
0x98d4…9904               Head {h00=0x002c, h01=0x0050, text=»*   INPUT: ECBCW2=LOGICAL SECTOR NUMBER «, t00=0x0061, t01=0x0168}
0x9904…9938               Head {h00=0x0030, h01=0x0050, text=»*   OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER«, t00=0x0062, t01=0x0008}
0x9938…9942               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x003c}
0x9942…9956               Head {h00=0x0010, h01=0x0050, text=»DIV31 EQU * «, t00=0x0062, t01=0x0046}
0x9956…9960               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0062, t01=0x005a}
0x9960…9976               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0062, t01=0x0064}
0x9976…99a8               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x0062, t01=0x007a}
0x99a8…99ba               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0062, t01=0x00ac}
0x99ba…99cc               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0062, t01=0x00be}
0x99cc…99e0               Head {h00=0x0010, h01=0x0050, text=»DIV:20 EQU *«, t00=0x0062, t01=0x00d0}
0x99e0…99fc               Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I0:=I0+I1«, t00=0x0062, t01=0x00e4}
0x99fc…9a18               Head {h00=0x0018, h01=0x0050, text=» SRL A3,5 I1:=I1/32 «, t00=0x0062, t01=0x0100}
0x9a18…9a2e               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DIV:20«, t00=0x0062, t01=0x011c}
0x9a2e…9a40               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0062, t01=0x0132}
0x9a40…9a5a               Head {h00=0x0016, h01=0x0050, text=» ANKL A3,/FFE0 32*«, t00=0x0062, t01=0x0144}
0x9a5a…9a74               Head {h00=0x0016, h01=0x0050, text=» SRL A2,5 TRUNCATE«, t00=0x0062, t01=0x015e}
0x9a74…9a86               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A2«, t00=0x0062, t01=0x0178}
0x9a86…9a98               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A1«, t00=0x0062, t01=0x018a}
0x9a98…9aaa               Head {h00=0x000e, h01=0x0050, text=» ADK A3,31«, t00=0x0063, t01=0x000c}
0x9aaa…9ac0               Head {h00=0x0012, h01=0x0050, text=» RF(P) DIV:30 «, t00=0x0063, t01=0x001e}
0x9ac0…9ae0               Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 NEXT CYLINDER «, t00=0x0063, t01=0x0034}
0x9ae0…9af4               Head {h00=0x0010, h01=0x0050, text=»DIV:30 EQU *«, t00=0x0063, t01=0x0054}
0x9af4…9b06               Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0063, t01=0x0068}
0x9b06…9b26               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:50 CYLINDER 0«, t00=0x0063, t01=0x007a}
0x9b26…9b38               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0063, t01=0x009a}
0x9b38…9b4a               Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0063, t01=0x00ac}
0x9b4a…9b54               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00be}
0x9b54…9b6a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0063, t01=0x00c8}
0x9b6a…9b74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00de}
0x9b74…9b7e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e8}
0x9b7e…9b92               Head {h00=0x0010, h01=0x0050, text=»DIV:50 EQU *«, t00=0x0063, t01=0x00f2}
0x9b92…9bc6               Head {h00=0x0030, h01=0x0050, text=» STR A1,A6 PUT PHYSICAL SECTOR NUMBER IN DWT«, t00=0x0063, t01=0x0106}
0x9bc6…9bd6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0063, t01=0x013a}
0x9bd6…9be0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x014a}
0x9be0…9bec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x0154}
0x9bec…9bf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0160}
0x9bf6…9c0c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0063, t01=0x016a}
0x9c0c…9c22               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0063, t01=0x0180}
0x9c22…9c4c               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SECTOR NUMBER«, t00=0x0064, t01=0x0008}
0x9c4c…9c76               Head {h00=0x0026, h01=0x0050, text=» STR A2,A6 PHYSICAL SECTOR NUMBER «, t00=0x0064, t01=0x0032}
0x9c76…9c88               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0064, t01=0x005c}
0x9c88…9c98               Head {h00=0x000c, h01=0x0050, text=» DVK 31 «, t00=0x0064, t01=0x006e}
0x9c98…9caa               Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0064, t01=0x007e}
0x9caa…9cca               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:10 CYLINDER 0«, t00=0x0064, t01=0x0090}
0x9cca…9cdc               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0064, t01=0x00b0}
0x9cdc…9cf0               Head {h00=0x0010, h01=0x0050, text=»DIV:10 EQU *«, t00=0x0064, t01=0x00c2}
0x9cf0…9d1a               Head {h00=0x0026, h01=0x0050, text=» ADRS A2,A6 PHYSICAL SECTOR NUMBER«, t00=0x0064, t01=0x00d6}
0x9d1a…9d2a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0064, t01=0x0100}
0x9d2a…9d36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0110}
0x9d36…9d40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x011c}
0x9d40…9d56               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0064, t01=0x0126}
0x9d56…9d60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x013c}
0x9d60…9d8a               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0064, t01=0x0146}
0x9d8a…9db4               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0064, t01=0x0170}
0x9db4…9dde               Head {h00=0x0026, h01=0x0050, text=»*   SUBROUTINES FOR             * «, t00=0x0065, t01=0x000a}
0x9dde…9e08               Head {h00=0x0026, h01=0x0050, text=»*   INTERLACING AND/OR          * «, t00=0x0065, t01=0x0034}
0x9e08…9e32               Head {h00=0x0026, h01=0x0050, text=»*   SKEWING                     * «, t00=0x0065, t01=0x005e}
0x9e32…9e5c               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0065, t01=0x0088}
0x9e5c…9e86               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0065, t01=0x00b2}
0x9e86…9e90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00dc}
0x9e90…9ed6               Head {h00=0x0042, h01=0x0050, text=»*  OUTPUT : A3 CONTAINING INTERLACED AND SKEWED SECTOR NUMBER «, t00=0x0065, t01=0x00e6}
0x9ed6…9ee0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x012c}
0x9ee0…9ef4               Head {h00=0x0010, h01=0x0050, text=»INLACE EQU *«, t00=0x0065, t01=0x0136}
0x9ef4…9f22               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0065, t01=0x014a}
0x9f22…9f34               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0065, t01=0x0178}
0x9f34…9f46               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x0065, t01=0x018a}
0x9f46…9f6e               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A1 INTERLACING FACTOR 3 «, t00=0x0066, t01=0x000c}
0x9f6e…9f80               Head {h00=0x000e, h01=0x0050, text=»SKEW EQU *«, t00=0x0066, t01=0x0034}
0x9f80…9f96               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0066, t01=0x0046}
0x9f96…9fc2               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0066, t01=0x005c}
0x9fc2…9fce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x0088}
0x9fce…9fe4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0066, t01=0x0094}
0x9fe4…a010               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0066, t01=0x00aa}
0xa010…a01c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x00d6}
0xa01c…a02e               Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0066, t01=0x00e2}
0xa02e…a052               Head {h00=0x0020, h01=0x0050, text=» RF(Z) INLAC5 EVEN CYLINDER «, t00=0x0066, t01=0x00f4}
0xa052…a078               Head {h00=0x0022, h01=0x0050, text=» ADK A3,8 SKEW FACTOR 180 DEG.«, t00=0x0066, t01=0x0118}
0xa078…a08c               Head {h00=0x0010, h01=0x0050, text=»INLAC5 EQU *«, t00=0x0066, t01=0x013e}
0xa08c…a0a0               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/1F «, t00=0x0066, t01=0x0152}
0xa0a0…a0be               Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 IN POSITION «, t00=0x0066, t01=0x0166}
0xa0be…a0ce               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x0184}
0xa0ce…a0d8 (103, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0004}
0xa0d8…a0ee               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0067, t01=0x000e}
0xa0ee…a104               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0067, t01=0x0024}
0xa104…a10e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x003a}
0xa10e…a118               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0044}
0xa118…a12a               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0067, t01=0x004e}
0xa12a…a13c               Head {h00=0x000e, h01=0x0050, text=»* INXUNI *«, t00=0x0067, t01=0x0060}
0xa13c…a14e               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0067, t01=0x0072}
0xa14e…a158               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0084}
0xa158…a190               Head {h00=0x0034, h01=0x0050, text=»*   OUTPUT  A2=DOUBLED UNIT INDEX + DWT ADDRESS «, t00=0x0067, t01=0x008e}
0xa190…a19a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00c6}
0xa19a…a1ae               Head {h00=0x0010, h01=0x0050, text=»INXUNI EQU *«, t00=0x0067, t01=0x00d0}
0xa1ae…a1c6               Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTOR,A6 «, t00=0x0067, t01=0x00e4}
0xa1c6…a1d8               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0067, t01=0x00fc}
0xa1d8…a1ea               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0067, t01=0x010e}
0xa1ea…a1fa               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0067, t01=0x0120}
0xa1fa…a206               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x0130}
0xa206…a210               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x013c}
0xa210…a226               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0067, t01=0x0146}
0xa226…a23c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0067, t01=0x015c}
0xa23c…a246               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0172}
0xa246…a250               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x017c}
0xa250…a282               Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0067, t01=0x0186}
0xa282…a2b4               Head {h00=0x002e, h01=0x0050, text=»*                                        *«, t00=0x0068, t01=0x0028}
0xa2b4…a2e6               Head {h00=0x002e, h01=0x0050, text=»*   MMULOG : GET LOGICAL ADDRESS AND     *«, t00=0x0068, t01=0x005a}
0xa2e6…a318               Head {h00=0x002e, h01=0x0050, text=»*            PAGE                        *«, t00=0x0068, t01=0x008c}
0xa318…a34a               Head {h00=0x002e, h01=0x0050, text=»*                                        *«, t00=0x0068, t01=0x00be}
0xa34a…a37c               Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0068, t01=0x00f0}
0xa37c…a386               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x0122}
0xa386…a390               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x012c}
0xa390…a3a4               Head {h00=0x0010, h01=0x0050, text=»MMULOG EQU *«, t00=0x0068, t01=0x0136}
0xa3a4…a3d6               Head {h00=0x002e, h01=0x0050, text=» MS 2,DWTBA1,A6 SAVE PHYSICAL WORD ADDRESS«, t00=0x0068, t01=0x014a}
0xa3d6…a3e4               Head {h00=0x000a, h01=0x0050, text=» DLA 4«, t00=0x0068, t01=0x017c}
0xa3e4…a402               Head {h00=0x001a, h01=0x0050, text=» SRC A1,6 IN POSITION «, t00=0x0068, t01=0x018a}
0xa402…a420               Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTPAG,A6 PAGE «, t00=0x0069, t01=0x0018}
0xa420…a440               Head {h00=0x001c, h01=0x0050, text=» ADKL A1,/400 NEXT PAGE «, t00=0x0069, t01=0x0036}
0xa440…a46c               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE «, t00=0x0069, t01=0x0056}
0xa46c…a47e               Head {h00=0x000e, h01=0x0050, text=» SRL A2,3 «, t00=0x0069, t01=0x0082}
0xa47e…a4a6               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTUBU,A6 LOGICAL ADDRESS«, t00=0x0069, t01=0x0094}
0xa4a6…a4b6               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0069, t01=0x00bc}
0xa4b6…a4c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00cc}
0xa4c0…a4cc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x00d6}
0xa4cc…a4d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00e2}
0xa4d6…a4ee               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0069, t01=0x00ec}
0xa4ee…a4f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0104}
0xa4f8…a50e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0069, t01=0x010e}
0xa50e…a518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0124}
0xa518…a522               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x012e}
0xa522…a548               Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0069, t01=0x0138}
0xa548…a552               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x015e}
0xa552…a57c               Head {h00=0x0026, h01=0x0050, text=»*  UPDATE DRIVER BUFFER INDICATOR «, t00=0x0069, t01=0x0168}
0xa57c…a586 (106, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0004}
0xa586…a5ae               Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x006a, t01=0x000e}
0xa5ae…a5b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0036}
0xa5b8…a5e6               Head {h00=0x002a, h01=0x0050, text=»*   INPUT  A1=RETURN CODE (AFTER READ)«, t00=0x006a, t01=0x0040}
0xa5e6…a618               Head {h00=0x002e, h01=0x0050, text=»*   OUTPUT DWTBSE=DRIVER BUFFER INDICATOR «, t00=0x006a, t01=0x006e}
0xa618…a622               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x00a0}
0xa622…a636               Head {h00=0x0010, h01=0x0050, text=»BSELOD EQU *«, t00=0x006a, t01=0x00aa}
0xa636…a660               Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A6 GET READ SECTOR NUMBER«, t00=0x006a, t01=0x00be}
0xa660…a686               Head {h00=0x0022, h01=0x0050, text=»BSEL00 EQU * FROM SEEK VERIFY «, t00=0x006a, t01=0x00e8}
0xa686…a69e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x006a, t01=0x010e}
0xa69e…a6ce               Head {h00=0x002c, h01=0x0050, text=» RF(Z) BSEL50 READ/WRITE TO USER BUFFER «, t00=0x006a, t01=0x0126}
0xa6ce…a6ea               Head {h00=0x0018, h01=0x0050, text=» LDKL A2,/FFFF DUMMY«, t00=0x006a, t01=0x0156}
0xa6ea…a6fc               Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x006a, t01=0x0172}
0xa6fc…a71e               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BSEL40 READ ERROR «, t00=0x006a, t01=0x0184}
0xa71e…a740               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET INDEX «, t00=0x006b, t01=0x0016}
0xa740…a756               Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/300 «, t00=0x006b, t01=0x0038}
0xa756…a768               Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x006b, t01=0x004e}
0xa768…a77a               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x006b, t01=0x0060}
0xa77a…a78e               Head {h00=0x0010, h01=0x0050, text=»BSEL40 EQU *«, t00=0x006b, t01=0x0072}
0xa78e…a7c6               Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR «, t00=0x006b, t01=0x0086}
0xa7c6…a7da               Head {h00=0x0010, h01=0x0050, text=»BSEL50 EQU *«, t00=0x006b, t01=0x00be}
0xa7da…a7ea               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006b, t01=0x00d2}
0xa7ea…a7f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x00e2}
0xa7f4…a80a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x006b, t01=0x00ec}
0xa80a…a814               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0102}
0xa814…a81e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x010c}
0xa81e…a84e               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006b, t01=0x0116}
0xa84e…a87e               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x006b, t01=0x0146}
0xa87e…a8ae               Head {h00=0x002c, h01=0x0050, text=»*   RESTORE WORD TO USER BUFFER       * «, t00=0x006b, t01=0x0176}
0xa8ae…a8de               Head {h00=0x002c, h01=0x0050, text=»*   IF NECESSARY                      * «, t00=0x006c, t01=0x0016}
0xa8de…a90e               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x006c, t01=0x0046}
0xa90e…a93e               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006c, t01=0x0076}
0xa93e…a948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00a6}
0xa948…a976               Head {h00=0x002a, h01=0x0050, text=»*   INPUT: DWTFSW=SAVED WORD INDICATOR«, t00=0x006c, t01=0x00b0}
0xa976…a99a               Head {h00=0x0020, h01=0x0050, text=»*          DWTSWD=SAVED WORD«, t00=0x006c, t01=0x00de}
0xa99a…a9ca               Head {h00=0x002c, h01=0x0050, text=»*          DWTUBU=POINTER TO USER BUFFER«, t00=0x006c, t01=0x0102}
0xa9ca…a9d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x0132}
0xa9d4…a9e8               Head {h00=0x0010, h01=0x0050, text=»REWORD EQU *«, t00=0x006c, t01=0x013c}
0xa9e8…aa00               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTFSW,A6«, t00=0x006c, t01=0x0150}
0xaa00…aa24               Head {h00=0x0020, h01=0x0050, text=» RF(Z) REWO50 NO SAVED WORD «, t00=0x006c, t01=0x0168}
0xaa24…aa3c               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTSWD,A6«, t00=0x006c, t01=0x018c}
0xaa3c…aa52               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006d, t01=0x0014}
0xaa52…aa7c               Head {h00=0x0026, h01=0x0050, text=» ML 2,DWTBA1,A6 GET BUFFER ADDRESS«, t00=0x006d, t01=0x002a}
0xaa7c…aa9e               Head {h00=0x001e, h01=0x0050, text=» RF(Z) REWO20 SYSTEM AREA «, t00=0x006d, t01=0x0054}
0xaa9e…aac0               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x006d, t01=0x0076}
0xaac0…aae8               Head {h00=0x0024, h01=0x0050, text=» TL DWTPAG,A6 SET MMU REGISTERS «, t00=0x006d, t01=0x0098}
0xaae8…ab1c               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS «, t00=0x006d, t01=0x00c0}
0xab1c…ab48               Head {h00=0x0028, h01=0x0050, text=» ES A3,PHSECL,A2 RESTORE SAVED WORD «, t00=0x006d, t01=0x00f4}
0xab48…ab6c               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x006d, t01=0x0120}
0xab6c…ab7e               Head {h00=0x000e, h01=0x0050, text=» RF REWO50«, t00=0x006d, t01=0x0144}
0xab7e…ab92               Head {h00=0x0010, h01=0x0050, text=»REWO20 EQU *«, t00=0x006d, t01=0x0156}
0xab92…abae               Head {h00=0x0018, h01=0x0050, text=» SLL A2,1 BYTE MODE «, t00=0x006d, t01=0x016a}
0xabae…abd4               Head {h00=0x0022, h01=0x0050, text=» ST A3,PHSECL,A2 RESTORE WORD «, t00=0x006d, t01=0x0186}
0xabd4…abe0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x001c}
0xabe0…abea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0028}
0xabea…ac00               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006e, t01=0x0032}
0xac00…ac16               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006e, t01=0x0048}
0xac16…ac42               Head {h00=0x0028, h01=0x0050, text=» ST* A3,DWTUBU,A6 RESTORE SAVED WORD«, t00=0x006e, t01=0x005e}
0xac42…ac4e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x008a}
0xac4e…ac58               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0096}
0xac58…ac6e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006e, t01=0x00a0}
0xac6e…ac9a               Head {h00=0x0028, h01=0x0050, text=» CM DWTFSW,A6 INDICATE NO SAVED WORD«, t00=0x006e, t01=0x00b6}
0xac9a…acae               Head {h00=0x0010, h01=0x0050, text=»REWO50 EQU *«, t00=0x006e, t01=0x00e2}
0xacae…acbe               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006e, t01=0x00f6}
0xacbe…acc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0106}
0xacc8…acd4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0110}
0xacd4…acde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x011c}
0xacde…acfe               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x006e, t01=0x0126}
0xacfe…ad08               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0146}
0xad08…ad12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0150}
0xad12…ad2e               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006e, t01=0x015a}
0xad2e…ad4a               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x006e, t01=0x0176}
0xad4a…ad66 (111, 0, 400) Head {h00=0x0018, h01=0x0050, text=»*  SEEK CYLINDER  * «, t00=0x006f, t01=0x0004}
0xad66…ad82               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x006f, t01=0x0020}
0xad82…ad9e               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006f, t01=0x003c}
0xad9e…ada8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0058}
0xada8…adb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0062}
0xadb2…adc4               Head {h00=0x000e, h01=0x0050, text=»SEEK EQU *«, t00=0x006f, t01=0x006c}
0xadc4…adda               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x006f, t01=0x007e}
0xadda…ae02               Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTCYL,A2 CYLINDER NUMBER«, t00=0x006f, t01=0x0094}
0xae02…ae0e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00bc}
0xae0e…ae24               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x006f, t01=0x00c8}
0xae24…ae3c               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x006f, t01=0x00de}
0xae3c…ae48               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006f, t01=0x00f6}
0xae48…ae5a               Head {h00=0x000e, h01=0x0050, text=» SLL A3,3 «, t00=0x006f, t01=0x0102}
0xae5a…ae6c               Head {h00=0x000e, h01=0x0050, text=» ORK A3,2 «, t00=0x006f, t01=0x0114}
0xae6c…ae8e               Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006f, t01=0x0126}
0xae8e…ae98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0148}
0xae98…aeac               Head {h00=0x0010, h01=0x0050, text=»SEEKZ EQU * «, t00=0x006f, t01=0x0152}
0xaeac…aebe               Head {h00=0x000e, h01=0x0050, text=» LDK A3,3 «, t00=0x006f, t01=0x0166}
0xaebe…aee0               Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006f, t01=0x0178}
0xaee0…aeea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x000a}
0xaeea…af00               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0070, t01=0x0014}
0xaf00…af0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x002a}
0xaf0a…af14               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0034}
0xaf14…af3e               Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x0070, t01=0x003e}
0xaf3e…af68               Head {h00=0x0026, h01=0x0050, text=»*                                *«, t00=0x0070, t01=0x0068}
0xaf68…af92               Head {h00=0x0026, h01=0x0050, text=»*   CIO: READ AND WRITE          *«, t00=0x0070, t01=0x0092}
0xaf92…afbc               Head {h00=0x0026, h01=0x0050, text=»*                                *«, t00=0x0070, t01=0x00bc}
0xafbc…afe6               Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x0070, t01=0x00e6}
0xafe6…aff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x0110}
0xaff0…b024               Head {h00=0x0030, h01=0x0050, text=»*  INPUT: A3=PHYSICAL SECTOR NUMBER SHIFTED «, t00=0x0070, t01=0x011a}
0xb024…b02e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x014e}
0xb02e…b044               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0070, t01=0x0158}
0xb044…b05a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0070, t01=0x016e}
0xb05a…b06c               Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0070, t01=0x0184}
0xb06c…b08a               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/80C1 1ST WER«, t00=0x0071, t01=0x0008}
0xb08a…b09c               Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0071, t01=0x0026}
0xb09c…b0b0               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0071, t01=0x0038}
0xb0b0…b0ce               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER«, t00=0x0071, t01=0x004c}
0xb0ce…b0ea               Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0071, t01=0x006a}
0xb0ea…b0fe               Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0071, t01=0x0086}
0xb0fe…b116               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0071, t01=0x009a}
0xb116…b146               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0071, t01=0x00b2}
0xb146…b172               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 USER BUFFER POINTER«, t00=0x0071, t01=0x00e2}
0xb172…b18a               Head {h00=0x0014, h01=0x0050, text=» SUKL A2,PHSECL «, t00=0x0071, t01=0x010e}
0xb18a…b19c               Head {h00=0x000e, h01=0x0050, text=» RF CIO:50«, t00=0x0071, t01=0x0126}
0xb19c…b1b0               Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0071, t01=0x0138}
0xb1b0…b1de               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0071, t01=0x014c}
0xb1de…b1ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x017a}
0xb1ea…b1f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0186}
0xb1f4…b20a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0071, t01=0x0190}
0xb20a…b220               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0072, t01=0x0016}
0xb220…b232               Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0072, t01=0x002c}
0xb232…b258               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C18 1ST WER SHIFTED«, t00=0x0072, t01=0x003e}
0xb258…b26a               Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0072, t01=0x0064}
0xb26a…b27e               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0072, t01=0x0076}
0xb27e…b2a4               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C1C 1ST WER SHIFTED«, t00=0x0072, t01=0x008a}
0xb2a4…b2c0               Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0072, t01=0x00b0}
0xb2c0…b2d4               Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0072, t01=0x00cc}
0xb2d4…b2ec               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0072, t01=0x00e0}
0xb2ec…b31c               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0072, t01=0x00f8}
0xb31c…b34a               Head {h00=0x002a, h01=0x0050, text=» DA DWTBA1,A6 GET USER BUFFER ADDRESS «, t00=0x0072, t01=0x0128}
0xb34a…b36e               Head {h00=0x0020, h01=0x0050, text=» SLL A2,1 BYTE MODE ADDRESS «, t00=0x0072, t01=0x0156}
0xb36e…b380               Head {h00=0x000e, h01=0x0050, text=» RF CIO:40«, t00=0x0072, t01=0x017a}
0xb380…b394               Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0072, t01=0x018c}
0xb394…b3c2               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0073, t01=0x0010}
0xb3c2…b3d6               Head {h00=0x0010, h01=0x0050, text=»CIO:40 EQU *«, t00=0x0073, t01=0x003e}
0xb3d6…b3fc               Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x0073, t01=0x0052}
0xb3fc…b408               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0073, t01=0x0078}
0xb408…b412               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0084}
0xb412…b426               Head {h00=0x0010, h01=0x0050, text=»CIO:50 EQU *«, t00=0x0073, t01=0x008e}
0xb426…b43a               Head {h00=0x0010, h01=0x0050, text=» WER A1,WER1«, t00=0x0073, t01=0x00a2}
0xb43a…b450               Head {h00=0x0012, h01=0x0050, text=» WER A2,WER1+1«, t00=0x0073, t01=0x00b6}
0xb450…b45a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00cc}
0xb45a…b47a               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0073, t01=0x00d6}
0xb47a…b484               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x00f6}
0xb484…b48e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0100}
0xb48e…b4a0               Head {h00=0x000e, h01=0x0050, text=»CIO EQU * «, t00=0x0073, t01=0x010a}
0xb4a0…b4c0               Head {h00=0x001c, h01=0x0050, text=» ST A4,DWTA4,A6 SAVE A4 «, t00=0x0073, t01=0x011c}
0xb4c0…b4d6               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x0073, t01=0x013c}
0xb4d6…b502               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CIOAB PWF POST PROCESSING ON«, t00=0x0073, t01=0x0152}
0xb502…b530               Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0073, t01=0x017e}
0xb530…b558               Head {h00=0x0024, h01=0x0050, text=» EX DWTCIO,A4 EXECUTE CIO-START «, t00=0x0074, t01=0x001c}
0xb558…b582               Head {h00=0x0026, h01=0x0050, text=» ABL(3) END:30 CU ADDRESS UNKNOWN «, t00=0x0074, t01=0x0044}
0xb582…b596               Head {h00=0x0010, h01=0x0050, text=»CIOAB EQU * «, t00=0x0074, t01=0x006e}
0xb596…b5bc               Head {h00=0x0022, h01=0x0050, text=» ST A5,DWTA5,A6            A5 «, t00=0x0074, t01=0x0082}
0xb5bc…b5e8               Head {h00=0x0028, h01=0x0050, text=» ST A7,DWTA2,A6 SAVE SECTOR COUNTER «, t00=0x0074, t01=0x00a8}
0xb5e8…b5f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00d4}
0xb5f2…b61c               Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x0074, t01=0x00de}
0xb61c…b626               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0108}
0xb626…b646               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0074, t01=0x0112}
0xb646…b650               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0132}
0xb650…b65a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x013c}
0xb65a…b678               Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0074, t01=0x0146}
0xb678…b696               Head {h00=0x001a, h01=0x0050, text=»*                    *«, t00=0x0074, t01=0x0164}
0xb696…b6b4               Head {h00=0x001a, h01=0x0050, text=»*  RECOVERY ROUTINE  *«, t00=0x0074, t01=0x0182}
0xb6b4…b6d2               Head {h00=0x001a, h01=0x0050, text=»*                    *«, t00=0x0075, t01=0x0010}
0xb6d2…b6f0               Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0075, t01=0x002e}
0xb6f0…b6fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x004c}
0xb6fa…b704               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0056}
0xb704…b716               Head {h00=0x000e, h01=0x0050, text=»DUON EQU *«, t00=0x0075, t01=0x0060}
0xb716…b720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0072}
0xb720…b736               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0075, t01=0x007c}
0xb736…b760               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0075, t01=0x0092}
0xb760…b76c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x00bc}
0xb76c…b776               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x00c8}
0xb776…b78c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0075, t01=0x00d2}
0xb78c…b7b2               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0075, t01=0x00e8}
0xb7b2…b7be               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0075, t01=0x010e}
0xb7be…b7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x011a}
0xb7c8…b7e0               Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x0075, t01=0x0124}
0xb7e0…b806               Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x0075, t01=0x013c}
0xb806…b818               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0075, t01=0x0162}
0xb818…b836               Head {h00=0x001a, h01=0x0050, text=» CM DWTST,A6 UNIT BUSY«, t00=0x0075, t01=0x0174}
0xb836…b85e (118, 0, 400) Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x0076, t01=0x0004}
0xb85e…b888               Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG INITIALIZATION FLAG «, t00=0x0076, t01=0x002c}
0xb888…b8ac               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON05 NOT POWER UP «, t00=0x0076, t01=0x0056}
0xb8ac…b8b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x007a}
0xb8b6…b8cc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0076, t01=0x0084}
0xb8cc…b8d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x009a}
0xb8d6…b8e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00a4}
0xb8e0…b8fe               Head {h00=0x001a, h01=0x0050, text=» CM DWTOR,A6 1ST UNIT «, t00=0x0076, t01=0x00ae}
0xb8fe…b924               Head {h00=0x0022, h01=0x0050, text=» CF A5,SEEKZ TEST IF OPERABLE «, t00=0x0076, t01=0x00cc}
0xb924…b936               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x00f2}
0xb936…b95a               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0076, t01=0x0104}
0xb95a…b970               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0076, t01=0x0128}
0xb970…b982               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0076, t01=0x013e}
0xb982…b9a4               Head {h00=0x001e, h01=0x0050, text=» SC A1,DWTOR,A6 NEXT UNIT «, t00=0x0076, t01=0x0150}
0xb9a4…b9b8               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0076, t01=0x0172}
0xb9b8…b9ca               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x0186}
0xb9ca…b9ee               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0077, t01=0x0008}
0xb9ee…b9fa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x002c}
0xb9fa…ba04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0038}
0xba04…ba1c               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0077, t01=0x0042}
0xba1c…ba26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x005a}
0xba26…ba30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0077, t01=0x0064}
0xba30…ba44               Head {h00=0x0010, h01=0x0050, text=»DUON05 EQU *«, t00=0x0077, t01=0x006e}
0xba44…ba58               Head {h00=0x0010, h01=0x0050, text=» CM DWTOR,A6«, t00=0x0077, t01=0x0082}
0xba58…ba7e               Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0077, t01=0x0096}
0xba7e…ba90               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0077, t01=0x00bc}
0xba90…baae               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON07 NO ERROR«, t00=0x0077, t01=0x00ce}
0xbaae…bad6               Head {h00=0x0024, h01=0x0050, text=» CM DWTOR,A6 PREPARE FOR VOLCLR «, t00=0x0077, t01=0x00ec}
0xbad6…bae8               Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0077, t01=0x0114}
0xbae8…bafe               Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0077, t01=0x0126}
0xbafe…bb12               Head {h00=0x0010, h01=0x0050, text=»DUON07 EQU *«, t00=0x0077, t01=0x013c}
0xbb12…bb28               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0077, t01=0x0150}
0xbb28…bb4a               Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0077, t01=0x0166}
0xbb4a…bb62               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0077, t01=0x0188}
0xbb62…bb78               Head {h00=0x0012, h01=0x0050, text=» CF A5,VO:NAM «, t00=0x0078, t01=0x0010}
0xbb78…bb8a               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0078, t01=0x0026}
0xbb8a…bba8               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON08 NO ERROR«, t00=0x0078, t01=0x0038}
0xbba8…bbca               Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0078, t01=0x0056}
0xbbca…bbe2               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0078, t01=0x0078}
0xbbe2…bbf4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0078, t01=0x0090}
0xbbf4…bc0a               Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0078, t01=0x00a2}
0xbc0a…bc1e               Head {h00=0x0010, h01=0x0050, text=»DUON08 EQU *«, t00=0x0078, t01=0x00b8}
0xbc1e…bc2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x00cc}
0xbc2a…bc5a               Head {h00=0x002c, h01=0x0050, text=» IM DWTST,A6 INDICATE VOLUME NAMES READ «, t00=0x0078, t01=0x00d8}
0xbc5a…bc6e               Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0078, t01=0x0108}
0xbc6e…bc94               Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTSAV,A6 RECOVERY DONE«, t00=0x0078, t01=0x011c}
0xbc94…bc9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0142}
0xbc9e…bcb4               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0078, t01=0x014c}
0xbcb4…bcbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0162}
0xbcbe…bcc8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x016c}
0xbcc8…bcf0               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0078, t01=0x0176}
0xbcf0…bd14               Head {h00=0x0020, h01=0x0050, text=» RF(Z) END:IO NO REQUEST ON?«, t00=0x0079, t01=0x000e}
0xbd14…bd1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0032}
0xbd1e…bd46               Head {h00=0x0024, h01=0x0050, text=»DUON10 LD A7,DWTORD,A6 GET ORDER«, t00=0x0079, t01=0x003c}
0xbd46…bd76               Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTOR,A6 RESTORE INDEX AND ORDER «, t00=0x0079, t01=0x0064}
0xbd76…bd8a               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0079, t01=0x0094}
0xbd8a…bd94               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00a8}
0xbd94…bdaa               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0079, t01=0x00b2}
0xbdaa…bdda               Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0079, t01=0x00c8}
0xbdda…bde6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x00f8}
0xbde6…bdf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0104}
0xbdf0…be1c               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x0079, t01=0x010e}
0xbe1c…be3e               Head {h00=0x001e, h01=0x0050, text=» ABL DUA:00 REPEAT REQUEST«, t00=0x0079, t01=0x013a}
0xbe3e…be48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x015c}
0xbe48…be60               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0079, t01=0x0166}
0xbe60…be6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x017e}
0xbe6a…be86               Head {h00=0x0018, h01=0x0050, text=»*    READY INTERRUPT«, t00=0x0079, t01=0x0188}
0xbe86…be90               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0014}
0xbe90…beaa               Head {h00=0x0016, h01=0x0050, text=»DUREDY LD A1,TIMER«, t00=0x007a, t01=0x001e}
0xbeaa…bed0               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON50 NO TIMER ACTIVE «, t00=0x007a, t01=0x0038}
0xbed0…beda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x005e}
0xbeda…bef0               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x007a, t01=0x0068}
0xbef0…bf0e               Head {h00=0x001a, h01=0x0050, text=» CM* TIMER KILL TIMER «, t00=0x007a, t01=0x007e}
0xbf0e…bf20               Head {h00=0x000e, h01=0x0050, text=» RF DUON40«, t00=0x007a, t01=0x009c}
0xbf20…bf2c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00ae}
0xbf2c…bf36               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00ba}
0xbf36…bf4c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x007a, t01=0x00c4}
0xbf4c…bf6c               Head {h00=0x001c, h01=0x0050, text=» RB T:DISP TIMER ACTIVE «, t00=0x007a, t01=0x00da}
0xbf6c…bf78               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007a, t01=0x00fa}
0xbf78…bf82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0106}
0xbf82…bf9a               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x007a, t01=0x0110}
0xbf9a…bfa4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0128}
0xbfa4…bfae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0132}
0xbfae…bfc2               Head {h00=0x0010, h01=0x0050, text=»DUON26 EQU *«, t00=0x007a, t01=0x013c}
0xbfc2…bfee               Head {h00=0x0028, h01=0x0050, text=» LDKL A4,TIMER TIMER POINTER ADDRESS«, t00=0x007a, t01=0x0150}
0xbfee…c002               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A4 «, t00=0x007a, t01=0x017c}
0xc002…c028               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON30 NO TIMER ACTIVE «, t00=0x007a, t01=0x0190}
0xc028…c03e               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x007b, t01=0x0026}
0xc03e…c05e               Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 RESTART TIMER«, t00=0x007b, t01=0x003c}
0xc05e…c070               Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007b, t01=0x005c}
0xc070…c07a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x006e}
0xc07a…c084               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0078}
0xc084…c0ac               Head {h00=0x0024, h01=0x0050, text=»DUON30 CF A15,SETIMP START TIMER«, t00=0x007b, t01=0x0082}
0xc0ac…c0dc               Head {h00=0x002c, h01=0x0050, text=» DATA DUON40,TIME TIME OUT ADDRESS, TIME«, t00=0x007b, t01=0x00aa}
0xc0dc…c0ee               Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007b, t01=0x00da}
0xc0ee…c0f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x00ec}
0xc0f8…c10c               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x007b, t01=0x00f6}
0xc10c…c116               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x010a}
0xc116…c134               Head {h00=0x001a, h01=0x0050, text=»DUON40 LDKL A6,DWDU01 «, t00=0x007b, t01=0x0114}
0xc134…c146               Head {h00=0x000e, h01=0x0050, text=» CM TIMER «, t00=0x007b, t01=0x0132}
0xc146…c15a               Head {h00=0x0010, h01=0x0050, text=»DUON50 EQU *«, t00=0x007b, t01=0x0144}
0xc15a…c17c               Head {h00=0x001e, h01=0x0050, text=» CM DWTST,A6 SET UNIT BUSY«, t00=0x007b, t01=0x0158}
0xc17c…c1a4               Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x007b, t01=0x017a}
0xc1a4…c1ca               Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x007c, t01=0x0012}
0xc1ca…c1dc               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x007c, t01=0x0038}
0xc1dc…c1ee               Head {h00=0x000e, h01=0x0050, text=» RB DUON05«, t00=0x007c, t01=0x004a}
0xc1ee…c1f8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x005c}
0xc1f8…c218               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x007c, t01=0x0066}
0xc218…c222               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0086}
0xc222…c22c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0090}
0xc22c…c24c               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007c, t01=0x009a}
0xc24c…c26c               Head {h00=0x001c, h01=0x0050, text=»*                     * «, t00=0x007c, t01=0x00ba}
0xc26c…c28c               Head {h00=0x001c, h01=0x0050, text=»*  INTERRUPT HANDLER  * «, t00=0x007c, t01=0x00da}
0xc28c…c2ac               Head {h00=0x001c, h01=0x0050, text=»*                     * «, t00=0x007c, t01=0x00fa}
0xc2ac…c2cc               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007c, t01=0x011a}
0xc2cc…c2d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x013a}
0xc2d6…c2e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0144}
0xc2e0…c2f2               Head {h00=0x000e, h01=0x0050, text=»IHDU EQU *«, t00=0x007c, t01=0x014e}
0xc2f2…c306               Head {h00=0x0010, h01=0x0050, text=»IHDU1 EQU * «, t00=0x007c, t01=0x0160}
0xc306…c31a               Head {h00=0x0010, h01=0x0050, text=»IHDU2 EQU * «, t00=0x007c, t01=0x0174}
0xc31a…c342               Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x007c, t01=0x0188}
0xc342…c34c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0020}
0xc34c…c362               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x007d, t01=0x002a}
0xc362…c38c               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x007d, t01=0x0040}
0xc38c…c398               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x006a}
0xc398…c3a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0076}
0xc3a2…c3b8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x007d, t01=0x0080}
0xc3b8…c3de               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x007d, t01=0x0096}
0xc3de…c3ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007d, t01=0x00bc}
0xc3ea…c3f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00c8}
0xc3f4…c41c               Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU01 DISC UNIT NO. 1 «, t00=0x007d, t01=0x00d2}
0xc41c…c426               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x00fa}
0xc426…c43e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x007d, t01=0x0104}
0xc43e…c448               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x011c}
0xc448…c452               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0126}
0xc452…c478               Head {h00=0x0022, h01=0x0050, text=»IHDU10 SST A1,CUADR GET STATUS«, t00=0x007d, t01=0x0130}
0xc478…c4a6               Head {h00=0x002a, h01=0x0050, text=»IHDU20 ANKL A1,/460F MASK RETURN CODE «, t00=0x007d, t01=0x0156}
0xc4a6…c4b8               Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x007d, t01=0x0184}
0xc4b8…c4de               Head {h00=0x0022, h01=0x0050, text=» RB(N) DUREDY READY INTERRUPT «, t00=0x007e, t01=0x0008}
0xc4de…c4f0               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007e, t01=0x002e}
0xc4f0…c502               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x007e, t01=0x0040}
0xc502…c522               Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 SEEK ERROR«, t00=0x007e, t01=0x0052}
0xc522…c538               Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHDU30 «, t00=0x007e, t01=0x0072}
0xc538…c562               Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/440F MOVE SEEK ERROR BIT«, t00=0x007e, t01=0x0088}
0xc562…c576               Head {h00=0x0010, h01=0x0050, text=» ORK A1,/02 «, t00=0x007e, t01=0x00b2}
0xc576…c58a               Head {h00=0x0010, h01=0x0050, text=»IHDU30 EQU *«, t00=0x007e, t01=0x00c6}
0xc58a…c5ae               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x007e, t01=0x00da}
0xc5ae…c5c6               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTSAV,A6«, t00=0x007e, t01=0x00fe}
0xc5c6…c5da               Head {h00=0x0010, h01=0x0050, text=» RF(NN) GET «, t00=0x007e, t01=0x0116}
0xc5da…c5ec               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x007e, t01=0x012a}
0xc5ec…c5fe               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x007e, t01=0x013c}
0xc5fe…c62c               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) END:IO DISC UNIT NOT OPERABLE «, t00=0x007e, t01=0x014e}
0xc62c…c636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x017c}
0xc636…c664               Head {h00=0x002a, h01=0x0050, text=»GET LD A5,DWTA5,A6 RELOAD REGISTERS A5«, t00=0x007e, t01=0x0186}
0xc664…c690               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTA4,A6                  A4 «, t00=0x007f, t01=0x0024}
0xc690…c6ba               Head {h00=0x0026, h01=0x0050, text=» LD A7,DWTA2,A6 GET SECTOR COUNTER«, t00=0x007f, t01=0x0050}
0xc6ba…c6ca               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007f, t01=0x007a}
0xc6ca…c6d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x008a}
0xc6d4…c6f4               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x007f, t01=0x0094}
0xc6f4…c6fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00b4}
0xc6fe…c708               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x00be}
0xc708…c724               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007f, t01=0x00c8}
0xc724…c740               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x007f, t01=0x00e4}
0xc740…c75c               Head {h00=0x0018, h01=0x0050, text=»*  PERFORM ENDIO  * «, t00=0x007f, t01=0x0100}
0xc75c…c778               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x007f, t01=0x011c}
0xc778…c794               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007f, t01=0x0138}
0xc794…c79e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0154}
0xc79e…c7a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x015e}
0xc7a8…c7d0               Head {h00=0x0024, h01=0x0050, text=»END:30 EQU * CU ADDRESS UNKNOWN «, t00=0x007f, t01=0x0168}
0xc7d0…c7ee               Head {h00=0x001a, h01=0x0050, text=» LDK A1,1 NOT OPERABLE«, t00=0x007f, t01=0x0190}
0xc7ee…c81c               Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTST,A6 INDICATE RECOVERY DONE«, t00=0x0080, t01=0x001e}
0xc81c…c82e               Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x0080, t01=0x004c}
0xc82e…c842               Head {h00=0x0010, h01=0x0050, text=»END:10 EQU *«, t00=0x0080, t01=0x005e}
0xc842…c84c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x0072}
0xc84c…c85e               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0080, t01=0x007c}
0xc85e…c890               Head {h00=0x002e, h01=0x0050, text=» LD* A7,DWTSB3-2,A6 GET 1ST RETURN ADDRESS«, t00=0x0080, t01=0x008e}
0xc890…c8a2               Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x0080, t01=0x00c0}
0xc8a2…c8c8               Head {h00=0x0022, h01=0x0050, text=» RF(N) END:20 READ AFTER WRITE«, t00=0x0080, t01=0x00d2}
0xc8c8…c8e0               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTORD,A6«, t00=0x0080, t01=0x00f8}
0xc8e0…c8fe               Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x0080, t01=0x0110}
0xc8fe…c912               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0080, t01=0x012e}
0xc912…c93e               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) END:20 NOT READ AFTER WRITE «, t00=0x0080, t01=0x0142}
0xc93e…c966               Head {h00=0x0024, h01=0x0050, text=» CM ECBEL,A8 RESET SECTORS DONE «, t00=0x0080, t01=0x016e}
0xc966…c972               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0081, t01=0x0008}
0xc972…c97c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0014}
0xc97c…c990               Head {h00=0x0010, h01=0x0050, text=»END:20 EQU *«, t00=0x0081, t01=0x001e}
0xc990…c9a6               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF00«, t00=0x0081, t01=0x0032}
0xc9a6…c9be               Head {h00=0x0014, h01=0x0050, text=» ANS A2,ECBEL,A8«, t00=0x0081, t01=0x0048}
0xc9be…c9ea               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTRTY,A6 GET RETRY INDICATOR«, t00=0x0081, t01=0x0060}
0xc9ea…ca10               Head {h00=0x0022, h01=0x0050, text=» RF(Z) END:IO NO RETRIES DONE «, t00=0x0081, t01=0x008c}
0xca10…ca3e               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/100 SET BIT 7 IN RETURN CODE«, t00=0x0081, t01=0x00b2}
0xca3e…ca54               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0081, t01=0x00e0}
0xca54…ca5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00f6}
0xca5e…ca68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0100}
0xca68…ca7c               Head {h00=0x0010, h01=0x0050, text=»END:IO EQU *«, t00=0x0081, t01=0x010a}
0xca7c…caa0               Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0081, t01=0x011e}
0xcaa0…cac4               Head {h00=0x0020, h01=0x0050, text=»  ABL TDISP GO TO DISPATCHER«, t00=0x0081, t01=0x0142}
0xcac4…cace               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0166}
0xcace…cae6               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0081, t01=0x0170}
0xcae6…caf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0188}
0xcaf0…cafa (130, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0004}
0xcafa…cb0e               Head {h00=0x0010, h01=0x0050, text=»VO:NAM EQU *«, t00=0x0082, t01=0x000e}
0xcb0e…cb32               Head {h00=0x0020, h01=0x0050, text=»  CF A5,SEEKZ SEEK SECTOR 0 «, t00=0x0082, t01=0x0022}
0xcb32…cb44               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0082, t01=0x0046}
0xcb44…cb7e               Head {h00=0x0036, h01=0x0050, text=» RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0082, t01=0x0058}
0xcb7e…cb96               Head {h00=0x0014, h01=0x0050, text=» CMR A6 SECTOR 0«, t00=0x0082, t01=0x0092}
0xcb96…cbac               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0082, t01=0x00aa}
0xcbac…cbc2               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0082, t01=0x00c0}
0xcbc2…cbe2               Head {h00=0x001c, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER 0«, t00=0x0082, t01=0x00d6}
0xcbe2…cbee               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x00f6}
0xcbee…cc04               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0082, t01=0x0102}
0xcc04…cc1a               Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0082, t01=0x0118}
0xcc1a…cc26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x012e}
0xcc26…cc40               Head {h00=0x0016, h01=0x0050, text=» LDK A3,0 SECTOR 0«, t00=0x0082, t01=0x013a}
0xcc40…cc4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0154}
0xcc4a…cc60               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0082, t01=0x015e}
0xcc60…cc8c               Head {h00=0x0028, h01=0x0050, text=» IM DWTFBU,A6 READ TO DRIVER BUFFER «, t00=0x0082, t01=0x0174}
0xcc8c…cca0               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0083, t01=0x0010}
0xcca0…ccb2               Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0083, t01=0x0024}
0xccb2…cce6               Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0083, t01=0x0036}
0xcce6…ccf2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x006a}
0xccf2…ccfc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0076}
0xccfc…cd12               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0083, t01=0x0080}
0xcd12…cd3a               Head {h00=0x0024, h01=0x0050, text=» LDKL A1,/8019 READ SECTOR ZERO «, t00=0x0083, t01=0x0096}
0xcd3a…cd62               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,BUFFER TO DRIVER BUFFER«, t00=0x0083, t01=0x00be}
0xcd62…cd78               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x0083, t01=0x00e6}
0xcd78…cd92               Head {h00=0x0016, h01=0x0050, text=» ANK A1,3 ERROR ? «, t00=0x0083, t01=0x00fc}
0xcd92…cd9e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0116}
0xcd9e…cda8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0122}
0xcda8…cddc               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) VO:NA8 THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0083, t01=0x012c}
0xcddc…cdf4               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0083, t01=0x0160}
0xcdf4…ce12               Head {h00=0x001a, h01=0x0050, text=» LDK A3,/F0 FILE CODE «, t00=0x0083, t01=0x0178}
0xce12…ce2a               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTSAV,A6«, t00=0x0084, t01=0x0008}
0xce2a…ce40               Head {h00=0x0012, h01=0x0050, text=» RF(Z) VO:NA6 «, t00=0x0084, t01=0x0020}
0xce40…ce6c               Head {h00=0x0028, h01=0x0050, text=» LDKL A3,/80F0 INDICATE TEST STATUS «, t00=0x0084, t01=0x0036}
0xce6c…ce80               Head {h00=0x0010, h01=0x0050, text=»VO:NA6 EQU *«, t00=0x0084, t01=0x0062}
0xce80…ceb6               Head {h00=0x0032, h01=0x0050, text=» CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL«, t00=0x0084, t01=0x0076}
0xceb6…cece               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0084, t01=0x00ac}
0xcece…ced8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00c4}
0xced8…cee2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0084, t01=0x00ce}
0xcee2…cef6               Head {h00=0x0010, h01=0x0050, text=»DUNA40 EQU *«, t00=0x0084, t01=0x00d8}
0xcef6…cf08               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0084, t01=0x00ec}
0xcf08…cf42               Head {h00=0x0036, h01=0x0050, text=» LDK A7,1 TO INDICATE NOT TRANSFER PARAMETER ORDER«, t00=0x0084, t01=0x00fe}
0xcf42…cf6e               Head {h00=0x0028, h01=0x0050, text=» LD A2,BUFFER+32 CHECK IF TOSS DISC «, t00=0x0084, t01=0x0138}
0xcf6e…cf82               Head {h00=0x0010, h01=0x0050, text=» CWK A2,'TO'«, t00=0x0084, t01=0x0164}
0xcf82…cfa0               Head {h00=0x001a, h01=0x0050, text=» RF(NE) DUNA70 NO TOSS«, t00=0x0084, t01=0x0178}
0xcfa0…cfd8               Head {h00=0x0034, h01=0x0050, text=» LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER «, t00=0x0085, t01=0x0008}
0xcfd8…cfee               Head {h00=0x0012, h01=0x0050, text=» CWK A2,/2031 «, t00=0x0085, t01=0x0040}
0xcfee…d016               Head {h00=0x0024, h01=0x0050, text=» RF(NE) DUNA70 REL LESS THAN 10 «, t00=0x0085, t01=0x0056}
0xd016…d054               Head {h00=0x003a, h01=0x0050, text=» LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER «, t00=0x0085, t01=0x007e}
0xd054…d08c               Head {h00=0x0034, h01=0x0050, text=»TRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER «, t00=0x0085, t01=0x00bc}
0xd08c…d0ba               Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0085, t01=0x00f4}
0xd0ba…d0e4               Head {h00=0x0026, h01=0x0050, text=» ECR A3,A2 SEPARATE THE PARAMETERS«, t00=0x0085, t01=0x0122}
0xd0e4…d0f6               Head {h00=0x000e, h01=0x0050, text=» ANK A3,/3«, t00=0x0085, t01=0x014c}
0xd0f6…d108               Head {h00=0x000e, h01=0x0050, text=» ANK A2,/3«, t00=0x0085, t01=0x015e}
0xd108…d136               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTFOR,A4 SAVE FORMAT PARAMETER«, t00=0x0085, t01=0x0170}
0xd136…d162               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,6324 SECTORS ON VERSION A2 «, t00=0x0086, t01=0x000e}
0xd162…d17c               Head {h00=0x0016, h01=0x0050, text=» SUK A3,2 FORMAT ?«, t00=0x0086, t01=0x003a}
0xd17c…d19c               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUNA60 VERSION A2«, t00=0x0086, t01=0x0054}
0xd19c…d1bc               Head {h00=0x001c, h01=0x0050, text=» RF(N) DUNA50 VERSION A1«, t00=0x0086, t01=0x0074}
0xd1bc…d1da               Head {h00=0x001a, h01=0x0050, text=» ADK A1,204 VERSION A3«, t00=0x0086, t01=0x0094}
0xd1da…d1ee               Head {h00=0x0010, h01=0x0050, text=»DUNA50 EQU *«, t00=0x0086, t01=0x00b2}
0xd1ee…d208               Head {h00=0x0016, h01=0x0050, text=» ADKL A1,9588-6324«, t00=0x0086, t01=0x00c6}
0xd208…d21c               Head {h00=0x0010, h01=0x0050, text=»DUNA60 EQU *«, t00=0x0086, t01=0x00e0}
0xd21c…d22e               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0086, t01=0x00f4}
0xd22e…d24c               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUNA70 PTS 6875«, t00=0x0086, t01=0x0106}
0xd24c…d27c               Head {h00=0x002c, h01=0x0050, text=» ADR A1,A1 PTS 6876 2*MAXSEC ON PTS 6875«, t00=0x0086, t01=0x0124}
0xd27c…d290               Head {h00=0x0010, h01=0x0050, text=»DUNA70 EQU *«, t00=0x0086, t01=0x0154}
0xd290…d2be               Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSMX,A4 MAX SECTOR NO IN DWT «, t00=0x0086, t01=0x0168}
0xd2be…d2f6               Head {h00=0x0034, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE FOR TRANSFER PARAM. «, t00=0x0087, t01=0x0008}
0xd2f6…d324               Head {h00=0x002a, h01=0x0050, text=» ADK A7,0 CHECK IF TRANSFER PARAMETER «, t00=0x0087, t01=0x0040}
0xd324…d33a               Head {h00=0x0012, h01=0x0050, text=» RB(Z) END:20 «, t00=0x0087, t01=0x006e}
0xd33a…d344               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0084}
0xd344…d35a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0087, t01=0x008e}
0xd35a…d364               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00a4}
0xd364…d36e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00ae}
0xd36e…d39c               Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTA4,A6 RESTORE RETRY COUNTER «, t00=0x0087, t01=0x00b8}
0xd39c…d3b4               Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOR,A6 «, t00=0x0087, t01=0x00e6}
0xd3b4…d3c6               Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0087, t01=0x00fe}
0xd3c6…d3de               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0087, t01=0x0110}
0xd3de…d3f0               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0087, t01=0x0128}
0xd3f0…d406               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) VO:NAM«, t00=0x0087, t01=0x013a}
0xd406…d418               Head {h00=0x000e, h01=0x0050, text=» RF VO:NA9«, t00=0x0087, t01=0x0150}
0xd418…d42c               Head {h00=0x0010, h01=0x0050, text=»VO:NA8 EQU *«, t00=0x0087, t01=0x0162}
0xd42c…d448               Head {h00=0x0018, h01=0x0050, text=» LDK A1,1 ERROR CODE«, t00=0x0087, t01=0x0176}
0xd448…d45c (136, 0, 400) Head {h00=0x0010, h01=0x0050, text=»VO:NA9 EQU *«, t00=0x0088, t01=0x0004}
0xd45c…d46c               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0088, t01=0x0018}
0xd46c…d476               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0028}
0xd476…d490               Head {h00=0x0016, h01=0x0050, text=»*   TIMER POINTER «, t00=0x0088, t01=0x0032}
0xd490…d49a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x004c}
0xd49a…d4bc               Head {h00=0x001e, h01=0x0050, text=»TIMER DATA 0 TIMER POINTER«, t00=0x0088, t01=0x0056}
0xd4bc…d4c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x0078}
0xd4c6…d4e6               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0088, t01=0x0082}
0xd4e6…d4f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00a2}
0xd4f0…d4fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00ac}
0xd4fa…d528               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0088, t01=0x00b6}
0xd528…d556               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0088, t01=0x00e4}
0xd556…d584               Head {h00=0x002a, h01=0x0050, text=»*   DEVICE WORK TABLE               * «, t00=0x0088, t01=0x0112}
0xd584…d5b2               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0088, t01=0x0140}
0xd5b2…d5e0               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0088, t01=0x016e}
0xd5e0…d5ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x000c}
0xd5ea…d5f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0016}
0xd5f4…d608               Head {h00=0x0010, h01=0x0050, text=»DWDU01 EQU *«, t00=0x0089, t01=0x0020}
0xd608…d62e               Head {h00=0x0022, h01=0x0050, text=» DATA 0 PHYSICAL SECTOR NUMBER«, t00=0x0089, t01=0x0034}
0xd62e…d64c               Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT STATUS«, t00=0x0089, t01=0x005a}
0xd64c…d668               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0089, t01=0x0078}
0xd668…d67e               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0089, t01=0x0094}
0xd67e…d6a4               Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x0089, t01=0x00aa}
0xd6a4…d6c0               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0089, t01=0x00d0}
0xd6c0…d6e8               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0089, t01=0x00ec}
0xd6e8…d706               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0089, t01=0x0114}
0xd706…d710               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x0132}
0xd710…d726               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0089, t01=0x013c}
0xd726…d750               Head {h00=0x0026, h01=0x0022, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0089, t01=0x0152}
0xd750…d774               Head {h00=0x0020, h01=0x0050, text=» DATA ECBDU1 MMU ECB ADDRESS«, t00=0x0089, t01=0x017c}
0xd774…d780               Head {h00=0x0008, h01=0x0004, text=» XIF«, t00=0x008a, t01=0x0010}
0xd780…d78a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x001c}
0xd78a…d7a6               Head {h00=0x0018, h01=0x0050, text=»DWTFSW EQU *-DWDU01 «, t00=0x008a, t01=0x0026}
0xd7a6…d7b6               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0042}
0xd7b6…d7e2               Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x008a, t01=0x0052}
0xd7e2…d7fe               Head {h00=0x0018, h01=0x0050, text=»DWTBSE EQU *-DWDU01 «, t00=0x008a, t01=0x007e}
0xd7fe…d80e               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x009a}
0xd80e…d83e               Head {h00=0x002c, h01=0x0050, text=»DWTUBU EQU *-DWDU01 USER BUFFER POINTER «, t00=0x008a, t01=0x00aa}
0xd83e…d84e               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x00da}
0xd84e…d86a               Head {h00=0x0018, h01=0x0050, text=»DWTSWD EQU *-DWDU01 «, t00=0x008a, t01=0x00ea}
0xd86a…d87a               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0106}
0xd87a…d884               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0116}
0xd884…d89a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x008a, t01=0x0120}
0xd89a…d8a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0136}
0xd8a4…d8ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0140}
0xd8ae…d8ca               Head {h00=0x0018, h01=0x0050, text=»DWTRTY EQU *-DWDU01 «, t00=0x008a, t01=0x014a}
0xd8ca…d8da               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0166}
0xd8da…d8ea               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0176}
0xd8ea…d904               Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008a, t01=0x0186}
0xd904…d93c               Head {h00=0x0034, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED INDICATOR CARTR. 1«, t00=0x008b, t01=0x0010}
0xd93c…d956               Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008b, t01=0x0048}
0xd956…d98a               Head {h00=0x0030, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED IND. CARTR. 2 «, t00=0x008b, t01=0x0062}
0xd98a…d9c0               Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST FIXED «, t00=0x008b, t01=0x0096}
0xd9c0…d9fa               Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST CARTRIDGE «, t00=0x008b, t01=0x00cc}
0xd9fa…da04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0106}
0xda04…da1a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008b, t01=0x0110}
0xda1a…da50               Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND FIXED «, t00=0x008b, t01=0x0126}
0xda50…da8a               Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND CARTRIDGE «, t00=0x008b, t01=0x015c}
0xda8a…da96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0008}
0xda96…daa0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0014}
0xdaa0…dab6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x008c, t01=0x001e}
0xdab6…dac0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0034}
0xdac0…daca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x003e}
0xdaca…dae6               Head {h00=0x0018, h01=0x0050, text=»DWTSAV EQU *-DWDU01 «, t00=0x008c, t01=0x0048}
0xdae6…daf6               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x008c, t01=0x0064}
0xdaf6…db32               Head {h00=0x0038, h01=0x0050, text=»DWTFBU EQU *-DWDU01 FLAG INDICATING IO TO DRIVER BUF«, t00=0x008c, t01=0x0074}
0xdb32…db42               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008c, t01=0x00b0}
0xdb42…db68               Head {h00=0x0022, h01=0x0050, text=»DWTCIO EQU *-DWDU01 CIO-START «, t00=0x008c, t01=0x00c0}
0xdb68…db7e               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF1«, t00=0x008c, t01=0x00e6}
0xdb7e…db94               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC1«, t00=0x008c, t01=0x00fc}
0xdb94…db9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0112}
0xdb9e…dbb4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008c, t01=0x011c}
0xdbb4…dbca               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF2«, t00=0x008c, t01=0x0132}
0xdbca…dbe0               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC2«, t00=0x008c, t01=0x0148}
0xdbe0…dbec               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x015e}
0xdbec…dbf6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x016a}
0xdbf6…dc12               Head {h00=0x0018, h01=0x0050, text=»DWTCYL EQU *-DWDU01 «, t00=0x008c, t01=0x0174}
0xdc12…dc36               Head {h00=0x0020, h01=0x0050, text=» DATA /FFFF CYLINDER NUMBER «, t00=0x008c, t01=0x0190}
0xdc36…dc40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0024}
0xdc40…dc56               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x002e}
0xdc56…dc72               Head {h00=0x0018, h01=0x0050, text=» DATA /FFFF 2ND UNIT«, t00=0x008d, t01=0x0044}
0xdc72…dc7e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0060}
0xdc7e…dc88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x006c}
0xdc88…dca4               Head {h00=0x0018, h01=0x0050, text=»DWTSMX EQU *-DWDU01 «, t00=0x008d, t01=0x0076}
0xdca4…dcce               Head {h00=0x0026, h01=0x0050, text=» DATA 1 MAX SECTORS ON FIXED DISC «, t00=0x008d, t01=0x0092}
0xdcce…dcf6               Head {h00=0x0024, h01=0x0050, text=» DATA 1 MAX SECTORS ON CARTRIDGE«, t00=0x008d, t01=0x00bc}
0xdcf6…dd00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00e4}
0xdd00…dd16               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x00ee}
0xdd16…dd2e               Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x0104}
0xdd2e…dd46               Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x011c}
0xdd46…dd52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0134}
0xdd52…dd5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0140}
0xdd5c…dd78               Head {h00=0x0018, h01=0x0050, text=»DWTFOR EQU *-DWDU01 «, t00=0x008d, t01=0x014a}
0xdd78…dd9c               Head {h00=0x0020, h01=0x0050, text=» DATA 0 DISC FORMAT ON FIXED«, t00=0x008d, t01=0x0166}
0xdd9c…ddc2               Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISC FORMAT CARTRIDGE «, t00=0x008d, t01=0x018a}
0xddc2…ddcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0020}
0xddcc…dde2               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008e, t01=0x002a}
0xdde2…ddf2               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0040}
0xddf2…de02               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0050}
0xde02…de0e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0060}
0xde0e…de18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x006c}
0xde18…de30               Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008e, t01=0x0076}
0xde30…de48               Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008e, t01=0x008e}
0xde48…de5a               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x008e, t01=0x00a6}
0xde5a…de78               Head {h00=0x001a, h01=0x0050, text=»DWTSB3 EQU *-DWDU01-2 «, t00=0x008e, t01=0x00b8}
0xde78…de82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x00d6}
0xde82…de94               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x008e, t01=0x00e0}
0xde94…deb0               Head {h00=0x0018, h01=0x0050, text=»DWTSEP EQU *-DWDU01 «, t00=0x008e, t01=0x00f2}
0xdeb0…dec0               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x010e}
0xdec0…dedc               Head {h00=0x0018, h01=0x0050, text=»DWTSEI EQU *-DWDU01 «, t00=0x008e, t01=0x011e}
0xdedc…deec               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x013a}
0xdeec…def8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x014a}
0xdef8…df02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0156}
0xdf02…df18               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x008e, t01=0x0160}
0xdf18…df2c               Head {h00=0x0010, h01=0x0050, text=»ECBDU1 EQU *«, t00=0x008e, t01=0x0176}
0xdf2c…df48               Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 «, t00=0x008e, t01=0x018a}
0xdf48…df64               Head {h00=0x0018, h01=0x0050, text=»DWTBA1 EQU *-DWDU01 «, t00=0x008f, t01=0x0016}
0xdf64…df74               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0032}
0xdf74…df90               Head {h00=0x0018, h01=0x0050, text=»DWTBA2 EQU *-DWDU01 «, t00=0x008f, t01=0x0042}
0xdf90…dfa0               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x005e}
0xdfa0…dfc4               Head {h00=0x0020, h01=0x0050, text=»DWTPAG EQU *-DWDU01 MMU PAGE«, t00=0x008f, t01=0x006e}
0xdfc4…dfd4               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x0092}
0xdfd4…dfe4               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008f, t01=0x00a2}
0xdfe4…dff0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008f, t01=0x00b2}
0xdff0…dffa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00be}
0xdffa…e004               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00c8}
0xe004…e00e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008f, t01=0x00d2}
0xe00e…e01a               Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x008f, t01=0x00dc}
0xe01a…e01e               Head {h00=0x4004, h01=0x0000}
0xe01e…e022               00 8f 00 e8                                                                                                                                                                                                                                       ┆    ┆
0xe022…e02a (144, 1, 8)   20 04 00 00 00 90 00 04                                                                                                                                                                                                                           ┆        ┆
0xe02a…e07a (145, 0, 398) 41 20 46 41 55 4c 54 3f 00 18 01 7c 00 2c 00 50 5c 20 20 2d 54 48 45 20 46 49 52 53 54 20 48 4f 4c 45 20 4d 55 53 54 20 4e 4f 54 20 42 45 20 49 4e 20 52 4f 57 20 31 21 00 19 00 10 00 12 00 50 5c 53 55 4b 5c 41 31 2c 34 5c 4e 4f 21 20 00 19   ┆A FAULT?   | , P   -THE FIRST HOLE MUST NOT BE IN ROW 1!       P SUK A1,4 NO!   ┆
0xe07a…e0ca               00 40 00 1c 00 50 5c 43 57 4b 5c 41 31 2c 35 5c 41 31 3d 46 49 52 53 54 20 48 4f 4c 45 20 00 19 00 56 00 1c 00 50 5c 52 46 28 47 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 00 19 00 76 00 2c 00 50 5c 20 20 2d 54 48 45 20 46 49   ┆ @   P CWK A1,5 A1=FIRST HOLE    V   P RF(G) FAULT DATA FAULT?   v , P   -THE FI┆
0xe0ca…e11a               52 53 54 20 48 4f 4c 45 20 4d 55 53 54 20 4e 4f 54 20 42 45 20 49 4e 20 52 4f 57 20 38 21 00 19 00 96 00 10 00 50 5c 4c 44 5c 41 33 2c 48 4f 4c 45 32 00 19 00 c6 00 0e 00 50 5c 53 55 4b 5c 41 33 2c 31 30 00 19 00 da 00 1e 00 50 5c 52 46 28   ┆RST HOLE MUST NOT BE IN ROW 8!       P LD A3,HOLE2       P SUK A3,10       P RF(┆
0xe11a…e16a               4e 5a 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 20 00 19 00 ec 00 2a 00 50 5c 20 20 2d 54 48 45 20 53 45 43 4f 4e 44 20 48 4f 4c 45 20 4d 55 53 54 20 42 45 20 49 4e 20 52 4f 57 20 38 21 20 00 19 01 0e 00 30 00 50 5c 4c 43 5c   ┆NZ) FAULT DATA FAULT?      * P   -THE SECOND HOLE MUST BE IN ROW 8!      0 P LC ┆
0xe16a…e1b8               41 33 2c 54 41 42 4c 45 32 2c 41 31 5c 43 48 4f 4f 53 45 20 43 48 41 52 41 43 54 45 52 20 49 4e 20 54 41 42 4c 45 32 20 00 19 01 3c 00 0e 00 50 5c 52 46 5c 50 55 54 43 48 41 00 19 01 70 00 06 00 50 5c 5c 00 19 01 82 00 06 00 50 5c 5c         ┆A3,TABLE2,A1 CHOOSE CHARACTER IN TABLE2    <   P RF PUTCHA   p   P         P  ┆
0xe1b8…e208 (146, 0, 400) 00 19 01 8c 00 22 00 50 5c 20 20 20 20 20 20 20 20 20 20 20 43 4f 4e 56 45 52 53 49 4f 4e 20 54 41 42 4c 45 20 32 00 1a 00 08 00 2c 00 50 5c 20 20 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a   ┆     " P            CONVERSION TABLE 2     , P   *******************************┆
0xe208…e258               2a 2a 2a 2a 2a 2a 00 1a 00 2e 00 14 00 50 5c 5c 5c 52 4f 57 53 20 4f 4e 20 43 41 52 44 20 00 1a 00 5e 00 14 00 50 5c 5c 5c 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 20 00 1a 00 76 00 1e 00 50 54 41 42 4c 45 32 5c 44 41 54 41 5c 27 3a 23 27 5c 32   ┆******   .   P   ROWS ON CARD    ^   P   ------------    v   PTABLE2 DATA ':#' 2┆
0xe258…e2a8               2c 38 20 20 33 2c 38 20 00 1a 00 8e 00 18 00 50 5c 44 41 54 41 5c 2f 34 30 32 37 5c 34 2c 38 20 20 35 2c 38 00 1a 00 b0 00 18 00 50 5c 44 41 54 41 5c 27 3d 22 27 5c 36 2c 38 20 20 37 2c 38 20 00 1a 00 cc 00 2c 00 50 5c 20 20 2a 2a 2a 2a 2a   ┆,8  3,8        P DATA /4027 4,8  5,8       P DATA '="' 6,8  7,8      , P   *****┆
0xe2a8…e2f8               2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 00 1a 00 e8 00 44 00 50 5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆********************************     D P                                        ┆
0xe2f8…e348               20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 54 57 4f 20 48 4f 4c 45 53 00 1a 01 18 00 4c 00 50 2a 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d   ┆               TWO HOLES     L P*===============================================┆
0xe348…e398 (147, 0, 400) 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 3d 00 1a 01 60 00 46 00 50 5c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆========================   ` F P                                                ┆
0xe398…e3e8               20 20 20 20 20 20 20 54 48 52 45 45 20 48 4f 4c 45 53 00 1b 00 20 00 14 00 50 5c 45 4a 45 43 54 5c 5c 5c 44 52 43 52 30 31 20 00 1b 00 6a 00 06 00 50 2a 20 00 1b 00 82 00 16 00 50 53 43 41 4e 33 5c 4c 44 5c 41 31 2c 48 4f 4c 45 31 20 00 1b   ┆       THREE HOLES       P EJECT   DRCR01    j   P*        PSCAN3 LD A1,HOLE1   ┆
0xe3e8…e438               00 8c 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 32 20 00 1b 00 a6 00 1c 00 50 5c 52 46 28 50 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 00 1b 00 b8 00 30 00 50 5c 20 20 2d 54 48 45 20 46 49 52 53 54 20 48 4f 4c 45 20 4d 55 53 54 20   ┆     P SUK A1,2        P RF(P) FAULT DATA FAULT?     0 P   -THE FIRST HOLE MUST ┆
0xe438…e488               42 45 20 57 49 54 48 49 4e 20 54 48 45 20 46 49 52 53 54 20 00 1b 00 d8 00 1e 00 50 5c 20 20 20 54 48 52 45 45 20 52 4f 57 53 20 28 31 32 2c 20 31 31 2c 20 30 29 00 1b 01 0c 00 10 00 50 5c 4c 44 5c 41 31 2c 48 4f 4c 45 32 00 1b 01 2e 00 0e   ┆BE WITHIN THE FIRST        P    THREE ROWS (12, 11, 0)       P LD A1,HOLE2   .  ┆
0xe488…e4d8               00 50 5c 53 55 4b 5c 41 31 2c 34 20 00 1b 01 42 00 1c 00 50 5c 52 46 28 4e 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 00 1b 01 54 00 0e 00 50 5c 53 55 4b 5c 41 31 2c 35 20 00 1b 01 74 00 10 00 50 5c 52 46 28 50 29 5c 46 41 55   ┆ P SUK A1,4    B   P RF(N) FAULT DATA FAULT?   T   P SUK A1,5    t   P RF(P) FAU┆
0xe4d8…e528 (148, 0, 400) 4c 54 00 1b 01 86 00 30 00 50 5c 20 20 2d 54 48 45 20 32 3a 4e 44 20 48 4f 4c 45 20 4d 55 53 54 20 42 45 20 57 49 54 48 49 4e 20 52 4f 57 20 32 20 54 4f 20 37 21 00 1c 00 0a 00 0e 00 50 5c 41 44 4b 5c 41 31 2c 39 20 00 1c 00 3e 00 24 00 50   ┆LT     0 P   -THE 2:ND HOLE MUST BE WITHIN ROW 2 TO 7!       P ADK A1,9    > $ P┆
0xe528…e578               5c 41 44 4b 5c 41 31 2c 31 5c 53 43 41 4e 20 46 4f 52 20 54 48 45 20 33 3a 52 44 20 48 4f 4c 45 00 1c 00 50 00 0e 00 50 5c 53 4c 4c 5c 41 33 2c 31 20 00 1c 00 78 00 0e 00 50 5c 52 42 28 50 29 5c 2a 2d 34 00 1c 00 8a 00 20 00 50 5c 53 55 4b   ┆ ADK A1,1 SCAN FOR THE 3:RD HOLE   P   P SLL A3,1    x   P RB(P) *-4       P SUK┆
0xe578…e5c8               5c 41 31 2c 31 30 5c 33 3a 52 44 20 48 4f 4c 45 20 46 4f 55 4e 44 21 20 00 1c 00 9c 00 1e 00 50 5c 52 46 28 4e 5a 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 20 00 1c 00 c0 00 26 00 50 5c 20 20 2d 54 48 45 20 33 3a 52 44 20 48   ┆ A1,10 3:RD HOLE FOUND!        P RF(NZ) FAULT DATA FAULT?      & P   -THE 3:RD H┆
0xe5c8…e618               4f 4c 45 20 4d 55 53 54 20 42 45 20 49 4e 20 52 4f 57 20 38 00 1c 00 e2 00 0e 00 50 5c 53 4c 4c 5c 41 33 2c 31 20 00 1c 01 0c 00 1e 00 50 5c 52 46 28 4e 5a 29 5c 46 41 55 4c 54 5c 44 41 54 41 20 46 41 55 4c 54 3f 20 00 1c 01 1e 00 1e 00 50   ┆OLE MUST BE IN ROW 8       P SLL A3,1        P RF(NZ) FAULT DATA FAULT?        P┆
0xe618…e668               5c 20 20 2d 4e 4f 20 4d 4f 52 45 20 54 48 45 4e 20 33 20 48 4f 4c 45 53 21 20 00 1c 01 40 00 10 00 50 5c 4c 44 5c 41 33 2c 48 4f 4c 45 31 00 1c 01 62 00 0e 00 50 5c 41 44 52 5c 41 33 2c 41 33 00 1c 01 76 00 22 00 50 5c 4c 44 5c 41 33 2c 54   ┆   -NO MORE THEN 3 HOLES!    @   P LD A3,HOLE1   b   P ADR A3,A3   v " P LD A3,T┆

Reduced view