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

⟦1260d4efa⟧

    Length: 58796 (0xe5ac)
    Notes: pts_type(SC)
    Names: »DRDU01.SC«

Derivation

└─⟦a16d9b08d⟧ Bits:30009712 Philips computer tape "TOSS11"
    └─⟦this⟧ »UPD2/DRDU01.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/DRDU01.SC« 

	IDENT DRDU01 	REL 11.0 81-08-12 870105041100 

			=4, ERROR WHEN A3 AND PASSING LIMIT /FFFE
			=4, REL 11.0 81-05-18
			=3, CONDITION FOR CPU857 CHANGED 
			=3, REL 11.0 81-04-02
			=2, A2 AND A3 DISCS IN SAME SYSTEM 
			=2, REL 11.0 81-01-26 ,DATA CORRUPTED
			=1, PRR 11.0 80-11-19 ,ATTACH BIT CLEARED BY RECOVERY
* 
* 
**************************************************
* 
*   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 
	EXTRN	DK:DIX	DEVICE INDEX
	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 
* 
CPU857	EQU	0		=3
* 
* 
*	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
* 
* 
	EJECT			DRDU01			DRDU01
* 
* 
	DATA	0	INDICATES NO MMU BUFFER 
	DATA	DK:DIX	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
	IFT	VERSA2=1		=2 
CYLBUF	RES	2	CYL ID CHECK BUFFER	=2 
	XIF			=2 
* 
	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,CYLBUF	READ TO CYLINDER CHECK BUFFER	=2
	CF	A5,CIO:50 
	ANK	A1,/1F	ERROR CHECK 
	RF(NZ)	SEE:32
	LD	A3,CYLBUF	GET CYLINDER ID	=2
	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 
	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 
	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	A3,BUFFER+PHSECL	GET CYL ID	=4
	LD	A2,DWTFBU,A6
	RF(NZ)	REA:50	READ TO DRIVER BUFFER	=4 
	IFT	MMUPAG=0 
	LD*	A3,DWTUBU,A6	GET CYLINDER ID FROM USER BUFFER
	XIF
* 
	IFT	VERSA3=1 
	IFT	MMUPAG=1 
	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 
	XIF
* 
	IFT	VERSA3=1 
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 
	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 
	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
	LDKL	A1,/7FFE	UNIT BUSY AND RECOVERY ON	=1 
	ANS A1,DWTST,A6		=1
	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	*
	LDKL	A5,/7FFE	SET UNIT BUSY AND RECOVERY ON	=1 
	ANS	A5,DWTST,A6		=1
	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
	ORS	A1,DWTST,A6	INDICATE RECOVERY DONE	=1
	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

0x0000…0036 (0, 0, 400)   Head {h00=0x0032, h01=0x0050, text=» IDENT DRDU01  REL 11.0 81-08-12 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e               Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0072               Head {h00=0x0030, h01=0x0050, text=»   =4, ERROR WHEN A3 AND PASSING LIMIT /FFFE«, t00=0x0000, t01=0x0042}
0x0072…0092               Head {h00=0x001c, h01=0x0050, text=»   =4, REL 11.0 81-05-18«, t00=0x0000, t01=0x0076}
0x0092…00be               Head {h00=0x0028, h01=0x0050, text=»   =3, CONDITION FOR CPU857 CHANGED «, t00=0x0000, t01=0x0096}
0x00be…00de               Head {h00=0x001c, h01=0x0050, text=»   =3, REL 11.0 81-04-02«, t00=0x0000, t01=0x00c2}
0x00de…010c               Head {h00=0x002a, h01=0x0050, text=»   =2, A2 AND A3 DISCS IN SAME SYSTEM «, t00=0x0000, t01=0x00e2}
0x010c…013c               Head {h00=0x002c, h01=0x0050, text=»   =2, REL 11.0 81-01-26 ,DATA CORRUPTED«, t00=0x0000, t01=0x0110}
0x013c…017c               Head {h00=0x003c, h01=0x0050, text=»   =1, PRR 11.0 80-11-19 ,ATTACH BIT CLEARED BY RECOVERY«, t00=0x0000, t01=0x0140}
0x017c…0186               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0180}
0x0186…0190               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x018a}
0x0190…01ca (1, 0, 400)   Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x0004}
0x01ca…01d4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003e}
0x01d4…01fc               Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0001, t01=0x0048}
0x01fc…0206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0070}
0x0206…0238               Head {h00=0x002e, h01=0x0050, text=»*   DRDU01 = DRIVER FOR ONE/TWO DISC UNITS«, t00=0x0001, t01=0x007a}
0x0238…0242               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ac}
0x0242…0276               Head {h00=0x0030, h01=0x0050, text=»*   PTS 6875 (X1215) AND/OR PTS 6876 (X1216)«, t00=0x0001, t01=0x00b6}
0x0276…0280               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ea}
0x0280…028a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f4}
0x028a…0294               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fe}
0x0294…029e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0108}
0x029e…02a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0112}
0x02a8…02e2               Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x011c}
0x02e2…02ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0156}
0x02ec…02f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0160}
0x02f6…032a               Head {h00=0x0030, h01=0x0050, text=»*   THIS DISC DRIVER HANDLES UP TO TWO DISC «, t00=0x0001, t01=0x016a}
0x032a…0362               Head {h00=0x0034, h01=0x0050, text=»*   DRIVES X1215,X1216 CONNECTED TO CPU VIA IOP «, t00=0x0002, t01=0x000e}
0x0362…0382               Head {h00=0x001c, h01=0x0050, text=»*   ON MULTIPLEX CHANNEL«, t00=0x0002, t01=0x0046}
0x0382…038c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0066}
0x038c…0396               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0070}
0x0396…03c4               Head {h00=0x002a, h01=0x0050, text=»*   THE FOLLOWING ORDERS ARE TREATED :«, t00=0x0002, t01=0x007a}
0x03c4…03ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a8}
0x03ce…03ec               Head {h00=0x001a, h01=0x0050, text=»*   /00    TEST STATUS«, t00=0x0002, t01=0x00b2}
0x03ec…040a               Head {h00=0x001a, h01=0x0050, text=»*   /01    BASIC READ «, t00=0x0002, t01=0x00d0}
0x040a…0428               Head {h00=0x001a, h01=0x0050, text=»*   /05    BASIC WRITE«, t00=0x0002, t01=0x00ee}
0x0428…0448               Head {h00=0x001c, h01=0x0050, text=»*   /11    PHYSICAL READ«, t00=0x0002, t01=0x010c}
0x0448…046a               Head {h00=0x001e, h01=0x0050, text=»*   /15    PHYSICAL WRITE «, t00=0x0002, t01=0x012c}
0x046a…048a               Head {h00=0x001c, h01=0x0050, text=»*   /1F    FORMAT VOLUME«, t00=0x0002, t01=0x014e}
0x048a…0494               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016e}
0x0494…04b4               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0002, t01=0x0178}
0x04b4…04be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0008}
0x04be…04c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0012}
0x04c8…04dc               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x001c}
0x04dc…04f0               Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0003, t01=0x0030}
0x04f0…0504               Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x0044}
0x0504…050e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0058}
0x050e…0518               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0062}
0x0518…0540               Head {h00=0x0024, h01=0x0050, text=» ENTRY DUADR ACTIVATION ADDRESS «, t00=0x0003, t01=0x006c}
0x0540…0564               Head {h00=0x0020, h01=0x0050, text=» ENTRY DUON RECOVERY ROUTINE«, t00=0x0003, t01=0x0094}
0x0564…059a               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU1 INTERRUPT HANDLER DISC UNIT NO. 1«, t00=0x0003, t01=0x00b8}
0x059a…05d0               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU INTERRUPT HANDLER DISC UNIT NO. 1 «, t00=0x0003, t01=0x00ee}
0x05d0…0606               Head {h00=0x0032, h01=0x0050, text=» ENTRY IHDU2 INTERRUPT HANDLER DISC UNIT NO. 2«, t00=0x0003, t01=0x0124}
0x0606…0638               Head {h00=0x002e, h01=0x0050, text=» ENTRY DWDU01 DWT ADDRESS DISC UNIT NO. 1 «, t00=0x0003, t01=0x015a}
0x0638…0650               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0003, t01=0x018c}
0x0650…065a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0014}
0x065a…0664               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001e}
0x0664…067a               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0028}
0x067a…0690               Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0004, t01=0x003e}
0x0690…06a6               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0004, t01=0x0054}
0x06a6…06b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006a}
0x06b0…06ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0074}
0x06ba…06da               Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0004, t01=0x007e}
0x06da…06f8               Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0004, t01=0x009e}
0x06f8…072a               Head {h00=0x002e, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS. A1-A8 ON A15 STACK«, t00=0x0004, t01=0x00bc}
0x072a…075a               Head {h00=0x002c, h01=0x0050, text=» EXTRN NVLCHK CHECK IF NEW VOLUME LOADED«, t00=0x0004, t01=0x00ee}
0x075a…078e               Head {h00=0x0030, h01=0x0050, text=» EXTRN VOLGET PUT VOLUME NAME IN DWT SET NVL«, t00=0x0004, t01=0x011e}
0x078e…07c8               Head {h00=0x0036, h01=0x0050, text=» EXTRN VOLNAM VOLUME NAME FROM DWT TO USER BUFFER «, t00=0x0004, t01=0x0152}
0x07c8…07f8               Head {h00=0x002c, h01=0x0050, text=» EXTRN VOLCLR CLEAR VOLUME NAMES IN DWT «, t00=0x0004, t01=0x018c}
0x07f8…082a               Head {h00=0x002e, h01=0x0050, text=» EXTRN INXDWT DOUBLED INDEX + DWT ADDRESS «, t00=0x0005, t01=0x002c}
0x082a…084e               Head {h00=0x0020, h01=0x0050, text=» EXTRN DISIOE REQUEST ERROR «, t00=0x0005, t01=0x005e}
0x084e…0878               Head {h00=0x0026, h01=0x0050, text=» EXTRN INIFLG INITIALIZATION FLAG «, t00=0x0005, t01=0x0082}
0x0878…08a6               Head {h00=0x002a, h01=0x0050, text=» EXTRN PFPOST PWF POST PROCESSING FLAG«, t00=0x0005, t01=0x00ac}
0x08a6…08d4               Head {h00=0x002a, h01=0x0050, text=» EXTRN INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0005, t01=0x00da}
0x08d4…08f0               Head {h00=0x0018, h01=0x0050, text=» EXTRN SETIMP TIMER «, t00=0x0005, t01=0x0108}
0x08f0…0906               Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:MT «, t00=0x0005, t01=0x0124}
0x0906…0922               Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0005, t01=0x013a}
0x0922…0944               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB ADDRESS «, t00=0x0005, t01=0x0156}
0x0944…096c               Head {h00=0x0024, h01=0x0050, text=» EXTRN DWTOR DWT INDEX AND ORDER«, t00=0x0005, t01=0x0178}
0x096c…098e               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA2 SAVE AREA A2 «, t00=0x0006, t01=0x0010}
0x098e…09b0               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0006, t01=0x0032}
0x09b0…09d2               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0006, t01=0x0054}
0x09d2…09fc               Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB1 STACK BASE 1 IN DWT «, t00=0x0006, t01=0x0076}
0x09fc…0a26               Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0006, t01=0x00a0}
0x0a26…0a4c               Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTUEC USER ECB ADDRESS«, t00=0x0006, t01=0x00ca}
0x0a4c…0a76               Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTORD SAVE AREA FOR ORDER «, t00=0x0006, t01=0x00f0}
0x0a76…0aa8               Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTNVL NEM VOLUME LOADED INDICATORS«, t00=0x0006, t01=0x011a}
0x0aa8…0aca               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTVOL VOLUME NAMES«, t00=0x0006, t01=0x014c}
0x0aca…0aec               Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0006, t01=0x016e}
0x0aec…0b14               Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0006, t01=0x0190}
0x0b14…0b3e               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0007, t01=0x0028}
0x0b3e…0b68               Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0007, t01=0x0052}
0x0b68…0b8c               Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0007, t01=0x007c}
0x0b8c…0bb8               Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW1 ECB 1:ST CONTROL WORD «, t00=0x0007, t01=0x00a0}
0x0bb8…0be4               Head {h00=0x0028, h01=0x0050, text=» EXTRN ECBCW2 ECB 2:ND CONTROL WORD «, t00=0x0007, t01=0x00cc}
0x0be4…0c06               Head {h00=0x001e, h01=0x0050, text=» EXTRN DK:DIX DEVICE INDEX«, t00=0x0007, t01=0x00f8}
0x0c06…0c1e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0007, t01=0x011a}
0x0c1e…0c28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0132}
0x0c28…0c32               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x013c}
0x0c32…0c54               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0007, t01=0x0146}
0x0c54…0c76               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0007, t01=0x0168}
0x0c76…0c98               Head {h00=0x001e, h01=0x0050, text=»*  CONDITIONAL ASSEMBLY  *«, t00=0x0007, t01=0x018a}
0x0c98…0cba               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0008, t01=0x001c}
0x0cba…0cc4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x003e}
0x0cc4…0cce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0048}
0x0cce…0d08               Head {h00=0x0036, h01=0x0050, text=»*   READ AFTER WRITE MAY BE EXCLUDED FOR ORDER /15«, t00=0x0008, t01=0x0052}
0x0d08…0d26               Head {h00=0x001a, h01=0x0050, text=»*   BY SETTING X:A = 0«, t00=0x0008, t01=0x008c}
0x0d26…0d30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00aa}
0x0d30…0d42               Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x0008, t01=0x00b4}
0x0d42…0d56               Head {h00=0x0010, h01=0x0050, text=»RAW EQU X:A «, t00=0x0008, t01=0x00c6}
0x0d56…0d60               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00da}
0x0d60…0d6a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e4}
0x0d6a…0d9c               Head {h00=0x002e, h01=0x0050, text=»*   THIS DRIVER CAN HANDLE TWO DISC UNITS «, t00=0x0008, t01=0x00ee}
0x0d9c…0db4               Head {h00=0x0014, h01=0x0050, text=»*   IF X:B := 2 «, t00=0x0008, t01=0x0120}
0x0db4…0dbe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0138}
0x0dbe…0dd0               Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x0008, t01=0x0142}
0x0dd0…0de6               Head {h00=0x0012, h01=0x0050, text=»NUNITS EQU X:B«, t00=0x0008, t01=0x0154}
0x0de6…0df0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x016a}
0x0df0…0dfa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0174}
0x0dfa…0e2c               Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0008, t01=0x017e}
0x0e2c…0e5a               Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0009, t01=0x0020}
0x0e5a…0e64               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004e}
0x0e64…0e78               Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0009, t01=0x0058}
0x0e78…0e82               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x006c}
0x0e82…0e8c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0076}
0x0e8c…0ec6               Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0009, t01=0x0080}
0x0ec6…0ef8               Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0009, t01=0x00ba}
0x0ef8…0f02               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ec}
0x0f02…0f16               Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0009, t01=0x00f6}
0x0f16…0f20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010a}
0x0f20…0f36               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0009, t01=0x0114}
0x0f36…0f40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012a}
0x0f40…0f4a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0134}
0x0f4a…0f82               Head {h00=0x0034, h01=0x0050, text=»* A PROGRAM VERSION USING THE INSTRUCTION SET OF«, t00=0x0009, t01=0x013e}
0x0f82…0fb8               Head {h00=0x0032, h01=0x0050, text=»* CPU 857 IS OBTAINED BY SETTING CPU857 EQU 1 «, t00=0x0009, t01=0x0176}
0x0fb8…0fc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x001c}
0x0fc2…0fda               Head {h00=0x0014, h01=0x0050, text=»CPU857 EQU 0  =3«, t00=0x000a, t01=0x0026}
0x0fda…0fe4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x003e}
0x0fe4…0fee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0048}
0x0fee…1012               Head {h00=0x0020, h01=0x0050, text=»* PROGRAM VERSION FOR FORMAT«, t00=0x000a, t01=0x0052}
0x1012…1042               Head {h00=0x002c, h01=0x0050, text=»* A2 IS OBTAINED BY SETTING VERSA2 EQU 1«, t00=0x000a, t01=0x0076}
0x1042…1072               Head {h00=0x002c, h01=0x0050, text=»* A3 IS OBTAINED BY SETTING VERSA3 EQU 1«, t00=0x000a, t01=0x00a6}
0x1072…107c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d6}
0x107c…108e               Head {h00=0x000e, h01=0x0050, text=»X:C EQU 1 «, t00=0x000a, t01=0x00e0}
0x108e…10a4               Head {h00=0x0012, h01=0x0050, text=»VERSA2 EQU X:C«, t00=0x000a, t01=0x00f2}
0x10a4…10ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0108}
0x10ae…10c0               Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000a, t01=0x0112}
0x10c0…10d6               Head {h00=0x0012, h01=0x0050, text=»VERSA3 EQU X:D«, t00=0x000a, t01=0x0124}
0x10d6…10e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x013a}
0x10e0…10ea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0144}
0x10ea…110a               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000a, t01=0x014e}
0x110a…1114               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016e}
0x1114…111e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0178}
0x111e…1134               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000a, t01=0x0182}
0x1134…114a               Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x000b, t01=0x0008}
0x114a…1160               Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x000b, t01=0x001e}
0x1160…116a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0034}
0x116a…1174               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003e}
0x1174…11a8               Head {h00=0x0030, h01=0x0050, text=»DAF1 EQU /28 DEVICE ADDRESS FIXED DISC NO. 1«, t00=0x000b, t01=0x0048}
0x11a8…11e0               Head {h00=0x0034, h01=0x0050, text=»DAC1 EQU /08 DEVICE ADDRESS CARTRIDGE DISC NO. 1«, t00=0x000b, t01=0x007c}
0x11e0…1214               Head {h00=0x0030, h01=0x0050, text=»DAF2 EQU /38 DEVICE ADDRESS FIXED DISC NO. 2«, t00=0x000b, t01=0x00b4}
0x1214…124c               Head {h00=0x0034, h01=0x0050, text=»DAC2 EQU /18 DEVICE ADDRESS CARTRIDGE DISC NO. 2«, t00=0x000b, t01=0x00e8}
0x124c…1274               Head {h00=0x0024, h01=0x0050, text=»WER1 EQU /10 MULTIPLEXOR ADDRESS«, t00=0x000b, t01=0x0120}
0x1274…129e               Head {h00=0x0026, h01=0x0050, text=»CUADR EQU /08 CONTROL UNIT ADDRESS«, t00=0x000b, t01=0x0148}
0x129e…12a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0172}
0x12a8…12e6               Head {h00=0x003a, h01=0x0050, text=»MAXSEC EQU 6528 MAX NO OF SECTORS ON UNPACKED PTS 6875«, t00=0x000b, t01=0x017c}
0x12e6…1316               Head {h00=0x002c, h01=0x0050, text=»SECLEN EQU 256 SECTOR LENGTH, CHARACTERS«, t00=0x000c, t01=0x002a}
0x1316…1344               Head {h00=0x002a, h01=0x0050, text=»PHSECL EQU 384 PHYSICAL SECTOR LENGTH «, t00=0x000c, t01=0x005a}
0x1344…1366               Head {h00=0x001e, h01=0x0050, text=»QRETRY EQU 4 NO OF RETRIES«, t00=0x000c, t01=0x0088}
0x1366…1388               Head {h00=0x001e, h01=0x0050, text=»TIME EQU 1000 1 MIN 40 SEC«, t00=0x000c, t01=0x00aa}
0x1388…1392               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00cc}
0x1392…139c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00d6}
0x139c…13bc               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000c, t01=0x00e0}
0x13bc…13c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0100}
0x13c6…13d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x010a}
0x13d0…13f8               Head {h00=0x0024, h01=0x0050, text=» DATA 0 INDICATES NO MMU BUFFER «, t00=0x000c, t01=0x0114}
0x13f8…141a               Head {h00=0x001e, h01=0x0050, text=» DATA DK:DIX DEVICE INDEX «, t00=0x000c, t01=0x013c}
0x141a…1444               Head {h00=0x0026, h01=0x0050, text=»DUADR DATA DUAD ACTIVATION ADDRESS«, t00=0x000c, t01=0x015e}
0x1444…146a               Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000c, t01=0x0188}
0x146a…1474               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x001e}
0x1474…148a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x000d, t01=0x0028}
0x148a…14a0               Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 193«, t00=0x000d, t01=0x003e}
0x14a0…14ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x0054}
0x14ac…14b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0060}
0x14b6…14cc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x000d, t01=0x006a}
0x14cc…14e2               Head {h00=0x0012, h01=0x0050, text=»BUFFER RES 25 «, t00=0x000d, t01=0x0080}
0x14e2…14ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0096}
0x14ec…14fe               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x000d, t01=0x00a0}
0x14fe…150e               Head {h00=0x000c, h01=0x0050, text=» RES 103«, t00=0x000d, t01=0x00b2}
0x150e…151a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000d, t01=0x00c2}
0x151a…1534               Head {h00=0x0016, h01=0x0050, text=» IFT VERSA2=1  =2 «, t00=0x000d, t01=0x00ce}
0x1534…1560               Head {h00=0x0028, h01=0x0050, text=»CYLBUF RES 2 CYL ID CHECK BUFFER =2 «, t00=0x000d, t01=0x00e8}
0x1560…1572               Head {h00=0x000e, h01=0x0050, text=» XIF   =2 «, t00=0x000d, t01=0x0114}
0x1572…157c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0126}
0x157c…159c               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x000d, t01=0x0130}
0x159c…15a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0150}
0x15a6…15b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x015a}
0x15b0…15ca               Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000d, t01=0x0164}
0x15ca…15e4               Head {h00=0x0016, h01=0x0050, text=»*               * «, t00=0x000d, t01=0x017e}
0x15e4…15fe               Head {h00=0x0016, h01=0x0050, text=»*  ACTIVATION   * «, t00=0x000e, t01=0x0008}
0x15fe…1618               Head {h00=0x0016, h01=0x0050, text=»*               * «, t00=0x000e, t01=0x0022}
0x1618…1632               Head {h00=0x0016, h01=0x0050, text=»***************** «, t00=0x000e, t01=0x003c}
0x1632…163c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0056}
0x163c…1646               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0060}
0x1646…1658               Head {h00=0x000e, h01=0x0050, text=»DUAD EQU *«, t00=0x000e, t01=0x006a}
0x1658…167e               Head {h00=0x0022, h01=0x0050, text=» CM DWTRTY,A6 RETRY INDICATOR «, t00=0x000e, t01=0x007c}
0x167e…16b2               Head {h00=0x0030, h01=0x0050, text=» CM DWTFBU,A6 RESET DRIVER BUFFER INDICATOR «, t00=0x000e, t01=0x00a2}
0x16b2…16c4               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x000e, t01=0x00d6}
0x16c4…16e6               Head {h00=0x001e, h01=0x0050, text=» LC A1,DWTOR,A6 GET INDEX «, t00=0x000e, t01=0x00e8}
0x16e6…16fc               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x000e, t01=0x010a}
0x16fc…170e               Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000e, t01=0x0120}
0x170e…171a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0132}
0x171a…1730               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x000e, t01=0x013e}
0x1730…1742               Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x000e, t01=0x0154}
0x1742…174e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x0166}
0x174e…1772               Head {h00=0x0020, h01=0x0050, text=» RF(P) DUERR FAULT IN INDEX «, t00=0x000e, t01=0x0172}
0x1772…177c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0008}
0x177c…1790               Head {h00=0x0010, h01=0x0050, text=»DUA:00 EQU *«, t00=0x000f, t01=0x0012}
0x1790…179a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x179a…17b0               Head {h00=0x0012, h01=0x0050, text=» LDK A5,DWTSB3«, t00=0x000f, t01=0x0030}
0x17b0…17d2               Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 LOAD STACK BASE«, t00=0x000f, t01=0x0046}
0x17d2…17e8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000f, t01=0x0068}
0x17e8…1814               Head {h00=0x0028, h01=0x0050, text=» MLR 2,A8 GET 18 BIT BUFFER ADDRESS «, t00=0x000f, t01=0x007e}
0x1814…1836               Head {h00=0x001e, h01=0x0050, text=» SLC A1,4 MOST SIGN. BITS «, t00=0x000f, t01=0x00aa}
0x1836…1848               Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x000f, t01=0x00cc}
0x1848…1868               Head {h00=0x001c, h01=0x0050, text=» SRL A2,1 WORD ADDDRESS «, t00=0x000f, t01=0x00de}
0x1868…1892               Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x000f, t01=0x00fe}
0x1892…189e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000f, t01=0x0128}
0x189e…18a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0134}
0x18a8…18da               Head {h00=0x002e, h01=0x0050, text=» CF A15,NVLCHK CHECK IF NEW VOLUME LOADED «, t00=0x000f, t01=0x013e}
0x18da…18fa               Head {h00=0x001c, h01=0x0050, text=»*   SAVE INDEX AND ORDER«, t00=0x000f, t01=0x0170}
0x18fa…1912               Head {h00=0x0014, h01=0x0050, text=» ADK A7,0 SET CR«, t00=0x000f, t01=0x0190}
0x1912…193e               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) DUA:05 NOT TEST STATUS ORDER«, t00=0x0010, t01=0x0018}
0x193e…1948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0044}
0x1948…195e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0010, t01=0x004e}
0x195e…1968               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0064}
0x1968…1972               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006e}
0x1972…1990               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0010, t01=0x0078}
0x1990…19ae               Head {h00=0x001a, h01=0x0050, text=»*                   * «, t00=0x0010, t01=0x0096}
0x19ae…19cc               Head {h00=0x001a, h01=0x0050, text=»*   TEST STATUS     * «, t00=0x0010, t01=0x00b4}
0x19cc…19ea               Head {h00=0x001a, h01=0x0050, text=»*                   * «, t00=0x0010, t01=0x00d2}
0x19ea…1a08               Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0010, t01=0x00f0}
0x1a08…1a12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x010e}
0x1a12…1a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0118}
0x1a1c…1a3c               Head {h00=0x001c, h01=0x0050, text=» ORS A1,ECBRC,A8 NVL BIT«, t00=0x0010, t01=0x0122}
0x1a3c…1a52               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/200 «, t00=0x0010, t01=0x0142}
0x1a52…1a8a               Head {h00=0x0034, h01=0x0050, text=» ANS A2,DWTOR,A6 VO:NAM ON FIRST OR SECOND UNIT «, t00=0x0010, t01=0x0158}
0x1a8a…1a9c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x0010, t01=0x0190}
0x1a9c…1aca               Head {h00=0x002a, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS «, t00=0x0011, t01=0x0012}
0x1aca…1af0               Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0011, t01=0x0040}
0x1af0…1b02               Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x0011, t01=0x0066}
0x1b02…1b26               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TESEND NOT OPERABLE «, t00=0x0011, t01=0x0078}
0x1b26…1b56               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTORD,A6 RESTORE INDEX AND ORDER«, t00=0x0011, t01=0x009c}
0x1b56…1b6e               Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTOR,A6 «, t00=0x0011, t01=0x00cc}
0x1b6e…1b92               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x0011, t01=0x00e4}
0x1b92…1bcc               Head {h00=0x0036, h01=0x0050, text=» CF A15,VOLNAM TRANSFER VOLUME NAME TO USER BUFFER«, t00=0x0011, t01=0x0108}
0x1bcc…1bf0               Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0011, t01=0x0142}
0x1bf0…1c04               Head {h00=0x0010, h01=0x0050, text=»TESEND EQU *«, t00=0x0011, t01=0x0166}
0x1c04…1c18               Head {h00=0x0010, h01=0x0050, text=» LDKL A2,-1 «, t00=0x0011, t01=0x017a}
0x1c18…1c4a               Head {h00=0x002e, h01=0x0050, text=» ST A2,DWTSAV,A6 INDICATE TEST STATUS DONE«, t00=0x0011, t01=0x018e}
0x1c4a…1c6c               Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM ENDIO «, t00=0x0012, t01=0x0030}
0x1c6c…1c76               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0052}
0x1c76…1c8e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0012, t01=0x005c}
0x1c8e…1c98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0074}
0x1c98…1cc8               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0012, t01=0x007e}
0x1cc8…1cf8               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x0012, t01=0x00ae}
0x1cf8…1d28               Head {h00=0x002c, h01=0x0050, text=»*   NEW VOLUME LOADED CHECK           * «, t00=0x0012, t01=0x00de}
0x1d28…1d58               Head {h00=0x002c, h01=0x0050, text=»*   ORDER CODE CHECK                  * «, t00=0x0012, t01=0x010e}
0x1d58…1d88               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x0012, t01=0x013e}
0x1d88…1db8               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x0012, t01=0x016e}
0x1db8…1dc2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x000e}
0x1dc2…1df4               Head {h00=0x002e, h01=0x0050, text=»*   INPUT: A1=NVL RETURN CODE FROM NVLCHK «, t00=0x0013, t01=0x0018}
0x1df4…1e14               Head {h00=0x001c, h01=0x0050, text=»*          A7=ORDER CODE«, t00=0x0013, t01=0x004a}
0x1e14…1e1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x006a}
0x1e1e…1e28               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0074}
0x1e28…1e3c               Head {h00=0x0010, h01=0x0050, text=»DUA:05 EQU *«, t00=0x0013, t01=0x007e}
0x1e3c…1e68               Head {h00=0x0028, h01=0x0050, text=» ADK A1,0 CHECK IF NEW VOLUME LOADED«, t00=0x0013, t01=0x0092}
0x1e68…1e8e               Head {h00=0x0022, h01=0x0050, text=» ABL(NZ) END:IO PERFORM TENDIO«, t00=0x0013, t01=0x00be}
0x1e8e…1ea0               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0013, t01=0x00e4}
0x1ea0…1ec0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUA:10 BASIC READ«, t00=0x0013, t01=0x00f6}
0x1ec0…1ed2               Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0013, t01=0x0116}
0x1ed2…1ef4               Head {h00=0x001e, h01=0x0050, text=» RF(Z) DUA:10 BASIC WRITE «, t00=0x0013, t01=0x0128}
0x1ef4…1f08               Head {h00=0x0010, h01=0x0050, text=» SUK A7,12  «, t00=0x0013, t01=0x014a}
0x1f08…1f2c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL READ «, t00=0x0013, t01=0x015e}
0x1f2c…1f3e               Head {h00=0x000e, h01=0x0050, text=» SUK A7,4 «, t00=0x0013, t01=0x0182}
0x1f3e…1f62 (20, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» RF(Z) DUA:10 PHYSICAL WRITE«, t00=0x0014, t01=0x0004}
0x1f62…1f74               Head {h00=0x000e, h01=0x0050, text=» SUK A7,10«, t00=0x0014, t01=0x0028}
0x1f74…1f98               Head {h00=0x0020, h01=0x0050, text=» RF(Z) FORMAT FORMAT VOLUME «, t00=0x0014, t01=0x003a}
0x1f98…1fa2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x005e}
0x1fa2…1fc8               Head {h00=0x0022, h01=0x0050, text=»DUERR ABL DISIOE REQUEST ERROR«, t00=0x0014, t01=0x0068}
0x1fc8…1fd2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x008e}
0x1fd2…1ffe               Head {h00=0x0028, h01=0x0050, text=»INCLEN EQU * REQUESTED LENGTH ERROR «, t00=0x0014, t01=0x0098}
0x1ffe…2014               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8008«, t00=0x0014, t01=0x00c4}
0x2014…2028               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0014, t01=0x00da}
0x2028…203e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0014, t01=0x00ee}
0x203e…2048               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0104}
0x2048…2052               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x010e}
0x2052…2074               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0014, t01=0x0118}
0x2074…2096               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0014, t01=0x013a}
0x2096…20ba               Head {h00=0x0020, h01=0x0050, text=»*   FORMAT VOLUME         * «, t00=0x0014, t01=0x015c}
0x20ba…20dc               Head {h00=0x001e, h01=0x0050, text=»*                        *«, t00=0x0014, t01=0x0180}
0x20dc…20fe               Head {h00=0x001e, h01=0x0050, text=»**************************«, t00=0x0015, t01=0x0012}
0x20fe…2108               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0034}
0x2108…2112               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x003e}
0x2112…2126               Head {h00=0x0010, h01=0x0050, text=»FORMAT EQU *«, t00=0x0015, t01=0x0048}
0x2126…215a               Head {h00=0x0030, h01=0x0050, text=» LDK A7,204 NUMBER OF CYLINDERS ON PTS 6875 «, t00=0x0015, t01=0x005c}
0x215a…2180               Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBCW1,A8 GET DISC TYPE«, t00=0x0015, t01=0x0090}
0x2180…219c               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0015, t01=0x00b6}
0x219c…21ae               Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x0015, t01=0x00d2}
0x21ae…21ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00e4}
0x21ba…21cc               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0015, t01=0x00f0}
0x21cc…21ec               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM03 PTS 6875 «, t00=0x0015, t01=0x0102}
0x21ec…2208               Head {h00=0x0018, h01=0x0050, text=» ADK A7,204 PTS 6876«, t00=0x0015, t01=0x0122}
0x2208…221c               Head {h00=0x0010, h01=0x0050, text=»FORM03 EQU *«, t00=0x0015, t01=0x013e}
0x221c…2226               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0152}
0x2226…2242               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0015, t01=0x015c}
0x2242…225a               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0015, t01=0x0178}
0x225a…2280               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C001 WRITE ONE WORD «, t00=0x0015, t01=0x0190}
0x2280…2292               Head {h00=0x000e, h01=0x0050, text=» ANK A2,3 «, t00=0x0016, t01=0x0026}
0x2292…22a4               Head {h00=0x000e, h01=0x0050, text=» SUK A2,3 «, t00=0x0016, t01=0x0038}
0x22a4…22c4               Head {h00=0x001c, h01=0x0050, text=» RF(NZ) FORM05 A1 OR A2 «, t00=0x0016, t01=0x004a}
0x22c4…22ea               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/C0C1 WRITE 386 BYTES«, t00=0x0016, t01=0x006a}
0x22ea…2302               Head {h00=0x0014, h01=0x0050, text=» ADKL A3,PHSECL «, t00=0x0016, t01=0x0090}
0x2302…2316               Head {h00=0x0010, h01=0x0050, text=»FORM05 EQU *«, t00=0x0016, t01=0x00a8}
0x2316…233c               Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTFBU,A6 SAVE 1ST WER «, t00=0x0016, t01=0x00bc}
0x233c…2348               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x00e2}
0x2348…2352               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ee}
0x2352…2368               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0016, t01=0x00f8}
0x2368…237e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0016, t01=0x010e}
0x237e…2396               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,BUFFER «, t00=0x0016, t01=0x0124}
0x2396…23a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x013c}
0x23a2…23ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0148}
0x23ac…23c2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0016, t01=0x0152}
0x23c2…23d8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0016, t01=0x0168}
0x23d8…240a               Head {h00=0x002e, h01=0x0050, text=» LDKL A3,BUFFER+PHSECL POSITION FOR CYL ID«, t00=0x0016, t01=0x017e}
0x240a…2416               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x0020}
0x2416…2420               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x002c}
0x2420…2448               Head {h00=0x0024, h01=0x0050, text=» STR A3,A6 DRIVER BUFFER POINTER«, t00=0x0017, t01=0x0036}
0x2448…245e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0017, t01=0x005e}
0x245e…2474               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0017, t01=0x0074}
0x2474…2498               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0017, t01=0x008a}
0x2498…24a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00ae}
0x24a4…24ba               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0017, t01=0x00ba}
0x24ba…24de               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A6 CYLINDER ZERO «, t00=0x0017, t01=0x00d0}
0x24de…24ea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x00f4}
0x24ea…24f4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0100}
0x24f4…250a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0017, t01=0x010a}
0x250a…2514               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0120}
0x2514…251e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x012a}
0x251e…2532               Head {h00=0x0010, h01=0x0050, text=»FORM20 EQU *«, t00=0x0017, t01=0x0134}
0x2532…2548               Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0017, t01=0x0148}
0x2548…255c               Head {h00=0x0010, h01=0x0050, text=»FORM30 EQU *«, t00=0x0017, t01=0x015e}
0x255c…2572               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0017, t01=0x0172}
0x2572…2596               Head {h00=0x0020, h01=0x0050, text=» CF A5,INXUNI GET UNIT INDEX«, t00=0x0017, t01=0x0188}
0x2596…25a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x001c}
0x25a2…25c4               Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEK SEEK CYLINDER «, t00=0x0018, t01=0x0028}
0x25c4…25dc               Head {h00=0x0014, h01=0x0050, text=» SLL A1,5 STATUS«, t00=0x0018, t01=0x004a}
0x25dc…25fe               Head {h00=0x001e, h01=0x0050, text=» RF(NN) FORM40 SEEK ERROR «, t00=0x0018, t01=0x0062}
0x25fe…2614               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0018, t01=0x0084}
0x2614…262a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0018, t01=0x009a}
0x262a…2642               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A2«, t00=0x0018, t01=0x00b0}
0x2642…264e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00c8}
0x264e…2664               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0018, t01=0x00d4}
0x2664…267c               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTCYL,A6«, t00=0x0018, t01=0x00ea}
0x267c…2688               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0102}
0x2688…26c0               Head {h00=0x0034, h01=0x0050, text=» ST* A1,0,A6 PREPARE DRIVER BUFFER WITH CYL. ID «, t00=0x0018, t01=0x010e}
0x26c0…26d2               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0018, t01=0x0146}
0x26d2…2706               Head {h00=0x0030, h01=0x0050, text=» CF A5,SKEW WRITE SECTOR 0 ON EVEN CYLINDERS«, t00=0x0018, t01=0x0158}
0x2706…2732               Head {h00=0x0028, h01=0x0050, text=»*   WRITE SECTOR 8 ON ODD CYLINDERS «, t00=0x0018, t01=0x018c}
0x2732…2756               Head {h00=0x0020, h01=0x0050, text=» ORK A3,1 ORDER CODE: WRITE «, t00=0x0019, t01=0x0028}
0x2756…2760               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x004c}
0x2760…277c               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0019, t01=0x0056}
0x277c…27a0               Head {h00=0x0020, h01=0x0050, text=» LD A1,DWTFBU,A6 GET 1ST WER«, t00=0x0019, t01=0x0072}
0x27a0…27ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0096}
0x27ac…27b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00a2}
0x27b6…27cc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0019, t01=0x00ac}
0x27cc…27e2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0019, t01=0x00c2}
0x27e2…27f8               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C002«, t00=0x0019, t01=0x00d8}
0x27f8…2804               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x00ee}
0x2804…280e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00fa}
0x280e…2824               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0019, t01=0x0104}
0x2824…283a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0019, t01=0x011a}
0x283a…2868               Head {h00=0x002a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER WRITE 386 BYTES«, t00=0x0019, t01=0x0130}
0x2868…2874               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x015e}
0x2874…287e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x016a}
0x287e…2896               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0019, t01=0x0174}
0x2896…28ba               Head {h00=0x0020, h01=0x0050, text=» CF A5,CIO:50 CIO:50 SECTOR «, t00=0x0019, t01=0x018c}
0x28ba…28ce               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x001a, t01=0x0020}
0x28ce…28f0               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) FORM40 WRITE ERROR«, t00=0x001a, t01=0x0034}
0x28f0…2906               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x001a, t01=0x0056}
0x2906…291c               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x001a, t01=0x006c}
0x291c…2932               Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A2 «, t00=0x001a, t01=0x0082}
0x2932…293e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x0098}
0x293e…2954               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x001a, t01=0x00a4}
0x2954…296a               Head {h00=0x0012, h01=0x0050, text=» IM DWTCYL,A6 «, t00=0x001a, t01=0x00ba}
0x296a…2976               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001a, t01=0x00d0}
0x2976…29a2               Head {h00=0x0028, h01=0x0050, text=» SUK A7,1 DECREMENT CYLINDER COUNTER«, t00=0x001a, t01=0x00dc}
0x29a2…29b8               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) FORM20«, t00=0x001a, t01=0x0108}
0x29b8…29ec               Head {h00=0x0030, h01=0x0050, text=» LD A2,ECBCW1,A8 GET FORMAT AND TYPE OF DISC«, t00=0x001a, t01=0x011e}
0x29ec…2a1a               Head {h00=0x002a, h01=0x0050, text=» ABL TRANPA PUT FORMAT AND TYPE IN DWT«, t00=0x001a, t01=0x0152}
0x2a1a…2a2e               Head {h00=0x0010, h01=0x0050, text=»FORM40 EQU *«, t00=0x001a, t01=0x0180}
0x2a2e…2a52 (27, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» CF A5,SEEKZ SEEK CYLINDER 0«, t00=0x001b, t01=0x0004}
0x2a52…2a64               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x001b, t01=0x0028}
0x2a64…2a84               Head {h00=0x001c, h01=0x0050, text=» RF(N) FORM50 SEEK ERROR«, t00=0x001b, t01=0x003a}
0x2a84…2aa4               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x001b, t01=0x005a}
0x2aa4…2ac0               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) FORM30 RETRY«, t00=0x001b, t01=0x007a}
0x2ac0…2ad4               Head {h00=0x0010, h01=0x0050, text=»FORM50 EQU *«, t00=0x001b, t01=0x0096}
0x2ad4…2afc               Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 SEEK ERROR RETURN CODE«, t00=0x001b, t01=0x00aa}
0x2afc…2b1e               Head {h00=0x001e, h01=0x0050, text=» ABL END:IO PERFORM END IO«, t00=0x001b, t01=0x00d2}
0x2b1e…2b3e               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x001b, t01=0x00f4}
0x2b3e…2b48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0114}
0x2b48…2b52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011e}
0x2b52…2b8c               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001b, t01=0x0128}
0x2b8c…2bc6               Head {h00=0x0036, h01=0x0050, text=»*                                               * «, t00=0x001b, t01=0x0162}
0x2bc6…2c00               Head {h00=0x0036, h01=0x0050, text=»*   CHECK IF ALLOWED SECTOR LENGTH, BUFFER SIZE * «, t00=0x001c, t01=0x000c}
0x2c00…2c3a               Head {h00=0x0036, h01=0x0050, text=»*   AND SECTOR NUMBER                           * «, t00=0x001c, t01=0x0046}
0x2c3a…2c74               Head {h00=0x0036, h01=0x0050, text=»*   SAVE BUFFER ADDRESS AND SET SECTOR COUNTER  * «, t00=0x001c, t01=0x0080}
0x2c74…2cae               Head {h00=0x0036, h01=0x0050, text=»*                                               * «, t00=0x001c, t01=0x00ba}
0x2cae…2ce8               Head {h00=0x0036, h01=0x0050, text=»************************************************* «, t00=0x001c, t01=0x00f4}
0x2ce8…2cf2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x012e}
0x2cf2…2d08               Head {h00=0x0012, h01=0x0050, text=»*   INPUT: ECB«, t00=0x001c, t01=0x0138}
0x2d08…2d2e               Head {h00=0x0022, h01=0x0050, text=»*   OUTPUT: A7=SECTOR COUNTER «, t00=0x001c, t01=0x014e}
0x2d2e…2d5c               Head {h00=0x002a, h01=0x0050, text=»*           DWTUBU=USER BUFFER POINTER«, t00=0x001c, t01=0x0174}
0x2d5c…2d66               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0012}
0x2d66…2d70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x001c}
0x2d70…2d84               Head {h00=0x0010, h01=0x0050, text=»DUA:10 EQU *«, t00=0x001d, t01=0x0026}
0x2d84…2dac               Head {h00=0x0024, h01=0x0050, text=» LD A3,ECBRL,A8 REQUESTED LENGTH«, t00=0x001d, t01=0x003a}
0x2dac…2dc2               Head {h00=0x0012, h01=0x0050, text=» RB(Z) INCLEN «, t00=0x001d, t01=0x0062}
0x2dc2…2dfc               Head {h00=0x0036, h01=0x0050, text=» ECR A7,A3 DIVIDE BY 256 TO GET NUMBER OF SECTORS «, t00=0x001d, t01=0x0078}
0x2dfc…2e26               Head {h00=0x0026, h01=0x0050, text=» ANK A3,/FF SET CONDITION REGISTER«, t00=0x001d, t01=0x00b2}
0x2e26…2e5e               Head {h00=0x0034, h01=0x0050, text=» RB(NZ) INCLEN NOT AN INTEGER NUMBER OF SECTORS «, t00=0x001d, t01=0x00dc}
0x2e5e…2e9c               Head {h00=0x003a, h01=0x0050, text=» LD A3,ECBCW2,A8 SECTOR NUMBER WHERE THE BUFFER BEGIN «, t00=0x001d, t01=0x0114}
0x2e9c…2ec8               Head {h00=0x0028, h01=0x0050, text=» RB(N) DUERR INCORRECT SECTOR NUMBER«, t00=0x001d, t01=0x0152}
0x2ec8…2ee0               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001d, t01=0x017e}
0x2ee0…2f0e               Head {h00=0x002a, h01=0x0050, text=» RB(NL) DUERR INCORRECT SECTOR NUMBER «, t00=0x001e, t01=0x0008}
0x2f0e…2f20               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x001e, t01=0x0036}
0x2f20…2f38               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTSMX,A2«, t00=0x001e, t01=0x0048}
0x2f38…2f64               Head {h00=0x0028, h01=0x0050, text=» RB(G) INCLEN SECTOR NUMBER OVERFLOW«, t00=0x001e, t01=0x0060}
0x2f64…2f6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x008c}
0x2f6e…2f84               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x001e, t01=0x0096}
0x2f84…2f9c               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBBA,A8 «, t00=0x001e, t01=0x00ac}
0x2f9c…2fc8               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTUBU,A6 USER BUFFER POINTER«, t00=0x001e, t01=0x00c4}
0x2fc8…2fd4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001e, t01=0x00f0}
0x2fd4…2fde               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00fc}
0x2fde…2ff4               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x001e, t01=0x0106}
0x2ff4…2ffe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x011c}
0x2ffe…301a               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x001e, t01=0x0126}
0x301a…3024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0142}
0x3024…302e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x014c}
0x302e…3054               Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x001e, t01=0x0156}
0x3054…307a               Head {h00=0x0022, h01=0x0050, text=»*                            *«, t00=0x001e, t01=0x017c}
0x307a…30a0               Head {h00=0x0022, h01=0x0050, text=»*   DISC VERSION SEPARATION  *«, t00=0x001f, t01=0x0012}
0x30a0…30c6               Head {h00=0x0022, h01=0x0050, text=»*                            *«, t00=0x001f, t01=0x0038}
0x30c6…30ec               Head {h00=0x0022, h01=0x0050, text=»***************************** «, t00=0x001f, t01=0x005e}
0x30ec…30f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0084}
0x30f6…3100               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x008e}
0x3100…3118               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFOR,A2«, t00=0x001f, t01=0x0098}
0x3118…312a               Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x001f, t01=0x00b0}
0x312a…314a               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:800 VERSION A2«, t00=0x001f, t01=0x00c2}
0x314a…3156               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001f, t01=0x00e2}
0x3156…3160               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ee}
0x3160…3176               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x001f, t01=0x00f8}
0x3176…3180               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x010e}
0x3180…3196               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x001f, t01=0x0118}
0x3196…31a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x012e}
0x31a0…31ce               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x001f, t01=0x0138}
0x31ce…31fc               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x001f, t01=0x0166}
0x31fc…322a (32, 0, 400)  Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0020, t01=0x0004}
0x322a…3258               Head {h00=0x002a, h01=0x0050, text=»*   GET PHYSICAL SECTOR NUMBER BY   * «, t00=0x0020, t01=0x0032}
0x3258…3286               Head {h00=0x002a, h01=0x0050, text=»*   DIVIDE BY 3                     * «, t00=0x0020, t01=0x0060}
0x3286…32b4               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0020, t01=0x008e}
0x32b4…32e2               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0020, t01=0x00bc}
0x32e2…32ec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00ea}
0x32ec…3302               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0020, t01=0x00f4}
0x3302…3328               Head {h00=0x0022, h01=0x0050, text=» LDK A1,0 PREPARE FOR DIVISION«, t00=0x0020, t01=0x010a}
0x3328…335a               Head {h00=0x002e, h01=0x0050, text=» LD A2,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x0020, t01=0x0130}
0x335a…3368               Head {h00=0x000a, h01=0x0050, text=» DVK 3«, t00=0x0020, t01=0x0162}
0x3368…3398               Head {h00=0x002c, h01=0x0050, text=»*   A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x0020, t01=0x0170}
0x3398…33ce               Head {h00=0x0032, h01=0x0050, text=»*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0021, t01=0x0010}
0x33ce…33da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0021, t01=0x0046}
0x33da…33e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0052}
0x33e4…33fa               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0021, t01=0x005c}
0x33fa…3410               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0021, t01=0x0072}
0x3410…3428               Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW2,A8«, t00=0x0021, t01=0x0088}
0x3428…3448               Head {h00=0x001c, h01=0x0050, text=» LDR A3,A1 SECTOR NUMBER«, t00=0x0021, t01=0x00a0}
0x3448…345a               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0021, t01=0x00c0}
0x345a…346e               Head {h00=0x0010, h01=0x0050, text=»DVK:00 EQU *«, t00=0x0021, t01=0x00d2}
0x346e…348a               Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I:= I+I/4«, t00=0x0021, t01=0x00e6}
0x348a…34a4               Head {h00=0x0016, h01=0x0050, text=» SRL A3,2 I:= I/4 «, t00=0x0021, t01=0x0102}
0x34a4…34ba               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DVK:00«, t00=0x0021, t01=0x011c}
0x34ba…34d4               Head {h00=0x0016, h01=0x0050, text=» SRL A2,2 TRUNCATE«, t00=0x0021, t01=0x0132}
0x34d4…34e6               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0021, t01=0x014c}
0x34e6…34f8               Head {h00=0x000e, h01=0x0050, text=» SUR A1,A2«, t00=0x0021, t01=0x015e}
0x34f8…351a               Head {h00=0x001e, h01=0x0050, text=» SUR A1,A2 REST AFTER LOOP«, t00=0x0021, t01=0x0170}
0x351a…352c (34, 0, 400)  Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0022, t01=0x0004}
0x352c…3540               Head {h00=0x0010, h01=0x0050, text=»DVK:10 EQU *«, t00=0x0022, t01=0x0016}
0x3540…3552               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0022, t01=0x002a}
0x3552…3570               Head {h00=0x001a, h01=0x0050, text=» SUK A1,3 DIVIDE BY 3 «, t00=0x0022, t01=0x003c}
0x3570…3586               Head {h00=0x0012, h01=0x0050, text=» RB(NN) DVK:10«, t00=0x0022, t01=0x005a}
0x3586…359c               Head {h00=0x0012, h01=0x0050, text=» ADK A1,3 REST«, t00=0x0022, t01=0x0070}
0x359c…35cc               Head {h00=0x002c, h01=0x0050, text=»*   A1=REMAINER=LOGICAL SECTOR POSITION «, t00=0x0022, t01=0x0086}
0x35cc…3602               Head {h00=0x0032, h01=0x0050, text=»*   A2=QUOTIENT=PHYSICAL SECTOR NUMBER ON DISC«, t00=0x0022, t01=0x00b6}
0x3602…360c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00ec}
0x360c…3622               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0022, t01=0x00f6}
0x3622…362e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x010c}
0x362e…3638               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0118}
0x3638…364e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0022, t01=0x0122}
0x364e…3658               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0138}
0x3658…3686               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0022, t01=0x0142}
0x3686…36b4               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0022, t01=0x0170}
0x36b4…36e2               Head {h00=0x002a, h01=0x0050, text=»*   SAVE PHYSICAL SECTOR NUMBER     * «, t00=0x0023, t01=0x000e}
0x36e2…3710               Head {h00=0x002a, h01=0x0050, text=»*   AND SECTOR POSITION             * «, t00=0x0023, t01=0x003c}
0x3710…373e               Head {h00=0x002a, h01=0x0050, text=»*   BRANCH ACCORDING TO SECTOR      * «, t00=0x0023, t01=0x006a}
0x373e…376c               Head {h00=0x002a, h01=0x0050, text=»*   POSITION                        * «, t00=0x0023, t01=0x0098}
0x376c…379a               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0023, t01=0x00c6}
0x379a…37c8               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0023, t01=0x00f4}
0x37c8…37d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0122}
0x37d2…3802               Head {h00=0x002c, h01=0x0050, text=»*   INPUT: A1=SECTOR POSITION INDICATOR «, t00=0x0023, t01=0x012c}
0x3802…3832               Head {h00=0x002c, h01=0x0050, text=»*          A2=LOGICAL SECTOR NUMBER / 3 «, t00=0x0023, t01=0x015c}
0x3832…383c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x018c}
0x383c…3846               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0008}
0x3846…3858               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x0024, t01=0x0012}
0x3858…3886               Head {h00=0x002a, h01=0x0050, text=» STR A2,A6 SAVE PHYSICAL SECTOR NUMBER«, t00=0x0024, t01=0x0024}
0x3886…3898               Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0024, t01=0x0052}
0x3898…38aa               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0024, t01=0x0064}
0x38aa…38d8               Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSEP,A6 SAVE SECTOR POSITION «, t00=0x0024, t01=0x0076}
0x38d8…390e               Head {h00=0x0032, h01=0x0050, text=» ST A2,DWTSEI,A6 SAVE 1ST PHYS. SECTOR NUMBER «, t00=0x0024, t01=0x00a4}
0x390e…391a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x00da}
0x391a…3924               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e6}
0x3924…393a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0024, t01=0x00f0}
0x393a…395e               Head {h00=0x0020, h01=0x0050, text=»*   LOGICAL SECTOR POSITION «, t00=0x0024, t01=0x0106}
0x395e…3984               Head {h00=0x0022, h01=0x0050, text=» RF(N) RW:300 ,XXXX  ,      , «, t00=0x0024, t01=0x012a}
0x3984…39aa               Head {h00=0x0022, h01=0x0050, text=» RF(Z) RW:200 ,    XX,XX    , «, t00=0x0024, t01=0x0150}
0x39aa…39c6               Head {h00=0x0018, h01=0x0050, text=»*   ,      ,  XXXX, «, t00=0x0024, t01=0x0176}
0x39c6…39d0 (37, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0004}
0x39d0…39e6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0025, t01=0x000e}
0x39e6…39f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0024}
0x39f0…3a1e               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0025, t01=0x002e}
0x3a1e…3a4c               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0025, t01=0x005c}
0x3a4c…3a7a               Head {h00=0x002a, h01=0x0050, text=»*   READ/WRITE FROM SECTOR IN       * «, t00=0x0025, t01=0x008a}
0x3a7a…3aa8               Head {h00=0x002a, h01=0x0050, text=»*   POSITION ,      ,  xxxx,        * «, t00=0x0025, t01=0x00b8}
0x3aa8…3ad6               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0025, t01=0x00e6}
0x3ad6…3b04               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0025, t01=0x0114}
0x3b04…3b0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0142}
0x3b0e…3b3a               Head {h00=0x0028, h01=0x0050, text=» IMR A6 LOG. SECTOR IN NEXT PHYSICAL«, t00=0x0025, t01=0x014c}
0x3b3a…3b4c               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0025, t01=0x0178}
0x3b4c…3b7c               Head {h00=0x002c, h01=0x0050, text=» IM DWTSEI,A6 SAVE FOR READ AFTER WRITE «, t00=0x0025, t01=0x018a}
0x3b7c…3b88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0026, t01=0x002a}
0x3b88…3b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0036}
0x3b92…3ba8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0026, t01=0x0040}
0x3ba8…3bbe               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0026, t01=0x0056}
0x3bbe…3bd2               Head {h00=0x0010, h01=0x0050, text=» DATA /0084 «, t00=0x0026, t01=0x006c}
0x3bd2…3be4               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0026, t01=0x0080}
0x3be4…3bf6               Head {h00=0x000e, h01=0x0050, text=» RF RW:300«, t00=0x0026, t01=0x0092}
0x3bf6…3c00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00a4}
0x3c00…3c16               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0026, t01=0x00ae}
0x3c16…3c20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c4}
0x3c20…3c4e               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0026, t01=0x00ce}
0x3c4e…3c7c               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0026, t01=0x00fc}
0x3c7c…3caa               Head {h00=0x002a, h01=0x0050, text=»*   READ/WRITE FROM SECTOR IN       * «, t00=0x0026, t01=0x012a}
0x3caa…3cd8               Head {h00=0x002a, h01=0x0050, text=»*   POSITION ,    xx,               * «, t00=0x0026, t01=0x0158}
0x3cd8…3d06               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0026, t01=0x0186}
0x3d06…3d34               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0027, t01=0x0024}
0x3d34…3d3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0052}
0x3d3e…3d48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x005c}
0x3d48…3d5c               Head {h00=0x0010, h01=0x0050, text=»RW:200 EQU *«, t00=0x0027, t01=0x0066}
0x3d5c…3d72               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x007a}
0x3d72…3d86               Head {h00=0x0010, h01=0x0050, text=» DATA /0048 «, t00=0x0027, t01=0x0090}
0x3d86…3daa               Head {h00=0x0020, h01=0x0050, text=» SUK A7,2 NUMBER OF SECTORS «, t00=0x0027, t01=0x00a4}
0x3daa…3dce               Head {h00=0x0020, h01=0x0050, text=» RF(N) RW:230 1 SECTOR IN IO«, t00=0x0027, t01=0x00c8}
0x3dce…3df6               Head {h00=0x0024, h01=0x0050, text=» RF(NZ) RW:260 >2 SECTORS IN IO «, t00=0x0027, t01=0x00ec}
0x3df6…3e12               Head {h00=0x0018, h01=0x0050, text=»*   ,    XX,XXXXXX, «, t00=0x0027, t01=0x0114}
0x3e12…3e28               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0130}
0x3e28…3e3c               Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x0027, t01=0x0146}
0x3e3c…3e4e               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0027, t01=0x015a}
0x3e4e…3e72               Head {h00=0x0020, h01=0x0050, text=»RW:230 EQU * ,    XX,XX    ,«, t00=0x0027, t01=0x016c}
0x3e72…3e88               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0027, t01=0x0190}
0x3e88…3e9c               Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x0028, t01=0x0016}
0x3e9c…3eae               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x0028, t01=0x002a}
0x3eae…3ed2               Head {h00=0x0020, h01=0x0050, text=»RW:260 EQU * ,    XX,XXXXXX,«, t00=0x0028, t01=0x003c}
0x3ed2…3ee8               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0028, t01=0x0060}
0x3ee8…3efc               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0028, t01=0x0076}
0x3efc…3f06               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008a}
0x3f06…3f1c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0028, t01=0x0094}
0x3f1c…3f26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00aa}
0x3f26…3f52               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x00b4}
0x3f52…3f7e               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0028, t01=0x00e0}
0x3f7e…3faa               Head {h00=0x0028, h01=0x0050, text=»*   DIRECT READ/WRITE AS LONG      *«, t00=0x0028, t01=0x010c}
0x3faa…3fd6               Head {h00=0x0028, h01=0x0050, text=»*   AS POSIBLE                     *«, t00=0x0028, t01=0x0138}
0x3fd6…4002               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0028, t01=0x0164}
0x4002…402e               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0028, t01=0x0190}
0x402e…4038               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x002c}
0x4038…4042               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0036}
0x4042…4056               Head {h00=0x0010, h01=0x0050, text=»RW:300 EQU *«, t00=0x0029, t01=0x0040}
0x4056…4076               Head {h00=0x001c, h01=0x0050, text=» SUK A7,3 SECTOR COUNTER«, t00=0x0029, t01=0x0054}
0x4076…40aa               Head {h00=0x0030, h01=0x0050, text=» RF(NG) RW:500 LESS THAN FOUR SECTORS IN IO «, t00=0x0029, t01=0x0074}
0x40aa…40c0               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0029, t01=0x00a8}
0x40c0…40d4               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0029, t01=0x00be}
0x40d4…40ea               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0029, t01=0x00d2}
0x40ea…40fe               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x0029, t01=0x00e8}
0x40fe…4110               Head {h00=0x000e, h01=0x0050, text=» RB RW:300«, t00=0x0029, t01=0x00fc}
0x4110…411a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x010e}
0x411a…4130               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0029, t01=0x0118}
0x4130…413a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x012e}
0x413a…4166               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x0029, t01=0x0138}
0x4166…4192               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x0029, t01=0x0164}
0x4192…41be               Head {h00=0x0028, h01=0x0050, text=»*   READ/WRITE ON THE LAST SECTORS *«, t00=0x0029, t01=0x0190}
0x41be…41ea               Head {h00=0x0028, h01=0x0050, text=»*   IN IO                          *«, t00=0x002a, t01=0x002c}
0x41ea…4216               Head {h00=0x0028, h01=0x0050, text=»*                                  *«, t00=0x002a, t01=0x0058}
0x4216…4242               Head {h00=0x0028, h01=0x0050, text=»************************************«, t00=0x002a, t01=0x0084}
0x4242…424c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00b0}
0x424c…4256               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ba}
0x4256…426a               Head {h00=0x0010, h01=0x0050, text=»RW:500 EQU *«, t00=0x002a, t01=0x00c4}
0x426a…428a               Head {h00=0x001c, h01=0x0050, text=» RF(Z) RW:580 3 SECTORS «, t00=0x002a, t01=0x00d8}
0x428a…429c               Head {h00=0x000e, h01=0x0050, text=» ADK A7,2 «, t00=0x002a, t01=0x00f8}
0x429c…42bc               Head {h00=0x001c, h01=0x0050, text=» RF(P) RW:560 2 SECTORS «, t00=0x002a, t01=0x010a}
0x42bc…42dc               Head {h00=0x001c, h01=0x0050, text=» RF(N) RW:600 0 SECTORS «, t00=0x002a, t01=0x012a}
0x42dc…4300               Head {h00=0x0020, h01=0x0050, text=»RW:530 EQU * ,XXXX  ,      ,«, t00=0x002a, t01=0x014a}
0x4300…4316               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002a, t01=0x016e}
0x4316…432a               Head {h00=0x0010, h01=0x0050, text=» DATA /0080 «, t00=0x002a, t01=0x0184}
0x432a…433c               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002b, t01=0x0008}
0x433c…4360               Head {h00=0x0020, h01=0x0050, text=»RW:560 EQU * ,XXXXXX,XX    ,«, t00=0x002b, t01=0x001a}
0x4360…4376               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002b, t01=0x003e}
0x4376…438a               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002b, t01=0x0054}
0x438a…43a0               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002b, t01=0x0068}
0x43a0…43b4               Head {h00=0x0010, h01=0x0050, text=» DATA /0040 «, t00=0x002b, t01=0x007e}
0x43b4…43c6               Head {h00=0x000e, h01=0x0050, text=» RF RW:600«, t00=0x002b, t01=0x0092}
0x43c6…43ea               Head {h00=0x0020, h01=0x0050, text=»RW:580 EQU * ,XXXXXX,XXXXXX,«, t00=0x002b, t01=0x00a4}
0x43ea…4400               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002b, t01=0x00c8}
0x4400…4414               Head {h00=0x0010, h01=0x0050, text=» DATA /80C0 «, t00=0x002b, t01=0x00de}
0x4414…442a               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002b, t01=0x00f2}
0x442a…443e               Head {h00=0x0010, h01=0x0050, text=» DATA /00C0 «, t00=0x002b, t01=0x0108}
0x443e…4448               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x011c}
0x4448…445e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002b, t01=0x0126}
0x445e…4468               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x013c}
0x4468…4472               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0146}
0x4472…4486               Head {h00=0x0010, h01=0x0050, text=»RW:600 EQU *«, t00=0x002b, t01=0x0150}
0x4486…4498               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x002b, t01=0x0164}
0x4498…44a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0176}
0x44a2…44c2               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002b, t01=0x0180}
0x44c2…44e2               Head {h00=0x001c, h01=0x0050, text=»*                      *«, t00=0x002c, t01=0x0010}
0x44e2…4502               Head {h00=0x001c, h01=0x0050, text=»*   READ AFTER WRITE   *«, t00=0x002c, t01=0x0030}
0x4502…4522               Head {h00=0x001c, h01=0x0050, text=»*                      *«, t00=0x002c, t01=0x0050}
0x4522…4542               Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x002c, t01=0x0070}
0x4542…454c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0090}
0x454c…4580               Head {h00=0x0030, h01=0x0050, text=»*   DWTSEI=1:ST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002c, t01=0x009a}
0x4580…45bc               Head {h00=0x0038, h01=0x0050, text=»*   1ST POS IN DWT=LAST PHYSICAL SECTOR NUMBER IN IO«, t00=0x002c, t01=0x00ce}
0x45bc…45da               Head {h00=0x001a, h01=0x0050, text=»*   A7=SECTOR COUNTER «, t00=0x002c, t01=0x010a}
0x45da…45e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0128}
0x45e4…45fc               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTOR,A6 «, t00=0x002c, t01=0x0132}
0x45fc…461a               Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x002c, t01=0x014a}
0x461a…462e               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x002c, t01=0x0168}
0x462e…4658               Head {h00=0x0026, h01=0x0050, text=» RF(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x002c, t01=0x017c}
0x4658…466e               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,-/100«, t00=0x002d, t01=0x0016}
0x466e…469e               Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTSEP,A6 GET 1ST SECTOR POSITION«, t00=0x002d, t01=0x002c}
0x469e…46bc               Head {h00=0x001a, h01=0x0050, text=» RF(Z) RW:645 ,    XX,«, t00=0x002d, t01=0x005c}
0x46bc…46da               Head {h00=0x001a, h01=0x0050, text=» RF(P) RW:640 ,  XXXX,«, t00=0x002d, t01=0x007a}
0x46da…46ee               Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002d, t01=0x0098}
0x46ee…4702               Head {h00=0x0010, h01=0x0050, text=»RW:640 EQU *«, t00=0x002d, t01=0x00ac}
0x4702…4716               Head {h00=0x0010, h01=0x0050, text=» ADK A2,/80 «, t00=0x002d, t01=0x00c0}
0x4716…472a               Head {h00=0x0010, h01=0x0050, text=»RW:645 EQU *«, t00=0x002d, t01=0x00d4}
0x472a…475a               Head {h00=0x002c, h01=0x0050, text=» ST A2,ECBEL,A8 PREPARE EFFECTIVE LENGTH«, t00=0x002d, t01=0x00e8}
0x475a…4788               Head {h00=0x002a, h01=0x0050, text=» LD A1,DWTSEI,A6 RAW FROM THIS SECTOR «, t00=0x002d, t01=0x0118}
0x4788…47ae               Head {h00=0x0022, h01=0x0050, text=» LDR* A7,A6 GET LAST SECTOR NO«, t00=0x002d, t01=0x0146}
0x47ae…47e0               Head {h00=0x002e, h01=0x0050, text=» SUR A7,A1 GET NUMBER OF PHYSICAL SECTORS «, t00=0x002d, t01=0x016c}
0x47e0…47f2               Head {h00=0x000e, h01=0x0050, text=» STR A1,A6«, t00=0x002e, t01=0x000e}
0x47f2…47fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0020}
0x47fc…4812               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002e, t01=0x002a}
0x4812…481c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0040}
0x481c…4826               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x004a}
0x4826…483a               Head {h00=0x0010, h01=0x0050, text=»RW:650 EQU *«, t00=0x002e, t01=0x0054}
0x483a…4850               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x002e, t01=0x0068}
0x4850…4864               Head {h00=0x0010, h01=0x0050, text=» DATA /40C0 «, t00=0x002e, t01=0x007e}
0x4864…4888               Head {h00=0x0020, h01=0x0050, text=» IMR A6 NEXT PHYSICAL SECTOR«, t00=0x002e, t01=0x0092}
0x4888…48a0               Head {h00=0x0014, h01=0x0050, text=» LDKL A1,PHSECL «, t00=0x002e, t01=0x00b6}
0x48a0…48c6               Head {h00=0x0022, h01=0x0050, text=» ADS A1,ECBEL,A8 UPDATE ECBEL «, t00=0x002e, t01=0x00ce}
0x48c6…48d8               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x002e, t01=0x00f4}
0x48d8…48ee               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:650«, t00=0x002e, t01=0x0106}
0x48ee…4906               Head {h00=0x0014, h01=0x0050, text=» LD A7,ECBRL,A8 «, t00=0x002e, t01=0x011c}
0x4906…4936               Head {h00=0x002c, h01=0x0050, text=» ST A7,ECBEL,A8 CORRECT EFFECTIVE LENGTH«, t00=0x002e, t01=0x0134}
0x4936…4942               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002e, t01=0x0164}
0x4942…494c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0170}
0x494c…4962               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x002e, t01=0x017a}
0x4962…4976               Head {h00=0x0010, h01=0x0050, text=»RW:700 EQU *«, t00=0x002e, t01=0x0190}
0x4976…4994               Head {h00=0x001a, h01=0x0050, text=» LDK A1,0 RETURN CODE «, t00=0x002f, t01=0x0014}
0x4994…49ae               Head {h00=0x0016, h01=0x0050, text=» ABL END:20 ENDIO «, t00=0x002f, t01=0x0032}
0x49ae…49b8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x004c}
0x49b8…49c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002f, t01=0x0056}
0x49c4…49ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0062}
0x49ce…49e4               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x002f, t01=0x006c}
0x49e4…49ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0082}
0x49ee…4a04               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x002f, t01=0x008c}
0x4a04…4a0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00a2}
0x4a0e…4a18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x00ac}
0x4a18…4a42               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002f, t01=0x00b6}
0x4a42…4a6c               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x002f, t01=0x00e0}
0x4a6c…4a96               Head {h00=0x0026, h01=0x0050, text=»*   DISC FORMAT A2              * «, t00=0x002f, t01=0x010a}
0x4a96…4ac0               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x002f, t01=0x0134}
0x4ac0…4aea               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x002f, t01=0x015e}
0x4aea…4af4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0188}
0x4af4…4afe (48, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0004}
0x4afe…4b12               Head {h00=0x0010, h01=0x0050, text=»RW:800 EQU *«, t00=0x0030, t01=0x000e}
0x4b12…4b26               Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x0030, t01=0x0022}
0x4b26…4b38               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0030, t01=0x0036}
0x4b38…4b7c               Head {h00=0x0040, h01=0x0050, text=» ST A7,DWTSEI,A6 SAVE NUMBER OF SECTORS FOR READ AFTER WRITE«, t00=0x0030, t01=0x0048}
0x4b7c…4b88               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x008c}
0x4b88…4b92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0098}
0x4b92…4ba8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0030, t01=0x00a2}
0x4ba8…4bbc               Head {h00=0x0010, h01=0x0050, text=»RW:850 EQU *«, t00=0x0030, t01=0x00b8}
0x4bbc…4bd2               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0030, t01=0x00cc}
0x4bd2…4bf8               Head {h00=0x0022, h01=0x0050, text=» DATA /A080 INDICATE FORMAT A2«, t00=0x0030, t01=0x00e2}
0x4bf8…4c0e               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/100 «, t00=0x0030, t01=0x0108}
0x4c0e…4c42               Head {h00=0x0030, h01=0x0050, text=» ADS A1,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0030, t01=0x011e}
0x4c42…4c54               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0030, t01=0x0152}
0x4c54…4c7e               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:850 MORE SECTORS IN IO «, t00=0x0030, t01=0x0164}
0x4c7e…4c88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x018e}
0x4c88…4c9e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0031, t01=0x0008}
0x4c9e…4ca8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x001e}
0x4ca8…4cb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0028}
0x4cb2…4cc4               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0031, t01=0x0032}
0x4cc4…4ce6               Head {h00=0x001e, h01=0x0050, text=» LD A7,DWTOR,A6 GET ORDER «, t00=0x0031, t01=0x0044}
0x4ce6…4cfa               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0031, t01=0x0066}
0x4cfa…4d0e               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0031, t01=0x007a}
0x4d0e…4d18               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x008e}
0x4d18…4d2e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0031, t01=0x0098}
0x4d2e…4d58               Head {h00=0x0026, h01=0x0050, text=» RB(NZ) RW:700 NOT PHYSICAL WRITE «, t00=0x0031, t01=0x00ae}
0x4d58…4d64               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x00d8}
0x4d64…4d6e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00e4}
0x4d6e…4d84               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0031, t01=0x00ee}
0x4d84…4d9a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0031, t01=0x0104}
0x4d9a…4dac               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0031, t01=0x011a}
0x4dac…4dc2               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) RW:905«, t00=0x0031, t01=0x012c}
0x4dc2…4dce               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0031, t01=0x0142}
0x4dce…4dd8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x014e}
0x4dd8…4dee               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0031, t01=0x0158}
0x4dee…4e00               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0031, t01=0x016e}
0x4e00…4e32               Head {h00=0x002e, h01=0x0050, text=» CM ECBEL,A8 PREPARE FOR READ AFTER WRITE «, t00=0x0031, t01=0x0180}
0x4e32…4e4a               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTSEI,A6«, t00=0x0032, t01=0x0022}
0x4e4a…4e5e               Head {h00=0x0010, h01=0x0050, text=» CF A5,DIV31«, t00=0x0032, t01=0x003a}
0x4e5e…4e68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x004e}
0x4e68…4e7e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0032, t01=0x0058}
0x4e7e…4e88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x006e}
0x4e88…4e92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0078}
0x4e92…4ea6               Head {h00=0x0010, h01=0x0050, text=»RW:900 EQU *«, t00=0x0032, t01=0x0082}
0x4ea6…4ebc               Head {h00=0x0012, h01=0x0050, text=» CF A5,IOROUT «, t00=0x0032, t01=0x0096}
0x4ebc…4ee0               Head {h00=0x0020, h01=0x0050, text=» DATA /E080 READ AFTER WRITE«, t00=0x0032, t01=0x00ac}
0x4ee0…4ef2               Head {h00=0x000e, h01=0x0050, text=» SUK A7,1 «, t00=0x0032, t01=0x00d0}
0x4ef2…4f08               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) RW:900«, t00=0x0032, t01=0x00e2}
0x4f08…4f14               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x00f8}
0x4f14…4f1e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0104}
0x4f1e…4f3a               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0032, t01=0x010e}
0x4f3a…4f4c               Head {h00=0x000e, h01=0x0050, text=» RB RW:700«, t00=0x0032, t01=0x012a}
0x4f4c…4f58               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0032, t01=0x013c}
0x4f58…4f62               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0148}
0x4f62…4f78               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0032, t01=0x0152}
0x4f78…4f8e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0032, t01=0x0168}
0x4f8e…4fa2               Head {h00=0x0010, h01=0x0050, text=»RW:905 EQU *«, t00=0x0032, t01=0x017e}
0x4fa2…4fc6 (51, 0, 400)  Head {h00=0x0020, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE «, t00=0x0033, t01=0x0004}
0x4fc6…4fda               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0033, t01=0x0028}
0x4fda…4fe6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0033, t01=0x003c}
0x4fe6…4ff0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0048}
0x4ff0…5006               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0033, t01=0x0052}
0x5006…5010               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0068}
0x5010…5048               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0033, t01=0x0072}
0x5048…5080               Head {h00=0x0034, h01=0x0050, text=»*                                             * «, t00=0x0033, t01=0x00aa}
0x5080…50b8               Head {h00=0x0034, h01=0x0050, text=»*   IOROUT PERFORM READ OR WRITE AND SEEK     * «, t00=0x0033, t01=0x00e2}
0x50b8…50f0               Head {h00=0x0034, h01=0x0050, text=»*   IF NECESSARY                              * «, t00=0x0033, t01=0x011a}
0x50f0…5128               Head {h00=0x0034, h01=0x0050, text=»*                                             * «, t00=0x0033, t01=0x0152}
0x5128…5160               Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0033, t01=0x018a}
0x5160…516a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0032}
0x516a…5194               Head {h00=0x0026, h01=0x0050, text=»*   INPUT : ONE DATA WORD AFTER CF«, t00=0x0034, t01=0x003c}
0x5194…51c2               Head {h00=0x002a, h01=0x0050, text=»*          BIT 0 :INDICATES DIRECT IO «, t00=0x0034, t01=0x0066}
0x51c2…51f6               Head {h00=0x0030, h01=0x0050, text=»*          BIT 1 :INDICATES READ AFTER WRITE«, t00=0x0034, t01=0x0094}
0x51f6…5224               Head {h00=0x002a, h01=0x0050, text=»*          BIT 2 :INDICATES FORMAT A2 «, t00=0x0034, t01=0x00c8}
0x5224…5252               Head {h00=0x002a, h01=0x0050, text=»*          BIT 8-11:NUMBER OF WORDS/16«, t00=0x0034, t01=0x00f6}
0x5252…5288               Head {h00=0x0032, h01=0x0050, text=»*          BIT12-15:START IN DRIVER BUFFER/32 «, t00=0x0034, t01=0x0124}
0x5288…52c8               Head {h00=0x003c, h01=0x0050, text=»*   AFTER SEEK THE CYLINDER ID WILL BE CHECKED BY A READ«, t00=0x0034, t01=0x015a}
0x52c8…530c               Head {h00=0x0040, h01=0x0050, text=»*   DWTBSE CONTAINS THE PRESENT SECTOR IN THE DRIVER BUFFER «, t00=0x0035, t01=0x000a}
0x530c…5336               Head {h00=0x0026, h01=0x0050, text=»*   DWTRTY INDICATES RETRIES DONE «, t00=0x0035, t01=0x004e}
0x5336…5382               Head {h00=0x0048, h01=0x0050, text=»*   DWTSWD SAVED WORD FROM USER BUFFER WHEN IO NOT VIA DRIVER BUFFER«, t00=0x0035, t01=0x0078}
0x5382…538c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x00c4}
0x538c…53a0               Head {h00=0x0010, h01=0x0050, text=»IOROUT EQU *«, t00=0x0035, t01=0x00ce}
0x53a0…53ce               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0035, t01=0x00e2}
0x53ce…53f4               Head {h00=0x0022, h01=0x0050, text=» SRL A3,5 GET CYLINDER NUMBER «, t00=0x0035, t01=0x0110}
0x53f4…53fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0035, t01=0x0136}
0x53fe…541a               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0035, t01=0x0140}
0x541a…543c               Head {h00=0x001e, h01=0x0050, text=» LD* A4,4,A5 GET DATA WORD«, t00=0x0035, t01=0x015c}
0x543c…544e               Head {h00=0x000e, h01=0x0050, text=» SLL A4,2 «, t00=0x0035, t01=0x017e}
0x544e…546e               Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:05 FORMAT A3«, t00=0x0035, t01=0x0190}
0x546e…5480               Head {h00=0x000e, h01=0x0050, text=» ADK A3,0 «, t00=0x0036, t01=0x0020}
0x5480…548c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0032}
0x548c…5496               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x003e}
0x5496…54ac               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0036, t01=0x0048}
0x54ac…54b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x005e}
0x54b6…54c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0068}
0x54c0…54d6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0036, t01=0x0072}
0x54d6…54fc               Head {h00=0x0022, h01=0x0050, text=» RF(NZ) SEE:05 NOT CYLINDER 0 «, t00=0x0036, t01=0x0088}
0x54fc…5510               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0036, t01=0x00ae}
0x5510…5522               Head {h00=0x000e, h01=0x0050, text=» SLL A1,6 «, t00=0x0036, t01=0x00c2}
0x5522…553e               Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x0036, t01=0x00d4}
0x553e…5554               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0036, t01=0x00f0}
0x5554…556a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0036, t01=0x0106}
0x556a…558e               Head {h00=0x0020, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER ZERO «, t00=0x0036, t01=0x011c}
0x558e…55a0               Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0036, t01=0x0140}
0x55a0…55ac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0036, t01=0x0152}
0x55ac…55c2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0036, t01=0x015e}
0x55c2…55d8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0036, t01=0x0174}
0x55d8…55ee               Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0036, t01=0x018a}
0x55ee…5600               Head {h00=0x000e, h01=0x0050, text=» RF VA2BR «, t00=0x0037, t01=0x0010}
0x5600…560c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0022}
0x560c…5616               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x002e}
0x5616…562c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0037, t01=0x0038}
0x562c…5636               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x004e}
0x5636…5640               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0058}
0x5640…5654               Head {h00=0x0010, h01=0x0050, text=»SEE:05 EQU *«, t00=0x0037, t01=0x0062}
0x5654…566a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0037, t01=0x0076}
0x566a…5680               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0037, t01=0x008c}
0x5680…56ae               Head {h00=0x002a, h01=0x0050, text=» CW A3,DWTCYL,A2 COMPARE WITH PRESENT «, t00=0x0037, t01=0x00a2}
0x56ae…56ba               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x00d0}
0x56ba…56d0               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0037, t01=0x00dc}
0x56d0…56e8               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0037, t01=0x00f2}
0x56e8…56f4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x010a}
0x56f4…56fe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0116}
0x56fe…5714               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0037, t01=0x0120}
0x5714…572a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0037, t01=0x0136}
0x572a…5740               Head {h00=0x0012, h01=0x0050, text=» RF(E) VA2:00 «, t00=0x0037, t01=0x014c}
0x5740…574c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0037, t01=0x0162}
0x574c…5756               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x016e}
0x5756…576c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=0 «, t00=0x0037, t01=0x0178}
0x576c…5782               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0037, t01=0x018e}
0x5782…57a8               Head {h00=0x0022, h01=0x0050, text=» RF(E) SEE:90 HEAD IN POSITION«, t00=0x0038, t01=0x0014}
0x57a8…57b4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x003a}
0x57b4…57be               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0046}
0x57be…57da               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x0038, t01=0x0050}
0x57da…5802               Head {h00=0x0024, h01=0x0050, text=» RF(NE) SEE:07 NOT SAME CYLINDER«, t00=0x0038, t01=0x006c}
0x5802…5814               Head {h00=0x000e, h01=0x0050, text=» ADK A4,0 «, t00=0x0038, t01=0x0094}
0x5814…5832               Head {h00=0x001a, h01=0x0050, text=» RF(N) VA2BR FORMAT A2«, t00=0x0038, t01=0x00a6}
0x5832…5844               Head {h00=0x000e, h01=0x0050, text=» RF SEE:90«, t00=0x0038, t01=0x00c4}
0x5844…584e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00d6}
0x584e…5864               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0038, t01=0x00e0}
0x5864…586e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x00f6}
0x586e…5878               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0100}
0x5878…588c               Head {h00=0x0010, h01=0x0050, text=»SEE:07 EQU *«, t00=0x0038, t01=0x010a}
0x588c…5898               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x011e}
0x5898…58a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x012a}
0x58a2…58b8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0038, t01=0x0134}
0x58b8…58e4               Head {h00=0x0028, h01=0x0050, text=» ST A3,DWTCYL,A6 NEW CYLINDER NUMBER«, t00=0x0038, t01=0x014a}
0x58e4…58f0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0038, t01=0x0176}
0x58f0…58fa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0182}
0x58fa…5910               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0038, t01=0x018c}
0x5910…5936               Head {h00=0x0022, h01=0x0050, text=» ST A3,DWTCYL,A2 NEW CYLINDER «, t00=0x0039, t01=0x0012}
0x5936…5942               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x0038}
0x5942…596a               Head {h00=0x0024, h01=0x0050, text=» LDK A4,QRETRY NUMBER OF RETRIES«, t00=0x0039, t01=0x0044}
0x596a…597e               Head {h00=0x0010, h01=0x0050, text=»SEE:10 EQU *«, t00=0x0039, t01=0x006c}
0x597e…5994               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0039, t01=0x0080}
0x5994…59bc               Head {h00=0x0024, h01=0x0050, text=» CF A5,INXUNI DOUBLED UNIT INDEX«, t00=0x0039, t01=0x0096}
0x59bc…59c8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0039, t01=0x00be}
0x59c8…59dc               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEK «, t00=0x0039, t01=0x00ca}
0x59dc…59fa               Head {h00=0x001a, h01=0x0050, text=» SLC A1,5 RETURN CODE «, t00=0x0039, t01=0x00de}
0x59fa…5a12               Head {h00=0x0014, h01=0x0050, text=» RF(N) SEE:30 OK«, t00=0x0039, t01=0x00fc}
0x5a12…5a1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0114}
0x5a1c…5a32               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0039, t01=0x011e}
0x5a32…5a3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0134}
0x5a3c…5a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x013e}
0x5a46…5a5a               Head {h00=0x0010, h01=0x0050, text=»SEE:15 EQU *«, t00=0x0039, t01=0x0148}
0x5a5a…5a7c               Head {h00=0x001e, h01=0x0050, text=» CF A5,SEEKZ SEEK CYL ZERO«, t00=0x0039, t01=0x015c}
0x5a7c…5a9a               Head {h00=0x001a, h01=0x0050, text=» SLC A1,6 RETURN CODE «, t00=0x0039, t01=0x017e}
0x5a9a…5ab6               Head {h00=0x0018, h01=0x0050, text=» RF(N) SEE:20 ERROR «, t00=0x003a, t01=0x000c}
0x5ab6…5ada               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x003a, t01=0x0028}
0x5ada…5afa               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x003a, t01=0x004c}
0x5afa…5b1a               Head {h00=0x001c, h01=0x0050, text=» RB(NZ) SEE:10 TRY AGAIN«, t00=0x003a, t01=0x006c}
0x5b1a…5b2e               Head {h00=0x0010, h01=0x0050, text=»SEE:20 EQU *«, t00=0x003a, t01=0x008c}
0x5b2e…5b44               Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFF«, t00=0x003a, t01=0x00a0}
0x5b44…5b5a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003a, t01=0x00b6}
0x5b5a…5b70               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003a, t01=0x00cc}
0x5b70…5b9e               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A2 DUMMY CYLINDER NUMBER«, t00=0x003a, t01=0x00e2}
0x5b9e…5baa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0110}
0x5baa…5bc0               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003a, t01=0x011c}
0x5bc0…5bee               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTCYL,A6 DUMMY CYLINDER NUMBER«, t00=0x003a, t01=0x0132}
0x5bee…5bfa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003a, t01=0x0160}
0x5bfa…5c1a               Head {h00=0x001c, h01=0x0050, text=» LDK A1,/02 RETURN CODE «, t00=0x003a, t01=0x016c}
0x5c1a…5c34               Head {h00=0x0016, h01=0x0050, text=» RF SEE:35 END IO «, t00=0x003a, t01=0x018c}
0x5c34…5c3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0016}
0x5c3e…5c54               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003b, t01=0x0020}
0x5c54…5c5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0036}
0x5c5e…5c68               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0040}
0x5c68…5c7c               Head {h00=0x0010, h01=0x0050, text=»SEE:30 EQU *«, t00=0x003b, t01=0x004a}
0x5c7c…5c92               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003b, t01=0x005e}
0x5c92…5ca8               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003b, t01=0x0074}
0x5ca8…5cb4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x008a}
0x5cb4…5cd0               Head {h00=0x0018, h01=0x0050, text=» IFT VERSA2+VERSA3=2«, t00=0x003b, t01=0x0096}
0x5cd0…5cf2               Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x003b, t01=0x00b2}
0x5cf2…5d04               Head {h00=0x000e, h01=0x0050, text=» SLL A1,2 «, t00=0x003b, t01=0x00d4}
0x5d04…5d24               Head {h00=0x001c, h01=0x0050, text=» RF(NN) SEE:31 FORMAT A3«, t00=0x003b, t01=0x00e6}
0x5d24…5d30               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0106}
0x5d30…5d3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0112}
0x5d3a…5d50               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003b, t01=0x011c}
0x5d50…5d66               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003b, t01=0x0132}
0x5d66…5d70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0148}
0x5d70…5d7a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0152}
0x5d7a…5d90               Head {h00=0x0012, h01=0x0050, text=»*   FORMAT A2 «, t00=0x003b, t01=0x015c}
0x5d90…5d9a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0172}
0x5d9a…5dac               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003b, t01=0x017c}
0x5dac…5dc0               Head {h00=0x0010, h01=0x0050, text=» CF A5,SKEW «, t00=0x003b, t01=0x018e}
0x5dc0…5de4               Head {h00=0x0020, h01=0x0050, text=» LDKL A1,/8002 READ 2 WORDS «, t00=0x003c, t01=0x0012}
0x5de4…5e1c               Head {h00=0x0034, h01=0x0050, text=» LDKL A2,CYLBUF READ TO CYLINDER CHECK BUFFER =2«, t00=0x003c, t01=0x0036}
0x5e1c…5e32               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x003c, t01=0x006e}
0x5e32…5e52               Head {h00=0x001c, h01=0x0050, text=» ANK A1,/1F ERROR CHECK «, t00=0x003c, t01=0x0084}
0x5e52…5e68               Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SEE:32«, t00=0x003c, t01=0x00a4}
0x5e68…5e90               Head {h00=0x0024, h01=0x0050, text=» LD A3,CYLBUF GET CYLINDER ID =2«, t00=0x003c, t01=0x00ba}
0x5e90…5ea6               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003c, t01=0x00e2}
0x5ea6…5ebc               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003c, t01=0x00f8}
0x5ebc…5eec               Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A2 CHECK IF SAME CYLINDER «, t00=0x003c, t01=0x010e}
0x5eec…5ef8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003c, t01=0x013e}
0x5ef8…5f0e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003c, t01=0x014a}
0x5f0e…5f24               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003c, t01=0x0160}
0x5f24…5f54               Head {h00=0x002c, h01=0x0050, text=» CW A3,DWTCYL,A6 CHECK IF SAME CYLINDER «, t00=0x003c, t01=0x0176}
0x5f54…5f60               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0016}
0x5f60…5f76               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x003d, t01=0x0022}
0x5f76…5f9c               Head {h00=0x0022, h01=0x0050, text=» RB(NE) SEE:15 NOT SAME CYL ID«, t00=0x003d, t01=0x0038}
0x5f9c…5fb0               Head {h00=0x0010, h01=0x0050, text=»VA2BR EQU * «, t00=0x003d, t01=0x005e}
0x5fb0…5fc4               Head {h00=0x0010, h01=0x0050, text=» ABL VA2:00 «, t00=0x003d, t01=0x0072}
0x5fc4…5fd0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x0086}
0x5fd0…5fda               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0092}
0x5fda…5ff0               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003d, t01=0x009c}
0x5ff0…6006               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003d, t01=0x00b2}
0x6006…6010               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00c8}
0x6010…601a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00d2}
0x601a…6030               Head {h00=0x0012, h01=0x0050, text=»*   FORMAT A3 «, t00=0x003d, t01=0x00dc}
0x6030…603a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00f2}
0x603a…604e               Head {h00=0x0010, h01=0x0050, text=»SEE:31 EQU *«, t00=0x003d, t01=0x00fc}
0x604e…6064               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003d, t01=0x0110}
0x6064…607c               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A2«, t00=0x003d, t01=0x0126}
0x607c…6088               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x013e}
0x6088…609e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003d, t01=0x014a}
0x609e…60b4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003d, t01=0x0160}
0x60b4…60cc               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x003d, t01=0x0176}
0x60cc…60d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003d, t01=0x018e}
0x60d8…60e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x000a}
0x60e2…60f8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003e, t01=0x0014}
0x60f8…611c               Head {h00=0x0020, h01=0x0050, text=» SLL A3,5 GET SECTOR NUMBER «, t00=0x003e, t01=0x002a}
0x611c…6144               Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTBSE,A6 SAVE FOR BSELOD«, t00=0x003e, t01=0x004e}
0x6144…6156               Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x003e, t01=0x0076}
0x6156…6188               Head {h00=0x002e, h01=0x0050, text=» CF A5,SKEW TO READ SECTOR 0 OR 8 ON DISC «, t00=0x003e, t01=0x0088}
0x6188…61bc               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x003e, t01=0x00ba}
0x61bc…61d0               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x003e, t01=0x00ee}
0x61d0…6206               Head {h00=0x0032, h01=0x0050, text=» LD A3,DWTBSE,A6 GET SECTOR NUMBER FOR BSELOD «, t00=0x003e, t01=0x0102}
0x6206…622a               Head {h00=0x0020, h01=0x0050, text=» ANK A1,/1F ERROR CODE CHECK«, t00=0x003e, t01=0x0138}
0x622a…6240               Head {h00=0x0012, h01=0x0050, text=» CF A5,BSEL00 «, t00=0x003e, t01=0x015c}
0x6240…6258               Head {h00=0x0014, h01=0x0050, text=» RF(Z) SEE:40 OK«, t00=0x003e, t01=0x0172}
0x6258…6264               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003e, t01=0x018a}
0x6264…626e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x0008}
0x626e…6282               Head {h00=0x0010, h01=0x0050, text=»SEE:32 EQU *«, t00=0x003f, t01=0x0012}
0x6282…62a6               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x003f, t01=0x0026}
0x62a6…62c6               Head {h00=0x001c, h01=0x0050, text=» SUK A4,1 RETRY COUNTER «, t00=0x003f, t01=0x004a}
0x62c6…62e2               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) SEE:15 RETRY«, t00=0x003f, t01=0x006a}
0x62e2…62f6               Head {h00=0x0010, h01=0x0050, text=»SEE:35 EQU *«, t00=0x003f, t01=0x0086}
0x62f6…630a               Head {h00=0x0010, h01=0x0050, text=» ABL END:10 «, t00=0x003f, t01=0x009a}
0x630a…6314               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ae}
0x6314…632a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003f, t01=0x00b8}
0x632a…6334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ce}
0x6334…634a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x003f, t01=0x00d8}
0x634a…6354               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00ee}
0x6354…635e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003f, t01=0x00f8}
0x635e…6372               Head {h00=0x0010, h01=0x0050, text=»SEE:40 EQU *«, t00=0x003f, t01=0x0102}
0x6372…6388               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x003f, t01=0x0116}
0x6388…639e               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x003f, t01=0x012c}
0x639e…63ca               Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x003f, t01=0x0142}
0x63ca…63d6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003f, t01=0x016e}
0x63d6…63ec               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x003f, t01=0x017a}
0x63ec…6402               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x003f, t01=0x0190}
0x6402…642e               Head {h00=0x0028, h01=0x0050, text=» LD A3,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0040, t01=0x0016}
0x642e…643a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0040, t01=0x0042}
0x643a…6450               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0040, t01=0x004e}
0x6450…6480               Head {h00=0x002c, h01=0x0050, text=» CW A3,BUFFER+PHSECL COMPARE WITH CYL ID«, t00=0x0040, t01=0x0064}
0x6480…649c               Head {h00=0x0018, h01=0x0050, text=» RB(NE) SEE:15 RETRY«, t00=0x0040, t01=0x0094}
0x649c…64a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00b0}
0x64a6…64bc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0040, t01=0x00ba}
0x64bc…64c6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00d0}
0x64c6…64e8               Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0040, t01=0x00da}
0x64e8…650a               Head {h00=0x001e, h01=0x0050, text=»*                       * «, t00=0x0040, t01=0x00fc}
0x650a…652c               Head {h00=0x001e, h01=0x0050, text=»*   READ AND WRITE      * «, t00=0x0040, t01=0x011e}
0x652c…654e               Head {h00=0x001e, h01=0x0050, text=»*   FORMAT A3           * «, t00=0x0040, t01=0x0140}
0x654e…6570               Head {h00=0x001e, h01=0x0050, text=»*                       * «, t00=0x0040, t01=0x0162}
0x6570…6592               Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0040, t01=0x0184}
0x6592…659c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0016}
0x659c…65b0               Head {h00=0x0010, h01=0x0050, text=»SEE:90 EQU *«, t00=0x0041, t01=0x0020}
0x65b0…65d2               Head {h00=0x001e, h01=0x0050, text=» LD A4,DWTOR,A6 GET ORDER «, t00=0x0041, t01=0x0034}
0x65d2…65e4               Head {h00=0x000e, h01=0x0050, text=» ANK A4,4 «, t00=0x0041, t01=0x0056}
0x65e4…6604               Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ00 READ ORDER«, t00=0x0041, t01=0x0068}
0x6604…6618               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x0041, t01=0x0088}
0x6618…664c               Head {h00=0x0030, h01=0x0050, text=» RF(N) WRIT20 WRITE DIRECT FROM USER BUFFER «, t00=0x0041, t01=0x009c}
0x664c…665e               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x0041, t01=0x00d0}
0x665e…6670               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0041, t01=0x00e2}
0x6670…6696               Head {h00=0x0022, h01=0x0050, text=» RF(N) READWR READ AFTER WRITE«, t00=0x0041, t01=0x00f4}
0x6696…66a2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0041, t01=0x011a}
0x66a2…66ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0126}
0x66ac…66c2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0041, t01=0x0130}
0x66c2…66da               Head {h00=0x0014, h01=0x0050, text=» CWK A2,PHSECL  «, t00=0x0041, t01=0x0146}
0x66da…6708               Head {h00=0x002a, h01=0x0050, text=» RF(E) WRIT10 WRITE FROM DRIVER BUFFER«, t00=0x0041, t01=0x015e}
0x6708…673c               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0041, t01=0x018c}
0x673c…6764               Head {h00=0x0024, h01=0x0050, text=» CF A5,REA:00 READ BEFORE WRITE «, t00=0x0042, t01=0x0030}
0x6764…676e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0058}
0x676e…6784               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0042, t01=0x0062}
0x6784…678e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0078}
0x678e…6798               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0082}
0x6798…67ac               Head {h00=0x0010, h01=0x0050, text=»WRIT10 EQU *«, t00=0x0042, t01=0x008c}
0x67ac…67ce               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0042, t01=0x00a0}
0x67ce…67e0               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0042, t01=0x00c2}
0x67e0…6810               Head {h00=0x002c, h01=0x0050, text=» ANK A4,/C0 GET NUMBER OF WORDS TO MOVE «, t00=0x0042, t01=0x00d4}
0x6810…6828               Head {h00=0x0014, h01=0x0050, text=» SLL A4,1 BYTES «, t00=0x0042, t01=0x0104}
0x6828…6856               Head {h00=0x002a, h01=0x0050, text=» ANK A2,/F BEG ADRESS IN DRIVER BUFFER«, t00=0x0042, t01=0x011c}
0x6856…6868               Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x0042, t01=0x014a}
0x6868…6894               Head {h00=0x0028, h01=0x0050, text=» CF A5,MOVWRI MOVE TO DRIVER BUFFER «, t00=0x0042, t01=0x015c}
0x6894…68aa               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0042, t01=0x0188}
0x68aa…68c0               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0043, t01=0x000e}
0x68c0…68ec               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0043, t01=0x0024}
0x68ec…68f8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x0050}
0x68f8…690e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0043, t01=0x005c}
0x690e…6924               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0043, t01=0x0072}
0x6924…6950               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0043, t01=0x0088}
0x6950…695c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0043, t01=0x00b4}
0x695c…6972               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0043, t01=0x00c0}
0x6972…69a4               Head {h00=0x002e, h01=0x0050, text=» ST A2,BUFFER+PHSECL PUT IN DRIVER BUFFER «, t00=0x0043, t01=0x00d6}
0x69a4…69dc               Head {h00=0x0034, h01=0x0050, text=» IM DWTFBU,A6 INDICATE WRITE FROM DRIVER BUFFER «, t00=0x0043, t01=0x0108}
0x69dc…6a0a               Head {h00=0x002a, h01=0x0050, text=» CF A5,WRI:00 WRITE FROM DRIVER BUFFER«, t00=0x0043, t01=0x0140}
0x6a0a…6a1c               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0043, t01=0x016e}
0x6a1c…6a26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0180}
0x6a26…6a3c               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0043, t01=0x018a}
0x6a3c…6a46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0010}
0x6a46…6a50               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x001a}
0x6a50…6a64               Head {h00=0x0010, h01=0x0050, text=»WRIT20 EQU *«, t00=0x0044, t01=0x0024}
0x6a64…6a7a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0044, t01=0x0038}
0x6a7a…6aa8               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,PHSECL PHYSICAL SECTOR LENGTH«, t00=0x0044, t01=0x004e}
0x6aa8…6adc               Head {h00=0x0030, h01=0x0050, text=» ADS A2,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0044, t01=0x007c}
0x6adc…6b0e               Head {h00=0x002e, h01=0x0050, text=» LD* A4,DWTUBU,A6 GET WORD IN USER BUFFER «, t00=0x0044, t01=0x00b0}
0x6b0e…6b30               Head {h00=0x001e, h01=0x0050, text=» ST A4,DWTSWD,A6 SAVE WORD«, t00=0x0044, t01=0x00e2}
0x6b30…6b5a               Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0044, t01=0x0104}
0x6b5a…6b70               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0044, t01=0x012e}
0x6b70…6b86               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0044, t01=0x0144}
0x6b86…6bb2               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0044, t01=0x015a}
0x6bb2…6bde               Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0044, t01=0x0186}
0x6bde…6bea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x0022}
0x6bea…6c00               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0045, t01=0x002e}
0x6c00…6c16               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0045, t01=0x0044}
0x6c16…6c2c               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0045, t01=0x005a}
0x6c2c…6c44               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTCYL,A6«, t00=0x0045, t01=0x0070}
0x6c44…6c70               Head {h00=0x0028, h01=0x0050, text=» ST* A2,DWTUBU,A6 PUT IN USER BUFFER«, t00=0x0045, t01=0x0088}
0x6c70…6c7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x00b4}
0x6c7c…6c86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x00c0}
0x6c86…6c9c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0045, t01=0x00ca}
0x6c9c…6cb2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0045, t01=0x00e0}
0x6cb2…6cc8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0045, t01=0x00f6}
0x6cc8…6cde               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0045, t01=0x010c}
0x6cde…6d0a               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0045, t01=0x0122}
0x6d0a…6d16               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0045, t01=0x014e}
0x6d16…6d2c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0045, t01=0x015a}
0x6d2c…6d42               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0045, t01=0x0170}
0x6d42…6d58               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0045, t01=0x0186}
0x6d58…6d84               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0046, t01=0x000c}
0x6d84…6d90               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0046, t01=0x0038}
0x6d90…6da6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0046, t01=0x0044}
0x6da6…6dbc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0046, t01=0x005a}
0x6dbc…6de8               Head {h00=0x0028, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS ON STACK «, t00=0x0046, t01=0x0070}
0x6de8…6e14               Head {h00=0x0028, h01=0x0050, text=» TL DWTPAG,A6 LOAD PAGE WITH CYL ID «, t00=0x0046, t01=0x009c}
0x6e14…6e48               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0046, t01=0x00c8}
0x6e48…6e72               Head {h00=0x0026, h01=0x0050, text=» EL A3,PHSECL,A2 GET WORD TO SAVE «, t00=0x0046, t01=0x00fc}
0x6e72…6ea2               Head {h00=0x002c, h01=0x0050, text=» ES A4,PHSECL,A2 PUT CYL ID IN POSITION «, t00=0x0046, t01=0x0126}
0x6ea2…6ec4               Head {h00=0x001e, h01=0x0050, text=» TL -30,A15 GET REGISTERS «, t00=0x0046, t01=0x0156}
0x6ec4…6ee6               Head {h00=0x001e, h01=0x0050, text=» ST A3,DWTSWD,A6 SAVA WORD«, t00=0x0046, t01=0x0178}
0x6ee6…6f10               Head {h00=0x0026, h01=0x0050, text=» IM DWTFSW,A6 INDICATE SAVED WORD «, t00=0x0047, t01=0x000a}
0x6f10…6f1c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0047, t01=0x0034}
0x6f1c…6f26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0040}
0x6f26…6f3c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0047, t01=0x004a}
0x6f3c…6f72               Head {h00=0x0032, h01=0x0050, text=» CM DWTFBU,A6 INDICATE WRITE FROM USER BUFFER «, t00=0x0047, t01=0x0060}
0x6f72…6fa6               Head {h00=0x0030, h01=0x0050, text=» CF A5,WRI:00 WRITE SECTOR FROM USER BUFFER «, t00=0x0047, t01=0x0096}
0x6fa6…6fd8               Head {h00=0x002e, h01=0x0050, text=» CF A5,REWORD RESTORE WORD TO USER BUFFER «, t00=0x0047, t01=0x00ca}
0x6fd8…6fea               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0047, t01=0x00fc}
0x6fea…6ff4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x010e}
0x6ff4…700a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0047, t01=0x0118}
0x700a…7014               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x012e}
0x7014…701e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0138}
0x701e…7030               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x0047, t01=0x0142}
0x7030…7044               Head {h00=0x0010, h01=0x0050, text=»READWR EQU *«, t00=0x0047, t01=0x0154}
0x7044…706a               Head {h00=0x0022, h01=0x0050, text=» CF A5,REA:10 READ AFTER WRITE«, t00=0x0047, t01=0x0168}
0x706a…707c               Head {h00=0x000e, h01=0x0050, text=» RF SEE:97«, t00=0x0047, t01=0x018e}
0x707c…7088               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0048, t01=0x0010}
0x7088…7092               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0048, t01=0x001c}
0x7092…70a8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0048, t01=0x0026}
0x70a8…70bc               Head {h00=0x0010, h01=0x0050, text=»READ00 EQU *«, t00=0x0048, t01=0x003c}
0x70bc…70de               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x0048, t01=0x0050}
0x70de…7100               Head {h00=0x001e, h01=0x0050, text=» RF(N) READ20 DIRECT READ «, t00=0x0048, t01=0x0072}
0x7100…7134               Head {h00=0x0030, h01=0x0050, text=» IM DWTFBU,A6 INDICATE READ TO DRIVER BUFFER«, t00=0x0048, t01=0x0094}
0x7134…7160               Head {h00=0x0028, h01=0x0050, text=» CF A5,REA:00 READ TO DRIVER BUFFER «, t00=0x0048, t01=0x00c8}
0x7160…7182               Head {h00=0x001e, h01=0x0050, text=» LD* A1,4,A5 GET DATA WORD«, t00=0x0048, t01=0x00f4}
0x7182…7194               Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x0048, t01=0x0116}
0x7194…71a6               Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0048, t01=0x0128}
0x71a6…71dc               Head {h00=0x0032, h01=0x0050, text=» ANKL A4,/180 GET NUMBER OF BYTES TO BE MOVED «, t00=0x0048, t01=0x013a}
0x71dc…71fc               Head {h00=0x001c, h01=0x0050, text=» ANK A1,/18 GET POSITION«, t00=0x0048, t01=0x0170}
0x71fc…720e               Head {h00=0x000e, h01=0x0050, text=» SLL A1,4 «, t00=0x0048, t01=0x0190}
0x720e…7224               Head {h00=0x0012, h01=0x0050, text=» CF A5,MOVRED «, t00=0x0049, t01=0x0012}
0x7224…7236               Head {h00=0x000e, h01=0x0050, text=» RF SEE:95«, t00=0x0049, t01=0x0028}
0x7236…724a               Head {h00=0x0010, h01=0x0050, text=»READ20 EQU *«, t00=0x0049, t01=0x003a}
0x724a…7260               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0049, t01=0x004e}
0x7260…7278               Head {h00=0x0014, h01=0x0050, text=» LDKL A3,PHSECL «, t00=0x0049, t01=0x0064}
0x7278…72ac               Head {h00=0x0030, h01=0x0050, text=» ADS A3,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x0049, t01=0x007c}
0x72ac…72b8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x00b0}
0x72b8…72c2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x00bc}
0x72c2…72d8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0049, t01=0x00c6}
0x72d8…730a               Head {h00=0x002e, h01=0x0050, text=» CM DWTFBU,A6 INDICATE READ TO USER BUFFER«, t00=0x0049, t01=0x00dc}
0x730a…7334               Head {h00=0x0026, h01=0x0050, text=» CF A5,REA:00 READ TO USER BUFFER «, t00=0x0049, t01=0x010e}
0x7334…7348               Head {h00=0x0010, h01=0x0050, text=»SEE:95 EQU *«, t00=0x0049, t01=0x0138}
0x7348…7376               Head {h00=0x002a, h01=0x0050, text=» IMR A6 UPDATE PHYSICAL SECTOR POINTER«, t00=0x0049, t01=0x014c}
0x7376…7382               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0049, t01=0x017a}
0x7382…738c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0049, t01=0x0186}
0x738c…73a2               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0049, t01=0x0190}
0x73a2…73ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0016}
0x73ac…73b6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x0020}
0x73b6…73ca               Head {h00=0x0010, h01=0x0050, text=»SEE:96 EQU *«, t00=0x004a, t01=0x002a}
0x73ca…73ec               Head {h00=0x001e, h01=0x0050, text=» LD* A2,4,A5 GET DATA WORD«, t00=0x004a, t01=0x003e}
0x73ec…7406               Head {h00=0x0016, h01=0x0050, text=» ANK A2,/C0 LENGTH«, t00=0x004a, t01=0x0060}
0x7406…7418               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004a, t01=0x007a}
0x7418…743e               Head {h00=0x0022, h01=0x0050, text=» ADS A2,ECBEL,A8 UPDATE ECBEL «, t00=0x004a, t01=0x008c}
0x743e…7448               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x00b2}
0x7448…745e               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004a, t01=0x00bc}
0x745e…7470               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x004a, t01=0x00d2}
0x7470…748c               Head {h00=0x0018, h01=0x0050, text=» SRL A2,1 WORD MODE «, t00=0x004a, t01=0x00e4}
0x748c…74c0               Head {h00=0x0030, h01=0x0050, text=» DA DWTBA1,A6 UPDATE PHYSICAL BUFFER ADDRESS«, t00=0x004a, t01=0x0100}
0x74c0…74ea               Head {h00=0x0026, h01=0x0050, text=» CF A5,MMULOG GET LOGICAL ADDRESS «, t00=0x004a, t01=0x0134}
0x74ea…74f6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004a, t01=0x015e}
0x74f6…7500               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004a, t01=0x016a}
0x7500…7514               Head {h00=0x0010, h01=0x0050, text=»SEE:97 EQU *«, t00=0x004a, t01=0x0174}
0x7514…7534               Head {h00=0x001c, h01=0x0050, text=» LDK A1,2 UPDATE RETURN «, t00=0x004a, t01=0x0188}
0x7534…7548               Head {h00=0x0010, h01=0x0050, text=» ADS A1,4,A5«, t00=0x004b, t01=0x0018}
0x7548…7558               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x004b, t01=0x002c}
0x7558…7562               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x003c}
0x7562…7578               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x004b, t01=0x0046}
0x7578…7582               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x005c}
0x7582…7598               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004b, t01=0x0066}
0x7598…75a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x007c}
0x75a2…75ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0086}
0x75ac…75d4               Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x0090}
0x75d4…75fc               Head {h00=0x0024, h01=0x0050, text=»*                              *«, t00=0x004b, t01=0x00b8}
0x75fc…7624               Head {h00=0x0024, h01=0x0050, text=»*   DISC FORMAT A2             *«, t00=0x004b, t01=0x00e0}
0x7624…764c               Head {h00=0x0024, h01=0x0050, text=»*                              *«, t00=0x004b, t01=0x0108}
0x764c…7674               Head {h00=0x0024, h01=0x0050, text=»********************************«, t00=0x004b, t01=0x0130}
0x7674…767e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0158}
0x767e…7688               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004b, t01=0x0162}
0x7688…769c               Head {h00=0x0010, h01=0x0050, text=»VA2:00 EQU *«, t00=0x004b, t01=0x016c}
0x769c…76ba               Head {h00=0x001a, h01=0x0050, text=» LDK A4,QRETRY RETRIES«, t00=0x004b, t01=0x0180}
0x76ba…76ce               Head {h00=0x0010, h01=0x0050, text=»VA2:10 EQU *«, t00=0x004c, t01=0x000e}
0x76ce…76e4               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x004c, t01=0x0022}
0x76e4…76fa               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x004c, t01=0x0038}
0x76fa…7706               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x004e}
0x7706…771c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x005a}
0x771c…7744               Head {h00=0x0024, h01=0x0050, text=» CF A5,INLACE INTERLACE AND SKEW«, t00=0x004c, t01=0x0070}
0x7744…774e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0098}
0x774e…7764               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004c, t01=0x00a2}
0x7764…7782               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/8080 1ST WER«, t00=0x004c, t01=0x00b8}
0x7782…7794               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004c, t01=0x00d6}
0x7794…77a8               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004c, t01=0x00e8}
0x77a8…77ba               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004c, t01=0x00fc}
0x77ba…77e6               Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004c, t01=0x010e}
0x77e6…77fe               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004c, t01=0x013a}
0x77fe…7810               Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004c, t01=0x0152}
0x7810…7824               Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004c, t01=0x0164}
0x7824…7830               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004c, t01=0x0178}
0x7830…783a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004c, t01=0x0184}
0x783a…7850               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004c, t01=0x018e}
0x7850…7866               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004d, t01=0x0014}
0x7866…788c               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0808 1ST WER SHIFTED«, t00=0x004d, t01=0x002a}
0x788c…7898               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x0050}
0x7898…78a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x005c}
0x78a2…78b8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004d, t01=0x0066}
0x78b8…78ca               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x004d, t01=0x007c}
0x78ca…78e0               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004d, t01=0x008e}
0x78e0…78f4               Head {h00=0x0010, h01=0x0050, text=» LD* A2,4,A5«, t00=0x004d, t01=0x00a4}
0x78f4…7906               Head {h00=0x000e, h01=0x0050, text=» SLL A2,1 «, t00=0x004d, t01=0x00b8}
0x7906…7932               Head {h00=0x0028, h01=0x0050, text=» RF(NN) VA2:20 NOT READ AFTER WRITE «, t00=0x004d, t01=0x00ca}
0x7932…7948               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/8080«, t00=0x004d, t01=0x00f6}
0x7948…7960               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x004d, t01=0x010c}
0x7960…7972               Head {h00=0x000e, h01=0x0050, text=» RF VA2:35«, t00=0x004d, t01=0x0124}
0x7972…7986               Head {h00=0x0010, h01=0x0050, text=»VA2:20 EQU *«, t00=0x004d, t01=0x0136}
0x7986…7992               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004d, t01=0x014a}
0x7992…799c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004d, t01=0x0156}
0x799c…79b2               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004d, t01=0x0160}
0x79b2…79d4               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET ORDER «, t00=0x004d, t01=0x0176}
0x79d4…79e6               Head {h00=0x000e, h01=0x0050, text=» ANK A2,4 «, t00=0x004e, t01=0x0008}
0x79e6…7a00               Head {h00=0x0016, h01=0x0050, text=» RF(Z) VA2:30 READ«, t00=0x004e, t01=0x001a}
0x7a00…7a0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0034}
0x7a0a…7a20               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004e, t01=0x003e}
0x7a20…7a36               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/C080«, t00=0x004e, t01=0x0054}
0x7a36…7a42               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x006a}
0x7a42…7a4c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0076}
0x7a4c…7a62               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x0080}
0x7a62…7a78               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004e, t01=0x0096}
0x7a78…7a9e               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/080C 1ST WER SHIFTED«, t00=0x004e, t01=0x00ac}
0x7a9e…7aaa               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004e, t01=0x00d2}
0x7aaa…7ab4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x00de}
0x7ab4…7aca               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004e, t01=0x00e8}
0x7aca…7af0               Head {h00=0x0022, h01=0x0050, text=» ADK A3,1 ORDER CODE FOR WRITE«, t00=0x004e, t01=0x00fe}
0x7af0…7afa               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0124}
0x7afa…7b10               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x004e, t01=0x012e}
0x7b10…7b1a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x0144}
0x7b1a…7b24               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x014e}
0x7b24…7b38               Head {h00=0x0010, h01=0x0050, text=»VA2:30 EQU *«, t00=0x004e, t01=0x0158}
0x7b38…7b42               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004e, t01=0x016c}
0x7b42…7b58               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x004e, t01=0x0176}
0x7b58…7b78               Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTUBU,A6 2ND WER«, t00=0x004e, t01=0x018c}
0x7b78…7b84               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x001c}
0x7b84…7b8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x0028}
0x7b8e…7ba4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004f, t01=0x0032}
0x7ba4…7bba               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x004f, t01=0x0048}
0x7bba…7bcc               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x004f, t01=0x005e}
0x7bcc…7be2               Head {h00=0x0012, h01=0x0050, text=» DA DWTBA1,A6 «, t00=0x004f, t01=0x0070}
0x7be2…7c08               Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x004f, t01=0x0086}
0x7c08…7c2e               Head {h00=0x0022, h01=0x0050, text=» SLL A2,1 2ND WER IN POSITION «, t00=0x004f, t01=0x00ac}
0x7c2e…7c3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x004f, t01=0x00d2}
0x7c3a…7c44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x004f, t01=0x00de}
0x7c44…7c5a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x004f, t01=0x00e8}
0x7c5a…7c6e               Head {h00=0x0010, h01=0x0050, text=»VA2:35 EQU *«, t00=0x004f, t01=0x00fe}
0x7c6e…7c84               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x004f, t01=0x0112}
0x7c84…7c98               Head {h00=0x0010, h01=0x0050, text=» ANK A1,/1F «, t00=0x004f, t01=0x0128}
0x7c98…7cb6               Head {h00=0x001a, h01=0x0050, text=» RF(Z) VA2:40 IO ERROR«, t00=0x004f, t01=0x013c}
0x7cb6…7ccc               Head {h00=0x0012, h01=0x0050, text=» IM DWTRTY,A6 «, t00=0x004f, t01=0x015a}
0x7ccc…7cde               Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x004f, t01=0x0170}
0x7cde…7cfa               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) VA2:10 RETRY«, t00=0x004f, t01=0x0182}
0x7cfa…7d12               Head {h00=0x0014, h01=0x0050, text=» RF WRI:50 ERROR«, t00=0x0050, t01=0x000e}
0x7d12…7d1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0026}
0x7d1c…7d32               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0050, t01=0x0030}
0x7d32…7d3c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0046}
0x7d3c…7d46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0050, t01=0x0050}
0x7d46…7d5a               Head {h00=0x0010, h01=0x0050, text=»VA2:40 EQU *«, t00=0x0050, t01=0x005a}
0x7d5a…7d88               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0050, t01=0x006e}
0x7d88…7da6               Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEXT SECTOR «, t00=0x0050, t01=0x009c}
0x7da6…7db8               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0050, t01=0x00ba}
0x7db8…7dca               Head {h00=0x000e, h01=0x0050, text=» CWK A2,31«, t00=0x0050, t01=0x00cc}
0x7dca…7df0               Head {h00=0x0022, h01=0x0050, text=» RF(NE) VA2:50 NOT CYLINDER 0 «, t00=0x0050, t01=0x00de}
0x7df0…7e1a               Head {h00=0x0026, h01=0x0050, text=» ADK A3,2 CYLINDER 0 TO CYLINDER 1«, t00=0x0050, t01=0x0104}
0x7e1a…7e2e               Head {h00=0x0010, h01=0x0050, text=»VA2:50 EQU *«, t00=0x0050, t01=0x012e}
0x7e2e…7e42               Head {h00=0x0010, h01=0x0050, text=» ANK A2,/1F «, t00=0x0050, t01=0x0142}
0x7e42…7e66               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) VA2:60 SAME CYLINDER«, t00=0x0050, t01=0x0156}
0x7e66…7e84               Head {h00=0x001a, h01=0x0050, text=» ADK A3,1 NEW CYLINDER«, t00=0x0050, t01=0x017a}
0x7e84…7e98               Head {h00=0x0010, h01=0x0050, text=»VA2:60 EQU *«, t00=0x0051, t01=0x0008}
0x7e98…7ec2               Head {h00=0x0026, h01=0x0050, text=» STR A3,A6 PHYSICAL SECTOR NUMBER «, t00=0x0051, t01=0x001c}
0x7ec2…7ed4               Head {h00=0x000e, h01=0x0050, text=» RB SEE:96«, t00=0x0051, t01=0x0046}
0x7ed4…7ee0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0051, t01=0x0058}
0x7ee0…7eea               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x0064}
0x7eea…7f00               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0051, t01=0x006e}
0x7f00…7f16               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0051, t01=0x0084}
0x7f16…7f20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0051, t01=0x009a}
0x7f20…7f44               Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x00a4}
0x7f44…7f68               Head {h00=0x0020, h01=0x0050, text=»*                          *«, t00=0x0051, t01=0x00c8}
0x7f68…7f8c               Head {h00=0x0020, h01=0x0050, text=»*   SUBROUTINES FOR WRITE  *«, t00=0x0051, t01=0x00ec}
0x7f8c…7fb0               Head {h00=0x0020, h01=0x0050, text=»*   FROM USER BUFFER:      *«, t00=0x0051, t01=0x0110}
0x7fb0…7fd4               Head {h00=0x0020, h01=0x0050, text=»*   FROM DRIVER     :      *«, t00=0x0051, t01=0x0134}
0x7fd4…7ff8               Head {h00=0x0020, h01=0x0050, text=»*                          *«, t00=0x0051, t01=0x0158}
0x7ff8…801c               Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0051, t01=0x017c}
0x801c…8026               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0052, t01=0x0010}
0x8026…803a               Head {h00=0x0010, h01=0x0050, text=»WRI:00 EQU *«, t00=0x0052, t01=0x001a}
0x803a…8058               Head {h00=0x001a, h01=0x0050, text=» LDK A4,QRETRY RETRIES«, t00=0x0052, t01=0x002e}
0x8058…806c               Head {h00=0x0010, h01=0x0050, text=»WRI:20 EQU *«, t00=0x0052, t01=0x004c}
0x806c…8082               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0052, t01=0x0060}
0x8082…8098               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0052, t01=0x0076}
0x8098…80a4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0052, t01=0x008c}
0x80a4…80ba               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0052, t01=0x0098}
0x80ba…80e8               Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0052, t01=0x00ae}
0x80e8…8100               Head {h00=0x0014, h01=0x0050, text=» CF A5,WRITE CIO«, t00=0x0052, t01=0x00dc}
0x8100…8122               Head {h00=0x001e, h01=0x0050, text=» ANK A1,/1F RETURN CODE ? «, t00=0x0052, t01=0x00f4}
0x8122…8138               Head {h00=0x0012, h01=0x0050, text=» CF A5,BSELOD «, t00=0x0052, t01=0x0116}
0x8138…815c               Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRI:80 NO RETURN CODE«, t00=0x0052, t01=0x012c}
0x815c…8180               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0052, t01=0x0150}
0x8180…81aa               Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0052, t01=0x0174}
0x81aa…81c0               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) WRI:20«, t00=0x0053, t01=0x000e}
0x81c0…81f0               Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0053, t01=0x0024}
0x81f0…81fc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0053, t01=0x0054}
0x81fc…8206               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x0060}
0x8206…821a               Head {h00=0x0010, h01=0x0050, text=»WRI:50 EQU *«, t00=0x0053, t01=0x006a}
0x821a…823a               Head {h00=0x001c, h01=0x0050, text=» ABL END:10 ERROR END IO«, t00=0x0053, t01=0x007e}
0x823a…8244               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x009e}
0x8244…825a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0053, t01=0x00a8}
0x825a…8264               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00be}
0x8264…8278               Head {h00=0x0010, h01=0x0050, text=»WRI:80 EQU *«, t00=0x0053, t01=0x00c8}
0x8278…8288               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0053, t01=0x00dc}
0x8288…8292               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x00ec}
0x8292…82a8               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0053, t01=0x00f6}
0x82a8…82b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0053, t01=0x010c}
0x82b2…82dc               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0053, t01=0x0116}
0x82dc…8306               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0053, t01=0x0140}
0x8306…8330               Head {h00=0x0026, h01=0x0050, text=»*   SUBROUTINES FOR READ TO     * «, t00=0x0053, t01=0x016a}
0x8330…835a (84, 0, 400)  Head {h00=0x0026, h01=0x0050, text=»*   USER BUFFER :               * «, t00=0x0054, t01=0x0004}
0x835a…8384               Head {h00=0x0026, h01=0x0050, text=»*   DRIVER BUFFER :             * «, t00=0x0054, t01=0x002e}
0x8384…83ae               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0054, t01=0x0058}
0x83ae…83d8               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0054, t01=0x0082}
0x83d8…83e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0054, t01=0x00ac}
0x83e2…83f6               Head {h00=0x0010, h01=0x0050, text=»REA:00 EQU *«, t00=0x0054, t01=0x00b6}
0x83f6…8418               Head {h00=0x001e, h01=0x0050, text=» LD A3,DWTOR,A6 GET INDEX «, t00=0x0054, t01=0x00ca}
0x8418…842e               Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/300 «, t00=0x0054, t01=0x00ec}
0x842e…844c               Head {h00=0x001a, h01=0x0050, text=» SLL A3,6 IN POSITION «, t00=0x0054, t01=0x0102}
0x844c…8472               Head {h00=0x0022, h01=0x0050, text=» ORR* A3,A6 ADD SECTOR NUMBER «, t00=0x0054, t01=0x0120}
0x8472…849a               Head {h00=0x0024, h01=0x0050, text=» CW A3,DWTBSE,A6 ALLREADY READ ?«, t00=0x0054, t01=0x0146}
0x849a…84b0               Head {h00=0x0012, h01=0x0050, text=» RF(E) REA:85 «, t00=0x0054, t01=0x016e}
0x84b0…84c4               Head {h00=0x0010, h01=0x0050, text=»REA:10 EQU *«, t00=0x0054, t01=0x0184}
0x84c4…84da               Head {h00=0x0012, h01=0x0050, text=» LDK A4,QRETRY«, t00=0x0055, t01=0x0008}
0x84da…84ee               Head {h00=0x0010, h01=0x0050, text=»REA:20 EQU *«, t00=0x0055, t01=0x001e}
0x84ee…8504               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0055, t01=0x0032}
0x8504…851a               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0055, t01=0x0048}
0x851a…8526               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0055, t01=0x005e}
0x8526…853c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0055, t01=0x006a}
0x853c…856a               Head {h00=0x002a, h01=0x0050, text=» CF A5,INLACE INTERLACE SECTOR NUMBER «, t00=0x0055, t01=0x0080}
0x856a…858a               Head {h00=0x001c, h01=0x0050, text=» CF A5,READ READ SECTOR «, t00=0x0055, t01=0x00ae}
0x858a…859c               Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0055, t01=0x00ce}
0x859c…85d0               Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0055, t01=0x00e0}
0x85d0…85f4               Head {h00=0x0020, h01=0x0050, text=» RF(Z) REA:30 NO RETURN CODE«, t00=0x0055, t01=0x0114}
0x85f4…8608               Head {h00=0x0010, h01=0x0050, text=»REA:25 EQU *«, t00=0x0055, t01=0x0138}
0x8608…862c               Head {h00=0x0020, h01=0x0050, text=» IM DWTRTY,A6 INDICATE RETRY«, t00=0x0055, t01=0x014c}
0x862c…8656               Head {h00=0x0026, h01=0x0050, text=» SUK A4,1 DECREMENT RETRY COUNTER «, t00=0x0055, t01=0x0170}
0x8656…8672               Head {h00=0x0018, h01=0x0050, text=» RB(NZ) REA:20 RETRY«, t00=0x0056, t01=0x000a}
0x8672…8686               Head {h00=0x0010, h01=0x0050, text=» ABL END:20 «, t00=0x0056, t01=0x0026}
0x8686…8690               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x003a}
0x8690…86a6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0056, t01=0x0044}
0x86a6…86b0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x005a}
0x86b0…86ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0064}
0x86ba…86ce               Head {h00=0x0010, h01=0x0050, text=»REA:30 EQU *«, t00=0x0056, t01=0x006e}
0x86ce…86f8               Head {h00=0x0026, h01=0x0050, text=» LD A3,BUFFER+PHSECL GET CYL ID =4«, t00=0x0056, t01=0x0082}
0x86f8…8710               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0056, t01=0x00ac}
0x8710…8740               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) REA:50 READ TO DRIVER BUFFER =4 «, t00=0x0056, t01=0x00c4}
0x8740…8756               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0056, t01=0x00f4}
0x8756…8790               Head {h00=0x0036, h01=0x0050, text=» LD* A3,DWTUBU,A6 GET CYLINDER ID FROM USER BUFFER«, t00=0x0056, t01=0x010a}
0x8790…879c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0056, t01=0x0144}
0x879c…87a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0056, t01=0x0150}
0x87a6…87bc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0056, t01=0x015a}
0x87bc…87d2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0056, t01=0x0170}
0x87d2…87f4               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x0056, t01=0x0186}
0x87f4…8816               Head {h00=0x001e, h01=0x0050, text=» TL DWTPAG,A6 LOAD MMUPAGE«, t00=0x0057, t01=0x0018}
0x8816…884a               Head {h00=0x0030, h01=0x0050, text=» LD A3,DWTUBU,A6 GET LOGICAL BUFFER POINTER «, t00=0x0057, t01=0x003a}
0x884a…886e               Head {h00=0x0020, h01=0x0050, text=» EL A3,PHSECL,A3 GET CYL ID «, t00=0x0057, t01=0x006e}
0x886e…8892               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x0057, t01=0x0092}
0x8892…889e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x00b6}
0x889e…88a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0057, t01=0x00c2}
0x88a8…88be               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0057, t01=0x00cc}
0x88be…88d2               Head {h00=0x0010, h01=0x0050, text=»REA:50 EQU *«, t00=0x0057, t01=0x00e2}
0x88d2…88e8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0057, t01=0x00f6}
0x88e8…88fe               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0057, t01=0x010c}
0x88fe…8916               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A2«, t00=0x0057, t01=0x0122}
0x8916…8922               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x013a}
0x8922…8938               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0057, t01=0x0146}
0x8938…894e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0057, t01=0x015c}
0x894e…8966               Head {h00=0x0014, h01=0x0050, text=» CW A3,DWTCYL,A6«, t00=0x0057, t01=0x0172}
0x8966…8972               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0057, t01=0x018a}
0x8972…8988               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0058, t01=0x0008}
0x8988…89b0               Head {h00=0x0024, h01=0x0050, text=» RF(E) REA:90 RIGHT CYLINDER ID «, t00=0x0058, t01=0x001e}
0x89b0…89cc               Head {h00=0x0018, h01=0x0050, text=» LDK A1,2 SEEK ERROR«, t00=0x0058, t01=0x0046}
0x89cc…89d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0062}
0x89d6…89ec               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0058, t01=0x006c}
0x89ec…89f6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x0082}
0x89f6…8a00               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0058, t01=0x008c}
0x8a00…8a12               Head {h00=0x000e, h01=0x0050, text=» RB REA:25«, t00=0x0058, t01=0x0096}
0x8a12…8a26               Head {h00=0x0010, h01=0x0050, text=»REA:85 EQU *«, t00=0x0058, t01=0x00a8}
0x8a26…8a3e               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTFBU,A6«, t00=0x0058, t01=0x00bc}
0x8a3e…8a6a               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) REA:90 READ TO DRIVER BUFFER«, t00=0x0058, t01=0x00d4}
0x8a6a…8a92               Head {h00=0x0024, h01=0x0050, text=» LDKL A4,/180 BYTES TO BE MOVED «, t00=0x0058, t01=0x0100}
0x8a92…8aa8               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0058, t01=0x0128}
0x8aa8…8aba               Head {h00=0x000e, h01=0x0050, text=» NGR A2,A4«, t00=0x0058, t01=0x013e}
0x8aba…8afe               Head {h00=0x0040, h01=0x0050, text=» ADS A2,DWTUBU,A6 RESET USER BUFFER POINTER FOR DIRECT MOVE «, t00=0x0058, t01=0x0150}
0x8afe…8b0a (89, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0059, t01=0x0004}
0x8b0a…8b20               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0059, t01=0x0010}
0x8b20…8b4a               Head {h00=0x0026, h01=0x0050, text=» CF A5,MOVRED MOVE TO USER BUFFER «, t00=0x0059, t01=0x0026}
0x8b4a…8b5e               Head {h00=0x0010, h01=0x0050, text=»REA:90 EQU *«, t00=0x0059, t01=0x0050}
0x8b5e…8b6e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0059, t01=0x0064}
0x8b6e…8b78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0074}
0x8b78…8b8e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0059, t01=0x007e}
0x8b8e…8b98               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x0094}
0x8b98…8ba2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0059, t01=0x009e}
0x8ba2…8bd0               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0059, t01=0x00a8}
0x8bd0…8bfe               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0059, t01=0x00d6}
0x8bfe…8c2c               Head {h00=0x002a, h01=0x0050, text=»*   SUBROUTINES FOR MOVING WORDS    * «, t00=0x0059, t01=0x0104}
0x8c2c…8c56               Head {h00=0x0026, h01=0x0050, text=»*   USER BUFFER TO DRIVER BUFFER: «, t00=0x0059, t01=0x0132}
0x8c56…8c84               Head {h00=0x002a, h01=0x0050, text=»*   MOVWRI                          * «, t00=0x0059, t01=0x015c}
0x8c84…8cb2               Head {h00=0x002a, h01=0x0050, text=»*   DRIVER BUFFER TO USER BUFFER    * «, t00=0x0059, t01=0x018a}
0x8cb2…8ce0               Head {h00=0x002a, h01=0x0050, text=»*   MOVRED                          * «, t00=0x005a, t01=0x0028}
0x8ce0…8d0e               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x005a, t01=0x0056}
0x8d0e…8d3c               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x005a, t01=0x0084}
0x8d3c…8d46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x00b2}
0x8d46…8d68               Head {h00=0x001e, h01=0x0050, text=»*   A1   BUFFER ADDRESS IN«, t00=0x005a, t01=0x00bc}
0x8d68…8d8c               Head {h00=0x0020, h01=0x0050, text=»*   A2   BUFFER ADDRESS OUT «, t00=0x005a, t01=0x00de}
0x8d8c…8daa               Head {h00=0x001a, h01=0x0050, text=»*   A4   BUFFER LENGTH«, t00=0x005a, t01=0x0102}
0x8daa…8dc0               Head {h00=0x0012, h01=0x0050, text=»*   A3   USED «, t00=0x005a, t01=0x0120}
0x8dc0…8dca               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005a, t01=0x0136}
0x8dca…8dde               Head {h00=0x0010, h01=0x0050, text=»MOVRED EQU *«, t00=0x005a, t01=0x0140}
0x8dde…8df6               Head {h00=0x0014, h01=0x0050, text=» ADKL A1,BUFFER «, t00=0x005a, t01=0x0154}
0x8df6…8e12               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005a, t01=0x016c}
0x8e12…8e48               Head {h00=0x0032, h01=0x0050, text=» LD A2,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005a, t01=0x0188}
0x8e48…8e54               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x002e}
0x8e54…8e5e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x003a}
0x8e5e…8e74               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005b, t01=0x0044}
0x8e74…8e90               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005b, t01=0x005a}
0x8e90…8ea6               Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005b, t01=0x0076}
0x8ea6…8ed6               Head {h00=0x002c, h01=0x0050, text=» LD A2,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005b, t01=0x008c}
0x8ed6…8f0a               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005b, t01=0x00bc}
0x8f0a…8f1a               Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005b, t01=0x00f0}
0x8f1a…8f26               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005b, t01=0x0100}
0x8f26…8f30               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005b, t01=0x010c}
0x8f30…8f46               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005b, t01=0x0116}
0x8f46…8f5c               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005b, t01=0x012c}
0x8f5c…8f72               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005b, t01=0x0142}
0x8f72…8fa6               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005b, t01=0x0158}
0x8fa6…8fc2               Head {h00=0x0018, h01=0x0050, text=» SLL A2,1 BYTE MODE «, t00=0x005b, t01=0x018c}
0x8fc2…8fe4               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005c, t01=0x0018}
0x8fe4…8ffa               Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005c, t01=0x003a}
0x8ffa…9026               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005c, t01=0x0050}
0x9026…9036               Head {h00=0x000c, h01=0x0050, text=» MVSU A4«, t00=0x005c, t01=0x007c}
0x9036…9042               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005c, t01=0x008c}
0x9042…904c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x0098}
0x904c…9062               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005c, t01=0x00a2}
0x9062…9074               Head {h00=0x000e, h01=0x0050, text=» RF MOV:00«, t00=0x005c, t01=0x00b8}
0x9074…907e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00ca}
0x907e…9094               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x005c, t01=0x00d4}
0x9094…909e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00ea}
0x909e…90a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005c, t01=0x00f4}
0x90a8…90bc               Head {h00=0x0010, h01=0x0050, text=»MOVWRI EQU *«, t00=0x005c, t01=0x00fe}
0x90bc…90ea               Head {h00=0x002a, h01=0x0050, text=» ADKL A2,BUFFER DRIVER BUFFER POINTER «, t00=0x005c, t01=0x0112}
0x90ea…9106               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005c, t01=0x0140}
0x9106…913c               Head {h00=0x0032, h01=0x0050, text=» LD A1,DWTUBU,A6 PRESENT POINT IN USER BUFFER «, t00=0x005c, t01=0x015c}
0x913c…9148 (93, 0, 400)  Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x0004}
0x9148…9152               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x0010}
0x9152…9168               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x001a}
0x9168…9184               Head {h00=0x0018, h01=0x0050, text=» IFT CPU852+MMUPAG=0«, t00=0x005d, t01=0x0030}
0x9184…919a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU857=1 «, t00=0x005d, t01=0x004c}
0x919a…91ca               Head {h00=0x002c, h01=0x0050, text=» LD A1,DWTUBU,A6 GET USER BUFFER POINTER«, t00=0x005d, t01=0x0062}
0x91ca…91fe               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005d, t01=0x0092}
0x91fe…920e               Head {h00=0x000c, h01=0x0050, text=» MVB A4 «, t00=0x005d, t01=0x00c6}
0x920e…921a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005d, t01=0x00d6}
0x921a…9224               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005d, t01=0x00e2}
0x9224…923a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005d, t01=0x00ec}
0x923a…9250               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005d, t01=0x0102}
0x9250…9266               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005d, t01=0x0118}
0x9266…929a               Head {h00=0x0030, h01=0x0050, text=» LD A1,DWTBA2,A6 GET PHYSICAL BUFFER ADDRESS«, t00=0x005d, t01=0x012e}
0x929a…92b6               Head {h00=0x0018, h01=0x0050, text=» SLL A1,1 BYTE MODE «, t00=0x005d, t01=0x0162}
0x92b6…92d8               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x005d, t01=0x017e}
0x92d8…92ee               Head {h00=0x0012, h01=0x0050, text=» TL DWTPAG,A6 «, t00=0x005e, t01=0x0010}
0x92ee…931a               Head {h00=0x0028, h01=0x0050, text=» LD A1,DWTUBU,A6 GET LOGICAL ADDRESS«, t00=0x005e, t01=0x0026}
0x931a…932a               Head {h00=0x000c, h01=0x0050, text=» MVUS A4«, t00=0x005e, t01=0x0052}
0x932a…9336               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0062}
0x9336…9340               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x006e}
0x9340…9356               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x0078}
0x9356…936a               Head {h00=0x0010, h01=0x0050, text=»MOV:00 EQU *«, t00=0x005e, t01=0x008e}
0x936a…9386               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005e, t01=0x00a2}
0x9386…93ba               Head {h00=0x0030, h01=0x0050, text=» ADS A4,DWTUBU,A6 UPDATE USER BUFFER POINTER«, t00=0x005e, t01=0x00be}
0x93ba…93c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x00f2}
0x93c6…93d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x00fe}
0x93d0…93e6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x0108}
0x93e6…93fc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x005e, t01=0x011e}
0x93fc…9420               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x005e, t01=0x0134}
0x9420…942c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005e, t01=0x0158}
0x942c…9436               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005e, t01=0x0164}
0x9436…944c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005e, t01=0x016e}
0x944c…9468               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005e, t01=0x0184}
0x9468…947e               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x005f, t01=0x0010}
0x947e…9488               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0026}
0x9488…949e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x005f, t01=0x0030}
0x949e…94a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0046}
0x94a8…94b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x0050}
0x94b2…94c6               Head {h00=0x0010, h01=0x0050, text=»MOV:10 EQU *«, t00=0x005f, t01=0x005a}
0x94c6…94da               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A1 «, t00=0x005f, t01=0x006e}
0x94da…94ec               Head {h00=0x000e, h01=0x0050, text=» STR A3,A2«, t00=0x005f, t01=0x0082}
0x94ec…94fe               Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x005f, t01=0x0094}
0x94fe…9510               Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x005f, t01=0x00a6}
0x9510…9522               Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x005f, t01=0x00b8}
0x9522…9538               Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:10 «, t00=0x005f, t01=0x00ca}
0x9538…9544               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x005f, t01=0x00e0}
0x9544…954e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x005f, t01=0x00ec}
0x954e…9564               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x005f, t01=0x00f6}
0x9564…957a               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x005f, t01=0x010c}
0x957a…9596               Head {h00=0x0018, h01=0x0050, text=» IFT MMUPAG+CPU857=0«, t00=0x005f, t01=0x0122}
0x9596…95c2               Head {h00=0x0028, h01=0x0050, text=» MSR 12,A15 SAVE REGISTERS ON STACK «, t00=0x005f, t01=0x013e}
0x95c2…95e6               Head {h00=0x0020, h01=0x0050, text=» LDR A11,A4 NUMBER OF BYTES «, t00=0x005f, t01=0x016a}
0x95e6…9608               Head {h00=0x001e, h01=0x0050, text=» LDR A10,A2 OUTPUT ADDRESS«, t00=0x005f, t01=0x018e}
0x9608…9628               Head {h00=0x001c, h01=0x0050, text=» LDR A9,A1 INPUT ADDRESS«, t00=0x0060, t01=0x0020}
0x9628…9650               Head {h00=0x0024, h01=0x0050, text=» LDKL A12,16 BYTES IN EACH LOOP «, t00=0x0060, t01=0x0040}
0x9650…9664               Head {h00=0x0010, h01=0x0050, text=»MOV:15 EQU *«, t00=0x0060, t01=0x0068}
0x9664…9676               Head {h00=0x000e, h01=0x0050, text=» MLR 8,A9 «, t00=0x0060, t01=0x007c}
0x9676…9688               Head {h00=0x000e, h01=0x0050, text=» MSR 8,A10«, t00=0x0060, t01=0x008e}
0x9688…969c               Head {h00=0x0010, h01=0x0050, text=» ADR A10,A12«, t00=0x0060, t01=0x00a0}
0x969c…96b0               Head {h00=0x0010, h01=0x0050, text=» ADR A9,A12 «, t00=0x0060, t01=0x00b4}
0x96b0…96c4               Head {h00=0x0010, h01=0x0050, text=» SUR A11,A12«, t00=0x0060, t01=0x00c8}
0x96c4…96da               Head {h00=0x0012, h01=0x0050, text=» RB(P) MOV:15 «, t00=0x0060, t01=0x00dc}
0x96da…970a               Head {h00=0x002c, h01=0x0050, text=» MLR 12,A15 RESTORE REGISTERS FROM STACK«, t00=0x0060, t01=0x00f2}
0x970a…9716               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0122}
0x9716…9720               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x012e}
0x9720…9736               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0060, t01=0x0138}
0x9736…9746               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0060, t01=0x014e}
0x9746…9750               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x015e}
0x9750…975c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0060, t01=0x0168}
0x975c…9766               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0060, t01=0x0174}
0x9766…977c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0060, t01=0x017e}
0x977c…9792 (97, 0, 400)  Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0061, t01=0x0004}
0x9792…979c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x001a}
0x979c…97a6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0024}
0x97a6…97ca               Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x002e}
0x97ca…97ee               Head {h00=0x0020, h01=0x0050, text=»*                         * «, t00=0x0061, t01=0x0052}
0x97ee…9812               Head {h00=0x0020, h01=0x0050, text=»*   DIV31                 * «, t00=0x0061, t01=0x0076}
0x9812…9836               Head {h00=0x0020, h01=0x0050, text=»*                         * «, t00=0x0061, t01=0x009a}
0x9836…985a               Head {h00=0x0020, h01=0x0050, text=»*************************** «, t00=0x0061, t01=0x00be}
0x985a…9864               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x00e2}
0x9864…9894               Head {h00=0x002c, h01=0x0050, text=»*   INPUT: ECBCW2=LOGICAL SECTOR NUMBER «, t00=0x0061, t01=0x00ec}
0x9894…98c8               Head {h00=0x0030, h01=0x0050, text=»*   OUTPUT: 1ST DWT = PHYSICAL SECTOR NUMBER«, t00=0x0061, t01=0x011c}
0x98c8…98d2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x0150}
0x98d2…98e6               Head {h00=0x0010, h01=0x0050, text=»DIV31 EQU * «, t00=0x0061, t01=0x015a}
0x98e6…98f0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0061, t01=0x016e}
0x98f0…9906               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0061, t01=0x0178}
0x9906…9938               Head {h00=0x002e, h01=0x0050, text=» LD A1,ECBCW2,A8 GET LOGICAL SECTOR NUMBER«, t00=0x0061, t01=0x018e}
0x9938…994a               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0062, t01=0x0030}
0x994a…995c               Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0062, t01=0x0042}
0x995c…9970               Head {h00=0x0010, h01=0x0050, text=»DIV:20 EQU *«, t00=0x0062, t01=0x0054}
0x9970…998c               Head {h00=0x0018, h01=0x0050, text=» ADR A2,A3 I0:=I0+I1«, t00=0x0062, t01=0x0068}
0x998c…99a8               Head {h00=0x0018, h01=0x0050, text=» SRL A3,5 I1:=I1/32 «, t00=0x0062, t01=0x0084}
0x99a8…99be               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) DIV:20«, t00=0x0062, t01=0x00a0}
0x99be…99d0               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0062, t01=0x00b6}
0x99d0…99ea               Head {h00=0x0016, h01=0x0050, text=» ANKL A3,/FFE0 32*«, t00=0x0062, t01=0x00c8}
0x99ea…9a04               Head {h00=0x0016, h01=0x0050, text=» SRL A2,5 TRUNCATE«, t00=0x0062, t01=0x00e2}
0x9a04…9a16               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A2«, t00=0x0062, t01=0x00fc}
0x9a16…9a28               Head {h00=0x000e, h01=0x0050, text=» SUR A3,A1«, t00=0x0062, t01=0x010e}
0x9a28…9a3a               Head {h00=0x000e, h01=0x0050, text=» ADK A3,31«, t00=0x0062, t01=0x0120}
0x9a3a…9a50               Head {h00=0x0012, h01=0x0050, text=» RF(P) DIV:30 «, t00=0x0062, t01=0x0132}
0x9a50…9a70               Head {h00=0x001c, h01=0x0050, text=» ADK A2,1 NEXT CYLINDER «, t00=0x0062, t01=0x0148}
0x9a70…9a84               Head {h00=0x0010, h01=0x0050, text=»DIV:30 EQU *«, t00=0x0062, t01=0x0168}
0x9a84…9a96               Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0062, t01=0x017c}
0x9a96…9ab6               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:50 CYLINDER 0«, t00=0x0062, t01=0x018e}
0x9ab6…9ac8               Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0063, t01=0x001e}
0x9ac8…9ada               Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0063, t01=0x0030}
0x9ada…9ae4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0042}
0x9ae4…9afa               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0063, t01=0x004c}
0x9afa…9b04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x0062}
0x9b04…9b0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x006c}
0x9b0e…9b22               Head {h00=0x0010, h01=0x0050, text=»DIV:50 EQU *«, t00=0x0063, t01=0x0076}
0x9b22…9b56               Head {h00=0x0030, h01=0x0050, text=» STR A1,A6 PUT PHYSICAL SECTOR NUMBER IN DWT«, t00=0x0063, t01=0x008a}
0x9b56…9b66               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0063, t01=0x00be}
0x9b66…9b70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00ce}
0x9b70…9b7c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0063, t01=0x00d8}
0x9b7c…9b86               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0063, t01=0x00e4}
0x9b86…9b9c               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA2=1 «, t00=0x0063, t01=0x00ee}
0x9b9c…9bb2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0063, t01=0x0104}
0x9bb2…9bdc               Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBCW2,A8 GET SECTOR NUMBER«, t00=0x0063, t01=0x011a}
0x9bdc…9c06               Head {h00=0x0026, h01=0x0050, text=» STR A2,A6 PHYSICAL SECTOR NUMBER «, t00=0x0063, t01=0x0144}
0x9c06…9c18               Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0063, t01=0x016e}
0x9c18…9c28               Head {h00=0x000c, h01=0x0050, text=» DVK 31 «, t00=0x0063, t01=0x0180}
0x9c28…9c3a               Head {h00=0x000e, h01=0x0050, text=» ADK A2,0 «, t00=0x0063, t01=0x0190}
0x9c3a…9c5a               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DIV:10 CYLINDER 0«, t00=0x0064, t01=0x0012}
0x9c5a…9c6c               Head {h00=0x000e, h01=0x0050, text=» ADK A2,1 «, t00=0x0064, t01=0x0032}
0x9c6c…9c80               Head {h00=0x0010, h01=0x0050, text=»DIV:10 EQU *«, t00=0x0064, t01=0x0044}
0x9c80…9caa               Head {h00=0x0026, h01=0x0050, text=» ADRS A2,A6 PHYSICAL SECTOR NUMBER«, t00=0x0064, t01=0x0058}
0x9caa…9cba               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0064, t01=0x0082}
0x9cba…9cc6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0064, t01=0x0092}
0x9cc6…9cd0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x009e}
0x9cd0…9ce6               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0064, t01=0x00a8}
0x9ce6…9cf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0064, t01=0x00be}
0x9cf0…9d1a               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0064, t01=0x00c8}
0x9d1a…9d44               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0064, t01=0x00f2}
0x9d44…9d6e               Head {h00=0x0026, h01=0x0050, text=»*   SUBROUTINES FOR             * «, t00=0x0064, t01=0x011c}
0x9d6e…9d98               Head {h00=0x0026, h01=0x0050, text=»*   INTERLACING AND/OR          * «, t00=0x0064, t01=0x0146}
0x9d98…9dc2               Head {h00=0x0026, h01=0x0050, text=»*   SKEWING                     * «, t00=0x0064, t01=0x0170}
0x9dc2…9dec               Head {h00=0x0026, h01=0x0050, text=»*                               * «, t00=0x0065, t01=0x000a}
0x9dec…9e16               Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0065, t01=0x0034}
0x9e16…9e20               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x005e}
0x9e20…9e66               Head {h00=0x0042, h01=0x0050, text=»*  OUTPUT : A3 CONTAINING INTERLACED AND SKEWED SECTOR NUMBER «, t00=0x0065, t01=0x0068}
0x9e66…9e70               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0065, t01=0x00ae}
0x9e70…9e84               Head {h00=0x0010, h01=0x0050, text=»INLACE EQU *«, t00=0x0065, t01=0x00b8}
0x9e84…9eb2               Head {h00=0x002a, h01=0x0050, text=» LDR* A3,A6 GET PHYSICAL SECTOR NUMBER«, t00=0x0065, t01=0x00cc}
0x9eb2…9ec4               Head {h00=0x000e, h01=0x0050, text=» LDR A1,A3«, t00=0x0065, t01=0x00fa}
0x9ec4…9ed6               Head {h00=0x000e, h01=0x0050, text=» ADR A3,A3«, t00=0x0065, t01=0x010c}
0x9ed6…9efe               Head {h00=0x0024, h01=0x0050, text=» ADR A3,A1 INTERLACING FACTOR 3 «, t00=0x0065, t01=0x011e}
0x9efe…9f10               Head {h00=0x000e, h01=0x0050, text=»SKEW EQU *«, t00=0x0065, t01=0x0146}
0x9f10…9f26               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0065, t01=0x0158}
0x9f26…9f52               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A2 GET CYLINDER NUMBER«, t00=0x0065, t01=0x016e}
0x9f52…9f5e               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x000a}
0x9f5e…9f74               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0066, t01=0x0016}
0x9f74…9fa0               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTCYL,A6 GET CYLINDER NUMBER«, t00=0x0066, t01=0x002c}
0x9fa0…9fac               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0066, t01=0x0058}
0x9fac…9fbe               Head {h00=0x000e, h01=0x0050, text=» ANK A2,1 «, t00=0x0066, t01=0x0064}
0x9fbe…9fe2               Head {h00=0x0020, h01=0x0050, text=» RF(Z) INLAC5 EVEN CYLINDER «, t00=0x0066, t01=0x0076}
0x9fe2…a008               Head {h00=0x0022, h01=0x0050, text=» ADK A3,8 SKEW FACTOR 180 DEG.«, t00=0x0066, t01=0x009a}
0xa008…a01c               Head {h00=0x0010, h01=0x0050, text=»INLAC5 EQU *«, t00=0x0066, t01=0x00c0}
0xa01c…a030               Head {h00=0x0010, h01=0x0050, text=» ANK A3,/1F «, t00=0x0066, t01=0x00d4}
0xa030…a04e               Head {h00=0x001a, h01=0x0050, text=» SLL A3,2 IN POSITION «, t00=0x0066, t01=0x00e8}
0xa04e…a05e               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0066, t01=0x0106}
0xa05e…a068               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0116}
0xa068…a07e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0066, t01=0x0120}
0xa07e…a094               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0066, t01=0x0136}
0xa094…a09e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x014c}
0xa09e…a0a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0066, t01=0x0156}
0xa0a8…a0ba               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0066, t01=0x0160}
0xa0ba…a0cc               Head {h00=0x000e, h01=0x0050, text=»* INXUNI *«, t00=0x0066, t01=0x0172}
0xa0cc…a0de               Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0066, t01=0x0184}
0xa0de…a0e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0008}
0xa0e8…a120               Head {h00=0x0034, h01=0x0050, text=»*   OUTPUT  A2=DOUBLED UNIT INDEX + DWT ADDRESS «, t00=0x0067, t01=0x0012}
0xa120…a12a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x004a}
0xa12a…a13e               Head {h00=0x0010, h01=0x0050, text=»INXUNI EQU *«, t00=0x0067, t01=0x0054}
0xa13e…a156               Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTOR,A6 «, t00=0x0067, t01=0x0068}
0xa156…a168               Head {h00=0x000e, h01=0x0050, text=» ANK A2,2 «, t00=0x0067, t01=0x0080}
0xa168…a17a               Head {h00=0x000e, h01=0x0050, text=» ADR A2,A6«, t00=0x0067, t01=0x0092}
0xa17a…a18a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0067, t01=0x00a4}
0xa18a…a196               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0067, t01=0x00b4}
0xa196…a1a0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00c0}
0xa1a0…a1b6               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0067, t01=0x00ca}
0xa1b6…a1cc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0067, t01=0x00e0}
0xa1cc…a1d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x00f6}
0xa1d6…a1e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0067, t01=0x0100}
0xa1e0…a212               Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0067, t01=0x010a}
0xa212…a244               Head {h00=0x002e, h01=0x0050, text=»*                                        *«, t00=0x0067, t01=0x013c}
0xa244…a276               Head {h00=0x002e, h01=0x0050, text=»*   MMULOG : GET LOGICAL ADDRESS AND     *«, t00=0x0067, t01=0x016e}
0xa276…a2a8               Head {h00=0x002e, h01=0x0050, text=»*            PAGE                        *«, t00=0x0068, t01=0x0010}
0xa2a8…a2da               Head {h00=0x002e, h01=0x0050, text=»*                                        *«, t00=0x0068, t01=0x0042}
0xa2da…a30c               Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0068, t01=0x0074}
0xa30c…a316               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00a6}
0xa316…a320               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0068, t01=0x00b0}
0xa320…a334               Head {h00=0x0010, h01=0x0050, text=»MMULOG EQU *«, t00=0x0068, t01=0x00ba}
0xa334…a366               Head {h00=0x002e, h01=0x0050, text=» MS 2,DWTBA1,A6 SAVE PHYSICAL WORD ADDRESS«, t00=0x0068, t01=0x00ce}
0xa366…a374               Head {h00=0x000a, h01=0x0050, text=» DLA 4«, t00=0x0068, t01=0x0100}
0xa374…a392               Head {h00=0x001a, h01=0x0050, text=» SRC A1,6 IN POSITION «, t00=0x0068, t01=0x010e}
0xa392…a3b0               Head {h00=0x001a, h01=0x0050, text=» ST A1,DWTPAG,A6 PAGE «, t00=0x0068, t01=0x012c}
0xa3b0…a3d0               Head {h00=0x001c, h01=0x0050, text=» ADKL A1,/400 NEXT PAGE «, t00=0x0068, t01=0x014a}
0xa3d0…a3fc               Head {h00=0x0028, h01=0x0050, text=» ST A1,DWTPAG+2,A6 PSEUDO MMU TABLE «, t00=0x0068, t01=0x016a}
0xa3fc…a40e               Head {h00=0x000e, h01=0x0050, text=» SRL A2,3 «, t00=0x0069, t01=0x0008}
0xa40e…a436               Head {h00=0x0024, h01=0x0050, text=» ST A2,DWTUBU,A6 LOGICAL ADDRESS«, t00=0x0069, t01=0x001a}
0xa436…a446               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0069, t01=0x0042}
0xa446…a450               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0052}
0xa450…a45c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0069, t01=0x005c}
0xa45c…a466               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0068}
0xa466…a47e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0069, t01=0x0072}
0xa47e…a488               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x008a}
0xa488…a49e               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0069, t01=0x0094}
0xa49e…a4a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00aa}
0xa4a8…a4b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00b4}
0xa4b2…a4d8               Head {h00=0x0022, h01=0x0050, text=»******************************«, t00=0x0069, t01=0x00be}
0xa4d8…a4e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x00e4}
0xa4e2…a50c               Head {h00=0x0026, h01=0x0050, text=»*  UPDATE DRIVER BUFFER INDICATOR «, t00=0x0069, t01=0x00ee}
0xa50c…a516               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x0118}
0xa516…a53e               Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x0069, t01=0x0122}
0xa53e…a548               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0069, t01=0x014a}
0xa548…a576               Head {h00=0x002a, h01=0x0050, text=»*   INPUT  A1=RETURN CODE (AFTER READ)«, t00=0x0069, t01=0x0154}
0xa576…a5a8               Head {h00=0x002e, h01=0x0050, text=»*   OUTPUT DWTBSE=DRIVER BUFFER INDICATOR «, t00=0x0069, t01=0x0182}
0xa5a8…a5b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006a, t01=0x0024}
0xa5b2…a5c6               Head {h00=0x0010, h01=0x0050, text=»BSELOD EQU *«, t00=0x006a, t01=0x002e}
0xa5c6…a5f0               Head {h00=0x0026, h01=0x0050, text=» LDR* A3,A6 GET READ SECTOR NUMBER«, t00=0x006a, t01=0x0042}
0xa5f0…a616               Head {h00=0x0022, h01=0x0050, text=»BSEL00 EQU * FROM SEEK VERIFY «, t00=0x006a, t01=0x006c}
0xa616…a62e               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x006a, t01=0x0092}
0xa62e…a65e               Head {h00=0x002c, h01=0x0050, text=» RF(Z) BSEL50 READ/WRITE TO USER BUFFER «, t00=0x006a, t01=0x00aa}
0xa65e…a67a               Head {h00=0x0018, h01=0x0050, text=» LDKL A2,/FFFF DUMMY«, t00=0x006a, t01=0x00da}
0xa67a…a68c               Head {h00=0x000e, h01=0x0050, text=» ADK A1,0 «, t00=0x006a, t01=0x00f6}
0xa68c…a6ae               Head {h00=0x001e, h01=0x0050, text=» RF(NZ) BSEL40 READ ERROR «, t00=0x006a, t01=0x0108}
0xa6ae…a6d0               Head {h00=0x001e, h01=0x0050, text=» LD A2,DWTOR,A6 GET INDEX «, t00=0x006a, t01=0x012a}
0xa6d0…a6e6               Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/300 «, t00=0x006a, t01=0x014c}
0xa6e6…a6f8               Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x006a, t01=0x0162}
0xa6f8…a70a               Head {h00=0x000e, h01=0x0050, text=» ORR A2,A3«, t00=0x006a, t01=0x0174}
0xa70a…a71e               Head {h00=0x0010, h01=0x0050, text=»BSEL40 EQU *«, t00=0x006a, t01=0x0186}
0xa71e…a756               Head {h00=0x0034, h01=0x0050, text=» ST A2,DWTBSE,A6 UPDATE DRIVER BUFFER INDICATOR «, t00=0x006b, t01=0x000a}
0xa756…a76a               Head {h00=0x0010, h01=0x0050, text=»BSEL50 EQU *«, t00=0x006b, t01=0x0042}
0xa76a…a77a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006b, t01=0x0056}
0xa77a…a784               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0066}
0xa784…a79a               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x006b, t01=0x0070}
0xa79a…a7a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0086}
0xa7a4…a7ae               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006b, t01=0x0090}
0xa7ae…a7de               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006b, t01=0x009a}
0xa7de…a80e               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x006b, t01=0x00ca}
0xa80e…a83e               Head {h00=0x002c, h01=0x0050, text=»*   RESTORE WORD TO USER BUFFER       * «, t00=0x006b, t01=0x00fa}
0xa83e…a86e               Head {h00=0x002c, h01=0x0050, text=»*   IF NECESSARY                      * «, t00=0x006b, t01=0x012a}
0xa86e…a89e               Head {h00=0x002c, h01=0x0050, text=»*                                     * «, t00=0x006b, t01=0x015a}
0xa89e…a8ce               Head {h00=0x002c, h01=0x0050, text=»*************************************** «, t00=0x006b, t01=0x018a}
0xa8ce…a8d8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x002a}
0xa8d8…a906               Head {h00=0x002a, h01=0x0050, text=»*   INPUT: DWTFSW=SAVED WORD INDICATOR«, t00=0x006c, t01=0x0034}
0xa906…a92a               Head {h00=0x0020, h01=0x0050, text=»*          DWTSWD=SAVED WORD«, t00=0x006c, t01=0x0062}
0xa92a…a95a               Head {h00=0x002c, h01=0x0050, text=»*          DWTUBU=POINTER TO USER BUFFER«, t00=0x006c, t01=0x0086}
0xa95a…a964               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006c, t01=0x00b6}
0xa964…a978               Head {h00=0x0010, h01=0x0050, text=»REWORD EQU *«, t00=0x006c, t01=0x00c0}
0xa978…a990               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTFSW,A6«, t00=0x006c, t01=0x00d4}
0xa990…a9b4               Head {h00=0x0020, h01=0x0050, text=» RF(Z) REWO50 NO SAVED WORD «, t00=0x006c, t01=0x00ec}
0xa9b4…a9cc               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTSWD,A6«, t00=0x006c, t01=0x0110}
0xa9cc…a9e2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x006c, t01=0x0128}
0xa9e2…aa04               Head {h00=0x001e, h01=0x0050, text=» TS -30,A15 SAVE REGISTERS«, t00=0x006c, t01=0x013e}
0xaa04…aa2c               Head {h00=0x0024, h01=0x0050, text=» TL DWTPAG,A6 SET MMU REGISTERS «, t00=0x006c, t01=0x0160}
0xaa2c…aa60               Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTUBU,A6 GET LOGICAL BUFFER ADDRESS «, t00=0x006c, t01=0x0188}
0xaa60…aa8c               Head {h00=0x0028, h01=0x0050, text=» ES A3,PHSECL,A2 RESTORE SAVED WORD «, t00=0x006d, t01=0x002c}
0xaa8c…aab0               Head {h00=0x0020, h01=0x0050, text=» TL -30,A15 RESET REGISTERS «, t00=0x006d, t01=0x0058}
0xaab0…aabc               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x007c}
0xaabc…aac6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0088}
0xaac6…aadc               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006d, t01=0x0092}
0xaadc…aaf2               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x006d, t01=0x00a8}
0xaaf2…ab1e               Head {h00=0x0028, h01=0x0050, text=» ST* A3,DWTUBU,A6 RESTORE SAVED WORD«, t00=0x006d, t01=0x00be}
0xab1e…ab2a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x00ea}
0xab2a…ab34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x00f6}
0xab34…ab4a               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x006d, t01=0x0100}
0xab4a…ab76               Head {h00=0x0028, h01=0x0050, text=» CM DWTFSW,A6 INDICATE NO SAVED WORD«, t00=0x006d, t01=0x0116}
0xab76…ab8a               Head {h00=0x0010, h01=0x0050, text=»REWO50 EQU *«, t00=0x006d, t01=0x0142}
0xab8a…ab9a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x006d, t01=0x0156}
0xab9a…aba4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x0166}
0xaba4…abb0               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006d, t01=0x0170}
0xabb0…abba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006d, t01=0x017c}
0xabba…abda               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x006d, t01=0x0186}
0xabda…abe4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0016}
0xabe4…abee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x0020}
0xabee…ac0a               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006e, t01=0x002a}
0xac0a…ac26               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x006e, t01=0x0046}
0xac26…ac42               Head {h00=0x0018, h01=0x0050, text=»*  SEEK CYLINDER  * «, t00=0x006e, t01=0x0062}
0xac42…ac5e               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x006e, t01=0x007e}
0xac5e…ac7a               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x006e, t01=0x009a}
0xac7a…ac84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00b6}
0xac84…ac8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006e, t01=0x00c0}
0xac8e…aca0               Head {h00=0x000e, h01=0x0050, text=»SEEK EQU *«, t00=0x006e, t01=0x00ca}
0xaca0…acb6               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x006e, t01=0x00dc}
0xacb6…acde               Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTCYL,A2 CYLINDER NUMBER«, t00=0x006e, t01=0x00f2}
0xacde…acea               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x011a}
0xacea…ad00               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x006e, t01=0x0126}
0xad00…ad18               Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTCYL,A6«, t00=0x006e, t01=0x013c}
0xad18…ad24               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x006e, t01=0x0154}
0xad24…ad36               Head {h00=0x000e, h01=0x0050, text=» SLL A3,3 «, t00=0x006e, t01=0x0160}
0xad36…ad48               Head {h00=0x000e, h01=0x0050, text=» ORK A3,2 «, t00=0x006e, t01=0x0172}
0xad48…ad6a               Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006e, t01=0x0184}
0xad6a…ad74               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0016}
0xad74…ad88               Head {h00=0x0010, h01=0x0050, text=»SEEKZ EQU * «, t00=0x006f, t01=0x0020}
0xad88…ad9a               Head {h00=0x000e, h01=0x0050, text=» LDK A3,3 «, t00=0x006f, t01=0x0034}
0xad9a…adbc               Head {h00=0x001e, h01=0x0050, text=» RF CIO EXECUTE CIO-START «, t00=0x006f, t01=0x0046}
0xadbc…adc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0068}
0xadc6…addc               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x006f, t01=0x0072}
0xaddc…ade6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0088}
0xade6…adf0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x0092}
0xadf0…ae1a               Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x006f, t01=0x009c}
0xae1a…ae44               Head {h00=0x0026, h01=0x0050, text=»*                                *«, t00=0x006f, t01=0x00c6}
0xae44…ae6e               Head {h00=0x0026, h01=0x0050, text=»*   CIO: READ AND WRITE          *«, t00=0x006f, t01=0x00f0}
0xae6e…ae98               Head {h00=0x0026, h01=0x0050, text=»*                                *«, t00=0x006f, t01=0x011a}
0xae98…aec2               Head {h00=0x0026, h01=0x0050, text=»**********************************«, t00=0x006f, t01=0x0144}
0xaec2…aecc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x006f, t01=0x016e}
0xaecc…af00               Head {h00=0x0030, h01=0x0050, text=»*  INPUT: A3=PHYSICAL SECTOR NUMBER SHIFTED «, t00=0x006f, t01=0x0178}
0xaf00…af0a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0070, t01=0x001c}
0xaf0a…af20               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0070, t01=0x0026}
0xaf20…af36               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0070, t01=0x003c}
0xaf36…af48               Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0070, t01=0x0052}
0xaf48…af66               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/80C1 1ST WER«, t00=0x0070, t01=0x0064}
0xaf66…af78               Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0070, t01=0x0082}
0xaf78…af8c               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0070, t01=0x0094}
0xaf8c…afaa               Head {h00=0x001a, h01=0x0050, text=» LDKL A1,/C0C1 1ST WER«, t00=0x0070, t01=0x00a8}
0xafaa…afc6               Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0070, t01=0x00c6}
0xafc6…afda               Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0070, t01=0x00e2}
0xafda…aff2               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0070, t01=0x00f6}
0xaff2…b022               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0070, t01=0x010e}
0xb022…b04e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTUBU,A6 USER BUFFER POINTER«, t00=0x0070, t01=0x013e}
0xb04e…b066               Head {h00=0x0014, h01=0x0050, text=» SUKL A2,PHSECL «, t00=0x0070, t01=0x016a}
0xb066…b078               Head {h00=0x000e, h01=0x0050, text=» RF CIO:50«, t00=0x0070, t01=0x0182}
0xb078…b08c (113, 0, 400) Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0071, t01=0x0004}
0xb08c…b0ba               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0071, t01=0x0018}
0xb0ba…b0c6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0071, t01=0x0046}
0xb0c6…b0d0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0071, t01=0x0052}
0xb0d0…b0e6               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0071, t01=0x005c}
0xb0e6…b0fc               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0071, t01=0x0072}
0xb0fc…b10e               Head {h00=0x000e, h01=0x0050, text=»READ EQU *«, t00=0x0071, t01=0x0088}
0xb10e…b134               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C18 1ST WER SHIFTED«, t00=0x0071, t01=0x009a}
0xb134…b146               Head {h00=0x000e, h01=0x0050, text=» RF CIO:20«, t00=0x0071, t01=0x00c0}
0xb146…b15a               Head {h00=0x0010, h01=0x0050, text=»WRITE EQU * «, t00=0x0071, t01=0x00d2}
0xb15a…b180               Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/0C1C 1ST WER SHIFTED«, t00=0x0071, t01=0x00e6}
0xb180…b19c               Head {h00=0x0018, h01=0x0050, text=» ADK A3,1 ORDER CODE«, t00=0x0071, t01=0x010c}
0xb19c…b1b0               Head {h00=0x0010, h01=0x0050, text=»CIO:20 EQU *«, t00=0x0071, t01=0x0128}
0xb1b0…b1c8               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTFBU,A6«, t00=0x0071, t01=0x013c}
0xb1c8…b1f8               Head {h00=0x002c, h01=0x0050, text=» RF(NZ) CIO:30 IO FROM/TO DRIVER BUFFER «, t00=0x0071, t01=0x0154}
0xb1f8…b226               Head {h00=0x002a, h01=0x0050, text=» DA DWTBA1,A6 GET USER BUFFER ADDRESS «, t00=0x0071, t01=0x0184}
0xb226…b24a               Head {h00=0x0020, h01=0x0050, text=» SLL A2,1 BYTE MODE ADDRESS «, t00=0x0072, t01=0x0022}
0xb24a…b25c               Head {h00=0x000e, h01=0x0050, text=» RF CIO:40«, t00=0x0072, t01=0x0046}
0xb25c…b270               Head {h00=0x0010, h01=0x0050, text=»CIO:30 EQU *«, t00=0x0072, t01=0x0058}
0xb270…b29e               Head {h00=0x002a, h01=0x0050, text=» LDKL A2,BUFFER DRIVER BUFFER ADDRESS «, t00=0x0072, t01=0x006c}
0xb29e…b2b2               Head {h00=0x0010, h01=0x0050, text=»CIO:40 EQU *«, t00=0x0072, t01=0x009a}
0xb2b2…b2d8               Head {h00=0x0022, h01=0x0050, text=» SRC A1,4 1ST WER IN POSITION «, t00=0x0072, t01=0x00ae}
0xb2d8…b2e4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0072, t01=0x00d4}
0xb2e4…b2ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x00e0}
0xb2ee…b302               Head {h00=0x0010, h01=0x0050, text=»CIO:50 EQU *«, t00=0x0072, t01=0x00ea}
0xb302…b316               Head {h00=0x0010, h01=0x0050, text=» WER A1,WER1«, t00=0x0072, t01=0x00fe}
0xb316…b32c               Head {h00=0x0012, h01=0x0050, text=» WER A2,WER1+1«, t00=0x0072, t01=0x0112}
0xb32c…b336               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0128}
0xb336…b356               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0072, t01=0x0132}
0xb356…b360               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x0152}
0xb360…b36a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0072, t01=0x015c}
0xb36a…b37c               Head {h00=0x000e, h01=0x0050, text=»CIO EQU * «, t00=0x0072, t01=0x0166}
0xb37c…b39c               Head {h00=0x001c, h01=0x0050, text=» ST A4,DWTA4,A6 SAVE A4 «, t00=0x0072, t01=0x0178}
0xb39c…b3b2               Head {h00=0x0012, h01=0x0050, text=» LD A2,PFPOST «, t00=0x0073, t01=0x0008}
0xb3b2…b3de               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) CIOAB PWF POST PROCESSING ON«, t00=0x0073, t01=0x001e}
0xb3de…b40c               Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0073, t01=0x004a}
0xb40c…b434               Head {h00=0x0024, h01=0x0050, text=» EX DWTCIO,A4 EXECUTE CIO-START «, t00=0x0073, t01=0x0078}
0xb434…b45e               Head {h00=0x0026, h01=0x0050, text=» ABL(3) END:30 CU ADDRESS UNKNOWN «, t00=0x0073, t01=0x00a0}
0xb45e…b472               Head {h00=0x0010, h01=0x0050, text=»CIOAB EQU * «, t00=0x0073, t01=0x00ca}
0xb472…b498               Head {h00=0x0022, h01=0x0050, text=» ST A5,DWTA5,A6            A5 «, t00=0x0073, t01=0x00de}
0xb498…b4c4               Head {h00=0x0028, h01=0x0050, text=» ST A7,DWTA2,A6 SAVE SECTOR COUNTER «, t00=0x0073, t01=0x0104}
0xb4c4…b4ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0130}
0xb4ce…b4f8               Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x0073, t01=0x013a}
0xb4f8…b502               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x0164}
0xb502…b522               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0073, t01=0x016e}
0xb522…b52c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0073, t01=0x018e}
0xb52c…b536               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0008}
0xb536…b554               Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0074, t01=0x0012}
0xb554…b572               Head {h00=0x001a, h01=0x0050, text=»*                    *«, t00=0x0074, t01=0x0030}
0xb572…b590               Head {h00=0x001a, h01=0x0050, text=»*  RECOVERY ROUTINE  *«, t00=0x0074, t01=0x004e}
0xb590…b5ae               Head {h00=0x001a, h01=0x0050, text=»*                    *«, t00=0x0074, t01=0x006c}
0xb5ae…b5cc               Head {h00=0x001a, h01=0x0050, text=»**********************«, t00=0x0074, t01=0x008a}
0xb5cc…b5d6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00a8}
0xb5d6…b5e0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00b2}
0xb5e0…b5f2               Head {h00=0x000e, h01=0x0050, text=»DUON EQU *«, t00=0x0074, t01=0x00bc}
0xb5f2…b5fc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x00ce}
0xb5fc…b612               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0074, t01=0x00d8}
0xb612…b63c               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0074, t01=0x00ee}
0xb63c…b648               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x0118}
0xb648…b652               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0124}
0xb652…b668               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0074, t01=0x012e}
0xb668…b68e               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x0074, t01=0x0144}
0xb68e…b69a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0074, t01=0x016a}
0xb69a…b6a4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0074, t01=0x0176}
0xb6a4…b6bc               Head {h00=0x0014, h01=0x0050, text=» LDKL A6,DWDU01 «, t00=0x0074, t01=0x0180}
0xb6bc…b6e2               Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x0075, t01=0x0008}
0xb6e2…b6f4               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0075, t01=0x002e}
0xb6f4…b728               Head {h00=0x0030, h01=0x0050, text=» LDKL A1,/7FFE UNIT BUSY AND RECOVERY ON =1 «, t00=0x0075, t01=0x0040}
0xb728…b744               Head {h00=0x0018, h01=0x0050, text=» ANS A1,DWTST,A6  =1«, t00=0x0075, t01=0x0074}
0xb744…b76c               Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x0075, t01=0x0090}
0xb76c…b796               Head {h00=0x0026, h01=0x0050, text=» LD A1,INIFLG INITIALIZATION FLAG «, t00=0x0075, t01=0x00b8}
0xb796…b7ba               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON05 NOT POWER UP «, t00=0x0075, t01=0x00e2}
0xb7ba…b7c4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0106}
0xb7c4…b7da               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0075, t01=0x0110}
0xb7da…b7e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0126}
0xb7e4…b7ee               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0075, t01=0x0130}
0xb7ee…b80c               Head {h00=0x001a, h01=0x0050, text=» CM DWTOR,A6 1ST UNIT «, t00=0x0075, t01=0x013a}
0xb80c…b832               Head {h00=0x0022, h01=0x0050, text=» CF A5,SEEKZ TEST IF OPERABLE «, t00=0x0075, t01=0x0158}
0xb832…b844               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0075, t01=0x017e}
0xb844…b868               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0075, t01=0x0190}
0xb868…b87e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0076, t01=0x0024}
0xb87e…b890               Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0076, t01=0x003a}
0xb890…b8b2               Head {h00=0x001e, h01=0x0050, text=» SC A1,DWTOR,A6 NEXT UNIT «, t00=0x0076, t01=0x004c}
0xb8b2…b8c6               Head {h00=0x0010, h01=0x0050, text=» CF A5,SEEKZ«, t00=0x0076, t01=0x006e}
0xb8c6…b8d8               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x0082}
0xb8d8…b8fc               Head {h00=0x0020, h01=0x0050, text=» RF(NZ) DUON26 NOT OPERABLE «, t00=0x0076, t01=0x0094}
0xb8fc…b908               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0076, t01=0x00b8}
0xb908…b912               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00c4}
0xb912…b92a               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0076, t01=0x00ce}
0xb92a…b934               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00e6}
0xb934…b93e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0076, t01=0x00f0}
0xb93e…b952               Head {h00=0x0010, h01=0x0050, text=»DUON05 EQU *«, t00=0x0076, t01=0x00fa}
0xb952…b966               Head {h00=0x0010, h01=0x0050, text=» CM DWTOR,A6«, t00=0x0076, t01=0x010e}
0xb966…b98c               Head {h00=0x0022, h01=0x0050, text=» CF A5,VO:NAM READ VOLUME NAME«, t00=0x0076, t01=0x0122}
0xb98c…b99e               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0076, t01=0x0148}
0xb99e…b9bc               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON07 NO ERROR«, t00=0x0076, t01=0x015a}
0xb9bc…b9e4               Head {h00=0x0024, h01=0x0050, text=» CM DWTOR,A6 PREPARE FOR VOLCLR «, t00=0x0076, t01=0x0178}
0xb9e4…b9f6               Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0077, t01=0x0010}
0xb9f6…ba0c               Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0077, t01=0x0022}
0xba0c…ba20               Head {h00=0x0010, h01=0x0050, text=»DUON07 EQU *«, t00=0x0077, t01=0x0038}
0xba20…ba36               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0077, t01=0x004c}
0xba36…ba58               Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0077, t01=0x0062}
0xba58…ba70               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0077, t01=0x0084}
0xba70…ba86               Head {h00=0x0012, h01=0x0050, text=» CF A5,VO:NAM «, t00=0x0077, t01=0x009c}
0xba86…ba98               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0077, t01=0x00b2}
0xba98…bab6               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUON08 NO ERROR«, t00=0x0077, t01=0x00c4}
0xbab6…bad8               Head {h00=0x001e, h01=0x0050, text=» LDK A1,2 OTHER DISC UNIT «, t00=0x0077, t01=0x00e2}
0xbad8…baf0               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0077, t01=0x0104}
0xbaf0…bb02               Head {h00=0x000e, h01=0x0050, text=» LDK A1,12«, t00=0x0077, t01=0x011c}
0xbb02…bb18               Head {h00=0x0012, h01=0x0050, text=» CF A15,VOLCLR«, t00=0x0077, t01=0x012e}
0xbb18…bb2c               Head {h00=0x0010, h01=0x0050, text=»DUON08 EQU *«, t00=0x0077, t01=0x0144}
0xbb2c…bb38               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0077, t01=0x0158}
0xbb38…bb68               Head {h00=0x002c, h01=0x0050, text=» IM DWTST,A6 INDICATE VOLUME NAMES READ «, t00=0x0077, t01=0x0164}
0xbb68…bb7c (120, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDKL A1,-1 «, t00=0x0078, t01=0x0004}
0xbb7c…bba2               Head {h00=0x0022, h01=0x0050, text=» ST A1,DWTSAV,A6 RECOVERY DONE«, t00=0x0078, t01=0x0018}
0xbba2…bbac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x003e}
0xbbac…bbc2               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0078, t01=0x0048}
0xbbc2…bbcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x005e}
0xbbcc…bbd6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0068}
0xbbd6…bbfe               Head {h00=0x0024, h01=0x0050, text=» LD A8,DWTECB,A6 GET ECB ADDRESS«, t00=0x0078, t01=0x0072}
0xbbfe…bc22               Head {h00=0x0020, h01=0x0050, text=» RF(Z) END:IO NO REQUEST ON?«, t00=0x0078, t01=0x009a}
0xbc22…bc2c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x00be}
0xbc2c…bc54               Head {h00=0x0024, h01=0x0050, text=»DUON10 LD A7,DWTORD,A6 GET ORDER«, t00=0x0078, t01=0x00c8}
0xbc54…bc84               Head {h00=0x002c, h01=0x0050, text=» ST A7,DWTOR,A6 RESTORE INDEX AND ORDER «, t00=0x0078, t01=0x00f0}
0xbc84…bc98               Head {h00=0x0010, h01=0x0050, text=» ANK A7,/3F «, t00=0x0078, t01=0x0120}
0xbc98…bca2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0134}
0xbca2…bcb8               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0078, t01=0x013e}
0xbcb8…bce8               Head {h00=0x002c, h01=0x0050, text=» CF A5,REWORD RESTORE WORD IF NECESSARY «, t00=0x0078, t01=0x0154}
0xbce8…bcf4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0078, t01=0x0184}
0xbcf4…bcfe               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0078, t01=0x0190}
0xbcfe…bd2a               Head {h00=0x0028, h01=0x0050, text=» CM ECBEL,A8 RESET EFFECTIVE LENGTH «, t00=0x0079, t01=0x000a}
0xbd2a…bd4c               Head {h00=0x001e, h01=0x0050, text=» ABL DUA:00 REPEAT REQUEST«, t00=0x0079, t01=0x0036}
0xbd4c…bd56               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0058}
0xbd56…bd6e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0079, t01=0x0062}
0xbd6e…bd78               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x007a}
0xbd78…bd94               Head {h00=0x0018, h01=0x0050, text=»*    READY INTERRUPT«, t00=0x0079, t01=0x0084}
0xbd94…bd9e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00a0}
0xbd9e…bdb8               Head {h00=0x0016, h01=0x0050, text=»DUREDY LD A1,TIMER«, t00=0x0079, t01=0x00aa}
0xbdb8…bdde               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON50 NO TIMER ACTIVE «, t00=0x0079, t01=0x00c4}
0xbdde…bde8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x00ea}
0xbde8…bdfe               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0079, t01=0x00f4}
0xbdfe…be1c               Head {h00=0x001a, h01=0x0050, text=» CM* TIMER KILL TIMER «, t00=0x0079, t01=0x010a}
0xbe1c…be2e               Head {h00=0x000e, h01=0x0050, text=» RF DUON40«, t00=0x0079, t01=0x0128}
0xbe2e…be3a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x013a}
0xbe3a…be44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0079, t01=0x0146}
0xbe44…be5a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0079, t01=0x0150}
0xbe5a…be7a               Head {h00=0x001c, h01=0x0050, text=» RB T:DISP TIMER ACTIVE «, t00=0x0079, t01=0x0166}
0xbe7a…be86               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0079, t01=0x0186}
0xbe86…be90 (122, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0004}
0xbe90…bea8               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x007a, t01=0x000e}
0xbea8…beb2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0026}
0xbeb2…bebc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0030}
0xbebc…bed0               Head {h00=0x0010, h01=0x0050, text=»DUON26 EQU *«, t00=0x007a, t01=0x003a}
0xbed0…befc               Head {h00=0x0028, h01=0x0050, text=» LDKL A4,TIMER TIMER POINTER ADDRESS«, t00=0x007a, t01=0x004e}
0xbefc…bf10               Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A4 «, t00=0x007a, t01=0x007a}
0xbf10…bf36               Head {h00=0x0022, h01=0x0050, text=» RF(Z) DUON30 NO TIMER ACTIVE «, t00=0x007a, t01=0x008e}
0xbf36…bf4c               Head {h00=0x0012, h01=0x0050, text=» LDKL A1,-TIME«, t00=0x007a, t01=0x00b4}
0xbf4c…bf6c               Head {h00=0x001c, h01=0x0050, text=» STR A1,A3 RESTART TIMER«, t00=0x007a, t01=0x00ca}
0xbf6c…bf7e               Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007a, t01=0x00ea}
0xbf7e…bf88               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x00fc}
0xbf88…bf92               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x0106}
0xbf92…bfba               Head {h00=0x0024, h01=0x0050, text=»DUON30 CF A15,SETIMP START TIMER«, t00=0x007a, t01=0x0110}
0xbfba…bfea               Head {h00=0x002c, h01=0x0050, text=» DATA DUON40,TIME TIME OUT ADDRESS, TIME«, t00=0x007a, t01=0x0138}
0xbfea…bffc               Head {h00=0x000e, h01=0x0050, text=» RB T:DISP«, t00=0x007a, t01=0x0168}
0xbffc…c006               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007a, t01=0x017a}
0xc006…c01a               Head {h00=0x0010, h01=0x0050, text=»*   TIME OUT«, t00=0x007a, t01=0x0184}
0xc01a…c024               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0008}
0xc024…c042               Head {h00=0x001a, h01=0x0050, text=»DUON40 LDKL A6,DWDU01 «, t00=0x007b, t01=0x0012}
0xc042…c054               Head {h00=0x000e, h01=0x0050, text=» CM TIMER «, t00=0x007b, t01=0x0030}
0xc054…c068               Head {h00=0x0010, h01=0x0050, text=»DUON50 EQU *«, t00=0x007b, t01=0x0042}
0xc068…c0a0               Head {h00=0x0034, h01=0x0050, text=» LDKL A5,/7FFE SET UNIT BUSY AND RECOVERY ON =1 «, t00=0x007b, t01=0x0056}
0xc0a0…c0bc               Head {h00=0x0018, h01=0x0050, text=» ANS A5,DWTST,A6  =1«, t00=0x007b, t01=0x008e}
0xc0bc…c0e4               Head {h00=0x0024, h01=0x0050, text=» CM DWTSAV,A6 INDICATE RECOVERY «, t00=0x007b, t01=0x00aa}
0xc0e4…c10a               Head {h00=0x0022, h01=0x0050, text=» LDK A5,DWTSB3 GET STACK BASE «, t00=0x007b, t01=0x00d2}
0xc10a…c11c               Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x007b, t01=0x00f8}
0xc11c…c12e               Head {h00=0x000e, h01=0x0050, text=» RB DUON05«, t00=0x007b, t01=0x010a}
0xc12e…c138               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x011c}
0xc138…c158               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x007b, t01=0x0126}
0xc158…c162               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0146}
0xc162…c16c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007b, t01=0x0150}
0xc16c…c18c               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007b, t01=0x015a}
0xc18c…c1ac               Head {h00=0x001c, h01=0x0050, text=»*                     * «, t00=0x007b, t01=0x017a}
0xc1ac…c1cc               Head {h00=0x001c, h01=0x0050, text=»*  INTERRUPT HANDLER  * «, t00=0x007c, t01=0x000a}
0xc1cc…c1ec               Head {h00=0x001c, h01=0x0050, text=»*                     * «, t00=0x007c, t01=0x002a}
0xc1ec…c20c               Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x007c, t01=0x004a}
0xc20c…c216               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x006a}
0xc216…c220               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0074}
0xc220…c232               Head {h00=0x000e, h01=0x0050, text=»IHDU EQU *«, t00=0x007c, t01=0x007e}
0xc232…c246               Head {h00=0x0010, h01=0x0050, text=»IHDU1 EQU * «, t00=0x007c, t01=0x0090}
0xc246…c25a               Head {h00=0x0010, h01=0x0050, text=»IHDU2 EQU * «, t00=0x007c, t01=0x00a4}
0xc25a…c282               Head {h00=0x0024, h01=0x0050, text=» ST P,INTSAV SAVE LAST INTERRUPT«, t00=0x007c, t01=0x00b8}
0xc282…c28c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x00e0}
0xc28c…c2a2               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x007c, t01=0x00ea}
0xc2a2…c2cc               Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x007c, t01=0x0100}
0xc2cc…c2d8               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x012a}
0xc2d8…c2e2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0136}
0xc2e2…c2f8               Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x007c, t01=0x0140}
0xc2f8…c31e               Head {h00=0x0022, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 ON STACK«, t00=0x007c, t01=0x0156}
0xc31e…c32a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x007c, t01=0x017c}
0xc32a…c334               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007c, t01=0x0188}
0xc334…c35c (125, 0, 400) Head {h00=0x0024, h01=0x0050, text=» LDKL A6,DWDU01 DISC UNIT NO. 1 «, t00=0x007d, t01=0x0004}
0xc35c…c366               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x002c}
0xc366…c37e               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x007d, t01=0x0036}
0xc37e…c388               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x004e}
0xc388…c392               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007d, t01=0x0058}
0xc392…c3b8               Head {h00=0x0022, h01=0x0050, text=»IHDU10 SST A1,CUADR GET STATUS«, t00=0x007d, t01=0x0062}
0xc3b8…c3e6               Head {h00=0x002a, h01=0x0050, text=»IHDU20 ANKL A1,/460F MASK RETURN CODE «, t00=0x007d, t01=0x0088}
0xc3e6…c3f8               Head {h00=0x000e, h01=0x0050, text=» SLL A1,1 «, t00=0x007d, t01=0x00b6}
0xc3f8…c41e               Head {h00=0x0022, h01=0x0050, text=» RB(N) DUREDY READY INTERRUPT «, t00=0x007d, t01=0x00c8}
0xc41e…c430               Head {h00=0x000e, h01=0x0050, text=» SRL A1,1 «, t00=0x007d, t01=0x00ee}
0xc430…c442               Head {h00=0x000e, h01=0x0050, text=» LDR A2,A1«, t00=0x007d, t01=0x0100}
0xc442…c462               Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/200 SEEK ERROR«, t00=0x007d, t01=0x0112}
0xc462…c478               Head {h00=0x0012, h01=0x0050, text=» RF(Z) IHDU30 «, t00=0x007d, t01=0x0132}
0xc478…c4a2               Head {h00=0x0026, h01=0x0050, text=» ANKL A1,/440F MOVE SEEK ERROR BIT«, t00=0x007d, t01=0x0148}
0xc4a2…c4b6               Head {h00=0x0010, h01=0x0050, text=» ORK A1,/02 «, t00=0x007d, t01=0x0172}
0xc4b6…c4ca               Head {h00=0x0010, h01=0x0050, text=»IHDU30 EQU *«, t00=0x007d, t01=0x0186}
0xc4ca…c4ee               Head {h00=0x0020, h01=0x0050, text=» LD A8,DWTECB,A6 ECB ADDRESS«, t00=0x007e, t01=0x000a}
0xc4ee…c506               Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTSAV,A6«, t00=0x007e, t01=0x002e}
0xc506…c51a               Head {h00=0x0010, h01=0x0050, text=» RF(NN) GET «, t00=0x007e, t01=0x0046}
0xc51a…c52c               Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x007e, t01=0x005a}
0xc52c…c53e               Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x007e, t01=0x006c}
0xc53e…c56c               Head {h00=0x002a, h01=0x0050, text=» RF(NZ) END:IO DISC UNIT NOT OPERABLE «, t00=0x007e, t01=0x007e}
0xc56c…c576               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x00ac}
0xc576…c5a4               Head {h00=0x002a, h01=0x0050, text=»GET LD A5,DWTA5,A6 RELOAD REGISTERS A5«, t00=0x007e, t01=0x00b6}
0xc5a4…c5d0               Head {h00=0x0028, h01=0x0050, text=» LD A4,DWTA4,A6                  A4 «, t00=0x007e, t01=0x00e4}
0xc5d0…c5fa               Head {h00=0x0026, h01=0x0050, text=» LD A7,DWTA2,A6 GET SECTOR COUNTER«, t00=0x007e, t01=0x0110}
0xc5fa…c60a               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x007e, t01=0x013a}
0xc60a…c614               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x014a}
0xc614…c634               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x007e, t01=0x0154}
0xc634…c63e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x0174}
0xc63e…c648               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007e, t01=0x017e}
0xc648…c664               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007e, t01=0x0188}
0xc664…c680               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x007f, t01=0x0014}
0xc680…c69c               Head {h00=0x0018, h01=0x0050, text=»*  PERFORM ENDIO  * «, t00=0x007f, t01=0x0030}
0xc69c…c6b8               Head {h00=0x0018, h01=0x0050, text=»*                 * «, t00=0x007f, t01=0x004c}
0xc6b8…c6d4               Head {h00=0x0018, h01=0x0050, text=»******************* «, t00=0x007f, t01=0x0068}
0xc6d4…c6de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0084}
0xc6de…c6e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x008e}
0xc6e8…c710               Head {h00=0x0024, h01=0x0050, text=»END:30 EQU * CU ADDRESS UNKNOWN «, t00=0x007f, t01=0x0098}
0xc710…c72e               Head {h00=0x001a, h01=0x0050, text=» LDK A1,1 NOT OPERABLE«, t00=0x007f, t01=0x00c0}
0xc72e…c760               Head {h00=0x002e, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE RECOVERY DONE =1«, t00=0x007f, t01=0x00de}
0xc760…c772               Head {h00=0x000e, h01=0x0050, text=» RF END:IO«, t00=0x007f, t01=0x0110}
0xc772…c786               Head {h00=0x0010, h01=0x0050, text=»END:10 EQU *«, t00=0x007f, t01=0x0122}
0xc786…c790               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x007f, t01=0x0136}
0xc790…c7a2               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x007f, t01=0x0140}
0xc7a2…c7d4               Head {h00=0x002e, h01=0x0050, text=» LD* A7,DWTSB3-2,A6 GET 1ST RETURN ADDRESS«, t00=0x007f, t01=0x0152}
0xc7d4…c7e6               Head {h00=0x000e, h01=0x0050, text=» SLL A7,1 «, t00=0x007f, t01=0x0184}
0xc7e6…c80c               Head {h00=0x0022, h01=0x0050, text=» RF(N) END:20 READ AFTER WRITE«, t00=0x0080, t01=0x0008}
0xc80c…c824               Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTORD,A6«, t00=0x0080, t01=0x002e}
0xc824…c842               Head {h00=0x001a, h01=0x0050, text=» ANK A7,/FF GET ORDER «, t00=0x0080, t01=0x0046}
0xc842…c856               Head {h00=0x0010, h01=0x0050, text=» SUK A7,/15 «, t00=0x0080, t01=0x0064}
0xc856…c882               Head {h00=0x0028, h01=0x0050, text=» RF(NZ) END:20 NOT READ AFTER WRITE «, t00=0x0080, t01=0x0078}
0xc882…c8aa               Head {h00=0x0024, h01=0x0050, text=» CM ECBEL,A8 RESET SECTORS DONE «, t00=0x0080, t01=0x00a4}
0xc8aa…c8b6               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0080, t01=0x00cc}
0xc8b6…c8c0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0080, t01=0x00d8}
0xc8c0…c8d4               Head {h00=0x0010, h01=0x0050, text=»END:20 EQU *«, t00=0x0080, t01=0x00e2}
0xc8d4…c8ea               Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/FF00«, t00=0x0080, t01=0x00f6}
0xc8ea…c902               Head {h00=0x0014, h01=0x0050, text=» ANS A2,ECBEL,A8«, t00=0x0080, t01=0x010c}
0xc902…c92e               Head {h00=0x0028, h01=0x0050, text=» LD A2,DWTRTY,A6 GET RETRY INDICATOR«, t00=0x0080, t01=0x0124}
0xc92e…c954               Head {h00=0x0022, h01=0x0050, text=» RF(Z) END:IO NO RETRIES DONE «, t00=0x0080, t01=0x0150}
0xc954…c982               Head {h00=0x002a, h01=0x0050, text=» ORKL A1,/100 SET BIT 7 IN RETURN CODE«, t00=0x0080, t01=0x0176}
0xc982…c998               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0081, t01=0x0014}
0xc998…c9a2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x002a}
0xc9a2…c9ac               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x0034}
0xc9ac…c9c0               Head {h00=0x0010, h01=0x0050, text=»END:IO EQU *«, t00=0x0081, t01=0x003e}
0xc9c0…c9e4               Head {h00=0x0020, h01=0x0050, text=» CF A15,TENDIO PERFORM ENDIO«, t00=0x0081, t01=0x0052}
0xc9e4…ca08               Head {h00=0x0020, h01=0x0050, text=»  ABL TDISP GO TO DISPATCHER«, t00=0x0081, t01=0x0076}
0xca08…ca12               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x009a}
0xca12…ca2a               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0081, t01=0x00a4}
0xca2a…ca34               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00bc}
0xca34…ca3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0081, t01=0x00c6}
0xca3e…ca52               Head {h00=0x0010, h01=0x0050, text=»VO:NAM EQU *«, t00=0x0081, t01=0x00d0}
0xca52…ca76               Head {h00=0x0020, h01=0x0050, text=»  CF A5,SEEKZ SEEK SECTOR 0 «, t00=0x0081, t01=0x00e4}
0xca76…ca88               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0081, t01=0x0108}
0xca88…cac2               Head {h00=0x0036, h01=0x0050, text=» RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0081, t01=0x011a}
0xcac2…cada               Head {h00=0x0014, h01=0x0050, text=» CMR A6 SECTOR 0«, t00=0x0081, t01=0x0154}
0xcada…caf0               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x0081, t01=0x016c}
0xcaf0…cb06               Head {h00=0x0012, h01=0x0050, text=» CF A5,INXUNI «, t00=0x0081, t01=0x0182}
0xcb06…cb26               Head {h00=0x001c, h01=0x0050, text=» CM DWTCYL,A2 CYLINDER 0«, t00=0x0082, t01=0x0008}
0xcb26…cb32               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0028}
0xcb32…cb48               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=1 «, t00=0x0082, t01=0x0034}
0xcb48…cb5e               Head {h00=0x0012, h01=0x0050, text=» CM DWTCYL,A6 «, t00=0x0082, t01=0x004a}
0xcb5e…cb6a               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x0060}
0xcb6a…cb84               Head {h00=0x0016, h01=0x0050, text=» LDK A3,0 SECTOR 0«, t00=0x0082, t01=0x006c}
0xcb84…cb8e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0086}
0xcb8e…cba4               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=1 «, t00=0x0082, t01=0x0090}
0xcba4…cbd0               Head {h00=0x0028, h01=0x0050, text=» IM DWTFBU,A6 READ TO DRIVER BUFFER «, t00=0x0082, t01=0x00a6}
0xcbd0…cbe4               Head {h00=0x0010, h01=0x0050, text=» CF A5,READ «, t00=0x0082, t01=0x00d2}
0xcbe4…cbf6               Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0082, t01=0x00e6}
0xcbf6…cc2a               Head {h00=0x0030, h01=0x0050, text=» CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR«, t00=0x0082, t01=0x00f8}
0xcc2a…cc36               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0082, t01=0x012c}
0xcc36…cc40               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0082, t01=0x0138}
0xcc40…cc56               Head {h00=0x0012, h01=0x0050, text=» IFT VERSA3=0 «, t00=0x0082, t01=0x0142}
0xcc56…cc7e               Head {h00=0x0024, h01=0x0050, text=» LDKL A1,/8019 READ SECTOR ZERO «, t00=0x0082, t01=0x0158}
0xcc7e…cca6               Head {h00=0x0024, h01=0x0050, text=» LDKL A2,BUFFER TO DRIVER BUFFER«, t00=0x0082, t01=0x0180}
0xcca6…ccbc               Head {h00=0x0012, h01=0x0050, text=» CF A5,CIO:50 «, t00=0x0083, t01=0x0018}
0xccbc…ccd6               Head {h00=0x0016, h01=0x0050, text=» ANK A1,3 ERROR ? «, t00=0x0083, t01=0x002e}
0xccd6…cce2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0083, t01=0x0048}
0xcce2…ccec               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0054}
0xccec…cd20               Head {h00=0x0030, h01=0x0050, text=» RF(NZ) VO:NA8 THROUGHPUT ERROR,NOT OPERABLE«, t00=0x0083, t01=0x005e}
0xcd20…cd38               Head {h00=0x0014, h01=0x0050, text=» LDKL A2,BUFFER «, t00=0x0083, t01=0x0092}
0xcd38…cd56               Head {h00=0x001a, h01=0x0050, text=» LDK A3,/F0 FILE CODE «, t00=0x0083, t01=0x00aa}
0xcd56…cd6e               Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTSAV,A6«, t00=0x0083, t01=0x00c8}
0xcd6e…cd84               Head {h00=0x0012, h01=0x0050, text=» RF(Z) VO:NA6 «, t00=0x0083, t01=0x00e0}
0xcd84…cdb0               Head {h00=0x0028, h01=0x0050, text=» LDKL A3,/80F0 INDICATE TEST STATUS «, t00=0x0083, t01=0x00f6}
0xcdb0…cdc4               Head {h00=0x0010, h01=0x0050, text=»VO:NA6 EQU *«, t00=0x0083, t01=0x0122}
0xcdc4…cdfa               Head {h00=0x0032, h01=0x0050, text=» CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL«, t00=0x0083, t01=0x0136}
0xcdfa…ce12               Head {h00=0x0014, h01=0x0050, text=» EJECT   DRDU01 «, t00=0x0083, t01=0x016c}
0xce12…ce1c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x0184}
0xce1c…ce26               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0083, t01=0x018e}
0xce26…ce3a               Head {h00=0x0010, h01=0x0050, text=»DUNA40 EQU *«, t00=0x0084, t01=0x0008}
0xce3a…ce4c               Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0084, t01=0x001c}
0xce4c…ce86               Head {h00=0x0036, h01=0x0050, text=» LDK A7,1 TO INDICATE NOT TRANSFER PARAMETER ORDER«, t00=0x0084, t01=0x002e}
0xce86…ceb2               Head {h00=0x0028, h01=0x0050, text=» LD A2,BUFFER+32 CHECK IF TOSS DISC «, t00=0x0084, t01=0x0068}
0xceb2…cec6               Head {h00=0x0010, h01=0x0050, text=» CWK A2,'TO'«, t00=0x0084, t01=0x0094}
0xcec6…cee4               Head {h00=0x001a, h01=0x0050, text=» RF(NE) DUNA70 NO TOSS«, t00=0x0084, t01=0x00a8}
0xcee4…cf1c               Head {h00=0x0034, h01=0x0050, text=» LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER «, t00=0x0084, t01=0x00c6}
0xcf1c…cf32               Head {h00=0x0012, h01=0x0050, text=» CWK A2,/2031 «, t00=0x0084, t01=0x00fe}
0xcf32…cf5a               Head {h00=0x0024, h01=0x0050, text=» RF(NE) DUNA70 REL LESS THAN 10 «, t00=0x0084, t01=0x0114}
0xcf5a…cf98               Head {h00=0x003a, h01=0x0050, text=» LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER «, t00=0x0084, t01=0x013c}
0xcf98…cfd0               Head {h00=0x0034, h01=0x0050, text=»TRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER «, t00=0x0084, t01=0x017a}
0xcfd0…cffe               Head {h00=0x002a, h01=0x0050, text=» CF A15,INXDWT GET INDEXED DWT ADDRESS«, t00=0x0085, t01=0x0022}
0xcffe…d028               Head {h00=0x0026, h01=0x0050, text=» ECR A3,A2 SEPARATE THE PARAMETERS«, t00=0x0085, t01=0x0050}
0xd028…d03a               Head {h00=0x000e, h01=0x0050, text=» ANK A3,/3«, t00=0x0085, t01=0x007a}
0xd03a…d04c               Head {h00=0x000e, h01=0x0050, text=» ANK A2,/3«, t00=0x0085, t01=0x008c}
0xd04c…d07a               Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTFOR,A4 SAVE FORMAT PARAMETER«, t00=0x0085, t01=0x009e}
0xd07a…d0a6               Head {h00=0x0028, h01=0x0050, text=» LDKL A1,6324 SECTORS ON VERSION A2 «, t00=0x0085, t01=0x00cc}
0xd0a6…d0c0               Head {h00=0x0016, h01=0x0050, text=» SUK A3,2 FORMAT ?«, t00=0x0085, t01=0x00f8}
0xd0c0…d0e0               Head {h00=0x001c, h01=0x0050, text=» RF(Z) DUNA60 VERSION A2«, t00=0x0085, t01=0x0112}
0xd0e0…d100               Head {h00=0x001c, h01=0x0050, text=» RF(N) DUNA50 VERSION A1«, t00=0x0085, t01=0x0132}
0xd100…d11e               Head {h00=0x001a, h01=0x0050, text=» ADK A1,204 VERSION A3«, t00=0x0085, t01=0x0152}
0xd11e…d132               Head {h00=0x0010, h01=0x0050, text=»DUNA50 EQU *«, t00=0x0085, t01=0x0170}
0xd132…d14c               Head {h00=0x0016, h01=0x0050, text=» ADKL A1,9588-6324«, t00=0x0085, t01=0x0184}
0xd14c…d160               Head {h00=0x0010, h01=0x0050, text=»DUNA60 EQU *«, t00=0x0086, t01=0x000e}
0xd160…d172               Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0086, t01=0x0022}
0xd172…d190               Head {h00=0x001a, h01=0x0050, text=» RF(Z) DUNA70 PTS 6875«, t00=0x0086, t01=0x0034}
0xd190…d1c0               Head {h00=0x002c, h01=0x0050, text=» ADR A1,A1 PTS 6876 2*MAXSEC ON PTS 6875«, t00=0x0086, t01=0x0052}
0xd1c0…d1d4               Head {h00=0x0010, h01=0x0050, text=»DUNA70 EQU *«, t00=0x0086, t01=0x0082}
0xd1d4…d202               Head {h00=0x002a, h01=0x0050, text=» ST A1,DWTSMX,A4 MAX SECTOR NO IN DWT «, t00=0x0086, t01=0x0096}
0xd202…d23a               Head {h00=0x0034, h01=0x0050, text=» LDK A1,0 RESET RETURN CODE FOR TRANSFER PARAM. «, t00=0x0086, t01=0x00c4}
0xd23a…d268               Head {h00=0x002a, h01=0x0050, text=» ADK A7,0 CHECK IF TRANSFER PARAMETER «, t00=0x0086, t01=0x00fc}
0xd268…d27e               Head {h00=0x0012, h01=0x0050, text=» RB(Z) END:20 «, t00=0x0086, t01=0x012a}
0xd27e…d288               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0140}
0xd288…d29e               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x0086, t01=0x014a}
0xd29e…d2a8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x0160}
0xd2a8…d2b2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0086, t01=0x016a}
0xd2b2…d2e0               Head {h00=0x002a, h01=0x0050, text=» LD A4,DWTA4,A6 RESTORE RETRY COUNTER «, t00=0x0086, t01=0x0174}
0xd2e0…d2f8               Head {h00=0x0014, h01=0x0050, text=» LC A1,DWTOR,A6 «, t00=0x0087, t01=0x0012}
0xd2f8…d30a               Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0087, t01=0x002a}
0xd30a…d322               Head {h00=0x0014, h01=0x0050, text=» SC A1,DWTOR,A6 «, t00=0x0087, t01=0x003c}
0xd322…d334               Head {h00=0x000e, h01=0x0050, text=» ANK A1,1 «, t00=0x0087, t01=0x0054}
0xd334…d34a               Head {h00=0x0012, h01=0x0050, text=» RB(NZ) VO:NAM«, t00=0x0087, t01=0x0066}
0xd34a…d35c               Head {h00=0x000e, h01=0x0050, text=» RF VO:NA9«, t00=0x0087, t01=0x007c}
0xd35c…d370               Head {h00=0x0010, h01=0x0050, text=»VO:NA8 EQU *«, t00=0x0087, t01=0x008e}
0xd370…d38c               Head {h00=0x0018, h01=0x0050, text=» LDK A1,1 ERROR CODE«, t00=0x0087, t01=0x00a2}
0xd38c…d3a0               Head {h00=0x0010, h01=0x0050, text=»VO:NA9 EQU *«, t00=0x0087, t01=0x00be}
0xd3a0…d3b0               Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0087, t01=0x00d2}
0xd3b0…d3ba               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x00e2}
0xd3ba…d3d4               Head {h00=0x0016, h01=0x0050, text=»*   TIMER POINTER «, t00=0x0087, t01=0x00ec}
0xd3d4…d3de               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0106}
0xd3de…d400               Head {h00=0x001e, h01=0x0050, text=»TIMER DATA 0 TIMER POINTER«, t00=0x0087, t01=0x0110}
0xd400…d40a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0132}
0xd40a…d42a               Head {h00=0x001c, h01=0x0050, text=» EJECT   DRDU01   DRDU01«, t00=0x0087, t01=0x013c}
0xd42a…d434               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x015c}
0xd434…d43e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0087, t01=0x0166}
0xd43e…d46c               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0087, t01=0x0170}
0xd46c…d49a               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0088, t01=0x000e}
0xd49a…d4c8               Head {h00=0x002a, h01=0x0050, text=»*   DEVICE WORK TABLE               * «, t00=0x0088, t01=0x003c}
0xd4c8…d4f6               Head {h00=0x002a, h01=0x0050, text=»*                                   * «, t00=0x0088, t01=0x006a}
0xd4f6…d524               Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0088, t01=0x0098}
0xd524…d52e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00c6}
0xd52e…d538               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0088, t01=0x00d0}
0xd538…d54c               Head {h00=0x0010, h01=0x0050, text=»DWDU01 EQU *«, t00=0x0088, t01=0x00da}
0xd54c…d572               Head {h00=0x0022, h01=0x0050, text=» DATA 0 PHYSICAL SECTOR NUMBER«, t00=0x0088, t01=0x00ee}
0xd572…d590               Head {h00=0x001a, h01=0x0050, text=» DATA /8000 DWT STATUS«, t00=0x0088, t01=0x0114}
0xd590…d5ac               Head {h00=0x0018, h01=0x0050, text=» DATA 0 ECB ADDRESS «, t00=0x0088, t01=0x0132}
0xd5ac…d5c2               Head {h00=0x0012, h01=0x0050, text=» DATA 0 ORDER «, t00=0x0088, t01=0x014e}
0xd5c2…d5e8               Head {h00=0x0022, h01=0x0050, text=» DATA DUADR ACTIVATION ADDRESS«, t00=0x0088, t01=0x0164}
0xd5e8…d604               Head {h00=0x0018, h01=0x0050, text=» DATA 0 TTAB ADDRESS«, t00=0x0088, t01=0x018a}
0xd604…d62c               Head {h00=0x0024, h01=0x0050, text=» DATA 0 WAIT/ACTIVATE INDICATOR «, t00=0x0089, t01=0x0016}
0xd62c…d64a               Head {h00=0x001a, h01=0x0050, text=» DATA 0 TERMINAL QUEUE«, t00=0x0089, t01=0x003e}
0xd64a…d654               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x005c}
0xd654…d66a               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0089, t01=0x0066}
0xd66a…d694               Head {h00=0x0026, h01=0x0050, text=» DATA 0 SAVE AREA USER ECB ADDRESS«, t00=0x0089, t01=0x007c}
0xd694…d6b8               Head {h00=0x0020, h01=0x0050, text=» DATA ECBDU1 MMU ECB ADDRESS«, t00=0x0089, t01=0x00a6}
0xd6b8…d6c4               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0089, t01=0x00ca}
0xd6c4…d6ce               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0089, t01=0x00d6}
0xd6ce…d6ea               Head {h00=0x0018, h01=0x0050, text=»DWTFSW EQU *-DWDU01 «, t00=0x0089, t01=0x00e0}
0xd6ea…d6fa               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0089, t01=0x00fc}
0xd6fa…d726               Head {h00=0x0028, h01=0x0050, text=» DATA 0,0,0 SAVE AREA FOR REGISTERS «, t00=0x0089, t01=0x010c}
0xd726…d742               Head {h00=0x0018, h01=0x0050, text=»DWTBSE EQU *-DWDU01 «, t00=0x0089, t01=0x0138}
0xd742…d752               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0089, t01=0x0154}
0xd752…d782               Head {h00=0x002c, h01=0x0050, text=»DWTUBU EQU *-DWDU01 USER BUFFER POINTER «, t00=0x0089, t01=0x0164}
0xd782…d792 (138, 0, 400) Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0004}
0xd792…d7ae               Head {h00=0x0018, h01=0x0050, text=»DWTSWD EQU *-DWDU01 «, t00=0x008a, t01=0x0014}
0xd7ae…d7be               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0030}
0xd7be…d7c8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0040}
0xd7c8…d7de               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x008a, t01=0x004a}
0xd7de…d7e8               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x0060}
0xd7e8…d7f2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008a, t01=0x006a}
0xd7f2…d80e               Head {h00=0x0018, h01=0x0050, text=»DWTRTY EQU *-DWDU01 «, t00=0x008a, t01=0x0074}
0xd80e…d81e               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x0090}
0xd81e…d82e               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008a, t01=0x00a0}
0xd82e…d848               Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008a, t01=0x00b0}
0xd848…d880               Head {h00=0x0034, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED INDICATOR CARTR. 1«, t00=0x008a, t01=0x00ca}
0xd880…d89a               Head {h00=0x0016, h01=0x0050, text=» DATA /C000 FIXED «, t00=0x008a, t01=0x0102}
0xd89a…d8ce               Head {h00=0x0030, h01=0x0050, text=» DATA /8000 NEW VOLUME LOADED IND. CARTR. 2 «, t00=0x008a, t01=0x011c}
0xd8ce…d904               Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST FIXED «, t00=0x008a, t01=0x0150}
0xd904…d93e               Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 1ST CARTRIDGE «, t00=0x008a, t01=0x0186}
0xd93e…d948               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x0030}
0xd948…d95e               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008b, t01=0x003a}
0xd95e…d994               Head {h00=0x0032, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND FIXED «, t00=0x008b, t01=0x0050}
0xd994…d9ce               Head {h00=0x0036, h01=0x0050, text=» DATA /FFFF,/FFFF,/FFFF VOLUME NAME 2ND CARTRIDGE «, t00=0x008b, t01=0x0086}
0xd9ce…d9da               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008b, t01=0x00c0}
0xd9da…d9e4               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00cc}
0xd9e4…d9fa               Head {h00=0x0012, h01=0x0050, text=» EJECT  DRDU01«, t00=0x008b, t01=0x00d6}
0xd9fa…da04               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00ec}
0xda04…da0e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008b, t01=0x00f6}
0xda0e…da2a               Head {h00=0x0018, h01=0x0050, text=»DWTSAV EQU *-DWDU01 «, t00=0x008b, t01=0x0100}
0xda2a…da3a               Head {h00=0x000c, h01=0x0050, text=» DATA -1«, t00=0x008b, t01=0x011c}
0xda3a…da76               Head {h00=0x0038, h01=0x0050, text=»DWTFBU EQU *-DWDU01 FLAG INDICATING IO TO DRIVER BUF«, t00=0x008b, t01=0x012c}
0xda76…da86               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008b, t01=0x0168}
0xda86…daac               Head {h00=0x0022, h01=0x0050, text=»DWTCIO EQU *-DWDU01 CIO-START «, t00=0x008b, t01=0x0178}
0xdaac…dac2               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF1«, t00=0x008c, t01=0x000e}
0xdac2…dad8               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC1«, t00=0x008c, t01=0x0024}
0xdad8…dae2               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x003a}
0xdae2…daf8               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008c, t01=0x0044}
0xdaf8…db0e               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAF2«, t00=0x008c, t01=0x005a}
0xdb0e…db24               Head {h00=0x0012, h01=0x0050, text=» CIO A3,1,DAC2«, t00=0x008c, t01=0x0070}
0xdb24…db30               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0086}
0xdb30…db3a               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0092}
0xdb3a…db56               Head {h00=0x0018, h01=0x0050, text=»DWTCYL EQU *-DWDU01 «, t00=0x008c, t01=0x009c}
0xdb56…db7a               Head {h00=0x0020, h01=0x0050, text=» DATA /FFFF CYLINDER NUMBER «, t00=0x008c, t01=0x00b8}
0xdb7a…db84               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x00dc}
0xdb84…db9a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008c, t01=0x00e6}
0xdb9a…dbb6               Head {h00=0x0018, h01=0x0050, text=» DATA /FFFF 2ND UNIT«, t00=0x008c, t01=0x00fc}
0xdbb6…dbc2               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008c, t01=0x0118}
0xdbc2…dbcc               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008c, t01=0x0124}
0xdbcc…dbe8               Head {h00=0x0018, h01=0x0050, text=»DWTSMX EQU *-DWDU01 «, t00=0x008c, t01=0x012e}
0xdbe8…dc12               Head {h00=0x0026, h01=0x0050, text=» DATA 1 MAX SECTORS ON FIXED DISC «, t00=0x008c, t01=0x014a}
0xdc12…dc3a               Head {h00=0x0024, h01=0x0050, text=» DATA 1 MAX SECTORS ON CARTRIDGE«, t00=0x008c, t01=0x0174}
0xdc3a…dc44               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x000c}
0xdc44…dc5a               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x0016}
0xdc5a…dc72               Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x002c}
0xdc72…dc8a               Head {h00=0x0014, h01=0x0050, text=» DATA 1 2ND UNIT«, t00=0x008d, t01=0x0044}
0xdc8a…dc96               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x005c}
0xdc96…dca0               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0068}
0xdca0…dcbc               Head {h00=0x0018, h01=0x0050, text=»DWTFOR EQU *-DWDU01 «, t00=0x008d, t01=0x0072}
0xdcbc…dce0               Head {h00=0x0020, h01=0x0050, text=» DATA 0 DISC FORMAT ON FIXED«, t00=0x008d, t01=0x008e}
0xdce0…dd06               Head {h00=0x0022, h01=0x0050, text=» DATA 0 DISC FORMAT CARTRIDGE «, t00=0x008d, t01=0x00b2}
0xdd06…dd10               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x00d8}
0xdd10…dd26               Head {h00=0x0012, h01=0x0050, text=» IFT NUNITS=2 «, t00=0x008d, t01=0x00e2}
0xdd26…dd36               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008d, t01=0x00f8}
0xdd36…dd46               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008d, t01=0x0108}
0xdd46…dd52               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008d, t01=0x0118}
0xdd52…dd5c               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x0124}
0xdd5c…dd74               Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008d, t01=0x012e}
0xdd74…dd8c               Head {h00=0x0014, h01=0x0050, text=» DATA 0,0 STACK «, t00=0x008d, t01=0x0146}
0xdd8c…dd9e               Head {h00=0x000e, h01=0x0050, text=» DATA 0,0 «, t00=0x008d, t01=0x015e}
0xdd9e…ddbc               Head {h00=0x001a, h01=0x0050, text=»DWTSB3 EQU *-DWDU01-2 «, t00=0x008d, t01=0x0170}
0xddbc…ddc6               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008d, t01=0x018e}
0xddc6…ddd8               Head {h00=0x000e, h01=0x0050, text=» IFT RAW=1«, t00=0x008e, t01=0x0008}
0xddd8…ddf4               Head {h00=0x0018, h01=0x0050, text=»DWTSEP EQU *-DWDU01 «, t00=0x008e, t01=0x001a}
0xddf4…de04               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0036}
0xde04…de20               Head {h00=0x0018, h01=0x0050, text=»DWTSEI EQU *-DWDU01 «, t00=0x008e, t01=0x0046}
0xde20…de30               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0062}
0xde30…de3c               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x0072}
0xde3c…de46               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x007e}
0xde46…de5c               Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x008e, t01=0x0088}
0xde5c…de70               Head {h00=0x0010, h01=0x0050, text=»ECBDU1 EQU *«, t00=0x008e, t01=0x009e}
0xde70…de8c               Head {h00=0x0018, h01=0x0050, text=» DATA 0,0,0,0,0,0,0 «, t00=0x008e, t01=0x00b2}
0xde8c…dea8               Head {h00=0x0018, h01=0x0050, text=»DWTBA1 EQU *-DWDU01 «, t00=0x008e, t01=0x00ce}
0xdea8…deb8               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x00ea}
0xdeb8…ded4               Head {h00=0x0018, h01=0x0050, text=»DWTBA2 EQU *-DWDU01 «, t00=0x008e, t01=0x00fa}
0xded4…dee4               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x0116}
0xdee4…df08               Head {h00=0x0020, h01=0x0050, text=»DWTPAG EQU *-DWDU01 MMU PAGE«, t00=0x008e, t01=0x0126}
0xdf08…df18               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x014a}
0xdf18…df28               Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x008e, t01=0x015a}
0xdf28…df34               Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x008e, t01=0x016a}
0xdf34…df3e               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0176}
0xdf3e…df48               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x0180}
0xdf48…df52               Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x008e, t01=0x018a}
0xdf52…df5e (143, 2, 20)  Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x008f, t01=0x0004}
0xdf5e…df62               Head {h00=0x4004, h01=0x0000}
0xdf62…df66               00 8f 00 10                                                                                                                                                                                                                                       ┆    ┆
0xdf66…df6e (144, 1, 8)   20 04 00 00 00 90 00 04                                                                                                                                                                                                                           ┆        ┆
0xdf6e…dfbe (145, 0, 400) 50 4c 53 45 47 00 00 04 00 00 01 8c 00 10 00 0c 05 05 d4 41 50 4c 4e 50 45 00 00 06 00 01 00 10 00 10 00 0c 05 05 d4 41 50 4c 53 57 42 00 00 02 00 01 00 24 00 10 00 0c 05 05 d4 41 50 4c 53 54 41 00 00 10 00 01 00 38 00 10 00 0c 05 05 d4 41   ┆PLSEG              APLNPE              APLSWB      $       APLSTA      8       A┆
0xdfbe…e00e               50 4c 54 59 50 00 00 08 00 01 00 4c 00 10 00 0c 05 05 d4 4e 55 4d 53 45 47 00 00 0a 00 01 00 60 00 10 00 0c 05 05 d4 50 52 47 4c 47 31 00 00 02 00 01 00 74 00 10 00 0c 05 05 dc 53 59 53 4c 4f 44 00 00 00 00 01 00 88 00 0e 00 0a 02 04 c2 53   ┆PLTYP      L       NUMSEG      `       PRGLG1      t       SYSLOD              S┆
0xe00e…e05e               54 4b 45 4e 44 00 00 01 00 9c 00 0e 00 0a 02 04 c2 53 43 54 49 50 4c 00 00 01 00 ae 00 0e 00 0a 02 04 c2 53 43 54 41 4e 4f 00 00 01 00 c0 00 2c 00 28 03 13 00 00 00 01 49 24 81 41 00 30 00 02 82 41 00 00 00 04 82 41 00 22 00 02 a0 41 00 20   ┆TKEND            SCTIPL            SCTANO      , (      I$ A 0   A     A "   A  ┆
0xe05e…e0ae               00 02 83 41 00 00 00 06 83 00 00 01 00 d2 00 0e 00 0a 02 04 c2 53 54 4b 43 4f 4d 00 00 01 01 02 00 0e 00 0a 02 04 c2 53 43 54 53 46 41 00 00 01 01 14 00 2c 00 28 03 13 00 02 00 17 20 10 1b 00 83 41 00 0c 00 08 01 01 81 2d 80 cd 00 18 87 4d   ┆   A                 STKCOM            SCTSFA      , (           A       -     M┆
0xe0ae…e0fe               00 1a 81 c1 00 00 00 0a 86 a0 00 00 85 80 00 01 01 26 00 0e 00 0a 02 04 c2 53 43 54 42 55 47 00 00 01 01 56 00 0e 00 0a 02 04 c2 53 43 54 53 54 42 00 00 01 01 68 00 2c 00 28 03 13 00 00 00 33 10 40 95 a0 00 00 81 40 00 00 00 0c 82 04 22 01   ┆                 &       SCTBUG    V       SCTSTB    h , (     3 @     @      " ┆
0xe0fe…e14e (146, 0, 400) 8c 04 87 c0 00 00 00 0e 9f a0 00 04 81 20 04 00 41 2e 00 01 01 7a 00 0a 00 06 02 02 62 52 45 4c 00 02 00 1a 00 0c 00 08 02 03 a2 54 41 42 42 45 00 02 00 28 00 2c 00 28 03 13 00 00 00 4f 20 10 80 80 83 20 00 02 00 10 f0 8d 85 20 55 55 06 40   ┆                A.   z      bREL           TABBE   ( , (     O              UU @┆
0xe14e…e19e               3e 42 01 00 82 40 00 00 00 12 9a 20 04 00 82 41 00 02 00 38 00 2c 00 28 03 13 00 00 00 6b 90 00 00 00 00 12 b8 40 00 00 00 12 d3 44 0f fe d5 45 0f fe d2 44 0f fe d3 45 0f fe ea 14 50 00 1e 04 00 02 00 68 00 0e 00 0a 02 04 c2 4d 4d 44 44 49   ┆>B   @         A   8 , (     k       @     D   E   D   E    P      h       MMDDI┆
0xe19e…e1ee               56 00 00 02 00 98 00 2c 00 28 03 13 00 00 00 87 09 24 5f 28 81 20 fc 00 81 57 00 00 00 14 b8 56 00 00 00 14 b8 57 00 00 00 14 e9 56 00 00 00 14 50 00 00 02 00 aa 00 0c 00 08 02 03 a2 45 52 52 4f 52 00 02 00 da 00 0e 00 0a 02 04 c2 53 43 54   ┆V      , (       $_(     W     V     W     V    P            ERROR           SCT┆
0xe1ee…e23e               4d 53 5a 00 00 02 00 ea 00 0e 00 0a 02 04 c2 53 43 54 45 46 41 00 00 02 00 fc 00 2c 00 28 03 13 00 00 00 9f 12 42 81 20 00 04 f6 97 00 00 00 16 a0 41 00 00 00 12 86 41 00 00 00 18 3e 62 3e 4a 86 41 00 00 00 1a 00 02 01 0e 00 0e 00 0a 02 04   ┆MSZ            SCTEFA      , (       B           A     A    >b>J A              ┆
0xe23e…e28e               c2 53 43 54 4f 50 54 00 00 02 01 3e 00 2c 00 28 03 13 00 00 00 b7 24 84 03 00 83 41 00 02 00 1a 81 40 00 00 00 1c 81 41 00 34 00 02 a1 20 0f ff 81 41 00 00 00 1c 81 c0 00 02 01 50 00 2c 00 28 03 13 00 00 00 cf 84 04 00 00 00 0a 81 c1 00 00   ┆ SCTOPT    > , (      $    A     @     A 4       A         P , (                ┆
0xe28e…e2de (147, 0, 398) 81 40 00 00 00 04 f6 a1 00 00 83 06 93 40 00 00 83 41 00 00 00 0a 81 04 00 02 01 80 00 2c 00 28 03 13 00 00 00 e9 21 00 50 00 82 41 00 00 00 04 f6 a1 00 00 81 40 00 0c 00 08 11 02 84 c4 00 16 83 c4 00 18 82 c0 00 00 00 03 00 20 00 2c 00 28   ┆ @           @   A           , (      ! P  A         @                       , (┆
0xe2de…e32e               03 13 00 00 01 05 21 12 f6 8b 81 40 00 0c 00 08 86 24 9e 19 86 41 00 04 00 02 11 02 81 41 00 18 00 02 87 40 00 00 00 1a 00 03 00 50 00 2c 00 28 03 13 00 00 01 1d 48 00 85 40 00 02 00 1a 81 40 00 18 00 02 a0 45 00 0c a0 45 00 04 a0 45 00 06   ┆      !    @     $   A       A     @       P , (      H  @     @     E   E   E  ┆
0xe32e…e37e               a0 45 00 0a a0 45 00 14 00 03 00 80 00 2c 00 28 03 13 00 00 01 39 41 00 a0 41 00 1a 00 02 86 26 86 45 00 10 82 40 00 00 00 1c 86 46 00 0a 84 20 10 00 ee 20 43 52 50 00 00 03 00 b0 00 2c 00 28 03 13 00 00 01 55 00 00 3c 41 ee 20 43 4f 50 00   ┆ E   E       , (     9A  A     & E   @     F        CRP      , (     U  <A  COP ┆
0xe37e…e3ce               3c 41 ee 20 42 41 50 00 86 20 41 53 3c 41 86 45 00 08 ee 20 41 53 50 00 00 03 00 e0 00 2c 00 28 03 13 00 00 01 75 42 20 a4 40 00 34 00 02 54 00 01 04 f6 97 00 00 00 16 aa 10 82 41 00 00 00 1c ee 20 41 53 50 00 83 46 00 03 01 10 00 0e 00 0a   ┆<A  BAP   AS<A E    ASP      , (     uB  @ 4  T            A      ASP  F        ┆
0xe3ce…e41c               02 04 c2 53 43 54 50 53 5a 00 00 03 01 40 00 2c 00 28 03 13 00 00 01 8f 22 00 00 10 eb 40 00 00 00 1e 55 00 83 41 00 00 00 1e ee 20 41 53 88 20 00 00 84 0c a4 20 03 ff 50 00 00 03 01 52 00 0c 00 08 02 03 a2 4d 4d 45 4e 44 00 03 01 82         ┆   SCTPSZ    @ , (      "    @    U  A      AS          P    R       MMEND    ┆
0xe41c…e46c (148, 0, 400) 00 2c 00 28 03 13 00 00 01 ab 20 08 01 08 f6 97 00 00 00 16 82 46 00 12 88 20 00 00 f6 a1 00 00 3b 6a 86 20 00 00 00 20 80 a0 00 10 00 04 00 04 00 2c 00 28 03 13 00 00 01 c7 00 00 84 14 1e 02 98 a0 00 01 1b 04 59 0a 50 00 83 46 00 10 a3 20   ┆ , (                 F          ;j               , (                  Y P  F    ┆
0xe46c…e4bc               0c 00 eb 20 04 00 50 00 1e 02 98 a0 00 04 00 34 00 2c 00 28 03 13 00 00 01 e7 20 20 00 01 83 40 00 0a 00 02 50 00 82 1c 83 18 82 2d 13 02 eb 20 00 00 00 20 50 00 92 20 04 00 5f 10 00 04 00 64 00 2c 00 28 03 13 00 00 02 03 02 10 82 02 3a 4c   ┆      P        4 , (           @    P      -        P     _    d , (          :L┆
0xe4bc…e50c               82 45 00 0c aa 10 82 41 00 08 00 02 57 00 03 00 86 20 00 00 00 20 80 a0 00 10 84 14 00 04 00 94 00 2c 00 28 03 13 00 00 02 1f 00 00 82 46 00 04 83 44 00 08 eb 20 41 53 54 00 12 0a 12 01 a2 20 ff fe 85 08 3d 6c ed 20 00 0f 52 00 00 04 00 c4   ┆ E     A    W                    , (         F   D    AST           =l    R     ┆
0xe50c…e55c               00 2c 00 28 03 13 00 00 02 3f 00 00 04 00 57 00 12 00 52 00 ea 10 51 00 98 a0 00 01 52 00 1e 02 87 39 85 08 57 00 84 10 50 00 98 a0 00 04 00 f4 00 2c 00 28 03 13 00 00 02 5f 00 00 00 01 52 00 1e 02 87 39 9a 10 04 00 85 08 50 00 3a 6c a5 20   ┆ , (     ?    W   R   Q     R    9  W   P        , (     _    R    9      P :l  ┆
0xe55c…e5ac               0f ff 50 00 12 01 1a 01 52 00 98 a0 00 04 01 24 00 2c 00 28 03 13 00 00 02 7f 00 42 00 01 52 00 1e 02 9f 20 04 00 87 39 5f 14 01 10 f6 97 00 00 00 16 81 20 01 00 f6 97 00 00 00 16 00 04 01 54 00 2a 00 26 03 12 00 00 02 9b 00 00 85 14 50 00   ┆  P     R      $ , (       B  R        9_                      T * &          P ┆

Reduced view