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

⟦5a8ef00a0⟧

    Length: 33344 (0x8240)
    Notes: pts_type(SC)
    Names: »DRTP03.SC«

Derivation

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

PTS(SC)

	IDENT DRTP03 	REL 9.2 79-11-16  870105040920 

			=6,COMB OF REL 8,9&10
			PRR 10.1 79-11-14
			=5,SET PR PAR ERR, REL DOC ERR 
			PRR 10.1 79-10-04
			=4,GEN UPDATE REL 10 
			REL 9.1 79-09-26 
			=3,ANK A2,/7F
			PRR 9.1 79-08-14 
			=2,GEN UPDATE
			PRR 9.1 79-06-20 
			=1,GEN UPDATE
			PRR 9.1 79-06-17 
* 
******************************************************* 
*                                                     * 
*   PHILIPS TERMINAL SYSTEM PTS                       * 
*                                                     * 
*   DRTP03 = DRIVER TELLER TERMINAL PRINTER           * 
*                                                     * 
*   ADAPTED FOR TOSS RELEASE INDICATED IN "REL EQU X" * 
*                                                     * 
******************************************************* 
* 
*   THIS DRIVER HANDLES TELLER TERMINAL PRINTER PTS 6371
* 
*   AND CONSISTS OF THE FOLLOWING PARTS:
* 
*   A C T P :	  ACTIVATION PART 
* 
*   I H T P :	  INTERRUPT HANDLER 
* 
*   R C T P :	  RECOVERY ROUTINE
* 
*   THE ACTIVATION PART PREPARES ORDERS AND SENDS 
*   A FIXED FORMATTED STRING TO THE PRINTER 
* 
	EJECT
* 
*   THE FOLLOWING ORDERS ARE TREATED: 
* 
*   ORDER 00 :      TEST STATUS 
*   ORDER 06 :      WRITE 
*   ORDER 0B :      POSITION DOCUMENT 
*   ORDER 24 :      SET PRINTER PARAMETERS
*   ORDER 27 :      SET DOCUMENT PARAMETERS 
*   ORDER 37 :      TRANSFER DOCUMENT PARAMETERS
*   ORDER 38 :      RELEASE DOCUMENT
* 
*   THE FOLLOWING RETURN CODES ARE USED:
* 
*   BIT  0 :        REQUEST ERROR 
*   BIT  2 :        END OF JOURNAL  **IN REL 10...**	=6(=4) 
*   BIT 10 :        END OF JOURNAL  **IN REL 8 & 9**     	=6
*   BIT 10 :        DOCUMENT OUT             	=4
*   BIT 13 :        CODE CHECK ERROR
*   BIT 15 :        NOT OPERABLE
* 
* 
*   NORMAL REGISTER USAGE:
* 
*   REGISTER A1:	WORK REGISTER
*            A2:	INPUT/OUTPUT 
*            A3:	BUFFER POINTER 
*            A4:	OUTPUT COUNTER 
*            A5:	STACK POINTER
*            A6:	DWT-ADDRESS
*            A7:	ORDER
*            A8:	ECB-ADDRESS
* 
* 
	EJECT
* 
*********** 
* ENTRIES * 
*********** 
* 
* 
	ENTRY	TPAD3	ADDRESS BLOCK
* 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	TDISP	DISPATCHING FROM INTERRUPT 
	EXTRN	DISIOE	DISPATCH I/O ERROR
	EXTRN	DISEND	END I/O AND DISPATCH
	EXTRN	OUTPUT	OUTPUT ONE CHARACTER
	EXTRN	LDREG	RESTORE REGISTERS
	EXTRN	SAVE8	SAVE REG. A1-A8
	EXTRN	GETCHR	GET CHARACTER FROM ECB BUFFER 
	EXTRN	DWTST	DWT STATUS DISPLACEMENT
	EXTRN	DWTECB	DWT ECB DISPLACEMENT
	EXTRN	DWTOR	DWT ORDER DISPLACEMENT 
	EXTRN	DTTP03	DOCUMENT TABLE ADDRESS
	EXTRN	TLTP03	DOCUMENT TABLE LENGTH 
	EXTRN	STREG	STORE REG = GET STATUS INPUT CHAR
	EXTRN	DWTTP	DWT TIMER POINTER
	EXTRN	SETIMP	SET TIMER ROUTINE 
	EJECT
* 
* 
************* 
* CONSTANTS * 
************* 
* 
REL	EQU	9	ADAPTED FOR TOSS REL X	=6 
* 
STB	EQU	/82	START OF TEXT BLOCK 
ETB	EQU	/97	END OF TEXT BLOCK 
SPEC	EQU	/0E	SPECIAL CHARACTER
EXE	EQU	/06	EXECUTE TP71 ORDER
ETX	EQU	/03	END OF TEXT 
RESET	EQU	/0C	RESET CHARACTER 
			U	=4 
TIME	EQU	10	TIME OUT (1S) 
	IFF	REL=8	U	=6 
	IFF	REL=9	U	=6 
ENDJ	EQU	/2000	END OF JOURNAL STATUS	=6 
	XIF		U	=6
	IFT	REL=8	U	=6 
ENDJ	EQU	/20	END OF JOURNAL STATUS	=6 
	XIF		U	=6
	IFT	REL=9	U	=6 
ENDJ	EQU	/20	END OF JOURNAL STATUS	=6 
	XIF		U	=6
* 
*   PRINTER ORDERS (PO) SENT TO PRINTER 
* 
POTEST	EQU	/00	TEST	
POPPAR	EQU	/04	SET PRINTER PARAMETERS	
POTDOC	EQU	/07	TRANSFER DOCUMENT PARAMETERS	
POPDOC	EQU	/0B	POSITION DOCUMENT	 
POWDOC	EQU	/09	WRITE DOCUMENT	
POWJRL	EQU	/0D	WRITE JOURNAL	 
PORDOC	EQU	/08	RELEASE DOCUMENT	
PODSTA	EQU	/05	DIAGNOSTIC STATUS	 
PORECV	EQU	/01	RECOVERY	
	EJECT
* 
************************
* CONDITIONAL ASSEMBLY *
************************
* 
*   THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN
*   BY SETTING X:A TO 0-11 ACCORDING TO THE LIST BELOW	=4 
* 
*   NCV=0 GREAT BRITAIN 
*       1 GERMANY 
*       2 FRANCE
*       3 SPAIN 
*       4 ITALY 
*       5 SWEDEN, FINLAND 
*       6 DENMARK, NORWAY 1		 
*       7 PORTUGAL
*       8 YOGUSLAVIA
*       9 USA 
*      10 DENMARK, NORWAY 2		 
*      11 FRANCE 2  (NOT YET IMPLEMENTED IN THE PRINTERS)   	=4 
* 
X:A	EQU	0 
STDNCV	EQU	X:A
* 
*   THE LOWER CASE SET CAN BE INCLUDED AS STANDARD
*   BY SETTING X:B=1
* 
X:B	EQU	0 
STDL	EQU	X:B
* 
*   THE STANDARD CHARACTER PITCH FOR THE DOCUMENT 
*   STATION IS CHOOSEN BY SETTING X:C TO            	=4 
*   0=15 CH/INCH, 1=12 CH/INCH OR 2=10 CH/INCH      	=4 
* 
X:C	EQU	2 
STDCPD	EQU	X:C
* 
*   THE JOURNAL STATION CAN BE EXCLUDED 
*   BY SETTING X:D=0
* 
X:D	EQU	1 
JOURNL	EQU	X:D
* 
*   THE STANDARD CHARACTER PITCH FOR THE JOURNAL
*   STATION IS CHOOSEN BY SETTING X:E TO              	=4 
*   0=15 CH/INCH, 1=12 CH/INCH OR 2=10 CH/INCH        	=4 
* 
X:E	EQU	0 
STDCPJ	EQU	X:E
* 
*	THE "SET PARAMETER" ORDERS 24 AND 27 CAN BE INCLUDED	=6 
*	BY SETTING X:F=1                               	=6
* 
X:F	EQU	0	U	=6
PARORD	EQU	X:F
* 
*	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
* 
*   MMU BUFFER SIZE 
* 
X:G	EQU	095	U	=4
DVBLEN	EQU	X:G
* 


PRIPAR	FORM	1=1,2=0,1=STDL,4=STDNCV,2=1,2=STDCPJ,2=1,2=STDCPD	=4
	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
* 
DWTPP	EQU	START+18	PRINTER PARAMETERS 
DWTPPJ	EQU	START+20	PRINT POS JOURNAL 
DWTAPJ	EQU	DWTPPJ+1	ACTUAL PRINT POS JOURNAL
DWTRPJ	EQU	DWTPPJ	REQUESTED PRINT POS JOURNAL 
DWTPPD	EQU	START+22	PRINT POS DOCUMENT
DWTAPD	EQU	DWTPPD+1	ACTUAL PRINT POS DOCUMENT 
DWTRPD	EQU	DWTPPD	REQUESTED PRINT POS DOCUMENT
DWTLN	EQU	START+24	LINE NUMBER ON DOCUMENT
DWTALN	EQU	DWTLN+1	ACTUAL LINE NUMBER ON DOCUMENT 
DWTRLN	EQU	DWTLN	REQUESTED LINE NUMBER ON DOCUMENT
DWTDP	EQU	START+26	DOCUMENT PARAMETERS
* 
* 
********************* 
* ECB-DISPLACEMENTS * 
********************* 
* 
ECBBA	EQU	2	BUFFER ADDRESS IN ECB 
ECBRL	EQU	4	REQUESTED LENGTH IN ECB 
ECBEL	EQU	6	EFFECTIVE LENGTH IN ECB 
ECBRC	EQU	8	RETURN CODE IN ECB
ECBCW	EQU	10	CONTROL WORD IN ECB
	EJECT
* 
**********
* TABLES *
**********
* 
* 
	DATA	DVBLEN	MMU BUFFER SIZE
	DATA	2	DEVICE INDEX
TPAD3	EQU	*	ADDRESS BLOCK 
	DATA	ACTP	ACTIVATION DRIVER
	IFF	REL=8	U	=6 
	DATA	0	ABORT ROUTINE ADDRESS 
	XIF		U	=6
	DATA	IHTP	INTERRUPT HANDLER
	DATA	RCTP	RECOVERY ROUTINE 
TPTAB	EQU	* 
	IFT	JOURNL=1 
	DATA	/0006 
	IFT	PARORD=1 
	DATA	/2424 
	XIF
	IFT	PARORD=1 
	DATA	/2528 
	XIF
	DATA	/0107,/0C38,/3939 
TPLEN	EQU	*-TPTAB 


STDPP	PRIPAR		STANDARD PRINTER PARAMETERS 
	EJECT
* 
* 
*   A C T P 
* 
*   THIS IS THE ACTIVATION PART OF THE DRIVER 
*   CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR
* 
* 
* 
ACTP	EQU	*	ACTIVATION ENTRY 
* 
* 
*   GET DWT INDEX: 0=JOURNAL, 1=DOCUMENT
* 
	LC	A2,DWTOR,A6	GET DWT INDEX 
	ANK	A2,1	MASK
	LC	A3,DWTST+1,A6	GET OLD DEVICE VALUE
	ANK	A3,/FE 
	ORR	A3,A2
	SC	A3,DWTST+1,A6	STORE INDEX 
	ADR	A7,A2	ADD DWT INDEX TO ORDER 
	SC	A7,DWTOR+1,A6	STORE MODIFIED ORDER
ACT005	LDK	A3,TPLEN-1 
ACT010	CC	A7,TPTAB,A3	CHECK IF LEGAL ORDER
	RF(E)	ACT020	VALID ORDER 
	SUK	A3,1 
	RB(NN)	ACT010	TRY NEXT 
* 
	ABL	DISIOE	ILLEGAL ORDER 
* 
* 
ACT020	EQU	*
	ADR	A3,A3	GET INDEX
	ABI	TPFUC,A3	EXECUTE ORDER 
TPFUC	EQU	* 
	DATA	TSTSTA,WRTJRL 
	IFT	PARORD=1 
	DATA	PRTPAR,PRTPAR 
	XIF
	IFT	PARORD=1 
	DATA	PRTPAR,DOCPAR 
	XIF
	DATA	TSTSTA,WRTDOC,POSDOC,TRFDOC,RELDOC,RELDOC 
	EJECT
* 
* 
*   ORDER 00 : TEST STATUS
* 
* 
TSTSTA	EQU	*
	LDR	A1,A6	SAVE DWT AS PARAMETER
	LDKL	A4,DWTTP	 
	ADR	A4,A6	SET UP TIMER POINTER 
	CF	A15,SETIMP	START TIMER OF 1S
	DATA	TSST20,TIME	TIME OUT ADRESS AND VALUE 
	LDK	A3,POTEST	LOAD TEST ORDER
	CF	A5,ORDER	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDK	A3,8	
	TM	A3,A2	
	RF(Z)	TSST10	NOT PRINTER ANSWER
	LDK	A3,3	
	TM	A3,A2	
	RF(Z)	TSST10	NOT JE OR GE
	LDK	A3,PODSTA	JE OR GE EXECUTE 
	CF	A5,ORDER	DIAGNOSTICSTATUS 
	CF	A5,EXECUT	
TSST10	EQU	*	 
	INH		
	CM*	DWTTP,A6	RESET TIMER 
	CM	DWTTP,A6	RESET TIMER POINTER
	CM	ECBCW,A8	CLEAR CTRL WORD	=2 
	ABL	STATUS	UPDATE STATUS 
TSST20	LDR	A6,A1	GET DWT ADDRESS
	LDK	A2,1	INDICATE NOT OPERABLE 
	RB	TSST10	 
	IFT	JOURNL=1	
	EJECT		

* 
* 
*   ORDER 06 : WRITE JOURNAL
* 
* 
WRTJRL	EQU	*
	LDK	A3,POWJRL	SET UP PRINTER WRITE JOURNAL ORDER 
	CF	A5,ORDER	AND SEND 
	LD	A1,DWTST,A6 
	ANKL	A1,/400 
	RF(NZ)	WRJL10	LF EXECUTED
	LDK	A3,1	SET UP ECB BUFFER POINTER 
	CF	A15,GETCHR	GET CONTROL CHARACTER
	LDR	A1,A1
	RF(NP)	WRJL70	REQ LENGTH TOO SHORT 
	LDR	A1,A2	SET UP CTRL CHAR IN A1 
	SUK	A1,/2B 
	RF(Z)	WRJL10	CTRL CHAR =/2B
	CM	DWTPPJ,A6	CLEAR PRINT POS 
	LDK	A2,2 
	SUK	A1,5 
	RF(Z)	WRJL05	CTRL CHAR =/30
	LDK	A2,1 
	SUK	A1,1 
	RF(NZ)	WRJL05	CTRL CHAR NOT =/31 
	LDK	A2,3 
WRJL05	CF	A5,OUT	SEND LF INF
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDK	A1,7 
	TM	A1,A2 
	RF(NZ)	WRJL90	GE,JE OR RE
	LDKL	A1,/400 
	ORS	A1,DWTST,A6	IND LF EXECUTED
	LDK	A1,2 
	CW	A1,ECBRL,A8 
	RF(E)	WRJL90	NO BUFFER TO PRINT
	RB	WRTJRL
WRJL10	LDK	A2,0 
	CF	A5,OUT	SEND 0 LF
	LDKL	A4,/100	SET UP NORMAL CHAR COUNTER IN A4
	LDK	A3,2	SET UP BUFFER POINTER 
WRJL20	CF	A15,GETCHR	GET CHARACTER FROM ECB BUFFER
	LDR	A1,A1
	RF(Z)	WRJL50	BUFFER FINISHED 
	LDR	A1,A2	GET CHAR IN A1 
* 
*   EXAMINE CHAR AND UPDATE PRINT POS AND SEND
*   DEPENDING ON TYPE OF CHARACTER
* 
	SUK	A1,/10 
	RB(N)	WRJL20	CHAR </10 
	RF(Z)	WRJL30	CHAR = /10
	SUK	A1,9 
	RF(NZ)	WRJL25	CHAR NOT /19 (=EXPAND) 
	XRKL	A4,/300	SWITCH CHAR COUNTER IN A4 
	RF	WRJL40	SEND EXPAND CHAR 
WRJL25	SUK	A1,7 
	RF(N)	WRJL40	CHAR </20 SEND
	SUK	A1,/5F 
	RF(Z)	WRJL40	CHAR =/7F SEND
	RF(N)	WRJL30	CHAR = NORMAL 
	SUK	A1,/2F 
	RF(Z)	WRJL28	CHAR =/AE 
	CF	A5,ERROR	ILLEGAL CHAR = SEND RESET
	LDK	A2,/80	IND CODE CHECK ERROR
	RF	WRJL90
WRJL28	LDK	A2,/0E 
	RF	WRJL40

*   UPDATE PRINT POSITION 

WRJL30	ADS	A4,DWTRPJ,A6	ADD 1 OR 2 TO REQ PRINT POS 

*   SEND CHARACTER TO DEVICE

WRJL40	CF	A5,OUTPUT	SEND CHARACTER
	RB	WRJL20	GET NEXT CHARACTER 

*   SEND ETX

WRJL50	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	RF	WRJL90
WRJL70	CF	A5,ERROR	SEND RESET 
WRJL80	LDK	A2,4	IND REQ ERROR 
WRJL90	ABL	STATUS 
	XIF		
	EJECT		
* 
* 
*   ORDER 06 : WRITE DOCUMENT 
* 
* 
WRTDOC	EQU	*
	LC	A4,DWTALN,A6	GET ACTUAL LINE
	ANK	A4,/FF 
	ABL(Z)	WRDO80	DOC NOT POSITIONED 
	LDK	A3,1	SET BUFFER INDEX
	CF	A15,GETCHR	GET CONTROL CHARACTER
	LDR	A1,A1
	ABL(NP)	WRDO80	REQ LENGTH < 2
	SUK	A2,/2B 
	RF(Z)	WRDO05	CTRL CHAR = /2B 
	CM	DWTPPD,A6	CLEAR PRINT POS 
	ADK	A4,2	SET REQ LINE = ACT LINE + 2 
	SUK	A2,5 
	RF(Z)	WRDO05	CTRL CHAR = /30 
	SUK	A4,1	SET REQ LINE = ACT LINE + 1 
	SUK	A2,1 
	RF(NZ)	WRDO05	CTRL CHAR NOT = /31
	LDK	A4,1	SET REQ LINE = 1
WRDO05	CC	A4,DWTDP+2,A6 
	ABL(G)	WRDO80	REQ LINE > MAX LINES 
	SC	A4,DWTRLN,A6	SET UP REQ LINE NO 
	LDKL	A4,/100	SET UP NORMAL CHAR COUNTER IN A4
WRDO10	LDK	A3,POWDOC	SET UP PRINTER ORDER 
	CF	A5,ORDER	AND SEND 
	LC	A2,DWTRLN,A6	GET REQ LINE NO
	CF	A5,OUT	AND SEND 
	LDK	A3,2	SET UP BUFFER POINTER 
WRDO20	CF	A15,GETCHR	GET CHARACTER FROM ECB BUFFER
	LDR	A1,A1
	RF(Z)	WRDO50	BUFFER FINISHED 
	LDR	A1,A2	GET CHARACTER

*   EXAMINE CHARACTER AND UPDATE PRINT POS AND SEND 
*   DEPENDING ON TYPE OF CHARACTER

	SUK	A1,/10 
	RB(N)	WRDO20	CHAR < /10
	RF(Z)	WRDO30	CHAR = /10 SEND 
WRDO22	SUK	A1,9 
	RF(NZ)	WRDO27	CHAR NOT /19 (=EXPAND) 
	XRKL	A4,/300	SWITCH CHAR COUNTER IN A4 
	RF	WRDO40	SEND EXPAND CHAR 
WRDO27	SUK	A1,7 
	RF(N)	WRDO40	CHAR < /20 SEND 
	SUK	A1,/5F 
	RF(N)	WRDO30	CHAR = NORMAL 
	RF(Z)	WRDO40	CHAR = /7F SEND 
	SUK	A1,/2F 
	RF(Z)	WRDO28	CHAR = /AE
	CF	A5,ERROR	SEND RESET 
	LDK	A2,/80	IND CODE CHECK ERROR
	RF	WRDO90
WRDO28	LDK	A2,SPEC	SET UP CHAR /0E
	RF	WRDO40

*   UPDATE PRINT POS

WRDO30	ADS	A4,DWTRPD,A6	ADD 1 OR 2 TO REQ PRINT POS 

*   SEND CHARACTER TO PRINTER 

WRDO40	CF	A5,OUTPUT	SEND CHARACTER
	RB	WRDO20	GET NEXT CHAR

*   SEND ETX

WRDO50	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	RF	WRDO90
WRDO70	CF	A5,ERROR	SEND RESET 
WRDO80	LDK	A2,4	IND REQ ERROR 
WRDO90	ABL	STATUS	UPDATE STATUS 
	EJECT
* 
* 
*   ORDER 0B : POSITION DOCUMENT
*   CONTROL WORD CONTAINS REQUESTED LINE NO 
* 
* 
POSDOC	EQU	*
	LD	A4,ECBCW,A8	GET REQ LINE NO 
	CC	A4,DWTDP+2,A6 
	RF(G)	PDOC30	REQ LINE > MAX LINES
	SC	A4,DWTRLN,A6	SET UP REQ LINE NO 
	LDK	A3,POPDOC	SET UP PRINTER POSITION DOCUMENT ORDER 
	CF	A5,ORDER	AND SEND 
	LDR	A2,A4	SET UP LINE NO 
	CF	A5,OUT	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	CM	DWTPPD,A6	CLEAR PRINT POS 
	LC	A1,DWTDP,A6	TIME OUT USED ?	=4
	ANK	A1,/78	U	=4
	RF(NZ)	PDOC20	YES	=4 
	LDK	A1,/40	NO, DOC OUT SIGNALLED ?	=4
	TM	A1,A2	U	=4
	RB(NZ)	POSDOC	YES, TRY ONCE MORE	=4
PDOC20	ABL	STATUS	UPDATE STATUS 
PDOC30	LDK	A2,4	INDICATE REQ ERROR
	RB	PDOC20
	EJECT		
* 
* 
*   ORDER 37 : TRANSFER DOCUMENT PARAMETERS 
*   CONTROL WORD CONTAINS DOCUMENT TABLE NUMBER 
* 
* 
TRFDOC	EQU	*
	LD	A1,ECBCW,A8 
	ADK	A1,1 
	LDR	A4,A1
	SLL	A4,3 
	ADR	A4,A1
	ADR	A4,A1
	CWK	A4,TLTP03
	RF(G)	ODOC10	REQ DOC TABLE NOT DEFINED 
	SUK	A4,10	ADJUST DOCTAB POINTER
	LD	A1,DWTALN,A6		
	RF(Z)	ODOC20	DOC. NOT POSITIONED =OK 
ODOC10	LDK	A2,4	IND REQ ERROR 
	RF	ODOC40
ODOC20	LDK	A3,POTDOC	LOAD PRINTER TRANSFER DOC PARAMETERS ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A3,DWTDP	SET UP POINTER
ODOC30	LC	A2,DTTP03,A4
	LDR	A1,A6
	ADR	A1,A3
	SCR	A2,A1
			U	=4 
	CF	A5,OUT
	ADK	A4,1 
	ADK	A3,1 
	CWK	A3,DWTDP+10
	RB(NE)	ODOC30	WHOLE TABLE NOT SENT 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	ANK	A2,5	MASK OFF GE AND RE
			U	=1 
ODOC40	ABL	STATUS	UPDATE STATUS 
			U	=1 
			U	=1 
	IFT	PARORD=1	
	EJECT		
* 
* 
*   ORDER 24 : SET PRINTER PARAMETERS 
*   CONTROL WORD CONTAINS:
*   BIT 0     : INDICATE CHANGE OF CH FONT AND NCV        	=4 
*   BIT 01-03 : CHARACTER FONT                                	=4 
*   BIT 04-07 : NATIONAL CHARACTER VARIATION                  	=4 
*   BIT 08-11 : CHARACTER PITCH FOR JOURNAL STATION           	=4 
*   BIT 12-15 : CHARACTER PITCH FOR DOCUMENT STATION          	=4 
* 
* 
PRTPAR	EQU	*
	LDK	A2,0 
	LD	A4,DWTPP,A6	GET OLD DWT VALUE 
	LD	A1,ECBCW,A8	GET CONTROL WORD
	RF(NN)	PPAR10	NO NEW L/NCV SET UP IN CTRL WORD 
	ECR	A2,A1
	ANK	A2,/FF 
	SC	A2,DWTPP,A6	STORE NEW L/NCV IN DWT
PPAR10	LDK	A2,0 
	LDR	A3,A1
	ANK	A3,/F0	GET CTRL WORD 
	RF(NZ)	PPAR15	NEW CPJ SET UP IN CTRL WORD	=1 
	LDR	A3,A4
	ANK	A3,/F0 
			U	=5(=1) 
PPAR15	EQU	*	U	=5(=1) 
	ORR	A2,A3	STORE NEW CPJ IN A2	=5 
	XRR	A3,A4	U	=5 
	ANK	A3,/F0	NEW AND OLD CPJ EQUAL ?	=5
	RF(Z)	PPAR22	YES	=5
	CM	DWTPPJ,A6	NO, RESET PRINT POS FOR JOURNAL	=5
PPAR22	EQU	*	U	=5 
	LDR	A3,A1
	ANK	A3,/F	GET CTRL WORD
	RF(NZ)	PPAR25	NEW CPD SET UP IN CTRL WORD	=1 
	LDR	A3,A4
	ANK	A3,/F	GET CPD FROM DWT 
			U	=5(=1) 
PPAR25	EQU	*	U	=5(=1) 
	ORR	A2,A3	STORE NEW CPD IN A2	=5 
	XRR	A3,A4	U	=5 
	ANK	A3,/F	NEW AND OLD CPD EQUAL ?	=5 
	RF(Z)	PPAR32	YES	=5
	CM	DWTPPD,A6	NO, RESET PRINT POS FOR DOC	=5
PPAR32	EQU	*	U	=5 
	SC	A2,DWTPP+1,A6	STORE NEW PARAMETERS IN DWT 
	LDK	A3,POPPAR	LOAD PRINTER PRINTER PARAMETER ORDER 
	CF	A5,ORDER	AND SEND 
	LC	A2,DWTPP,A6 
			U	=4(=2) 
	CF	A5,OUT	SEND L/NCV 
	LC	A2,DWTPP+1,A6 
	ANK	A2,/77 
	CF	A5,OUT	SEND CPJ/CPD 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	ANK	A2,1	MASK OUT GE	=1
			U	=1 
			U	=1 
			U	=1 
			U	=1 
PPAR40	ABL	STATUS	UPDATE STATUS 
	EJECT		
* 
* 
*   ORDER 27 : SET DOCUMENT PARAMETERS
*   CONTROL WORD CONTAINS TABLE NO OF GIVEN PARAMETERS
* 
* 
DOCPAR	EQU	*
	LD	A1,ECBCW,A8	GET CONTROL WORD
	ADK	A1,1 
	LDR	A4,A1
	SLL	A4,3 
	ADR	A4,A1
	ADR	A4,A1
	CWK	A4,TLTP03
	RF(G)	DPAR80	DEFINED TABLE TOO SMALL 
	SUK	A4,10	ADJUST DOCTAB POINTER
	LD	A3,ECBBA,A8	GET BUFFER ADDRESS
	CF	A5,BYTE1	GET DOC TYPE 
	SUK	A1,3 
	RF(P)	DPAR80	ILLEGAL VALUE 
			U	=2 
	SC	A2,DTTP03,A4
	CF	A5,BYTE1	GET TIME OUT VALUE 
	SLL	A2,11
	ORS	A2,DTTP03,A4 
	CF	A5,DOC	GET LINE SPACING 
	SUK	A2,15
	RF(P)	DPAR80	TOO LARGE 
	CF	A5,DOC	GET NO OF LINES
	SUK	A2,0 
	RF(Z)	DPAR80	NO LINES
	CF	A5,DOC	GET BOTTOM LINES 
	SUK	A2,14
	RF(N)	DPAR80	TOO SMALL 
	CF	A5,DOC	GET MARGIN 
	SUK	A2,0 
	RF(Z)	DPAR80	TOO SMALL 
	SUK	A2,80
	RF(P)	DPAR80	TOO LARGE 
	ADK	A4,1 
	CF	A5,BYTE1	GET MARGIN FINE
	SUK	A1,0 
	RF(Z)	DPAR80	TOO SMALL 
	SUK	A1,7 
	RF(P)	DPAR80	TOO LARGE 
	SC	A2,DTTP03,A4
	CF	A5,BYTE1	GET LEFT MARGIN
	SUK	A1,1 
	RF(P)	DPAR80	ILLEGAL VALUE 
	SLL	A2,3 
	ORS	A2,DTTP03,A4 
	CF	A5,BYTE1	GET CRITICAL MARGIN
	SUK	A1,1 
	RF(P)	DPAR80	ILLEGAL VALUE 
	SLL	A2,5 
	ORS	A2,DTTP03,A4 
	CF	A5,BYTE1	GET HIGH PRINT PRESSURE
	SUK	A1,1 
	RF(P)	DPAR80	ILLEGAL VALUE 
	SLL	A2,6 
	ORS	A2,DTTP03,A4 
	LC*	A1,ECBBA,A8	GET DOC TYPE 
	ANK	A1,/F
	RF(Z)	DPAR60	DOC TYPE = 0
	CF	A5,DOC	GET UPPER EDGE 
	SUK	A2,15
	RF(N)	DPAR80	TOO SMALL 
	SUK	A2,67
	RF(P)	DPAR80	TOO LARGE 
	CF	A5,DOC	GET BOTTOM EDGE
	SUK	A2,0 
	RF(Z)	DPAR30	OK
	SUK	A2,24
	RF(N)	DPAR80	TOO SMALL 
DPAR30	LC*	A1,ECBBA,A8	GET DOC TYPE 
	ANK	A1,/F
	SUK	A1,2 
	RF(N)	DPAR70	DOC TYPE = 1
	RF(P)	DPAR40	DOC TYPE = 3
	CF	A5,DOC	GET DOCUMENT WIDTH 
	SUK	A2,40
	RF(N)	DPAR80	TOO SMALL 
	SUK	A2,57
	RF(P)	DPAR80	TOO SMALL 
	RF	DPAR50
DPAR40	CF	A5,DOC	GET UPPER LINES
	SUK	A2,0 
	RF(Z)	DPAR80	TOO SMALL 
	SUK	A2,40
	RF(P)	DPAR80	TOO LARGE 
DPAR50	CF	A5,DOC	GET CENTER WIDTH 
	RF	DPAR75	OK 
DPAR60	LDK	A2,0	DT=0 SET 4 LAST PARAMETERS=0
	ADK	A4,1 
	ST	A2,DTTP03,A4
	ADK	A4,1 
DPAR70	LDK	A2,0	DT=1 SET 2 LAST PARAMETERS=0
	ADK	A4,1 
	ST	A2,DTTP03,A4
DPAR75	LDK	A1,0	IND STATUS OK FOR RETURN CODE 
	RF	DPAR90
DPAR80	LDKL	A1,/8000	IND REQ ERROR FOR RETURN CODE
DPAR90	ABL	STAT50	SET RETURN CODE 

*   GET ONE BYTE FROM ECB BUFFER TO A1 AND A2 
*   CONVERTED TO HEXA FROM ASCII

BYTE1	LCR	A2,A3	GET CHARACTER 
	CF	A5,CHECK	TEST IF NUMERIC
	ANK	A2,/F	GET HEXA 
	LDR	A1,A2	SAVE IN A1 ALSO
	ADK	A3,1	INC ECB BUFFER POINTER
	RTN	A5 

*   GET TWO BYTES FROM ECB BUFFER TO A2 
*   CONVERTED TO HEXA AND STORED IN DOC TABLE 

DOC	LDK	A1,0	CLEAR HEXA VALUE 
	ADK	A4,1	INC TABLE POINTER 
	LCR	A2,A3	GET CHARACTER FROM ECB BUFFER
	CF	A5,CHECK	TEST IF NUMERIC
	ANK	A2,/F
DOC10	SUK	A2,1
	RF(N)	DOC20	TENTH FINISHED 
	ADK	A1,10	UPDATE TENTH 
	RB	DOC10 
DOC20	ADK	A3,1	INC ECB BUFFER POINTER 
	LCR	A2,A3	GET NEXT CHARACTER FROM ECB BUFFER 
	CF	A5,CHECK	TEST IF NUMERIC
	ANK	A2,/F
	ADR	A2,A1	ADD TO PREV HEXA VALUE 
	SC	A2,DTTP03,A4	STORE IN DOC TABLE 
	ADK	A3,1	INC ECB BUFFER POINTER
	RTN	A5 
* 
*   CHECK IF CHARACTER IS NUMERIC 
CHECK	ANK	A2,/FF	MASK OUT CHARACTER 
	SUK	A2,/30 
	RF(N)	CHCK10	TOO LOW ERROR 
	SUK	A2,9 
	RF(P)	CHCK10	TOO HIGH ERROR
	ADK	A2,/39	RESTORE CHARACTER 
	RTN	A5 
CHCK10	ADK	A5,4	UPDATE STACK POINTER
	RB	DPAR80
	XIF
	EJECT		
* 
* 
*   ORDER 38 : RELEASE DOCUMENT 
* 
* 
RELDOC	EQU	*
	LDK	A3,PORDOC	LOAD PRINTER REL DOC ORDER 
	CF	A5,ORDER	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
			U	=5(=4) 
	EJECT		
* 
* 
*   UPDATE OF STATUS AND DWT
* 
* 
STATUS	EQU	*
	LDK	A1,0	CLEAR STATUS REGISTER 
	LDK	A3,/10 
	TM	A3,A2 
	RF(NZ)	STAT70	DIAGNOSTIC STATUS
	LDK	A3,/87 
	TM	A3,A2 
	RF(Z)	STAT20	NOT RE, GE, JE OR CE
	CF	A5,SETBK	SET BACK REQ POS AND LINE	 
	LDK	A3,1	U	=5
	TM	A3,A2 
	RF(Z)	STAT10	NOT GE	=5 
	ORK	A1,1	IND NOT OPERABLE
STAT10	LDK	A3,/80 
	TM	A3,A2 
	RF(Z)	STAT15	NOT CE
	ORK	A1,4	IND CODE CHECK ERROR
STAT15	LDK	A3,4 
	TM	A3,A2 
	RF(Z)	STAT20	NOT REQ ERROR 
	SRC	A3,3	ADJUST REQ ERROR
	ORR	A1,A3
STAT20	LD	A3,DWTST,A6 
	ANK	A3,1 
	RF(Z)	STAT60	JOURNAL 
	LDK	A3,/40	DOCUMENT
	TM	A3,A2 
	RF(Z)	STAT30	NOT DOC OUT 
	ORKL	A1,/20	INDICATE DOC OUT	=5
	CM	DWTLN,A6	CLEAR LINE NO FOR DOC
	CM	DWTPPD,A6	CLEAR PRINT POS DOCUMENT
	RF	STAT40
STAT30	LC	A3,DWTRLN,A6
	SC	A3,DWTALN,A6
STAT40	LC	A3,DWTRPD,A6
	SC	A3,DWTAPD,A6
STAT45	ST	A3,ECBEL,A8	SET UP EFFECTIVE LENGTH=ACT PRINT POS 
STAT50	LDKL	A3,/FB01	RESET STATUS BITS
	INH
	ANS	A3,DWTST,A6
	IFF	REL=8	U	=6 
	IFF	REL=9	U	=6 
	SUK	A7,/39	REL DOC ORDER ?	=5
	RF(NZ)	STAT55	NO	=5
	ANK	A1,1	YES IND ONLY NOT OP IF SET	=5 
STAT55	EQU	*	U	=5 
	XIF		U	=6
	ABL	DISEND 
STAT60	LDK	A3,/20 
	TM	A3,A2 
	RF(Z)	STAT62	NOT END OF JOURNAL	=5 
	ORKL	A1,ENDJ	IND END OF JOURNAL	=6(=4) 
STAT62	LDK	A3,2	U	=5
	TM	A3,A2	U	=5
	RF(Z)	STAT65	NOT JOURNAL ERROR (JE)	=5 
	ORKL	A1,1	IND NOT OPERABLE	=5
STAT65	LC	A3,DWTRPJ,A6
	SC	A3,DWTAPJ,A6
	RB	STAT45
STAT70	SC	A2,ECBCW+1,A8	SET UP DIAGN STAT IN CTRL WORD	=2 
	LDK	A1,1	IND ECB RETURN CODE= 1
	RB	STAT50	SET UP RETURN CODE 
	EJECT
* 
*   S U B R O U T I N E S 
* 
* 

* 
*   O R D E R 
*   SEND STB, STX AND ORDER CODE TO PRINTER 
* 
ORDER	EQU	* 
	LDK	A2,STB	SEND STB
	CF	A5,OUTPUT 
	LDR	A2,A3
	CF	A5,OUTPUT	SEND PRINTER ORDER
	RTN	A5 

* 
*   E X E C U T E 
*   SEND ETB AND ETX TO PRINTER 
* 
EXECUT	EQU	*
	LDK	A2,ETB	SEND ETB
	CF	A5,OUTPUT 
	LDK	A2,ETX	SEND ETX
	CF	A5,OUTPUT 
	CF	A5,STREG	GET STATUS CHARACTER 
	RTN	A5 
* 
*   ERROR 
*   SENDS RESET CODE TO PRINTER 
* 
ERROR	EQU	* 
	LDK	A2,RESET 
	CF	A5,OUTPUT 
	RTN	A5 
* 
*   0 U T 
*   ADD CONST. AND SEND 
* 
OUT	EQU	*	U	=3
	ANK	A2,/7F	U	=3
	ADK	A2,/10	U	=3
	CWK	A2,/7F	U	=1
	RF(NG)	OUT10	CHARACTER NOT GREATER THAN /7F	=1 
	LDK	A2,/7F	IF GREATER SET CHAR TO /7F	=1 
OUT10	EQU	*	U	=1
	CF	A5,OUTPUT 
	RTN	A5 
*				 
*   SETBK			
*   SET BACK REQ LINE AND POS TO ACTUAL LINE AND POS	 
*				 
SETBK	LC	A3,DWTALN,A6		 
	SC	A3,DWTRLN,A6		
	LC	A3,DWTAPD,A6		
	SC	A3,DWTRPD,A6		
	LC	A3,DWTAPJ,A6		
	SC	A3,DWTRPJ,A6		
	RTN	A5		 
	EJECT
* 
*   I H T P 
* 
*   INTERRUPT HANDLER: PROCESS OF INTERRUPT 
* 
* 
* 
IHTP	EQU	*
	LDR	A1,A1
	RF(NZ)	IHTP20	LINE NOT OPERABLE
	ECR	A1,A2
	ANK	A1,/70 
	RF(Z)	IHTP40	ACK 
	LDKL	A1,/FF3F
	ANRS	A1,A6	CLEAR PAPER INF IN DWT
	LDR	A1,A2
	ANK	A1,/60	MASK OUT PAPER INF FROM PRINTER ANSWER
	XRK	A1,/60	INVERT BITS 
	SLC	A1,1	ADJUST POS
	ORRS	A1,A6	SET UP NEW PAPER INFORMATION
	LDK	A1,/18	
	TM	A1,A2 
	RF(NZ)	IHTP40	DATA REQUEST OR DIAGNOSTIC STATUS 1
IHTP20	ABL	TDISP	GO TO DISPATCHER 
IHTP40	ABL	LDREG	RETURN FROM CF A5,OUTPUT/STREG 
	EJECT
* 
*   R C T P 
* 
*   RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON
* 
RCTP	CF	A15,SAVE8	SAVE REG. A1-A8 
	LDKL	A1,/7FFF	INDICATE DEVICE BUSY 
	ANS	A1,DWTST,A6
	LDK	A3,PORECV	SET UP PRINTER RECOVERY ORDER
	LD	A1,DWTPP,A6 
	RF(N)	RCTP10	NOT SYSTEM START UP RECOVERY	=2 
	LD	A3,STDPP	SET UP ST PR PAR IN DWT	=2 
	ST	A3,DWTPP,A6	U	=2
	LDK	A4,8	SET UP DOC PAR TABLE 0 IN DWT	=2
	LDR	A3,A6	U	=2 
	ADK	A3,DWTDP+8	U	=2
RCTP05	LD	A1,DTTP03,A4	U	=2 
	STR	A1,A3	U	=2 
	SUK	A3,2	U	=2
	SUK	A4,2	U	=2
	RB(NN)	RCTP05	U	=2 
	LDK	A3,PORECV+1	SET UP SYSTEM START UP RECOVERY	=2 
RCTP10	CF	A5,ORDER	SEND ORDER 
	LD	A3,DWTPP,A6	GET PRINTER PARAMETERS	=2 
			U	=2 
			U	=2 
			U	=2 
RCTP20	ECR	A2,A3
			U	=4(=2) 
	CF	A5,OUT	SEND L/NCV 
	LDR	A2,A3
	ANK	A2,/77 
	CF	A5,OUT	SEND CPJ/CPD 
	LC	A2,DWTAPJ,A6	GET ACTUAL POS JOURNAL 
	CF	A5,OUT	AND SEND 
	LC	A2,DWTAPD,A6	GET ACTUAL POS DOCUMENT
	LDR	A3,A2	SAVE DOC POS 
	ANK	A2,/3F	MASK OFF MSB
	CF	A5,OUT	SEND APD 
	LDR	A2,A3	GET DOC POS BACK 
	ANK	A2,/40	MASK OUT MSB
	CF	A5,OUT	SEND AP6 
	LC	A2,DWTALN,A6	GET ACTUAL LINE NO 
	CF	A5,OUT	AND SEND 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
			U	=2 
RCTP40	LDK	A4,10
	LDR	A3,A6
	ADK	A3,DWTDP 
RCTP50	LCR	A2,A3	GET DOC PARAMETER
			U	=4 
	CF	A5,OUT	AND SEND 
	ADK	A3,1	INC DOC TABLE POINTER 
	SUK	A4,1	DEC CHARACTER COUNTER 
	RB(NZ)	RCTP50	WHOLE TABLE NOT SENT 
RCTP60	CF	A5,EXECUT	EXECUTE RECOVERY IN PRINTER 
	CF	A5,SETBK	SET BACK REQ POS AND LINE	 
	LDK	A1,/40 
	TM	A1,A2 
	RF(Z)	RCTP70	DOC NOT OUT 
	CM	DWTLN,A6	CLEAR LINE NO FOR DOC
	CM	DWTPPD,A6	CLEAR PRINT POS DOC 
RCTP70	LD	A1,DWTECB,A6
	ABL(NZ)	ACT005	REQ RUNNING 
	ABL	DISEND	REQ NOT RUNNING 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRTP03  REL 9.2 79-11-16  870105040920 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…005e              Head {h00=0x001c, h01=0x0050, text=»   =6,COMB OF REL 8,9&10«, t00=0x0000, t01=0x0042}
0x005e…007a              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-11-14«, t00=0x0000, t01=0x0062}
0x007a…00a4              Head {h00=0x0026, h01=0x0050, text=»   =5,SET PR PAR ERR, REL DOC ERR «, t00=0x0000, t01=0x007e}
0x00a4…00c0              Head {h00=0x0018, h01=0x0050, text=»   PRR 10.1 79-10-04«, t00=0x0000, t01=0x00a8}
0x00c0…00e0              Head {h00=0x001c, h01=0x0050, text=»   =4,GEN UPDATE REL 10 «, t00=0x0000, t01=0x00c4}
0x00e0…00fc              Head {h00=0x0018, h01=0x0050, text=»   REL 9.1 79-09-26 «, t00=0x0000, t01=0x00e4}
0x00fc…0114              Head {h00=0x0014, h01=0x0050, text=»   =3,ANK A2,/7F«, t00=0x0000, t01=0x0100}
0x0114…0130              Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-08-14 «, t00=0x0000, t01=0x0118}
0x0130…0148              Head {h00=0x0014, h01=0x0050, text=»   =2,GEN UPDATE«, t00=0x0000, t01=0x0134}
0x0148…0164              Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-06-20 «, t00=0x0000, t01=0x014c}
0x0164…017c              Head {h00=0x0014, h01=0x0050, text=»   =1,GEN UPDATE«, t00=0x0000, t01=0x0168}
0x017c…0198              Head {h00=0x0018, h01=0x0050, text=»   PRR 9.1 79-06-17 «, t00=0x0000, t01=0x0180}
0x0198…01a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01e2              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0001, t01=0x0016}
0x01e2…0222              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0001, t01=0x0056}
0x0222…0262              Head {h00=0x003c, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS                       * «, t00=0x0001, t01=0x0096}
0x0262…02a2              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0001, t01=0x00d6}
0x02a2…02e2              Head {h00=0x003c, h01=0x0050, text=»*   DRTP03 = DRIVER TELLER TERMINAL PRINTER           * «, t00=0x0001, t01=0x0116}
0x02e2…0322              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0001, t01=0x0156}
0x0322…0362              Head {h00=0x003c, h01=0x0050, text=»*   ADAPTED FOR TOSS RELEASE INDICATED IN "REL EQU X" * «, t00=0x0002, t01=0x0008}
0x0362…03a2              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0002, t01=0x0048}
0x03a2…03e2              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0002, t01=0x0088}
0x03e2…03ec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c8}
0x03ec…042c              Head {h00=0x003c, h01=0x0050, text=»*   THIS DRIVER HANDLES TELLER TERMINAL PRINTER PTS 6371«, t00=0x0002, t01=0x00d2}
0x042c…0436              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0112}
0x0436…0466              Head {h00=0x002c, h01=0x0050, text=»*   AND CONSISTS OF THE FOLLOWING PARTS:«, t00=0x0002, t01=0x011c}
0x0466…0470              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014c}
0x0470…0498              Head {h00=0x0024, h01=0x0050, text=»*   A C T P :   ACTIVATION PART «, t00=0x0002, t01=0x0156}
0x0498…04a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x017e}
0x04a2…04cc              Head {h00=0x0026, h01=0x0050, text=»*   I H T P :   INTERRUPT HANDLER «, t00=0x0002, t01=0x0188}
0x04cc…04d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0022}
0x04d6…04fe              Head {h00=0x0024, h01=0x0050, text=»*   R C T P :   RECOVERY ROUTINE«, t00=0x0003, t01=0x002c}
0x04fe…0508              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0054}
0x0508…0542              Head {h00=0x0036, h01=0x0050, text=»*   THE ACTIVATION PART PREPARES ORDERS AND SENDS «, t00=0x0003, t01=0x005e}
0x0542…0576              Head {h00=0x0030, h01=0x0050, text=»*   A FIXED FORMATTED STRING TO THE PRINTER «, t00=0x0003, t01=0x0098}
0x0576…0580              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00cc}
0x0580…058e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x00d6}
0x058e…0598              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00e4}
0x0598…05c6              Head {h00=0x002a, h01=0x0050, text=»*   THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0003, t01=0x00ee}
0x05c6…05d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011c}
0x05d0…05f8              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 00 :      TEST STATUS «, t00=0x0003, t01=0x0126}
0x05f8…061a              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 06 :      WRITE «, t00=0x0003, t01=0x014e}
0x061a…0648              Head {h00=0x002a, h01=0x0050, text=»*   ORDER 0B :      POSITION DOCUMENT «, t00=0x0003, t01=0x0170}
0x0648…067a              Head {h00=0x002e, h01=0x0050, text=»*   ORDER 24 :      SET PRINTER PARAMETERS«, t00=0x0004, t01=0x000e}
0x067a…06ae              Head {h00=0x0030, h01=0x0050, text=»*   ORDER 27 :      SET DOCUMENT PARAMETERS «, t00=0x0004, t01=0x0040}
0x06ae…06e6              Head {h00=0x0034, h01=0x0050, text=»*   ORDER 37 :      TRANSFER DOCUMENT PARAMETERS«, t00=0x0004, t01=0x0074}
0x06e6…0712              Head {h00=0x0028, h01=0x0050, text=»*   ORDER 38 :      RELEASE DOCUMENT«, t00=0x0004, t01=0x00ac}
0x0712…071c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d8}
0x071c…074c              Head {h00=0x002c, h01=0x0050, text=»*   THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0004, t01=0x00e2}
0x074c…0756              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0112}
0x0756…0780              Head {h00=0x0026, h01=0x0050, text=»*   BIT  0 :        REQUEST ERROR «, t00=0x0004, t01=0x011c}
0x0780…07c4              Head {h00=0x0040, h01=0x0050, text=»*   BIT  2 :        END OF JOURNAL  **IN REL 10...** =6(=4) «, t00=0x0004, t01=0x0146}
0x07c4…0808              Head {h00=0x0040, h01=0x0050, text=»*   BIT 10 :        END OF JOURNAL  **IN REL 8 & 9**      =6«, t00=0x0004, t01=0x018a}
0x0808…0840              Head {h00=0x0034, h01=0x0050, text=»*   BIT 10 :        DOCUMENT OUT              =4«, t00=0x0005, t01=0x003e}
0x0840…086c              Head {h00=0x0028, h01=0x0050, text=»*   BIT 13 :        CODE CHECK ERROR«, t00=0x0005, t01=0x0076}
0x086c…0894              Head {h00=0x0024, h01=0x0050, text=»*   BIT 15 :        NOT OPERABLE«, t00=0x0005, t01=0x00a2}
0x0894…089e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ca}
0x089e…08a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d4}
0x08a8…08ca              Head {h00=0x001e, h01=0x0050, text=»*   NORMAL REGISTER USAGE:«, t00=0x0005, t01=0x00de}
0x08ca…08d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0100}
0x08d4…08fa              Head {h00=0x0022, h01=0x0050, text=»*   REGISTER A1: WORK REGISTER«, t00=0x0005, t01=0x010a}
0x08fa…0920              Head {h00=0x0022, h01=0x0050, text=»*            A2: INPUT/OUTPUT «, t00=0x0005, t01=0x0130}
0x0920…0948              Head {h00=0x0024, h01=0x0050, text=»*            A3: BUFFER POINTER «, t00=0x0005, t01=0x0156}
0x0948…0970              Head {h00=0x0024, h01=0x0050, text=»*            A4: OUTPUT COUNTER «, t00=0x0005, t01=0x017e}
0x0970…0996              Head {h00=0x0022, h01=0x0050, text=»*            A5: STACK POINTER«, t00=0x0006, t01=0x0016}
0x0996…09ba              Head {h00=0x0020, h01=0x0050, text=»*            A6: DWT-ADDRESS«, t00=0x0006, t01=0x003c}
0x09ba…09d8              Head {h00=0x001a, h01=0x0050, text=»*            A7: ORDER«, t00=0x0006, t01=0x0060}
0x09d8…09fc              Head {h00=0x0020, h01=0x0050, text=»*            A8: ECB-ADDRESS«, t00=0x0006, t01=0x007e}
0x09fc…0a06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a2}
0x0a06…0a10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00ac}
0x0a10…0a1e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00b6}
0x0a1e…0a28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00c4}
0x0a28…0a3c              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x00ce}
0x0a3c…0a50              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x00e2}
0x0a50…0a64              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x00f6}
0x0a64…0a6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x010a}
0x0a6e…0a78              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0114}
0x0a78…0a9a              Head {h00=0x001e, h01=0x0050, text=» ENTRY TPAD3 ADDRESS BLOCK«, t00=0x0006, t01=0x011e}
0x0a9a…0aa4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0140}
0x0aa4…0aae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x014a}
0x0aae…0ab8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0154}
0x0ab8…0ace              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x015e}
0x0ace…0ae4              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0006, t01=0x0174}
0x0ae4…0afa              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x018a}
0x0afa…0b04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0010}
0x0b04…0b0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001a}
0x0b0e…0b3e              Head {h00=0x002c, h01=0x0050, text=» EXTRN TDISP DISPATCHING FROM INTERRUPT «, t00=0x0007, t01=0x0024}
0x0b3e…0b66              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE DISPATCH I/O ERROR«, t00=0x0007, t01=0x0054}
0x0b66…0b90              Head {h00=0x0026, h01=0x0050, text=» EXTRN DISEND END I/O AND DISPATCH«, t00=0x0007, t01=0x007c}
0x0b90…0bba              Head {h00=0x0026, h01=0x0050, text=» EXTRN OUTPUT OUTPUT ONE CHARACTER«, t00=0x0007, t01=0x00a6}
0x0bba…0be0              Head {h00=0x0022, h01=0x0050, text=» EXTRN LDREG RESTORE REGISTERS«, t00=0x0007, t01=0x00d0}
0x0be0…0c04              Head {h00=0x0020, h01=0x0050, text=» EXTRN SAVE8 SAVE REG. A1-A8«, t00=0x0007, t01=0x00f6}
0x0c04…0c38              Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB BUFFER «, t00=0x0007, t01=0x011a}
0x0c38…0c64              Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTST DWT STATUS DISPLACEMENT«, t00=0x0007, t01=0x014e}
0x0c64…0c8e              Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTECB DWT ECB DISPLACEMENT«, t00=0x0007, t01=0x017a}
0x0c8e…0cba              Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOR DWT ORDER DISPLACEMENT «, t00=0x0008, t01=0x0014}
0x0cba…0ce6              Head {h00=0x0028, h01=0x0050, text=» EXTRN DTTP03 DOCUMENT TABLE ADDRESS«, t00=0x0008, t01=0x0040}
0x0ce6…0d12              Head {h00=0x0028, h01=0x0050, text=» EXTRN TLTP03 DOCUMENT TABLE LENGTH «, t00=0x0008, t01=0x006c}
0x0d12…0d48              Head {h00=0x0032, h01=0x0050, text=» EXTRN STREG STORE REG = GET STATUS INPUT CHAR«, t00=0x0008, t01=0x0098}
0x0d48…0d6e              Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTP DWT TIMER POINTER«, t00=0x0008, t01=0x00ce}
0x0d6e…0d96              Head {h00=0x0024, h01=0x0050, text=» EXTRN SETIMP SET TIMER ROUTINE «, t00=0x0008, t01=0x00f4}
0x0d96…0da4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x011c}
0x0da4…0dae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x012a}
0x0dae…0db8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0134}
0x0db8…0dce              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0008, t01=0x013e}
0x0dce…0de4              Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0008, t01=0x0154}
0x0de4…0dfa              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0008, t01=0x016a}
0x0dfa…0e04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0180}
0x0e04…0e30              Head {h00=0x0028, h01=0x0050, text=»REL EQU 9 ADAPTED FOR TOSS REL X =6 «, t00=0x0008, t01=0x018a}
0x0e30…0e3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0026}
0x0e3a…0e62              Head {h00=0x0024, h01=0x0050, text=»STB EQU /82 START OF TEXT BLOCK «, t00=0x0009, t01=0x0030}
0x0e62…0e88              Head {h00=0x0022, h01=0x0050, text=»ETB EQU /97 END OF TEXT BLOCK «, t00=0x0009, t01=0x0058}
0x0e88…0eae              Head {h00=0x0022, h01=0x0050, text=»SPEC EQU /0E SPECIAL CHARACTER«, t00=0x0009, t01=0x007e}
0x0eae…0ed4              Head {h00=0x0022, h01=0x0050, text=»EXE EQU /06 EXECUTE TP71 ORDER«, t00=0x0009, t01=0x00a4}
0x0ed4…0ef4              Head {h00=0x001c, h01=0x0050, text=»ETX EQU /03 END OF TEXT «, t00=0x0009, t01=0x00ca}
0x0ef4…0f1a              Head {h00=0x0022, h01=0x0050, text=»RESET EQU /0C RESET CHARACTER «, t00=0x0009, t01=0x00ea}
0x0f1a…0f2a              Head {h00=0x000c, h01=0x0050, text=»   U =4 «, t00=0x0009, t01=0x0110}
0x0f2a…0f4c              Head {h00=0x001e, h01=0x0050, text=»TIME EQU 10 TIME OUT (1S) «, t00=0x0009, t01=0x0120}
0x0f4c…0f64              Head {h00=0x0014, h01=0x0050, text=» IFF REL=8 U =6 «, t00=0x0009, t01=0x0142}
0x0f64…0f7c              Head {h00=0x0014, h01=0x0050, text=» IFF REL=9 U =6 «, t00=0x0009, t01=0x015a}
0x0f7c…0fac              Head {h00=0x002c, h01=0x0050, text=»ENDJ EQU /2000 END OF JOURNAL STATUS =6 «, t00=0x0009, t01=0x0172}
0x0fac…0fbe              Head {h00=0x000e, h01=0x0050, text=» XIF  U =6«, t00=0x000a, t01=0x0012}
0x0fbe…0fd6              Head {h00=0x0014, h01=0x0050, text=» IFT REL=8 U =6 «, t00=0x000a, t01=0x0024}
0x0fd6…1004              Head {h00=0x002a, h01=0x0050, text=»ENDJ EQU /20 END OF JOURNAL STATUS =6 «, t00=0x000a, t01=0x003c}
0x1004…1016              Head {h00=0x000e, h01=0x0050, text=» XIF  U =6«, t00=0x000a, t01=0x006a}
0x1016…102e              Head {h00=0x0014, h01=0x0050, text=» IFT REL=9 U =6 «, t00=0x000a, t01=0x007c}
0x102e…105c              Head {h00=0x002a, h01=0x0050, text=»ENDJ EQU /20 END OF JOURNAL STATUS =6 «, t00=0x000a, t01=0x0094}
0x105c…106e              Head {h00=0x000e, h01=0x0050, text=» XIF  U =6«, t00=0x000a, t01=0x00c2}
0x106e…1078              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00d4}
0x1078…10a8              Head {h00=0x002c, h01=0x0050, text=»*   PRINTER ORDERS (PO) SENT TO PRINTER «, t00=0x000a, t01=0x00de}
0x10a8…10b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x010e}
0x10b2…10ce              Head {h00=0x0018, h01=0x0050, text=»POTEST EQU /00 TEST «, t00=0x000a, t01=0x0118}
0x10ce…10fc              Head {h00=0x002a, h01=0x0050, text=»POPPAR EQU /04 SET PRINTER PARAMETERS «, t00=0x000a, t01=0x0134}
0x10fc…1130              Head {h00=0x0030, h01=0x0050, text=»POTDOC EQU /07 TRANSFER DOCUMENT PARAMETERS «, t00=0x000a, t01=0x0162}
0x1130…115a              Head {h00=0x0026, h01=0x0050, text=»POPDOC EQU /0B POSITION DOCUMENT  «, t00=0x000b, t01=0x0008}
0x115a…1180              Head {h00=0x0022, h01=0x0050, text=»POWDOC EQU /09 WRITE DOCUMENT «, t00=0x000b, t01=0x0032}
0x1180…11a6              Head {h00=0x0022, h01=0x0050, text=»POWJRL EQU /0D WRITE JOURNAL  «, t00=0x000b, t01=0x0058}
0x11a6…11ce              Head {h00=0x0024, h01=0x0050, text=»PORDOC EQU /08 RELEASE DOCUMENT «, t00=0x000b, t01=0x007e}
0x11ce…11f8              Head {h00=0x0026, h01=0x0050, text=»PODSTA EQU /05 DIAGNOSTIC STATUS  «, t00=0x000b, t01=0x00a6}
0x11f8…1218              Head {h00=0x001c, h01=0x0050, text=»PORECV EQU /01 RECOVERY «, t00=0x000b, t01=0x00d0}
0x1218…1226              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00f0}
0x1226…1230              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00fe}
0x1230…1250              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x0108}
0x1250…1270              Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x0128}
0x1270…1290              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x0148}
0x1290…129a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0168}
0x129a…12d4              Head {h00=0x0036, h01=0x0050, text=»*   THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN«, t00=0x000b, t01=0x0172}
0x12d4…1316              Head {h00=0x003e, h01=0x0050, text=»*   BY SETTING X:A TO 0-11 ACCORDING TO THE LIST BELOW =4 «, t00=0x000c, t01=0x001c}
0x1316…1320              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x005e}
0x1320…1340              Head {h00=0x001c, h01=0x0050, text=»*   NCV=0 GREAT BRITAIN «, t00=0x000c, t01=0x0068}
0x1340…135a              Head {h00=0x0016, h01=0x0050, text=»*       1 GERMANY «, t00=0x000c, t01=0x0088}
0x135a…1372              Head {h00=0x0014, h01=0x0050, text=»*       2 FRANCE«, t00=0x000c, t01=0x00a2}
0x1372…138a              Head {h00=0x0014, h01=0x0050, text=»*       3 SPAIN «, t00=0x000c, t01=0x00ba}
0x138a…13a2              Head {h00=0x0014, h01=0x0050, text=»*       4 ITALY «, t00=0x000c, t01=0x00d2}
0x13a2…13c4              Head {h00=0x001e, h01=0x0050, text=»*       5 SWEDEN, FINLAND «, t00=0x000c, t01=0x00ea}
0x13c4…13ea              Head {h00=0x0022, h01=0x0050, text=»*       6 DENMARK, NORWAY 1   «, t00=0x000c, t01=0x010c}
0x13ea…1404              Head {h00=0x0016, h01=0x0050, text=»*       7 PORTUGAL«, t00=0x000c, t01=0x0132}
0x1404…1420              Head {h00=0x0018, h01=0x0050, text=»*       8 YOGUSLAVIA«, t00=0x000c, t01=0x014c}
0x1420…1436              Head {h00=0x0012, h01=0x0050, text=»*       9 USA «, t00=0x000c, t01=0x0168}
0x1436…145c              Head {h00=0x0022, h01=0x0050, text=»*      10 DENMARK, NORWAY 2   «, t00=0x000c, t01=0x017e}
0x145c…14a4              Head {h00=0x0044, h01=0x0050, text=»*      11 FRANCE 2  (NOT YET IMPLEMENTED IN THE PRINTERS)    =4 «, t00=0x000d, t01=0x0014}
0x14a4…14ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x005c}
0x14ae…14c0              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000d, t01=0x0066}
0x14c0…14d6              Head {h00=0x0012, h01=0x0050, text=»STDNCV EQU X:A«, t00=0x000d, t01=0x0078}
0x14d6…14e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x008e}
0x14e0…151a              Head {h00=0x0036, h01=0x0050, text=»*   THE LOWER CASE SET CAN BE INCLUDED AS STANDARD«, t00=0x000d, t01=0x0098}
0x151a…1536              Head {h00=0x0018, h01=0x0050, text=»*   BY SETTING X:B=1«, t00=0x000d, t01=0x00d2}
0x1536…1540              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ee}
0x1540…1552              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 0 «, t00=0x000d, t01=0x00f8}
0x1552…1566              Head {h00=0x0010, h01=0x0050, text=»STDL EQU X:B«, t00=0x000d, t01=0x010a}
0x1566…1570              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011e}
0x1570…15aa              Head {h00=0x0036, h01=0x0050, text=»*   THE STANDARD CHARACTER PITCH FOR THE DOCUMENT «, t00=0x000d, t01=0x0128}
0x15aa…15ea              Head {h00=0x003c, h01=0x0050, text=»*   STATION IS CHOOSEN BY SETTING X:C TO             =4 «, t00=0x000d, t01=0x0162}
0x15ea…162a              Head {h00=0x003c, h01=0x0050, text=»*   0=15 CH/INCH, 1=12 CH/INCH OR 2=10 CH/INCH       =4 «, t00=0x000e, t01=0x0012}
0x162a…1634              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0052}
0x1634…1646              Head {h00=0x000e, h01=0x0050, text=»X:C EQU 2 «, t00=0x000e, t01=0x005c}
0x1646…165c              Head {h00=0x0012, h01=0x0050, text=»STDCPD EQU X:C«, t00=0x000e, t01=0x006e}
0x165c…1666              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0084}
0x1666…1696              Head {h00=0x002c, h01=0x0050, text=»*   THE JOURNAL STATION CAN BE EXCLUDED «, t00=0x000e, t01=0x008e}
0x1696…16b2              Head {h00=0x0018, h01=0x0050, text=»*   BY SETTING X:D=0«, t00=0x000e, t01=0x00be}
0x16b2…16bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00da}
0x16bc…16ce              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 1 «, t00=0x000e, t01=0x00e4}
0x16ce…16e4              Head {h00=0x0012, h01=0x0050, text=»JOURNL EQU X:D«, t00=0x000e, t01=0x00f6}
0x16e4…16ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x010c}
0x16ee…1726              Head {h00=0x0034, h01=0x0050, text=»*   THE STANDARD CHARACTER PITCH FOR THE JOURNAL«, t00=0x000e, t01=0x0116}
0x1726…1768              Head {h00=0x003e, h01=0x0050, text=»*   STATION IS CHOOSEN BY SETTING X:E TO               =4 «, t00=0x000e, t01=0x014e}
0x1768…17aa              Head {h00=0x003e, h01=0x0050, text=»*   0=15 CH/INCH, 1=12 CH/INCH OR 2=10 CH/INCH         =4 «, t00=0x000e, t01=0x0190}
0x17aa…17b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0042}
0x17b4…17c6              Head {h00=0x000e, h01=0x0050, text=»X:E EQU 0 «, t00=0x000f, t01=0x004c}
0x17c6…17dc              Head {h00=0x0012, h01=0x0050, text=»STDCPJ EQU X:E«, t00=0x000f, t01=0x005e}
0x17dc…17e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e6…1828              Head {h00=0x003e, h01=0x0050, text=»* THE "SET PARAMETER" ORDERS 24 AND 27 CAN BE INCLUDED =6 «, t00=0x000f, t01=0x007e}
0x1828…1864              Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:F=1                                =6«, t00=0x000f, t01=0x00c0}
0x1864…186e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fc}
0x186e…1884              Head {h00=0x0012, h01=0x0050, text=»X:F EQU 0 U =6«, t00=0x000f, t01=0x0106}
0x1884…189a              Head {h00=0x0012, h01=0x0050, text=»PARORD EQU X:F«, t00=0x000f, t01=0x011c}
0x189a…18a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0132}
0x18a4…18d6              Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x000f, t01=0x013c}
0x18d6…1904              Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x000f, t01=0x016e}
0x1904…190e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x000c}
0x190e…1922              Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 0«, t00=0x0010, t01=0x0016}
0x1922…192c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192c…1936              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x1936…1970              Head {h00=0x0036, h01=0x0050, text=»* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION«, t00=0x0010, t01=0x003e}
0x1970…19a2              Head {h00=0x002e, h01=0x0050, text=»* SET IS OBTAINED BY SETTING CPU852 EQU 0.«, t00=0x0010, t01=0x0078}
0x19a2…19ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00aa}
0x19ac…19c0              Head {h00=0x0010, h01=0x0050, text=»CPU852 EQU 1«, t00=0x0010, t01=0x00b4}
0x19c0…19ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c8}
0x19ca…19e6              Head {h00=0x0018, h01=0x0050, text=»*   MMU BUFFER SIZE «, t00=0x0010, t01=0x00d2}
0x19e6…19f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00ee}
0x19f0…1a08              Head {h00=0x0014, h01=0x0050, text=»X:G EQU 095 U =4«, t00=0x0010, t01=0x00f8}
0x1a08…1a1e              Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:G«, t00=0x0010, t01=0x0110}
0x1a1e…1a28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0126}
0x1a28…1a30              Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0130}
0x1a30…1a38              Head {h00=0x0004, h01=0x0050, t00=0x0010, t01=0x0138}
0x1a38…1a80              Head {h00=0x0044, h01=0x0050, text=»PRIPAR FORM 1=1,2=0,1=STDL,4=STDNCV,2=1,2=STDCPJ,2=1,2=STDCPD =4«, t00=0x0010, t01=0x0140}
0x1a80…1a8e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x0188}
0x1a8e…1a98              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0008}
0x1a98…1aa2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0012}
0x1aa2…1ac0              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0011, t01=0x001c}
0x1ac0…1ade              Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x0011, t01=0x003a}
0x1ade…1afc              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0011, t01=0x0058}
0x1afc…1b06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0076}
0x1b06…1b10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0080}
0x1b10…1b1a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x008a}
0x1b1a…1b4e              Head {h00=0x0030, h01=0x0050, text=»DWTDRD EQU /10 START OF DRIVER DEFINED PART «, t00=0x0011, t01=0x0094}
0x1b4e…1b58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00c8}
0x1b58…1b6e              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0011, t01=0x00d2}
0x1b6e…1b86              Head {h00=0x0014, h01=0x0050, text=»START EQU DWTDRD«, t00=0x0011, t01=0x00e8}
0x1b86…1b92              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0100}
0x1b92…1b9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x010c}
0x1b9c…1bb2              Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0011, t01=0x0116}
0x1bb2…1bcc              Head {h00=0x0016, h01=0x0050, text=»START EQU DWTDRD+4«, t00=0x0011, t01=0x012c}
0x1bcc…1bd8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0011, t01=0x0146}
0x1bd8…1be2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0152}
0x1be2…1c10              Head {h00=0x002a, h01=0x0050, text=»DWTPP EQU START+18 PRINTER PARAMETERS «, t00=0x0011, t01=0x015c}
0x1c10…1c3e              Head {h00=0x002a, h01=0x0050, text=»DWTPPJ EQU START+20 PRINT POS JOURNAL «, t00=0x0011, t01=0x018a}
0x1c3e…1c72              Head {h00=0x0030, h01=0x0050, text=»DWTAPJ EQU DWTPPJ+1 ACTUAL PRINT POS JOURNAL«, t00=0x0012, t01=0x0028}
0x1c72…1ca8              Head {h00=0x0032, h01=0x0050, text=»DWTRPJ EQU DWTPPJ REQUESTED PRINT POS JOURNAL «, t00=0x0012, t01=0x005c}
0x1ca8…1cd6              Head {h00=0x002a, h01=0x0050, text=»DWTPPD EQU START+22 PRINT POS DOCUMENT«, t00=0x0012, t01=0x0092}
0x1cd6…1d0c              Head {h00=0x0032, h01=0x0050, text=»DWTAPD EQU DWTPPD+1 ACTUAL PRINT POS DOCUMENT «, t00=0x0012, t01=0x00c0}
0x1d0c…1d42              Head {h00=0x0032, h01=0x0050, text=»DWTRPD EQU DWTPPD REQUESTED PRINT POS DOCUMENT«, t00=0x0012, t01=0x00f6}
0x1d42…1d74              Head {h00=0x002e, h01=0x0050, text=»DWTLN EQU START+24 LINE NUMBER ON DOCUMENT«, t00=0x0012, t01=0x012c}
0x1d74…1dae              Head {h00=0x0036, h01=0x0050, text=»DWTALN EQU DWTLN+1 ACTUAL LINE NUMBER ON DOCUMENT «, t00=0x0012, t01=0x015e}
0x1dae…1de8              Head {h00=0x0036, h01=0x0050, text=»DWTRLN EQU DWTLN REQUESTED LINE NUMBER ON DOCUMENT«, t00=0x0013, t01=0x0008}
0x1de8…1e16              Head {h00=0x002a, h01=0x0050, text=»DWTDP EQU START+26 DOCUMENT PARAMETERS«, t00=0x0013, t01=0x0042}
0x1e16…1e20              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0070}
0x1e20…1e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x007a}
0x1e2a…1e48              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0013, t01=0x0084}
0x1e48…1e66              Head {h00=0x001a, h01=0x0050, text=»* ECB-DISPLACEMENTS * «, t00=0x0013, t01=0x00a2}
0x1e66…1e84              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x0013, t01=0x00c0}
0x1e84…1e8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00de}
0x1e8e…1eb8              Head {h00=0x0026, h01=0x0050, text=»ECBBA EQU 2 BUFFER ADDRESS IN ECB «, t00=0x0013, t01=0x00e8}
0x1eb8…1ee4              Head {h00=0x0028, h01=0x0050, text=»ECBRL EQU 4 REQUESTED LENGTH IN ECB «, t00=0x0013, t01=0x0112}
0x1ee4…1f10              Head {h00=0x0028, h01=0x0050, text=»ECBEL EQU 6 EFFECTIVE LENGTH IN ECB «, t00=0x0013, t01=0x013e}
0x1f10…1f36              Head {h00=0x0022, h01=0x0050, text=»ECBRC EQU 8 RETURN CODE IN ECB«, t00=0x0013, t01=0x016a}
0x1f36…1f5e              Head {h00=0x0024, h01=0x0050, text=»ECBCW EQU 10 CONTROL WORD IN ECB«, t00=0x0013, t01=0x0190}
0x1f5e…1f6c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x0028}
0x1f6c…1f76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0036}
0x1f76…1f88              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0014, t01=0x0040}
0x1f88…1f9a              Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x0014, t01=0x0052}
0x1f9a…1fac              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0014, t01=0x0064}
0x1fac…1fb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0076}
0x1fb6…1fc0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x0080}
0x1fc0…1fe4              Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x0014, t01=0x008a}
0x1fe4…2000              Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x0014, t01=0x00ae}
0x2000…2022              Head {h00=0x001e, h01=0x0050, text=»TPAD3 EQU * ADDRESS BLOCK «, t00=0x0014, t01=0x00ca}
0x2022…2046              Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x0014, t01=0x00ec}
0x2046…205e              Head {h00=0x0014, h01=0x0050, text=» IFF REL=8 U =6 «, t00=0x0014, t01=0x0110}
0x205e…2084              Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x0014, t01=0x0128}
0x2084…2096              Head {h00=0x000e, h01=0x0050, text=» XIF  U =6«, t00=0x0014, t01=0x014e}
0x2096…20ba              Head {h00=0x0020, h01=0x0050, text=» DATA IHTP INTERRUPT HANDLER«, t00=0x0014, t01=0x0160}
0x20ba…20de              Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x0014, t01=0x0184}
0x20de…20f2              Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x0015, t01=0x0018}
0x20f2…2108              Head {h00=0x0012, h01=0x0050, text=» IFT JOURNL=1 «, t00=0x0015, t01=0x002c}
0x2108…211c              Head {h00=0x0010, h01=0x0050, text=» DATA /0006 «, t00=0x0015, t01=0x0042}
0x211c…2132              Head {h00=0x0012, h01=0x0050, text=» IFT PARORD=1 «, t00=0x0015, t01=0x0056}
0x2132…2146              Head {h00=0x0010, h01=0x0050, text=» DATA /2424 «, t00=0x0015, t01=0x006c}
0x2146…2152              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x0080}
0x2152…2168              Head {h00=0x0012, h01=0x0050, text=» IFT PARORD=1 «, t00=0x0015, t01=0x008c}
0x2168…217c              Head {h00=0x0010, h01=0x0050, text=» DATA /2528 «, t00=0x0015, t01=0x00a2}
0x217c…2188              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0015, t01=0x00b6}
0x2188…21a8              Head {h00=0x001c, h01=0x0050, text=» DATA /0107,/0C38,/3939 «, t00=0x0015, t01=0x00c2}
0x21a8…21c2              Head {h00=0x0016, h01=0x0050, text=»TPLEN EQU *-TPTAB «, t00=0x0015, t01=0x00e2}
0x21c2…21ca              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x00fc}
0x21ca…21d2              Head {h00=0x0004, h01=0x0050, t00=0x0015, t01=0x0104}
0x21d2…2204              Head {h00=0x002e, h01=0x0050, text=»STDPP PRIPAR  STANDARD PRINTER PARAMETERS «, t00=0x0015, t01=0x010c}
0x2204…2212              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x013e}
0x2212…221c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x014c}
0x221c…2226              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0156}
0x2226…223a              Head {h00=0x0010, h01=0x0050, text=»*   A C T P «, t00=0x0015, t01=0x0160}
0x223a…2244              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0174}
0x2244…227a              Head {h00=0x0032, h01=0x0050, text=»*   THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x0015, t01=0x017e}
0x227a…22bc              Head {h00=0x003e, h01=0x0050, text=»*   CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x0016, t01=0x0024}
0x22bc…22c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0066}
0x22c6…22d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0070}
0x22d0…22da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x007a}
0x22da…22fe              Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x0016, t01=0x0084}
0x22fe…2308              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00a8}
0x2308…2312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00b2}
0x2312…2342              Head {h00=0x002c, h01=0x0050, text=»*   GET DWT INDEX: 0=JOURNAL, 1=DOCUMENT«, t00=0x0016, t01=0x00bc}
0x2342…234c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x00ec}
0x234c…2372              Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x0016, t01=0x00f6}
0x2372…2388              Head {h00=0x0012, h01=0x0050, text=» ANK A2,1 MASK«, t00=0x0016, t01=0x011c}
0x2388…23b6              Head {h00=0x002a, h01=0x0050, text=» LC A3,DWTST+1,A6 GET OLD DEVICE VALUE«, t00=0x0016, t01=0x0132}
0x23b6…23ca              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/FE «, t00=0x0016, t01=0x0160}
0x23ca…23dc              Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0016, t01=0x0174}
0x23dc…2402              Head {h00=0x0022, h01=0x0050, text=» SC A3,DWTST+1,A6 STORE INDEX «, t00=0x0016, t01=0x0186}
0x2402…242c              Head {h00=0x0026, h01=0x0050, text=» ADR A7,A2 ADD DWT INDEX TO ORDER «, t00=0x0017, t01=0x001c}
0x242c…245a              Head {h00=0x002a, h01=0x0050, text=» SC A7,DWTOR+1,A6 STORE MODIFIED ORDER«, t00=0x0017, t01=0x0046}
0x245a…2478              Head {h00=0x001a, h01=0x0050, text=»ACT005 LDK A3,TPLEN-1 «, t00=0x0017, t01=0x0074}
0x2478…24aa              Head {h00=0x002e, h01=0x0050, text=»ACT010 CC A7,TPTAB,A3 CHECK IF LEGAL ORDER«, t00=0x0017, t01=0x0092}
0x24aa…24cc              Head {h00=0x001e, h01=0x0050, text=» RF(E) ACT020 VALID ORDER «, t00=0x0017, t01=0x00c4}
0x24cc…24de              Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0017, t01=0x00e6}
0x24de…24fe              Head {h00=0x001c, h01=0x0050, text=» RB(NN) ACT010 TRY NEXT «, t00=0x0017, t01=0x00f8}
0x24fe…2508              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0118}
0x2508…252a              Head {h00=0x001e, h01=0x0050, text=» ABL DISIOE ILLEGAL ORDER «, t00=0x0017, t01=0x0122}
0x252a…2534              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0144}
0x2534…253e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x014e}
0x253e…2552              Head {h00=0x0010, h01=0x0050, text=»ACT020 EQU *«, t00=0x0017, t01=0x0158}
0x2552…256e              Head {h00=0x0018, h01=0x0050, text=» ADR A3,A3 GET INDEX«, t00=0x0017, t01=0x016c}
0x256e…2592              Head {h00=0x0020, h01=0x0050, text=» ABI TPFUC,A3 EXECUTE ORDER «, t00=0x0017, t01=0x0188}
0x2592…25a6              Head {h00=0x0010, h01=0x0050, text=»TPFUC EQU * «, t00=0x0018, t01=0x001c}
0x25a6…25c2              Head {h00=0x0018, h01=0x0050, text=» DATA TSTSTA,WRTJRL «, t00=0x0018, t01=0x0030}
0x25c2…25d8              Head {h00=0x0012, h01=0x0050, text=» IFT PARORD=1 «, t00=0x0018, t01=0x004c}
0x25d8…25f4              Head {h00=0x0018, h01=0x0050, text=» DATA PRTPAR,PRTPAR «, t00=0x0018, t01=0x0062}
0x25f4…2600              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x007e}
0x2600…2616              Head {h00=0x0012, h01=0x0050, text=» IFT PARORD=1 «, t00=0x0018, t01=0x008a}
0x2616…2632              Head {h00=0x0018, h01=0x0050, text=» DATA PRTPAR,DOCPAR «, t00=0x0018, t01=0x00a0}
0x2632…263e              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0018, t01=0x00bc}
0x263e…2676              Head {h00=0x0034, h01=0x0050, text=» DATA TSTSTA,WRTDOC,POSDOC,TRFDOC,RELDOC,RELDOC «, t00=0x0018, t01=0x00c8}
0x2676…2684              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x0100}
0x2684…268e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x010e}
0x268e…2698              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0118}
0x2698…26ba              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 00 : TEST STATUS«, t00=0x0018, t01=0x0122}
0x26ba…26c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0144}
0x26c4…26ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014e}
0x26ce…26e2              Head {h00=0x0010, h01=0x0050, text=»TSTSTA EQU *«, t00=0x0018, t01=0x0158}
0x26e2…270a              Head {h00=0x0024, h01=0x0050, text=» LDR A1,A6 SAVE DWT AS PARAMETER«, t00=0x0018, t01=0x016c}
0x270a…2722 (25, 0, 400) Head {h00=0x0014, h01=0x0050, text=» LDKL A4,DWTTP  «, t00=0x0019, t01=0x0004}
0x2722…274a              Head {h00=0x0024, h01=0x0050, text=» ADR A4,A6 SET UP TIMER POINTER «, t00=0x0019, t01=0x001c}
0x274a…2772              Head {h00=0x0024, h01=0x0050, text=» CF A15,SETIMP START TIMER OF 1S«, t00=0x0019, t01=0x0044}
0x2772…27a6              Head {h00=0x0030, h01=0x0050, text=» DATA TSST20,TIME TIME OUT ADRESS AND VALUE «, t00=0x0019, t01=0x006c}
0x27a6…27cc              Head {h00=0x0022, h01=0x0050, text=» LDK A3,POTEST LOAD TEST ORDER«, t00=0x0019, t01=0x00a0}
0x27cc…27ea              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0019, t01=0x00c6}
0x27ea…2818              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0019, t01=0x00e4}
0x2818…282a              Head {h00=0x000e, h01=0x0050, text=» LDK A3,8 «, t00=0x0019, t01=0x0112}
0x282a…283c              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x0019, t01=0x0124}
0x283c…2864              Head {h00=0x0024, h01=0x0050, text=» RF(Z) TSST10 NOT PRINTER ANSWER«, t00=0x0019, t01=0x0136}
0x2864…2876              Head {h00=0x000e, h01=0x0050, text=» LDK A3,3 «, t00=0x0019, t01=0x015e}
0x2876…2888              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x0019, t01=0x0170}
0x2888…28aa              Head {h00=0x001e, h01=0x0050, text=» RF(Z) TSST10 NOT JE OR GE«, t00=0x0019, t01=0x0182}
0x28aa…28d2              Head {h00=0x0024, h01=0x0050, text=» LDK A3,PODSTA JE OR GE EXECUTE «, t00=0x001a, t01=0x0014}
0x28d2…28f8              Head {h00=0x0022, h01=0x0050, text=» CF A5,ORDER DIAGNOSTICSTATUS «, t00=0x001a, t01=0x003c}
0x28f8…290e              Head {h00=0x0012, h01=0x0050, text=» CF A5,EXECUT «, t00=0x001a, t01=0x0062}
0x290e…2924              Head {h00=0x0012, h01=0x0050, text=»TSST10 EQU *  «, t00=0x001a, t01=0x0078}
0x2924…2932              Head {h00=0x000a, h01=0x0050, text=» INH  «, t00=0x001a, t01=0x008e}
0x2932…2954              Head {h00=0x001e, h01=0x0050, text=» CM* DWTTP,A6 RESET TIMER «, t00=0x001a, t01=0x009c}
0x2954…297c              Head {h00=0x0024, h01=0x0050, text=» CM DWTTP,A6 RESET TIMER POINTER«, t00=0x001a, t01=0x00be}
0x297c…29a4              Head {h00=0x0024, h01=0x0050, text=» CM ECBCW,A8 CLEAR CTRL WORD =2 «, t00=0x001a, t01=0x00e6}
0x29a4…29c6              Head {h00=0x001e, h01=0x0050, text=» ABL STATUS UPDATE STATUS «, t00=0x001a, t01=0x010e}
0x29c6…29ee              Head {h00=0x0024, h01=0x0050, text=»TSST20 LDR A6,A1 GET DWT ADDRESS«, t00=0x001a, t01=0x0130}
0x29ee…2a16              Head {h00=0x0024, h01=0x0050, text=» LDK A2,1 INDICATE NOT OPERABLE «, t00=0x001a, t01=0x0158}
0x2a16…2a2a              Head {h00=0x0010, h01=0x0050, text=» RB TSST10  «, t00=0x001a, t01=0x0180}
0x2a2a…2a40 (27, 0, 398) Head {h00=0x0012, h01=0x0050, text=» IFT JOURNL=1 «, t00=0x001b, t01=0x0004}
0x2a40…2a50              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x001b, t01=0x001a}
0x2a50…2a58              Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x002a}
0x2a58…2a62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0032}
0x2a62…2a6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x003c}
0x2a6c…2a90              Head {h00=0x0020, h01=0x0050, text=»*   ORDER 06 : WRITE JOURNAL«, t00=0x001b, t01=0x0046}
0x2a90…2a9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x006a}
0x2a9a…2aa4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0074}
0x2aa4…2ab8              Head {h00=0x0010, h01=0x0050, text=»WRTJRL EQU *«, t00=0x001b, t01=0x007e}
0x2ab8…2af2              Head {h00=0x0036, h01=0x0050, text=» LDK A3,POWJRL SET UP PRINTER WRITE JOURNAL ORDER «, t00=0x001b, t01=0x0092}
0x2af2…2b10              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x001b, t01=0x00cc}
0x2b10…2b28              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTST,A6 «, t00=0x001b, t01=0x00ea}
0x2b28…2b3e              Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/400 «, t00=0x001b, t01=0x0102}
0x2b3e…2b60              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) WRJL10 LF EXECUTED«, t00=0x001b, t01=0x0118}
0x2b60…2b8c              Head {h00=0x0028, h01=0x0050, text=» LDK A3,1 SET UP ECB BUFFER POINTER «, t00=0x001b, t01=0x013a}
0x2b8c…2bb8              Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x001b, t01=0x0166}
0x2bb8…2bca (28, 0, 398) Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x001c, t01=0x0004}
0x2bca…2bf6              Head {h00=0x0028, h01=0x0050, text=» RF(NP) WRJL70 REQ LENGTH TOO SHORT «, t00=0x001c, t01=0x0016}
0x2bf6…2c20              Head {h00=0x0026, h01=0x0050, text=» LDR A1,A2 SET UP CTRL CHAR IN A1 «, t00=0x001c, t01=0x0042}
0x2c20…2c34              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2B «, t00=0x001c, t01=0x006c}
0x2c34…2c58              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRJL10 CTRL CHAR =/2B«, t00=0x001c, t01=0x0080}
0x2c58…2c7e              Head {h00=0x0022, h01=0x0050, text=» CM DWTPPJ,A6 CLEAR PRINT POS «, t00=0x001c, t01=0x00a4}
0x2c7e…2c90              Head {h00=0x000e, h01=0x0050, text=» LDK A2,2 «, t00=0x001c, t01=0x00ca}
0x2c90…2ca2              Head {h00=0x000e, h01=0x0050, text=» SUK A1,5 «, t00=0x001c, t01=0x00dc}
0x2ca2…2cc6              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRJL05 CTRL CHAR =/30«, t00=0x001c, t01=0x00ee}
0x2cc6…2cd8              Head {h00=0x000e, h01=0x0050, text=» LDK A2,1 «, t00=0x001c, t01=0x0112}
0x2cd8…2cea              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x001c, t01=0x0124}
0x2cea…2d14              Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRJL05 CTRL CHAR NOT =/31 «, t00=0x001c, t01=0x0136}
0x2d14…2d26              Head {h00=0x000e, h01=0x0050, text=» LDK A2,3 «, t00=0x001c, t01=0x0160}
0x2d26…2d4a              Head {h00=0x0020, h01=0x0050, text=»WRJL05 CF A5,OUT SEND LF INF«, t00=0x001c, t01=0x0172}
0x2d4a…2d78              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x001d, t01=0x0008}
0x2d78…2d8a              Head {h00=0x000e, h01=0x0050, text=» LDK A1,7 «, t00=0x001d, t01=0x0036}
0x2d8a…2d9c              Head {h00=0x000e, h01=0x0050, text=» TM A1,A2 «, t00=0x001d, t01=0x0048}
0x2d9c…2dbe              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) WRJL90 GE,JE OR RE«, t00=0x001d, t01=0x005a}
0x2dbe…2dd4              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/400 «, t00=0x001d, t01=0x007c}
0x2dd4…2dfc              Head {h00=0x0024, h01=0x0050, text=» ORS A1,DWTST,A6 IND LF EXECUTED«, t00=0x001d, t01=0x0092}
0x2dfc…2e0e              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x001d, t01=0x00ba}
0x2e0e…2e26              Head {h00=0x0014, h01=0x0050, text=» CW A1,ECBRL,A8 «, t00=0x001d, t01=0x00cc}
0x2e26…2e4e              Head {h00=0x0024, h01=0x0050, text=» RF(E) WRJL90 NO BUFFER TO PRINT«, t00=0x001d, t01=0x00e4}
0x2e4e…2e60              Head {h00=0x000e, h01=0x0050, text=» RB WRTJRL«, t00=0x001d, t01=0x010c}
0x2e60…2e78              Head {h00=0x0014, h01=0x0050, text=»WRJL10 LDK A2,0 «, t00=0x001d, t01=0x011e}
0x2e78…2e94              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT SEND 0 LF«, t00=0x001d, t01=0x0136}
0x2e94…2eca              Head {h00=0x0032, h01=0x0050, text=» LDKL A4,/100 SET UP NORMAL CHAR COUNTER IN A4«, t00=0x001d, t01=0x0152}
0x2eca…2ef2              Head {h00=0x0024, h01=0x0050, text=» LDK A3,2 SET UP BUFFER POINTER «, t00=0x001d, t01=0x0188}
0x2ef2…2f2c              Head {h00=0x0036, h01=0x0050, text=»WRJL20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x001e, t01=0x0020}
0x2f2c…2f3e              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x001e, t01=0x005a}
0x2f3e…2f64              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRJL50 BUFFER FINISHED «, t00=0x001e, t01=0x006c}
0x2f64…2f86              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A2 GET CHAR IN A1 «, t00=0x001e, t01=0x0092}
0x2f86…2f90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x00b4}
0x2f90…2fc6              Head {h00=0x0032, h01=0x0050, text=»*   EXAMINE CHAR AND UPDATE PRINT POS AND SEND«, t00=0x001e, t01=0x00be}
0x2fc6…2ff0              Head {h00=0x0026, h01=0x0050, text=»*   DEPENDING ON TYPE OF CHARACTER«, t00=0x001e, t01=0x00f4}
0x2ff0…2ffa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x011e}
0x2ffa…300e              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x001e, t01=0x0128}
0x300e…302e              Head {h00=0x001c, h01=0x0050, text=» RB(N) WRJL20 CHAR </10 «, t00=0x001e, t01=0x013c}
0x302e…304e              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRJL30 CHAR = /10«, t00=0x001e, t01=0x015c}
0x304e…3060              Head {h00=0x000e, h01=0x0050, text=» SUK A1,9 «, t00=0x001e, t01=0x017c}
0x3060…308e              Head {h00=0x002a, h01=0x0050, text=» RF(NZ) WRJL25 CHAR NOT /19 (=EXPAND) «, t00=0x001e, t01=0x018e}
0x308e…30be              Head {h00=0x002c, h01=0x0050, text=» XRKL A4,/300 SWITCH CHAR COUNTER IN A4 «, t00=0x001f, t01=0x002c}
0x30be…30e2              Head {h00=0x0020, h01=0x0050, text=» RF WRJL40 SEND EXPAND CHAR «, t00=0x001f, t01=0x005c}
0x30e2…30fa              Head {h00=0x0014, h01=0x0050, text=»WRJL25 SUK A1,7 «, t00=0x001f, t01=0x0080}
0x30fa…311e              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRJL40 CHAR </20 SEND«, t00=0x001f, t01=0x0098}
0x311e…3132              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/5F «, t00=0x001f, t01=0x00bc}
0x3132…3156              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRJL40 CHAR =/7F SEND«, t00=0x001f, t01=0x00d0}
0x3156…317a              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRJL30 CHAR = NORMAL «, t00=0x001f, t01=0x00f4}
0x317a…318e              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2F «, t00=0x001f, t01=0x0118}
0x318e…31ae              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRJL28 CHAR =/AE «, t00=0x001f, t01=0x012c}
0x31ae…31dc              Head {h00=0x002a, h01=0x0050, text=» CF A5,ERROR ILLEGAL CHAR = SEND RESET«, t00=0x001f, t01=0x014c}
0x31dc…3204              Head {h00=0x0024, h01=0x0050, text=» LDK A2,/80 IND CODE CHECK ERROR«, t00=0x001f, t01=0x017a}
0x3204…3216              Head {h00=0x000e, h01=0x0050, text=» RF WRJL90«, t00=0x0020, t01=0x0012}
0x3216…3230              Head {h00=0x0016, h01=0x0050, text=»WRJL28 LDK A2,/0E «, t00=0x0020, t01=0x0024}
0x3230…3242              Head {h00=0x000e, h01=0x0050, text=» RF WRJL40«, t00=0x0020, t01=0x003e}
0x3242…324a              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0050}
0x324a…326c              Head {h00=0x001e, h01=0x0050, text=»*   UPDATE PRINT POSITION «, t00=0x0020, t01=0x0058}
0x326c…3274              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x007a}
0x3274…32b0              Head {h00=0x0038, h01=0x0050, text=»WRJL30 ADS A4,DWTRPJ,A6 ADD 1 OR 2 TO REQ PRINT POS «, t00=0x0020, t01=0x0082}
0x32b0…32b8              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00be}
0x32b8…32dc              Head {h00=0x0020, h01=0x0050, text=»*   SEND CHARACTER TO DEVICE«, t00=0x0020, t01=0x00c6}
0x32dc…32e4              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00ea}
0x32e4…330e              Head {h00=0x0026, h01=0x0050, text=»WRJL40 CF A5,OUTPUT SEND CHARACTER«, t00=0x0020, t01=0x00f2}
0x330e…3334              Head {h00=0x0022, h01=0x0050, text=» RB WRJL20 GET NEXT CHARACTER «, t00=0x0020, t01=0x011c}
0x3334…333c              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x0142}
0x333c…3350              Head {h00=0x0010, h01=0x0050, text=»*   SEND ETX«, t00=0x0020, t01=0x014a}
0x3350…3358              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x015e}
0x3358…338c              Head {h00=0x0030, h01=0x0050, text=»WRJL50 CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0020, t01=0x0166}
0x338c…339e              Head {h00=0x000e, h01=0x0050, text=» RF WRJL90«, t00=0x0021, t01=0x000a}
0x339e…33c4              Head {h00=0x0022, h01=0x0050, text=»WRJL70 CF A5,ERROR SEND RESET «, t00=0x0021, t01=0x001c}
0x33c4…33ea              Head {h00=0x0022, h01=0x0050, text=»WRJL80 LDK A2,4 IND REQ ERROR «, t00=0x0021, t01=0x0042}
0x33ea…3404              Head {h00=0x0016, h01=0x0050, text=»WRJL90 ABL STATUS «, t00=0x0021, t01=0x0068}
0x3404…3412              Head {h00=0x000a, h01=0x0050, text=» XIF  «, t00=0x0021, t01=0x0082}
0x3412…3422              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0021, t01=0x0090}
0x3422…342c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00a0}
0x342c…3436              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00aa}
0x3436…345c              Head {h00=0x0022, h01=0x0050, text=»*   ORDER 06 : WRITE DOCUMENT «, t00=0x0021, t01=0x00b4}
0x345c…3466              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00da}
0x3466…3470              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00e4}
0x3470…3484              Head {h00=0x0010, h01=0x0050, text=»WRTDOC EQU *«, t00=0x0021, t01=0x00ee}
0x3484…34ac              Head {h00=0x0024, h01=0x0050, text=» LC A4,DWTALN,A6 GET ACTUAL LINE«, t00=0x0021, t01=0x0102}
0x34ac…34c0              Head {h00=0x0010, h01=0x0050, text=» ANK A4,/FF «, t00=0x0021, t01=0x012a}
0x34c0…34ea              Head {h00=0x0026, h01=0x0050, text=» ABL(Z) WRDO80 DOC NOT POSITIONED «, t00=0x0021, t01=0x013e}
0x34ea…350c              Head {h00=0x001e, h01=0x0050, text=» LDK A3,1 SET BUFFER INDEX«, t00=0x0021, t01=0x0168}
0x350c…3538              Head {h00=0x0028, h01=0x0050, text=» CF A15,GETCHR GET CONTROL CHARACTER«, t00=0x0021, t01=0x018a}
0x3538…354a              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0022, t01=0x0026}
0x354a…3570              Head {h00=0x0022, h01=0x0050, text=» ABL(NP) WRDO80 REQ LENGTH < 2«, t00=0x0022, t01=0x0038}
0x3570…3584              Head {h00=0x0010, h01=0x0050, text=» SUK A2,/2B «, t00=0x0022, t01=0x005e}
0x3584…35aa              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO05 CTRL CHAR = /2B «, t00=0x0022, t01=0x0072}
0x35aa…35d0              Head {h00=0x0022, h01=0x0050, text=» CM DWTPPD,A6 CLEAR PRINT POS «, t00=0x0022, t01=0x0098}
0x35d0…35fe              Head {h00=0x002a, h01=0x0050, text=» ADK A4,2 SET REQ LINE = ACT LINE + 2 «, t00=0x0022, t01=0x00be}
0x35fe…3610              Head {h00=0x000e, h01=0x0050, text=» SUK A2,5 «, t00=0x0022, t01=0x00ec}
0x3610…3636              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO05 CTRL CHAR = /30 «, t00=0x0022, t01=0x00fe}
0x3636…3664              Head {h00=0x002a, h01=0x0050, text=» SUK A4,1 SET REQ LINE = ACT LINE + 1 «, t00=0x0022, t01=0x0124}
0x3664…3676              Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0022, t01=0x0152}
0x3676…36a0              Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRDO05 CTRL CHAR NOT = /31«, t00=0x0022, t01=0x0164}
0x36a0…36c2              Head {h00=0x001e, h01=0x0050, text=» LDK A4,1 SET REQ LINE = 1«, t00=0x0022, t01=0x018e}
0x36c2…36e2              Head {h00=0x001c, h01=0x0050, text=»WRDO05 CC A4,DWTDP+2,A6 «, t00=0x0023, t01=0x0020}
0x36e2…370e              Head {h00=0x0028, h01=0x0050, text=» ABL(G) WRDO80 REQ LINE > MAX LINES «, t00=0x0023, t01=0x0040}
0x370e…373a              Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTRLN,A6 SET UP REQ LINE NO «, t00=0x0023, t01=0x006c}
0x373a…3770              Head {h00=0x0032, h01=0x0050, text=» LDKL A4,/100 SET UP NORMAL CHAR COUNTER IN A4«, t00=0x0023, t01=0x0098}
0x3770…37a2              Head {h00=0x002e, h01=0x0050, text=»WRDO10 LDK A3,POWDOC SET UP PRINTER ORDER «, t00=0x0023, t01=0x00ce}
0x37a2…37c0              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0023, t01=0x0100}
0x37c0…37e8              Head {h00=0x0024, h01=0x0050, text=» LC A2,DWTRLN,A6 GET REQ LINE NO«, t00=0x0023, t01=0x011e}
0x37e8…3804              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x0023, t01=0x0146}
0x3804…382c              Head {h00=0x0024, h01=0x0050, text=» LDK A3,2 SET UP BUFFER POINTER «, t00=0x0023, t01=0x0162}
0x382c…3866              Head {h00=0x0036, h01=0x0050, text=»WRDO20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x0023, t01=0x018a}
0x3866…3878              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0024, t01=0x0034}
0x3878…389e              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO50 BUFFER FINISHED «, t00=0x0024, t01=0x0046}
0x389e…38be              Head {h00=0x001c, h01=0x0050, text=» LDR A1,A2 GET CHARACTER«, t00=0x0024, t01=0x006c}
0x38be…38c6              Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x008c}
0x38c6…3902              Head {h00=0x0038, h01=0x0050, text=»*   EXAMINE CHARACTER AND UPDATE PRINT POS AND SEND «, t00=0x0024, t01=0x0094}
0x3902…392c              Head {h00=0x0026, h01=0x0050, text=»*   DEPENDING ON TYPE OF CHARACTER«, t00=0x0024, t01=0x00d0}
0x392c…3934              Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00fa}
0x3934…3948              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x0024, t01=0x0102}
0x3948…3968              Head {h00=0x001c, h01=0x0050, text=» RB(N) WRDO20 CHAR < /10«, t00=0x0024, t01=0x0116}
0x3968…398e              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO30 CHAR = /10 SEND «, t00=0x0024, t01=0x0136}
0x398e…39a6              Head {h00=0x0014, h01=0x0050, text=»WRDO22 SUK A1,9 «, t00=0x0024, t01=0x015c}
0x39a6…39d4              Head {h00=0x002a, h01=0x0050, text=» RF(NZ) WRDO27 CHAR NOT /19 (=EXPAND) «, t00=0x0024, t01=0x0174}
0x39d4…3a04              Head {h00=0x002c, h01=0x0050, text=» XRKL A4,/300 SWITCH CHAR COUNTER IN A4 «, t00=0x0025, t01=0x0012}
0x3a04…3a28              Head {h00=0x0020, h01=0x0050, text=» RF WRDO40 SEND EXPAND CHAR «, t00=0x0025, t01=0x0042}
0x3a28…3a40              Head {h00=0x0014, h01=0x0050, text=»WRDO27 SUK A1,7 «, t00=0x0025, t01=0x0066}
0x3a40…3a66              Head {h00=0x0022, h01=0x0050, text=» RF(N) WRDO40 CHAR < /20 SEND «, t00=0x0025, t01=0x007e}
0x3a66…3a7a              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/5F «, t00=0x0025, t01=0x00a4}
0x3a7a…3a9e              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRDO30 CHAR = NORMAL «, t00=0x0025, t01=0x00b8}
0x3a9e…3ac4              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO40 CHAR = /7F SEND «, t00=0x0025, t01=0x00dc}
0x3ac4…3ad8              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2F «, t00=0x0025, t01=0x0102}
0x3ad8…3af8              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRDO28 CHAR = /AE«, t00=0x0025, t01=0x0116}
0x3af8…3b18              Head {h00=0x001c, h01=0x0050, text=» CF A5,ERROR SEND RESET «, t00=0x0025, t01=0x0136}
0x3b18…3b40              Head {h00=0x0024, h01=0x0050, text=» LDK A2,/80 IND CODE CHECK ERROR«, t00=0x0025, t01=0x0156}
0x3b40…3b52              Head {h00=0x000e, h01=0x0050, text=» RF WRDO90«, t00=0x0025, t01=0x017e}
0x3b52…3b7c              Head {h00=0x0026, h01=0x0050, text=»WRDO28 LDK A2,SPEC SET UP CHAR /0E«, t00=0x0025, t01=0x0190}
0x3b7c…3b8e              Head {h00=0x000e, h01=0x0050, text=» RF WRDO40«, t00=0x0026, t01=0x002a}
0x3b8e…3b96              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x003c}
0x3b96…3bb2              Head {h00=0x0018, h01=0x0050, text=»*   UPDATE PRINT POS«, t00=0x0026, t01=0x0044}
0x3bb2…3bba              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0060}
0x3bba…3bf6              Head {h00=0x0038, h01=0x0050, text=»WRDO30 ADS A4,DWTRPD,A6 ADD 1 OR 2 TO REQ PRINT POS «, t00=0x0026, t01=0x0068}
0x3bf6…3bfe              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x00a4}
0x3bfe…3c24              Head {h00=0x0022, h01=0x0050, text=»*   SEND CHARACTER TO PRINTER «, t00=0x0026, t01=0x00ac}
0x3c24…3c2c              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x00d2}
0x3c2c…3c56              Head {h00=0x0026, h01=0x0050, text=»WRDO40 CF A5,OUTPUT SEND CHARACTER«, t00=0x0026, t01=0x00da}
0x3c56…3c76              Head {h00=0x001c, h01=0x0050, text=» RB WRDO20 GET NEXT CHAR«, t00=0x0026, t01=0x0104}
0x3c76…3c7e              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0124}
0x3c7e…3c92              Head {h00=0x0010, h01=0x0050, text=»*   SEND ETX«, t00=0x0026, t01=0x012c}
0x3c92…3c9a              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0140}
0x3c9a…3cce              Head {h00=0x0030, h01=0x0050, text=»WRDO50 CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0026, t01=0x0148}
0x3cce…3ce0              Head {h00=0x000e, h01=0x0050, text=» RF WRDO90«, t00=0x0026, t01=0x017c}
0x3ce0…3d06              Head {h00=0x0022, h01=0x0050, text=»WRDO70 CF A5,ERROR SEND RESET «, t00=0x0026, t01=0x018e}
0x3d06…3d2c              Head {h00=0x0022, h01=0x0050, text=»WRDO80 LDK A2,4 IND REQ ERROR «, t00=0x0027, t01=0x0024}
0x3d2c…3d54              Head {h00=0x0024, h01=0x0050, text=»WRDO90 ABL STATUS UPDATE STATUS «, t00=0x0027, t01=0x004a}
0x3d54…3d62              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x0072}
0x3d62…3d6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0080}
0x3d6c…3d76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x008a}
0x3d76…3d9e              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 0B : POSITION DOCUMENT«, t00=0x0027, t01=0x0094}
0x3d9e…3dd2              Head {h00=0x0030, h01=0x0050, text=»*   CONTROL WORD CONTAINS REQUESTED LINE NO «, t00=0x0027, t01=0x00bc}
0x3dd2…3ddc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00f0}
0x3ddc…3de6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00fa}
0x3de6…3dfa              Head {h00=0x0010, h01=0x0050, text=»POSDOC EQU *«, t00=0x0027, t01=0x0104}
0x3dfa…3e22              Head {h00=0x0024, h01=0x0050, text=» LD A4,ECBCW,A8 GET REQ LINE NO «, t00=0x0027, t01=0x0118}
0x3e22…3e3c              Head {h00=0x0016, h01=0x0050, text=» CC A4,DWTDP+2,A6 «, t00=0x0027, t01=0x0140}
0x3e3c…3e66              Head {h00=0x0026, h01=0x0050, text=» RF(G) PDOC30 REQ LINE > MAX LINES«, t00=0x0027, t01=0x015a}
0x3e66…3e92              Head {h00=0x0028, h01=0x0050, text=» SC A4,DWTRLN,A6 SET UP REQ LINE NO «, t00=0x0027, t01=0x0184}
0x3e92…3ed0              Head {h00=0x003a, h01=0x0050, text=» LDK A3,POPDOC SET UP PRINTER POSITION DOCUMENT ORDER «, t00=0x0028, t01=0x0020}
0x3ed0…3eee              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0028, t01=0x005e}
0x3eee…3f10              Head {h00=0x001e, h01=0x0050, text=» LDR A2,A4 SET UP LINE NO «, t00=0x0028, t01=0x007c}
0x3f10…3f2c              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x0028, t01=0x009e}
0x3f2c…3f5a              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0028, t01=0x00ba}
0x3f5a…3f80              Head {h00=0x0022, h01=0x0050, text=» CM DWTPPD,A6 CLEAR PRINT POS «, t00=0x0028, t01=0x00e8}
0x3f80…3faa              Head {h00=0x0026, h01=0x0050, text=» LC A1,DWTDP,A6 TIME OUT USED ? =4«, t00=0x0028, t01=0x010e}
0x3faa…3fc2              Head {h00=0x0014, h01=0x0050, text=» ANK A1,/78 U =4«, t00=0x0028, t01=0x0138}
0x3fc2…3fe0              Head {h00=0x001a, h01=0x0050, text=» RF(NZ) PDOC20 YES =4 «, t00=0x0028, t01=0x0150}
0x3fe0…400e              Head {h00=0x002a, h01=0x0050, text=» LDK A1,/40 NO, DOC OUT SIGNALLED ? =4«, t00=0x0028, t01=0x016e}
0x400e…4024              Head {h00=0x0012, h01=0x0050, text=» TM A1,A2 U =4«, t00=0x0029, t01=0x000c}
0x4024…4050              Head {h00=0x0028, h01=0x0050, text=» RB(NZ) POSDOC YES, TRY ONCE MORE =4«, t00=0x0029, t01=0x0022}
0x4050…4078              Head {h00=0x0024, h01=0x0050, text=»PDOC20 ABL STATUS UPDATE STATUS «, t00=0x0029, t01=0x004e}
0x4078…40a2              Head {h00=0x0026, h01=0x0050, text=»PDOC30 LDK A2,4 INDICATE REQ ERROR«, t00=0x0029, t01=0x0076}
0x40a2…40b4              Head {h00=0x000e, h01=0x0050, text=» RB PDOC20«, t00=0x0029, t01=0x00a0}
0x40b4…40c4              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0029, t01=0x00b2}
0x40c4…40ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00c2}
0x40ce…40d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00cc}
0x40d8…410c              Head {h00=0x0030, h01=0x0050, text=»*   ORDER 37 : TRANSFER DOCUMENT PARAMETERS «, t00=0x0029, t01=0x00d6}
0x410c…4144              Head {h00=0x0034, h01=0x0050, text=»*   CONTROL WORD CONTAINS DOCUMENT TABLE NUMBER «, t00=0x0029, t01=0x010a}
0x4144…414e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0142}
0x414e…4158              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x014c}
0x4158…416c              Head {h00=0x0010, h01=0x0050, text=»TRFDOC EQU *«, t00=0x0029, t01=0x0156}
0x416c…4184              Head {h00=0x0014, h01=0x0050, text=» LD A1,ECBCW,A8 «, t00=0x0029, t01=0x016a}
0x4184…4196              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0029, t01=0x0182}
0x4196…41a8 (42, 0, 400) Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x002a, t01=0x0004}
0x41a8…41ba              Head {h00=0x000e, h01=0x0050, text=» SLL A4,3 «, t00=0x002a, t01=0x0016}
0x41ba…41cc              Head {h00=0x000e, h01=0x0050, text=» ADR A4,A1«, t00=0x002a, t01=0x0028}
0x41cc…41de              Head {h00=0x000e, h01=0x0050, text=» ADR A4,A1«, t00=0x002a, t01=0x003a}
0x41de…41f4              Head {h00=0x0012, h01=0x0050, text=» CWK A4,TLTP03«, t00=0x002a, t01=0x004c}
0x41f4…4224              Head {h00=0x002c, h01=0x0050, text=» RF(G) ODOC10 REQ DOC TABLE NOT DEFINED «, t00=0x002a, t01=0x0062}
0x4224…424c              Head {h00=0x0024, h01=0x0050, text=» SUK A4,10 ADJUST DOCTAB POINTER«, t00=0x002a, t01=0x0092}
0x424c…4266              Head {h00=0x0016, h01=0x0050, text=» LD A1,DWTALN,A6  «, t00=0x002a, t01=0x00ba}
0x4266…4294              Head {h00=0x002a, h01=0x0050, text=» RF(Z) ODOC20 DOC. NOT POSITIONED =OK «, t00=0x002a, t01=0x00d4}
0x4294…42ba              Head {h00=0x0022, h01=0x0050, text=»ODOC10 LDK A2,4 IND REQ ERROR «, t00=0x002a, t01=0x0102}
0x42ba…42cc              Head {h00=0x000e, h01=0x0050, text=» RF ODOC40«, t00=0x002a, t01=0x0128}
0x42cc…4314              Head {h00=0x0044, h01=0x0050, text=»ODOC20 LDK A3,POTDOC LOAD PRINTER TRANSFER DOC PARAMETERS ORDER «, t00=0x002a, t01=0x013a}
0x4314…4332              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x002a, t01=0x0182}
0x4332…4356              Head {h00=0x0020, h01=0x0050, text=» LDK A3,DWTDP SET UP POINTER«, t00=0x002b, t01=0x0010}
0x4356…4374              Head {h00=0x001a, h01=0x0050, text=»ODOC30 LC A2,DTTP03,A4«, t00=0x002b, t01=0x0034}
0x4374…4386              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A6«, t00=0x002b, t01=0x0052}
0x4386…4398              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A3«, t00=0x002b, t01=0x0064}
0x4398…43aa              Head {h00=0x000e, h01=0x0050, text=» SCR A2,A1«, t00=0x002b, t01=0x0076}
0x43aa…43ba              Head {h00=0x000c, h01=0x0050, text=»   U =4 «, t00=0x002b, t01=0x0088}
0x43ba…43cc              Head {h00=0x000e, h01=0x0050, text=» CF A5,OUT«, t00=0x002b, t01=0x0098}
0x43cc…43de              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x002b, t01=0x00aa}
0x43de…43f0              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x002b, t01=0x00bc}
0x43f0…4408              Head {h00=0x0014, h01=0x0050, text=» CWK A3,DWTDP+10«, t00=0x002b, t01=0x00ce}
0x4408…4434              Head {h00=0x0028, h01=0x0050, text=» RB(NE) ODOC30 WHOLE TABLE NOT SENT «, t00=0x002b, t01=0x00e6}
0x4434…4462              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x002b, t01=0x0112}
0x4462…4486              Head {h00=0x0020, h01=0x0050, text=» ANK A2,5 MASK OFF GE AND RE«, t00=0x002b, t01=0x0140}
0x4486…4496              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x002b, t01=0x0164}
0x4496…44be              Head {h00=0x0024, h01=0x0050, text=»ODOC40 ABL STATUS UPDATE STATUS «, t00=0x002b, t01=0x0174}
0x44be…44ce              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x002c, t01=0x000c}
0x44ce…44de              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x002c, t01=0x001c}
0x44de…44f4              Head {h00=0x0012, h01=0x0050, text=» IFT PARORD=1 «, t00=0x002c, t01=0x002c}
0x44f4…4504              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x002c, t01=0x0042}
0x4504…450e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0052}
0x450e…4518              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x005c}
0x4518…4546              Head {h00=0x002a, h01=0x0050, text=»*   ORDER 24 : SET PRINTER PARAMETERS «, t00=0x002c, t01=0x0066}
0x4546…4568              Head {h00=0x001e, h01=0x0050, text=»*   CONTROL WORD CONTAINS:«, t00=0x002c, t01=0x0094}
0x4568…45ae              Head {h00=0x0042, h01=0x0050, text=»*   BIT 0     : INDICATE CHANGE OF CH FONT AND NCV         =4 «, t00=0x002c, t01=0x00b6}
0x45ae…45f8              Head {h00=0x0046, h01=0x0050, text=»*   BIT 01-03 : CHARACTER FONT                                 =4 «, t00=0x002c, t01=0x00fc}
0x45f8…4642              Head {h00=0x0046, h01=0x0050, text=»*   BIT 04-07 : NATIONAL CHARACTER VARIATION                   =4 «, t00=0x002c, t01=0x0146}
0x4642…468c              Head {h00=0x0046, h01=0x0050, text=»*   BIT 08-11 : CHARACTER PITCH FOR JOURNAL STATION            =4 «, t00=0x002c, t01=0x0190}
0x468c…46d6              Head {h00=0x0046, h01=0x0050, text=»*   BIT 12-15 : CHARACTER PITCH FOR DOCUMENT STATION           =4 «, t00=0x002d, t01=0x004a}
0x46d6…46e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0094}
0x46e0…46ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x009e}
0x46ea…46fe              Head {h00=0x0010, h01=0x0050, text=»PRTPAR EQU *«, t00=0x002d, t01=0x00a8}
0x46fe…4710              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x002d, t01=0x00bc}
0x4710…473a              Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTPP,A6 GET OLD DWT VALUE «, t00=0x002d, t01=0x00ce}
0x473a…4762              Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CONTROL WORD«, t00=0x002d, t01=0x00f8}
0x4762…479a              Head {h00=0x0034, h01=0x0050, text=» RF(NN) PPAR10 NO NEW L/NCV SET UP IN CTRL WORD «, t00=0x002d, t01=0x0120}
0x479a…47ac              Head {h00=0x000e, h01=0x0050, text=» ECR A2,A1«, t00=0x002d, t01=0x0158}
0x47ac…47c0              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x002d, t01=0x016a}
0x47c0…47ee              Head {h00=0x002a, h01=0x0050, text=» SC A2,DWTPP,A6 STORE NEW L/NCV IN DWT«, t00=0x002d, t01=0x017e}
0x47ee…4806              Head {h00=0x0014, h01=0x0050, text=»PPAR10 LDK A2,0 «, t00=0x002e, t01=0x001c}
0x4806…4818              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x002e, t01=0x0034}
0x4818…483a              Head {h00=0x001e, h01=0x0050, text=» ANK A3,/F0 GET CTRL WORD «, t00=0x002e, t01=0x0046}
0x483a…4870              Head {h00=0x0032, h01=0x0050, text=» RF(NZ) PPAR15 NEW CPJ SET UP IN CTRL WORD =1 «, t00=0x002e, t01=0x0068}
0x4870…4882              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x002e, t01=0x009e}
0x4882…4896              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/F0 «, t00=0x002e, t01=0x00b0}
0x4896…48aa              Head {h00=0x0010, h01=0x0050, text=»   U =5(=1) «, t00=0x002e, t01=0x00c4}
0x48aa…48c8              Head {h00=0x001a, h01=0x0050, text=»PPAR15 EQU * U =5(=1) «, t00=0x002e, t01=0x00d8}
0x48c8…48f2              Head {h00=0x0026, h01=0x0050, text=» ORR A2,A3 STORE NEW CPJ IN A2 =5 «, t00=0x002e, t01=0x00f6}
0x48f2…490a              Head {h00=0x0014, h01=0x0050, text=» XRR A3,A4 U =5 «, t00=0x002e, t01=0x0120}
0x490a…4938              Head {h00=0x002a, h01=0x0050, text=» ANK A3,/F0 NEW AND OLD CPJ EQUAL ? =5«, t00=0x002e, t01=0x0138}
0x4938…4954              Head {h00=0x0018, h01=0x0050, text=» RF(Z) PPAR22 YES =5«, t00=0x002e, t01=0x0166}
0x4954…498c              Head {h00=0x0034, h01=0x0050, text=» CM DWTPPJ,A6 NO, RESET PRINT POS FOR JOURNAL =5«, t00=0x002e, t01=0x0182}
0x498c…49a6              Head {h00=0x0016, h01=0x0050, text=»PPAR22 EQU * U =5 «, t00=0x002f, t01=0x002a}
0x49a6…49b8              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A1«, t00=0x002f, t01=0x0044}
0x49b8…49d8              Head {h00=0x001c, h01=0x0050, text=» ANK A3,/F GET CTRL WORD«, t00=0x002f, t01=0x0056}
0x49d8…4a0e              Head {h00=0x0032, h01=0x0050, text=» RF(NZ) PPAR25 NEW CPD SET UP IN CTRL WORD =1 «, t00=0x002f, t01=0x0076}
0x4a0e…4a20              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A4«, t00=0x002f, t01=0x00ac}
0x4a20…4a44              Head {h00=0x0020, h01=0x0050, text=» ANK A3,/F GET CPD FROM DWT «, t00=0x002f, t01=0x00be}
0x4a44…4a58              Head {h00=0x0010, h01=0x0050, text=»   U =5(=1) «, t00=0x002f, t01=0x00e2}
0x4a58…4a76              Head {h00=0x001a, h01=0x0050, text=»PPAR25 EQU * U =5(=1) «, t00=0x002f, t01=0x00f6}
0x4a76…4aa0              Head {h00=0x0026, h01=0x0050, text=» ORR A2,A3 STORE NEW CPD IN A2 =5 «, t00=0x002f, t01=0x0114}
0x4aa0…4ab8              Head {h00=0x0014, h01=0x0050, text=» XRR A3,A4 U =5 «, t00=0x002f, t01=0x013e}
0x4ab8…4ae6              Head {h00=0x002a, h01=0x0050, text=» ANK A3,/F NEW AND OLD CPD EQUAL ? =5 «, t00=0x002f, t01=0x0156}
0x4ae6…4b02              Head {h00=0x0018, h01=0x0050, text=» RF(Z) PPAR32 YES =5«, t00=0x002f, t01=0x0184}
0x4b02…4b36              Head {h00=0x0030, h01=0x0050, text=» CM DWTPPD,A6 NO, RESET PRINT POS FOR DOC =5«, t00=0x0030, t01=0x0010}
0x4b36…4b50              Head {h00=0x0016, h01=0x0050, text=»PPAR32 EQU * U =5 «, t00=0x0030, t01=0x0044}
0x4b50…4b86              Head {h00=0x0032, h01=0x0050, text=» SC A2,DWTPP+1,A6 STORE NEW PARAMETERS IN DWT «, t00=0x0030, t01=0x005e}
0x4b86…4bc2              Head {h00=0x0038, h01=0x0050, text=» LDK A3,POPPAR LOAD PRINTER PRINTER PARAMETER ORDER «, t00=0x0030, t01=0x0094}
0x4bc2…4be0              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0030, t01=0x00d0}
0x4be0…4bf8              Head {h00=0x0014, h01=0x0050, text=» LC A2,DWTPP,A6 «, t00=0x0030, t01=0x00ee}
0x4bf8…4c0c              Head {h00=0x0010, h01=0x0050, text=»   U =4(=2) «, t00=0x0030, t01=0x0106}
0x4c0c…4c2a              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND L/NCV «, t00=0x0030, t01=0x011a}
0x4c2a…4c44              Head {h00=0x0016, h01=0x0050, text=» LC A2,DWTPP+1,A6 «, t00=0x0030, t01=0x0138}
0x4c44…4c58              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/77 «, t00=0x0030, t01=0x0152}
0x4c58…4c78              Head {h00=0x001c, h01=0x0050, text=» CF A5,OUT SEND CPJ/CPD «, t00=0x0030, t01=0x0166}
0x4c78…4ca6              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0030, t01=0x0186}
0x4ca6…4cc6              Head {h00=0x001c, h01=0x0050, text=» ANK A2,1 MASK OUT GE =1«, t00=0x0031, t01=0x0024}
0x4cc6…4cd6              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x0031, t01=0x0044}
0x4cd6…4ce6              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x0031, t01=0x0054}
0x4ce6…4cf6              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x0031, t01=0x0064}
0x4cf6…4d06              Head {h00=0x000c, h01=0x0050, text=»   U =1 «, t00=0x0031, t01=0x0074}
0x4d06…4d2e              Head {h00=0x0024, h01=0x0050, text=»PPAR40 ABL STATUS UPDATE STATUS «, t00=0x0031, t01=0x0084}
0x4d2e…4d3e              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0031, t01=0x00ac}
0x4d3e…4d48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00bc}
0x4d48…4d52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x00c6}
0x4d52…4d80              Head {h00=0x002a, h01=0x0050, text=»*   ORDER 27 : SET DOCUMENT PARAMETERS«, t00=0x0031, t01=0x00d0}
0x4d80…4dbe              Head {h00=0x003a, h01=0x0050, text=»*   CONTROL WORD CONTAINS TABLE NO OF GIVEN PARAMETERS«, t00=0x0031, t01=0x00fe}
0x4dbe…4dc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x013c}
0x4dc8…4dd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0146}
0x4dd2…4de6              Head {h00=0x0010, h01=0x0050, text=»DOCPAR EQU *«, t00=0x0031, t01=0x0150}
0x4de6…4e0e              Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CONTROL WORD«, t00=0x0031, t01=0x0164}
0x4e0e…4e20              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0031, t01=0x018c}
0x4e20…4e32              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A1«, t00=0x0032, t01=0x000e}
0x4e32…4e44              Head {h00=0x000e, h01=0x0050, text=» SLL A4,3 «, t00=0x0032, t01=0x0020}
0x4e44…4e56              Head {h00=0x000e, h01=0x0050, text=» ADR A4,A1«, t00=0x0032, t01=0x0032}
0x4e56…4e68              Head {h00=0x000e, h01=0x0050, text=» ADR A4,A1«, t00=0x0032, t01=0x0044}
0x4e68…4e7e              Head {h00=0x0012, h01=0x0050, text=» CWK A4,TLTP03«, t00=0x0032, t01=0x0056}
0x4e7e…4eac              Head {h00=0x002a, h01=0x0050, text=» RF(G) DPAR80 DEFINED TABLE TOO SMALL «, t00=0x0032, t01=0x006c}
0x4eac…4ed4              Head {h00=0x0024, h01=0x0050, text=» SUK A4,10 ADJUST DOCTAB POINTER«, t00=0x0032, t01=0x009a}
0x4ed4…4efe              Head {h00=0x0026, h01=0x0050, text=» LD A3,ECBBA,A8 GET BUFFER ADDRESS«, t00=0x0032, t01=0x00c2}
0x4efe…4f20              Head {h00=0x001e, h01=0x0050, text=» CF A5,BYTE1 GET DOC TYPE «, t00=0x0032, t01=0x00ec}
0x4f20…4f32              Head {h00=0x000e, h01=0x0050, text=» SUK A1,3 «, t00=0x0032, t01=0x010e}
0x4f32…4f56              Head {h00=0x0020, h01=0x0050, text=» RF(P) DPAR80 ILLEGAL VALUE «, t00=0x0032, t01=0x0120}
0x4f56…4f66              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x0032, t01=0x0144}
0x4f66…4f7e              Head {h00=0x0014, h01=0x0050, text=» SC A2,DTTP03,A4«, t00=0x0032, t01=0x0154}
0x4f7e…4fa6              Head {h00=0x0024, h01=0x0050, text=» CF A5,BYTE1 GET TIME OUT VALUE «, t00=0x0032, t01=0x016c}
0x4fa6…4fb8 (51, 0, 400) Head {h00=0x000e, h01=0x0050, text=» SLL A2,11«, t00=0x0033, t01=0x0004}
0x4fb8…4fd2              Head {h00=0x0016, h01=0x0050, text=» ORS A2,DTTP03,A4 «, t00=0x0033, t01=0x0016}
0x4fd2…4ff6              Head {h00=0x0020, h01=0x0050, text=» CF A5,DOC GET LINE SPACING «, t00=0x0033, t01=0x0030}
0x4ff6…5008              Head {h00=0x000e, h01=0x0050, text=» SUK A2,15«, t00=0x0033, t01=0x0054}
0x5008…5028              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO LARGE «, t00=0x0033, t01=0x0066}
0x5028…504a              Head {h00=0x001e, h01=0x0050, text=» CF A5,DOC GET NO OF LINES«, t00=0x0033, t01=0x0086}
0x504a…505c              Head {h00=0x000e, h01=0x0050, text=» SUK A2,0 «, t00=0x0033, t01=0x00a8}
0x505c…507a              Head {h00=0x001a, h01=0x0050, text=» RF(Z) DPAR80 NO LINES«, t00=0x0033, t01=0x00ba}
0x507a…509e              Head {h00=0x0020, h01=0x0050, text=» CF A5,DOC GET BOTTOM LINES «, t00=0x0033, t01=0x00d8}
0x509e…50b0              Head {h00=0x000e, h01=0x0050, text=» SUK A2,14«, t00=0x0033, t01=0x00fc}
0x50b0…50d0              Head {h00=0x001c, h01=0x0050, text=» RF(N) DPAR80 TOO SMALL «, t00=0x0033, t01=0x010e}
0x50d0…50ee              Head {h00=0x001a, h01=0x0050, text=» CF A5,DOC GET MARGIN «, t00=0x0033, t01=0x012e}
0x50ee…5100              Head {h00=0x000e, h01=0x0050, text=» SUK A2,0 «, t00=0x0033, t01=0x014c}
0x5100…5120              Head {h00=0x001c, h01=0x0050, text=» RF(Z) DPAR80 TOO SMALL «, t00=0x0033, t01=0x015e}
0x5120…5132              Head {h00=0x000e, h01=0x0050, text=» SUK A2,80«, t00=0x0033, t01=0x017e}
0x5132…5152              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO LARGE «, t00=0x0033, t01=0x0190}
0x5152…5164              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0034, t01=0x0020}
0x5164…5188              Head {h00=0x0020, h01=0x0050, text=» CF A5,BYTE1 GET MARGIN FINE«, t00=0x0034, t01=0x0032}
0x5188…519a              Head {h00=0x000e, h01=0x0050, text=» SUK A1,0 «, t00=0x0034, t01=0x0056}
0x519a…51ba              Head {h00=0x001c, h01=0x0050, text=» RF(Z) DPAR80 TOO SMALL «, t00=0x0034, t01=0x0068}
0x51ba…51cc              Head {h00=0x000e, h01=0x0050, text=» SUK A1,7 «, t00=0x0034, t01=0x0088}
0x51cc…51ec              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO LARGE «, t00=0x0034, t01=0x009a}
0x51ec…5204              Head {h00=0x0014, h01=0x0050, text=» SC A2,DTTP03,A4«, t00=0x0034, t01=0x00ba}
0x5204…5228              Head {h00=0x0020, h01=0x0050, text=» CF A5,BYTE1 GET LEFT MARGIN«, t00=0x0034, t01=0x00d2}
0x5228…523a              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0034, t01=0x00f6}
0x523a…525e              Head {h00=0x0020, h01=0x0050, text=» RF(P) DPAR80 ILLEGAL VALUE «, t00=0x0034, t01=0x0108}
0x525e…5270              Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0034, t01=0x012c}
0x5270…528a              Head {h00=0x0016, h01=0x0050, text=» ORS A2,DTTP03,A4 «, t00=0x0034, t01=0x013e}
0x528a…52b2              Head {h00=0x0024, h01=0x0050, text=» CF A5,BYTE1 GET CRITICAL MARGIN«, t00=0x0034, t01=0x0158}
0x52b2…52c4              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0034, t01=0x0180}
0x52c4…52e8 (53, 0, 400) Head {h00=0x0020, h01=0x0050, text=» RF(P) DPAR80 ILLEGAL VALUE «, t00=0x0035, t01=0x0004}
0x52e8…52fa              Head {h00=0x000e, h01=0x0050, text=» SLL A2,5 «, t00=0x0035, t01=0x0028}
0x52fa…5314              Head {h00=0x0016, h01=0x0050, text=» ORS A2,DTTP03,A4 «, t00=0x0035, t01=0x003a}
0x5314…5340              Head {h00=0x0028, h01=0x0050, text=» CF A5,BYTE1 GET HIGH PRINT PRESSURE«, t00=0x0035, t01=0x0054}
0x5340…5352              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0035, t01=0x0080}
0x5352…5376              Head {h00=0x0020, h01=0x0050, text=» RF(P) DPAR80 ILLEGAL VALUE «, t00=0x0035, t01=0x0092}
0x5376…5388              Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x0035, t01=0x00b6}
0x5388…53a2              Head {h00=0x0016, h01=0x0050, text=» ORS A2,DTTP03,A4 «, t00=0x0035, t01=0x00c8}
0x53a2…53c8              Head {h00=0x0022, h01=0x0050, text=» LC* A1,ECBBA,A8 GET DOC TYPE «, t00=0x0035, t01=0x00e2}
0x53c8…53da              Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0035, t01=0x0108}
0x53da…53fc              Head {h00=0x001e, h01=0x0050, text=» RF(Z) DPAR60 DOC TYPE = 0«, t00=0x0035, t01=0x011a}
0x53fc…541e              Head {h00=0x001e, h01=0x0050, text=» CF A5,DOC GET UPPER EDGE «, t00=0x0035, t01=0x013c}
0x541e…5430              Head {h00=0x000e, h01=0x0050, text=» SUK A2,15«, t00=0x0035, t01=0x015e}
0x5430…5450              Head {h00=0x001c, h01=0x0050, text=» RF(N) DPAR80 TOO SMALL «, t00=0x0035, t01=0x0170}
0x5450…5462              Head {h00=0x000e, h01=0x0050, text=» SUK A2,67«, t00=0x0035, t01=0x0190}
0x5462…5482              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO LARGE «, t00=0x0036, t01=0x0012}
0x5482…54a4              Head {h00=0x001e, h01=0x0050, text=» CF A5,DOC GET BOTTOM EDGE«, t00=0x0036, t01=0x0032}
0x54a4…54b6              Head {h00=0x000e, h01=0x0050, text=» SUK A2,0 «, t00=0x0036, t01=0x0054}
0x54b6…54ce              Head {h00=0x0014, h01=0x0050, text=» RF(Z) DPAR30 OK«, t00=0x0036, t01=0x0066}
0x54ce…54e0              Head {h00=0x000e, h01=0x0050, text=» SUK A2,24«, t00=0x0036, t01=0x007e}
0x54e0…5500              Head {h00=0x001c, h01=0x0050, text=» RF(N) DPAR80 TOO SMALL «, t00=0x0036, t01=0x0090}
0x5500…552c              Head {h00=0x0028, h01=0x0050, text=»DPAR30 LC* A1,ECBBA,A8 GET DOC TYPE «, t00=0x0036, t01=0x00b0}
0x552c…553e              Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0036, t01=0x00dc}
0x553e…5550              Head {h00=0x000e, h01=0x0050, text=» SUK A1,2 «, t00=0x0036, t01=0x00ee}
0x5550…5572              Head {h00=0x001e, h01=0x0050, text=» RF(N) DPAR70 DOC TYPE = 1«, t00=0x0036, t01=0x0100}
0x5572…5594              Head {h00=0x001e, h01=0x0050, text=» RF(P) DPAR40 DOC TYPE = 3«, t00=0x0036, t01=0x0122}
0x5594…55ba              Head {h00=0x0022, h01=0x0050, text=» CF A5,DOC GET DOCUMENT WIDTH «, t00=0x0036, t01=0x0144}
0x55ba…55cc              Head {h00=0x000e, h01=0x0050, text=» SUK A2,40«, t00=0x0036, t01=0x016a}
0x55cc…55ec              Head {h00=0x001c, h01=0x0050, text=» RF(N) DPAR80 TOO SMALL «, t00=0x0036, t01=0x017c}
0x55ec…55fe              Head {h00=0x000e, h01=0x0050, text=» SUK A2,57«, t00=0x0037, t01=0x000c}
0x55fe…561e              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO SMALL «, t00=0x0037, t01=0x001e}
0x561e…5630              Head {h00=0x000e, h01=0x0050, text=» RF DPAR50«, t00=0x0037, t01=0x003e}
0x5630…5658              Head {h00=0x0024, h01=0x0050, text=»DPAR40 CF A5,DOC GET UPPER LINES«, t00=0x0037, t01=0x0050}
0x5658…566a              Head {h00=0x000e, h01=0x0050, text=» SUK A2,0 «, t00=0x0037, t01=0x0078}
0x566a…568a              Head {h00=0x001c, h01=0x0050, text=» RF(Z) DPAR80 TOO SMALL «, t00=0x0037, t01=0x008a}
0x568a…569c              Head {h00=0x000e, h01=0x0050, text=» SUK A2,40«, t00=0x0037, t01=0x00aa}
0x569c…56bc              Head {h00=0x001c, h01=0x0050, text=» RF(P) DPAR80 TOO LARGE «, t00=0x0037, t01=0x00bc}
0x56bc…56e6              Head {h00=0x0026, h01=0x0050, text=»DPAR50 CF A5,DOC GET CENTER WIDTH «, t00=0x0037, t01=0x00dc}
0x56e6…56fc              Head {h00=0x0012, h01=0x0050, text=» RF DPAR75 OK «, t00=0x0037, t01=0x0106}
0x56fc…5730              Head {h00=0x0030, h01=0x0050, text=»DPAR60 LDK A2,0 DT=0 SET 4 LAST PARAMETERS=0«, t00=0x0037, t01=0x011c}
0x5730…5742              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0037, t01=0x0150}
0x5742…575a              Head {h00=0x0014, h01=0x0050, text=» ST A2,DTTP03,A4«, t00=0x0037, t01=0x0162}
0x575a…576c              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0037, t01=0x017a}
0x576c…57a0              Head {h00=0x0030, h01=0x0050, text=»DPAR70 LDK A2,0 DT=1 SET 2 LAST PARAMETERS=0«, t00=0x0037, t01=0x018c}
0x57a0…57b2              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0038, t01=0x0030}
0x57b2…57ca              Head {h00=0x0014, h01=0x0050, text=» ST A2,DTTP03,A4«, t00=0x0038, t01=0x0042}
0x57ca…5800              Head {h00=0x0032, h01=0x0050, text=»DPAR75 LDK A1,0 IND STATUS OK FOR RETURN CODE «, t00=0x0038, t01=0x005a}
0x5800…5812              Head {h00=0x000e, h01=0x0050, text=» RF DPAR90«, t00=0x0038, t01=0x0090}
0x5812…584c              Head {h00=0x0036, h01=0x0050, text=»DPAR80 LDKL A1,/8000 IND REQ ERROR FOR RETURN CODE«, t00=0x0038, t01=0x00a2}
0x584c…5876              Head {h00=0x0026, h01=0x0050, text=»DPAR90 ABL STAT50 SET RETURN CODE «, t00=0x0038, t01=0x00dc}
0x5876…587e              Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x0106}
0x587e…58b4              Head {h00=0x0032, h01=0x0050, text=»*   GET ONE BYTE FROM ECB BUFFER TO A1 AND A2 «, t00=0x0038, t01=0x010e}
0x58b4…58dc              Head {h00=0x0024, h01=0x0050, text=»*   CONVERTED TO HEXA FROM ASCII«, t00=0x0038, t01=0x0144}
0x58dc…58e4              Head {h00=0x0004, h01=0x0050, t00=0x0038, t01=0x016c}
0x58e4…590a              Head {h00=0x0022, h01=0x0050, text=»BYTE1 LCR A2,A3 GET CHARACTER «, t00=0x0038, t01=0x0174}
0x590a…592e              Head {h00=0x0020, h01=0x0050, text=» CF A5,CHECK TEST IF NUMERIC«, t00=0x0039, t01=0x000a}
0x592e…594a              Head {h00=0x0018, h01=0x0050, text=» ANK A2,/F GET HEXA «, t00=0x0039, t01=0x002e}
0x594a…596c              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A2 SAVE IN A1 ALSO«, t00=0x0039, t01=0x004a}
0x596c…5994              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INC ECB BUFFER POINTER«, t00=0x0039, t01=0x006c}
0x5994…59a4              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0039, t01=0x0094}
0x59a4…59ac              Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x00a4}
0x59ac…59dc              Head {h00=0x002c, h01=0x0050, text=»*   GET TWO BYTES FROM ECB BUFFER TO A2 «, t00=0x0039, t01=0x00ac}
0x59dc…5a12              Head {h00=0x0032, h01=0x0050, text=»*   CONVERTED TO HEXA AND STORED IN DOC TABLE «, t00=0x0039, t01=0x00dc}
0x5a12…5a1a              Head {h00=0x0004, h01=0x0050, t00=0x0039, t01=0x0112}
0x5a1a…5a40              Head {h00=0x0022, h01=0x0050, text=»DOC LDK A1,0 CLEAR HEXA VALUE «, t00=0x0039, t01=0x011a}
0x5a40…5a64              Head {h00=0x0020, h01=0x0050, text=» ADK A4,1 INC TABLE POINTER «, t00=0x0039, t01=0x0140}
0x5a64…5a94              Head {h00=0x002c, h01=0x0050, text=» LCR A2,A3 GET CHARACTER FROM ECB BUFFER«, t00=0x0039, t01=0x0164}
0x5a94…5ab8 (58, 0, 398) Head {h00=0x0020, h01=0x0050, text=» CF A5,CHECK TEST IF NUMERIC«, t00=0x003a, t01=0x0004}
0x5ab8…5aca              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x003a, t01=0x0028}
0x5aca…5ae0              Head {h00=0x0012, h01=0x0050, text=»DOC10 SUK A2,1«, t00=0x003a, t01=0x003a}
0x5ae0…5b04              Head {h00=0x0020, h01=0x0050, text=» RF(N) DOC20 TENTH FINISHED «, t00=0x003a, t01=0x0050}
0x5b04…5b24              Head {h00=0x001c, h01=0x0050, text=» ADK A1,10 UPDATE TENTH «, t00=0x003a, t01=0x0074}
0x5b24…5b36              Head {h00=0x000e, h01=0x0050, text=» RB DOC10 «, t00=0x003a, t01=0x0094}
0x5b36…5b64              Head {h00=0x002a, h01=0x0050, text=»DOC20 ADK A3,1 INC ECB BUFFER POINTER «, t00=0x003a, t01=0x00a6}
0x5b64…5b9a              Head {h00=0x0032, h01=0x0050, text=» LCR A2,A3 GET NEXT CHARACTER FROM ECB BUFFER «, t00=0x003a, t01=0x00d4}
0x5b9a…5bbe              Head {h00=0x0020, h01=0x0050, text=» CF A5,CHECK TEST IF NUMERIC«, t00=0x003a, t01=0x010a}
0x5bbe…5bd0              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x003a, t01=0x012e}
0x5bd0…5bfa              Head {h00=0x0026, h01=0x0050, text=» ADR A2,A1 ADD TO PREV HEXA VALUE «, t00=0x003a, t01=0x0140}
0x5bfa…5c26              Head {h00=0x0028, h01=0x0050, text=» SC A2,DTTP03,A4 STORE IN DOC TABLE «, t00=0x003a, t01=0x016a}
0x5c26…5c4e              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INC ECB BUFFER POINTER«, t00=0x003b, t01=0x0008}
0x5c4e…5c5e              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x003b, t01=0x0030}
0x5c5e…5c68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0040}
0x5c68…5c92              Head {h00=0x0026, h01=0x0050, text=»*   CHECK IF CHARACTER IS NUMERIC «, t00=0x003b, t01=0x004a}
0x5c92…5cbe              Head {h00=0x0028, h01=0x0050, text=»CHECK ANK A2,/FF MASK OUT CHARACTER «, t00=0x003b, t01=0x0074}
0x5cbe…5cd2              Head {h00=0x0010, h01=0x0050, text=» SUK A2,/30 «, t00=0x003b, t01=0x00a0}
0x5cd2…5cf6              Head {h00=0x0020, h01=0x0050, text=» RF(N) CHCK10 TOO LOW ERROR «, t00=0x003b, t01=0x00b4}
0x5cf6…5d08              Head {h00=0x000e, h01=0x0050, text=» SUK A2,9 «, t00=0x003b, t01=0x00d8}
0x5d08…5d2c              Head {h00=0x0020, h01=0x0050, text=» RF(P) CHCK10 TOO HIGH ERROR«, t00=0x003b, t01=0x00ea}
0x5d2c…5d52              Head {h00=0x0022, h01=0x0050, text=» ADK A2,/39 RESTORE CHARACTER «, t00=0x003b, t01=0x010e}
0x5d52…5d62              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x003b, t01=0x0134}
0x5d62…5d8e              Head {h00=0x0028, h01=0x0050, text=»CHCK10 ADK A5,4 UPDATE STACK POINTER«, t00=0x003b, t01=0x0144}
0x5d8e…5da0              Head {h00=0x000e, h01=0x0050, text=» RB DPAR80«, t00=0x003b, t01=0x0170}
0x5da0…5dac              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x003b, t01=0x0182}
0x5dac…5dbc              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x003b, t01=0x018e}
0x5dbc…5dc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x000e}
0x5dc6…5dd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0018}
0x5dd0…5df8              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 38 : RELEASE DOCUMENT «, t00=0x003c, t01=0x0022}
0x5df8…5e02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x004a}
0x5e02…5e0c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0054}
0x5e0c…5e20              Head {h00=0x0010, h01=0x0050, text=»RELDOC EQU *«, t00=0x003c, t01=0x005e}
0x5e20…5e52              Head {h00=0x002e, h01=0x0050, text=» LDK A3,PORDOC LOAD PRINTER REL DOC ORDER «, t00=0x003c, t01=0x0072}
0x5e52…5e70              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x003c, t01=0x00a4}
0x5e70…5e9e              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x003c, t01=0x00c2}
0x5e9e…5eb2              Head {h00=0x0010, h01=0x0050, text=»   U =5(=4) «, t00=0x003c, t01=0x00f0}
0x5eb2…5ec2              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x003c, t01=0x0104}
0x5ec2…5ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0114}
0x5ecc…5ed6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x011e}
0x5ed6…5efa              Head {h00=0x0020, h01=0x0050, text=»*   UPDATE OF STATUS AND DWT«, t00=0x003c, t01=0x0128}
0x5efa…5f04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x014c}
0x5f04…5f0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0156}
0x5f0e…5f22              Head {h00=0x0010, h01=0x0050, text=»STATUS EQU *«, t00=0x003c, t01=0x0160}
0x5f22…5f4a              Head {h00=0x0024, h01=0x0050, text=» LDK A1,0 CLEAR STATUS REGISTER «, t00=0x003c, t01=0x0174}
0x5f4a…5f5e              Head {h00=0x0010, h01=0x0050, text=» LDK A3,/10 «, t00=0x003d, t01=0x000c}
0x5f5e…5f70              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003d, t01=0x0020}
0x5f70…5f98              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) STAT70 DIAGNOSTIC STATUS«, t00=0x003d, t01=0x0032}
0x5f98…5fac              Head {h00=0x0010, h01=0x0050, text=» LDK A3,/87 «, t00=0x003d, t01=0x005a}
0x5fac…5fbe              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003d, t01=0x006e}
0x5fbe…5fe8              Head {h00=0x0026, h01=0x0050, text=» RF(Z) STAT20 NOT RE, GE, JE OR CE«, t00=0x003d, t01=0x0080}
0x5fe8…6018              Head {h00=0x002c, h01=0x0050, text=» CF A5,SETBK SET BACK REQ POS AND LINE  «, t00=0x003d, t01=0x00aa}
0x6018…602e              Head {h00=0x0012, h01=0x0050, text=» LDK A3,1 U =5«, t00=0x003d, t01=0x00da}
0x602e…6040              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003d, t01=0x00f0}
0x6040…6060              Head {h00=0x001c, h01=0x0050, text=» RF(Z) STAT10 NOT GE =5 «, t00=0x003d, t01=0x0102}
0x6060…6082              Head {h00=0x001e, h01=0x0050, text=» ORK A1,1 IND NOT OPERABLE«, t00=0x003d, t01=0x0122}
0x6082…609c              Head {h00=0x0016, h01=0x0050, text=»STAT10 LDK A3,/80 «, t00=0x003d, t01=0x0144}
0x609c…60ae              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003d, t01=0x015e}
0x60ae…60ca              Head {h00=0x0018, h01=0x0050, text=» RF(Z) STAT15 NOT CE«, t00=0x003d, t01=0x0170}
0x60ca…60f0              Head {h00=0x0022, h01=0x0050, text=» ORK A1,4 IND CODE CHECK ERROR«, t00=0x003d, t01=0x018c}
0x60f0…6108              Head {h00=0x0014, h01=0x0050, text=»STAT15 LDK A3,4 «, t00=0x003e, t01=0x0022}
0x6108…611a              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003e, t01=0x003a}
0x611a…613e              Head {h00=0x0020, h01=0x0050, text=» RF(Z) STAT20 NOT REQ ERROR «, t00=0x003e, t01=0x004c}
0x613e…6160              Head {h00=0x001e, h01=0x0050, text=» SRC A3,3 ADJUST REQ ERROR«, t00=0x003e, t01=0x0070}
0x6160…6172              Head {h00=0x000e, h01=0x0050, text=» ORR A1,A3«, t00=0x003e, t01=0x0092}
0x6172…6190              Head {h00=0x001a, h01=0x0050, text=»STAT20 LD A3,DWTST,A6 «, t00=0x003e, t01=0x00a4}
0x6190…61a2              Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x003e, t01=0x00c2}
0x61a2…61c0              Head {h00=0x001a, h01=0x0050, text=» RF(Z) STAT60 JOURNAL «, t00=0x003e, t01=0x00d4}
0x61c0…61dc              Head {h00=0x0018, h01=0x0050, text=» LDK A3,/40 DOCUMENT«, t00=0x003e, t01=0x00f2}
0x61dc…61ee              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x003e, t01=0x010e}
0x61ee…6210              Head {h00=0x001e, h01=0x0050, text=» RF(Z) STAT30 NOT DOC OUT «, t00=0x003e, t01=0x0120}
0x6210…6238              Head {h00=0x0024, h01=0x0050, text=» ORKL A1,/20 INDICATE DOC OUT =5«, t00=0x003e, t01=0x0142}
0x6238…6262              Head {h00=0x0026, h01=0x0050, text=» CM DWTLN,A6 CLEAR LINE NO FOR DOC«, t00=0x003e, t01=0x016a}
0x6262…6290 (63, 0, 400) Head {h00=0x002a, h01=0x0050, text=» CM DWTPPD,A6 CLEAR PRINT POS DOCUMENT«, t00=0x003f, t01=0x0004}
0x6290…62a2              Head {h00=0x000e, h01=0x0050, text=» RF STAT40«, t00=0x003f, t01=0x0032}
0x62a2…62c0              Head {h00=0x001a, h01=0x0050, text=»STAT30 LC A3,DWTRLN,A6«, t00=0x003f, t01=0x0044}
0x62c0…62d8              Head {h00=0x0014, h01=0x0050, text=» SC A3,DWTALN,A6«, t00=0x003f, t01=0x0062}
0x62d8…62f6              Head {h00=0x001a, h01=0x0050, text=»STAT40 LC A3,DWTRPD,A6«, t00=0x003f, t01=0x007a}
0x62f6…630e              Head {h00=0x0014, h01=0x0050, text=» SC A3,DWTAPD,A6«, t00=0x003f, t01=0x0098}
0x630e…6352              Head {h00=0x0040, h01=0x0050, text=»STAT45 ST A3,ECBEL,A8 SET UP EFFECTIVE LENGTH=ACT PRINT POS «, t00=0x003f, t01=0x00b0}
0x6352…6380              Head {h00=0x002a, h01=0x0050, text=»STAT50 LDKL A3,/FB01 RESET STATUS BITS«, t00=0x003f, t01=0x00f4}
0x6380…638c              Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x003f, t01=0x0122}
0x638c…63a4              Head {h00=0x0014, h01=0x0050, text=» ANS A3,DWTST,A6«, t00=0x003f, t01=0x012e}
0x63a4…63bc              Head {h00=0x0014, h01=0x0050, text=» IFF REL=8 U =6 «, t00=0x003f, t01=0x0146}
0x63bc…63d4              Head {h00=0x0014, h01=0x0050, text=» IFF REL=9 U =6 «, t00=0x003f, t01=0x015e}
0x63d4…63fa              Head {h00=0x0022, h01=0x0050, text=» SUK A7,/39 REL DOC ORDER ? =5«, t00=0x003f, t01=0x0176}
0x63fa…6416              Head {h00=0x0018, h01=0x0050, text=» RF(NZ) STAT55 NO =5«, t00=0x0040, t01=0x000c}
0x6416…6446              Head {h00=0x002c, h01=0x0050, text=» ANK A1,1 YES IND ONLY NOT OP IF SET =5 «, t00=0x0040, t01=0x0028}
0x6446…6460              Head {h00=0x0016, h01=0x0050, text=»STAT55 EQU * U =5 «, t00=0x0040, t01=0x0058}
0x6460…6472              Head {h00=0x000e, h01=0x0050, text=» XIF  U =6«, t00=0x0040, t01=0x0072}
0x6472…6486              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0040, t01=0x0084}
0x6486…64a0              Head {h00=0x0016, h01=0x0050, text=»STAT60 LDK A3,/20 «, t00=0x0040, t01=0x0098}
0x64a0…64b2              Head {h00=0x000e, h01=0x0050, text=» TM A3,A2 «, t00=0x0040, t01=0x00b2}
0x64b2…64de              Head {h00=0x0028, h01=0x0050, text=» RF(Z) STAT62 NOT END OF JOURNAL =5 «, t00=0x0040, t01=0x00c4}
0x64de…650e              Head {h00=0x002c, h01=0x0050, text=» ORKL A1,ENDJ IND END OF JOURNAL =6(=4) «, t00=0x0040, t01=0x00f0}
0x650e…652a              Head {h00=0x0018, h01=0x0050, text=»STAT62 LDK A3,2 U =5«, t00=0x0040, t01=0x0120}
0x652a…6540              Head {h00=0x0012, h01=0x0050, text=» TM A3,A2 U =5«, t00=0x0040, t01=0x013c}
0x6540…6570              Head {h00=0x002c, h01=0x0050, text=» RF(Z) STAT65 NOT JOURNAL ERROR (JE) =5 «, t00=0x0040, t01=0x0152}
0x6570…6596              Head {h00=0x0022, h01=0x0050, text=» ORKL A1,1 IND NOT OPERABLE =5«, t00=0x0040, t01=0x0182}
0x6596…65b4              Head {h00=0x001a, h01=0x0050, text=»STAT65 LC A3,DWTRPJ,A6«, t00=0x0041, t01=0x0018}
0x65b4…65cc              Head {h00=0x0014, h01=0x0050, text=» SC A3,DWTAPJ,A6«, t00=0x0041, t01=0x0036}
0x65cc…65de              Head {h00=0x000e, h01=0x0050, text=» RB STAT45«, t00=0x0041, t01=0x004e}
0x65de…6620              Head {h00=0x003e, h01=0x0050, text=»STAT70 SC A2,ECBCW+1,A8 SET UP DIAGN STAT IN CTRL WORD =2 «, t00=0x0041, t01=0x0060}
0x6620…6648              Head {h00=0x0024, h01=0x0050, text=» LDK A1,1 IND ECB RETURN CODE= 1«, t00=0x0041, t01=0x00a2}
0x6648…666e              Head {h00=0x0022, h01=0x0050, text=» RB STAT50 SET UP RETURN CODE «, t00=0x0041, t01=0x00ca}
0x666e…667c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0041, t01=0x00f0}
0x667c…6686              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00fe}
0x6686…66a8              Head {h00=0x001e, h01=0x0050, text=»*   S U B R O U T I N E S «, t00=0x0041, t01=0x0108}
0x66a8…66b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x012a}
0x66b2…66bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0134}
0x66bc…66c4              Head {h00=0x0004, h01=0x0050, t00=0x0041, t01=0x013e}
0x66c4…66ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0146}
0x66ce…66e4              Head {h00=0x0012, h01=0x0050, text=»*   O R D E R «, t00=0x0041, t01=0x0150}
0x66e4…6718              Head {h00=0x0030, h01=0x0050, text=»*   SEND STB, STX AND ORDER CODE TO PRINTER «, t00=0x0041, t01=0x0166}
0x6718…6722              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x000a}
0x6722…6736              Head {h00=0x0010, h01=0x0050, text=»ORDER EQU * «, t00=0x0042, t01=0x0014}
0x6736…6752              Head {h00=0x0018, h01=0x0050, text=» LDK A2,STB SEND STB«, t00=0x0042, t01=0x0028}
0x6752…6768              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0042, t01=0x0044}
0x6768…677a              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0042, t01=0x005a}
0x677a…67a2              Head {h00=0x0024, h01=0x0050, text=» CF A5,OUTPUT SEND PRINTER ORDER«, t00=0x0042, t01=0x006c}
0x67a2…67b2              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0042, t01=0x0094}
0x67b2…67ba              Head {h00=0x0004, h01=0x0050, t00=0x0042, t01=0x00a4}
0x67ba…67c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00ac}
0x67c4…67de              Head {h00=0x0016, h01=0x0050, text=»*   E X E C U T E «, t00=0x0042, t01=0x00b6}
0x67de…6806              Head {h00=0x0024, h01=0x0050, text=»*   SEND ETB AND ETX TO PRINTER «, t00=0x0042, t01=0x00d0}
0x6806…6810              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00f8}
0x6810…6824              Head {h00=0x0010, h01=0x0050, text=»EXECUT EQU *«, t00=0x0042, t01=0x0102}
0x6824…6840              Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETB SEND ETB«, t00=0x0042, t01=0x0116}
0x6840…6856              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0042, t01=0x0132}
0x6856…6872              Head {h00=0x0018, h01=0x0050, text=» LDK A2,ETX SEND ETX«, t00=0x0042, t01=0x0148}
0x6872…6888              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0042, t01=0x0164}
0x6888…68b2              Head {h00=0x0026, h01=0x0050, text=» CF A5,STREG GET STATUS CHARACTER «, t00=0x0042, t01=0x017a}
0x68b2…68c2              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0043, t01=0x0014}
0x68c2…68cc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0024}
0x68cc…68de              Head {h00=0x000e, h01=0x0050, text=»*   ERROR «, t00=0x0043, t01=0x002e}
0x68de…6906              Head {h00=0x0024, h01=0x0050, text=»*   SENDS RESET CODE TO PRINTER «, t00=0x0043, t01=0x0040}
0x6906…6910              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x0068}
0x6910…6924              Head {h00=0x0010, h01=0x0050, text=»ERROR EQU * «, t00=0x0043, t01=0x0072}
0x6924…693a              Head {h00=0x0012, h01=0x0050, text=» LDK A2,RESET «, t00=0x0043, t01=0x0086}
0x693a…6950              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0043, t01=0x009c}
0x6950…6960              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0043, t01=0x00b2}
0x6960…696a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00c2}
0x696a…697c              Head {h00=0x000e, h01=0x0050, text=»*   0 U T «, t00=0x0043, t01=0x00cc}
0x697c…699c              Head {h00=0x001c, h01=0x0050, text=»*   ADD CONST. AND SEND «, t00=0x0043, t01=0x00de}
0x699c…69a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0043, t01=0x00fe}
0x69a6…69bc              Head {h00=0x0012, h01=0x0050, text=»OUT EQU * U =3«, t00=0x0043, t01=0x0108}
0x69bc…69d4              Head {h00=0x0014, h01=0x0050, text=» ANK A2,/7F U =3«, t00=0x0043, t01=0x011e}
0x69d4…69ec              Head {h00=0x0014, h01=0x0050, text=» ADK A2,/10 U =3«, t00=0x0043, t01=0x0136}
0x69ec…6a04              Head {h00=0x0014, h01=0x0050, text=» CWK A2,/7F U =1«, t00=0x0043, t01=0x014e}
0x6a04…6a3c              Head {h00=0x0034, h01=0x0050, text=» RF(NG) OUT10 CHARACTER NOT GREATER THAN /7F =1 «, t00=0x0043, t01=0x0166}
0x6a3c…6a6e              Head {h00=0x002e, h01=0x0050, text=» LDK A2,/7F IF GREATER SET CHAR TO /7F =1 «, t00=0x0044, t01=0x000e}
0x6a6e…6a86              Head {h00=0x0014, h01=0x0050, text=»OUT10 EQU * U =1«, t00=0x0044, t01=0x0040}
0x6a86…6a9c              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0044, t01=0x0058}
0x6a9c…6aac              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0044, t01=0x006e}
0x6aac…6aba              Head {h00=0x000a, h01=0x0050, text=»*     «, t00=0x0044, t01=0x007e}
0x6aba…6ace              Head {h00=0x0010, h01=0x0050, text=»*   SETBK   «, t00=0x0044, t01=0x008c}
0x6ace…6b0c              Head {h00=0x003a, h01=0x0050, text=»*   SET BACK REQ LINE AND POS TO ACTUAL LINE AND POS  «, t00=0x0044, t01=0x00a0}
0x6b0c…6b1a              Head {h00=0x000a, h01=0x0050, text=»*     «, t00=0x0044, t01=0x00de}
0x6b1a…6b3a              Head {h00=0x001c, h01=0x0050, text=»SETBK LC A3,DWTALN,A6   «, t00=0x0044, t01=0x00ec}
0x6b3a…6b54              Head {h00=0x0016, h01=0x0050, text=» SC A3,DWTRLN,A6  «, t00=0x0044, t01=0x010c}
0x6b54…6b6e              Head {h00=0x0016, h01=0x0050, text=» LC A3,DWTAPD,A6  «, t00=0x0044, t01=0x0126}
0x6b6e…6b88              Head {h00=0x0016, h01=0x0050, text=» SC A3,DWTRPD,A6  «, t00=0x0044, t01=0x0140}
0x6b88…6ba2              Head {h00=0x0016, h01=0x0050, text=» LC A3,DWTAPJ,A6  «, t00=0x0044, t01=0x015a}
0x6ba2…6bbc              Head {h00=0x0016, h01=0x0050, text=» SC A3,DWTRPJ,A6  «, t00=0x0044, t01=0x0174}
0x6bbc…6bce              Head {h00=0x000e, h01=0x0050, text=» RTN A5   «, t00=0x0044, t01=0x018e}
0x6bce…6bdc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0045, t01=0x0010}
0x6bdc…6be6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x001e}
0x6be6…6bfa              Head {h00=0x0010, h01=0x0050, text=»*   I H T P «, t00=0x0045, t01=0x0028}
0x6bfa…6c04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x003c}
0x6c04…6c38              Head {h00=0x0030, h01=0x0050, text=»*   INTERRUPT HANDLER: PROCESS OF INTERRUPT «, t00=0x0045, t01=0x0046}
0x6c38…6c42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x007a}
0x6c42…6c4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x0084}
0x6c4c…6c56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0045, t01=0x008e}
0x6c56…6c68              Head {h00=0x000e, h01=0x0050, text=»IHTP EQU *«, t00=0x0045, t01=0x0098}
0x6c68…6c7a              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0045, t01=0x00aa}
0x6c7a…6ca2              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) IHTP20 LINE NOT OPERABLE«, t00=0x0045, t01=0x00bc}
0x6ca2…6cb4              Head {h00=0x000e, h01=0x0050, text=» ECR A1,A2«, t00=0x0045, t01=0x00e4}
0x6cb4…6cc8              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/70 «, t00=0x0045, t01=0x00f6}
0x6cc8…6ce2              Head {h00=0x0016, h01=0x0050, text=» RF(Z) IHTP40 ACK «, t00=0x0045, t01=0x010a}
0x6ce2…6cf8              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/FF3F«, t00=0x0045, t01=0x0124}
0x6cf8…6d22              Head {h00=0x0026, h01=0x0050, text=» ANRS A1,A6 CLEAR PAPER INF IN DWT«, t00=0x0045, t01=0x013a}
0x6d22…6d34              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0045, t01=0x0164}
0x6d34…6d6e              Head {h00=0x0036, h01=0x0050, text=» ANK A1,/60 MASK OUT PAPER INF FROM PRINTER ANSWER«, t00=0x0045, t01=0x0176}
0x6d6e…6d8e              Head {h00=0x001c, h01=0x0050, text=» XRK A1,/60 INVERT BITS «, t00=0x0046, t01=0x0020}
0x6d8e…6daa              Head {h00=0x0018, h01=0x0050, text=» SLC A1,1 ADJUST POS«, t00=0x0046, t01=0x0040}
0x6daa…6dda              Head {h00=0x002c, h01=0x0050, text=» ORRS A1,A6 SET UP NEW PAPER INFORMATION«, t00=0x0046, t01=0x005c}
0x6dda…6dee              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/18 «, t00=0x0046, t01=0x008c}
0x6dee…6e00              Head {h00=0x000e, h01=0x0050, text=» TM A1,A2 «, t00=0x0046, t01=0x00a0}
0x6e00…6e3a              Head {h00=0x0036, h01=0x0050, text=» RF(NZ) IHTP40 DATA REQUEST OR DIAGNOSTIC STATUS 1«, t00=0x0046, t01=0x00b2}
0x6e3a…6e64              Head {h00=0x0026, h01=0x0050, text=»IHTP20 ABL TDISP GO TO DISPATCHER «, t00=0x0046, t01=0x00ec}
0x6e64…6e9c              Head {h00=0x0034, h01=0x0050, text=»IHTP40 ABL LDREG RETURN FROM CF A5,OUTPUT/STREG «, t00=0x0046, t01=0x0116}
0x6e9c…6eaa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0046, t01=0x014e}
0x6eaa…6eb4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x015c}
0x6eb4…6ec8              Head {h00=0x0010, h01=0x0050, text=»*   R C T P «, t00=0x0046, t01=0x0166}
0x6ec8…6ed2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0046, t01=0x017a}
0x6ed2…6f14              Head {h00=0x003e, h01=0x0050, text=»*   RECOVERY ROUTINE: REPRINTS RUNNING REQUEST AT POWER ON«, t00=0x0046, t01=0x0184}
0x6f14…6f1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0047, t01=0x0036}
0x6f1e…6f48              Head {h00=0x0026, h01=0x0050, text=»RCTP CF A15,SAVE8 SAVE REG. A1-A8 «, t00=0x0047, t01=0x0040}
0x6f48…6f74              Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/7FFF INDICATE DEVICE BUSY «, t00=0x0047, t01=0x006a}
0x6f74…6f8c              Head {h00=0x0014, h01=0x0050, text=» ANS A1,DWTST,A6«, t00=0x0047, t01=0x0096}
0x6f8c…6fc0              Head {h00=0x0030, h01=0x0050, text=» LDK A3,PORECV SET UP PRINTER RECOVERY ORDER«, t00=0x0047, t01=0x00ae}
0x6fc0…6fd8              Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTPP,A6 «, t00=0x0047, t01=0x00e2}
0x6fd8…700e              Head {h00=0x0032, h01=0x0050, text=» RF(N) RCTP10 NOT SYSTEM START UP RECOVERY =2 «, t00=0x0047, t01=0x00fa}
0x700e…703e              Head {h00=0x002c, h01=0x0050, text=» LD A3,STDPP SET UP ST PR PAR IN DWT =2 «, t00=0x0047, t01=0x0130}
0x703e…705a              Head {h00=0x0018, h01=0x0050, text=» ST A3,DWTPP,A6 U =2«, t00=0x0047, t01=0x0160}
0x705a…708c              Head {h00=0x002e, h01=0x0050, text=» LDK A4,8 SET UP DOC PAR TABLE 0 IN DWT =2«, t00=0x0047, t01=0x017c}
0x708c…70a4              Head {h00=0x0014, h01=0x0050, text=» LDR A3,A6 U =2 «, t00=0x0048, t01=0x001e}
0x70a4…70c0              Head {h00=0x0018, h01=0x0050, text=» ADK A3,DWTDP+8 U =2«, t00=0x0048, t01=0x0036}
0x70c0…70e4              Head {h00=0x0020, h01=0x0050, text=»RCTP05 LD A1,DTTP03,A4 U =2 «, t00=0x0048, t01=0x0052}
0x70e4…70fc              Head {h00=0x0014, h01=0x0050, text=» STR A1,A3 U =2 «, t00=0x0048, t01=0x0076}
0x70fc…7112              Head {h00=0x0012, h01=0x0050, text=» SUK A3,2 U =2«, t00=0x0048, t01=0x008e}
0x7112…7128              Head {h00=0x0012, h01=0x0050, text=» SUK A4,2 U =2«, t00=0x0048, t01=0x00a4}
0x7128…7144              Head {h00=0x0018, h01=0x0050, text=» RB(NN) RCTP05 U =2 «, t00=0x0048, t01=0x00ba}
0x7144…7180              Head {h00=0x0038, h01=0x0050, text=» LDK A3,PORECV+1 SET UP SYSTEM START UP RECOVERY =2 «, t00=0x0048, t01=0x00d6}
0x7180…71a6              Head {h00=0x0022, h01=0x0050, text=»RCTP10 CF A5,ORDER SEND ORDER «, t00=0x0048, t01=0x0112}
0x71a6…71d8              Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTPP,A6 GET PRINTER PARAMETERS =2 «, t00=0x0048, t01=0x0138}
0x71d8…71e8              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x0048, t01=0x016a}
0x71e8…71f8              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x0048, t01=0x017a}
0x71f8…7208              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x0048, t01=0x018a}
0x7208…7220              Head {h00=0x0014, h01=0x0050, text=»RCTP20 ECR A2,A3«, t00=0x0049, t01=0x000a}
0x7220…7234              Head {h00=0x0010, h01=0x0050, text=»   U =4(=2) «, t00=0x0049, t01=0x0022}
0x7234…7252              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND L/NCV «, t00=0x0049, t01=0x0036}
0x7252…7264              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0049, t01=0x0054}
0x7264…7278              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/77 «, t00=0x0049, t01=0x0066}
0x7278…7298              Head {h00=0x001c, h01=0x0050, text=» CF A5,OUT SEND CPJ/CPD «, t00=0x0049, t01=0x007a}
0x7298…72c8              Head {h00=0x002c, h01=0x0050, text=» LC A2,DWTAPJ,A6 GET ACTUAL POS JOURNAL «, t00=0x0049, t01=0x009a}
0x72c8…72e4              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x0049, t01=0x00ca}
0x72e4…7314              Head {h00=0x002c, h01=0x0050, text=» LC A2,DWTAPD,A6 GET ACTUAL POS DOCUMENT«, t00=0x0049, t01=0x00e6}
0x7314…7334              Head {h00=0x001c, h01=0x0050, text=» LDR A3,A2 SAVE DOC POS «, t00=0x0049, t01=0x0116}
0x7334…7354              Head {h00=0x001c, h01=0x0050, text=» ANK A2,/3F MASK OFF MSB«, t00=0x0049, t01=0x0136}
0x7354…7370              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT SEND APD «, t00=0x0049, t01=0x0156}
0x7370…7394              Head {h00=0x0020, h01=0x0050, text=» LDR A2,A3 GET DOC POS BACK «, t00=0x0049, t01=0x0172}
0x7394…73b4              Head {h00=0x001c, h01=0x0050, text=» ANK A2,/40 MASK OUT MSB«, t00=0x004a, t01=0x0008}
0x73b4…73d0              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT SEND AP6 «, t00=0x004a, t01=0x0028}
0x73d0…73fc              Head {h00=0x0028, h01=0x0050, text=» LC A2,DWTALN,A6 GET ACTUAL LINE NO «, t00=0x004a, t01=0x0044}
0x73fc…7418              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x004a, t01=0x0070}
0x7418…7428              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x008c}
0x7428…7438              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x009c}
0x7438…7448              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00ac}
0x7448…7458              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00bc}
0x7458…7468              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00cc}
0x7468…7478              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00dc}
0x7478…7488              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00ec}
0x7488…7498              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x00fc}
0x7498…74a8              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x010c}
0x74a8…74b8              Head {h00=0x000c, h01=0x0050, text=»   U =2 «, t00=0x004a, t01=0x011c}
0x74b8…74d0              Head {h00=0x0014, h01=0x0050, text=»RCTP40 LDK A4,10«, t00=0x004a, t01=0x012c}
0x74d0…74e2              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x004a, t01=0x0144}
0x74e2…74f8              Head {h00=0x0012, h01=0x0050, text=» ADK A3,DWTDP «, t00=0x004a, t01=0x0156}
0x74f8…7522              Head {h00=0x0026, h01=0x0050, text=»RCTP50 LCR A2,A3 GET DOC PARAMETER«, t00=0x004a, t01=0x016c}
0x7522…7532              Head {h00=0x000c, h01=0x0050, text=»   U =4 «, t00=0x004b, t01=0x0008}
0x7532…754e              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x004b, t01=0x0018}
0x754e…7576              Head {h00=0x0024, h01=0x0050, text=» ADK A3,1 INC DOC TABLE POINTER «, t00=0x004b, t01=0x0034}
0x7576…759e              Head {h00=0x0024, h01=0x0050, text=» SUK A4,1 DEC CHARACTER COUNTER «, t00=0x004b, t01=0x005c}
0x759e…75ca              Head {h00=0x0028, h01=0x0050, text=» RB(NZ) RCTP50 WHOLE TABLE NOT SENT «, t00=0x004b, t01=0x0084}
0x75ca…7602              Head {h00=0x0034, h01=0x0050, text=»RCTP60 CF A5,EXECUT EXECUTE RECOVERY IN PRINTER «, t00=0x004b, t01=0x00b0}
0x7602…7632              Head {h00=0x002c, h01=0x0050, text=» CF A5,SETBK SET BACK REQ POS AND LINE  «, t00=0x004b, t01=0x00e8}
0x7632…7646              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/40 «, t00=0x004b, t01=0x0118}
0x7646…7658              Head {h00=0x000e, h01=0x0050, text=» TM A1,A2 «, t00=0x004b, t01=0x012c}
0x7658…767a              Head {h00=0x001e, h01=0x0050, text=» RF(Z) RCTP70 DOC NOT OUT «, t00=0x004b, t01=0x013e}
0x767a…76a4              Head {h00=0x0026, h01=0x0050, text=» CM DWTLN,A6 CLEAR LINE NO FOR DOC«, t00=0x004b, t01=0x0160}
0x76a4…76ce              Head {h00=0x0026, h01=0x0050, text=» CM DWTPPD,A6 CLEAR PRINT POS DOC «, t00=0x004b, t01=0x018a}
0x76ce…76ec              Head {h00=0x001a, h01=0x0050, text=»RCTP70 LD A1,DWTECB,A6«, t00=0x004c, t01=0x0024}
0x76ec…7710              Head {h00=0x0020, h01=0x0050, text=» ABL(NZ) ACT005 REQ RUNNING «, t00=0x004c, t01=0x0042}
0x7710…7734              Head {h00=0x0020, h01=0x0050, text=» ABL DISEND REQ NOT RUNNING «, t00=0x004c, t01=0x0066}
0x7734…7740              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x004c, t01=0x008a}
0x7740…7744              Head {h00=0x4004, h01=0x0000}
0x7744…7748              00 4c 00 96                                                                                                                                                                                                                                       ┆ L  ┆
0x7748…7750 (77, 1, 8)   20 04 00 00 00 4d 00 04                                                                                                                                                                                                                           ┆     M  ┆
0x7750…77a0 (78, 0, 400) 41 4c 4c 5c 45 52 52 4f 52 20 01 25 01 8e 00 10 00 50 53 59 41 31 35 30 5c 45 51 55 5c 2a 01 26 00 12 00 28 00 50 5c 41 44 4b 4c 5c 41 31 32 2c 55 50 3a 52 45 43 5c 41 44 44 20 54 4f 20 4e 45 58 54 20 52 45 43 4f 52 44 20 01 26 00 26 00 0e   ┆ALL ERROR  %     PSYA150 EQU * &   ( P ADKL A12,UP:REC ADD TO NEXT RECORD  & &  ┆
0x77a0…77f0              00 50 5c 52 42 5c 53 59 41 31 34 35 01 26 00 52 00 24 00 50 46 52 53 54 4f 4b 5c 4c 43 5c 41 32 2c 32 2c 41 31 31 5c 47 45 54 20 33 3a 52 44 20 43 48 41 52 01 26 00 64 00 18 00 50 5c 43 43 5c 41 32 2c 55 50 4e 41 4d 45 2b 32 2c 41 31 32 20   ┆ P RB SYA145 & R $ PFRSTOK LC A2,2,A11 GET 3:RD CHAR & d   P CC A2,UPNAME+2,A12 ┆
0x77f0…7840              01 26 00 8c 00 18 00 50 5c 52 42 28 4e 45 29 5c 53 59 41 31 34 37 5c 2e 4e 45 51 2e 01 26 00 a8 00 0a 00 50 5c 45 4a 45 43 54 01 26 00 c4 00 08 00 50 5c 5c 5c 20 01 26 00 d2 00 18 00 50 2a 20 50 52 4f 54 4f 54 59 50 45 20 46 4f 55 4e 44 20   ┆ &     P RB(NE) SYA147 .NEQ. &     P EJECT &     P     &     P* PROTOTYPE FOUND ┆
0x7840…7890              2a 20 01 26 00 de 00 08 00 50 5c 5c 5c 20 01 26 00 fa 00 38 00 50 5c 41 44 4b 4c 5c 41 31 31 2c 4e 41 4d 55 57 42 5c 53 4b 49 50 20 54 4f 20 27 4e 55 4d 42 45 52 20 4f 46 20 42 4f 43 4b 53 27 20 49 4e 20 43 4f 4e 46 49 47 01 26 01 06 00 10   ┆*  &     P     &   8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG &    ┆
0x7890…78e0              00 50 5c 4c 44 52 5c 41 36 2c 41 31 31 20 01 26 01 42 00 18 00 50 5c 43 41 4c 4c 5c 47 45 54 4e 55 4d 5c 43 4f 4e 56 45 52 54 01 26 01 56 00 32 00 50 5c 53 43 5c 41 35 2c 55 50 4e 55 4d 42 2c 41 31 32 5c 53 41 56 45 20 49 4e 20 55 3a 42 54   ┆ P LDR A6,A11  & B   P CALL GETNUM CONVERT & V 2 P SC A5,UPNUMB,A12 SAVE IN U:BT┆
0x78e0…7930 (79, 0, 400) 41 42 20 28 53 48 41 44 4f 57 54 41 42 4c 45 29 01 26 01 72 00 2e 00 50 5c 53 55 4b 5c 41 31 2c 31 5c 44 45 43 2e 20 4e 4f 20 4f 46 20 54 59 50 45 53 20 49 4e 20 43 4f 4e 46 49 47 20 46 49 4c 45 20 01 27 00 18 00 12 00 50 5c 52 42 28 50 29   ┆AB (SHADOWTABLE) & r . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE  '     P RB(P)┆
0x7930…7980              5c 53 59 41 31 34 32 20 01 27 00 4a 00 16 00 50 5c 41 44 4b 4c 5c 41 31 31 2c 55 44 42 46 53 54 2d 31 01 27 00 60 00 0c 00 50 5c 52 54 4e 5c 41 31 34 01 27 00 7a 00 08 00 50 5c 58 49 46 01 27 00 8a 00 18 00 50 5c 49 46 54 20 43 52 45 44 49   ┆ SYA142  ' J   P ADKL A11,UDBFST-1 ' `   P RTN A14 ' z   P XIF '     P IFT CREDI┆
0x7980…79d0              54 2b 4d 4d 55 50 41 47 3d 32 01 27 00 96 00 10 00 50 5c 41 44 4b 4c 5c 41 31 31 2c 31 20 01 27 00 b2 00 10 00 50 5c 4c 44 52 5c 41 36 2c 41 31 31 20 01 27 00 c6 00 2a 00 50 5c 43 41 4c 4c 5c 47 45 54 4e 55 4d 5c 50 41 43 4b 20 33 20 44 49   ┆T+MMUPAG=2 '     P ADKL A11,1  '     P LDR A6,A11  '   * P CALL GETNUM PACK 3 DI┆
0x79d0…7a20              47 2e 20 52 45 53 55 4c 54 20 49 4e 20 41 35 20 01 27 00 da 00 24 00 50 5c 4c 44 52 5c 41 31 2c 41 35 5c 53 41 56 45 20 4e 55 4d 42 45 52 20 4f 46 20 55 57 42 27 53 20 01 27 01 08 00 10 00 50 53 59 41 31 34 32 5c 45 51 55 5c 2a 01 27 01 30   ┆G. RESULT IN A5  '   $ P LDR A1,A5 SAVE NUMBER OF UWB'S  '     PSYA142 EQU * ' 0┆
0x7a20…7a70              00 1e 00 50 5c 4c 44 52 5c 41 31 32 2c 41 38 5c 53 54 41 52 54 20 4f 46 20 54 41 42 4c 45 01 27 01 44 00 20 00 50 5c 45 4c 52 5c 41 33 2c 41 31 32 5c 4c 45 4e 47 54 48 20 4f 46 20 55 3a 42 54 41 42 01 27 01 66 00 28 00 50 5c 41 44 4b 4c 5c   ┆   P LDR A12,A8 START OF TABLE ' D   P ELR A3,A12 LENGTH OF U:BTAB ' f ( P ADKL ┆
0x7a70…7ac0 (80, 0, 400) 41 31 31 2c 55 44 42 46 53 54 2d 31 5c 46 49 52 53 54 20 55 44 42 20 52 45 43 4f 52 44 20 01 27 01 8a 00 10 00 50 53 59 41 31 34 35 5c 45 51 55 5c 2a 01 28 00 26 00 30 00 50 5c 4c 43 52 5c 41 32 2c 41 31 31 5c 47 45 54 20 46 49 52 53 54 20   ┆A11,UDBFST-1 FIRST UDB RECORD  '     PSYA145 EQU * ( & 0 P LCR A2,A11 GET FIRST ┆
0x7ac0…7b10              43 48 41 52 41 43 54 45 52 20 46 52 4f 4d 20 43 4f 4e 46 49 47 20 01 28 00 3a 00 0e 00 50 5c 53 4c 4c 5c 41 32 2c 38 20 01 28 00 6e 00 1e 00 50 5c 4c 43 5c 41 32 2c 31 2c 41 31 31 5c 47 45 54 20 32 3a 4e 44 20 43 48 41 52 01 28 00 80 00 32   ┆CHARACTER FROM CONFIG  ( :   P SLL A2,8  ( n   P LC A2,1,A11 GET 2:ND CHAR (   2┆
0x7b10…7b60              00 50 5c 45 4c 5c 41 31 30 2c 55 50 4e 41 4d 45 2c 41 31 32 5c 47 45 54 20 46 49 52 53 54 20 57 4f 52 44 20 49 4e 20 50 52 4f 54 4f 54 59 50 45 01 28 00 a2 00 10 00 50 5c 43 57 52 5c 41 32 2c 41 31 30 20 01 28 00 d8 00 20 00 50 5c 52 46 28   ┆ P EL A10,UPNAME,A12 GET FIRST WORD IN PROTOTYPE (     P CWR A2,A10  (     P RF(┆
0x7b60…7bb0              45 29 5c 46 52 53 54 4f 4b 5c 46 49 52 53 54 20 57 4f 52 44 20 4f 4b 21 01 28 00 ec 00 30 00 50 53 59 41 31 34 37 5c 53 55 4b 5c 41 33 2c 55 50 3a 52 45 43 5c 44 45 43 2e 20 4e 55 4d 42 45 52 20 4f 46 20 50 52 4f 54 2e 27 53 20 01 28 01 10   ┆E) FRSTOK FIRST WORD OK! (   0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S  (  ┆
0x7bb0…7c00              00 12 00 50 5c 52 46 28 4e 4e 29 5c 53 59 41 31 35 30 01 28 01 44 00 1e 00 50 5c 4c 44 4b 5c 41 31 2c 4c 4d 50 36 5c 55 57 42 20 4e 4f 54 20 46 4f 55 4e 44 01 28 01 5a 00 10 00 50 5c 43 41 4c 4c 5c 45 52 52 4f 52 20 01 28 01 7c 00 10 00 50   ┆   P RF(NN) SYA150 ( D   P LDK A1,LMP6 UWB NOT FOUND ( Z   P CALL ERROR  ( |   P┆
0x7c00…7c50 (81, 0, 400) 53 59 41 31 35 30 5c 45 51 55 5c 2a 01 28 01 90 00 28 00 50 5c 41 44 4b 4c 5c 41 31 32 2c 55 50 3a 52 45 43 5c 41 44 44 20 54 4f 20 4e 45 58 54 20 52 45 43 4f 52 44 20 01 29 00 14 00 0e 00 50 5c 52 42 5c 53 59 41 31 34 35 01 29 00 40 00 32   ┆SYA150 EQU * (   ( P ADKL A12,UP:REC ADD TO NEXT RECORD  )     P RB SYA145 ) @ 2┆
0x7c50…7ca0              00 50 46 52 53 54 4f 4b 5c 4c 43 5c 41 31 30 2c 32 2c 41 31 31 5c 47 45 54 20 33 3a 52 44 20 43 48 41 52 20 46 52 4f 4d 20 43 4f 4e 46 49 47 20 01 29 00 52 00 30 00 50 5c 45 4c 5c 41 32 2c 55 50 4e 41 4d 45 2b 32 2c 41 31 32 5c 47 45 54 20   ┆ PFRSTOK LC A10,2,A11 GET 3:RD CHAR FROM CONFIG  ) R 0 P EL A2,UPNAME+2,A12 GET ┆
0x7ca0…7cf0              33 3a 52 44 20 43 48 41 52 20 46 52 4f 4d 20 50 52 4f 59 20 01 29 00 88 00 0e 00 50 5c 53 52 4c 5c 41 32 2c 38 20 01 29 00 bc 00 12 00 50 5c 41 4e 4b 4c 5c 41 31 30 2c 2f 46 46 20 01 29 00 ce 00 10 00 50 5c 43 57 52 5c 41 31 30 2c 41 32 20   ┆3:RD CHAR FROM PROY  )     P SRL A2,8  )     P ANKL A10,/FF  )     P CWR A10,A2 ┆
0x7cf0…7d40              01 29 00 e4 00 18 00 50 5c 52 42 28 4e 45 29 5c 53 59 41 31 34 37 5c 2e 4e 45 51 2e 01 29 00 f8 00 0a 00 50 5c 45 4a 45 43 54 01 29 01 14 00 08 00 50 5c 5c 5c 20 01 29 01 22 00 18 00 50 2a 20 50 52 4f 54 4f 54 59 50 45 20 46 4f 55 4e 44 20   ┆ )     P RB(NE) SYA147 .NEQ. )     P EJECT )     P     ) "   P* PROTOTYPE FOUND ┆
0x7d40…7d90              2a 20 01 29 01 2e 00 18 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 01 29 01 4a 00 08 00 50 5c 5c 5c 20 01 29 01 66 00 38 00 50 5c 41 44 4b 4c 5c 41 31 31 2c 4e 41 4d 55 57 42 5c 53 4b 49 50 20 54 4f 20 27 4e 55 4d 42   ┆*  ) .   P*******************  ) J   P     ) f 8 P ADKL A11,NAMUWB SKIP TO 'NUMB┆
0x7d90…7de0 (82, 0, 400) 45 52 20 4f 46 20 42 4f 43 4b 53 27 20 49 4e 20 43 4f 4e 46 49 47 01 29 01 72 00 10 00 50 5c 4c 44 52 5c 41 36 2c 41 31 31 20 01 2a 00 1e 00 18 00 50 5c 43 41 4c 4c 5c 47 45 54 4e 55 4d 5c 43 4f 4e 56 45 52 54 01 2a 00 32 00 34 00 50 5c 45   ┆ER OF BOCKS' IN CONFIG ) r   P LDR A6,A11  *     P CALL GETNUM CONVERT * 2 4 P E┆
0x7de0…7e30              4c 5c 41 31 30 2c 55 50 4e 55 4d 42 2d 31 2c 41 31 32 5c 53 41 56 45 20 49 4e 20 55 3a 42 54 41 42 20 53 48 41 44 4f 57 2d 54 41 42 4c 45 01 2a 00 4e 00 14 00 50 5c 41 4e 4b 4c 5c 41 31 30 2c 2f 46 46 30 30 20 01 2a 00 86 00 10 00 50 5c 4f   ┆L A10,UPNUMB-1,A12 SAVE IN U:BTAB SHADOW-TABLE * N   P ANKL A10,/FF00  *     P O┆
0x7e30…7e80              52 52 5c 41 31 30 2c 41 35 20 01 2a 00 9e 00 18 00 50 5c 45 53 5c 41 31 30 2c 55 50 4e 55 4d 42 2d 31 2c 41 31 32 01 2a 00 b2 00 2e 00 50 5c 53 55 4b 5c 41 31 2c 31 5c 44 45 43 2e 20 4e 4f 20 4f 46 20 54 59 50 45 53 20 49 4e 20 43 4f 4e 46   ┆RR A10,A5  *     P ES A10,UPNUMB-1,A12 *   . P SUK A1,1 DEC. NO OF TYPES IN CONF┆
0x7e80…7ed0              49 47 20 46 49 4c 45 20 01 2a 00 ce 00 12 00 50 5c 52 42 28 50 29 5c 53 59 41 31 34 32 20 01 2a 01 00 00 16 00 50 5c 41 44 4b 4c 5c 41 31 31 2c 55 44 42 46 53 54 2d 31 01 2a 01 16 00 0c 00 50 5c 52 54 4e 5c 41 31 34 01 2a 01 30 00 08 00 50   ┆IG FILE  *     P RB(P) SYA142  *     P ADKL A11,UDBFST-1 *     P RTN A14 * 0   P┆
0x7ed0…7f20              5c 58 49 46 01 2a 01 40 00 12 00 50 5c 49 46 54 5c 43 52 45 44 49 54 3d 31 20 01 2a 01 4c 00 0a 00 50 5c 45 4a 45 43 54 01 2a 01 62 00 10 00 50 53 59 41 31 35 32 5c 45 51 55 5c 2a 01 2a 01 70 00 04 00 50 01 2a 01 84 00 26 00 50 2a 20 47 45   ┆ XIF * @   P IFT CREDIT=1  * L   P EJECT * b   PSYA152 EQU * * p   P *   & P* GE┆
0x7f20…7f70 (83, 0, 400) 54 20 53 54 41 52 54 20 4f 46 20 53 59 53 4c 4f 41 44 20 41 46 54 45 52 20 4d 4f 56 45 20 01 2a 01 8c 00 08 00 50 5c 5c 5c 20 01 2b 00 26 00 08 00 50 5c 58 49 46 01 2b 00 32 00 18 00 50 5c 49 46 54 5c 43 52 45 44 49 54 2d 4d 4d 55 50 41 47   ┆T START OF SYSLOAD AFTER MOVE  *     P     + &   P XIF + 2   P IFT CREDIT-MMUPAG┆
0x7f70…7fc0              3d 31 01 2b 00 3e 00 2c 00 50 5c 4c 44 2a 5c 41 37 2c 54 3a 41 54 4f 44 2c 41 31 33 5c 47 45 54 20 4c 45 4e 47 54 48 20 4f 46 20 54 3a 41 54 41 42 20 01 2b 00 5a 00 08 00 50 5c 58 49 46 01 2b 00 8a 00 18 00 50 5c 49 46 54 5c 43 52 45 44 49   ┆=1 + > , P LD* A7,T:ATOD,A13 GET LENGTH OF T:ATAB  + Z   P XIF +     P IFT CREDI┆
0x7fc0…8010              54 2b 4d 4d 55 50 41 47 3d 32 01 2b 00 96 00 28 00 50 5c 45 4c 2a 5c 41 37 2c 54 3a 41 54 4f 44 2c 41 31 33 5c 47 45 54 20 54 3a 41 54 41 42 20 4c 45 4e 47 54 48 01 2b 00 b2 00 2a 00 50 5c 53 4c 4c 5c 41 37 2c 31 5c 52 45 53 45 52 56 45 20   ┆T+MMUPAG=2 +   ( P EL* A7,T:ATOD,A13 GET T:ATAB LENGTH +   * P SLL A7,1 RESERVE ┆
0x8010…8060              46 4f 52 20 4d 4d 2d 41 44 44 52 45 53 53 2d 54 41 42 4c 45 01 2b 00 de 00 08 00 50 5c 58 49 46 01 2b 01 0c 00 12 00 50 5c 49 46 46 20 43 52 45 44 49 54 3d 30 20 01 2b 01 18 00 30 00 50 5c 41 44 5c 41 37 2c 53 43 54 53 46 41 5c 54 4f 2d 41   ┆FOR MM-ADDRESS-TABLE +     P XIF +     P IFF CREDIT=0  +   0 P AD A7,SCTSFA TO-A┆
0x8060…80b0              44 44 52 45 53 53 20 28 41 46 54 45 52 20 53 48 41 44 4f 57 2d 54 41 42 4c 45 01 2b 01 2e 00 0e 00 50 5c 41 44 4b 5c 41 37 2c 31 20 01 2b 01 62 00 20 00 50 5c 41 4e 4b 4c 5c 41 37 2c 2f 46 46 46 45 5c 45 56 45 4e 20 41 44 44 52 45 53 53 20   ┆DDRESS (AFTER SHADOW-TABLE + .   P ADK A7,1  + b   P ANKL A7,/FFFE EVEN ADDRESS ┆
0x80b0…8100 (84, 0, 400) 01 2b 01 74 00 04 00 50 01 2c 00 08 00 1a 00 50 2a 20 43 41 4c 43 55 4c 41 54 45 20 52 45 4c 4f 43 41 54 49 4f 4e 01 2c 00 10 00 04 00 50 01 2c 00 2e 00 10 00 50 5c 4c 44 52 5c 41 32 2c 41 31 33 20 01 2c 00 36 00 24 00 50 5c 53 55 52 5c 41   ┆ + t   P ,     P* CALCULATE RELOCATION ,     P , .   P LDR A2,A13  , 6 $ P SUR A┆
0x8100…8150              32 2c 41 37 5c 4d 4f 56 45 2d 4c 45 4e 47 54 48 20 28 53 59 53 4c 44 41 29 20 01 2c 00 4a 00 0e 00 50 5c 4e 47 52 5c 41 32 2c 41 32 01 2c 00 72 00 34 00 50 5c 53 54 5c 41 32 2c 53 41 56 45 30 34 2c 41 31 33 5c 53 41 56 45 20 4e 45 57 20 52   ┆2,A7 MOVE-LENGTH (SYSLDA)  , J   P NGR A2,A2 , r 4 P ST A2,SAVE04,A13 SAVE NEW R┆
0x8150…81a0              45 4c 4f 43 41 54 49 4f 4e 20 54 45 4d 50 4f 52 41 52 59 20 01 2c 00 84 00 18 00 50 5c 49 46 54 20 43 52 45 44 49 54 2b 4d 4d 55 50 41 47 3d 32 01 2c 00 bc 00 26 00 50 2a 20 43 52 45 41 54 45 20 53 59 53 4c 44 41 20 26 20 44 44 49 56 20 4d   ┆ELOCATION TEMPORARY  ,     P IFT CREDIT+MMUPAG=2 ,   & P* CREATE SYSLDA & DDIV M┆
0x81a0…81f0              4d 2d 54 41 42 4c 45 20 2a 20 01 2c 00 d8 00 04 00 50 01 2c 01 02 00 22 00 50 5c 4c 44 52 5c 41 32 2c 41 37 5c 54 4f 2d 41 44 44 52 45 53 53 20 28 53 59 53 4c 44 41 29 01 2c 01 0a 00 1e 00 50 5c 41 4e 4b 4c 5c 41 32 2c 2f 46 30 30 30 5c 46   ┆M-TABLE *  ,     P ,   " P LDR A2,A7 TO-ADDRESS (SYSLDA) ,     P ANKL A2,/F000 F┆
0x81f0…8240              49 52 53 54 20 50 41 47 45 20 01 2c 01 30 00 28 00 50 5c 53 54 5c 41 32 2c 4d 4d 52 45 4c 31 2c 41 31 33 5c 53 41 56 45 20 50 48 59 53 49 43 41 4c 20 50 41 47 45 01 2c 01 52 00 22 00 50 5c 53 52 4c 5c 41 32 2c 32 5c 53 48 49 46 54 20 46 4f   ┆IRST PAGE  , 0 ( P ST A2,MMREL1,A13 SAVE PHYSICAL PAGE , R " P SRL A2,2 SHIFT FO┆

Reduced view