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

⟦2566ed914⟧

    Length: 23248 (0x5ad0)
    Notes: pts_type(SC)
    Names: »DRTP04.SC«

Derivation

└─⟦13e5fd45a⟧ Bits:30009699 Philips computer tape "600507"
    └─⟦this⟧ »TOSSWORK/DRTP04.SC« 
└─⟦bc20f3abf⟧ Bits:30009670 Philips computer tape "600126"
    └─⟦this⟧ »TOSSWORK/DRTP04.SC« 

PTS(SC)

	IDENT DRTP04 	REL 11.0 81-06-17 870105041100 

			=1,CORR. FOR ODD ECBADDR 
			REL 11.0 81-01-26
* 
******************************************************* 
*                                                     * 
*   PHILIPS TERMINAL SYSTEM PTS                       * 
*                                                     * 
*   DRTP04 = DRIVER TELLER TERMINAL PRINTER           * 
*                                                     * 
*                                                     * 
******************************************************* 
* 
*   THIS DRIVER HANDLES TELLER TERMINAL PRINTER FT80
* 
*   AND CONSISTS OF THE FOLLOWING PARTS:
* 
*   A C T P :	  ACTIVATION PART 
* 
*   R C T P :	  RECOVERY ROUTINE
* 
*   THE ACTIVATION PART SELECTS THE ACTUAL ORDER PROCESSOR. 
*   A STRING IS SET UP AND TRANSFERED TO THE PRINTER. 
*   THE STRING BEGINS WITH A DEDICATED PRINTER CHARACTER. 
*   THE CONTENTS OF THE STRING IS EITHER A FIXED FORMATTED
*   BUFFER OR FOR ORDER WRITE THE USER BUFFER.
*   THE STRING IS TERMINATED WITH AN EXECUTION CHARACTER. 
*   AFTER EXECUTION THE PRINTER RESPONDS WITH A STATUS
*   CHARACTER INDICATING THE RESULT OF THE EXECUTED ORDER.
* 
*   THE RECOVERY ROUTINE IS ENTERED AFTER PROGRAM LOADING,
*   AFTER POWER ON FROM TERMINAL SIDE AND AFTER TRANSMISSION
*   TIME OUT. 
*   THE RECOVERY ROUTINE SENDS A FIXED FORMATTED STRING TO
*   THE PRINTER. THIS STRING CONTAINS THE ACTUAL PARAMETERS 
*   AND STATUS FOR THE PRINTER. 
	EJECT
* 
*   THE FOLLOWING ORDERS ARE TREATED: 
* 
*   ORDER 00 :      TEST STATUS 
*   ORDER 06 :      WRITE 
*   ORDER 22 :      CUT RECEIPT 
*   ORDER 24 :      SET PRINTER PARAMETERS
*   ORDER 26 :      PERFORATE RECEIPT 
* 
*   THE FOLLOWING RETURN CODES ARE USED:
* 
*   BIT  0 :        REQUEST ERROR 
*   BIT  2 :        END OF JOURNAL
*   BIT  7 :        RECOVERY EXECUTED 
*   BIT 10 :        DOCUMENT OUT
*   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	TPAD4	ADDRESS BLOCK
* 
* 
* 
************* 
* EXTERNALS * 
************* 
* 
* 
	EXTRN	LDISP	DISPATCHING FROM INTERRUPT 
	EXTRN	LENDER	DISPATCH I/O ERROR
	EXTRN	LENDIS	END I/O AND DISPATCH
	EXTRN	OUTPUT	OUTPUT ONE CHARACTER
	EXTRN	GETCHR	GET CHARACTER FROM ECB BUFFER 
	EXTRN	DWTST	DWT STATUS DISPLACEMENT
	EXTRN	DWTECB	DWT ECB DISPLACEMENT
	EXTRN	DWTOR	DWT ORDER DISPLACEMENT 
	EXTRN	DWTSB2	STACK BASE
	EXTRN	DWTDEV	DEVICE STATUS 
	EXTRN	INPUT	GET STATUS INPUT CHAR
	EXTRN	STABLK	DEF. START OF BLOCK 
	EXTRN	ENDBLK	DEF. END OF BLOCK 
	EXTRN	ECBBA	BUFFER ADDRESS 
	EXTRN	ECBRL	REQUESTED LENGTH 
	EXTRN	ECBEL	EFFECTIVE LENGTH 
	EXTRN	ECBRC	RETURN CODE
	EXTRN	ECBCW	CONTROL WORD 
	EJECT
* 
************* 
* CONSTANTS * 
************* 
* 
*	DEDICATED PRINTER CHARACTERS (/00-/0F)
* 
POTEST	EQU	/00	TEST 
PORECV	EQU	/01	RECOVERY (NOT USED)
RESTRT	EQU	/02	RESTART (NOT USED) 
ETX	EQU	/03	EXECUTE ORDER 
POPPAR	EQU	/04	SET PRINTER PARAMETERS 
PODSTA	EQU	/05	DIAGNOSTIC STATUS
EXE	EQU	/06	EXECUTE (NOT USED)
POTDOC	EQU	/07	TRANSFER DOCUMENT PARAMETERS (NOT USED)
PORDOC	EQU	/08	RELEASE DOCUMENT 
POWDOC	EQU	/09	WRITE DOCUMENT 
POWREC	EQU	/0A	WRITE RECEIPT
POPDOC	EQU	/0B	POSITION DOCUMENT
RESET	EQU	/0C	RESET ORDER 
POWJRL	EQU	/0D	WRITE JOURNAL
SPEC	EQU	/0E	NOT USED 
TEST	EQU	/0F	TEST (NOT USED)
* 
ENDJ	EQU	/2000	END OF JOURNAL STATUS
DOCOUT	EQU	/20	DOCUMENT OUT STATUS
	EJECT
* 
************************
* CONDITIONAL ASSEMBLY *
************************
* 
*	THE STANDARD NATIONAL CHARACTER SET IS CHOSEN 
*	BY SETTING X:A TO 0-10 ACCORDING TO THE LIST BELOW
* 
*  NCV =	0	GREAT BRITAIN
*	1	GERMANY 
*	2	FRANCE 1
*	3	SPAIN 
*	4	ITALY 
*	5	SWEDEN, FINLAND 
*	6	DENMARK, NORWAY 1 
*	7	PORTUGAL
*	8	YUGOSLAVIA OR FRANCE 2 (DEPENDING ON CHAR GEN)
*	9	USA 
*	10	DENMARK, NORWAY 2
* 
X:A	EQU	0 
STDNCV	EQU	X:A
* 
*	THE RECEIPT STATION CAN BE EXCLUDED 
*	BY SETTING X:B=0
* 
X:B	EQU	1 
M2PRT	EQU	X:B 
* 
*   MMU BUFFER SIZE 
* 
X:C	EQU	095 
DVBLEN	EQU	X:C
* 
*	A REQUEST IS ALLWAYS ENDED FOR NOT OPERABLE PRINTERS
*	BY SETTING X:D=1
X:D	EQU	0 
REQEND	EQU	X:D
* 
* 
* 
* 
PRIPAR	FORM	1=1,2=0,5=STDNCV,8=0
	EJECT
* 

********************* 
* DWT-DISPLACEMENTS * 
********************* 
* 
* 
* 
PP	EQU	/2	PRINTER PARAMETERS
* 
	EJECT
* 
**********
* TABLES *
**********
* 
* 
*	ADDRESS BLOCK 
* 
	DATA	DVBLEN	MMU BUFFER SIZE
	DATA	2	DEVICE INDEX
TPAD4	EQU	*	ADDRESS BLOCK 
	DATA	ACTP	ACTIVATION DRIVER
	DATA	0	ABORT ROUTINE ADDRESS 
	DATA	0	INTERRUPT HANDLER 
	DATA	RCTP	RECOVERY ROUTINE 
* 
*	VALID ORDERS WITH ACTIVATION ADDRESSES
* 
TPTAB	EQU	* 
	DATA	TPTAB0	DEVICE INDEX 0 TABLE 
	DATA	TPTAB1	DEVICE INDEX 1 TABLE 
	DATA	TPTAB2	DEVICE INDEX 2 TABLE 
	DATA	TPTAB3	DEVICE INDEX 3 TABLE 
* 
TPTAB0	EQU	*	DEVICE INDEX 0 
	DATA	0	TEST STATUS (JOURNAL) 
	DATA	TSTSTA
	DATA	6	WRITE JOURNAL 
	DATA	WRTJRL
	DATA	/24	SET PRINTER PARAMETERS
	DATA	PRTPAR
	DATA	/FFFF	END OF ORDERS 
* 
TPTAB1	EQU	*	DEVICE INDEX 1 
	DATA	0	TEST STATUS (DOCUMENT)
	DATA	TSTSTA
	DATA	6	WRITE DOCUMENT
	DATA	WRTDOC
	DATA	/24	SET PRINTER PARAMETERS
	DATA	PRTPAR
	DATA	/FFFF	END OF ORDERS 
* 
TPTAB2	EQU	*	DEVICE INDEX 2 
	IFT	M2PRT=1
	DATA	0	TEST STATUS (RECEIPT) 
	DATA	TSTSTA	U
	DATA	6	WRITE RECEIPT 
	DATA	WRTREC
	DATA	/22	CUT RECEIPT 
	DATA	CUTREC
	DATA	/26	PERFORATE RECEIPT 
	DATA	PERREC
	DATA	/24	SET PRINTER PARAMETERS
	DATA	PRTPAR
	XIF
	DATA	/FFFF	END OF ORDERS 
* 
TPTAB3	EQU	*	DEVICE INDEX 3 
	DATA	/FFFF	END OF ORDERS 
* 
*	SYSTEM STANDARD PRINTER PARAMETERS
* 
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, 2=RECEIPT 
* 
	LC	A2,DWTOR,A6	GET DWT INDEX 
	ANK	A2,3	MASK
	SLL	A2,6	SHIFT 
	LD	A3,DWTDEV,A6	GET OLD DEVICE INDEX 
	ANKL	A3,/FF1F	RESET OLD INDEX AND LF IND 
	ORR	A3,A2
	ST	A3,DWTDEV,A6	STORE NEW INDEX
ACT005	LD	A1,DWTDEV,A6	GET DEVICE INDEX 
	ANK	A1,/C0 
	SRL	A1,5	GET CORESPONDING ORDER TABLE
	LD	A2,TPTAB,A1 
ACT010	LDR*	A3,A2 
	ABL(N)	LENDER	NO MORE VALID ORDERS 
	SUR	A3,A7	TEST IF ORDER VALID
	RF(E)	ACT020	VALID ORDER FOUND 
	ADK	A2,4	TRY NEXT ORDER
	RB	ACT010
ACT020	EQU	*
	ABI	2,A2	EXECUTE ORDER 
	EJECT
* 
* 
*   ORDER 00 : TEST STATUS
* 
* 
TSTSTA	EQU	*
	CM	ECBCW,A8	CLEAR CONTROL WORD 
	LDK	A2,3	BLOCK LENGTH
	LDK	A3,POTEST	LOAD TEST ORDER
	CF	A5,ORDER	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,/1	TEST PRINTER STATUS
	RF(Z)	TSST10	NO PERMANENT ERRORS 
TSST05	EQU	*
	LDK	A2,3	BLOCK LENGTH
	LDK	A3,PODSTA	LOAD DIAGNOSTIC ORDER
	CF	A5,ORDER	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	SC	A2,ECBCW+1,A8	SET UP DIAGN STATUS IN ECB
	LDK	A1,1	INDICATE NOT OPERABLE 
	RF	TSST80
TSST10	LDR	A1,A2	GET PRINTER STATUS 
	LD	A3,DWTDEV,A6	GET DEVICE INDEX 
	ANK	A3,/C0	TEST DEVICE INDEX 
	RF(NZ)	TSST40	DEVICE INDEX > 0 
	ANK	A1,/20	TEST PRINTER STATUS 
	RF(Z)	TSST80	NO ERRORS 
	LDKL	A1,ENDJ	END OF JOURNAL
	RF	TSST80
TSST40	EQU	*
	ANK	A3,/80	TEST DEVICE INDEX 
	RF(NZ)	TSST70	DEVICE INDEX > 1 
	ANK	A1,/40	TEST PRINTER STATUS 
	RF(Z)	TSST80	NO ERRORS 
	LDK	A1,DOCOUT	DOCUMENT OUT 
	RF	TSST80
TSST70	LDK	A1,0	RECEIPT, NO ERRORS DETECTABLE 
TSST80	ABL	LENDIS	END REQUEST 
	EJECT		
* 
* 
*   ORDER 06 : WRITE JOURNAL
* 
* 
WRTJRL	EQU	*
	LD	A1,ECBRL,A8	GET REQUESTED LENGTH
	SUK	A1,2	TEST REQUESTED LENGTH 
	RF(N)	WRJL80	REQUEST ERROR 
	LD	A2,ECBBA,A8	GET CONTROL CHARACTER	=1
	LC	A2,1,A2	*	=1
	ANK	A2,/FF 
	LDK	A4,0	SET UP 0 LF 
	SUK	A2,/2B	TEST CTRL CHAR
	RF(Z)	WRJL10	CTRL CHAR =/2B
	LDK	A4,2	SET UP 2 LF 
	SUK	A2,5 
	RF(Z)	WRJL10	CTRL CHAR =/30
	LDK	A4,1	SET UP 1 LF 
WRJL10	EQU	*
	LD	A2,ECBRL,A8 
	ADK	A2,2	BLOCK LENGTH
	LDK	A3,POWJRL	LOAD WRITE JOURNAL ORDER 
	CF	A5,ORDER	AND SEND 
	LDR	A2,A4	RELOAD LF INF
	CF	A5,OUT	AND SEND 
	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 CHARACTER 

	SUK	A1,/10 
	RB(N)	WRJL20	CHAR </10 
	SUK	A1,/6F 
	RB(Z)	WRJL20	CHAR=/7F
	RF(N)	WRJL40	CHAR = NORMAL 
	SUK	A1,/2F 
	RF(Z)	WRJL40	CHAR =/AE 
	LDK	A1,4	IND CODE CHECK ERROR
	ORS	A1,ECBRC,A8	IN RETURN CODE 
	RB	WRJL20

*   SEND CHARACTER TO DEVICE

WRJL40	CF	A5,OUTPUT	SEND CHARACTER
	ABL(NZ)	ERTP	JMP IF ERROR
	RB	WRJL20	GET NEXT CHARACTER 

*   SEND ETX

WRJL50	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	SUK	A4,2 
	RF(NZ)	WRJL60	NOT 2 LF REQUESTED 
	LDR	A4,A2	SAVE FIRST STATUS
	LDK	A2,4	BLOCK LENGTH
	LDK	A3,POWJRL	LOAD WRITE JOURNAL ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A2,1	SET UP 1 LF 
	CF	A5,OUT	SEND LF INF
	CF	A5,EXECUT	EXECUTE 1 LF IN PRINTER 
	ORR	A2,A4	COMBINE FIRST AND SECOND STATUS
WRJL60	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,/25	TEST PRINTER STATUS 
	RF(Z)	WRJL70	NO ERRORS 
	ANK	A1,1	TEST PRINTER STATUS 
	RF(NZ)	WRJL70	NOT OPERABLE 
	ANK	A2,4	TEST PRINTER STATUS 
	RF(NZ)	WRJL80	REQUEST ERROR
	LDKL	A1,ENDJ	END OF JOURNAL
WRJL70	ABL	LENDIS	END REQUEST 
WRJL80	ABL	LENDER	END REQUEST WITH REQUEST ERROR
	EJECT		
* 
* 
*   ORDER 06 : WRITE DOCUMENT 
* 
* 
WRTDOC	EQU	*
	LD	A1,ECBRL,A8	GET REQUESTED LENGTH
	SUK	A1,2	TEST REQUESTED LENGTH 
	RF(N)	WRDO80	REQUEST ERROR 
WRDO10	EQU	*
	LD	A2,ECBRL,A8 
	ADK	A2,2	BLOCK LENGTH
	LDK	A3,POWDOC	SET UP PRINTER ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A2,0	SET UP DUMMY LF 
	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 

	SUK	A1,/10 
	RB(N)	WRDO20	CHAR < /10
	SUK	A1,/6F 
	RF(N)	WRDO40	CHAR = NORMAL 
	RB(Z)	WRDO20	CHAR = /7F
	SUK	A1,/2F 
	RF(Z)	WRDO40	CHAR = /AE
	LDK	A1,4	INDICATE CODE CHECK ERROR 
	ORS	A1,ECBRC,A8	IN RETURN CODE 
	RB	WRDO20

*   SEND CHARACTER TO PRINTER 

WRDO40	CF	A5,OUTPUT	SEND CHARACTER
	ABL(NZ)	ERTP	JMP IF ERROR
	RB	WRDO20	GET NEXT CHAR

*   SEND ETX

WRDO50	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,/45	TEST PRINTER STATUS 
	RF(Z)	WRDO70	NO ERRORS 
	ANK	A1,1	TEST PRINTER STATUS 
	RF(NZ)	WRDO70	NOT OPERABLE 
	ANK	A2,4	TEST PRINTER STATUS 
	RF(NZ)	WRDO80	REQUEST ERROR
	RB	WRTDOC	DOCUMENT OUT REPEAT ORDER
WRDO70	ABL	LENDIS	END REQUEST 
WRDO80	ABL	LENDER	END REQUEST WITH REQUEST ERROR
	EJECT
* 
* 
*   ORDER 06 : WRITE RECEIPT
* 
* 
	IFT	M2PRT=1
WRTREC	EQU	*
	LD	A1,ECBRL,A8	GET REQUESTED LENGTH
	SUK	A1,2	TEST REQUESTED LENGTH 
	RF(N)	WRRC80	REQUEST ERROR 
	LD	A2,ECBBA,A8	GET CONTROL CHARACTER	=1
	LC	A2,1,A2	U	=1
	ANK	A2,/FF 
	LDK	A4,0	SET UP 0 LF 
	SUK	A2,/2B 
	RF(Z)	WRRC10	CTRL CHAR = /2B 
	LDK	A4,8	SET UP 8 LF 
	SUK	A2,6 
	RF(Z)	WRRC10	CTRL CHAR = /31 
	LDK	A4,5	SET UP 5 LF (FAST)
	SUK	A2,1 
	RF(Z)	WRRC10	CTRL CHAR = /32 
	LDK	A4,2	SET UP 2 LF 
	ADK	A2,2 
	RF(Z)	WRRC10	CTRL CHAR =/30
	LDK	A4,1	SET UP 1 LF 
WRRC10	EQU	*
	LD	A2,ECBRL,A8 
	ADK	A2,2	BLOCK LENGTH
	LDK	A3,POWREC	LOAD WRITE RECEIPT ORDER 
	CF	A5,ORDER	AND SEND 
	LDR	A2,A4	RELOAD LF INF
	CF	A5,OUT	AND SEND LF INFORMATION
	LDK	A3,2	SET UP BUFFER POINTER 
WRRC20	CF	A15,GETCHR	GET CHARACTER FROM ECB BUFFER
	LDR	A1,A1
	RF(Z)	WRRC50	BUFFER FINISHED 
	LDR	A1,A2	GET CHAR IN A1 

*   EXAMINE CHARACTER 

	SUK	A1,/10 
	RB(N)	WRRC20	CHAR </10 
	SUK	A1,/6F 
	RB(Z)	WRRC20	CHAR=/7F
	RF(N)	WRRC40	CHAR = NORMAL 
	SUK	A1,/2F 
	RF(Z)	WRRC40	CHAR =/AE 
	LDK	A1,4	IND CODE CHECH ERROR
	ORS	A1,ECBRC,A8	IN RETURN CODE 
	RB	WRRC20

*   SEND CHARACTER TO DEVICE

WRRC40	CF	A5,OUTPUT	SEND CHARACTER
	ABL(NZ)	ERTP	JMP IF ERROR
	RB	WRRC20	GET NEXT CHARACTER 

*   SEND ETX

WRRC50	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	SUK	A4,2 
	RF(NZ)	WRRC60	NOT 2 LF REQUESTED 
	LDR	A4,A2	SAVE FIRST STATUS
	LDK	A2,4	BLOCK LENGTH
	LDK	A3,POWREC	LOAD WRITE RECEIPT ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A2,1	SET UP 1 LF 
	CF	A5,OUT	SEND LF INF
	CF	A5,EXECUT	EXECUTE 1 LF IN PRINTER 
	ORR	A2,A4	COMBINE FIRST AND SECOND STATUS
WRRC60	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,5	TEST PRINTER STATUS 
	RF(Z)	WRRC70	NO ERRORS 
	ANK	A1,1	TEST PRINTER STATUS 
	RF(Z)	WRRC80	REQUEST ERROR 
WRRC70	ABL	LENDIS	END REQUEST 
WRRC80	ABL	LENDER	END REQUEST WITH REQUEST ERROR
	XIF
	EJECT
* 
* 
*   ORDER 22 : CUT RECEIPT
* 
* 
	IFT	M2PRT=1
CUTREC	EQU	*
	LDK	A2,4	BLOCK LENGTH
	LDK	A3,POWREC	SET UP WRITE RECEIPT ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A2,6	SET UP CUT (=6 LF)
	CF	A5,OUT	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,1	MASK STATUS 
CREC70	ABL	LENDIS	END REQUEST 
	XIF
	EJECT
* 
* 
*   ORDER 26 : PERFORATE RECEIPT
* 
* 
	IFT	M2PRT=1
PERREC	EQU	*
	LDK	A2,4	BLOCK LENGTH
	LDK	A3,POWREC	SET UP WRITE RECEIPT ORDER 
	CF	A5,ORDER	AND SEND 
	LDK	A2,7	SET UP PERFORATE (=7 LF)
	CF	A5,OUT	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,1	MASK STATUS 
PREC70	ABL	LENDIS	END REQUEST 
	XIF
	EJECT		
* 
* 
*   ORDER 24 : SET PRINTER PARAMETERS 
*   CONTROL WORD CONTAINS:
*   BIT 00    : INDICATE CHANGE 
*   BIT 01-02 : NOT USD 
*   BIT 03    : SMALL LETTER IND
*   BIT 04-07 : NATIONAL CHARACTER VARIATION
*   BIT 08-15 : NOT USED
* 
* 
PRTPAR	EQU	*
	LD	A1,ECBCW,A8	GET CONTROL WORD
	RF(NN)	PPAR10	NO NEW L/NCV SET UP IN CTRL WORD 
	ST	A1,DWTDEV+PP,A6	STORE NEW L/NCV IN DWT
PPAR10	EQU	*
	LDK	A2,5	BLOCK LENGTH
	LDK	A3,POPPAR	LOAD PRINTER PRINTER PARAMETER ORDER 
	CF	A5,ORDER	AND SEND 
	LC	A2,DWTDEV+PP,A6 
	CF	A5,OUT	SEND L/NCV 
	LC	A2,DWTDEV+PP+1,A6 
	CF	A5,OUT	SEND DUMMY 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
	LDR	A1,A2	GET PRINTER STATUS 
	ANK	A1,1	TEST PRINTER STATUS 
PPAR70	ABL	LENDIS	END REQUEST 
	EJECT
* 
*   S U B R O U T I N E S 
* 
* 

* 
*   O R D E R 
*   SEND START OF BLOCK CHAR TO COM. AND ORDER CODE TO PRINTER
* 
ORDER	EQU	* 
	CF	A5,STABLK	START OF BLOCK
	RF(NZ)	ERTP	JMP IF ERROR 
	LDK	A2,RESET	SEND RESET JUST IN CASE 
	CF	A5,OUTPUT 
	RF(NZ)	ERTP	JMP IF ERROR 
	LDR	A2,A3
	RF	OUT10	SEND PRINTER ORDER
	 

* 
*   E X E C U T E 
*   SEND EXECUTE CHAR (/03) TO PRINTER AND END OF BLOCK CHAR TO COM.
* 
EXECUT	EQU	*
	LDK	A2,ETX	SEND EXECUTE CHAR TO PRINTER
	CF	A5,OUTPUT 
	RF(NZ)	ERTP	JMP IF ERROR 
	CF	A5,ENDBLK	END OF BLOCK
	RF(NZ)	ERTP	JMP IF ERROR 
	CF	A5,INPUT	GET STATUS CHARACTER 
EXE10	SC	A2,DWTDEV,A6	SAVE IN DWT STATUS
	RTN	A5 
* 
*   0 U T 
*   ADD CONST. AND SEND 
* 
OUT	EQU	* 
	ANK	A2,/7F 
	ADK	A2,/10 
	CWK	A2,/7F 
	RF(NG)	OUT10	CHARACTER NOT GREATER THAN /7F
	LDK	A2,/7F	IF GREATER SET CHAR TO /7F
OUT10	EQU	* 
	CF	A5,OUTPUT 
	RF(NZ)	ERTP	JMP IF ERROR 
	RTN	A5 
* 
*   ERROR ROUTINE FOR STABLK,OUTPUT & ENDBLK
* 
* 
ERTP	EQU	*
	ANK	A1,/12	OUTP.ERROR OR LRC-ERROR ? 
	RF(Z)	ERTP10	NO
	LDKL	A5,DWTSB2	STACK BASE
	ADR	A5,A6	ADD DWT ADDRESS
	RF	RCTP	DO RECOVERY
ERTP10	EQU	*
	IFF	REQEND=1 
	LDR	A7,A7	TEST ORDER OR RECOVERY ? 
	ABL(NZ)	LDISP	NO 
	XIF
	LDK	A1,1	SET NOT OPERABLE
	ABL	LENDIS	END OF REQ. 
	EJECT
* 
*	R C T P 
* 
*	THIS IS THE RECOVERY ROUTINE FOR THE DRIVER 
*	DWT ORDER IS RESET IF NO REQUEST RUNING 
*	DWT IS SET BUSY 
*	AFTER PROGRAM LOADING SYSTEM PARAMETERS ARE SET UP IN DWT 
*	TEST STRING IS SENT TO PRINTER TO GET SYNCRONISM
*	A FIXED FORMATTED RECOVERY STRING IS THEN SENT TO PRINTER 
*	THIS STRING CONTAINS THE ACTUAL PARAMETERS AND THE ACTUAL 
*	STATUS FOR THE PRINTER. 
*	A RUNING REQUEST IS AT LAST REPEATED. 
* 
RCTP	EQU	*
	LD	A1,DWTECB,A6	GET ECB ADDRESS
	RF(NZ)	RCTP02	REQUEST RUNNING
	LDK	A7,0	RESET ORDER 
RCTP02	EQU	*
	LDKL	A1,/7FFF	INDICATE DEVICE BUSY 
	ANS	A1,DWTST,A6
			 
	LD	A1,DWTDEV+PP,A6 
	RF(N)	RCTP08	NOT SYSTEM START UP RECOVERY
	LD	A3,STDPP	SET UP ST PR PAR IN DWT
	ST	A3,DWTDEV+PP,A6 
RCTP08	EQU	*
	LDK	A2,3	BLOCK LENGTH
	LDK	A3,POTEST	LOAD PRINTER ORDER TEST STATUS 
	CF	A5,ORDER	AND SEND 
	CF	A5,EXECUT	EXECUTE ORDER IN PRINTER
RCTP10	EQU	*
	LDK	A2,5	BLOCK LENGTH
	LDK	A3,POPPAR	SET UP PRINTER RECOVERY ORDER
	CF	A5,ORDER	AND SEND 
	LD	A3,DWTDEV+PP,A6	GET PRINTER PARAMETERS
RCTP20	ECR	A2,A3
	CF	A5,OUT	SEND LFCTRL/NCV
	LDR	A2,A3
	CF	A5,OUT	SEND DUMMY CODE
RCTP60	CF	A5,EXECUT	EXECUTE RECOVERY IN PRINTER 
RCTP70	LD	A1,DWTECB,A6
	ABL(Z)	LENDIS	REQ NOT RUNNING
	LDKL	A1,/100	IND RECOVERY EXECUTED 
	ST	A1,ECBRC,A8	IN RETURN CODE
	ABL	ACT005	REPEAT REQUEST
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRTP04  REL 11.0 81-06-17 870105041100 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0062              Head {h00=0x0020, h01=0x0050, text=»   =1,CORR. FOR ODD ECBADDR «, t00=0x0000, t01=0x0042}
0x0062…007e              Head {h00=0x0018, h01=0x0050, text=»   REL 11.0 81-01-26«, t00=0x0000, t01=0x0066}
0x007e…0088              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0082}
0x0088…00c8              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x008c}
0x00c8…0108              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0000, t01=0x00cc}
0x0108…0148              Head {h00=0x003c, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS                       * «, t00=0x0000, t01=0x010c}
0x0148…0188              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0000, t01=0x014c}
0x0188…01c8              Head {h00=0x003c, h01=0x0050, text=»*   DRTP04 = DRIVER TELLER TERMINAL PRINTER           * «, t00=0x0000, t01=0x018c}
0x01c8…0208              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0001, t01=0x003c}
0x0208…0248              Head {h00=0x003c, h01=0x0050, text=»*                                                     * «, t00=0x0001, t01=0x007c}
0x0248…0288              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0001, t01=0x00bc}
0x0288…0292              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x0292…02ce              Head {h00=0x0038, h01=0x0050, text=»*   THIS DRIVER HANDLES TELLER TERMINAL PRINTER FT80«, t00=0x0001, t01=0x0106}
0x02ce…02d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0142}
0x02d8…0308              Head {h00=0x002c, h01=0x0050, text=»*   AND CONSISTS OF THE FOLLOWING PARTS:«, t00=0x0001, t01=0x014c}
0x0308…0312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017c}
0x0312…033a              Head {h00=0x0024, h01=0x0050, text=»*   A C T P :   ACTIVATION PART «, t00=0x0001, t01=0x0186}
0x033a…0344              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001e}
0x0344…036c              Head {h00=0x0024, h01=0x0050, text=»*   R C T P :   RECOVERY ROUTINE«, t00=0x0002, t01=0x0028}
0x036c…0376              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0050}
0x0376…03ba              Head {h00=0x0040, h01=0x0050, text=»*   THE ACTIVATION PART SELECTS THE ACTUAL ORDER PROCESSOR. «, t00=0x0002, t01=0x005a}
0x03ba…03f8              Head {h00=0x003a, h01=0x0050, text=»*   A STRING IS SET UP AND TRANSFERED TO THE PRINTER. «, t00=0x0002, t01=0x009e}
0x03f8…043a              Head {h00=0x003e, h01=0x0050, text=»*   THE STRING BEGINS WITH A DEDICATED PRINTER CHARACTER. «, t00=0x0002, t01=0x00dc}
0x043a…047c              Head {h00=0x003e, h01=0x0050, text=»*   THE CONTENTS OF THE STRING IS EITHER A FIXED FORMATTED«, t00=0x0002, t01=0x011e}
0x047c…04b2              Head {h00=0x0032, h01=0x0050, text=»*   BUFFER OR FOR ORDER WRITE THE USER BUFFER.«, t00=0x0002, t01=0x0160}
0x04b2…04f4              Head {h00=0x003e, h01=0x0050, text=»*   THE STRING IS TERMINATED WITH AN EXECUTION CHARACTER. «, t00=0x0003, t01=0x0008}
0x04f4…0532              Head {h00=0x003a, h01=0x0050, text=»*   AFTER EXECUTION THE PRINTER RESPONDS WITH A STATUS«, t00=0x0003, t01=0x004a}
0x0532…0574              Head {h00=0x003e, h01=0x0050, text=»*   CHARACTER INDICATING THE RESULT OF THE EXECUTED ORDER.«, t00=0x0003, t01=0x0088}
0x0574…057e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00ca}
0x057e…05c0              Head {h00=0x003e, h01=0x0050, text=»*   THE RECOVERY ROUTINE IS ENTERED AFTER PROGRAM LOADING,«, t00=0x0003, t01=0x00d4}
0x05c0…0604              Head {h00=0x0040, h01=0x0050, text=»*   AFTER POWER ON FROM TERMINAL SIDE AND AFTER TRANSMISSION«, t00=0x0003, t01=0x0116}
0x0604…061a              Head {h00=0x0012, h01=0x0050, text=»*   TIME OUT. «, t00=0x0003, t01=0x015a}
0x061a…065c              Head {h00=0x003e, h01=0x0050, text=»*   THE RECOVERY ROUTINE SENDS A FIXED FORMATTED STRING TO«, t00=0x0003, t01=0x0170}
0x065c…06a0              Head {h00=0x0040, h01=0x0050, text=»*   THE PRINTER. THIS STRING CONTAINS THE ACTUAL PARAMETERS «, t00=0x0004, t01=0x0022}
0x06a0…06c8              Head {h00=0x0024, h01=0x0050, text=»*   AND STATUS FOR THE PRINTER. «, t00=0x0004, t01=0x0066}
0x06c8…06d6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x008e}
0x06d6…06e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x009c}
0x06e0…070e              Head {h00=0x002a, h01=0x0050, text=»*   THE FOLLOWING ORDERS ARE TREATED: «, t00=0x0004, t01=0x00a6}
0x070e…0718              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d4}
0x0718…0740              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 00 :      TEST STATUS «, t00=0x0004, t01=0x00de}
0x0740…0762              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 06 :      WRITE «, t00=0x0004, t01=0x0106}
0x0762…078a              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 22 :      CUT RECEIPT «, t00=0x0004, t01=0x0128}
0x078a…07bc              Head {h00=0x002e, h01=0x0050, text=»*   ORDER 24 :      SET PRINTER PARAMETERS«, t00=0x0004, t01=0x0150}
0x07bc…07ea              Head {h00=0x002a, h01=0x0050, text=»*   ORDER 26 :      PERFORATE RECEIPT «, t00=0x0004, t01=0x0182}
0x07ea…07f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0020}
0x07f4…0824              Head {h00=0x002c, h01=0x0050, text=»*   THE FOLLOWING RETURN CODES ARE USED:«, t00=0x0005, t01=0x002a}
0x0824…082e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x005a}
0x082e…0858              Head {h00=0x0026, h01=0x0050, text=»*   BIT  0 :        REQUEST ERROR «, t00=0x0005, t01=0x0064}
0x0858…0882              Head {h00=0x0026, h01=0x0050, text=»*   BIT  2 :        END OF JOURNAL«, t00=0x0005, t01=0x008e}
0x0882…08b0              Head {h00=0x002a, h01=0x0050, text=»*   BIT  7 :        RECOVERY EXECUTED «, t00=0x0005, t01=0x00b8}
0x08b0…08d8              Head {h00=0x0024, h01=0x0050, text=»*   BIT 10 :        DOCUMENT OUT«, t00=0x0005, t01=0x00e6}
0x08d8…0904              Head {h00=0x0028, h01=0x0050, text=»*   BIT 13 :        CODE CHECK ERROR«, t00=0x0005, t01=0x010e}
0x0904…092c              Head {h00=0x0024, h01=0x0050, text=»*   BIT 15 :        NOT OPERABLE«, t00=0x0005, t01=0x013a}
0x092c…0936              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0162}
0x0936…0940              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x016c}
0x0940…0962              Head {h00=0x001e, h01=0x0050, text=»*   NORMAL REGISTER USAGE:«, t00=0x0005, t01=0x0176}
0x0962…096c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0008}
0x096c…0992              Head {h00=0x0022, h01=0x0050, text=»*   REGISTER A1: WORK REGISTER«, t00=0x0006, t01=0x0012}
0x0992…09b8              Head {h00=0x0022, h01=0x0050, text=»*            A2: INPUT/OUTPUT «, t00=0x0006, t01=0x0038}
0x09b8…09e0              Head {h00=0x0024, h01=0x0050, text=»*            A3: BUFFER POINTER «, t00=0x0006, t01=0x005e}
0x09e0…0a08              Head {h00=0x0024, h01=0x0050, text=»*            A4: OUTPUT COUNTER «, t00=0x0006, t01=0x0086}
0x0a08…0a2e              Head {h00=0x0022, h01=0x0050, text=»*            A5: STACK POINTER«, t00=0x0006, t01=0x00ae}
0x0a2e…0a52              Head {h00=0x0020, h01=0x0050, text=»*            A6: DWT-ADDRESS«, t00=0x0006, t01=0x00d4}
0x0a52…0a70              Head {h00=0x001a, h01=0x0050, text=»*            A7: ORDER«, t00=0x0006, t01=0x00f8}
0x0a70…0a94              Head {h00=0x0020, h01=0x0050, text=»*            A8: ECB-ADDRESS«, t00=0x0006, t01=0x0116}
0x0a94…0a9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x013a}
0x0a9e…0aa8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0144}
0x0aa8…0ab6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x014e}
0x0ab6…0ac0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x015c}
0x0ac0…0ad4              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x0166}
0x0ad4…0ae8              Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0006, t01=0x017a}
0x0ae8…0afc              Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0006, t01=0x018e}
0x0afc…0b06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0012}
0x0b06…0b10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001c}
0x0b10…0b32              Head {h00=0x001e, h01=0x0050, text=» ENTRY TPAD4 ADDRESS BLOCK«, t00=0x0007, t01=0x0026}
0x0b32…0b3c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0048}
0x0b3c…0b46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0x0b46…0b50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x005c}
0x0b50…0b66              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0007, t01=0x0066}
0x0b66…0b7c              Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0007, t01=0x007c}
0x0b7c…0b92              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0007, t01=0x0092}
0x0b92…0b9c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00a8}
0x0b9c…0ba6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00b2}
0x0ba6…0bd6              Head {h00=0x002c, h01=0x0050, text=» EXTRN LDISP DISPATCHING FROM INTERRUPT «, t00=0x0007, t01=0x00bc}
0x0bd6…0bfe              Head {h00=0x0024, h01=0x0050, text=» EXTRN LENDER DISPATCH I/O ERROR«, t00=0x0007, t01=0x00ec}
0x0bfe…0c28              Head {h00=0x0026, h01=0x0050, text=» EXTRN LENDIS END I/O AND DISPATCH«, t00=0x0007, t01=0x0114}
0x0c28…0c52              Head {h00=0x0026, h01=0x0050, text=» EXTRN OUTPUT OUTPUT ONE CHARACTER«, t00=0x0007, t01=0x013e}
0x0c52…0c86              Head {h00=0x0030, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER FROM ECB BUFFER «, t00=0x0007, t01=0x0168}
0x0c86…0cb2              Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTST DWT STATUS DISPLACEMENT«, t00=0x0008, t01=0x000c}
0x0cb2…0cdc              Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTECB DWT ECB DISPLACEMENT«, t00=0x0008, t01=0x0038}
0x0cdc…0d08              Head {h00=0x0028, h01=0x0050, text=» EXTRN DWTOR DWT ORDER DISPLACEMENT «, t00=0x0008, t01=0x0062}
0x0d08…0d28              Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTSB2 STACK BASE«, t00=0x0008, t01=0x008e}
0x0d28…0d4c              Head {h00=0x0020, h01=0x0050, text=» EXTRN DWTDEV DEVICE STATUS «, t00=0x0008, t01=0x00ae}
0x0d4c…0d76              Head {h00=0x0026, h01=0x0050, text=» EXTRN INPUT GET STATUS INPUT CHAR«, t00=0x0008, t01=0x00d2}
0x0d76…0da0              Head {h00=0x0026, h01=0x0050, text=» EXTRN STABLK DEF. START OF BLOCK «, t00=0x0008, t01=0x00fc}
0x0da0…0dc8              Head {h00=0x0024, h01=0x0050, text=» EXTRN ENDBLK DEF. END OF BLOCK «, t00=0x0008, t01=0x0126}
0x0dc8…0dec              Head {h00=0x0020, h01=0x0050, text=» EXTRN ECBBA BUFFER ADDRESS «, t00=0x0008, t01=0x014e}
0x0dec…0e12              Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBRL REQUESTED LENGTH «, t00=0x0008, t01=0x0172}
0x0e12…0e38              Head {h00=0x0022, h01=0x0050, text=» EXTRN ECBEL EFFECTIVE LENGTH «, t00=0x0009, t01=0x0008}
0x0e38…0e58              Head {h00=0x001c, h01=0x0050, text=» EXTRN ECBRC RETURN CODE«, t00=0x0009, t01=0x002e}
0x0e58…0e7a              Head {h00=0x001e, h01=0x0050, text=» EXTRN ECBCW CONTROL WORD «, t00=0x0009, t01=0x004e}
0x0e7a…0e88              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0070}
0x0e88…0e92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x007e}
0x0e92…0ea8              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x0088}
0x0ea8…0ebe              Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS * «, t00=0x0009, t01=0x009e}
0x0ebe…0ed4              Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0009, t01=0x00b4}
0x0ed4…0ede              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ede…0f0e              Head {h00=0x002c, h01=0x0050, text=»* DEDICATED PRINTER CHARACTERS (/00-/0F)«, t00=0x0009, t01=0x00d4}
0x0f0e…0f18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0104}
0x0f18…0f34              Head {h00=0x0018, h01=0x0050, text=»POTEST EQU /00 TEST «, t00=0x0009, t01=0x010e}
0x0f34…0f5e              Head {h00=0x0026, h01=0x0050, text=»PORECV EQU /01 RECOVERY (NOT USED)«, t00=0x0009, t01=0x012a}
0x0f5e…0f88              Head {h00=0x0026, h01=0x0050, text=»RESTRT EQU /02 RESTART (NOT USED) «, t00=0x0009, t01=0x0154}
0x0f88…0faa              Head {h00=0x001e, h01=0x0050, text=»ETX EQU /03 EXECUTE ORDER «, t00=0x0009, t01=0x017e}
0x0faa…0fd8              Head {h00=0x002a, h01=0x0050, text=»POPPAR EQU /04 SET PRINTER PARAMETERS «, t00=0x000a, t01=0x0010}
0x0fd8…1000              Head {h00=0x0024, h01=0x0050, text=»PODSTA EQU /05 DIAGNOSTIC STATUS«, t00=0x000a, t01=0x003e}
0x1000…1026              Head {h00=0x0022, h01=0x0050, text=»EXE EQU /06 EXECUTE (NOT USED)«, t00=0x000a, t01=0x0066}
0x1026…1064              Head {h00=0x003a, h01=0x0050, text=»POTDOC EQU /07 TRANSFER DOCUMENT PARAMETERS (NOT USED)«, t00=0x000a, t01=0x008c}
0x1064…108c              Head {h00=0x0024, h01=0x0050, text=»PORDOC EQU /08 RELEASE DOCUMENT «, t00=0x000a, t01=0x00ca}
0x108c…10b2              Head {h00=0x0022, h01=0x0050, text=»POWDOC EQU /09 WRITE DOCUMENT «, t00=0x000a, t01=0x00f2}
0x10b2…10d6              Head {h00=0x0020, h01=0x0050, text=»POWREC EQU /0A WRITE RECEIPT«, t00=0x000a, t01=0x0118}
0x10d6…10fe              Head {h00=0x0024, h01=0x0050, text=»POPDOC EQU /0B POSITION DOCUMENT«, t00=0x000a, t01=0x013c}
0x10fe…1120              Head {h00=0x001e, h01=0x0050, text=»RESET EQU /0C RESET ORDER «, t00=0x000a, t01=0x0164}
0x1120…1144              Head {h00=0x0020, h01=0x0050, text=»POWJRL EQU /0D WRITE JOURNAL«, t00=0x000a, t01=0x0186}
0x1144…1162              Head {h00=0x001a, h01=0x0050, text=»SPEC EQU /0E NOT USED «, t00=0x000b, t01=0x001a}
0x1162…1186              Head {h00=0x0020, h01=0x0050, text=»TEST EQU /0F TEST (NOT USED)«, t00=0x000b, t01=0x0038}
0x1186…1190              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005c}
0x1190…11bc              Head {h00=0x0028, h01=0x0050, text=»ENDJ EQU /2000 END OF JOURNAL STATUS«, t00=0x000b, t01=0x0066}
0x11bc…11e6              Head {h00=0x0026, h01=0x0050, text=»DOCOUT EQU /20 DOCUMENT OUT STATUS«, t00=0x000b, t01=0x0092}
0x11e6…11f4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x00bc}
0x11f4…11fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ca}
0x11fe…121e              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x00d4}
0x121e…123e              Head {h00=0x001c, h01=0x0050, text=»* CONDITIONAL ASSEMBLY *«, t00=0x000b, t01=0x00f4}
0x123e…125e              Head {h00=0x001c, h01=0x0050, text=»************************«, t00=0x000b, t01=0x0114}
0x125e…1268              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0134}
0x1268…12a0              Head {h00=0x0034, h01=0x0050, text=»* THE STANDARD NATIONAL CHARACTER SET IS CHOSEN «, t00=0x000b, t01=0x013e}
0x12a0…12dc              Head {h00=0x0038, h01=0x0050, text=»* BY SETTING X:A TO 0-10 ACCORDING TO THE LIST BELOW«, t00=0x000b, t01=0x0176}
0x12dc…12e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0022}
0x12e6…1306              Head {h00=0x001c, h01=0x0050, text=»*  NCV = 0 GREAT BRITAIN«, t00=0x000c, t01=0x002c}
0x1306…131a              Head {h00=0x0010, h01=0x0050, text=»* 1 GERMANY «, t00=0x000c, t01=0x004c}
0x131a…132e              Head {h00=0x0010, h01=0x0050, text=»* 2 FRANCE 1«, t00=0x000c, t01=0x0060}
0x132e…1340              Head {h00=0x000e, h01=0x0050, text=»* 3 SPAIN «, t00=0x000c, t01=0x0074}
0x1340…1352              Head {h00=0x000e, h01=0x0050, text=»* 4 ITALY «, t00=0x000c, t01=0x0086}
0x1352…136e              Head {h00=0x0018, h01=0x0050, text=»* 5 SWEDEN, FINLAND «, t00=0x000c, t01=0x0098}
0x136e…138c              Head {h00=0x001a, h01=0x0050, text=»* 6 DENMARK, NORWAY 1 «, t00=0x000c, t01=0x00b4}
0x138c…13a0              Head {h00=0x0010, h01=0x0050, text=»* 7 PORTUGAL«, t00=0x000c, t01=0x00d2}
0x13a0…13da              Head {h00=0x0036, h01=0x0050, text=»* 8 YUGOSLAVIA OR FRANCE 2 (DEPENDING ON CHAR GEN)«, t00=0x000c, t01=0x00e6}
0x13da…13ea              Head {h00=0x000c, h01=0x0050, text=»* 9 USA «, t00=0x000c, t01=0x0120}
0x13ea…1408              Head {h00=0x001a, h01=0x0050, text=»* 10 DENMARK, NORWAY 2«, t00=0x000c, t01=0x0130}
0x1408…1412              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x014e}
0x1412…1424              Head {h00=0x000e, h01=0x0050, text=»X:A EQU 0 «, t00=0x000c, t01=0x0158}
0x1424…143a              Head {h00=0x0012, h01=0x0050, text=»STDNCV EQU X:A«, t00=0x000c, t01=0x016a}
0x143a…1444              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0180}
0x1444…1472              Head {h00=0x002a, h01=0x0050, text=»* THE RECEIPT STATION CAN BE EXCLUDED «, t00=0x000c, t01=0x018a}
0x1472…148c              Head {h00=0x0016, h01=0x0050, text=»* BY SETTING X:B=0«, t00=0x000d, t01=0x0028}
0x148c…1496              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0042}
0x1496…14a8              Head {h00=0x000e, h01=0x0050, text=»X:B EQU 1 «, t00=0x000d, t01=0x004c}
0x14a8…14be              Head {h00=0x0012, h01=0x0050, text=»M2PRT EQU X:B «, t00=0x000d, t01=0x005e}
0x14be…14c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0074}
0x14c8…14e4              Head {h00=0x0018, h01=0x0050, text=»*   MMU BUFFER SIZE «, t00=0x000d, t01=0x007e}
0x14e4…14ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x009a}
0x14ee…1502              Head {h00=0x0010, h01=0x0050, text=»X:C EQU 095 «, t00=0x000d, t01=0x00a4}
0x1502…1518              Head {h00=0x0012, h01=0x0050, text=»DVBLEN EQU X:C«, t00=0x000d, t01=0x00b8}
0x1518…1522              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x00ce}
0x1522…1560              Head {h00=0x003a, h01=0x0050, text=»* A REQUEST IS ALLWAYS ENDED FOR NOT OPERABLE PRINTERS«, t00=0x000d, t01=0x00d8}
0x1560…157a              Head {h00=0x0016, h01=0x0050, text=»* BY SETTING X:D=1«, t00=0x000d, t01=0x0116}
0x157a…158c              Head {h00=0x000e, h01=0x0050, text=»X:D EQU 0 «, t00=0x000d, t01=0x0130}
0x158c…15a2              Head {h00=0x0012, h01=0x0050, text=»REQEND EQU X:D«, t00=0x000d, t01=0x0142}
0x15a2…15ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0158}
0x15ac…15b6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0162}
0x15b6…15c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016c}
0x15c0…15ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0176}
0x15ca…15f2              Head {h00=0x0024, h01=0x0050, text=»PRIPAR FORM 1=1,2=0,5=STDNCV,8=0«, t00=0x000d, t01=0x0180}
0x15f2…1600              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0018}
0x1600…160a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0026}
0x160a…1612              Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x0030}
0x1612…1630              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x0038}
0x1630…164e              Head {h00=0x001a, h01=0x0050, text=»* DWT-DISPLACEMENTS * «, t00=0x000e, t01=0x0056}
0x164e…166c              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x0074}
0x166c…1676              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0092}
0x1676…1680              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x009c}
0x1680…168a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00a6}
0x168a…16ae              Head {h00=0x0020, h01=0x0050, text=»PP EQU /2 PRINTER PARAMETERS«, t00=0x000e, t01=0x00b0}
0x16ae…16b8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d4}
0x16b8…16c6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x00de}
0x16c6…16d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ec}
0x16d0…16e2              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x00f6}
0x16e2…16f4              Head {h00=0x000e, h01=0x0050, text=»* TABLES *«, t00=0x000e, t01=0x0108}
0x16f4…1706              Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x000e, t01=0x011a}
0x1706…1710              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x012c}
0x1710…171a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0136}
0x171a…1732              Head {h00=0x0014, h01=0x0050, text=»* ADDRESS BLOCK «, t00=0x000e, t01=0x0140}
0x1732…173c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0158}
0x173c…1760              Head {h00=0x0020, h01=0x0050, text=» DATA DVBLEN MMU BUFFER SIZE«, t00=0x000e, t01=0x0162}
0x1760…177c              Head {h00=0x0018, h01=0x0050, text=» DATA 2 DEVICE INDEX«, t00=0x000e, t01=0x0186}
0x177c…179e              Head {h00=0x001e, h01=0x0050, text=»TPAD4 EQU * ADDRESS BLOCK «, t00=0x000f, t01=0x0012}
0x179e…17c2              Head {h00=0x0020, h01=0x0050, text=» DATA ACTP ACTIVATION DRIVER«, t00=0x000f, t01=0x0034}
0x17c2…17e8              Head {h00=0x0022, h01=0x0050, text=» DATA 0 ABORT ROUTINE ADDRESS «, t00=0x000f, t01=0x0058}
0x17e8…180a              Head {h00=0x001e, h01=0x0050, text=» DATA 0 INTERRUPT HANDLER «, t00=0x000f, t01=0x007e}
0x180a…182e              Head {h00=0x0020, h01=0x0050, text=» DATA RCTP RECOVERY ROUTINE «, t00=0x000f, t01=0x00a0}
0x182e…1838              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00c4}
0x1838…1868              Head {h00=0x002c, h01=0x0050, text=»* VALID ORDERS WITH ACTIVATION ADDRESSES«, t00=0x000f, t01=0x00ce}
0x1868…1872              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00fe}
0x1872…1886              Head {h00=0x0010, h01=0x0050, text=»TPTAB EQU * «, t00=0x000f, t01=0x0108}
0x1886…18b0              Head {h00=0x0026, h01=0x0050, text=» DATA TPTAB0 DEVICE INDEX 0 TABLE «, t00=0x000f, t01=0x011c}
0x18b0…18da              Head {h00=0x0026, h01=0x0050, text=» DATA TPTAB1 DEVICE INDEX 1 TABLE «, t00=0x000f, t01=0x0146}
0x18da…1904              Head {h00=0x0026, h01=0x0050, text=» DATA TPTAB2 DEVICE INDEX 2 TABLE «, t00=0x000f, t01=0x0170}
0x1904…192e              Head {h00=0x0026, h01=0x0050, text=» DATA TPTAB3 DEVICE INDEX 3 TABLE «, t00=0x0010, t01=0x000a}
0x192e…1938              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0034}
0x1938…195c              Head {h00=0x0020, h01=0x0050, text=»TPTAB0 EQU * DEVICE INDEX 0 «, t00=0x0010, t01=0x003e}
0x195c…1982              Head {h00=0x0022, h01=0x0050, text=» DATA 0 TEST STATUS (JOURNAL) «, t00=0x0010, t01=0x0062}
0x1982…1996              Head {h00=0x0010, h01=0x0050, text=» DATA TSTSTA«, t00=0x0010, t01=0x0088}
0x1996…19b4              Head {h00=0x001a, h01=0x0050, text=» DATA 6 WRITE JOURNAL «, t00=0x0010, t01=0x009c}
0x19b4…19c8              Head {h00=0x0010, h01=0x0050, text=» DATA WRTJRL«, t00=0x0010, t01=0x00ba}
0x19c8…19f0              Head {h00=0x0024, h01=0x0050, text=» DATA /24 SET PRINTER PARAMETERS«, t00=0x0010, t01=0x00ce}
0x19f0…1a04              Head {h00=0x0010, h01=0x0050, text=» DATA PRTPAR«, t00=0x0010, t01=0x00f6}
0x1a04…1a26              Head {h00=0x001e, h01=0x0050, text=» DATA /FFFF END OF ORDERS «, t00=0x0010, t01=0x010a}
0x1a26…1a30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x012c}
0x1a30…1a54              Head {h00=0x0020, h01=0x0050, text=»TPTAB1 EQU * DEVICE INDEX 1 «, t00=0x0010, t01=0x0136}
0x1a54…1a7a              Head {h00=0x0022, h01=0x0050, text=» DATA 0 TEST STATUS (DOCUMENT)«, t00=0x0010, t01=0x015a}
0x1a7a…1a8e              Head {h00=0x0010, h01=0x0050, text=» DATA TSTSTA«, t00=0x0010, t01=0x0180}
0x1a8e…1aac (17, 0, 400) Head {h00=0x001a, h01=0x0050, text=» DATA 6 WRITE DOCUMENT«, t00=0x0011, t01=0x0004}
0x1aac…1ac0              Head {h00=0x0010, h01=0x0050, text=» DATA WRTDOC«, t00=0x0011, t01=0x0022}
0x1ac0…1ae8              Head {h00=0x0024, h01=0x0050, text=» DATA /24 SET PRINTER PARAMETERS«, t00=0x0011, t01=0x0036}
0x1ae8…1afc              Head {h00=0x0010, h01=0x0050, text=» DATA PRTPAR«, t00=0x0011, t01=0x005e}
0x1afc…1b1e              Head {h00=0x001e, h01=0x0050, text=» DATA /FFFF END OF ORDERS «, t00=0x0011, t01=0x0072}
0x1b1e…1b28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0094}
0x1b28…1b4c              Head {h00=0x0020, h01=0x0050, text=»TPTAB2 EQU * DEVICE INDEX 2 «, t00=0x0011, t01=0x009e}
0x1b4c…1b60              Head {h00=0x0010, h01=0x0050, text=» IFT M2PRT=1«, t00=0x0011, t01=0x00c2}
0x1b60…1b86              Head {h00=0x0022, h01=0x0050, text=» DATA 0 TEST STATUS (RECEIPT) «, t00=0x0011, t01=0x00d6}
0x1b86…1b9c              Head {h00=0x0012, h01=0x0050, text=» DATA TSTSTA U«, t00=0x0011, t01=0x00fc}
0x1b9c…1bba              Head {h00=0x001a, h01=0x0050, text=» DATA 6 WRITE RECEIPT «, t00=0x0011, t01=0x0112}
0x1bba…1bce              Head {h00=0x0010, h01=0x0050, text=» DATA WRTREC«, t00=0x0011, t01=0x0130}
0x1bce…1bec              Head {h00=0x001a, h01=0x0050, text=» DATA /22 CUT RECEIPT «, t00=0x0011, t01=0x0144}
0x1bec…1c00              Head {h00=0x0010, h01=0x0050, text=» DATA CUTREC«, t00=0x0011, t01=0x0162}
0x1c00…1c24              Head {h00=0x0020, h01=0x0050, text=» DATA /26 PERFORATE RECEIPT «, t00=0x0011, t01=0x0176}
0x1c24…1c38              Head {h00=0x0010, h01=0x0050, text=» DATA PERREC«, t00=0x0012, t01=0x000a}
0x1c38…1c60              Head {h00=0x0024, h01=0x0050, text=» DATA /24 SET PRINTER PARAMETERS«, t00=0x0012, t01=0x001e}
0x1c60…1c74              Head {h00=0x0010, h01=0x0050, text=» DATA PRTPAR«, t00=0x0012, t01=0x0046}
0x1c74…1c80              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0012, t01=0x005a}
0x1c80…1ca2              Head {h00=0x001e, h01=0x0050, text=» DATA /FFFF END OF ORDERS «, t00=0x0012, t01=0x0066}
0x1ca2…1cac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0088}
0x1cac…1cd0              Head {h00=0x0020, h01=0x0050, text=»TPTAB3 EQU * DEVICE INDEX 3 «, t00=0x0012, t01=0x0092}
0x1cd0…1cf2              Head {h00=0x001e, h01=0x0050, text=» DATA /FFFF END OF ORDERS «, t00=0x0012, t01=0x00b6}
0x1cf2…1cfc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00d8}
0x1cfc…1d28              Head {h00=0x0028, h01=0x0050, text=»* SYSTEM STANDARD PRINTER PARAMETERS«, t00=0x0012, t01=0x00e2}
0x1d28…1d32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x010e}
0x1d32…1d64              Head {h00=0x002e, h01=0x0050, text=»STDPP PRIPAR  STANDARD PRINTER PARAMETERS «, t00=0x0012, t01=0x0118}
0x1d64…1d72              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x014a}
0x1d72…1d7c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0158}
0x1d7c…1d86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0162}
0x1d86…1d9a              Head {h00=0x0010, h01=0x0050, text=»*   A C T P «, t00=0x0012, t01=0x016c}
0x1d9a…1da4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0180}
0x1da4…1dda              Head {h00=0x0032, h01=0x0050, text=»*   THIS IS THE ACTIVATION PART OF THE DRIVER «, t00=0x0012, t01=0x018a}
0x1dda…1e1c              Head {h00=0x003e, h01=0x0050, text=»*   CHECKS VALIDITY OF ORDERS AND JUMPS TO ORDER PROCESSOR«, t00=0x0013, t01=0x0030}
0x1e1c…1e26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0072}
0x1e26…1e30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x007c}
0x1e30…1e3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0086}
0x1e3a…1e5e              Head {h00=0x0020, h01=0x0050, text=»ACTP EQU * ACTIVATION ENTRY «, t00=0x0013, t01=0x0090}
0x1e5e…1e68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00b4}
0x1e68…1e72              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00be}
0x1e72…1eae              Head {h00=0x0038, h01=0x0050, text=»*   GET DWT INDEX: 0=JOURNAL, 1=DOCUMENT, 2=RECEIPT «, t00=0x0013, t01=0x00c8}
0x1eae…1eb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0104}
0x1eb8…1ede              Head {h00=0x0022, h01=0x0050, text=» LC A2,DWTOR,A6 GET DWT INDEX «, t00=0x0013, t01=0x010e}
0x1ede…1ef4              Head {h00=0x0012, h01=0x0050, text=» ANK A2,3 MASK«, t00=0x0013, t01=0x0134}
0x1ef4…1f0c              Head {h00=0x0014, h01=0x0050, text=» SLL A2,6 SHIFT «, t00=0x0013, t01=0x014a}
0x1f0c…1f3a              Head {h00=0x002a, h01=0x0050, text=» LD A3,DWTDEV,A6 GET OLD DEVICE INDEX «, t00=0x0013, t01=0x0162}
0x1f3a…1f6c              Head {h00=0x002e, h01=0x0050, text=» ANKL A3,/FF1F RESET OLD INDEX AND LF IND «, t00=0x0013, t01=0x0190}
0x1f6c…1f7e              Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0014, t01=0x0032}
0x1f7e…1fa6              Head {h00=0x0024, h01=0x0050, text=» ST A3,DWTDEV,A6 STORE NEW INDEX«, t00=0x0014, t01=0x0044}
0x1fa6…1fd6              Head {h00=0x002c, h01=0x0050, text=»ACT005 LD A1,DWTDEV,A6 GET DEVICE INDEX «, t00=0x0014, t01=0x006c}
0x1fd6…1fea              Head {h00=0x0010, h01=0x0050, text=» ANK A1,/C0 «, t00=0x0014, t01=0x009c}
0x1fea…2018              Head {h00=0x002a, h01=0x0050, text=» SRL A1,5 GET CORESPONDING ORDER TABLE«, t00=0x0014, t01=0x00b0}
0x2018…2030              Head {h00=0x0014, h01=0x0050, text=» LD A2,TPTAB,A1 «, t00=0x0014, t01=0x00de}
0x2030…204a              Head {h00=0x0016, h01=0x0050, text=»ACT010 LDR* A3,A2 «, t00=0x0014, t01=0x00f6}
0x204a…2076              Head {h00=0x0028, h01=0x0050, text=» ABL(N) LENDER NO MORE VALID ORDERS «, t00=0x0014, t01=0x0110}
0x2076…209c              Head {h00=0x0022, h01=0x0050, text=» SUR A3,A7 TEST IF ORDER VALID«, t00=0x0014, t01=0x013c}
0x209c…20c4              Head {h00=0x0024, h01=0x0050, text=» RF(E) ACT020 VALID ORDER FOUND «, t00=0x0014, t01=0x0162}
0x20c4…20e4              Head {h00=0x001c, h01=0x0050, text=» ADK A2,4 TRY NEXT ORDER«, t00=0x0014, t01=0x018a}
0x20e4…20f6              Head {h00=0x000e, h01=0x0050, text=» RB ACT010«, t00=0x0015, t01=0x001a}
0x20f6…210a              Head {h00=0x0010, h01=0x0050, text=»ACT020 EQU *«, t00=0x0015, t01=0x002c}
0x210a…212a              Head {h00=0x001c, h01=0x0050, text=» ABI 2,A2 EXECUTE ORDER «, t00=0x0015, t01=0x0040}
0x212a…2138              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0060}
0x2138…2142              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006e}
0x2142…214c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0078}
0x214c…216e              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 00 : TEST STATUS«, t00=0x0015, t01=0x0082}
0x216e…2178              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00a4}
0x2178…2182              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00ae}
0x2182…2196              Head {h00=0x0010, h01=0x0050, text=»TSTSTA EQU *«, t00=0x0015, t01=0x00b8}
0x2196…21be              Head {h00=0x0024, h01=0x0050, text=» CM ECBCW,A8 CLEAR CONTROL WORD «, t00=0x0015, t01=0x00cc}
0x21be…21dc              Head {h00=0x001a, h01=0x0050, text=» LDK A2,3 BLOCK LENGTH«, t00=0x0015, t01=0x00f4}
0x21dc…2202              Head {h00=0x0022, h01=0x0050, text=» LDK A3,POTEST LOAD TEST ORDER«, t00=0x0015, t01=0x0112}
0x2202…2220              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0015, t01=0x0138}
0x2220…224e              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0015, t01=0x0156}
0x224e…2274              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 GET PRINTER STATUS «, t00=0x0015, t01=0x0184}
0x2274…229a              Head {h00=0x0022, h01=0x0050, text=» ANK A1,/1 TEST PRINTER STATUS«, t00=0x0016, t01=0x001a}
0x229a…22c4              Head {h00=0x0026, h01=0x0050, text=» RF(Z) TSST10 NO PERMANENT ERRORS «, t00=0x0016, t01=0x0040}
0x22c4…22d8              Head {h00=0x0010, h01=0x0050, text=»TSST05 EQU *«, t00=0x0016, t01=0x006a}
0x22d8…22f6              Head {h00=0x001a, h01=0x0050, text=» LDK A2,3 BLOCK LENGTH«, t00=0x0016, t01=0x007e}
0x22f6…2322              Head {h00=0x0028, h01=0x0050, text=» LDK A3,PODSTA LOAD DIAGNOSTIC ORDER«, t00=0x0016, t01=0x009c}
0x2322…2340              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0016, t01=0x00c8}
0x2340…236e              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0016, t01=0x00e6}
0x236e…23a2              Head {h00=0x0030, h01=0x0050, text=» SC A2,ECBCW+1,A8 SET UP DIAGN STATUS IN ECB«, t00=0x0016, t01=0x0114}
0x23a2…23ca              Head {h00=0x0024, h01=0x0050, text=» LDK A1,1 INDICATE NOT OPERABLE «, t00=0x0016, t01=0x0148}
0x23ca…23dc              Head {h00=0x000e, h01=0x0050, text=» RF TSST80«, t00=0x0016, t01=0x0170}
0x23dc…2408              Head {h00=0x0028, h01=0x0050, text=»TSST10 LDR A1,A2 GET PRINTER STATUS «, t00=0x0016, t01=0x0182}
0x2408…2432              Head {h00=0x0026, h01=0x0050, text=» LD A3,DWTDEV,A6 GET DEVICE INDEX «, t00=0x0017, t01=0x001e}
0x2432…2458              Head {h00=0x0022, h01=0x0050, text=» ANK A3,/C0 TEST DEVICE INDEX «, t00=0x0017, t01=0x0048}
0x2458…2480              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TSST40 DEVICE INDEX > 0 «, t00=0x0017, t01=0x006e}
0x2480…24a8              Head {h00=0x0024, h01=0x0050, text=» ANK A1,/20 TEST PRINTER STATUS «, t00=0x0017, t01=0x0096}
0x24a8…24c8              Head {h00=0x001c, h01=0x0050, text=» RF(Z) TSST80 NO ERRORS «, t00=0x0017, t01=0x00be}
0x24c8…24ec              Head {h00=0x0020, h01=0x0050, text=» LDKL A1,ENDJ END OF JOURNAL«, t00=0x0017, t01=0x00de}
0x24ec…24fe              Head {h00=0x000e, h01=0x0050, text=» RF TSST80«, t00=0x0017, t01=0x0102}
0x24fe…2512              Head {h00=0x0010, h01=0x0050, text=»TSST40 EQU *«, t00=0x0017, t01=0x0114}
0x2512…2538              Head {h00=0x0022, h01=0x0050, text=» ANK A3,/80 TEST DEVICE INDEX «, t00=0x0017, t01=0x0128}
0x2538…2560              Head {h00=0x0024, h01=0x0050, text=» RF(NZ) TSST70 DEVICE INDEX > 1 «, t00=0x0017, t01=0x014e}
0x2560…2588              Head {h00=0x0024, h01=0x0050, text=» ANK A1,/40 TEST PRINTER STATUS «, t00=0x0017, t01=0x0176}
0x2588…25a8              Head {h00=0x001c, h01=0x0050, text=» RF(Z) TSST80 NO ERRORS «, t00=0x0018, t01=0x000e}
0x25a8…25cc              Head {h00=0x0020, h01=0x0050, text=» LDK A1,DOCOUT DOCUMENT OUT «, t00=0x0018, t01=0x002e}
0x25cc…25de              Head {h00=0x000e, h01=0x0050, text=» RF TSST80«, t00=0x0018, t01=0x0052}
0x25de…2614              Head {h00=0x0032, h01=0x0050, text=»TSST70 LDK A1,0 RECEIPT, NO ERRORS DETECTABLE «, t00=0x0018, t01=0x0064}
0x2614…263a              Head {h00=0x0022, h01=0x0050, text=»TSST80 ABL LENDIS END REQUEST «, t00=0x0018, t01=0x009a}
0x263a…264a              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x0018, t01=0x00c0}
0x264a…2654              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00d0}
0x2654…265e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00da}
0x265e…2682              Head {h00=0x0020, h01=0x0050, text=»*   ORDER 06 : WRITE JOURNAL«, t00=0x0018, t01=0x00e4}
0x2682…268c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0108}
0x268c…2696              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0112}
0x2696…26aa              Head {h00=0x0010, h01=0x0050, text=»WRTJRL EQU *«, t00=0x0018, t01=0x011c}
0x26aa…26d6              Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBRL,A8 GET REQUESTED LENGTH«, t00=0x0018, t01=0x0130}
0x26d6…26fe              Head {h00=0x0024, h01=0x0050, text=» SUK A1,2 TEST REQUESTED LENGTH «, t00=0x0018, t01=0x015c}
0x26fe…2722              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRJL80 REQUEST ERROR «, t00=0x0018, t01=0x0184}
0x2722…2752              Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBBA,A8 GET CONTROL CHARACTER =1«, t00=0x0019, t01=0x0018}
0x2752…276a              Head {h00=0x0014, h01=0x0050, text=» LC A2,1,A2 * =1«, t00=0x0019, t01=0x0048}
0x276a…277e              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0019, t01=0x0060}
0x277e…279c              Head {h00=0x001a, h01=0x0050, text=» LDK A4,0 SET UP 0 LF «, t00=0x0019, t01=0x0074}
0x279c…27be              Head {h00=0x001e, h01=0x0050, text=» SUK A2,/2B TEST CTRL CHAR«, t00=0x0019, t01=0x0092}
0x27be…27e2              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRJL10 CTRL CHAR =/2B«, t00=0x0019, t01=0x00b4}
0x27e2…2800              Head {h00=0x001a, h01=0x0050, text=» LDK A4,2 SET UP 2 LF «, t00=0x0019, t01=0x00d8}
0x2800…2812              Head {h00=0x000e, h01=0x0050, text=» SUK A2,5 «, t00=0x0019, t01=0x00f6}
0x2812…2836              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRJL10 CTRL CHAR =/30«, t00=0x0019, t01=0x0108}
0x2836…2854              Head {h00=0x001a, h01=0x0050, text=» LDK A4,1 SET UP 1 LF «, t00=0x0019, t01=0x012c}
0x2854…2868              Head {h00=0x0010, h01=0x0050, text=»WRJL10 EQU *«, t00=0x0019, t01=0x014a}
0x2868…2880              Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0019, t01=0x015e}
0x2880…289e              Head {h00=0x001a, h01=0x0050, text=» ADK A2,2 BLOCK LENGTH«, t00=0x0019, t01=0x0176}
0x289e…28ce (26, 0, 400) Head {h00=0x002c, h01=0x0050, text=» LDK A3,POWJRL LOAD WRITE JOURNAL ORDER «, t00=0x001a, t01=0x0004}
0x28ce…28ec              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x001a, t01=0x0034}
0x28ec…290c              Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RELOAD LF INF«, t00=0x001a, t01=0x0052}
0x290c…2928              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x001a, t01=0x0072}
0x2928…2950              Head {h00=0x0024, h01=0x0050, text=» LDK A3,2 SET UP BUFFER POINTER «, t00=0x001a, t01=0x008e}
0x2950…298a              Head {h00=0x0036, h01=0x0050, text=»WRJL20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x001a, t01=0x00b6}
0x298a…299c              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x001a, t01=0x00f0}
0x299c…29c2              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRJL50 BUFFER FINISHED «, t00=0x001a, t01=0x0102}
0x29c2…29e4              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A2 GET CHAR IN A1 «, t00=0x001a, t01=0x0128}
0x29e4…29ec              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x014a}
0x29ec…2a0a              Head {h00=0x001a, h01=0x0050, text=»*   EXAMINE CHARACTER «, t00=0x001a, t01=0x0152}
0x2a0a…2a12              Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x0170}
0x2a12…2a26              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x001a, t01=0x0178}
0x2a26…2a46              Head {h00=0x001c, h01=0x0050, text=» RB(N) WRJL20 CHAR </10 «, t00=0x001a, t01=0x018c}
0x2a46…2a5a              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/6F «, t00=0x001b, t01=0x001c}
0x2a5a…2a78              Head {h00=0x001a, h01=0x0050, text=» RB(Z) WRJL20 CHAR=/7F«, t00=0x001b, t01=0x0030}
0x2a78…2a9c              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRJL40 CHAR = NORMAL «, t00=0x001b, t01=0x004e}
0x2a9c…2ab0              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2F «, t00=0x001b, t01=0x0072}
0x2ab0…2ad0              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRJL40 CHAR =/AE «, t00=0x001b, t01=0x0086}
0x2ad0…2af6              Head {h00=0x0022, h01=0x0050, text=» LDK A1,4 IND CODE CHECK ERROR«, t00=0x001b, t01=0x00a6}
0x2af6…2b1e              Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A8 IN RETURN CODE «, t00=0x001b, t01=0x00cc}
0x2b1e…2b30              Head {h00=0x000e, h01=0x0050, text=» RB WRJL20«, t00=0x001b, t01=0x00f4}
0x2b30…2b38              Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0106}
0x2b38…2b5c              Head {h00=0x0020, h01=0x0050, text=»*   SEND CHARACTER TO DEVICE«, t00=0x001b, t01=0x010e}
0x2b5c…2b64              Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0132}
0x2b64…2b8e              Head {h00=0x0026, h01=0x0050, text=»WRJL40 CF A5,OUTPUT SEND CHARACTER«, t00=0x001b, t01=0x013a}
0x2b8e…2bb0              Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) ERTP JMP IF ERROR«, t00=0x001b, t01=0x0164}
0x2bb0…2bd6              Head {h00=0x0022, h01=0x0050, text=» RB WRJL20 GET NEXT CHARACTER «, t00=0x001b, t01=0x0186}
0x2bd6…2bde              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x001c}
0x2bde…2bf2              Head {h00=0x0010, h01=0x0050, text=»*   SEND ETX«, t00=0x001c, t01=0x0024}
0x2bf2…2bfa              Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x0038}
0x2bfa…2c2e              Head {h00=0x0030, h01=0x0050, text=»WRJL50 CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x001c, t01=0x0040}
0x2c2e…2c40              Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x001c, t01=0x0074}
0x2c40…2c6a              Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRJL60 NOT 2 LF REQUESTED «, t00=0x001c, t01=0x0086}
0x2c6a…2c8e              Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 SAVE FIRST STATUS«, t00=0x001c, t01=0x00b0}
0x2c8e…2cac              Head {h00=0x001a, h01=0x0050, text=» LDK A2,4 BLOCK LENGTH«, t00=0x001c, t01=0x00d4}
0x2cac…2cdc              Head {h00=0x002c, h01=0x0050, text=» LDK A3,POWJRL LOAD WRITE JOURNAL ORDER «, t00=0x001c, t01=0x00f2}
0x2cdc…2cfa              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x001c, t01=0x0122}
0x2cfa…2d18              Head {h00=0x001a, h01=0x0050, text=» LDK A2,1 SET UP 1 LF «, t00=0x001c, t01=0x0140}
0x2d18…2d36              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND LF INF«, t00=0x001c, t01=0x015e}
0x2d36…2d64              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE 1 LF IN PRINTER «, t00=0x001c, t01=0x017c}
0x2d64…2d96              Head {h00=0x002e, h01=0x0050, text=» ORR A2,A4 COMBINE FIRST AND SECOND STATUS«, t00=0x001d, t01=0x001a}
0x2d96…2dc2              Head {h00=0x0028, h01=0x0050, text=»WRJL60 LDR A1,A2 GET PRINTER STATUS «, t00=0x001d, t01=0x004c}
0x2dc2…2dea              Head {h00=0x0024, h01=0x0050, text=» ANK A1,/25 TEST PRINTER STATUS «, t00=0x001d, t01=0x0078}
0x2dea…2e0a              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRJL70 NO ERRORS «, t00=0x001d, t01=0x00a0}
0x2e0a…2e30              Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 TEST PRINTER STATUS «, t00=0x001d, t01=0x00c0}
0x2e30…2e54              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) WRJL70 NOT OPERABLE «, t00=0x001d, t01=0x00e6}
0x2e54…2e7a              Head {h00=0x0022, h01=0x0050, text=» ANK A2,4 TEST PRINTER STATUS «, t00=0x001d, t01=0x010a}
0x2e7a…2e9e              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) WRJL80 REQUEST ERROR«, t00=0x001d, t01=0x0130}
0x2e9e…2ec2              Head {h00=0x0020, h01=0x0050, text=» LDKL A1,ENDJ END OF JOURNAL«, t00=0x001d, t01=0x0154}
0x2ec2…2ee8              Head {h00=0x0022, h01=0x0050, text=»WRJL70 ABL LENDIS END REQUEST «, t00=0x001d, t01=0x0178}
0x2ee8…2f20              Head {h00=0x0034, h01=0x0050, text=»WRJL80 ABL LENDER END REQUEST WITH REQUEST ERROR«, t00=0x001e, t01=0x000e}
0x2f20…2f30              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x001e, t01=0x0046}
0x2f30…2f3a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0056}
0x2f3a…2f44              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0060}
0x2f44…2f6a              Head {h00=0x0022, h01=0x0050, text=»*   ORDER 06 : WRITE DOCUMENT «, t00=0x001e, t01=0x006a}
0x2f6a…2f74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0090}
0x2f74…2f7e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x009a}
0x2f7e…2f92              Head {h00=0x0010, h01=0x0050, text=»WRTDOC EQU *«, t00=0x001e, t01=0x00a4}
0x2f92…2fbe              Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBRL,A8 GET REQUESTED LENGTH«, t00=0x001e, t01=0x00b8}
0x2fbe…2fe6              Head {h00=0x0024, h01=0x0050, text=» SUK A1,2 TEST REQUESTED LENGTH «, t00=0x001e, t01=0x00e4}
0x2fe6…300a              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRDO80 REQUEST ERROR «, t00=0x001e, t01=0x010c}
0x300a…301e              Head {h00=0x0010, h01=0x0050, text=»WRDO10 EQU *«, t00=0x001e, t01=0x0130}
0x301e…3036              Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x001e, t01=0x0144}
0x3036…3054              Head {h00=0x001a, h01=0x0050, text=» ADK A2,2 BLOCK LENGTH«, t00=0x001e, t01=0x015c}
0x3054…3080              Head {h00=0x0028, h01=0x0050, text=» LDK A3,POWDOC SET UP PRINTER ORDER «, t00=0x001e, t01=0x017a}
0x3080…309e              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x001f, t01=0x0016}
0x309e…30c0              Head {h00=0x001e, h01=0x0050, text=» LDK A2,0 SET UP DUMMY LF «, t00=0x001f, t01=0x0034}
0x30c0…30dc              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x001f, t01=0x0056}
0x30dc…3104              Head {h00=0x0024, h01=0x0050, text=» LDK A3,2 SET UP BUFFER POINTER «, t00=0x001f, t01=0x0072}
0x3104…313e              Head {h00=0x0036, h01=0x0050, text=»WRDO20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x001f, t01=0x009a}
0x313e…3150              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x001f, t01=0x00d4}
0x3150…3176              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRDO50 BUFFER FINISHED «, t00=0x001f, t01=0x00e6}
0x3176…3196              Head {h00=0x001c, h01=0x0050, text=» LDR A1,A2 GET CHARACTER«, t00=0x001f, t01=0x010c}
0x3196…319e              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x012c}
0x319e…31bc              Head {h00=0x001a, h01=0x0050, text=»*   EXAMINE CHARACTER «, t00=0x001f, t01=0x0134}
0x31bc…31c4              Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0152}
0x31c4…31d8              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x001f, t01=0x015a}
0x31d8…31f8              Head {h00=0x001c, h01=0x0050, text=» RB(N) WRDO20 CHAR < /10«, t00=0x001f, t01=0x016e}
0x31f8…320c              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/6F «, t00=0x001f, t01=0x018e}
0x320c…3230              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRDO40 CHAR = NORMAL «, t00=0x0020, t01=0x0012}
0x3230…3250              Head {h00=0x001c, h01=0x0050, text=» RB(Z) WRDO20 CHAR = /7F«, t00=0x0020, t01=0x0036}
0x3250…3264              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2F «, t00=0x0020, t01=0x0056}
0x3264…3284              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRDO40 CHAR = /AE«, t00=0x0020, t01=0x006a}
0x3284…32b0              Head {h00=0x0028, h01=0x0050, text=» LDK A1,4 INDICATE CODE CHECK ERROR «, t00=0x0020, t01=0x008a}
0x32b0…32d8              Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A8 IN RETURN CODE «, t00=0x0020, t01=0x00b6}
0x32d8…32ea              Head {h00=0x000e, h01=0x0050, text=» RB WRDO20«, t00=0x0020, t01=0x00de}
0x32ea…32f2              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x00f0}
0x32f2…3318              Head {h00=0x0022, h01=0x0050, text=»*   SEND CHARACTER TO PRINTER «, t00=0x0020, t01=0x00f8}
0x3318…3320              Head {h00=0x0004, h01=0x0050, t00=0x0020, t01=0x011e}
0x3320…334a              Head {h00=0x0026, h01=0x0050, text=»WRDO40 CF A5,OUTPUT SEND CHARACTER«, t00=0x0020, t01=0x0126}
0x334a…336c              Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) ERTP JMP IF ERROR«, t00=0x0020, t01=0x0150}
0x336c…338c              Head {h00=0x001c, h01=0x0050, text=» RB WRDO20 GET NEXT CHAR«, t00=0x0020, t01=0x0172}
0x338c…3394 (33, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0004}
0x3394…33a8              Head {h00=0x0010, h01=0x0050, text=»*   SEND ETX«, t00=0x0021, t01=0x000c}
0x33a8…33b0              Head {h00=0x0004, h01=0x0050, t00=0x0021, t01=0x0020}
0x33b0…33e4              Head {h00=0x0030, h01=0x0050, text=»WRDO50 CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0021, t01=0x0028}
0x33e4…340a              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 GET PRINTER STATUS «, t00=0x0021, t01=0x005c}
0x340a…3432              Head {h00=0x0024, h01=0x0050, text=» ANK A1,/45 TEST PRINTER STATUS «, t00=0x0021, t01=0x0082}
0x3432…3452              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRDO70 NO ERRORS «, t00=0x0021, t01=0x00aa}
0x3452…3478              Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 TEST PRINTER STATUS «, t00=0x0021, t01=0x00ca}
0x3478…349c              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) WRDO70 NOT OPERABLE «, t00=0x0021, t01=0x00f0}
0x349c…34c2              Head {h00=0x0022, h01=0x0050, text=» ANK A2,4 TEST PRINTER STATUS «, t00=0x0021, t01=0x0114}
0x34c2…34e6              Head {h00=0x0020, h01=0x0050, text=» RF(NZ) WRDO80 REQUEST ERROR«, t00=0x0021, t01=0x013a}
0x34e6…3512              Head {h00=0x0028, h01=0x0050, text=» RB WRTDOC DOCUMENT OUT REPEAT ORDER«, t00=0x0021, t01=0x015e}
0x3512…3538              Head {h00=0x0022, h01=0x0050, text=»WRDO70 ABL LENDIS END REQUEST «, t00=0x0021, t01=0x018a}
0x3538…3570              Head {h00=0x0034, h01=0x0050, text=»WRDO80 ABL LENDER END REQUEST WITH REQUEST ERROR«, t00=0x0022, t01=0x0020}
0x3570…357e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0058}
0x357e…3588              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0066}
0x3588…3592              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x0070}
0x3592…35b6              Head {h00=0x0020, h01=0x0050, text=»*   ORDER 06 : WRITE RECEIPT«, t00=0x0022, t01=0x007a}
0x35b6…35c0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x009e}
0x35c0…35ca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a8}
0x35ca…35de              Head {h00=0x0010, h01=0x0050, text=» IFT M2PRT=1«, t00=0x0022, t01=0x00b2}
0x35de…35f2              Head {h00=0x0010, h01=0x0050, text=»WRTREC EQU *«, t00=0x0022, t01=0x00c6}
0x35f2…361e              Head {h00=0x0028, h01=0x0050, text=» LD A1,ECBRL,A8 GET REQUESTED LENGTH«, t00=0x0022, t01=0x00da}
0x361e…3646              Head {h00=0x0024, h01=0x0050, text=» SUK A1,2 TEST REQUESTED LENGTH «, t00=0x0022, t01=0x0106}
0x3646…366a              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRRC80 REQUEST ERROR «, t00=0x0022, t01=0x012e}
0x366a…369a              Head {h00=0x002c, h01=0x0050, text=» LD A2,ECBBA,A8 GET CONTROL CHARACTER =1«, t00=0x0022, t01=0x0152}
0x369a…36b2              Head {h00=0x0014, h01=0x0050, text=» LC A2,1,A2 U =1«, t00=0x0022, t01=0x0182}
0x36b2…36c6              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0023, t01=0x000a}
0x36c6…36e4              Head {h00=0x001a, h01=0x0050, text=» LDK A4,0 SET UP 0 LF «, t00=0x0023, t01=0x001e}
0x36e4…36f8              Head {h00=0x0010, h01=0x0050, text=» SUK A2,/2B «, t00=0x0023, t01=0x003c}
0x36f8…371e              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRRC10 CTRL CHAR = /2B «, t00=0x0023, t01=0x0050}
0x371e…373c              Head {h00=0x001a, h01=0x0050, text=» LDK A4,8 SET UP 8 LF «, t00=0x0023, t01=0x0076}
0x373c…374e              Head {h00=0x000e, h01=0x0050, text=» SUK A2,6 «, t00=0x0023, t01=0x0094}
0x374e…3774              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRRC10 CTRL CHAR = /31 «, t00=0x0023, t01=0x00a6}
0x3774…3798              Head {h00=0x0020, h01=0x0050, text=» LDK A4,5 SET UP 5 LF (FAST)«, t00=0x0023, t01=0x00cc}
0x3798…37aa              Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0023, t01=0x00f0}
0x37aa…37d0              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRRC10 CTRL CHAR = /32 «, t00=0x0023, t01=0x0102}
0x37d0…37ee              Head {h00=0x001a, h01=0x0050, text=» LDK A4,2 SET UP 2 LF «, t00=0x0023, t01=0x0128}
0x37ee…3800              Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0023, t01=0x0146}
0x3800…3824              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRRC10 CTRL CHAR =/30«, t00=0x0023, t01=0x0158}
0x3824…3842              Head {h00=0x001a, h01=0x0050, text=» LDK A4,1 SET UP 1 LF «, t00=0x0023, t01=0x017c}
0x3842…3856              Head {h00=0x0010, h01=0x0050, text=»WRRC10 EQU *«, t00=0x0024, t01=0x000a}
0x3856…386e              Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRL,A8 «, t00=0x0024, t01=0x001e}
0x386e…388c              Head {h00=0x001a, h01=0x0050, text=» ADK A2,2 BLOCK LENGTH«, t00=0x0024, t01=0x0036}
0x388c…38bc              Head {h00=0x002c, h01=0x0050, text=» LDK A3,POWREC LOAD WRITE RECEIPT ORDER «, t00=0x0024, t01=0x0054}
0x38bc…38da              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0024, t01=0x0084}
0x38da…38fa              Head {h00=0x001c, h01=0x0050, text=» LDR A2,A4 RELOAD LF INF«, t00=0x0024, t01=0x00a2}
0x38fa…3924              Head {h00=0x0026, h01=0x0050, text=» CF A5,OUT AND SEND LF INFORMATION«, t00=0x0024, t01=0x00c2}
0x3924…394c              Head {h00=0x0024, h01=0x0050, text=» LDK A3,2 SET UP BUFFER POINTER «, t00=0x0024, t01=0x00ec}
0x394c…3986              Head {h00=0x0036, h01=0x0050, text=»WRRC20 CF A15,GETCHR GET CHARACTER FROM ECB BUFFER«, t00=0x0024, t01=0x0114}
0x3986…3998              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0024, t01=0x014e}
0x3998…39be              Head {h00=0x0022, h01=0x0050, text=» RF(Z) WRRC50 BUFFER FINISHED «, t00=0x0024, t01=0x0160}
0x39be…39e0              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A2 GET CHAR IN A1 «, t00=0x0024, t01=0x0186}
0x39e0…39e8              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0018}
0x39e8…3a06              Head {h00=0x001a, h01=0x0050, text=»*   EXAMINE CHARACTER «, t00=0x0025, t01=0x0020}
0x3a06…3a0e              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x003e}
0x3a0e…3a22              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/10 «, t00=0x0025, t01=0x0046}
0x3a22…3a42              Head {h00=0x001c, h01=0x0050, text=» RB(N) WRRC20 CHAR </10 «, t00=0x0025, t01=0x005a}
0x3a42…3a56              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/6F «, t00=0x0025, t01=0x007a}
0x3a56…3a74              Head {h00=0x001a, h01=0x0050, text=» RB(Z) WRRC20 CHAR=/7F«, t00=0x0025, t01=0x008e}
0x3a74…3a98              Head {h00=0x0020, h01=0x0050, text=» RF(N) WRRC40 CHAR = NORMAL «, t00=0x0025, t01=0x00ac}
0x3a98…3aac              Head {h00=0x0010, h01=0x0050, text=» SUK A1,/2F «, t00=0x0025, t01=0x00d0}
0x3aac…3acc              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRRC40 CHAR =/AE «, t00=0x0025, t01=0x00e4}
0x3acc…3af2              Head {h00=0x0022, h01=0x0050, text=» LDK A1,4 IND CODE CHECH ERROR«, t00=0x0025, t01=0x0104}
0x3af2…3b1a              Head {h00=0x0024, h01=0x0050, text=» ORS A1,ECBRC,A8 IN RETURN CODE «, t00=0x0025, t01=0x012a}
0x3b1a…3b2c              Head {h00=0x000e, h01=0x0050, text=» RB WRRC20«, t00=0x0025, t01=0x0152}
0x3b2c…3b34              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0164}
0x3b34…3b58              Head {h00=0x0020, h01=0x0050, text=»*   SEND CHARACTER TO DEVICE«, t00=0x0025, t01=0x016c}
0x3b58…3b60              Head {h00=0x0004, h01=0x0050, t00=0x0025, t01=0x0190}
0x3b60…3b8a              Head {h00=0x0026, h01=0x0050, text=»WRRC40 CF A5,OUTPUT SEND CHARACTER«, t00=0x0026, t01=0x0008}
0x3b8a…3bac              Head {h00=0x001e, h01=0x0050, text=» ABL(NZ) ERTP JMP IF ERROR«, t00=0x0026, t01=0x0032}
0x3bac…3bd2              Head {h00=0x0022, h01=0x0050, text=» RB WRRC20 GET NEXT CHARACTER «, t00=0x0026, t01=0x0054}
0x3bd2…3bda              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x007a}
0x3bda…3bee              Head {h00=0x0010, h01=0x0050, text=»*   SEND ETX«, t00=0x0026, t01=0x0082}
0x3bee…3bf6              Head {h00=0x0004, h01=0x0050, t00=0x0026, t01=0x0096}
0x3bf6…3c2a              Head {h00=0x0030, h01=0x0050, text=»WRRC50 CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0026, t01=0x009e}
0x3c2a…3c3c              Head {h00=0x000e, h01=0x0050, text=» SUK A4,2 «, t00=0x0026, t01=0x00d2}
0x3c3c…3c66              Head {h00=0x0026, h01=0x0050, text=» RF(NZ) WRRC60 NOT 2 LF REQUESTED «, t00=0x0026, t01=0x00e4}
0x3c66…3c8a              Head {h00=0x0020, h01=0x0050, text=» LDR A4,A2 SAVE FIRST STATUS«, t00=0x0026, t01=0x010e}
0x3c8a…3ca8              Head {h00=0x001a, h01=0x0050, text=» LDK A2,4 BLOCK LENGTH«, t00=0x0026, t01=0x0132}
0x3ca8…3cd8              Head {h00=0x002c, h01=0x0050, text=» LDK A3,POWREC LOAD WRITE RECEIPT ORDER «, t00=0x0026, t01=0x0150}
0x3cd8…3cf6              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0026, t01=0x0180}
0x3cf6…3d14              Head {h00=0x001a, h01=0x0050, text=» LDK A2,1 SET UP 1 LF «, t00=0x0027, t01=0x000e}
0x3d14…3d32              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND LF INF«, t00=0x0027, t01=0x002c}
0x3d32…3d60              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE 1 LF IN PRINTER «, t00=0x0027, t01=0x004a}
0x3d60…3d92              Head {h00=0x002e, h01=0x0050, text=» ORR A2,A4 COMBINE FIRST AND SECOND STATUS«, t00=0x0027, t01=0x0078}
0x3d92…3dbe              Head {h00=0x0028, h01=0x0050, text=»WRRC60 LDR A1,A2 GET PRINTER STATUS «, t00=0x0027, t01=0x00aa}
0x3dbe…3de4              Head {h00=0x0022, h01=0x0050, text=» ANK A1,5 TEST PRINTER STATUS «, t00=0x0027, t01=0x00d6}
0x3de4…3e04              Head {h00=0x001c, h01=0x0050, text=» RF(Z) WRRC70 NO ERRORS «, t00=0x0027, t01=0x00fc}
0x3e04…3e2a              Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 TEST PRINTER STATUS «, t00=0x0027, t01=0x011c}
0x3e2a…3e4e              Head {h00=0x0020, h01=0x0050, text=» RF(Z) WRRC80 REQUEST ERROR «, t00=0x0027, t01=0x0142}
0x3e4e…3e74              Head {h00=0x0022, h01=0x0050, text=»WRRC70 ABL LENDIS END REQUEST «, t00=0x0027, t01=0x0166}
0x3e74…3eac              Head {h00=0x0034, h01=0x0050, text=»WRRC80 ABL LENDER END REQUEST WITH REQUEST ERROR«, t00=0x0027, t01=0x018c}
0x3eac…3eb8              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0028, t01=0x0034}
0x3eb8…3ec6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x0040}
0x3ec6…3ed0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x004e}
0x3ed0…3eda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0058}
0x3eda…3efc              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 22 : CUT RECEIPT«, t00=0x0028, t01=0x0062}
0x3efc…3f06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0084}
0x3f06…3f10              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x008e}
0x3f10…3f24              Head {h00=0x0010, h01=0x0050, text=» IFT M2PRT=1«, t00=0x0028, t01=0x0098}
0x3f24…3f38              Head {h00=0x0010, h01=0x0050, text=»CUTREC EQU *«, t00=0x0028, t01=0x00ac}
0x3f38…3f56              Head {h00=0x001a, h01=0x0050, text=» LDK A2,4 BLOCK LENGTH«, t00=0x0028, t01=0x00c0}
0x3f56…3f88              Head {h00=0x002e, h01=0x0050, text=» LDK A3,POWREC SET UP WRITE RECEIPT ORDER «, t00=0x0028, t01=0x00de}
0x3f88…3fa6              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0028, t01=0x0110}
0x3fa6…3fca              Head {h00=0x0020, h01=0x0050, text=» LDK A2,6 SET UP CUT (=6 LF)«, t00=0x0028, t01=0x012e}
0x3fca…3fe6              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x0028, t01=0x0152}
0x3fe6…4014              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0028, t01=0x016e}
0x4014…403a              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 GET PRINTER STATUS «, t00=0x0029, t01=0x000c}
0x403a…4058              Head {h00=0x001a, h01=0x0050, text=» ANK A1,1 MASK STATUS «, t00=0x0029, t01=0x0032}
0x4058…407e              Head {h00=0x0022, h01=0x0050, text=»CREC70 ABL LENDIS END REQUEST «, t00=0x0029, t01=0x0050}
0x407e…408a              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0029, t01=0x0076}
0x408a…4098              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0029, t01=0x0082}
0x4098…40a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0090}
0x40a2…40ac              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x009a}
0x40ac…40d4              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 26 : PERFORATE RECEIPT«, t00=0x0029, t01=0x00a4}
0x40d4…40de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00cc}
0x40de…40e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x00d6}
0x40e8…40fc              Head {h00=0x0010, h01=0x0050, text=» IFT M2PRT=1«, t00=0x0029, t01=0x00e0}
0x40fc…4110              Head {h00=0x0010, h01=0x0050, text=»PERREC EQU *«, t00=0x0029, t01=0x00f4}
0x4110…412e              Head {h00=0x001a, h01=0x0050, text=» LDK A2,4 BLOCK LENGTH«, t00=0x0029, t01=0x0108}
0x412e…4160              Head {h00=0x002e, h01=0x0050, text=» LDK A3,POWREC SET UP WRITE RECEIPT ORDER «, t00=0x0029, t01=0x0126}
0x4160…417e              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0029, t01=0x0158}
0x417e…41a8              Head {h00=0x0026, h01=0x0050, text=» LDK A2,7 SET UP PERFORATE (=7 LF)«, t00=0x0029, t01=0x0176}
0x41a8…41c4              Head {h00=0x0018, h01=0x0050, text=» CF A5,OUT AND SEND «, t00=0x002a, t01=0x0010}
0x41c4…41f2              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x002a, t01=0x002c}
0x41f2…4218              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 GET PRINTER STATUS «, t00=0x002a, t01=0x005a}
0x4218…4236              Head {h00=0x001a, h01=0x0050, text=» ANK A1,1 MASK STATUS «, t00=0x002a, t01=0x0080}
0x4236…425c              Head {h00=0x0022, h01=0x0050, text=»PREC70 ABL LENDIS END REQUEST «, t00=0x002a, t01=0x009e}
0x425c…4268              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x002a, t01=0x00c4}
0x4268…4278              Head {h00=0x000c, h01=0x0050, text=» EJECT  «, t00=0x002a, t01=0x00d0}
0x4278…4282              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00e0}
0x4282…428c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00ea}
0x428c…42ba              Head {h00=0x002a, h01=0x0050, text=»*   ORDER 24 : SET PRINTER PARAMETERS «, t00=0x002a, t01=0x00f4}
0x42ba…42dc              Head {h00=0x001e, h01=0x0050, text=»*   CONTROL WORD CONTAINS:«, t00=0x002a, t01=0x0122}
0x42dc…4304              Head {h00=0x0024, h01=0x0050, text=»*   BIT 00    : INDICATE CHANGE «, t00=0x002a, t01=0x0144}
0x4304…4324              Head {h00=0x001c, h01=0x0050, text=»*   BIT 01-02 : NOT USD «, t00=0x002a, t01=0x016c}
0x4324…434c              Head {h00=0x0024, h01=0x0050, text=»*   BIT 03    : SMALL LETTER IND«, t00=0x002a, t01=0x018c}
0x434c…4380              Head {h00=0x0030, h01=0x0050, text=»*   BIT 04-07 : NATIONAL CHARACTER VARIATION«, t00=0x002b, t01=0x0024}
0x4380…43a0              Head {h00=0x001c, h01=0x0050, text=»*   BIT 08-15 : NOT USED«, t00=0x002b, t01=0x0058}
0x43a0…43aa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0078}
0x43aa…43b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0082}
0x43b4…43c8              Head {h00=0x0010, h01=0x0050, text=»PRTPAR EQU *«, t00=0x002b, t01=0x008c}
0x43c8…43f0              Head {h00=0x0024, h01=0x0050, text=» LD A1,ECBCW,A8 GET CONTROL WORD«, t00=0x002b, t01=0x00a0}
0x43f0…4428              Head {h00=0x0034, h01=0x0050, text=» RF(NN) PPAR10 NO NEW L/NCV SET UP IN CTRL WORD «, t00=0x002b, t01=0x00c8}
0x4428…445a              Head {h00=0x002e, h01=0x0050, text=» ST A1,DWTDEV+PP,A6 STORE NEW L/NCV IN DWT«, t00=0x002b, t01=0x0100}
0x445a…446e              Head {h00=0x0010, h01=0x0050, text=»PPAR10 EQU *«, t00=0x002b, t01=0x0132}
0x446e…448c              Head {h00=0x001a, h01=0x0050, text=» LDK A2,5 BLOCK LENGTH«, t00=0x002b, t01=0x0146}
0x448c…44c8              Head {h00=0x0038, h01=0x0050, text=» LDK A3,POPPAR LOAD PRINTER PRINTER PARAMETER ORDER «, t00=0x002b, t01=0x0164}
0x44c8…44e6              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x002c, t01=0x0010}
0x44e6…4502              Head {h00=0x0018, h01=0x0050, text=» LC A2,DWTDEV+PP,A6 «, t00=0x002c, t01=0x002e}
0x4502…4520              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND L/NCV «, t00=0x002c, t01=0x004a}
0x4520…453e              Head {h00=0x001a, h01=0x0050, text=» LC A2,DWTDEV+PP+1,A6 «, t00=0x002c, t01=0x0068}
0x453e…455c              Head {h00=0x001a, h01=0x0050, text=» CF A5,OUT SEND DUMMY «, t00=0x002c, t01=0x0086}
0x455c…458a              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x002c, t01=0x00a4}
0x458a…45b0              Head {h00=0x0022, h01=0x0050, text=» LDR A1,A2 GET PRINTER STATUS «, t00=0x002c, t01=0x00d2}
0x45b0…45d6              Head {h00=0x0022, h01=0x0050, text=» ANK A1,1 TEST PRINTER STATUS «, t00=0x002c, t01=0x00f8}
0x45d6…45fc              Head {h00=0x0022, h01=0x0050, text=»PPAR70 ABL LENDIS END REQUEST «, t00=0x002c, t01=0x011e}
0x45fc…460a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x0144}
0x460a…4614              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0152}
0x4614…4636              Head {h00=0x001e, h01=0x0050, text=»*   S U B R O U T I N E S «, t00=0x002c, t01=0x015c}
0x4636…4640              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x017e}
0x4640…464a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0188}
0x464a…4652 (45, 0, 400) Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x0004}
0x4652…465c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x000c}
0x465c…4672              Head {h00=0x0012, h01=0x0050, text=»*   O R D E R «, t00=0x002d, t01=0x0016}
0x4672…46b8              Head {h00=0x0042, h01=0x0050, text=»*   SEND START OF BLOCK CHAR TO COM. AND ORDER CODE TO PRINTER«, t00=0x002d, t01=0x002c}
0x46b8…46c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0072}
0x46c2…46d6              Head {h00=0x0010, h01=0x0050, text=»ORDER EQU * «, t00=0x002d, t01=0x007c}
0x46d6…46fa              Head {h00=0x0020, h01=0x0050, text=» CF A5,STABLK START OF BLOCK«, t00=0x002d, t01=0x0090}
0x46fa…471c              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) ERTP JMP IF ERROR «, t00=0x002d, t01=0x00b4}
0x471c…474a              Head {h00=0x002a, h01=0x0050, text=» LDK A2,RESET SEND RESET JUST IN CASE «, t00=0x002d, t01=0x00d6}
0x474a…4760              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002d, t01=0x0104}
0x4760…4782              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) ERTP JMP IF ERROR «, t00=0x002d, t01=0x011a}
0x4782…4794              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x002d, t01=0x013c}
0x4794…47b8              Head {h00=0x0020, h01=0x0050, text=» RF OUT10 SEND PRINTER ORDER«, t00=0x002d, t01=0x014e}
0x47b8…47c2              Head {h00=0x0006, h01=0x0050, text=»  «, t00=0x002d, t01=0x0172}
0x47c2…47ca              Head {h00=0x0004, h01=0x0050, t00=0x002d, t01=0x017c}
0x47ca…47d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0184}
0x47d4…47ee              Head {h00=0x0016, h01=0x0050, text=»*   E X E C U T E «, t00=0x002d, t01=0x018e}
0x47ee…483a              Head {h00=0x0048, h01=0x0050, text=»*   SEND EXECUTE CHAR (/03) TO PRINTER AND END OF BLOCK CHAR TO COM.«, t00=0x002e, t01=0x0018}
0x483a…4844              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0064}
0x4844…4858              Head {h00=0x0010, h01=0x0050, text=»EXECUT EQU *«, t00=0x002e, t01=0x006e}
0x4858…4888              Head {h00=0x002c, h01=0x0050, text=» LDK A2,ETX SEND EXECUTE CHAR TO PRINTER«, t00=0x002e, t01=0x0082}
0x4888…489e              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002e, t01=0x00b2}
0x489e…48c0              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) ERTP JMP IF ERROR «, t00=0x002e, t01=0x00c8}
0x48c0…48e2              Head {h00=0x001e, h01=0x0050, text=» CF A5,ENDBLK END OF BLOCK«, t00=0x002e, t01=0x00ea}
0x48e2…4904              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) ERTP JMP IF ERROR «, t00=0x002e, t01=0x010c}
0x4904…492e              Head {h00=0x0026, h01=0x0050, text=» CF A5,INPUT GET STATUS CHARACTER «, t00=0x002e, t01=0x012e}
0x492e…495e              Head {h00=0x002c, h01=0x0050, text=»EXE10 SC A2,DWTDEV,A6 SAVE IN DWT STATUS«, t00=0x002e, t01=0x0158}
0x495e…496e              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002e, t01=0x0188}
0x496e…4978              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0008}
0x4978…498a              Head {h00=0x000e, h01=0x0050, text=»*   0 U T «, t00=0x002f, t01=0x0012}
0x498a…49aa              Head {h00=0x001c, h01=0x0050, text=»*   ADD CONST. AND SEND «, t00=0x002f, t01=0x0024}
0x49aa…49b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x0044}
0x49b4…49c6              Head {h00=0x000e, h01=0x0050, text=»OUT EQU * «, t00=0x002f, t01=0x004e}
0x49c6…49da              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x002f, t01=0x0060}
0x49da…49ee              Head {h00=0x0010, h01=0x0050, text=» ADK A2,/10 «, t00=0x002f, t01=0x0074}
0x49ee…4a02              Head {h00=0x0010, h01=0x0050, text=» CWK A2,/7F «, t00=0x002f, t01=0x0088}
0x4a02…4a36              Head {h00=0x0030, h01=0x0050, text=» RF(NG) OUT10 CHARACTER NOT GREATER THAN /7F«, t00=0x002f, t01=0x009c}
0x4a36…4a64              Head {h00=0x002a, h01=0x0050, text=» LDK A2,/7F IF GREATER SET CHAR TO /7F«, t00=0x002f, t01=0x00d0}
0x4a64…4a78              Head {h00=0x0010, h01=0x0050, text=»OUT10 EQU * «, t00=0x002f, t01=0x00fe}
0x4a78…4a8e              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x002f, t01=0x0112}
0x4a8e…4ab0              Head {h00=0x001e, h01=0x0050, text=» RF(NZ) ERTP JMP IF ERROR «, t00=0x002f, t01=0x0128}
0x4ab0…4ac0              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x002f, t01=0x014a}
0x4ac0…4aca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002f, t01=0x015a}
0x4aca…4afe              Head {h00=0x0030, h01=0x0050, text=»*   ERROR ROUTINE FOR STABLK,OUTPUT & ENDBLK«, t00=0x002f, t01=0x0164}
0x4afe…4b08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0008}
0x4b08…4b12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0012}
0x4b12…4b24              Head {h00=0x000e, h01=0x0050, text=»ERTP EQU *«, t00=0x0030, t01=0x001c}
0x4b24…4b52              Head {h00=0x002a, h01=0x0050, text=» ANK A1,/12 OUTP.ERROR OR LRC-ERROR ? «, t00=0x0030, t01=0x002e}
0x4b52…4b6a              Head {h00=0x0014, h01=0x0050, text=» RF(Z) ERTP10 NO«, t00=0x0030, t01=0x005c}
0x4b6a…4b8c              Head {h00=0x001e, h01=0x0050, text=» LDKL A5,DWTSB2 STACK BASE«, t00=0x0030, t01=0x0074}
0x4b8c…4bae              Head {h00=0x001e, h01=0x0050, text=» ADR A5,A6 ADD DWT ADDRESS«, t00=0x0030, t01=0x0096}
0x4bae…4bca              Head {h00=0x0018, h01=0x0050, text=» RF RCTP DO RECOVERY«, t00=0x0030, t01=0x00b8}
0x4bca…4bde              Head {h00=0x0010, h01=0x0050, text=»ERTP10 EQU *«, t00=0x0030, t01=0x00d4}
0x4bde…4bf4              Head {h00=0x0012, h01=0x0050, text=» IFF REQEND=1 «, t00=0x0030, t01=0x00e8}
0x4bf4…4c20              Head {h00=0x0028, h01=0x0050, text=» LDR A7,A7 TEST ORDER OR RECOVERY ? «, t00=0x0030, t01=0x00fe}
0x4c20…4c3a              Head {h00=0x0016, h01=0x0050, text=» ABL(NZ) LDISP NO «, t00=0x0030, t01=0x012a}
0x4c3a…4c46              Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0030, t01=0x0144}
0x4c46…4c68              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 SET NOT OPERABLE«, t00=0x0030, t01=0x0150}
0x4c68…4c88              Head {h00=0x001c, h01=0x0050, text=» ABL LENDIS END OF REQ. «, t00=0x0030, t01=0x0172}
0x4c88…4c96 (49, 0, 400) Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0031, t01=0x0004}
0x4c96…4ca0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0012}
0x4ca0…4cb2              Head {h00=0x000e, h01=0x0050, text=»* R C T P «, t00=0x0031, t01=0x001c}
0x4cb2…4cbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x002e}
0x4cbc…4cf2              Head {h00=0x0032, h01=0x0050, text=»* THIS IS THE RECOVERY ROUTINE FOR THE DRIVER «, t00=0x0031, t01=0x0038}
0x4cf2…4d24              Head {h00=0x002e, h01=0x0050, text=»* DWT ORDER IS RESET IF NO REQUEST RUNING «, t00=0x0031, t01=0x006e}
0x4d24…4d3e              Head {h00=0x0016, h01=0x0050, text=»* DWT IS SET BUSY «, t00=0x0031, t01=0x00a0}
0x4d3e…4d82              Head {h00=0x0040, h01=0x0050, text=»* AFTER PROGRAM LOADING SYSTEM PARAMETERS ARE SET UP IN DWT «, t00=0x0031, t01=0x00ba}
0x4d82…4dbc              Head {h00=0x0036, h01=0x0050, text=»* TEST STRING IS SENT TO PRINTER TO GET SYNCRONISM«, t00=0x0031, t01=0x00fe}
0x4dbc…4e00              Head {h00=0x0040, h01=0x0050, text=»* A FIXED FORMATTED RECOVERY STRING IS THEN SENT TO PRINTER «, t00=0x0031, t01=0x0138}
0x4e00…4e44              Head {h00=0x0040, h01=0x0050, text=»* THIS STRING CONTAINS THE ACTUAL PARAMETERS AND THE ACTUAL «, t00=0x0031, t01=0x017c}
0x4e44…4e66              Head {h00=0x001e, h01=0x0050, text=»* STATUS FOR THE PRINTER. «, t00=0x0032, t01=0x0030}
0x4e66…4e96              Head {h00=0x002c, h01=0x0050, text=»* A RUNING REQUEST IS AT LAST REPEATED. «, t00=0x0032, t01=0x0052}
0x4e96…4ea0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0082}
0x4ea0…4eb2              Head {h00=0x000e, h01=0x0050, text=»RCTP EQU *«, t00=0x0032, t01=0x008c}
0x4eb2…4eda              Head {h00=0x0024, h01=0x0050, text=» LD A1,DWTECB,A6 GET ECB ADDRESS«, t00=0x0032, t01=0x009e}
0x4eda…4f00              Head {h00=0x0022, h01=0x0050, text=» RF(NZ) RCTP02 REQUEST RUNNING«, t00=0x0032, t01=0x00c6}
0x4f00…4f1e              Head {h00=0x001a, h01=0x0050, text=» LDK A7,0 RESET ORDER «, t00=0x0032, t01=0x00ec}
0x4f1e…4f32              Head {h00=0x0010, h01=0x0050, text=»RCTP02 EQU *«, t00=0x0032, t01=0x010a}
0x4f32…4f5e              Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/7FFF INDICATE DEVICE BUSY «, t00=0x0032, t01=0x011e}
0x4f5e…4f76              Head {h00=0x0014, h01=0x0050, text=» ANS A1,DWTST,A6«, t00=0x0032, t01=0x014a}
0x4f76…4f82              Head {h00=0x0008, h01=0x0050, text=»    «, t00=0x0032, t01=0x0162}
0x4f82…4f9e              Head {h00=0x0018, h01=0x0050, text=» LD A1,DWTDEV+PP,A6 «, t00=0x0032, t01=0x016e}
0x4f9e…4fd0              Head {h00=0x002e, h01=0x0050, text=» RF(N) RCTP08 NOT SYSTEM START UP RECOVERY«, t00=0x0032, t01=0x018a}
0x4fd0…4ffc              Head {h00=0x0028, h01=0x0050, text=» LD A3,STDPP SET UP ST PR PAR IN DWT«, t00=0x0033, t01=0x002c}
0x4ffc…5018              Head {h00=0x0018, h01=0x0050, text=» ST A3,DWTDEV+PP,A6 «, t00=0x0033, t01=0x0058}
0x5018…502c              Head {h00=0x0010, h01=0x0050, text=»RCTP08 EQU *«, t00=0x0033, t01=0x0074}
0x502c…504a              Head {h00=0x001a, h01=0x0050, text=» LDK A2,3 BLOCK LENGTH«, t00=0x0033, t01=0x0088}
0x504a…5080              Head {h00=0x0032, h01=0x0050, text=» LDK A3,POTEST LOAD PRINTER ORDER TEST STATUS «, t00=0x0033, t01=0x00a6}
0x5080…509e              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0033, t01=0x00dc}
0x509e…50cc              Head {h00=0x002a, h01=0x0050, text=» CF A5,EXECUT EXECUTE ORDER IN PRINTER«, t00=0x0033, t01=0x00fa}
0x50cc…50e0              Head {h00=0x0010, h01=0x0050, text=»RCTP10 EQU *«, t00=0x0033, t01=0x0128}
0x50e0…50fe              Head {h00=0x001a, h01=0x0050, text=» LDK A2,5 BLOCK LENGTH«, t00=0x0033, t01=0x013c}
0x50fe…5132              Head {h00=0x0030, h01=0x0050, text=» LDK A3,POPPAR SET UP PRINTER RECOVERY ORDER«, t00=0x0033, t01=0x015a}
0x5132…5150              Head {h00=0x001a, h01=0x0050, text=» CF A5,ORDER AND SEND «, t00=0x0033, t01=0x018e}
0x5150…5182              Head {h00=0x002e, h01=0x0050, text=» LD A3,DWTDEV+PP,A6 GET PRINTER PARAMETERS«, t00=0x0034, t01=0x001c}
0x5182…519a              Head {h00=0x0014, h01=0x0050, text=»RCTP20 ECR A2,A3«, t00=0x0034, t01=0x004e}
0x519a…51bc              Head {h00=0x001e, h01=0x0050, text=» CF A5,OUT SEND LFCTRL/NCV«, t00=0x0034, t01=0x0066}
0x51bc…51ce              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A3«, t00=0x0034, t01=0x0088}
0x51ce…51f0              Head {h00=0x001e, h01=0x0050, text=» CF A5,OUT SEND DUMMY CODE«, t00=0x0034, t01=0x009a}
0x51f0…5228              Head {h00=0x0034, h01=0x0050, text=»RCTP60 CF A5,EXECUT EXECUTE RECOVERY IN PRINTER «, t00=0x0034, t01=0x00bc}
0x5228…5246              Head {h00=0x001a, h01=0x0050, text=»RCTP70 LD A1,DWTECB,A6«, t00=0x0034, t01=0x00f4}
0x5246…526c              Head {h00=0x0022, h01=0x0050, text=» ABL(Z) LENDIS REQ NOT RUNNING«, t00=0x0034, t01=0x0112}
0x526c…5298              Head {h00=0x0028, h01=0x0050, text=» LDKL A1,/100 IND RECOVERY EXECUTED «, t00=0x0034, t01=0x0138}
0x5298…52be              Head {h00=0x0022, h01=0x0050, text=» ST A1,ECBRC,A8 IN RETURN CODE«, t00=0x0034, t01=0x0164}
0x52be…52e0              Head {h00=0x001e, h01=0x0050, text=» ABL ACT005 REPEAT REQUEST«, t00=0x0034, t01=0x018a}
0x52e0…52ec              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0035, t01=0x001c}
0x52ec…52f0              Head {h00=0x4004, h01=0x0000}
0x52f0…52f4              00 35 00 28                                                                                                                                                                                                                                       ┆ 5 (┆
0x52f4…52fc (54, 1, 8)   20 04 00 00 00 36 00 04                                                                                                                                                                                                                           ┆     6  ┆
0x52fc…5300 (55, 0, 4)   18 f0 18 f8                                                                                                                                                                                                                                       ┆    ┆
0x5300…5350 (56, 0, 400) 00 3e 00 40 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 20 44 52 54 50 30 33 20 20 20 20 20 52 45 4c 20 31 31 2e 30 20 38 31 2d 30 36 2d 31 37 20 38 37 30 31 30 35 30 34 31 31 30 30 00 00 00 04 00 0c 00 08 01 03 a4 54 50 41 44 33 00 00   ┆ > @        IDENT    DRTP03     REL 11.0 81-06-17 870105041100           TPAD3  ┆
0x5350…53a0              00 46 00 0e 00 0a 05 04 bc 54 50 41 44 33 00 04 00 00 00 56 00 2c 00 28 03 13 00 00 00 01 00 00 00 7e 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 06 00 00 00 24 00 00 00 00 00 68 00 2c 00 28 03 13 00 00 00 21 00 00   ┆ F       TPAD3     V , (         ~                           $     h , (     !  ┆
0x53a0…53f0              ff ff 00 00 00 00 00 06 00 00 00 0b 00 00 00 38 00 00 00 37 00 00 00 24 00 00 00 27 00 00 ff ff 00 00 00 98 00 0c 00 08 02 03 a2 44 57 54 4f 52 00 00 00 c8 00 0e 00 0a 02 04 c2 44 57 54 44 45 56 00 00 00 00 d8 00 2a 00 26 03 12 00 00 00 41   ┆               8   7   $   '               DWTOR           DWTDEV      * &     A┆
0x53f0…5440              08 40 ff ff ff ff 80 46 e2 58 00 00 00 02 22 03 3a 46 83 58 00 00 00 04 a3 20 ff 1f ab 08 83 59 00 00 00 ea 00 0e 00 0a 02 04 c2 4c 45 4e 44 45 52 00 00 00 01 18 00 2c 00 28 03 13 00 80 00 5b 90 10 00 00 00 04 81 58 00 00 00 04 21 c0 39 65   ┆ @     F X    " :F X           Y           LENDER      , (     [       X    ! 9e┆
0x5440…5490              82 44 00 0c 83 28 8a 20 00 00 00 06 9b 1c 50 00 12 04 00 00 01 2a 00 2c 00 28 03 13 00 00 00 75 00 00 5f 0e 8f 48 00 02 a0 43 00 0a 02 03 03 00 f5 21 00 00 f5 21 00 00 81 08 21 15 50 00 02 03 03 05 00 00 01 5a 00 2c 00 28 03 13 00 00 00 95   ┆ D   (        P      * , (     u  _  H   C       !   !    ! P        Z , (      ┆
0x5490…54e0 (57, 0, 400) 00 20 f5 21 00 00 f5 21 00 00 e2 43 00 0b 01 01 57 00 81 08 83 58 00 00 00 04 23 c0 54 00 21 22 50 00 00 00 01 8a 00 0e 00 0a 02 04 c2 4c 45 4e 44 49 53 00 00 01 00 2a 00 2c 00 28 03 13 00 00 00 b3 00 48 21 02 5c 26 81 20 20 00 57 00 21 40   ┆   !   !   C    W    X    # T !"P            LENDIS    * , (       H!  &    W !@┆
0x54e0…5530              50 00 01 20 8f 20 00 00 00 08 81 58 00 00 00 04 21 20 54 00 00 01 00 3c 00 2c 00 28 03 13 00 00 00 cf 00 00 81 42 00 04 19 02 52 00 82 42 00 02 e2 48 00 01 22 ff 1a 2b 50 00 04 02 1a 05 50 00 04 01 1a 01 00 01 00 6c 00 2c 00 28 03 13 00 00   ┆P          X    ! T    < , (         B    R  B   H  "  +P     P        l , (    ┆
0x5530…5580              00 ef 00 02 54 00 04 03 02 04 03 0d f5 21 00 00 82 10 f5 21 00 00 f5 21 00 00 22 07 54 00 a0 59 00 04 00 04 00 01 00 9c 00 0e 00 0a 02 04 c2 47 45 54 43 48 52 00 00 01 00 cc 00 2a 00 26 03 12 00 00 01 0d 20 90 01 20 a9 59 00 00 00 04 82 42   ┆    T        !     !   !  " T  Y               GETCHR      * &           Y     B┆
0x5580…55d0              00 04 12 02 e1 58 00 05 00 04 e1 59 00 04 00 04 03 02 f7 a1 00 01 00 de 00 2c 00 28 03 13 00 00 01 25 80 02 00 00 00 0a 81 04 50 00 03 0d f5 21 00 00 02 00 f5 21 00 00 84 20 01 00 03 02 f7 a1 00 00 00 0a 00 01 01 0c 00 2c 00 28 03 13 00 00   ┆     X     Y             , (     %        P    !     !                   , (    ┆
0x55d0…5620              01 41 00 00 81 04 50 00 81 08 19 10 5a 0e 50 00 19 09 54 00 b4 20 03 00 57 00 19 07 52 00 19 5f 58 22 52 00 00 01 01 3c 00 0e 00 0a 02 04 c2 4f 55 54 50 55 54 00 00 01 01 6c 00 2c 00 28 03 13 00 00 01 61 00 04 19 2f 50 00 f5 21 00 00 81 04   ┆ A    P     Z P   T     W   R  _X"R    <       OUTPUT    l , (     a   /P  !    ┆
0x5620…5670 (58, 0, 400) 50 00 01 04 a9 43 00 08 5f 38 02 0e 57 00 94 59 00 04 00 04 f5 21 00 01 01 7e 00 2c 00 28 03 13 00 00 01 7f 80 00 00 00 00 0c 8c 20 00 00 5f 4a f5 21 00 00 81 08 21 27 50 00 21 03 54 00 22 04 54 00 81 20 20 00 00 02 00 1e 00 2a 00 26 03 12   ┆P    C  _8  W  Y     !   ~ , (                _J !    !'P ! T " T          * &  ┆
0x5670…56c0              00 00 01 9d 48 48 e3 58 00 04 00 04 e3 59 00 05 00 04 57 00 01 01 8f 20 00 00 00 08 8f 20 00 00 00 06 e4 58 00 02 00 4e 00 2c 00 28 03 13 00 00 01 b3 80 04 00 09 00 04 24 ff 81 42 00 04 19 02 52 00 82 42 00 02 e2 48 00 01 22 ff e3 58 00 07   ┆    HH X     Y    W                X   N , (            $  B    R  B   H  "  X  ┆
0x56c0…5710              00 04 1a 2b 00 02 00 7c 00 2c 00 28 03 13 00 00 01 cf 00 22 50 00 03 00 14 02 1a 05 50 00 1c 01 1a 01 54 00 04 01 ec 59 00 0c 00 04 51 00 e3 59 00 06 00 04 00 02 00 ac 00 2c 00 28 03 13 00 00 01 eb 40 00 e4 59 00 08 00 04 84 10 50 00 82 42   ┆   +   | , (       "P       P     T    Y    Q  Y         , (      @  Y      P  B┆
0x5710…5760              00 04 12 02 03 09 f5 21 00 00 82 10 f5 21 00 00 84 20 01 00 00 02 00 dc 00 2c 00 28 03 13 00 00 02 09 20 00 03 02 f7 a1 00 00 00 0a 81 04 50 00 81 08 19 10 5a 0e 50 00 19 09 54 00 b4 20 03 00 57 00 19 07 00 02 01 0c 00 2c 00 28 03 13 00 00   ┆       !     !           , (                  P     Z P   T     W        , (    ┆
0x5760…57b0              02 27 00 00 52 00 19 5f 52 00 58 24 19 2f 50 00 f5 21 00 00 81 04 50 00 01 04 a9 43 00 08 5f 38 02 0e 57 00 00 02 01 3c 00 2c 00 28 03 13 00 00 02 47 48 00 94 59 00 06 00 04 f5 21 00 00 00 0c 8c 20 00 00 5f 4a f5 21 00 00 81 08 21 45 50 00   ┆ '  R  _R X$ /P  !    P    C  _8  W    < , (     GH  Y     !        _J !    !EP ┆
0x57b0…5800 (59, 0, 400) 21 01 54 00 00 02 01 6c 00 2a 00 26 03 12 00 00 02 63 10 08 22 04 54 00 e1 58 00 0a 00 04 21 78 5c be 01 20 03 00 04 00 57 00 e3 58 00 08 00 04 e4 58 00 03 00 0c 00 2a 00 26 03 12 00 00 02 7d 92 08 00 06 00 04 e3 59 00 09 00 04 e4 59 00 07   ┆! T    l * &     c  " T  X    !x        W  X     X     * &     }       Y     Y  ┆
0x5800…5850              00 04 23 ff 83 43 00 0a 8f 20 00 00 00 08 e3 58 00 03 00 3a 00 2c 00 28 03 13 00 00 02 93 82 08 00 07 00 04 23 ff 83 43 00 0a 8f 20 00 00 00 06 84 42 00 0a 50 00 ec 59 00 0c 00 04 51 00 e4 59 00 03 00 68 00 2c 00 28 03 13 00 00 02 ad 80 00   ┆  #  C         X   : , (            #  C         B  P  Y    Q  Y   h , (        ┆
0x5850…58a0              00 08 00 04 02 04 03 0b f5 21 00 00 82 10 f5 21 00 00 f5 21 00 00 81 08 21 45 50 00 21 01 54 00 00 03 00 98 00 2c 00 28 03 13 00 00 02 cb 10 24 22 04 54 00 e1 58 00 0a 00 04 21 78 58 38 01 20 04 00 e4 59 00 09 00 04 a0 59 00 06 00 04 8f 20   ┆         !     !   !    !EP ! T      , (       $" T  X    !xX8     Y     Y      ┆
0x58a0…58f0              00 03 00 c8 00 2c 00 28 03 13 00 00 02 e5 90 04 00 00 00 08 8f 20 00 00 00 06 19 02 52 00 19 0a 51 00 22 ff ac 08 02 1b f5 21 00 00 00 0c 82 10 00 03 00 f8 00 0e 00 0a 02 04 c2 54 4c 54 50 30 33 00 00 03 01 28 00 2c 00 28 03 13 00 00 02 ff   ┆     , (                    R   Q "      !                 TLTP03    ( , (      ┆
0x58f0…5940              00 02 22 ff 1a 6f a4 20 ff 00 01 00 f0 34 81 42 00 0a 11 01 84 04 3c 43 94 04 94 04 ec 20 00 00 00 0e 00 03 01 3a 00 0e 00 0a 02 04 c2 44 54 54 50 30 33 00 00 03 01 6a 00 2c 00 28 03 13 00 00 03 1d 10 84 51 00 1c 0a e1 58 00 09 00 04 21 ff   ┆  "  o       4 B      <C             :       DTTP03    j , (        Q    X    ! ┆
0x5940…5990 (60, 0, 400) 50 00 e1 50 00 00 00 10 21 04 50 00 84 59 00 0a 00 04 02 13 00 03 01 7c 00 2a 00 26 03 12 00 00 03 37 00 00 03 07 f5 21 00 00 03 0a e2 30 f5 21 00 00 14 01 1b 01 5c 0c f5 21 00 00 81 08 21 01 8f 20 00 04 00 1c 00 0c 00 08 02 03 a2 4c 44 49   ┆P  P    ! P  Y         | * &     7     !     0 !         !    !              LDI┆
0x5990…59e0              53 50 00 04 00 4a 00 2c 00 28 03 13 00 00 03 55 91 20 00 00 00 08 8f 20 00 00 00 06 02 00 84 58 00 02 00 04 8e 20 00 00 00 12 81 42 00 0a 56 00 e2 04 00 04 00 5a 00 2a 00 26 03 12 00 00 03 6d 20 00 22 ff e2 59 00 02 00 04 02 00 83 04 23 f0   ┆SP   J , (     U               X           B  V      Z * &     m  "  Y        # ┆
0x59e0…5a30              54 00 83 10 23 f0 aa 0c b3 10 23 f0 50 00 a0 59 00 04 00 8a 00 2a 00 26 03 12 00 00 03 89 80 08 00 04 00 04 83 04 23 0f 54 00 83 10 23 0f aa 0c b3 10 23 0f 50 00 a0 59 00 06 00 04 e2 59 00 04 00 b8 00 2c 00 28 03 13 00 00 03 a3 81 08 00 03   ┆T   #     # P  Y     * &              # T   #     # P  Y     Y     , (          ┆
0x5a30…5a80              00 04 02 05 03 04 f5 21 00 00 e2 58 00 02 00 04 f5 21 00 00 e2 58 00 03 00 04 f5 21 00 00 00 04 00 e6 00 2a 00 26 03 12 00 00 03 bd 04 00 f5 21 00 00 81 08 21 01 8f 20 00 00 00 08 81 42 00 0a 11 01 84 04 3c 43 94 04 94 04 ec 20 00 04 01 16   ┆       !   X     !   X     !       * &         !    !        B      <C          ┆
0x5a80…5ad0              00 2c 00 28 03 13 00 00 03 d9 80 10 00 00 00 0e 51 00 1c 0a 83 42 00 02 f5 21 00 00 19 07 51 00 e2 51 00 00 00 10 f5 21 00 00 3a 4b 00 04 01 44 00 2c 00 28 03 13 00 00 03 f5 40 00 aa 51 00 00 00 10 f5 21 00 00 1a 0f 51 00 f5 21 00 00 1a 00   ┆ , (            Q    B   !    Q  Q     !  :K   D , (      @  Q     !    Q  !    ┆

Reduced view