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

⟦02a934940⟧

    Length: 17526 (0x4476)
    Notes: pts_type(SC)
    Names: »DROD01.SC«

Derivation

└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
    └─⟦this⟧ »TOSSWORK/DROD01.SC« 

PTS(SC)

	IDENT DROD01 	REL 9.2 79-11-16  870105040920 

* 
******************************************* 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DROR01 = DRIVER OPTICAL CHARACTER READER
* 
* 
* 
* 
* 
* 
******************************************* 
* 
* 
*    THIS DRIVER HANDLES INPUT FROM OCR 
*    CONNECTED TO CPU VIA CHLT OR CHRT. 
* 
*    ONLY INPUT DATA FROM OCR 
*    ARE HANDLED BY THE DRIVER. 
* 
* 
*    THE DRIVER CONSISTS OF FOLLOWING PARTS:
* 
*    A C O D : ACTIVATION PART
* 
*    I H O D : INTERRUPT HANDLER
* 
*    R C O D : RECOVERY ROUTINE 
* 
	EJECT
* 
* 
*    THE FOLLOWING ORDERS ARE THREATED: 
* 
*    ORDER 02: READ DOCUMENT
*    ORDER 04: RESET INPUT BUFFER 
* 
* 
*    NORMAL REGISTER USAGE :
* 
*    REGISTER A1 : RETURN CODE
*             A2 : INPUT CHARACTER
*             A3 : BUFFER INDEX 
*             A4 : WORK REGISTER
*             A5 : STACK BASE 
*             A6 : DWT-ADDRESS
*             A7 : ORDER
*             A8 : ECB-ADDRESS
* 
* 
* 
*    SYSTEM ADAPTATION
* 
*    THE LENGTH OF THE CIRCULAR INPUT BUFFER IS 
*    DEFINED IN DWT. STANDARD VALUE IS 80 CHARACTERS
*    NOTE !!!  THAT LENGTH MUST BE THE SAME FOR ALL 
*    DWT:S IN SYSTEM
* 
*    IF TIMING IS WANTED, TIMER POINTER 
*    IN DWT MUST BE SET UNEQUAL TO ZERO.
*    STANDARD VALUE FOR TIME-OUT IS 30 SECONDS
*    SINCE LAST CHARACTER. IF ANOTHER VALUE 
*    IS WANTED FOR A SYSTEM, INDICATOR
*    IN DRIVER MUST BE CHANGED. 
* 
	EJECT
* 
*    BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE
*    TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS:
* 
*    -----POWER ON INDICATION 
*    -----TIME-OUT-FUNCTION 
* 
*   ENTRIES 
* 
* 
	ENTRY	ODAD	ADDRESS-BLOCK 
* 
* 
* 
*    EXTERNAL TOSS MODULE ENTRIES 
* 
* 
* 
	EXTRN	DISIOE	I/O REQUEST ERROR 
	EXTRN	DISEND	END I/O AND GO TO DISPATCHER
	EXTRN	TENDIO	END I/O 
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	LDREG	LOAD REGISTERS A2-A8 AND RETURN
	EXTRN	STREG	STORE REGISTERS AND GO TO DISPATCER
	EXTRN	LDREGE	RETURN FROM ECHOE HANDLING
	EXTRN	LDREGF	PANIK EXTERN
	EXTRN	SETIME	SET TIME
	EXTRN	SETIMP	SET TIME
	EXTRN	SAVE8	SAVE 8 REGISTERS 
	EXTRN	ECHRTN	RETURN FROM ECHO
	EXTRN	ECHO	ECHO ROUTINE
	EXTRN	ECHEND	END OF ECHOING
* 
* 
	EXTRN	DWTCHP	CHANEL PARAMETER
	EXTRN	DWTST	STATUS 
	EXTRN	DWTBC	BYTE COUNTER 
	EXTRN	DWTADR	DRIVER ADDRESS BLOCK
	EXTRN	DWTA3	SAVE AREA A3 
	EXTRN	DWTA4	SAVE AREA A4 
	EXTRN	DWTA5	SAVE AREA A5 
	EXTRN	DWTSB2	STACK BASE 2 IN DWT 
	EXTRN	DWTTP	TIMER POINTER
	EXTRN	DWTWAT	SAVE INPUT DWT
	EXTRN	ECBBA	ECB BUFFER ADDRESS 
	EXTRN	ECBRL	ECB REQUESTED LENGTH 
	EXTRN	ECBEL	ECB EFFECTIVE LENGTH 
	EXTRN	ECBRC	ECB RETURN CODE
	EXTRN	ECBCW	ECB CONTROL WORD 
	EJECT
* 
* 
* 
*     CONSTANTS 
* 
* 
* 
OVMASK	EQU	/2	OVERFLOW IN INPUT BUFFER
* 
X:B	EQU	80	LENGTH OF CIRCULAR INPUT BUFFER
DWTLNG	EQU	X:B	NUMBER OF BYTES IN DECIMAL FORM
ETX	EQU	/03	END CHARACTER 
* 
*    TIME BEFORE TIME-OUT 
* 
TIME	EQU	300	TIME OUT CONSTANT
* 
* 
* 
* 
	EJECT
* 
* 
****************************************
*    CONDITIONAL ASSEMBLY              *
****************************************
* 
* 
*      BY SETTING X:A = 1 THE FOLOWING POWER OFF FUNCTION 
*      IS INCLUDED IN THE DRIVER. 
*      IF THERE IS A READ REQUEST THIS IS COMPLETED WITH
*      -2 IN THE CONTROL WORD OF ECB. 
*      IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST 
*      AFTER POWER ON IS COMPLETED WITH -2 IN CONTROL WORD
*      OF ECB 
* 
* 
X:A	EQU	0 
POWOFF	EQU	X:A
* 
* 
*    TIME OUT FUNCTION MAY BE EXCLUDED BY 
*    SETTING X:A = 0. 
* 
X:F	EQU	1 
CTIMUT	EQU	X:F
* 
* 
*   THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS 
*   BY SETTING CREDIT = 1 
*   ORDER /04 IS THEN REPLACED BY ORDER /31 
*    CONTROL WORD OF ECB IS SET TO ZERO INSTEAD OF-2
*    ORDER /04 IS THEN REPLACED BY ORDER /31
CREDIT	EQU	0
* 
* 
*   MMU BUFFER SIZE 
* 
X:C	EQU	80
DVBLEN	EQU	X:C
* 
* 
*   MMU KEY TABLE SIZE
* 
X:D	EQU	10
DVBKTB	EQU	X:D
* 
* 
*	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
* 
* 
********************* 
* DWT DISPLACEMENTS * 
********************* 
* 
* 
DWTDRD	EQU	/10	START OF DRIVER DEFINED PART 
* 
	IFT	MMUPAG=0 
START	EQU	DWTDRD
	XIF
* 
	IFT	MMUPAG=1 
START	EQU	DWTDRD+4
	XIF
* 
DWTCON	EQU	START+/00	CONVERSION TABLE 
DWTLRC	EQU	START+/16	LRC ACKUMULATOR
DWTINQ	EQU	START+/18	POINTER TO FIRST PLACE IN QUEUE
DWTUTQ	EQU	START+/1A	POINTER TO LAST PLACE IN QUEUE 
DWTSQ	EQU	START+/1C	START OF QUEUE
DWTEQ	EQU	DWTSQ+DWTLNG	END OF QUEUE 
* 
	EJECT
* 
* 
**************
* TABLES     *
**************
* 
* 
	DATA	DVBKTB	MMU KEY TABLE SIZE 
	DATA	DVBLEN	MMU BUFFER SIZE
	DATA	6	DEVICE INDEX
ODAD	EQU	*
	DATA	ACOD	ACTIVATION DRIVER
	DATA	0	ABORT ROUTINE ADDRESS 
	DATA	IHOD	INTERRUPT HANDLER
* 
	IFF	POWOFF=1 
	DATA	0	NO RECOVERY 
	XIF
* 
	IFT	POWOFF=1 
* 
	DATA	RCOD	RECOVERY ROUTINE 
	EJECT
* 
* 
*    R C O D
* 
*    THIS IS THE RECOVERY ROUTINE FOR OCR 
*    ENTERED FROM CHLT/CHRT DRIVER
* 
RCOD	EQU	*
	INH
	IFT	CPU852=1 
	CF	A15,SAVE8	SAVE A1-A8
	XIF
* 
	IFT	POWOFF=1 
	IFT	CPU852=0 
	MSR	8,A15	SAVE A1-A8 
	XIF
* 
	IFT	POWOFF=1 
	LDKL	A1,/200 
	ORS	A1,DWTST,A6	INDICATE POWER OFF OCCURED 
	LD	A3,DWTST,A6	I/O-REQUEST 
	RF(N)	RCOD05	NO
	LD	A4,DWTTP,A6	TIME EQUAL 0
	RF(Z)	RCOD05	YES 
	CM*	DWTTP,A6	RESET TIME
	CM	DWTTP,A6	RESET TIMER
RCOD05	EQU	*
	LDK	A1,1 
	ORS	A1,DWTST,A6	RECOVERY FLAG
RCOD10	EQU	*
	LDKL	A4,DWTTP
	ADR	A4,A6
	LDR	A1,A6
	CF	A15,SETIMP
	DATA	RCTUT,/A
	ST	A4,DWTTP,A6 
	RF	RCTDIS	DISPATCH 
RCTUT	EQU	* 
	INH
	IFT	POWOFF=1 
	LDR	A6,A1
RCTUT5	EQU	*
	CM	DWTTP,A6
			GET DWT-ADDRESS
	LD	A8,4,A6	GET ECB-ADDRESS 
	RF(Z)	RCTUT6	SYSTEM START SKIP BUFFER
	INH
	XIF
	IFT	CREDIT-POWOFF=-1 
	LDKL	A1,-2	INDICATE POWER ON 
	ST	A1,ECBCW,A8 
	XIF
	IFT	CREDIT+POWOFF=2
	CM	10,A8	INDICATE POWER ON 
	XIF
	IFT	POWOFF=1 
RCTUT6	EQU	*
	ENB
	ENB
	LDKL	A1,/FFFE	RESET RECOVERY 
	ANS	A1,DWTST,A6
	LDK	A1,0 
	LD	A2,DWTINQ,A6
	SCR	A1,A2
	ST	A2,DWTUTQ,A6
	LD	A3,DWTST,A6 
	RF(NN)	RCEND 
RCTDIS	EQU	*
	ABL	TDISP
RCEND	EQU	* 
	LDKL	A4,/FDFF
	ANS	A4,DWTST,A6	RESET POWER OFF
	ABL	DISEND 
	XIF
* 
	EJECT
* 
* 
*    A C O D
* 
*    ACTIVATION PART: 
* 
*    CHECKS VALIDITY OF ORDERS AND EXAMINES 
*    INPUT BUFFER TO SEE IF SOME QUEUED 
*    TO THREAT. 
* 
* 
ACOD	EQU	*
	LDK	A1,0 
	LDK	A3,0	START BUFFER INDEX
	ST	A3,DWTLRC,A6	CLEAR LRC-ACKUMULATOR
	LDR	A4,A7

	SUK	A4,4 

	IFT	CREDIT=1 
	SUK	A4,/2D 
	RF(Z)	CRE:10	SKIP INPUT BUFFER 
	ADK	A4,/2D 
CRE:10	EQU	*
	XIF
	RF(Z)	AOD110	ORDER 4 
	RF(N)	AOD200	ORDER 2 
AOD100	ORKL	A1,/8000	I/O REQUEST ERROR
AOD105	EQU	*
	ABL	ENDI10 
	EJECT
* 
* 
*    ORDER 4 RESET INPUT BUFFER 
* 
AOD110	LD	A2,DWTINQ,A6	ORDER 4
	SCR	A1,A2	RESET OVERFLOW IF OCCURED
	ST	A2,DWTUTQ,A6	RESET OUTPUT QUEUE 
	ABL	ENDIO	END I/O
	EJECT
* 
* 
* 
* 
AOD200	EQU	*
* 
	IFT	POWOFF=1 
* 
	LD	A2,DWTST,A6 
	ANKL	A2,/200	POWER OFF ? 
	RF(E)	AOD205 
	XRS	A2,DWTST,A6	RESET BIT
	XIF
AOD202	EQU	*
	IFT	CREDIT-POWOFF=-1 
	LDKL	A1,-2	INDICATE POWER ON 
	ST	A1,ECBCW,A8 
	XIF
	IFT	CREDIT+POWOFF=2
	CM	10,A8	INDICATE POWER ON 
	XIF
	IFT	POWOFF=1 
	ABL	AOD380 
* 
	XIF
* 
AOD205	EQU	*
* 
	IFT	CTIMUT=1 
* 
	LDR*	A1,A6	
	ANK	A1,/40	TIMING ?
	RF(E)	AOD210	NO TIMING FOR THIS DEVICE 
	LD	A4,DWTTP,A6 
	RF(E)	AODTIM 
	RF	AOD210
AODTIM	EQU	*
	LDKL	A4,DWTTP	TIMER POINTER
	ADR	A4,A6	ADD DWT-ADDRESS
	LDR	A1,A6
	CF	A15,SETIMP	SET TIME 
	DATA	AODTUT,TIME	TIME OUT ROUTINE AND TIME 
	ST	A4,DWTTP,A6	STORE TIMER ADDRESS IN DWT
* 
	XIF
* 
	EJECT
* 
* 
AOD210	EQU	*
	LD	A2,ECBRL,A8	REQUESTED LENGTH=0
AOD220	RF(E)	AOD380 
      	LDR	A3,A3	FIRTST RIME? 
	RF(NE)	AOD240	N0!
	LD	A1,ECBBA,A8	BUFFER ADDRESS
	SUK	A1,1 
	ADR	A1,A2
AOD230	SCR	A3,A1	CLEAR ECB BUFFER 
	SUK	A1,1 
	SUK	A2,1 
	RB(NE)	AOD230
AOD240	EQU	*
	LD	A1,DWTUTQ,A6
	LCR	A2,A1
      	LDR	A4,A2
	XRK	A4,/FF	OVERFLOW? 
	RF(NE)	AOD250	N0!
      	SCR	A4,A1	YES! 
	LDK	A1,OVMASK	OVERFLOW SET 
	RF	ENDIO	END I/O 
AOD250	CW	A1,DWTINQ,A6	SOMETHING IN QUEUE?
	RF(NE)	AOD260	 
	CF	A5,STREG	NOTHING IN QUEUE 
	IFT	CTIMUT=1 
	LDR	A1,A1	CHECK TIME OUT RETURN CODE 
	RF(Z)	AOD270	NO TIME-OUT 
	RF	ENDI05	END I/O AT TIME OUT
	XIF
	IFT	CTIMUT=0 
	RF	AOD270
	XIF
AOD260	CF	A15,EOQUEU	NEXT OUT POINTER 
	ST	A1,DWTUTQ,A6	STORE NEW POINTER
AOD270	EQU	*
	LDR	A4,A7
	SUK	A4,2 
	RF(NN)	AOD310	ORDER 2
	RB	AOD100	I/O REQUEST ERROR
	EJECT
* 
* 
* 
*    ORDER 2  READ DOCUMENT 
* 
* 
* 
* 
* 
AOD310	EQU	*
	LDR	A3,A3	FIRST CHARACTER
	RF(N)	AOD400	NO:LRC-CHARACTER
AOD320	EQU	*
	LDK	A4,/40 
	TM	A4,A2	CHECK IF END CHARACTER
	RF(Z)	AOD330	NO
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH IN ECB 
	NGR	A3,A3	NEGATE REGISTER
	RF	AOD340
AOD330	EQU	*
	CWK	A2,/3F	REJECTED CHARACTER
	RF(NE)	AOD331	NO 
	LDKL	A1,/1000	INDICATE REJECTED CHARACTER
	ORS	A1,ECBRC,A8	STORE IN ECB-RETURN CODE 
AOD331	EQU	*
	CWK	A2,/21	DIRECTION REJECTED
	RF(NE)	AOD332	NO 
	LDK	A1,/10	INDICATE DIRECTION ERROR
	RF	ENDIO 
AOD332	EQU	*
	CWK	A2,/1C	QUADRATURE REJECTED?
	RF(NE)	AOD333	NO 
	LDKL	A1,/800	INDICATE QUADRATURE ERROR 
	RF	ENDIO 
AOD333	EQU	*
	CW	A3,ECBRL,A8	REQ.LENGTH=EFF.LENGTH 
	RF(NL)	AOD360	YES
	LD	A1,ECBCW,A8	KEY TABLE ADDRESS 
	RF(Z)	AOD340	NO KEYTABLE 
	LCR	A4,A1	TABLE LENGTH IN A4 
	ANK	A4,/FF 
	ADR	A1,A4	LAST PLACE IN KEY TABLE
	ADK	A1,1 
AOD335	EQU	*
	SUK	A4,1 
	RF(N)	AOD340	KEY NOT FOUND 
	SUK	A1,1	NEXT KEY
	CCR	A2,A1	FOUND? 
	RB(NE)	AOD335
	XRS	A2,DWTLRC,A6	UPDATE LRC ACKUMULATOR
	RB	AOD240
AOD340	EQU	*
	XRS	A2,DWTLRC,A6	UPDATE LRC-ACKUMULATOR
	CF	A15,CDCHK	CODE CHECK IF LESS /1F SET BIT 7
	LDR	A3,A3
	RF(N)	AOD345 
	CF	A15,STORE	STORE IN ECB-BUFFER 
AOD345	EQU	*
	RB	AOD240
AOD400	EQU	*
	ANK	A2,/3F	DELETE LRC-BIT
	XR	A2,DWTLRC,A6	CHECK LRC-SUM
	ANK	A2,/F
	RF(E)	AOD380	CORRECT   END I/O 
	LDK	A1,4	INDICATE LRC RERROR 
	RF	ENDIO 
AOD360	EQU	*
	CF	A15,CDCHK	CODE CHECK
	LDK	A1,8	LENGTH OVERFLOW 
	RF	ENDIO 
AOD380	LDK	A1,0	RETURN CODE 
	EJECT
* 
* 
*    THIS IS A COMMON END OF THE DRIVER 
* 
*    SET EFFECTIVE LENGTH AND PERFORM END I/O 
* 
* 
ENDIO	EQU	* 
	IFT	CTIMUT=1 
	INH
	LD	A4,DWTTP,A6 
	RF(E)	ENDI05	NO TIMING ON THIS DEVICE
	CM*	DWTTP,A6	RESET TIMER 
	CM	DWTTP,A6
	XIF
* 
*** 
* 
ENDI05	EQU	*
	LDR	A3,A3
	RF(N)	ENDI10 
	ST	A3,ECBEL,A8	STORE EFFECTIVE LENGTH
ENDI10	EQU	*
* 
	ABL	DISEND 
* 
	EJECT
* 
* 
* 
*     IHOD
* 
* 
*     THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER 
* 
* 
* 
IHOD	EQU	*
	ANK	A2,/FF 
	IFT	POWOFF=1 
	LD	A4,DWTST,A6	I/O-REQUEST 
	ANK	A4,1	RECOVERY? 
	RF(NZ)	EXIT2	YES 
	XIF
	LD	A3,DWTST,A6	I/O REQUEST?
	RF(N)	IHOD10	NO
	SLL	A3,7	INTERRUPTS ALLOWED? 
	RF(NN)	IHOD10	NO,STORE CHARACTER IN DWT-BUFFER 
* 
	IFT	CTIMUT=1 
* 
	LD	A3,DWTTP,A6 
	RF(E)	IHOD05	NO TIMING ON THIS DEVICE
	LDKL	A3,-TIME	RESTART TIME 
	ST*	A3,DWTTP,A6
* 
	XIF
* 
IHOD05	EQU	*
	ABL	LDREG	RETURN TO READ ROUTINE 
IHOD10	EQU	*
	LD	A1,DWTINQ,A6
	LCR	A4,A1
	XRK	A4,/FF	ALREADY OVERFLOW? 
	RF(E)	EXIT	YES 
	LDR	A3,A1
	CF	A15,EOQUEU	GET NEXT OUTQUEUE POINTER ADDRESS
	CW	A1,DWTUTQ,A6	OVERFLOW?
	RF(NE)	IHOD20
	ORK	A2,/FF	SET OVERFLOWBIT IN INPUT BUFFER 
	RF	IHOD30
IHOD20	ST	A1,DWTINQ,A6	STORE INQUEUE POINTER
IHOD30	SCR	A2,A3
EXIT	ABL	TDISP
	EJECT
	IFT	POWOFF=1 
EXIT2	EQU	* 
	LD	A3,DWTA3,A6 
	RF(N)	EXIT4
	LD	A4,DWTTP,A6	TIMER CLEARED 
	RF(Z)	EXIT3	YES
	LDKL	A3,-100 
	ST*	A3,DWTTP,A6	RESTART TIMER
	LDK	A3,1 
EXIT3	EQU	* 
	ADK	A3,1 
	LDK	A4,/40 
	TM	A4,A2	ETX CHARACTER 
	RF(Z)	EXIT5	NO 
	NGR	A3,A3
EXIT5	EQU	* 
	ST	A3,DWTA3,A6 
	RB	EXIT	DISPATCH 
EXIT4	EQU	* 
	CM*	DWTTP,A6	CLEAR TIMER 
	LDK	A3,0 
	ABL	RCTUT5 
	XIF
	EJECT
* 
* 
*    A O D T U T
* 
*    THIS IS THE TIME-OUT ROUTINE 
* 
* 
	IFT	CTIMUT=1 
* 
AODTUT	EQU	*
	LDR	A6,A1	GET DWT-ADDRESS
	LD	A1,DWTST,A6 
	RB(N)	EXIT 
	LDK	A1,/40	SET RETURN CODE 
	CM	DWTTP,A6
	RB	IHOD05	RESTORE REGISTERS AND END I/O
* 
	XIF
* 
	EJECT
* 
*    STORE = SUBROUTINE TO STORE A CHARACTER IN 
*            ECB-BUFFER AND INCREMENT BUFFER INDEX
* 
*    ON ENTRY:
* 
*    A2 = CHARACTER TO STORE
*    A3 = BUFFER INDEX
* 
* 
STORE	EQU	* 
	LD	A4,ECBBA,A8	BUFFER ADDRESS
	ADR	A4,A3	ADD BUFFER INDEX 
	SCR	A2,A4	STORE CHARACTER IN BUFFER
	ADK	A3,1	INCREMENT BUFFER INDEX
	ANK	A2,/7F 
STORTN	ADKL	A15,2 
	LDR*	P,A15 
	EJECT
* 
* 
*    EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER
* 
*    ON ENTRY:
* 
*    A1 = QUEUE POINTER 
*    A6 = DWT-ADDRESS 
* 
*    ON EXIT: 
* 
*    A1 = NEW QUEUE POINTER 
EOQUEU	EQU	*
	ADK	A1,1 
	SUR	A1,A6
	CWK	A1,DWTEQ	END OF QUEUE? 
	RF(NE)	EOQU10
	LDK	A1,DWTSQ	SET QUEUE START ADDRESS 
EOQU10	ADR	A1,A6
	RB	STORTN
	EJECT
* 
* 
*         CODE CHECK
* 
* 
*           AT ENTRY   A2= 6-BIT OCTAL CHARACTER
* 
*            AT EXIT   A2= 7-BIT ASCII CHARACTER
CDCHK	EQU	* 
	LDR	A4,A2	SAVE REGISTER
	SUK	A4,/1F	LESS THEN /1F CONVERT TO ASCII
	RF(NN)	CDC05	NO
	ORK	A2,/40	SET BIT 7 
CDC05	EQU	* 
	RB	STORTN
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DROD01  REL 9.2 79-11-16  870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…007c              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x004c}
0x007c…0086              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0080}
0x0086…00ae              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008a}
0x00ae…00b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b2}
0x00b8…00ec              Head {h00=0x0030, h01=0x0050, text=»*   DROR01 = DRIVER OPTICAL CHARACTER READER«, t00=0x0000, t01=0x00bc}
0x00ec…00f6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f0}
0x00f6…0100              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fa}
0x0100…010a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0104}
0x010a…0114              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010e}
0x0114…011e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0118}
0x011e…0128              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0122}
0x0128…015c              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0000, t01=0x012c}
0x015c…0166              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0160}
0x0166…0170              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016a}
0x0170…01a0              Head {h00=0x002c, h01=0x0050, text=»*    THIS DRIVER HANDLES INPUT FROM OCR «, t00=0x0000, t01=0x0174}
0x01a0…01d0              Head {h00=0x002c, h01=0x0050, text=»*    CONNECTED TO CPU VIA CHLT OR CHRT. «, t00=0x0001, t01=0x0014}
0x01d0…01da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0044}
0x01da…0200              Head {h00=0x0022, h01=0x0050, text=»*    ONLY INPUT DATA FROM OCR «, t00=0x0001, t01=0x004e}
0x0200…0228              Head {h00=0x0024, h01=0x0050, text=»*    ARE HANDLED BY THE DRIVER. «, t00=0x0001, t01=0x0074}
0x0228…0232              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x009c}
0x0232…023c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a6}
0x023c…0270              Head {h00=0x0030, h01=0x0050, text=»*    THE DRIVER CONSISTS OF FOLLOWING PARTS:«, t00=0x0001, t01=0x00b0}
0x0270…027a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e4}
0x027a…02a0              Head {h00=0x0022, h01=0x0050, text=»*    A C O D : ACTIVATION PART«, t00=0x0001, t01=0x00ee}
0x02a0…02aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0114}
0x02aa…02d2              Head {h00=0x0024, h01=0x0050, text=»*    I H O D : INTERRUPT HANDLER«, t00=0x0001, t01=0x011e}
0x02d2…02dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0146}
0x02dc…0304              Head {h00=0x0024, h01=0x0050, text=»*    R C O D : RECOVERY ROUTINE «, t00=0x0001, t01=0x0150}
0x0304…030e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0178}
0x030e…031c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0001, t01=0x0182}
0x031c…0326              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0190}
0x0326…0330              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000a}
0x0330…0360              Head {h00=0x002c, h01=0x0050, text=»*    THE FOLLOWING ORDERS ARE THREATED: «, t00=0x0002, t01=0x0014}
0x0360…036a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0044}
0x036a…038e              Head {h00=0x0020, h01=0x0050, text=»*    ORDER 02: READ DOCUMENT«, t00=0x0002, t01=0x004e}
0x038e…03b8              Head {h00=0x0026, h01=0x0050, text=»*    ORDER 04: RESET INPUT BUFFER «, t00=0x0002, t01=0x0072}
0x03b8…03c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x009c}
0x03c2…03cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a6}
0x03cc…03f0              Head {h00=0x0020, h01=0x0050, text=»*    NORMAL REGISTER USAGE :«, t00=0x0002, t01=0x00b0}
0x03f0…03fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00d4}
0x03fa…0420              Head {h00=0x0022, h01=0x0050, text=»*    REGISTER A1 : RETURN CODE«, t00=0x0002, t01=0x00de}
0x0420…044a              Head {h00=0x0026, h01=0x0050, text=»*             A2 : INPUT CHARACTER«, t00=0x0002, t01=0x0104}
0x044a…0472              Head {h00=0x0024, h01=0x0050, text=»*             A3 : BUFFER INDEX «, t00=0x0002, t01=0x012e}
0x0472…049a              Head {h00=0x0024, h01=0x0050, text=»*             A4 : WORK REGISTER«, t00=0x0002, t01=0x0156}
0x049a…04c0              Head {h00=0x0022, h01=0x0050, text=»*             A5 : STACK BASE «, t00=0x0002, t01=0x017e}
0x04c0…04e6              Head {h00=0x0022, h01=0x0050, text=»*             A6 : DWT-ADDRESS«, t00=0x0003, t01=0x0014}
0x04e6…0506              Head {h00=0x001c, h01=0x0050, text=»*             A7 : ORDER«, t00=0x0003, t01=0x003a}
0x0506…052c              Head {h00=0x0022, h01=0x0050, text=»*             A8 : ECB-ADDRESS«, t00=0x0003, t01=0x005a}
0x052c…0536              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0080}
0x0536…0540              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x008a}
0x0540…054a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0094}
0x054a…0568              Head {h00=0x001a, h01=0x0050, text=»*    SYSTEM ADAPTATION«, t00=0x0003, t01=0x009e}
0x0568…0572              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00bc}
0x0572…05aa              Head {h00=0x0034, h01=0x0050, text=»*    THE LENGTH OF THE CIRCULAR INPUT BUFFER IS «, t00=0x0003, t01=0x00c6}
0x05aa…05e6              Head {h00=0x0038, h01=0x0050, text=»*    DEFINED IN DWT. STANDARD VALUE IS 80 CHARACTERS«, t00=0x0003, t01=0x00fe}
0x05e6…0622              Head {h00=0x0038, h01=0x0050, text=»*    NOTE !!!  THAT LENGTH MUST BE THE SAME FOR ALL «, t00=0x0003, t01=0x013a}
0x0622…063e              Head {h00=0x0018, h01=0x0050, text=»*    DWT:S IN SYSTEM«, t00=0x0003, t01=0x0176}
0x063e…0648 (4, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0004}
0x0648…0678              Head {h00=0x002c, h01=0x0050, text=»*    IF TIMING IS WANTED, TIMER POINTER «, t00=0x0004, t01=0x000e}
0x0678…06a8              Head {h00=0x002c, h01=0x0050, text=»*    IN DWT MUST BE SET UNEQUAL TO ZERO.«, t00=0x0004, t01=0x003e}
0x06a8…06de              Head {h00=0x0032, h01=0x0050, text=»*    STANDARD VALUE FOR TIME-OUT IS 30 SECONDS«, t00=0x0004, t01=0x006e}
0x06de…0712              Head {h00=0x0030, h01=0x0050, text=»*    SINCE LAST CHARACTER. IF ANOTHER VALUE «, t00=0x0004, t01=0x00a4}
0x0712…0740              Head {h00=0x002a, h01=0x0050, text=»*    IS WANTED FOR A SYSTEM, INDICATOR«, t00=0x0004, t01=0x00d8}
0x0740…0768              Head {h00=0x0024, h01=0x0050, text=»*    IN DRIVER MUST BE CHANGED. «, t00=0x0004, t01=0x0106}
0x0768…0772              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012e}
0x0772…0780              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0138}
0x0780…078a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0146}
0x078a…07c6              Head {h00=0x0038, h01=0x0050, text=»*    BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE«, t00=0x0004, t01=0x0150}
0x07c6…0802              Head {h00=0x0038, h01=0x0050, text=»*    TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS:«, t00=0x0004, t01=0x018c}
0x0802…080c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0038}
0x080c…0832              Head {h00=0x0022, h01=0x0050, text=»*    -----POWER ON INDICATION «, t00=0x0005, t01=0x0042}
0x0832…0856              Head {h00=0x0020, h01=0x0050, text=»*    -----TIME-OUT-FUNCTION «, t00=0x0005, t01=0x0068}
0x0856…0860              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008c}
0x0860…0874              Head {h00=0x0010, h01=0x0050, text=»*   ENTRIES «, t00=0x0005, t01=0x0096}
0x0874…087e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00aa}
0x087e…0888              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00b4}
0x0888…08aa              Head {h00=0x001e, h01=0x0050, text=» ENTRY ODAD ADDRESS-BLOCK «, t00=0x0005, t01=0x00be}
0x08aa…08b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e0}
0x08b4…08be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ea}
0x08be…08c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00f4}
0x08c8…08f2              Head {h00=0x0026, h01=0x0050, text=»*    EXTERNAL TOSS MODULE ENTRIES «, t00=0x0005, t01=0x00fe}
0x08f2…08fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0128}
0x08fc…0906              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0132}
0x0906…0910              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x013c}
0x0910…0938              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0005, t01=0x0146}
0x0938…096a              Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND END I/O AND GO TO DISPATCHER«, t00=0x0005, t01=0x016e}
0x096a…0988              Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0006, t01=0x0010}
0x0988…09ae              Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0006, t01=0x002e}
0x09ae…09e2              Head {h00=0x0030, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN«, t00=0x0006, t01=0x0054}
0x09e2…0a1a              Head {h00=0x0034, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCER«, t00=0x0006, t01=0x0088}
0x0a1a…0a4a              Head {h00=0x002c, h01=0x0050, text=» EXTRN LDREGE RETURN FROM ECHOE HANDLING«, t00=0x0006, t01=0x00c0}
0x0a4a…0a6c              Head {h00=0x001e, h01=0x0050, text=» EXTRN LDREGF PANIK EXTERN«, t00=0x0006, t01=0x00f0}
0x0a6c…0a8a              Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIME SET TIME«, t00=0x0006, t01=0x0112}
0x0a8a…0aa8              Head {h00=0x001a, h01=0x0050, text=» EXTRN SETIMP SET TIME«, t00=0x0006, t01=0x0130}
0x0aa8…0ace              Head {h00=0x0022, h01=0x0050, text=» EXTRN SAVE8 SAVE 8 REGISTERS «, t00=0x0006, t01=0x014e}
0x0ace…0af4              Head {h00=0x0022, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO«, t00=0x0006, t01=0x0174}
0x0af4…0b14              Head {h00=0x001c, h01=0x0050, text=» EXTRN ECHO ECHO ROUTINE«, t00=0x0007, t01=0x000a}
0x0b14…0b38              Head {h00=0x0020, h01=0x0050, text=» EXTRN ECHEND END OF ECHOING«, t00=0x0007, t01=0x002a}
0x0b38…0b42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x004e}
0x0b42…0b4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0058}
0x0b4c…0b72              Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTCHP CHANEL PARAMETER«, t00=0x0007, t01=0x0062}
0x0b72…0b8e              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0007, t01=0x0088}
0x0b8e…0bb0              Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTBC BYTE COUNTER «, t00=0x0007, t01=0x00a4}
0x0bb0…0bda              Head {h00=0x0026, h01=0x0022, text=» EXTRN DWTADR DRIVER ADDRESS BLOCK«, t00=0x0007, t01=0x00c6}
0x0bda…0bfc              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTA3 SAVE AREA A3 «, t00=0x0007, t01=0x00f0}
0x0bfc…0c1e              Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA4 SAVE AREA A4 «, t00=0x0007, t01=0x0112}
0x0c1e…0c40              Head {h00=0x001e, h01=0x0019, text=» EXTRN DWTA5 SAVE AREA A5 «, t00=0x0007, t01=0x0134}
0x0c40…0c6a              Head {h00=0x0026, h01=0x0021, text=» EXTRN DWTSB2 STACK BASE 2 IN DWT «, t00=0x0007, t01=0x0156}
0x0c6a…0c8c              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTP TIMER POINTER«, t00=0x0007, t01=0x0180}
0x0c8c…0cb0              Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTWAT SAVE INPUT DWT«, t00=0x0008, t01=0x0012}
0x0cb0…0cd8              Head {h00=0x0024, h01=0x0050, text=» EXTRN ECBBA ECB BUFFER ADDRESS «, t00=0x0008, t01=0x0036}
0x0cd8…0d02              Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBRL ECB REQUESTED LENGTH «, t00=0x0008, t01=0x005e}
0x0d02…0d2c              Head {h00=0x0026, h01=0x0050, text=» EXTRN ECBEL ECB EFFECTIVE LENGTH «, t00=0x0008, t01=0x0088}
0x0d2c…0d50              Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBRC ECB RETURN CODE«, t00=0x0008, t01=0x00b2}
0x0d50…0d76              Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBCW ECB CONTROL WORD «, t00=0x0008, t01=0x00d6}
0x0d76…0d84              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00fc}
0x0d84…0d8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x010a}
0x0d8e…0d98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0114}
0x0d98…0da2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011e}
0x0da2…0dba              Head {h00=0x0014, h01=0x0050, text=»*     CONSTANTS «, t00=0x0008, t01=0x0128}
0x0dba…0dc4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0140}
0x0dc4…0dce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x014a}
0x0dce…0dd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0154}
0x0dd8…0e06              Head {h00=0x002a, h01=0x0050, text=»OVMASK EQU /2 OVERFLOW IN INPUT BUFFER«, t00=0x0008, t01=0x015e}
0x0e06…0e10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x018c}
0x0e10…0e42              Head {h00=0x002e, h01=0x0050, text=»X:B EQU 80 LENGTH OF CIRCULAR INPUT BUFFER«, t00=0x0009, t01=0x0008}
0x0e42…0e78              Head {h00=0x0032, h01=0x0050, text=»DWTLNG EQU X:B NUMBER OF BYTES IN DECIMAL FORM«, t00=0x0009, t01=0x003a}
0x0e78…0e9a              Head {h00=0x001e, h01=0x0050, text=»ETX EQU /03 END CHARACTER «, t00=0x0009, t01=0x0070}
0x0e9a…0ea4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0092}
0x0ea4…0ec6              Head {h00=0x001e, h01=0x0050, text=»*    TIME BEFORE TIME-OUT «, t00=0x0009, t01=0x009c}
0x0ec6…0ed0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00be}
0x0ed0…0ef6              Head {h00=0x0022, h01=0x0050, text=»TIME EQU 300 TIME OUT CONSTANT«, t00=0x0009, t01=0x00c8}
0x0ef6…0f00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ee}
0x0f00…0f0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00f8}
0x0f0a…0f14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0102}
0x0f14…0f1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x010c}
0x0f1e…0f2c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0116}
0x0f2c…0f36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0124}
0x0f36…0f40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012e}
0x0f40…0f70              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x0009, t01=0x0138}
0x0f70…0fa0              Head {h00=0x002c, h01=0x0050, text=»*    CONDITIONAL ASSEMBLY              *«, t00=0x0009, t01=0x0168}
0x0fa0…0fd0              Head {h00=0x002c, h01=0x0050, text=»****************************************«, t00=0x000a, t01=0x0008}
0x0fd0…0fda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0038}
0x0fda…0fe4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0042}
0x0fe4…1026              Head {h00=0x003e, h01=0x0050, text=»*      BY SETTING X:A = 1 THE FOLOWING POWER OFF FUNCTION «, t00=0x000a, t01=0x004c}
0x1026…1050              Head {h00=0x0026, h01=0x0050, text=»*      IS INCLUDED IN THE DRIVER. «, t00=0x000a, t01=0x008e}
0x1050…1090              Head {h00=0x003c, h01=0x0050, text=»*      IF THERE IS A READ REQUEST THIS IS COMPLETED WITH«, t00=0x000a, t01=0x00b8}
0x1090…10be              Head {h00=0x002a, h01=0x0050, text=»*      -2 IN THE CONTROL WORD OF ECB. «, t00=0x000a, t01=0x00f8}
0x10be…1102              Head {h00=0x0040, h01=0x0050, text=»*      IF THERE IS NO READ REQUEST , THE FIRST READ REQUEST «, t00=0x000a, t01=0x0126}
0x1102…1144              Head {h00=0x003e, h01=0x0050, text=»*      AFTER POWER ON IS COMPLETED WITH -2 IN CONTROL WORD«, t00=0x000a, t01=0x016a}
0x1144…115a              Head {h00=0x0012, h01=0x0050, text=»*      OF ECB «, t00=0x000b, t01=0x001c}
0x115a…1164              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0032}
0x1164…116e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x003c}
0x116e…1180              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000b, t01=0x0046}
0x1180…1196              Head {h00=0x0012, h01=0x0050, text=»POWOFF EQU X:A«, t00=0x000b, t01=0x0058}
0x1196…11a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x006e}
0x11a0…11aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0078}
0x11aa…11dc              Head {h00=0x002e, h01=0x0050, text=»*    TIME OUT FUNCTION MAY BE EXCLUDED BY «, t00=0x000b, t01=0x0082}
0x11dc…11fa              Head {h00=0x001a, h01=0x0050, text=»*    SETTING X:A = 0. «, t00=0x000b, t01=0x00b4}
0x11fa…1204              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00d2}
0x1204…1216              Head {h00=0x000e, h01=0x0050, text=»X:F EQU 1 «, t00=0x000b, t01=0x00dc}
0x1216…122c              Head {h00=0x0012, h01=0x0050, text=»CTIMUT EQU X:F«, t00=0x000b, t01=0x00ee}
0x122c…1236              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0104}
0x1236…1240              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010e}
0x1240…127c              Head {h00=0x0038, h01=0x0050, text=»*   THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS «, t00=0x000b, t01=0x0118}
0x127c…129e              Head {h00=0x001e, h01=0x0050, text=»*   BY SETTING CREDIT = 1 «, t00=0x000b, t01=0x0154}
0x129e…12d2              Head {h00=0x0030, h01=0x0050, text=»*   ORDER /04 IS THEN REPLACED BY ORDER /31 «, t00=0x000b, t01=0x0176}
0x12d2…130e              Head {h00=0x0038, h01=0x0050, text=»*    CONTROL WORD OF ECB IS SET TO ZERO INSTEAD OF-2«, t00=0x000c, t01=0x001a}
0x130e…1342              Head {h00=0x0030, h01=0x0050, text=»*    ORDER /04 IS THEN REPLACED BY ORDER /31«, t00=0x000c, t01=0x0056}
0x1342…1356              Head {h00=0x0010, h01=0x0050, text=»CREDIT EQU 0«, t00=0x000c, t01=0x008a}
0x1356…1360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x009e}
0x1360…136a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00a8}
0x136a…1386              Head {h00=0x0018, h01=0x0050, text=»*   MMU BUFFER SIZE «, t00=0x000c, t01=0x00b2}
0x1386…1390              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00ce}
0x1390…13a2              Head {h00=0x000e, h01=0x0050, text=»X:C EQU 80«, t00=0x000c, t01=0x00d8}
0x13a2…13b8              Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:C«, t00=0x000c, t01=0x00ea}
0x13b8…13c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0100}
0x13c2…13cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x010a}
0x13cc…13ea              Head {h00=0x001a, h01=0x0050, text=»*   MMU KEY TABLE SIZE«, t00=0x000c, t01=0x0114}
0x13ea…13f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0132}
0x13f4…1406              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 10«, t00=0x000c, t01=0x013c}
0x1406…141c              Head {h00=0x0012, h01=0x0050, text=»DVBKTB EQU X:D«, t00=0x000c, t01=0x014e}
0x141c…1426              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0164}
0x1426…1430              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x016e}
0x1430…1462              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000c, t01=0x0178}
0x1462…1490              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000d, t01=0x001a}
0x1490…149a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0048}
0x149a…14ae              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x000d, t01=0x0052}
0x14ae…14b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0066}
0x14b8…14c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0070}
0x14c2…14fc              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x000d, t01=0x007a}
0x14fc…152e              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x000d, t01=0x00b4}
0x152e…1538              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00e6}
0x1538…154c              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x000d, t01=0x00f0}
0x154c…1556              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0104}
0x1556…1564              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x010e}
0x1564…156e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011c}
0x156e…1578              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0126}
0x1578…1596              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000d, t01=0x0130}
0x1596…15b4              Head {h00=0x001a, h01=0x0050, text=»* DWT DISPLACEMENTS * «, t00=0x000d, t01=0x014e}
0x15b4…15d2              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000d, t01=0x016c}
0x15d2…15dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x018a}
0x15dc…15e6 (14, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0004}
0x15e6…161a              Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x000e, t01=0x000e}
0x161a…1624              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0042}
0x1624…163a              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000e, t01=0x004c}
0x163a…1652              Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x000e, t01=0x0062}
0x1652…165e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x007a}
0x165e…1668              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0086}
0x1668…167e              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000e, t01=0x0090}
0x167e…1698              Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x000e, t01=0x00a6}
0x1698…16a4              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000e, t01=0x00c0}
0x16a4…16ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00cc}
0x16ae…16dc              Head {h00=0x002a, h01=0x0050, text=»DWTCON EQU START+/00 CONVERSION TABLE «, t00=0x000e, t01=0x00d6}
0x16dc…1708              Head {h00=0x0028, h01=0x0050, text=»DWTLRC EQU START+/16 LRC ACKUMULATOR«, t00=0x000e, t01=0x0104}
0x1708…1744              Head {h00=0x0038, h01=0x0050, text=»DWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE«, t00=0x000e, t01=0x0130}
0x1744…1780              Head {h00=0x0038, h01=0x0050, text=»DWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE «, t00=0x000e, t01=0x016c}
0x1780…17aa              Head {h00=0x0026, h01=0x0050, text=»DWTSQ EQU START+/1C START OF QUEUE«, t00=0x000f, t01=0x0018}
0x17aa…17d6              Head {h00=0x0028, h01=0x0050, text=»DWTEQ EQU DWTSQ+DWTLNG END OF QUEUE «, t00=0x000f, t01=0x0042}
0x17d6…17e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x006e}
0x17e0…17ee              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x0078}
0x17ee…17f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0086}
0x17f8…1802              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0090}
0x1802…1818              Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000f, t01=0x009a}
0x1818…182e              Head {h00=0x0012, h01=0x0050, text=»* TABLES     *«, t00=0x000f, t01=0x00b0}
0x182e…1844              Head {h00=0x0012, h01=0x0050, text=»**************«, t00=0x000f, t01=0x00c6}
0x1844…184e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00dc}
0x184e…1858              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00e6}
0x1858…1880              Head {h00=0x0024, h01=0x0050, text=» DATA DVBKTB MMU KEY TABLE SIZE «, t00=0x000f, t01=0x00f0}
0x1880…18a4              Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x000f, t01=0x0118}
0x18a4…18c0              Head {h00=0x0018, h01=0x0050, text=» DATA 6 DEVICE INDEX«, t00=0x000f, t01=0x013c}
0x18c0…18d2              Head {h00=0x000e, h01=0x0050, text=»ODAD EQU *«, t00=0x000f, t01=0x0158}
0x18d2…18f6              Head {h00=0x0020, h01=0x0050, text=» DATA ACOD ACTIVATION DRIVER«, t00=0x000f, t01=0x016a}
0x18f6…191c              Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000f, t01=0x018e}
0x191c…1940              Head {h00=0x0020, h01=0x0050, text=» DATA IHOD INTERRUPT HANDLER«, t00=0x0010, t01=0x0024}
0x1940…194a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0048}
0x194a…1960              Head {h00=0x0012, h01=0x0050, text=» IFF POWOFF=1 «, t00=0x0010, t01=0x0052}
0x1960…197c              Head {h00=0x0018, h01=0x0050, text=» DATA 0 NO RECOVERY «, t00=0x0010, t01=0x0068}
0x197c…1988              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0010, t01=0x0084}
0x1988…1992              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0090}
0x1992…19a8              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0010, t01=0x009a}
0x19a8…19b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b0}
0x19b2…19d6              Head {h00=0x0020, h01=0x0050, text=» DATA RCOD RECOVERY ROUTINE «, t00=0x0010, t01=0x00ba}
0x19d6…19e4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x00de}
0x19e4…19ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ec}
0x19ee…19f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00f6}
0x19f8…1a0c              Head {h00=0x0010, h01=0x0050, text=»*    R C O D«, t00=0x0010, t01=0x0100}
0x1a0c…1a16              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0114}
0x1a16…1a48              Head {h00=0x002e, h01=0x0050, text=»*    THIS IS THE RECOVERY ROUTINE FOR OCR «, t00=0x0010, t01=0x011e}
0x1a48…1a72              Head {h00=0x0026, h01=0x0050, text=»*    ENTERED FROM CHLT/CHRT DRIVER«, t00=0x0010, t01=0x0150}
0x1a72…1a7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x017a}
0x1a7c…1a8e              Head {h00=0x000e, h01=0x0050, text=»RCOD EQU *«, t00=0x0010, t01=0x0184}
0x1a8e…1a9a              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0011, t01=0x0008}
0x1a9a…1ab0              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=1 «, t00=0x0011, t01=0x0014}
0x1ab0…1ad0              Head {h00=0x001c, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8«, t00=0x0011, t01=0x002a}
0x1ad0…1adc              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x004a}
0x1adc…1ae6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0056}
0x1ae6…1afc              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0011, t01=0x0060}
0x1afc…1b12              Head {h00=0x0012, h01=0x0050, text=» IFT CPU852=0 «, t00=0x0011, t01=0x0076}
0x1b12…1b30              Head {h00=0x001a, h01=0x0050, text=» MSR 8,A15 SAVE A1-A8 «, t00=0x0011, t01=0x008c}
0x1b30…1b3c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x00aa}
0x1b3c…1b46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00b6}
0x1b46…1b5c              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0011, t01=0x00c0}
0x1b5c…1b72              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/200 «, t00=0x0011, t01=0x00d6}
0x1b72…1ba6              Head {h00=0x0030, h01=0x0050, text=» ORS A1,DWTST,A6 INDICATE POWER OFF OCCURED «, t00=0x0011, t01=0x00ec}
0x1ba6…1bca              Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O-REQUEST «, t00=0x0011, t01=0x0120}
0x1bca…1be2              Head {h00=0x0014, h01=0x0050, text=» RF(N) RCOD05 NO«, t00=0x0011, t01=0x0144}
0x1be2…1c06              Head {h00=0x0020, h01=0x0050, text=» LD A4,DWTTP,A6 TIME EQUAL 0«, t00=0x0011, t01=0x015c}
0x1c06…1c20              Head {h00=0x0016, h01=0x0050, text=» RF(Z) RCOD05 YES «, t00=0x0011, t01=0x0180}
0x1c20…1c40              Head {h00=0x001c, h01=0x0050, text=» CM* DWTTP,A6 RESET TIME«, t00=0x0012, t01=0x000a}
0x1c40…1c60              Head {h00=0x001c, h01=0x0050, text=» CM DWTTP,A6 RESET TIMER«, t00=0x0012, t01=0x002a}
0x1c60…1c74              Head {h00=0x0010, h01=0x0050, text=»RCOD05 EQU *«, t00=0x0012, t01=0x004a}
0x1c74…1c86              Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0012, t01=0x005e}
0x1c86…1cac              Head {h00=0x0022, h01=0x0050, text=» ORS A1,DWTST,A6 RECOVERY FLAG«, t00=0x0012, t01=0x0070}
0x1cac…1cc0              Head {h00=0x0010, h01=0x0050, text=»RCOD10 EQU *«, t00=0x0012, t01=0x0096}
0x1cc0…1cd6              Head {h00=0x0012, h01=0x0050, text=» LDKL A4,DWTTP«, t00=0x0012, t01=0x00aa}
0x1cd6…1ce8              Head {h00=0x000e, h01=0x0050, text=» ADR A4,A6«, t00=0x0012, t01=0x00c0}
0x1ce8…1cfa              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0012, t01=0x00d2}
0x1cfa…1d10              Head {h00=0x0012, h01=0x0050, text=» CF A15,SETIMP«, t00=0x0012, t01=0x00e4}
0x1d10…1d26              Head {h00=0x0012, h01=0x0050, text=» DATA RCTUT,/A«, t00=0x0012, t01=0x00fa}
0x1d26…1d3e              Head {h00=0x0014, h01=0x0050, text=» ST A4,DWTTP,A6 «, t00=0x0012, t01=0x0110}
0x1d3e…1d5a              Head {h00=0x0018, h01=0x0050, text=» RF RCTDIS DISPATCH «, t00=0x0012, t01=0x0128}
0x1d5a…1d6e              Head {h00=0x0010, h01=0x0050, text=»RCTUT EQU * «, t00=0x0012, t01=0x0144}
0x1d6e…1d7a              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0012, t01=0x0158}
0x1d7a…1d90              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0012, t01=0x0164}
0x1d90…1da2              Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x0012, t01=0x017a}
0x1da2…1db6              Head {h00=0x0010, h01=0x0050, text=»RCTUT5 EQU *«, t00=0x0012, t01=0x018c}
0x1db6…1dca              Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0013, t01=0x0010}
0x1dca…1de4              Head {h00=0x0016, h01=0x0050, text=»   GET DWT-ADDRESS«, t00=0x0013, t01=0x0024}
0x1de4…1e08              Head {h00=0x0020, h01=0x0050, text=» LD A8,4,A6 GET ECB-ADDRESS «, t00=0x0013, t01=0x003e}
0x1e08…1e36              Head {h00=0x002a, h01=0x0050, text=» RF(Z) RCTUT6 SYSTEM START SKIP BUFFER«, t00=0x0013, t01=0x0062}
0x1e36…1e42              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0013, t01=0x0090}
0x1e42…1e4e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x009c}
0x1e4e…1e6c              Head {h00=0x001a, h01=0x0050, text=» IFT CREDIT-POWOFF=-1 «, t00=0x0013, t01=0x00a8}
0x1e6c…1e92              Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-2 INDICATE POWER ON «, t00=0x0013, t01=0x00c6}
0x1e92…1eaa              Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x0013, t01=0x00ec}
0x1eaa…1eb6              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0104}
0x1eb6…1ed2              Head {h00=0x0018, h01=0x0050, text=» IFT CREDIT+POWOFF=2«, t00=0x0013, t01=0x0110}
0x1ed2…1ef6              Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER ON «, t00=0x0013, t01=0x012c}
0x1ef6…1f02              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0013, t01=0x0150}
0x1f02…1f18              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0013, t01=0x015c}
0x1f18…1f2c              Head {h00=0x0010, h01=0x0050, text=»RCTUT6 EQU *«, t00=0x0013, t01=0x0172}
0x1f2c…1f38              Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0013, t01=0x0186}
0x1f38…1f44 (20, 0, 400) Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0014, t01=0x0004}
0x1f44…1f6a              Head {h00=0x0022, h01=0x0050, text=» LDKL A1,/FFFE RESET RECOVERY «, t00=0x0014, t01=0x0010}
0x1f6a…1f82              Head {h00=0x0014, h01=0x0050, text=» ANS A1,DWTST,A6«, t00=0x0014, t01=0x0036}
0x1f82…1f94              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0014, t01=0x004e}
0x1f94…1fac              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTINQ,A6«, t00=0x0014, t01=0x0060}
0x1fac…1fbe              Head {h00=0x000e, h01=0x0050, text=» SCR A1,A2«, t00=0x0014, t01=0x0078}
0x1fbe…1fd6              Head {h00=0x0014, h01=0x0050, text=» ST A2,DWTUTQ,A6«, t00=0x0014, t01=0x008a}
0x1fd6…1fee              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTST,A6 «, t00=0x0014, t01=0x00a2}
0x1fee…2004              Head {h00=0x0012, h01=0x0050, text=» RF(NN) RCEND «, t00=0x0014, t01=0x00ba}
0x2004…2018              Head {h00=0x0010, h01=0x0050, text=»RCTDIS EQU *«, t00=0x0014, t01=0x00d0}
0x2018…202a              Head {h00=0x000e, h01=0x0050, text=» ABL TDISP«, t00=0x0014, t01=0x00e4}
0x202a…203e              Head {h00=0x0010, h01=0x0050, text=»RCEND EQU * «, t00=0x0014, t01=0x00f6}
0x203e…2054              Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/FDFF«, t00=0x0014, t01=0x010a}
0x2054…207c              Head {h00=0x0024, h01=0x0050, text=» ANS A4,DWTST,A6 RESET POWER OFF«, t00=0x0014, t01=0x0120}
0x207c…2090              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0014, t01=0x0148}
0x2090…209c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0014, t01=0x015c}
0x209c…20a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0168}
0x20a6…20b4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0172}
0x20b4…20be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0180}
0x20be…20c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x018a}
0x20c8…20dc (21, 0, 400) Head {h00=0x0010, h01=0x0050, text=»*    A C O D«, t00=0x0015, t01=0x0004}
0x20dc…20e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0018}
0x20e6…2104              Head {h00=0x001a, h01=0x0050, text=»*    ACTIVATION PART: «, t00=0x0015, t01=0x0022}
0x2104…210e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0040}
0x210e…2142              Head {h00=0x0030, h01=0x0050, text=»*    CHECKS VALIDITY OF ORDERS AND EXAMINES «, t00=0x0015, t01=0x004a}
0x2142…2172              Head {h00=0x002c, h01=0x0050, text=»*    INPUT BUFFER TO SEE IF SOME QUEUED «, t00=0x0015, t01=0x007e}
0x2172…218a              Head {h00=0x0014, h01=0x0050, text=»*    TO THREAT. «, t00=0x0015, t01=0x00ae}
0x218a…2194              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00c6}
0x2194…219e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00d0}
0x219e…21b0              Head {h00=0x000e, h01=0x0050, text=»ACOD EQU *«, t00=0x0015, t01=0x00da}
0x21b0…21c2              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0015, t01=0x00ec}
0x21c2…21e6              Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0015, t01=0x00fe}
0x21e6…2214              Head {h00=0x002a, h01=0x0050, text=» ST A3,DWTLRC,A6 CLEAR LRC-ACKUMULATOR«, t00=0x0015, t01=0x0122}
0x2214…2226              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x0015, t01=0x0150}
0x2226…222e              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0162}
0x222e…2240              Head {h00=0x000e, h01=0x0050, text=» SUK A4,4 «, t00=0x0015, t01=0x016a}
0x2240…2248              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x017c}
0x2248…225e              Head {h00=0x0012, h01=0x0050, text=» IFT CREDIT=1 «, t00=0x0015, t01=0x0184}
0x225e…2272              Head {h00=0x0010, h01=0x0050, text=» SUK A4,/2D «, t00=0x0016, t01=0x000a}
0x2272…229a              Head {h00=0x0024, h01=0x0050, text=» RF(Z) CRE:10 SKIP INPUT BUFFER «, t00=0x0016, t01=0x001e}
0x229a…22ae              Head {h00=0x0010, h01=0x0050, text=» ADK A4,/2D «, t00=0x0016, t01=0x0046}
0x22ae…22c2              Head {h00=0x0010, h01=0x0050, text=»CRE:10 EQU *«, t00=0x0016, t01=0x005a}
0x22c2…22ce              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0016, t01=0x006e}
0x22ce…22ec              Head {h00=0x001a, h01=0x0050, text=» RF(Z) AOD110 ORDER 4 «, t00=0x0016, t01=0x007a}
0x22ec…230a              Head {h00=0x001a, h01=0x0050, text=» RF(N) AOD200 ORDER 2 «, t00=0x0016, t01=0x0098}
0x230a…2338              Head {h00=0x002a, h01=0x0050, text=»AOD100 ORKL A1,/8000 I/O REQUEST ERROR«, t00=0x0016, t01=0x00b6}
0x2338…234c              Head {h00=0x0010, h01=0x0050, text=»AOD105 EQU *«, t00=0x0016, t01=0x00e4}
0x234c…2360              Head {h00=0x0010, h01=0x0050, text=» ABL ENDI10 «, t00=0x0016, t01=0x00f8}
0x2360…236e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0016, t01=0x010c}
0x236e…2378              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x011a}
0x2378…2382              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0124}
0x2382…23aa              Head {h00=0x0024, h01=0x0050, text=»*    ORDER 4 RESET INPUT BUFFER «, t00=0x0016, t01=0x012e}
0x23aa…23b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0156}
0x23b4…23da              Head {h00=0x0022, h01=0x0050, text=»AOD110 LD A2,DWTINQ,A6 ORDER 4«, t00=0x0016, t01=0x0160}
0x23da…2406              Head {h00=0x0028, h01=0x0050, text=» SCR A1,A2 RESET OVERFLOW IF OCCURED«, t00=0x0016, t01=0x0186}
0x2406…2432              Head {h00=0x0028, h01=0x0050, text=» ST A2,DWTUTQ,A6 RESET OUTPUT QUEUE «, t00=0x0017, t01=0x0022}
0x2432…244c              Head {h00=0x0016, h01=0x0050, text=» ABL ENDIO END I/O«, t00=0x0017, t01=0x004e}
0x244c…245a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0068}
0x245a…2464              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0076}
0x2464…246e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0080}
0x246e…2478              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x008a}
0x2478…2482              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0094}
0x2482…2496              Head {h00=0x0010, h01=0x0050, text=»AOD200 EQU *«, t00=0x0017, t01=0x009e}
0x2496…24a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00b2}
0x24a0…24b6              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0017, t01=0x00bc}
0x24b6…24c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d2}
0x24c0…24d8              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0017, t01=0x00dc}
0x24d8…24fa              Head {h00=0x001e, h01=0x0050, text=» ANKL A2,/200 POWER OFF ? «, t00=0x0017, t01=0x00f4}
0x24fa…2510              Head {h00=0x0012, h01=0x0050, text=» RF(E) AOD205 «, t00=0x0017, t01=0x0116}
0x2510…2532              Head {h00=0x001e, h01=0x0050, text=» XRS A2,DWTST,A6 RESET BIT«, t00=0x0017, t01=0x012c}
0x2532…253e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0017, t01=0x014e}
0x253e…2552              Head {h00=0x0010, h01=0x0050, text=»AOD202 EQU *«, t00=0x0017, t01=0x015a}
0x2552…2570              Head {h00=0x001a, h01=0x0050, text=» IFT CREDIT-POWOFF=-1 «, t00=0x0017, t01=0x016e}
0x2570…2596              Head {h00=0x0022, h01=0x0050, text=» LDKL A1,-2 INDICATE POWER ON «, t00=0x0017, t01=0x018c}
0x2596…25ae              Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x0018, t01=0x0022}
0x25ae…25ba              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x003a}
0x25ba…25d6              Head {h00=0x0018, h01=0x0050, text=» IFT CREDIT+POWOFF=2«, t00=0x0018, t01=0x0046}
0x25d6…25fa              Head {h00=0x0020, h01=0x0050, text=» CM 10,A8 INDICATE POWER ON «, t00=0x0018, t01=0x0062}
0x25fa…2606              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x0086}
0x2606…261c              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0018, t01=0x0092}
0x261c…2630              Head {h00=0x0010, h01=0x0050, text=» ABL AOD380 «, t00=0x0018, t01=0x00a8}
0x2630…263a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00bc}
0x263a…2646              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00c6}
0x2646…2650              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00d2}
0x2650…2664              Head {h00=0x0010, h01=0x0050, text=»AOD205 EQU *«, t00=0x0018, t01=0x00dc}
0x2664…266e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00f0}
0x266e…2684              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0018, t01=0x00fa}
0x2684…268e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0110}
0x268e…26a2              Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A6 «, t00=0x0018, t01=0x011a}
0x26a2…26be              Head {h00=0x0018, h01=0x0050, text=» ANK A1,/40 TIMING ?«, t00=0x0018, t01=0x012e}
0x26be…26ee              Head {h00=0x002c, h01=0x0050, text=» RF(E) AOD210 NO TIMING FOR THIS DEVICE «, t00=0x0018, t01=0x014a}
0x26ee…2706              Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0018, t01=0x017a}
0x2706…271c (25, 0, 400) Head {h00=0x0012, h01=0x0050, text=» RF(E) AODTIM «, t00=0x0019, t01=0x0004}
0x271c…272e              Head {h00=0x000e, h01=0x0050, text=» RF AOD210«, t00=0x0019, t01=0x001a}
0x272e…2742              Head {h00=0x0010, h01=0x0050, text=»AODTIM EQU *«, t00=0x0019, t01=0x002c}
0x2742…2766              Head {h00=0x0020, h01=0x0050, text=» LDKL A4,DWTTP TIMER POINTER«, t00=0x0019, t01=0x0040}
0x2766…2788              Head {h00=0x001e, h01=0x0050, text=» ADR A4,A6 ADD DWT-ADDRESS«, t00=0x0019, t01=0x0064}
0x2788…279a              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x0019, t01=0x0086}
0x279a…27ba              Head {h00=0x001c, h01=0x0050, text=» CF A15,SETIMP SET TIME «, t00=0x0019, t01=0x0098}
0x27ba…27ee              Head {h00=0x0030, h01=0x0050, text=» DATA AODTUT,TIME TIME OUT ROUTINE AND TIME «, t00=0x0019, t01=0x00b8}
0x27ee…2820              Head {h00=0x002e, h01=0x0050, text=» ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT«, t00=0x0019, t01=0x00ec}
0x2820…282a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x011e}
0x282a…2836              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0019, t01=0x0128}
0x2836…2840              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0134}
0x2840…284e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x013e}
0x284e…2858              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x014c}
0x2858…2862              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0156}
0x2862…2876              Head {h00=0x0010, h01=0x0050, text=»AOD210 EQU *«, t00=0x0019, t01=0x0160}
0x2876…28a0              Head {h00=0x0026, h01=0x0050, text=» LD A2,ECBRL,A8 REQUESTED LENGTH=0«, t00=0x0019, t01=0x0174}
0x28a0…28bc              Head {h00=0x0018, h01=0x0050, text=»AOD220 RF(E) AOD380 «, t00=0x001a, t01=0x000e}
0x28bc…28e2              Head {h00=0x0022, h01=0x0050, text=»       LDR A3,A3 FIRTST RIME? «, t00=0x001a, t01=0x002a}
0x28e2…28fc              Head {h00=0x0016, h01=0x0050, text=» RF(NE) AOD240 N0!«, t00=0x001a, t01=0x0050}
0x28fc…2922              Head {h00=0x0022, h01=0x0050, text=» LD A1,ECBBA,A8 BUFFER ADDRESS«, t00=0x001a, t01=0x006a}
0x2922…2934              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001a, t01=0x0090}
0x2934…2946              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x001a, t01=0x00a2}
0x2946…2970              Head {h00=0x0026, h01=0x0050, text=»AOD230 SCR A3,A1 CLEAR ECB BUFFER «, t00=0x001a, t01=0x00b4}
0x2970…2982              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001a, t01=0x00de}
0x2982…2994              Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x001a, t01=0x00f0}
0x2994…29aa              Head {h00=0x0012, h01=0x0050, text=» RB(NE) AOD230«, t00=0x001a, t01=0x0102}
0x29aa…29be              Head {h00=0x0010, h01=0x0050, text=»AOD240 EQU *«, t00=0x001a, t01=0x0118}
0x29be…29d6              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTUTQ,A6«, t00=0x001a, t01=0x012c}
0x29d6…29e8              Head {h00=0x000e, h01=0x0050, text=» LCR A2,A1«, t00=0x001a, t01=0x0144}
0x29e8…2a00              Head {h00=0x0014, h01=0x0050, text=»       LDR A4,A2«, t00=0x001a, t01=0x0156}
0x2a00…2a1e              Head {h00=0x001a, h01=0x0050, text=» XRK A4,/FF OVERFLOW? «, t00=0x001a, t01=0x016e}
0x2a1e…2a38              Head {h00=0x0016, h01=0x0050, text=» RF(NE) AOD250 N0!«, t00=0x001a, t01=0x018c}
0x2a38…2a56              Head {h00=0x001a, h01=0x0050, text=»       SCR A4,A1 YES! «, t00=0x001b, t01=0x0016}
0x2a56…2a7a              Head {h00=0x0020, h01=0x0050, text=» LDK A1,OVMASK OVERFLOW SET «, t00=0x001b, t01=0x0034}
0x2a7a…2a94              Head {h00=0x0016, h01=0x0050, text=» RF ENDIO END I/O «, t00=0x001b, t01=0x0058}
0x2a94…2ac6              Head {h00=0x002e, h01=0x0050, text=»AOD250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE?«, t00=0x001b, t01=0x0072}
0x2ac6…2ade              Head {h00=0x0014, h01=0x0050, text=» RF(NE) AOD260  «, t00=0x001b, t01=0x00a4}
0x2ade…2b04              Head {h00=0x0022, h01=0x0050, text=» CF A5,STREG NOTHING IN QUEUE «, t00=0x001b, t01=0x00bc}
0x2b04…2b1a              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x001b, t01=0x00e2}
0x2b1a…2b48              Head {h00=0x002a, h01=0x0050, text=» LDR A1,A1 CHECK TIME OUT RETURN CODE «, t00=0x001b, t01=0x00f8}
0x2b48…2b6a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) AOD270 NO TIME-OUT «, t00=0x001b, t01=0x0126}
0x2b6a…2b90              Head {h00=0x0022, h01=0x0050, text=» RF ENDI05 END I/O AT TIME OUT«, t00=0x001b, t01=0x0148}
0x2b90…2b9c              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001b, t01=0x016e}
0x2b9c…2bb2              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=0 «, t00=0x001b, t01=0x017a}
0x2bb2…2bc4              Head {h00=0x000e, h01=0x0050, text=» RF AOD270«, t00=0x001b, t01=0x0190}
0x2bc4…2bd0              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x001c, t01=0x0012}
0x2bd0…2bfe              Head {h00=0x002a, h01=0x0050, text=»AOD260 CF A15,EOQUEU NEXT OUT POINTER «, t00=0x001c, t01=0x001e}
0x2bfe…2c28              Head {h00=0x0026, h01=0x0050, text=» ST A1,DWTUTQ,A6 STORE NEW POINTER«, t00=0x001c, t01=0x004c}
0x2c28…2c3c              Head {h00=0x0010, h01=0x0050, text=»AOD270 EQU *«, t00=0x001c, t01=0x0076}
0x2c3c…2c4e              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A7«, t00=0x001c, t01=0x008a}
0x2c4e…2c60              Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x001c, t01=0x009c}
0x2c60…2c7e              Head {h00=0x001a, h01=0x0050, text=» RF(NN) AOD310 ORDER 2«, t00=0x001c, t01=0x00ae}
0x2c7e…2ca2              Head {h00=0x0020, h01=0x0050, text=» RB AOD100 I/O REQUEST ERROR«, t00=0x001c, t01=0x00cc}
0x2ca2…2cb0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001c, t01=0x00f0}
0x2cb0…2cba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x00fe}
0x2cba…2cc4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0108}
0x2cc4…2cce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0112}
0x2cce…2cf2              Head {h00=0x0020, h01=0x0050, text=»*    ORDER 2  READ DOCUMENT «, t00=0x001c, t01=0x011c}
0x2cf2…2cfc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0140}
0x2cfc…2d06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x014a}
0x2d06…2d10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0154}
0x2d10…2d1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x015e}
0x2d1a…2d24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0168}
0x2d24…2d38              Head {h00=0x0010, h01=0x0050, text=»AOD310 EQU *«, t00=0x001c, t01=0x0172}
0x2d38…2d5a              Head {h00=0x001e, h01=0x0050, text=» LDR A3,A3 FIRST CHARACTER«, t00=0x001c, t01=0x0186}
0x2d5a…2d80              Head {h00=0x0022, h01=0x0050, text=» RF(N) AOD400 NO:LRC-CHARACTER«, t00=0x001d, t01=0x0018}
0x2d80…2d94              Head {h00=0x0010, h01=0x0050, text=»AOD320 EQU *«, t00=0x001d, t01=0x003e}
0x2d94…2da8              Head {h00=0x0010, h01=0x0050, text=» LDK A4,/40 «, t00=0x001d, t01=0x0052}
0x2da8…2dd0              Head {h00=0x0024, h01=0x0050, text=» TM A4,A2 CHECK IF END CHARACTER«, t00=0x001d, t01=0x0066}
0x2dd0…2de8              Head {h00=0x0014, h01=0x0050, text=» RF(Z) AOD330 NO«, t00=0x001d, t01=0x008e}
0x2de8…2e1e              Head {h00=0x0032, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH IN ECB «, t00=0x001d, t01=0x00a6}
0x2e1e…2e40              Head {h00=0x001e, h01=0x0050, text=» NGR A3,A3 NEGATE REGISTER«, t00=0x001d, t01=0x00dc}
0x2e40…2e52              Head {h00=0x000e, h01=0x0050, text=» RF AOD340«, t00=0x001d, t01=0x00fe}
0x2e52…2e66              Head {h00=0x0010, h01=0x0050, text=»AOD330 EQU *«, t00=0x001d, t01=0x0110}
0x2e66…2e8c              Head {h00=0x0022, h01=0x0050, text=» CWK A2,/3F REJECTED CHARACTER«, t00=0x001d, t01=0x0124}
0x2e8c…2ea6              Head {h00=0x0016, h01=0x0050, text=» RF(NE) AOD331 NO «, t00=0x001d, t01=0x014a}
0x2ea6…2ed8              Head {h00=0x002e, h01=0x0050, text=» LDKL A1,/1000 INDICATE REJECTED CHARACTER«, t00=0x001d, t01=0x0164}
0x2ed8…2f0a              Head {h00=0x002e, h01=0x0050, text=» ORS A1,ECBRC,A8 STORE IN ECB-RETURN CODE «, t00=0x001e, t01=0x0008}
0x2f0a…2f1e              Head {h00=0x0010, h01=0x0050, text=»AOD331 EQU *«, t00=0x001e, t01=0x003a}
0x2f1e…2f44              Head {h00=0x0022, h01=0x0050, text=» CWK A2,/21 DIRECTION REJECTED«, t00=0x001e, t01=0x004e}
0x2f44…2f5e              Head {h00=0x0016, h01=0x0050, text=» RF(NE) AOD332 NO «, t00=0x001e, t01=0x0074}
0x2f5e…2f8a              Head {h00=0x0028, h01=0x0050, text=» LDK A1,/10 INDICATE DIRECTION ERROR«, t00=0x001e, t01=0x008e}
0x2f8a…2f9c              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x001e, t01=0x00ba}
0x2f9c…2fb0              Head {h00=0x0010, h01=0x0050, text=»AOD332 EQU *«, t00=0x001e, t01=0x00cc}
0x2fb0…2fd8              Head {h00=0x0024, h01=0x0050, text=» CWK A2,/1C QUADRATURE REJECTED?«, t00=0x001e, t01=0x00e0}
0x2fd8…2ff2              Head {h00=0x0016, h01=0x0050, text=» RF(NE) AOD333 NO «, t00=0x001e, t01=0x0108}
0x2ff2…3022              Head {h00=0x002c, h01=0x0050, text=» LDKL A1,/800 INDICATE QUADRATURE ERROR «, t00=0x001e, t01=0x0122}
0x3022…3034              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x001e, t01=0x0152}
0x3034…3048              Head {h00=0x0010, h01=0x0050, text=»AOD333 EQU *«, t00=0x001e, t01=0x0164}
0x3048…3076              Head {h00=0x002a, h01=0x0050, text=» CW A3,ECBRL,A8 REQ.LENGTH=EFF.LENGTH «, t00=0x001e, t01=0x0178}
0x3076…3090              Head {h00=0x0016, h01=0x0050, text=» RF(NL) AOD360 YES«, t00=0x001f, t01=0x0016}
0x3090…30ba              Head {h00=0x0026, h01=0x0050, text=» LD A1,ECBCW,A8 KEY TABLE ADDRESS «, t00=0x001f, t01=0x0030}
0x30ba…30dc              Head {h00=0x001e, h01=0x0050, text=» RF(Z) AOD340 NO KEYTABLE «, t00=0x001f, t01=0x005a}
0x30dc…3102              Head {h00=0x0022, h01=0x0050, text=» LCR A4,A1 TABLE LENGTH IN A4 «, t00=0x001f, t01=0x007c}
0x3102…3116              Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x001f, t01=0x00a2}
0x3116…3140              Head {h00=0x0026, h01=0x0050, text=» ADR A1,A4 LAST PLACE IN KEY TABLE«, t00=0x001f, t01=0x00b6}
0x3140…3152              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x001f, t01=0x00e0}
0x3152…3166              Head {h00=0x0010, h01=0x0050, text=»AOD335 EQU *«, t00=0x001f, t01=0x00f2}
0x3166…3178              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x001f, t01=0x0106}
0x3178…319c              Head {h00=0x0020, h01=0x0050, text=» RF(N) AOD340 KEY NOT FOUND «, t00=0x001f, t01=0x0118}
0x319c…31b6              Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x001f, t01=0x013c}
0x31b6…31d0              Head {h00=0x0016, h01=0x0050, text=» CCR A2,A1 FOUND? «, t00=0x001f, t01=0x0156}
0x31d0…31e6              Head {h00=0x0012, h01=0x0050, text=» RB(NE) AOD335«, t00=0x001f, t01=0x0170}
0x31e6…3216              Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTLRC,A6 UPDATE LRC ACKUMULATOR«, t00=0x001f, t01=0x0186}
0x3216…3228              Head {h00=0x000e, h01=0x0050, text=» RB AOD240«, t00=0x0020, t01=0x0026}
0x3228…323c              Head {h00=0x0010, h01=0x0050, text=»AOD340 EQU *«, t00=0x0020, t01=0x0038}
0x323c…326c              Head {h00=0x002c, h01=0x0050, text=» XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR«, t00=0x0020, t01=0x004c}
0x326c…32a2              Head {h00=0x0032, h01=0x0050, text=» CF A15,CDCHK CODE CHECK IF LESS /1F SET BIT 7«, t00=0x0020, t01=0x007c}
0x32a2…32b4              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0020, t01=0x00b2}
0x32b4…32ca              Head {h00=0x0012, h01=0x0050, text=» RF(N) AOD345 «, t00=0x0020, t01=0x00c4}
0x32ca…32f4              Head {h00=0x0026, h01=0x0050, text=» CF A15,STORE STORE IN ECB-BUFFER «, t00=0x0020, t01=0x00da}
0x32f4…3308              Head {h00=0x0010, h01=0x0050, text=»AOD345 EQU *«, t00=0x0020, t01=0x0104}
0x3308…331a              Head {h00=0x000e, h01=0x0050, text=» RB AOD240«, t00=0x0020, t01=0x0118}
0x331a…332e              Head {h00=0x0010, h01=0x0050, text=»AOD400 EQU *«, t00=0x0020, t01=0x012a}
0x332e…3350              Head {h00=0x001e, h01=0x0050, text=» ANK A2,/3F DELETE LRC-BIT«, t00=0x0020, t01=0x013e}
0x3350…3376              Head {h00=0x0022, h01=0x0050, text=» XR A2,DWTLRC,A6 CHECK LRC-SUM«, t00=0x0020, t01=0x0160}
0x3376…3388              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0020, t01=0x0186}
0x3388…33b0              Head {h00=0x0024, h01=0x0050, text=» RF(E) AOD380 CORRECT   END I/O «, t00=0x0021, t01=0x0008}
0x33b0…33d6              Head {h00=0x0022, h01=0x0050, text=» LDK A1,4 INDICATE LRC RERROR «, t00=0x0021, t01=0x0030}
0x33d6…33e8              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0021, t01=0x0056}
0x33e8…33fc              Head {h00=0x0010, h01=0x0050, text=»AOD360 EQU *«, t00=0x0021, t01=0x0068}
0x33fc…341c              Head {h00=0x001c, h01=0x0050, text=» CF A15,CDCHK CODE CHECK«, t00=0x0021, t01=0x007c}
0x341c…343e              Head {h00=0x001e, h01=0x0050, text=» LDK A1,8 LENGTH OVERFLOW «, t00=0x0021, t01=0x009c}
0x343e…3450              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0021, t01=0x00be}
0x3450…3474              Head {h00=0x0020, h01=0x0050, text=»AOD380 LDK A1,0 RETURN CODE «, t00=0x0021, t01=0x00d0}
0x3474…3482              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x00f4}
0x3482…348c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0102}
0x348c…3496              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x010c}
0x3496…34c6              Head {h00=0x002c, h01=0x0050, text=»*    THIS IS A COMMON END OF THE DRIVER «, t00=0x0021, t01=0x0116}
0x34c6…34d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0146}
0x34d0…3506              Head {h00=0x0032, h01=0x0050, text=»*    SET EFFECTIVE LENGTH AND PERFORM END I/O «, t00=0x0021, t01=0x0150}
0x3506…3510              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0186}
0x3510…351a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0190}
0x351a…352e              Head {h00=0x0010, h01=0x0050, text=»ENDIO EQU * «, t00=0x0022, t01=0x000a}
0x352e…3544              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0022, t01=0x001e}
0x3544…3550              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0022, t01=0x0034}
0x3550…3568              Head {h00=0x0014, h01=0x0050, text=» LD A4,DWTTP,A6 «, t00=0x0022, t01=0x0040}
0x3568…3596              Head {h00=0x002a, h01=0x0050, text=» RF(E) ENDI05 NO TIMING ON THIS DEVICE«, t00=0x0022, t01=0x0058}
0x3596…35b8              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x0022, t01=0x0086}
0x35b8…35cc              Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0022, t01=0x00a8}
0x35cc…35d8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0022, t01=0x00bc}
0x35d8…35e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00c8}
0x35e2…35ee              Head {h00=0x0008, h01=0x0050, text=»*** «, t00=0x0022, t01=0x00d2}
0x35ee…35f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00de}
0x35f8…360c              Head {h00=0x0010, h01=0x0050, text=»ENDI05 EQU *«, t00=0x0022, t01=0x00e8}
0x360c…361e              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0022, t01=0x00fc}
0x361e…3634              Head {h00=0x0012, h01=0x0050, text=» RF(N) ENDI10 «, t00=0x0022, t01=0x010e}
0x3634…3662              Head {h00=0x002a, h01=0x0050, text=» ST A3,ECBEL,A8 STORE EFFECTIVE LENGTH«, t00=0x0022, t01=0x0124}
0x3662…3676              Head {h00=0x0010, h01=0x0050, text=»ENDI10 EQU *«, t00=0x0022, t01=0x0152}
0x3676…3680              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0166}
0x3680…3694              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0022, t01=0x0170}
0x3694…369e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0184}
0x369e…36ac              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x018e}
0x36ac…36b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x000c}
0x36b6…36c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0016}
0x36c0…36ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0020}
0x36ca…36dc              Head {h00=0x000e, h01=0x0050, text=»*     IHOD«, t00=0x0023, t01=0x002a}
0x36dc…36e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x003c}
0x36e6…36f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x0046}
0x36f0…373a              Head {h00=0x0046, h01=0x0050, text=»*     THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER «, t00=0x0023, t01=0x0050}
0x373a…3744              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009a}
0x3744…374e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00a4}
0x374e…3758              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00ae}
0x3758…376a              Head {h00=0x000e, h01=0x0050, text=»IHOD EQU *«, t00=0x0023, t01=0x00b8}
0x376a…377e              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0023, t01=0x00ca}
0x377e…3794              Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0023, t01=0x00de}
0x3794…37b8              Head {h00=0x0020, h01=0x0050, text=» LD A4,DWTST,A6 I/O-REQUEST «, t00=0x0023, t01=0x00f4}
0x37b8…37d4              Head {h00=0x0018, h01=0x0050, text=» ANK A4,1 RECOVERY? «, t00=0x0023, t01=0x0118}
0x37d4…37ee              Head {h00=0x0016, h01=0x0050, text=» RF(NZ) EXIT2 YES «, t00=0x0023, t01=0x0134}
0x37ee…37fa              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0023, t01=0x014e}
0x37fa…381e              Head {h00=0x0020, h01=0x0050, text=» LD A3,DWTST,A6 I/O REQUEST?«, t00=0x0023, t01=0x015a}
0x381e…3836              Head {h00=0x0014, h01=0x0050, text=» RF(N) IHOD10 NO«, t00=0x0023, t01=0x017e}
0x3836…385c              Head {h00=0x0022, h01=0x0050, text=» SLL A3,7 INTERRUPTS ALLOWED? «, t00=0x0024, t01=0x0008}
0x385c…3894              Head {h00=0x0034, h01=0x0050, text=» RF(NN) IHOD10 NO,STORE CHARACTER IN DWT-BUFFER «, t00=0x0024, t01=0x002e}
0x3894…389e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0066}
0x389e…38b4              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0024, t01=0x0070}
0x38b4…38be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0086}
0x38be…38d6              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTTP,A6 «, t00=0x0024, t01=0x0090}
0x38d6…3904              Head {h00=0x002a, h01=0x0050, text=» RF(E) IHOD05 NO TIMING ON THIS DEVICE«, t00=0x0024, t01=0x00a8}
0x3904…3928              Head {h00=0x0020, h01=0x0050, text=» LDKL A3,-TIME RESTART TIME «, t00=0x0024, t01=0x00d6}
0x3928…3940              Head {h00=0x0014, h01=0x0050, text=» ST* A3,DWTTP,A6«, t00=0x0024, t01=0x00fa}
0x3940…394a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0112}
0x394a…3956              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0024, t01=0x011c}
0x3956…3960              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0128}
0x3960…3974              Head {h00=0x0010, h01=0x0050, text=»IHOD05 EQU *«, t00=0x0024, t01=0x0132}
0x3974…399e              Head {h00=0x0026, h01=0x0050, text=» ABL LDREG RETURN TO READ ROUTINE «, t00=0x0024, t01=0x0146}
0x399e…39b2              Head {h00=0x0010, h01=0x0050, text=»IHOD10 EQU *«, t00=0x0024, t01=0x0170}
0x39b2…39ca              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTINQ,A6«, t00=0x0024, t01=0x0184}
0x39ca…39dc              Head {h00=0x000e, h01=0x0050, text=» LCR A4,A1«, t00=0x0025, t01=0x000c}
0x39dc…3a02              Head {h00=0x0022, h01=0x0050, text=» XRK A4,/FF ALREADY OVERFLOW? «, t00=0x0025, t01=0x001e}
0x3a02…3a1a              Head {h00=0x0014, h01=0x0050, text=» RF(E) EXIT YES «, t00=0x0025, t01=0x0044}
0x3a1a…3a2c              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x0025, t01=0x005c}
0x3a2c…3a64              Head {h00=0x0034, h01=0x0050, text=» CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS«, t00=0x0025, t01=0x006e}
0x3a64…3a86              Head {h00=0x001e, h01=0x0050, text=» CW A1,DWTUTQ,A6 OVERFLOW?«, t00=0x0025, t01=0x00a6}
0x3a86…3a9c              Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHOD20«, t00=0x0025, t01=0x00c8}
0x3a9c…3ad0              Head {h00=0x0030, h01=0x0050, text=» ORK A2,/FF SET OVERFLOWBIT IN INPUT BUFFER «, t00=0x0025, t01=0x00de}
0x3ad0…3ae2              Head {h00=0x000e, h01=0x0050, text=» RF IHOD30«, t00=0x0025, t01=0x0112}
0x3ae2…3b16              Head {h00=0x0030, h01=0x0050, text=»IHOD20 ST A1,DWTINQ,A6 STORE INQUEUE POINTER«, t00=0x0025, t01=0x0124}
0x3b16…3b2e              Head {h00=0x0014, h01=0x0050, text=»IHOD30 SCR A2,A3«, t00=0x0025, t01=0x0158}
0x3b2e…3b44              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x0025, t01=0x0170}
0x3b44…3b52              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0186}
0x3b52…3b68 (38, 0, 398) Head {h00=0x0012, h01=0x0050, text=» IFT POWOFF=1 «, t00=0x0026, t01=0x0004}
0x3b68…3b7c              Head {h00=0x0010, h01=0x0050, text=»EXIT2 EQU * «, t00=0x0026, t01=0x001a}
0x3b7c…3b94              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x0026, t01=0x002e}
0x3b94…3ba8              Head {h00=0x0010, h01=0x0050, text=» RF(N) EXIT4«, t00=0x0026, t01=0x0046}
0x3ba8…3bce              Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTTP,A6 TIMER CLEARED «, t00=0x0026, t01=0x005a}
0x3bce…3be6              Head {h00=0x0014, h01=0x0050, text=» RF(Z) EXIT3 YES«, t00=0x0026, t01=0x0080}
0x3be6…3bfc              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,-100 «, t00=0x0026, t01=0x0098}
0x3bfc…3c22              Head {h00=0x0022, h01=0x0050, text=» ST* A3,DWTTP,A6 RESTART TIMER«, t00=0x0026, t01=0x00ae}
0x3c22…3c34              Head {h00=0x000e, h01=0x0050, text=» LDK A3,1 «, t00=0x0026, t01=0x00d4}
0x3c34…3c48              Head {h00=0x0010, h01=0x0050, text=»EXIT3 EQU * «, t00=0x0026, t01=0x00e6}
0x3c48…3c5a              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0026, t01=0x00fa}
0x3c5a…3c6e              Head {h00=0x0010, h01=0x0050, text=» LDK A4,/40 «, t00=0x0026, t01=0x010c}
0x3c6e…3c8e              Head {h00=0x001c, h01=0x0050, text=» TM A4,A2 ETX CHARACTER «, t00=0x0026, t01=0x0120}
0x3c8e…3ca6              Head {h00=0x0014, h01=0x0050, text=» RF(Z) EXIT5 NO «, t00=0x0026, t01=0x0140}
0x3ca6…3cb8              Head {h00=0x000e, h01=0x0050, text=» NGR A3,A3«, t00=0x0026, t01=0x0158}
0x3cb8…3ccc              Head {h00=0x0010, h01=0x0050, text=»EXIT5 EQU * «, t00=0x0026, t01=0x016a}
0x3ccc…3ce4              Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTA3,A6 «, t00=0x0026, t01=0x017e}
0x3ce4…3cfe              Head {h00=0x0016, h01=0x0050, text=» RB EXIT DISPATCH «, t00=0x0027, t01=0x0008}
0x3cfe…3d12              Head {h00=0x0010, h01=0x0050, text=»EXIT4 EQU * «, t00=0x0027, t01=0x0022}
0x3d12…3d34              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 CLEAR TIMER «, t00=0x0027, t01=0x0036}
0x3d34…3d46              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0027, t01=0x0058}
0x3d46…3d5a              Head {h00=0x0010, h01=0x0050, text=» ABL RCTUT5 «, t00=0x0027, t01=0x006a}
0x3d5a…3d66              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0027, t01=0x007e}
0x3d66…3d74              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x008a}
0x3d74…3d7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0098}
0x3d7e…3d88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a2}
0x3d88…3da0              Head {h00=0x0014, h01=0x0050, text=»*    A O D T U T«, t00=0x0027, t01=0x00ac}
0x3da0…3daa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c4}
0x3daa…3dd4              Head {h00=0x0026, h01=0x0050, text=»*    THIS IS THE TIME-OUT ROUTINE «, t00=0x0027, t01=0x00ce}
0x3dd4…3dde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00f8}
0x3dde…3de8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0102}
0x3de8…3dfe              Head {h00=0x0012, h01=0x0050, text=» IFT CTIMUT=1 «, t00=0x0027, t01=0x010c}
0x3dfe…3e08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0122}
0x3e08…3e1c              Head {h00=0x0010, h01=0x0050, text=»AODTUT EQU *«, t00=0x0027, t01=0x012c}
0x3e1c…3e3e              Head {h00=0x001e, h01=0x0050, text=» LDR A6,A1 GET DWT-ADDRESS«, t00=0x0027, t01=0x0140}
0x3e3e…3e56              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x0027, t01=0x0162}
0x3e56…3e6a              Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x0027, t01=0x017a}
0x3e6a…3e8e              Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 SET RETURN CODE «, t00=0x0027, t01=0x018e}
0x3e8e…3ea2              Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0028, t01=0x0022}
0x3ea2…3ed2              Head {h00=0x002c, h01=0x0050, text=» RB IHOD05 RESTORE REGISTERS AND END I/O«, t00=0x0028, t01=0x0036}
0x3ed2…3edc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0066}
0x3edc…3ee8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0070}
0x3ee8…3ef2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x007c}
0x3ef2…3f00              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0086}
0x3f00…3f0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0094}
0x3f0a…3f42              Head {h00=0x0034, h01=0x0050, text=»*    STORE = SUBROUTINE TO STORE A CHARACTER IN «, t00=0x0028, t01=0x009e}
0x3f42…3f7c              Head {h00=0x0036, h01=0x0050, text=»*            ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0028, t01=0x00d6}
0x3f7c…3f86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0110}
0x3f86…3f9c              Head {h00=0x0012, h01=0x0050, text=»*    ON ENTRY:«, t00=0x0028, t01=0x011a}
0x3f9c…3fa6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0130}
0x3fa6…3fca              Head {h00=0x0020, h01=0x0050, text=»*    A2 = CHARACTER TO STORE«, t00=0x0028, t01=0x013a}
0x3fca…3fe8              Head {h00=0x001a, h01=0x0050, text=»*    A3 = BUFFER INDEX«, t00=0x0028, t01=0x015e}
0x3fe8…3ff2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x017c}
0x3ff2…3ffc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0186}
0x3ffc…4010              Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0028, t01=0x0190}
0x4010…4036              Head {h00=0x0022, h01=0x0050, text=» LD A4,ECBBA,A8 BUFFER ADDRESS«, t00=0x0029, t01=0x0014}
0x4036…405a              Head {h00=0x0020, h01=0x0050, text=» ADR A4,A3 ADD BUFFER INDEX «, t00=0x0029, t01=0x003a}
0x405a…4086              Head {h00=0x0028, h01=0x0050, text=» SCR A2,A4 STORE CHARACTER IN BUFFER«, t00=0x0029, t01=0x005e}
0x4086…40ae              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INCREMENT BUFFER INDEX«, t00=0x0029, t01=0x008a}
0x40ae…40c2              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0029, t01=0x00b2}
0x40c2…40dc              Head {h00=0x0016, h01=0x0050, text=»STORTN ADKL A15,2 «, t00=0x0029, t01=0x00c6}
0x40dc…40f0              Head {h00=0x0010, h01=0x0050, text=» LDR* P,A15 «, t00=0x0029, t01=0x00e0}
0x40f0…40fe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x00f4}
0x40fe…4108              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0102}
0x4108…4112              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x010c}
0x4112…414c              Head {h00=0x0036, h01=0x0050, text=»*    EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER«, t00=0x0029, t01=0x0116}
0x414c…4156              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0150}
0x4156…416c              Head {h00=0x0012, h01=0x0050, text=»*    ON ENTRY:«, t00=0x0029, t01=0x015a}
0x416c…4176              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0170}
0x4176…4196              Head {h00=0x001c, h01=0x0050, text=»*    A1 = QUEUE POINTER «, t00=0x0029, t01=0x017a}
0x4196…41b4              Head {h00=0x001a, h01=0x0050, text=»*    A6 = DWT-ADDRESS «, t00=0x002a, t01=0x000a}
0x41b4…41be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0028}
0x41be…41d4              Head {h00=0x0012, h01=0x0050, text=»*    ON EXIT: «, t00=0x002a, t01=0x0032}
0x41d4…41de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0048}
0x41de…4202              Head {h00=0x0020, h01=0x0050, text=»*    A1 = NEW QUEUE POINTER «, t00=0x002a, t01=0x0052}
0x4202…4216              Head {h00=0x0010, h01=0x0050, text=»EOQUEU EQU *«, t00=0x002a, t01=0x0076}
0x4216…4228              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x002a, t01=0x008a}
0x4228…423a              Head {h00=0x000e, h01=0x0050, text=» SUR A1,A6«, t00=0x002a, t01=0x009c}
0x423a…425e              Head {h00=0x0020, h01=0x0050, text=» CWK A1,DWTEQ END OF QUEUE? «, t00=0x002a, t01=0x00ae}
0x425e…4274              Head {h00=0x0012, h01=0x0050, text=» RF(NE) EOQU10«, t00=0x002a, t01=0x00d2}
0x4274…42a2              Head {h00=0x002a, h01=0x0050, text=» LDK A1,DWTSQ SET QUEUE START ADDRESS «, t00=0x002a, t01=0x00e8}
0x42a2…42ba              Head {h00=0x0014, h01=0x0050, text=»EOQU10 ADR A1,A6«, t00=0x002a, t01=0x0116}
0x42ba…42cc              Head {h00=0x000e, h01=0x0050, text=» RB STORTN«, t00=0x002a, t01=0x012e}
0x42cc…42da              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0140}
0x42da…42e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014e}
0x42e4…42ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0158}
0x42ee…430a              Head {h00=0x0018, h01=0x0050, text=»*         CODE CHECK«, t00=0x002a, t01=0x0162}
0x430a…4314              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x017e}
0x4314…431e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0188}
0x431e…4356 (43, 2, 336) Head {h00=0x0034, h01=0x0050, text=»*           AT ENTRY   A2= 6-BIT OCTAL CHARACTER«, t00=0x002b, t01=0x0004}
0x4356…4360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x003c}
0x4360…4398              Head {h00=0x0034, h01=0x0050, text=»*            AT EXIT   A2= 7-BIT ASCII CHARACTER«, t00=0x002b, t01=0x0046}
0x4398…43ac              Head {h00=0x0010, h01=0x0050, text=»CDCHK EQU * «, t00=0x002b, t01=0x007e}
0x43ac…43cc              Head {h00=0x001c, h01=0x0050, text=» LDR A4,A2 SAVE REGISTER«, t00=0x002b, t01=0x0092}
0x43cc…43fe              Head {h00=0x002e, h01=0x0050, text=» SUK A4,/1F LESS THEN /1F CONVERT TO ASCII«, t00=0x002b, t01=0x00b2}
0x43fe…4416              Head {h00=0x0014, h01=0x0050, text=» RF(NN) CDC05 NO«, t00=0x002b, t01=0x00e4}
0x4416…4434              Head {h00=0x001a, h01=0x0050, text=» ORK A2,/40 SET BIT 7 «, t00=0x002b, t01=0x00fc}
0x4434…4448              Head {h00=0x0010, h01=0x0050, text=»CDC05 EQU * «, t00=0x002b, t01=0x011a}
0x4448…445a              Head {h00=0x000e, h01=0x0050, text=» RB STORTN«, t00=0x002b, t01=0x012e}
0x445a…4466              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002b, t01=0x0140}
0x4466…446a              Head {h00=0x4004, h01=0x0000}
0x446a…446e              00 2b 01 4c                                                                                                                                                                                                                                       ┆ + L┆
0x446e…4476 (44, 1, 8)   20 04 00 00 00 2c 00 04                                                                                                                                                                                                                           ┆     ,  ┆

Reduced view