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

⟦03aef631a⟧

    Length: 27550 (0x6b9e)
    Notes: pts_type(SC)
    Names: »LOGOP.SC«

Derivation

└─⟦8ac270cab⟧ Bits:30009705 Philips computer tape "LINSIM8-2"
    └─⟦this⟧ »LINSIM82/LOGOP.SC« 
└─⟦fce1dcf99⟧ Bits:30009704 Philips computer tape "KMD15"
    └─⟦this⟧ »LINSIM/LOGOP.SC« 

PTS(SC)

	IDENT LOGOP  	REL 1.1 82-09-28  870150040110 
			#1 
			UPDATE #0 77.01.26 JES 
* 
* 
*	CC SIMULATION TOOL
* 
*	OPERATOR CONTROL
* 
*	PROGRAMMER: PAN 
* 
******************************************************* 
* 
*	THIS MODULE COMMUNICATES WITH 
*	THE OPERATOR
* 
*	ALLOWED INPUT KEYS: 
*	
*	O: OPEN RECEIVER
* 
*	I: INSERT IN BUFFER SPECIFIED BY FOLLOWING HEXDEC NUMBER
*	   THEN FILL THE BUFFER WITH CHARACTERS 
*   	   /: THE TWO FOLLOWING CHARACTERS FORM AN ASCII CHARACTER 
*	   /83 OR /97 ARE AUTOMATICALLY FOLLOWED BY LRC CALCULATED
*	        FROM FIRST STX OR SOH 
*	   TO DELETE LAST CHARACTER PRESS: FEL
*	   *: END OF BUFFER 
*           CR:=* 
* 
*	L: LIST BUFFER
*	   *: ALL BUFFERS 
*           CR:=* 
*	   <HEXDEC>: ONE BUFFER 
* 
*	<HEXDEC>: PUT THIS BUFFER IN TRANSMITT QUEUE
*   	   (TIME OUT FOR RESPONSE MAY BE SPECIFIED AFTER:
*	    WITH UP TO TWO HEXDEC CHARACTERS) 
*	   N,: NEW BUFFER IN QUEUE
*	   SEND: TRANSMITT THE BUFFER QUEUE 
*           CR:=SEND
*	L: SEND CONTINUOUS
* 
*	R: RESET RECEIV BUFFER
* 
*        W: WRITE BUFFERS ON CASSETTE 
*        S: READ BUFFERS FROM CASSETTE
*        X: SHIFT IDLE MODE OF TRANSMITTER
*           CARRIER OFF/ MARK HOLD
*	H: STOP CONTINUOUS SENDING
*	
*	P: DISABLE OR ENABLE PRINTER
* 
**************************************************************
	EJECT
* 
* 
* 
	ENTRY	CODE 
	ENTRY	ASTART 
	ENTRY	ETX
	ENTRY	ETB
	ENTRY	SYN
	ENTRY	PRFLAG	
* 
* 
	EXTRN	TAB1	CHAR TABLE 1
	EXTRN	TAB2	CHAR TABLE 2
	EXTRN	TAB3 
	EXTRN	TAB4 
	EXTRN	AREA	TRANSMIT AREAS
	EXTRN	LENGTH	TOTAL INDIVIDUAL AREA LENGTH
	EXTRN	TRQ	TRANSMIT QUEUE 
	EXTRN	TRQE	END OF TRANSMIT QUEUE 
	EXTRN	LOGIN	LOG INPUT TASK START ADDRESS 
	EXTRN	WRITE	WRITE TASK ACTIVATION
	EXTRN	WRECB	WRITE ECB
	EXTRN	PRPOOL	OCCUPIE PRINTER BUFFER POOL 
	EXTRN	TEXT1
	EXTRN	TEXT2	***CASSETTE ERROR*** 
	EXTRN	TEXT3	***BUFFERS DUMPED ON CASSETTE*** 
	EXTRN	TEXT4	***BUFFERS LOADED*** 
	EXTRN	ASTOEB 
	EXTRN	CRCCAL 
* 
* 
*	EQUATES 
* 
* 
SOH	EQU	/01 
STX	EQU	/02 
ECBBA	EQU	2 
ECBRL	EQU	4 
ECBRC	EQU	8 
ECBCW	EQU	10
* 
* 
	RES	20	STACK FOR A14 
STB	EQU	*-2 
PROCCB	DATA	0	ADDRESS TO PRINTER OCCUPIED BUFFFER 
CODE	DATA	0	0 = ASCII , 1 = EBCDIC
XBCC	DATA	0	SWITCH FOR BCC ACCUMULATION 
SYN	DATA	0
ETB	DATA	0
ETX	DATA	0
HEXCHA	DATA	0 
	EJECT
* 
* 
*	START LOOP TEST TOOL
* 
* 
ASTART	EQU	*
	CM	PROCCB	RELEASE PRINTER BUFFER 
ASTA20	EQU	*
	LDK	A1,/80 
	SC	A1,WRECB	SET WRITE ECB NOT BUSY 
	LDKL	A7,'OP' 
	LKM
	DATA	-4,OPCTRL	ACTIVATE OPERATOR CONTROL TASK
	LDKL	A7,'IN' 
	LKM
	DATA	-4,LOGIN	ACTIVATE LOG TASK
	LKM
	DATA	3 
	EJECT
* 
* 
*	OPERATOR CONTROL TASK 
* 
* 
OPCTRL	EQU	*
	LDKL	A14,STB 
	LDK	A7,' ' 
	CF	A14,OCCPR	OCCUPIE PRINTER 
OPCT10	EQU	*
	CF	A14,CRLF
	LDKL	A2,TEXT1
	CF	A14,PRTXT 
	CF	A14,READE	READ E OR A 
	DATA	KT050,FT050 
	LDK	A7,'?' 
	CF	A14,PRCH	INVALID KEY
	RB	OPCT10	TRY AGAIN
* 
* 
KT050	DATA	/0241,'E'
FT050	DATA	OPCT20,OPCT30
* 
* 
	EJECT
OPCT20	EQU	*
	CM	CODE
	LDK	A1,/16 
	ST	A1,SYN
	LDK	A1,/97 
	ST	A1,ETB
	LDK	A1,/83 
	ST	A1,ETX
	RF	OPCT40
OPCT30	EQU	*
	IM	CODE
	LDK	A1,/32 
	ST	A1,SYN
	LDK	A1,/26 
	ST	A1,ETB
	LDK	A1,/03 
	ST	A1,ETX
OPCT40	EQU	*
	CF	A14,CRLF
	LDKL	A8,CTECB
	LDK	A7,/84 
	LD	A3,SYN
	ST	A3,ECBBA,A8	STORE SYNCPATTERN 
	LDK	A1,5 
	ST	A1,ECBCW,A8 
	LKM
	DATA	1	TRANSFER SYNCPATTERN
	RF	OPCONT
	EJECT
* 
*	PRINT TEXT
* 
PRTXT	EQU	* 
	LDR*	A3,A2	GET LENGTH
	ST	A2,PRXECB+2 
	ADK	A3,2 
	ST	A3,PRXECB+4 
	LDK	A7,/86 
	LDKL	A8,PRXECB 
	LKM
	DATA	1	STANDARD WRITE
	CF	A14,CRLF
	RTN	A14
* 
* 
PRXECB	DATA	/31,0,0,0,0,0 
* 
* 
	EJECT
OPCONT	EQU	*
	LD	A8,PROCCB	GET BUFFER ADDRESS
	RF(Z)	OPCO10	NO BUFFER 
	LKM
	DATA	-8,PRPOOL	RELEASE PRINTER 
	CM	PROCCB
OPCO10	EQU	*
	LDKL	A14,STB 
	CF	A14,CRLF
	CF	A14,READ	READ COMMAND 
	DATA	KT100,FT100 
	CF	A14,HEXCH 
	ABL(Z)	QT	QUEUE AREA FOR TRANSM. 
	EJECT
* 
* 
*   TYPE: ? 
* 
ERRORA	EQU	*
	CF	A14,OCCPR	OCCUPIE PRINTER 
ERROR	EQU	* 
	LDKL	A14,STB	LOAD STACK BASE 
	LDK	A7,'?'	INVALID KEY 
	CF	A14,PRCH	PRINT '?'
	RB	OPCONT
* 
* 
KT100	DATA	/0949,'LORWSXHP'	
FT100	DATA	INPUT,LIST,OPEN,RESET,WRTC,RDTC,IDLE,STPCON
	DATA	PRTCON	 
*	
*	PRINTER CONTROL 
*	
PRTCON	EQU	*	 
	LD	A1,PRFLAG	GET THE PRINTER FLAG
	RF(Z)	PRTC05	NOT SET, SET IT	
	CM	PRFLAG	SET, CLEAR IT	 
	RB	OPCONT	 
PRTC05	EQU	*	 
	LDK	A1,'P'	PUT A P IN THE FLAG	
	ST	A1,PRFLAG	
	RB	OPCONT	 
PRFLAG	EQU	*	 
	DATA	0	
	EJECT
* 
* 
*	INPUT TO TRANSMIT BUFFER
* 
*	A9 =LRC 
*	A10=AREA POINTER
*	A11=CHAR COUNTER FOR CURRENT LINE 
* 
* 
INPUT	EQU	* 
	CF	A14,OCCPR	OCCUPIE PRINTER 
	CF	A14,PRSPAC	SPACE
	CF	A14,READE	READ AREA NUMBER
	DATA	0 
	DATA	FT200 
FT200	EQU	* 
	CF	A14,HEXCH 
	RB(NZ)	ERROR 
IN050	EQU	* 
	LDKL	A10,AREA	COMPUT E AREA BASE 
IN100	SUK	A7,1
	RF(N)	IN120
	ADKL	A10,LENGTH
	RB	IN100 
IN120	LDR	A12,A10	SAVE AREA BASE
	CF	A14,CRLF
	ADKL	A10,2	ADJUST POINTER
	LDKL	A11,0 
	LDK	A5,0	RESET INDEX 
	SUR	A9,A9	RESET LRC
	CM	XBCC
	EJECT
* 
* 
*	READ INPUT CHAR 
* 
* 
IN200	CF	A14,READE
	DATA	KT300,FT300 
	CM	HEXCHA
	CF	A14,ITAB1	SEARCH IN TABLE 1 
	LDR	A1,A1
	RB(NZ)	ERROR	NOT FOUND 
IN230	CWK	A11,/70 
	RB(NG)	IN200	LINE NOT FULL 
	CF	A14,CRLF	NEW LINE 
	RB	IN200 
KT300	DATA	/042A,/0D2F,/2300	'*',CR,'/','#' 
FT300	DATA	IN900,IN900,IN800,IN700
	EJECT
* 
*   BACK-SPACE
* 
* 
IN700	SUK	A5,1
	RF(N)	IN710	BUFFER START 
	SUKL	A10,1 
	RB	IN200 
IN710	LDK	A5,0
	RB	IN200 
	EJECT
* 
* 
*	HEXADECIMAL INPUT 
* 
* 
IN800	CF	A14,RDHEX	READ HEXADECIMAL 
	LDR	A6,A7	SAVE FIRST DIGIT 
	SLL	A6,4 
	CF	A14,RDHEX	READ 2ND DIGIT
	IM	HEXCHA
	ADR	A7,A6
	CF	A14,STORE	STORE IT
	CF	A14,PRSPAC	SPACE
	RB	IN230 
* 
* 
*	END OF INPUT
* 
* 
IN900	LDKL	A7,/FF 
	CF	A14,STORE	STORE END CHARACTER 
	STR	A5,A12	SAVE LENGTH 
	ABL	OPCONT	WAIT FOR NEXT COMMAND 
	EJECT
* 
* 
*	QUEUE AREA FOR TRANSMISSION 
* 
* 
QT	EQU	*
	LDR	A2,A7	SAVE CHAR. 
	LDR	A5,A7
	CF	A14,TRANSL	TRANSLATE FOR PRINTER
	CF	A14,OCCPR	OCCUPIE PRINTER 
	LDKL	A8,CTECB
	LDK	A1,4 
	ST	A1,ECBCW,A8	REMOVE REQUEST IF ANY 
	LDK	A7,/84 
	LKM
	DATA	1 
	LDR	A7,A2	RESTORE A7 
	LDKL	A5,TRQ
	LDK	A6,1 
QT050	EQU	* 
	STR	A7,A5
	ADK	A5,2	INCR. INDEX 
	LDK	A7,':' 
	CF	A14,PRCH	PRINT @
	LDK	A3,0 
	CF	A14,QTREAD	READ TIME OUT
	LDR	A3,A7
	LDR	A3,A3
	RF(NZ)	QT060 
	LDKL	A3,/8000
QT060	EQU	* 
	CF	A14,QTREAD
	SLL	A3,4 
	ORR	A3,A7
	LDR	A3,A3
	RF(NZ)	QT070 
	LDKL	A3,/8000
QT070	EQU	* 
	CF	A14,QTREAD
	ABL	ERROR
* 
* 
*	COMMA; READ NEXT TANSMITT BUFFER NUMBER 
* 
* 
QT100	EQU	* 
	LDKL	A14,STB 
	STR	A3,A5	STORE TIME OUT 
	ADK	A5,2	INCR INDEX
	CWK	A6,60
	RF(NG)	QT101 
	LDKL	A11,1 
	LDK	A6,1 
	CF	A14,CRLF
QT101	EQU	* 
	CF	A14,QTRED1
	ABL	QT050
* 
* 
*	SEND; ACTIVATE WRITE TASK 
* 
* 
QT150	EQU	* 
	STR	A3,A5	STORE TIME OUT 
	ADK	A5,2	INCR INDEX
	LDKL	A3,/FFFF
	STR	A3,A5
QT155	EQU	*	
	LDKL	A7,'UT' 
	LKM
	DATA	-4,WRITE
	ABL	OPCONT 
*	
*	SEND CONTINUOUS 
*	
QT160	EQU	*	
	STR	A3,A5	STORE TIME OUT	
	ADK	A5,2	INCR. INDEX 
	LDKL	A3,/CCCC	INDICATE CONTINUOUS	 
	STR	A3,A5	 
	ST	A5,CUEND	SAVE QUEUE-END	
	RB	QT155	ACTIVATE WRITE TASK	
CUEND	EQU	*	
	DATA	0	
*	
*	STOP CONTINUOUS SENDING 
*	
STPCON	EQU	*	 
	LD	A5,CUEND	RESTORE QUEUE POINTER	 
	ABL(Z)	OPCONT	NO QUEUE, QUIT	
	LDKL	A3,/FFFF	END OF QUEUE INDICATION
	STR	A3,A5	FLAG END OF QUEUE.	
	CM	CUEND	CLEAR QUEUE POINTER	
	ABL	OPCONT	GET NEXT COMMAND
* 
*	+ ; READ TRANSMIT DELAY 
* 
QT200	EQU	* 
	LDKL	A14,STB 
	LDKL	A3,/8000
	CF	A14,RDHEX 
	ADR	A3,A7
	CF	A14,QTREAD
	SLL	A3,4 
	ADKL	A3,/8000
	ORR	A3,A7
	RB	QT070 
	EJECT
* 
* 
*	READ TIME OUT 
* 
* 
QTREAD	EQU	*
	LDKL	A1,TRQE 
	SUK	A1,10
	CWR	A5,A1
	ABL(G)	ERROR 
	ADK	A6,1 
	CF	A14,READE 
	DATA	KT600,FT600 
	CF	A14,HEXCH 
	ABL(NZ)	ERROR
	RTN 	A14 
* 
* 
KT600	DATA	/042C,/280D,/4C00	',''(''CR' OR'Z' 
FT600	DATA	QT100,QT150,QT150,QT160	 
* 
*	READ BUFFER NR OR + 
* 
QTRED1	EQU	*
	LDKL	A1,TRQE 
	SUK	A1,10
	CWR	A5,A1
	ABL(G)	ERROR 
	ADK	A6,1 
	CF	A14,READE 
	DATA	KT650,FT650 
	CF	A14,HEXCH 
	ABL(NZ)	ERROR
	RTN	A14
* 
KT650	DATA	/012B
FT650	DATA	QT200
	EJECT
* 
* 
*	CHECK HEXADEC. INPUT AND TRANSLATE
* 
* 	CR=0  OK 
*	CR=1,2  ILLEGAL CHAR
* 
* 
HEXCH	EQU	* 
	ADKL	A14,4	SKIP STACK
	LDR	A1,A7
	SUK	A1,'0' 
	RF(N)	HEXC90 
	SUK	A1,9 
	RF(NP)	HEXC10	NUMBER 
	SUK	A1,8 
	RF(N)	HEXC90 
	SUK	A1,5 
	RF(P)	HEXC90 
	ADK	A1,15	TRANSLATE HEX LETTER 
	LDR	A7,A1
	RF	HEX20 
HEXC10	EQU	*
	ADK	A1,9 
	LDR	A7,A1
HEX20	EQU	* 
	SUR	A1,A1
	RF	HEX99 
HEXC90	EQU	*
	LDK	A1,1 
HEX99	EQU	* 
	ABR*	A14 
	EJECT
* 
* 
*	LIST COMMAND
* 
* 
LIST	EQU	*
	CF	A14,OCCPR	OCCUPIE PRINTER 
	CF	A14,PRSPAC
	CF	A14,READE 
	DATA	0,FT400 
FT400	EQU	* 
	CF	A14,HEXCH 
	RF(Z)	LI100
	CWK	A7,/2A 
	RF(Z)	LISALL 
	CWK	A7,/0D	CR? 
	ABL(NZ)	ERROR
	EJECT
* 
* 
*	LIST ALL AREAS
* 
* 
LISALL	LDK	A5,0	AREA NUMBER IN A5 
LISA10	CF	A14,LISAR	LIST ONE AREA 
	ADK	A5,1 
	CWK	A5,16
	RB(NE)	LISA10
	ABL	OPCONT 
* 
* 
*	LIST ONE AREA 
* 
* 
LI100	EQU	* 
	LDR	A5,A7
	CF	A14,LISAR 
	ABL	OPCONT 
* 
* 
*	TRANSLATE NUMBER IN A7 TO ASCII 
* 
* 
TRANSL	EQU	*
	CF	A14,CRLF
	LDK	A7,'0' 
	ADR	A7,A5	PRINT AREA NUMBER
	CWK	A7,/39 
	RF(NG)	LI180 
	ADK	A7,7 
LI180	EQU	* 
	RTN	A14
	EJECT
* 
* 
*	LIST ONE AREA 
* 
*	A5 CONTAINS AREA NUMBER 
* 
* 
LISAR	EQU	* 
	CF	A14,TRANSL
	CF	A14,PRCH
	LDK	A1,2 
	ST	A1,PRECBL	EMPTY PRINTBUFFER 
	LDK	A1,1 
	ST	A1,LSPACE 
	LDKL	A10,AREA
	LDK	A1,0 
LI200	CWR	A1,A5 
	RF(E)	LI210
	ADKL	A10,LENGTH
	ADK	A1,1 
	RB	LI200 
LI210	LDR*	A9,A10	GET LENGTH
	CWK	A9,500 
	RF(NG)	LI215 
	LDKL	A9,0
LI215	EQU	* 
	ADKL	A10,2 
LI220	SUKL	A9,1 
	RF(N)	LI250	ALL EDITED 
	LCR	A7,A10	GET CHARACTER 
	ADKL	A10,1 
	CW	A7,ETX
	RF(E)	LI270	ETX
	CW	A7,ETB
	RF(E)	LI270	ETB
	LD	A1,CODE 
	RF(NZ)	LI260	EBCDIC
	CF	A14,STAB1 
	RF(Z)	LI230	TEXT FOUND 
	CF	A14,STAB2 
	RF(Z)	LI230	TEXT FOUND 
LI225	EQU	* 
	CF	A14,EDHEXL	EDIT IN HEXA 
LI230	EQU	* 
	LDK	A1,100 
	CW	A1,PRECBL 
	RB(G)	LI220
LI240	EQU	* 
	CF	A14,PRLINE
	RB	LI220 
LI250	EQU	* 
	CF	A14,PRLINE
	RTN	A14
LI260	EQU	* 
	CF	A14,STAB3 
	RB(Z)	LI230
	CF	A14,STAB4 
	RB(Z)	LI230
	RB	LI225 
LI270	EQU	* 
	LD	A1,CODE 
	RF(NZ)	LI280 
	CF	A14,STAB2	ASCII 
LI275	EQU	* 
	SUKL	A9,1
	RB(N)	LI250	ALL DONE 
	LCR	A7,A10	GET LRC 
	ADKL	A10,1 
	CF	A14,EDHEXL
	RB	LI230 
LI280	EQU	* 
	CF	A14,STAB4	EBCDIC
	SUKL	A9,1
	RB(N)	LI250	ALL DONE 
	LCR	A7,A10	GET FIRST CRC CHARACTER 
	ADKL	A10,1 
	CF	A14,EDHEXL
	RB	LI275 
	EJECT
* 
* 
*	CONTROL COMMANDS
* 
* 
IDLE	LDK	A2,6	SHIFT IDLE TRANSMITT
	RF	WRCTRL
OPEN	LDK	A2,1 
	RF	WRCTRL
RESET	LDK	A2,2
WRCTRL	EQU	*
	CF	A14,OCCPR	OCCUPIE PRINTER 
	LDKL	A8,CTECB	LOAD ECB ADDRESS 
	LDK	A7,/84	AND AORDER
	ST	A2,ECBCW,A8	STORE COMMAND IN CW 
	LKM
	DATA	1 
	ABL	OPCONT	NEXT COMMAND
* 
* 
CTECB	DATA	/60,0,0,0,0,0
	EJECT
* 
* 
*	PRINT ONE CHARACTER FROM A7 
* 
* 
PRCH	LDKL	A8,PRECB
	SC*	A7,ECBBA,A8
	LDK	A7,/85 
	LKM
	DATA	1 
	ADKL	A11,1	COUNT CHARACTERS
	LDK	A7,0 
	ST	A7,XSPACE	RESET SPACE INDICATOR 
	LC*	A7,ECBBA,A8	RESTORE A7 
	RTN	A14
* 
* 
TYECB	DATA	/20,TYBUF,1,0,0,0
TYBUF	RES	1 
PRECB	DATA	/31,PRBUF,1,0,0,0
PRBUF	DATA	0
	EJECT
* 
* 
*	GENERATE CRLF 
* 
* 
CRLF	LDR	A11,A11
	RF(Z)	CRLF90	ALREADY NEW LINE
	LDK	A7,/0D 
	CF	A14,PRCH
	LDK	A7,/0A 
	CF	A14,PRCH
	IM	XSPACE	SET SPACE INDICATOR
	SUR	A11,A11
CRLF90	EQU	*
	RTN	A14
	EJECT
* 
* 
*	READ ONE CHARACTER FROM KEYBOARD TO A7
* 
*	TWO WORDS FOLLOWING CALL GIVE KEYTABLE AND FUNCTION TABLE ADDRESSES 
* 
*	ON ERROR GO TO NEXT INSTRUCTION ELSE TO FUNCTION
* 
*	A1 IS DESTROYED 
* 
* 
READ	LD	A7,4,A14
	LD	A1,2,A7	GET FUNCTION TABLE ADDRESS
	LDR*	A7,A7	GET KEYTABLE ADDRESS
	LDKL	A8,TYECB
	ST	A7,ECBCW,A8	STORE KEYTABLE ADDRESS
	LDK	A7,/82	STANDARD READ 
	LKM
	DATA	1 
READ05	EQU	*
	ADKL	A11,1	COUNT CHARS 
	LDK	A7,1 
	ST	A7,XSPACE	SET SPACE INDICATOR 
	LC*	A7,ECBBA,A8	GET CHARACTER TO A7
	ANK	A7,/7F 
	LD	A2,ECBRC,A8 
	RF(Z)	READ10	READING OK
	LDK	A1,4 
	ADS	A1,4,A14	INCR RETURN ADDRESS 
	RTN	A14
READ10	AD	A1,ECBCW,A8	ADD INDEX 
	ADKL	A14,4 
	ABR*	A1	RETURN TO FUNCTION 
* 
* 
*	READ AND ECHO 
* 
* 
READE	EQU	* 
	LD	A7,4,A14
* 
	LD	A1,2,A7	GET FUNCTION TABLE ADDRESS
	LDR*	A7,A7	GET KEYTABLE ADDRESS
	LDKL	A8,TYECB
	ST	A7,ECBCW,A8	STORE KEYTABLE ADDRESS
	LDK	A7,/82	STANDARD READ 
	LKM
	DATA	1 
	LC*	A7,ECBBA,A8
	CF	A14,PRCH	ECHO 
	LDKL	A8,TYECB
	RB	READ05
	EJECT
* 
* 
*	SEARCH FOR A7 CHAR IN TABLE 1 
* 
*	CR=0 IF FOUND 
*	CR=1 IF NOT FOUND 
* 
* 
ITAB1	LDK	A2,3
	LDK	A1,1	CR IF NOT FOUND 
ITAB10	CW	A2,TAB1 
	RF(G)	ITAB30	END OF TABLE
	CC	A7,TAB1-1,A2
	RF(E)	ITAB20	FOUND 
	ADK	A2,2 
	RB	ITAB10
ITAB20	LC	A7,TAB1,A2	GET CODE 
	CF	A14,STORE	AND STORE IT
	LDK	A1,0	CR=0
ITAB30	ADKL	A14,4 
	ABR*	A14	RETURN
	EJECT
* 
* 
*	STORE A7 CHARACTER IN TRANSMIT AREA 
* 
*	A9 =LRC OR CRC
*	A10=BUFFER POINTER
* 
* 
STORE	EQU	* 
	LD	A1,CODE 
	RF(Z)	STOREA	ASCII 
	LD	A1,HEXCHA 
	RF(NZ)	STOR01
	LDR	A1,A7
	CF	A14,ASTOEB
	LDR	A7,A2
STOR01	EQU	*
	CF	A14,CRCCAL	CALCULATE CRC
	RF	STOREB
STOREA	EQU	*
	XRR	A9,A7	CALCULATE LRC
STOREB	EQU	*
	CWK	A7,SOH 
	RF(E)	STOR08 
	CWK	A7,STX 
	RF(NE)	STOR10
STOR08	EQU	*
	LD	A1,XBCC 
	RF(NZ)	STOR10
	IM	XBCC
	SUR	A9,A9	STX: RESET BCC 
STOR10	CWK	A5,LENGTH
	ABL(E)	ERROR	OVERFLOW
	ADK	A5,1	COUNT CHAR
	SCR	A7,A10 
	ADKL	A10,1 
	CW	A7,ETX
	RF(E)	STOR11 
	CW	A7,ETB
	RF(NE)	STOR20
STOR11	EQU	*
	LDR	A7,A9
	CWK	A5,LENGTH
	ABL(E)	ERROR 
	ADK	A5,1	COUNT CHAR
	LD	A1,CODE 
	RF(NZ)	STOR30
	ORK	A7,/80 
	ECR	A1,A7	GENERATE PARITY ON LRC 
STOR12	SLL	A1,1 
	RF(Z)	STOR15 
	RB(NN)	STOR12
	XRK	A7,/80 
	RB	STOR12
STOR15	EQU	*
	SCR	A7,A10 
	ADKL	A10,1 
	CF	A14,EDHEX	PRINT LRC 
STOR20	RTN	A14
STOR30	EQU	*
	SCR	A7,A10 
	ADKL	A10,1 
	ANK	A7,/FF 
	CF	A14,EDHEX 
	LDR	A7,A9
	SRL	A7,8 
	CWK	A5,LENGTH
	ABL(E)	ERROR 
	ADK	A5,1 
	SCR	A7,A10 
	ADKL	A10,1 
	CF	A14,EDHEX 
	RB	STOR20
	EJECT
* 
* 
*	READ HEXADECIMAL CHARACTER
* 
* 
RDHEX	CF	A14,READE
	DATA	KTRDH 
KTRDH	DATA	0	NO KEYTABLE
RDH100	SUK	A7,/30 
	ABL(N)	ERROR 
	CWK	A7,9 
	RF(NG)	RDH110
	SUK	A7,7 
	ABL(N)	ERROR 
	CWK	A7,/F
	ABL(G)	ERROR 
RDH110	RTN	A14
	EJECT
* 
* 
*	EDIT	CHAR FROM A7 IN HEXADECIMAL FORM 
* 
* 
EDHEX	LDR	A6,A7	SAVE A7 
	CF	A14,SPACE 
	LDK	A7,'/' 
	CF	A14,PRCH
	LDR	A7,A6
	SRL	A7,4 
	LC	A7,HEXTAB,A7
	CF	A14,PRCH	1ST CHAR 
	LDR	A7,A6
	ANK	A7,/F
	LC	A7,HEXTAB,A7
	CF	A14,PRCH	2ND CHAR 
	CF	A14,SPACE	SPACE 
	RTN	A14
HEXTAB	DATA	'0123456789ABCDEF'
* 
	EJECT
* 
* 
*	EDIT	CHAR FROM A7 IN HEXADECIMAL FORM 
* 
* 
EDHEXL	CF	A14,SPACEL
	LDK	A1,'/' 
	CF	A14,STOREL
	LDR	A1,A7
	SRL	A1,4 
	LC	A1,HEXTAX,A1
	CF	A14,STOREL	1ST CHAR 
	LDR	A1,A7
	ANK	A1,/F
	LC	A1,HEXTAX,A1
	CF	A14,STOREL	2ND CHAR 
	CF	A14,SPACEL	SPACEL 
	RTN	A14
HEXTAX	DATA	'0123456789ABCDEF'
	EJECT
* 
* 
*	PRINT ONE LINE ON PRINTER 
* 
* 
PRLINE	LDK	A1,2 
	CW	A1,PRECBL 
	RF(E)	PRLI10	NOTHING IN BUFFER 
	LDK	A7,/86	STD WRITE AND WAIT
	LDKL	A8,PRLECB 
	LKM
	DATA	1 
PRLI05	EQU	*
	ST	A1,PRECBL	RESET LENGTH
	LDK	A1,1 
	ST	A1,XSPACE	SET SPACE INDICATOR 
PRLI10	RTN	A14
PRLECB	DATA	/31,PRLBUF,2,0,0,0
PRECBL	EQU	PRLECB+4	REQUESTED LENGTH
PRLBUF	DATA	0 
	RES	60 
	EJECT
* 
* 
*	SEARCH FOR A7 CHAR IN TABLE 1 
* 
* 
*	CR=1 IF NOT FOUND ELSE
*	CR=0 AND CORRESPONDING CODE IS STORED 
* 
* 
STAB1	LDK	A2,3	SET INDEX
	LDK	A1,1	CR IF NOT FOUND 
STAB10	CW	A2,TAB1 
	RF(G)	STAB30	END OF TABLE
	CC	A7,TAB1,A2
	RF(E)	STAB20	FOUND 
	ADK	A2,2 
	RB	STAB10	TRY NEXT 
STAB20	LC	A1,TAB1-1,A2	GET CORRESPONDING CODE 
	CF	A14,STOREL	AND PRINT IT 
	LDK	A1,0 
STAB30	LC	A2,2,A14	SET CR FOR RETURN
	ANK	A2,/FC 
	ANK	A1,3 
	ADR	A1,A2
	SC	A1,2,A14
	RTN	A14
	EJECT
* 
* 
*	SEARCH FOR A7 CHAR IN TABLE 3 
* 
* 
*	CR=1 IF NOT FOUND ELSE
*	CR=0 AND CORRESPONDING CODE IS STORED 
* 
* 
STAB3	LDK	A2,3	SET INDEX
	LDK	A1,1	CR IF NOT FOUND 
STA10	CW	A2,TAB3
	RF(G)	STA30	END OF TABLE 
	CC	A7,TAB3,A2
	RF(E)	STA20	FOUND
	ADK	A2,2 
	RB	STA10	TRY NEXT
STA20	LC	A1,TAB3-1,A2	GET CODE
	CF	A14,STOREL	AND PRINT IT 
	LDK	A1,0 
STA30	LC	A2,2,A14	SET CR FOR RETURN 
	ANK	A2,/FC 
	ANK	A1,3 
	ADR	A1,A2
	SC	A1,2,A14
	RTN	A14
	EJECT
* 
* 
*	SEARCH FRO A7 CHAR IN TABLE 2 
* 
*	CR=1 IF NOT FOUND 
*	CR=0 IF FOUND AND CORRESPONDING TEXT IN BUFFER
* 
* 
STAB2	LDK	A4,3	SET INDEX
	LDK	A1,1	CR IF NOT FOUND 
STAB40	CW	A4,TAB2 
	RF(G)	STAB80	END OF TABLE
	CC	A7,TAB2,A4
	RF(E)	STAB50	FOUND 
	ADK	A4,4 
	RB	STAB40	NEXT CHAR
STAB50	CF	A14,SPACEL
	LD	A3,TAB2+1,A4	GET STRING ADDRESS 
	LDR*	A4,A3	GET LENGTH
	ADK	A3,2 
STAB60	SUK	A4,1 
	RF(N)	STAB70 
	LCR	A1,A3	PRINT TEXT 
	ADK	A3,1 
	CF	A14,STOREL
	RB	STAB60
STAB70	CF	A14,SPACEL	SPACEL 
	LDK	A1,0 
STAB80	RB	STAB30	SET CR FOR RETURN
	RTN	A14
	EJECT
* 
* 
*	SEARCH FRO A7 CHAR IN TABLE 4 
* 
*	CR=1 IF NOT FOUND 
*	CR=0 IF FOUND AND CORRESPONDING TEXT IN BUFFER
* 
* 
STAB4	LDK	A4,3	SET INDEX
	LDK	A1,1	CR IF NOT FOUND 
STA40	CW	A4,TAB4
	RF(G)	STA80	END OF TABLE 
	CC	A7,TAB4,A4
	RF(E)	STA50	FOUND
	ADK	A4,4 
	RB	STA40	NEXT CHAR 
STA50	CF	A14,SPACEL 
	LD	A3,TAB4+1,A4	GET STRING ADDRESS 
	LDR*	A4,A3	GET LENGTH
	ADK	A3,2 
STA60	SUK	A4,1
	RF(N)	STA70
	LCR	A1,A3	PRINT TEXT 
	ADK	A3,1 
	CF	A14,STOREL
	RB	STA60 
STA70	CF	A14,SPACEL	SPACEL
	LDK	A1,0 
STA80	RB	STA30
	RTN	A14
	EJECT
* 
* 
*	STORE CHAR FROM A1 IN PRINT BUFFER
* 
* 
STOREL	LD	A2,PRECBL 
	SC	A1,PRLBUF,A2
	IM	PRECBL
	LDK	A1,0 
	ST	A1,LSPACE 
	RTN	A14
* 
*	PUT SPACE IN BUFFER 
* 
SPACEL	LD	A1,LSPACE 
	RF(NZ)	LSP100
	LDK	A1,/20 
	CF	A14,STOREL
	IM	LSPACE
LSP100	RTN	A14
LSPACE	DATA	0	SPACE INDICATOR 
	EJECT
* 
* 
*	PUT SPACE IN BUFFER 
* 
* 
SPACE	LD	A1,XSPACE
	RF(NZ)	SPA100
PRSPAC	LDK	A7,' ' 
	CF	A14,PRCH
	IM	XSPACE
SPA100	RTN	A14
XSPACE	DATA	0	SPACE INDICATOR 
* 
* 
* 
*	OCCUPIE PRINTER AND ECHO CHARACHTER IN A7 
* 
* 
OCCPR	EQU	* 
	LDR	A1,A7	SAVE CHAR
	LDK	A7,1 
	LKM	 
	DATA	-7,PRPOOL	GET BUFFER
	ST	A8,PROCCB	SAVE BUFFER ADDRESS 
	CF	A14,CRLF
	LDR	A7,A1	RESTORE CHAR 
	CF	A14,PRCH	ECHO 
	RTN	A14
* 
* 
* 
	EJECT
* 
* 
*	WRITE BUFFERS ON CASSETTE 
* 
* 
WRTC	EQU	*
	CF	A14,OCCPR	OCCUPIE PRINTER ECHO COMMAND
	CF	A14,CRLF
	CF	A14,LOAD	LOAD CASSETTE
	CM	TCECB+10
	CF	A14,WRTM	WRITE TAPE MARK
	LDK	A1,32
	LDKL	A2,AREA 
WRTC10	EQU	*
	ST	A2,ECBBA,A8 
	LDKL	A3,256
	ST	A3,ECBRL,A8 
	LDK	A7,/86 
	LDKL	A8,TCECB
	LKM
	DATA	1	WRITE ONE BLOCK 
	LD	A3,TCECB+8
	ANK	A3,4 
	RF(NZ)	WRTC20
	ADKL	A2,256
	SUK	A1,1 
	RB(NZ)	WRTC10	NOT END OF AREA
	CF	A14,WRTM
	CF	A14,UNLOAD
	LDKL	A2,TEXT3
	RF	RETCAS	RETURN TO OPERATOR CONTROL 
* 
*   CASSETTE ERROR
* 
WRTC20	EQU	*
	CF	A14,UNLOAD
	LDKL	A2,TEXT2
	RF	RETCAS	RETURN TO OPERATOR CONTROL 
TCECB	DATA	/12,AREA,256,0,0,0 
* 
*	LOAD CASSETTE 
* 
LOAD	EQU	*
	LDK	A7,/B7 
	LDKL	A8,TCECB
	IM	TCECB+10	NO SEQUENCE NUMBER 
LOAD10	EQU	*
	LKM
	DATA	1	LOAD CASSETTE 
	LD	A3,TCECB+8
	ANKL	A3,/0201
	RB(NZ)	WRTC20
	RTN	A14
* 
*	WRITE TAPE MARK 
* 
WRTM	EQU	*
	LDK	A7,/A2 
	LDKL	A8,TCECB
	RB	LOAD10
* 
*	UNLOAD CASSETTE 
* 
UNLOAD	EQU	*
	LDK	A7,/B8 
	LDKL	A8,TCECB
	LKM
	DATA	1 
	RTN	A14
* 
LOAD1	EQU	* 
	LDK	A7,/B7 
	LDKL	A8,TCECB
	IM	TCECB+10
	LKM
	DATA	1 
	LD	A3,TCECB+8
	ANK	A3,1 
	RB(NZ)	WRTC20
	RTN	A14
	EJECT
* 
* 
*	READ BUFFERS FROM CASSETTE
* 
* 
RDTC	EQU	*
	CF	A14,OCCPR	OCCUPIE PRINTER ECHO COMMAND
	CF	A14,CRLF
	CF	A14,LOAD1	LOAD1 CASSETTE
RDTC10	EQU	*
	LDK	A7,/82 
	LDKL	A8,TCECB
	LDKL	A2,AREA 
	ST	A2,ECBBA,A8 
	LDK	A1,32
	LKM
	DATA	1	READ ONE BLOCK
	LC	A3,TCECB+8
	ANK	A3,/10 
	RB(NZ)	RDTC10	TAPE MARK
RDTC20	EQU	*
	ADKL	A2,256
	SUK	A1,1 
	RF(Z)	RDTC30	AREA FILLED 
	ST	A2,ECBBA,A8 
	LKM
	DATA	1	READ ONE BLOCK
	LC	A3,TCECB+8
	ANK	A3,/10 
	RF(NZ)	RDTC30	TAPE MARK
	RB	RDTC20
RDTC30	EQU	*
	CF	A14,UNLOAD
	LDKL	A2,TEXT4
* 
* 
*   PRINT MESSAGE AND RETURN TO OPERATOR CONTROL
* 
RETCAS	EQU	*
	CF	A14,PRTXT 
	LDKL	A11,1	SET A11 NOT ZERO
	ABL	OPCONT 
	END	ASTART 

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT LOGOP   REL 1.1 82-09-28  870150040110 «, t00=0x0000, t01=0x0004}
0x0036…0044              Head {h00=0x000a, h01=0x0050, text=»   #1 «, t00=0x0000, t01=0x003a}
0x0044…0066              Head {h00=0x001e, h01=0x0050, text=»   UPDATE #0 77.01.26 JES «, t00=0x0000, t01=0x0048}
0x0066…0070              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x006a}
0x0070…007a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0074}
0x007a…0096              Head {h00=0x0018, h01=0x0050, text=»* CC SIMULATION TOOL«, t00=0x0000, t01=0x007e}
0x0096…00a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x009a}
0x00a0…00ba              Head {h00=0x0016, h01=0x0050, text=»* OPERATOR CONTROL«, t00=0x0000, t01=0x00a4}
0x00ba…00c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00be}
0x00c4…00de              Head {h00=0x0016, h01=0x0050, text=»* PROGRAMMER: PAN «, t00=0x0000, t01=0x00c8}
0x00de…00e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e2}
0x00e8…0128              Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0000, t01=0x00ec}
0x0128…0132              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012c}
0x0132…015a              Head {h00=0x0024, h01=0x0050, text=»* THIS MODULE COMMUNICATES WITH «, t00=0x0000, t01=0x0136}
0x015a…0170              Head {h00=0x0012, h01=0x0050, text=»* THE OPERATOR«, t00=0x0000, t01=0x015e}
0x0170…017a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0174}
0x017a…0198              Head {h00=0x001a, h01=0x0050, text=»* ALLOWED INPUT KEYS: «, t00=0x0000, t01=0x017e}
0x0198…01a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01bc              Head {h00=0x0016, h01=0x0050, text=»* O: OPEN RECEIVER«, t00=0x0001, t01=0x0016}
0x01bc…01c6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0030}
0x01c6…0208              Head {h00=0x003e, h01=0x0050, text=»* I: INSERT IN BUFFER SPECIFIED BY FOLLOWING HEXDEC NUMBER«, t00=0x0001, t01=0x003a}
0x0208…023a              Head {h00=0x002e, h01=0x0050, text=»*    THEN FILL THE BUFFER WITH CHARACTERS «, t00=0x0001, t01=0x007c}
0x023a…0282              Head {h00=0x0044, h01=0x0050, text=»*       /: THE TWO FOLLOWING CHARACTERS FORM AN ASCII CHARACTER «, t00=0x0001, t01=0x00ae}
0x0282…02c6              Head {h00=0x0040, h01=0x0050, text=»*    /83 OR /97 ARE AUTOMATICALLY FOLLOWED BY LRC CALCULATED«, t00=0x0001, t01=0x00f6}
0x02c6…02ee              Head {h00=0x0024, h01=0x0050, text=»*         FROM FIRST STX OR SOH «, t00=0x0001, t01=0x013a}
0x02ee…031e              Head {h00=0x002c, h01=0x0050, text=»*    TO DELETE LAST CHARACTER PRESS: FEL«, t00=0x0001, t01=0x0162}
0x031e…033c (2, 0, 400)  Head {h00=0x001a, h01=0x0050, text=»*    *: END OF BUFFER «, t00=0x0002, t01=0x0004}
0x033c…0356              Head {h00=0x0016, h01=0x0050, text=»*           CR:=* «, t00=0x0002, t01=0x0022}
0x0356…0360              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x003c}
0x0360…0378              Head {h00=0x0014, h01=0x0050, text=»* L: LIST BUFFER«, t00=0x0002, t01=0x0046}
0x0378…0394              Head {h00=0x0018, h01=0x0050, text=»*    *: ALL BUFFERS «, t00=0x0002, t01=0x005e}
0x0394…03ae              Head {h00=0x0016, h01=0x0050, text=»*           CR:=* «, t00=0x0002, t01=0x007a}
0x03ae…03d0              Head {h00=0x001e, h01=0x0050, text=»*    <HEXDEC>: ONE BUFFER «, t00=0x0002, t01=0x0094}
0x03d0…03da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b6}
0x03da…0410              Head {h00=0x0032, h01=0x0050, text=»* <HEXDEC>: PUT THIS BUFFER IN TRANSMITT QUEUE«, t00=0x0002, t01=0x00c0}
0x0410…044e              Head {h00=0x003a, h01=0x0050, text=»*       (TIME OUT FOR RESPONSE MAY BE SPECIFIED AFTER:«, t00=0x0002, t01=0x00f6}
0x044e…047e              Head {h00=0x002c, h01=0x0050, text=»*     WITH UP TO TWO HEXDEC CHARACTERS) «, t00=0x0002, t01=0x0134}
0x047e…04a2              Head {h00=0x0020, h01=0x0050, text=»*    N,: NEW BUFFER IN QUEUE«, t00=0x0002, t01=0x0164}
0x04a2…04d0              Head {h00=0x002a, h01=0x0050, text=»*    SEND: TRANSMITT THE BUFFER QUEUE «, t00=0x0002, t01=0x0188}
0x04d0…04ec              Head {h00=0x0018, h01=0x0050, text=»*           CR:=SEND«, t00=0x0003, t01=0x0026}
0x04ec…0508              Head {h00=0x0018, h01=0x0050, text=»* L: SEND CONTINUOUS«, t00=0x0003, t01=0x0042}
0x0508…0512              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005e}
0x0512…0532              Head {h00=0x001c, h01=0x0050, text=»* R: RESET RECEIV BUFFER«, t00=0x0003, t01=0x0068}
0x0532…053c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0088}
0x053c…056a              Head {h00=0x002a, h01=0x0050, text=»*        W: WRITE BUFFERS ON CASSETTE «, t00=0x0003, t01=0x0092}
0x056a…0598              Head {h00=0x002a, h01=0x0050, text=»*        S: READ BUFFERS FROM CASSETTE«, t00=0x0003, t01=0x00c0}
0x0598…05ca              Head {h00=0x002e, h01=0x0050, text=»*        X: SHIFT IDLE MODE OF TRANSMITTER«, t00=0x0003, t01=0x00ee}
0x05ca…05f4              Head {h00=0x0026, h01=0x0050, text=»*           CARRIER OFF/ MARK HOLD«, t00=0x0003, t01=0x0120}
0x05f4…0618              Head {h00=0x0020, h01=0x0050, text=»* H: STOP CONTINUOUS SENDING«, t00=0x0003, t01=0x014a}
0x0618…0622              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x016e}
0x0622…0648              Head {h00=0x0022, h01=0x0050, text=»* P: DISABLE OR ENABLE PRINTER«, t00=0x0003, t01=0x0178}
0x0648…0652              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x000e}
0x0652…0698              Head {h00=0x0042, h01=0x0050, text=»**************************************************************«, t00=0x0004, t01=0x0018}
0x0698…06a6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x005e}
0x06a6…06b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x06b0…06ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0076}
0x06ba…06c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0080}
0x06c4…06d8              Head {h00=0x0010, h01=0x0050, text=» ENTRY CODE «, t00=0x0004, t01=0x008a}
0x06d8…06ee              Head {h00=0x0012, h01=0x0050, text=» ENTRY ASTART «, t00=0x0004, t01=0x009e}
0x06ee…0700              Head {h00=0x000e, h01=0x0050, text=» ENTRY ETX«, t00=0x0004, t01=0x00b4}
0x0700…0712              Head {h00=0x000e, h01=0x0050, text=» ENTRY ETB«, t00=0x0004, t01=0x00c6}
0x0712…0724              Head {h00=0x000e, h01=0x0050, text=» ENTRY SYN«, t00=0x0004, t01=0x00d8}
0x0724…073a              Head {h00=0x0012, h01=0x0050, text=» ENTRY PRFLAG «, t00=0x0004, t01=0x00ea}
0x073a…0744              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0100}
0x0744…074e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x010a}
0x074e…076e              Head {h00=0x001c, h01=0x0050, text=» EXTRN TAB1 CHAR TABLE 1«, t00=0x0004, t01=0x0114}
0x076e…078e              Head {h00=0x001c, h01=0x0050, text=» EXTRN TAB2 CHAR TABLE 2«, t00=0x0004, t01=0x0134}
0x078e…07a2              Head {h00=0x0010, h01=0x0050, text=» EXTRN TAB3 «, t00=0x0004, t01=0x0154}
0x07a2…07b6              Head {h00=0x0010, h01=0x0050, text=» EXTRN TAB4 «, t00=0x0004, t01=0x0168}
0x07b6…07d8              Head {h00=0x001e, h01=0x0050, text=» EXTRN AREA TRANSMIT AREAS«, t00=0x0004, t01=0x017c}
0x07d8…080a              Head {h00=0x002e, h01=0x0050, text=» EXTRN LENGTH TOTAL INDIVIDUAL AREA LENGTH«, t00=0x0005, t01=0x000e}
0x080a…082c              Head {h00=0x001e, h01=0x0050, text=» EXTRN TRQ TRANSMIT QUEUE «, t00=0x0005, t01=0x0040}
0x082c…0856              Head {h00=0x0026, h01=0x0050, text=» EXTRN TRQE END OF TRANSMIT QUEUE «, t00=0x0005, t01=0x0062}
0x0856…0888              Head {h00=0x002e, h01=0x0050, text=» EXTRN LOGIN LOG INPUT TASK START ADDRESS «, t00=0x0005, t01=0x008c}
0x0888…08b2              Head {h00=0x0026, h01=0x0050, text=» EXTRN WRITE WRITE TASK ACTIVATION«, t00=0x0005, t01=0x00be}
0x08b2…08d0              Head {h00=0x001a, h01=0x0050, text=» EXTRN WRECB WRITE ECB«, t00=0x0005, t01=0x00e8}
0x08d0…0902              Head {h00=0x002e, h01=0x0050, text=» EXTRN PRPOOL OCCUPIE PRINTER BUFFER POOL «, t00=0x0005, t01=0x0106}
0x0902…0916              Head {h00=0x0010, h01=0x0050, text=» EXTRN TEXT1«, t00=0x0005, t01=0x0138}
0x0916…0940              Head {h00=0x0026, h01=0x0050, text=» EXTRN TEXT2 ***CASSETTE ERROR*** «, t00=0x0005, t01=0x014c}
0x0940…0976              Head {h00=0x0032, h01=0x0050, text=» EXTRN TEXT3 ***BUFFERS DUMPED ON CASSETTE*** «, t00=0x0005, t01=0x0176}
0x0976…09a0              Head {h00=0x0026, h01=0x0050, text=» EXTRN TEXT4 ***BUFFERS LOADED*** «, t00=0x0006, t01=0x001c}
0x09a0…09b6              Head {h00=0x0012, h01=0x0050, text=» EXTRN ASTOEB «, t00=0x0006, t01=0x0046}
0x09b6…09cc              Head {h00=0x0012, h01=0x0050, text=» EXTRN CRCCAL «, t00=0x0006, t01=0x005c}
0x09cc…09d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0072}
0x09d6…09e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x007c}
0x09e0…09f2              Head {h00=0x000e, h01=0x0050, text=»* EQUATES «, t00=0x0006, t01=0x0086}
0x09f2…09fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0098}
0x09fc…0a06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00a2}
0x0a06…0a1a              Head {h00=0x0010, h01=0x0050, text=»SOH EQU /01 «, t00=0x0006, t01=0x00ac}
0x0a1a…0a2e              Head {h00=0x0010, h01=0x0050, text=»STX EQU /02 «, t00=0x0006, t01=0x00c0}
0x0a2e…0a42              Head {h00=0x0010, h01=0x0050, text=»ECBBA EQU 2 «, t00=0x0006, t01=0x00d4}
0x0a42…0a56              Head {h00=0x0010, h01=0x0050, text=»ECBRL EQU 4 «, t00=0x0006, t01=0x00e8}
0x0a56…0a6a              Head {h00=0x0010, h01=0x0050, text=»ECBRC EQU 8 «, t00=0x0006, t01=0x00fc}
0x0a6a…0a7e              Head {h00=0x0010, h01=0x0050, text=»ECBCW EQU 10«, t00=0x0006, t01=0x0110}
0x0a7e…0a88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a88…0a92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x012e}
0x0a92…0ab0              Head {h00=0x001a, h01=0x0050, text=» RES 20 STACK FOR A14 «, t00=0x0006, t01=0x0138}
0x0ab0…0ac4              Head {h00=0x0010, h01=0x0050, text=»STB EQU *-2 «, t00=0x0006, t01=0x0156}
0x0ac4…0afe              Head {h00=0x0036, h01=0x0050, text=»PROCCB DATA 0 ADDRESS TO PRINTER OCCUPIED BUFFFER «, t00=0x0006, t01=0x016a}
0x0afe…0b28              Head {h00=0x0026, h01=0x0050, text=»CODE DATA 0 0 = ASCII , 1 = EBCDIC«, t00=0x0007, t01=0x0014}
0x0b28…0b58              Head {h00=0x002c, h01=0x0050, text=»XBCC DATA 0 SWITCH FOR BCC ACCUMULATION «, t00=0x0007, t01=0x003e}
0x0b58…0b6a              Head {h00=0x000e, h01=0x0050, text=»SYN DATA 0«, t00=0x0007, t01=0x006e}
0x0b6a…0b7c              Head {h00=0x000e, h01=0x0050, text=»ETB DATA 0«, t00=0x0007, t01=0x0080}
0x0b7c…0b8e              Head {h00=0x000e, h01=0x0050, text=»ETX DATA 0«, t00=0x0007, t01=0x0092}
0x0b8e…0ba4              Head {h00=0x0012, h01=0x0050, text=»HEXCHA DATA 0 «, t00=0x0007, t01=0x00a4}
0x0ba4…0bb2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x00ba}
0x0bb2…0bbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c8}
0x0bbc…0bc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d2}
0x0bc6…0be4              Head {h00=0x001a, h01=0x0050, text=»* START LOOP TEST TOOL«, t00=0x0007, t01=0x00dc}
0x0be4…0bee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fa}
0x0bee…0bf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0104}
0x0bf8…0c0c              Head {h00=0x0010, h01=0x0050, text=»ASTART EQU *«, t00=0x0007, t01=0x010e}
0x0c0c…0c36              Head {h00=0x0026, h01=0x0050, text=» CM PROCCB RELEASE PRINTER BUFFER «, t00=0x0007, t01=0x0122}
0x0c36…0c4a              Head {h00=0x0010, h01=0x0050, text=»ASTA20 EQU *«, t00=0x0007, t01=0x014c}
0x0c4a…0c5e              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x0007, t01=0x0160}
0x0c5e…0c8a              Head {h00=0x0028, h01=0x0050, text=» SC A1,WRECB SET WRITE ECB NOT BUSY «, t00=0x0007, t01=0x0174}
0x0c8a…0ca0              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,'OP' «, t00=0x0008, t01=0x0010}
0x0ca0…0cac              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0008, t01=0x0026}
0x0cac…0ce2              Head {h00=0x0032, h01=0x0050, text=» DATA -4,OPCTRL ACTIVATE OPERATOR CONTROL TASK«, t00=0x0008, t01=0x0032}
0x0ce2…0cf8              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,'IN' «, t00=0x0008, t01=0x0068}
0x0cf8…0d04              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0008, t01=0x007e}
0x0d04…0d2c              Head {h00=0x0024, h01=0x0050, text=» DATA -4,LOGIN ACTIVATE LOG TASK«, t00=0x0008, t01=0x008a}
0x0d2c…0d38              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0008, t01=0x00b2}
0x0d38…0d48              Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x0008, t01=0x00be}
0x0d48…0d56              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x00ce}
0x0d56…0d60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00dc}
0x0d60…0d6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e6}
0x0d6a…0d8a              Head {h00=0x001c, h01=0x0050, text=»* OPERATOR CONTROL TASK «, t00=0x0008, t01=0x00f0}
0x0d8a…0d94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0110}
0x0d94…0d9e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x011a}
0x0d9e…0db2              Head {h00=0x0010, h01=0x0050, text=»OPCTRL EQU *«, t00=0x0008, t01=0x0124}
0x0db2…0dc8              Head {h00=0x0012, h01=0x0050, text=» LDKL A14,STB «, t00=0x0008, t01=0x0138}
0x0dc8…0ddc              Head {h00=0x0010, h01=0x0050, text=» LDK A7,' ' «, t00=0x0008, t01=0x014e}
0x0ddc…0e02              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x0008, t01=0x0162}
0x0e02…0e16              Head {h00=0x0010, h01=0x0050, text=»OPCT10 EQU *«, t00=0x0008, t01=0x0188}
0x0e16…0e2a              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0009, t01=0x000c}
0x0e2a…0e40              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT1«, t00=0x0009, t01=0x0020}
0x0e40…0e56              Head {h00=0x0012, h01=0x0050, text=» CF A14,PRTXT «, t00=0x0009, t01=0x0036}
0x0e56…0e78              Head {h00=0x001e, h01=0x0050, text=» CF A14,READE READ E OR A «, t00=0x0009, t01=0x004c}
0x0e78…0e92              Head {h00=0x0016, h01=0x0050, text=» DATA KT050,FT050 «, t00=0x0009, t01=0x006e}
0x0e92…0ea6              Head {h00=0x0010, h01=0x0050, text=» LDK A7,'?' «, t00=0x0009, t01=0x0088}
0x0ea6…0ec6              Head {h00=0x001c, h01=0x0050, text=» CF A14,PRCH INVALID KEY«, t00=0x0009, t01=0x009c}
0x0ec6…0ee2              Head {h00=0x0018, h01=0x0050, text=» RB OPCT10 TRY AGAIN«, t00=0x0009, t01=0x00bc}
0x0ee2…0eec              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00d8}
0x0eec…0ef6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00e2}
0x0ef6…0f12              Head {h00=0x0018, h01=0x0050, text=»KT050 DATA /0241,'E'«, t00=0x0009, t01=0x00ec}
0x0f12…0f32              Head {h00=0x001c, h01=0x0050, text=»FT050 DATA OPCT20,OPCT30«, t00=0x0009, t01=0x0108}
0x0f32…0f3c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0128}
0x0f3c…0f46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0132}
0x0f46…0f54              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x013c}
0x0f54…0f68              Head {h00=0x0010, h01=0x0050, text=»OPCT20 EQU *«, t00=0x0009, t01=0x014a}
0x0f68…0f78              Head {h00=0x000c, h01=0x0050, text=» CM CODE«, t00=0x0009, t01=0x015e}
0x0f78…0f8c              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/16 «, t00=0x0009, t01=0x016e}
0x0f8c…0f9e              Head {h00=0x000e, h01=0x0050, text=» ST A1,SYN«, t00=0x0009, t01=0x0182}
0x0f9e…0fb2 (10, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDK A1,/97 «, t00=0x000a, t01=0x0004}
0x0fb2…0fc4              Head {h00=0x000e, h01=0x0050, text=» ST A1,ETB«, t00=0x000a, t01=0x0018}
0x0fc4…0fd8              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/83 «, t00=0x000a, t01=0x002a}
0x0fd8…0fea              Head {h00=0x000e, h01=0x0050, text=» ST A1,ETX«, t00=0x000a, t01=0x003e}
0x0fea…0ffc              Head {h00=0x000e, h01=0x0050, text=» RF OPCT40«, t00=0x000a, t01=0x0050}
0x0ffc…1010              Head {h00=0x0010, h01=0x0050, text=»OPCT30 EQU *«, t00=0x000a, t01=0x0062}
0x1010…1020              Head {h00=0x000c, h01=0x0050, text=» IM CODE«, t00=0x000a, t01=0x0076}
0x1020…1034              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/32 «, t00=0x000a, t01=0x0086}
0x1034…1046              Head {h00=0x000e, h01=0x0050, text=» ST A1,SYN«, t00=0x000a, t01=0x009a}
0x1046…105a              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/26 «, t00=0x000a, t01=0x00ac}
0x105a…106c              Head {h00=0x000e, h01=0x0050, text=» ST A1,ETB«, t00=0x000a, t01=0x00c0}
0x106c…1080              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/03 «, t00=0x000a, t01=0x00d2}
0x1080…1092              Head {h00=0x000e, h01=0x0050, text=» ST A1,ETX«, t00=0x000a, t01=0x00e6}
0x1092…10a6              Head {h00=0x0010, h01=0x0050, text=»OPCT40 EQU *«, t00=0x000a, t01=0x00f8}
0x10a6…10ba              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000a, t01=0x010c}
0x10ba…10d0              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,CTECB«, t00=0x000a, t01=0x0120}
0x10d0…10e4              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/84 «, t00=0x000a, t01=0x0136}
0x10e4…10f6              Head {h00=0x000e, h01=0x0050, text=» LD A3,SYN«, t00=0x000a, t01=0x014a}
0x10f6…1120              Head {h00=0x0026, h01=0x0050, text=» ST A3,ECBBA,A8 STORE SYNCPATTERN «, t00=0x000a, t01=0x015c}
0x1120…1132              Head {h00=0x000e, h01=0x0050, text=» LDK A1,5 «, t00=0x000a, t01=0x0186}
0x1132…114a              Head {h00=0x0014, h01=0x0050, text=» ST A1,ECBCW,A8 «, t00=0x000b, t01=0x0008}
0x114a…1156              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000b, t01=0x0020}
0x1156…117a              Head {h00=0x0020, h01=0x0050, text=» DATA 1 TRANSFER SYNCPATTERN«, t00=0x000b, t01=0x002c}
0x117a…118c              Head {h00=0x000e, h01=0x0050, text=» RF OPCONT«, t00=0x000b, t01=0x0050}
0x118c…119a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0062}
0x119a…11a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0070}
0x11a4…11b8              Head {h00=0x0010, h01=0x0050, text=»* PRINT TEXT«, t00=0x000b, t01=0x007a}
0x11b8…11c2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x008e}
0x11c2…11d6              Head {h00=0x0010, h01=0x0050, text=»PRTXT EQU * «, t00=0x000b, t01=0x0098}
0x11d6…11f4              Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A2 GET LENGTH«, t00=0x000b, t01=0x00ac}
0x11f4…120c              Head {h00=0x0014, h01=0x0050, text=» ST A2,PRXECB+2 «, t00=0x000b, t01=0x00ca}
0x120c…121e              Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x000b, t01=0x00e2}
0x121e…1236              Head {h00=0x0014, h01=0x0050, text=» ST A3,PRXECB+4 «, t00=0x000b, t01=0x00f4}
0x1236…124a              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/86 «, t00=0x000b, t01=0x010c}
0x124a…1262              Head {h00=0x0014, h01=0x0050, text=» LDKL A8,PRXECB «, t00=0x000b, t01=0x0120}
0x1262…126e              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000b, t01=0x0138}
0x126e…128c              Head {h00=0x001a, h01=0x0050, text=» DATA 1 STANDARD WRITE«, t00=0x000b, t01=0x0144}
0x128c…12a0              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000b, t01=0x0162}
0x12a0…12b0              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x000b, t01=0x0176}
0x12b0…12ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0186}
0x12ba…12c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0190}
0x12c4…12e6              Head {h00=0x001e, h01=0x0050, text=»PRXECB DATA /31,0,0,0,0,0 «, t00=0x000c, t01=0x000a}
0x12e6…12f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x002c}
0x12f0…12fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0036}
0x12fa…1308              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x0040}
0x1308…131c              Head {h00=0x0010, h01=0x0050, text=»OPCONT EQU *«, t00=0x000c, t01=0x004e}
0x131c…1344              Head {h00=0x0024, h01=0x0050, text=» LD A8,PROCCB GET BUFFER ADDRESS«, t00=0x000c, t01=0x0062}
0x1344…1364              Head {h00=0x001c, h01=0x0050, text=» RF(Z) OPCO10 NO BUFFER «, t00=0x000c, t01=0x008a}
0x1364…1370              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x000c, t01=0x00aa}
0x1370…1398              Head {h00=0x0024, h01=0x0050, text=» DATA -8,PRPOOL RELEASE PRINTER «, t00=0x000c, t01=0x00b6}
0x1398…13aa              Head {h00=0x000e, h01=0x0050, text=» CM PROCCB«, t00=0x000c, t01=0x00de}
0x13aa…13be              Head {h00=0x0010, h01=0x0050, text=»OPCO10 EQU *«, t00=0x000c, t01=0x00f0}
0x13be…13d4              Head {h00=0x0012, h01=0x0050, text=» LDKL A14,STB «, t00=0x000c, t01=0x0104}
0x13d4…13e8              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x000c, t01=0x011a}
0x13e8…140a              Head {h00=0x001e, h01=0x0050, text=» CF A14,READ READ COMMAND «, t00=0x000c, t01=0x012e}
0x140a…1424              Head {h00=0x0016, h01=0x0050, text=» DATA KT100,FT100 «, t00=0x000c, t01=0x0150}
0x1424…143a              Head {h00=0x0012, h01=0x0050, text=» CF A14,HEXCH «, t00=0x000c, t01=0x016a}
0x143a…1464              Head {h00=0x0026, h01=0x0050, text=» ABL(Z) QT QUEUE AREA FOR TRANSM. «, t00=0x000c, t01=0x0180}
0x1464…1472              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x001a}
0x1472…147c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0028}
0x147c…1486              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0032}
0x1486…149a              Head {h00=0x0010, h01=0x0050, text=»*   TYPE: ? «, t00=0x000d, t01=0x003c}
0x149a…14a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0050}
0x14a4…14b8              Head {h00=0x0010, h01=0x0050, text=»ERRORA EQU *«, t00=0x000d, t01=0x005a}
0x14b8…14de              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x000d, t01=0x006e}
0x14de…14f2              Head {h00=0x0010, h01=0x0050, text=»ERROR EQU * «, t00=0x000d, t01=0x0094}
0x14f2…1518              Head {h00=0x0022, h01=0x0050, text=» LDKL A14,STB LOAD STACK BASE «, t00=0x000d, t01=0x00a8}
0x1518…1538              Head {h00=0x001c, h01=0x0050, text=» LDK A7,'?' INVALID KEY «, t00=0x000d, t01=0x00ce}
0x1538…1556              Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH PRINT '?'«, t00=0x000d, t01=0x00ee}
0x1556…1568              Head {h00=0x000e, h01=0x0050, text=» RB OPCONT«, t00=0x000d, t01=0x010c}
0x1568…1572              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x011e}
0x1572…157c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0128}
0x157c…15a0              Head {h00=0x0020, h01=0x0050, text=»KT100 DATA /0949,'LORWSXHP' «, t00=0x000d, t01=0x0132}
0x15a0…15de              Head {h00=0x003a, h01=0x0050, text=»FT100 DATA INPUT,LIST,OPEN,RESET,WRTC,RDTC,IDLE,STPCON«, t00=0x000d, t01=0x0156}
0x15de…15f4 (14, 0, 400) Head {h00=0x0012, h01=0x0050, text=» DATA PRTCON  «, t00=0x000e, t01=0x0004}
0x15f4…15fe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x001a}
0x15fe…1618              Head {h00=0x0016, h01=0x0050, text=»* PRINTER CONTROL «, t00=0x000e, t01=0x0024}
0x1618…1622              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003e}
0x1622…1638              Head {h00=0x0012, h01=0x0050, text=»PRTCON EQU *  «, t00=0x000e, t01=0x0048}
0x1638…1662              Head {h00=0x0026, h01=0x0050, text=» LD A1,PRFLAG GET THE PRINTER FLAG«, t00=0x000e, t01=0x005e}
0x1662…1688              Head {h00=0x0022, h01=0x0050, text=» RF(Z) PRTC05 NOT SET, SET IT «, t00=0x000e, t01=0x0088}
0x1688…16aa              Head {h00=0x001e, h01=0x0050, text=» CM PRFLAG SET, CLEAR IT  «, t00=0x000e, t01=0x00ae}
0x16aa…16be              Head {h00=0x0010, h01=0x0050, text=» RB OPCONT  «, t00=0x000e, t01=0x00d0}
0x16be…16d4              Head {h00=0x0012, h01=0x0050, text=»PRTC05 EQU *  «, t00=0x000e, t01=0x00e4}
0x16d4…16fc              Head {h00=0x0024, h01=0x0050, text=» LDK A1,'P' PUT A P IN THE FLAG «, t00=0x000e, t01=0x00fa}
0x16fc…1712              Head {h00=0x0012, h01=0x0050, text=» ST A1,PRFLAG «, t00=0x000e, t01=0x0122}
0x1712…1726              Head {h00=0x0010, h01=0x0050, text=» RB OPCONT  «, t00=0x000e, t01=0x0138}
0x1726…173c              Head {h00=0x0012, h01=0x0050, text=»PRFLAG EQU *  «, t00=0x000e, t01=0x014c}
0x173c…174c              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000e, t01=0x0162}
0x174c…175a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x0172}
0x175a…1764              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0180}
0x1764…176e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018a}
0x176e…1790 (15, 0, 400) Head {h00=0x001e, h01=0x0050, text=»* INPUT TO TRANSMIT BUFFER«, t00=0x000f, t01=0x0004}
0x1790…179a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0026}
0x179a…17ac              Head {h00=0x000e, h01=0x0050, text=»* A9 =LRC «, t00=0x000f, t01=0x0030}
0x17ac…17c6              Head {h00=0x0016, h01=0x0050, text=»* A10=AREA POINTER«, t00=0x000f, t01=0x0042}
0x17c6…17f2              Head {h00=0x0028, h01=0x0050, text=»* A11=CHAR COUNTER FOR CURRENT LINE «, t00=0x000f, t01=0x005c}
0x17f2…17fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0088}
0x17fc…1806              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0092}
0x1806…181a              Head {h00=0x0010, h01=0x0050, text=»INPUT EQU * «, t00=0x000f, t01=0x009c}
0x181a…1840              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x000f, t01=0x00b0}
0x1840…185c              Head {h00=0x0018, h01=0x0050, text=» CF A14,PRSPAC SPACE«, t00=0x000f, t01=0x00d6}
0x185c…1882              Head {h00=0x0022, h01=0x0050, text=» CF A14,READE READ AREA NUMBER«, t00=0x000f, t01=0x00f2}
0x1882…1892              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x000f, t01=0x0118}
0x1892…18a6              Head {h00=0x0010, h01=0x0050, text=» DATA FT200 «, t00=0x000f, t01=0x0128}
0x18a6…18ba              Head {h00=0x0010, h01=0x0050, text=»FT200 EQU * «, t00=0x000f, t01=0x013c}
0x18ba…18d0              Head {h00=0x0012, h01=0x0050, text=» CF A14,HEXCH «, t00=0x000f, t01=0x0150}
0x18d0…18e6              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) ERROR «, t00=0x000f, t01=0x0166}
0x18e6…18fa              Head {h00=0x0010, h01=0x0050, text=»IN050 EQU * «, t00=0x000f, t01=0x017c}
0x18fa…1924              Head {h00=0x0026, h01=0x0050, text=» LDKL A10,AREA COMPUT E AREA BASE «, t00=0x000f, t01=0x0190}
0x1924…193a              Head {h00=0x0012, h01=0x0050, text=»IN100 SUK A7,1«, t00=0x0010, t01=0x002a}
0x193a…194e              Head {h00=0x0010, h01=0x0050, text=» RF(N) IN120«, t00=0x0010, t01=0x0040}
0x194e…1966              Head {h00=0x0014, h01=0x0050, text=» ADKL A10,LENGTH«, t00=0x0010, t01=0x0054}
0x1966…1978              Head {h00=0x000e, h01=0x0050, text=» RB IN100 «, t00=0x0010, t01=0x006c}
0x1978…19a0              Head {h00=0x0024, h01=0x0050, text=»IN120 LDR A12,A10 SAVE AREA BASE«, t00=0x0010, t01=0x007e}
0x19a0…19b4              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0010, t01=0x00a6}
0x19b4…19d6              Head {h00=0x001e, h01=0x0050, text=» ADKL A10,2 ADJUST POINTER«, t00=0x0010, t01=0x00ba}
0x19d6…19ea              Head {h00=0x0010, h01=0x0050, text=» LDKL A11,0 «, t00=0x0010, t01=0x00dc}
0x19ea…1a08              Head {h00=0x001a, h01=0x0050, text=» LDK A5,0 RESET INDEX «, t00=0x0010, t01=0x00f0}
0x1a08…1a24              Head {h00=0x0018, h01=0x0050, text=» SUR A9,A9 RESET LRC«, t00=0x0010, t01=0x010e}
0x1a24…1a34              Head {h00=0x000c, h01=0x0050, text=» CM XBCC«, t00=0x0010, t01=0x012a}
0x1a34…1a42              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x013a}
0x1a42…1a4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0148}
0x1a4c…1a56              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0152}
0x1a56…1a70              Head {h00=0x0016, h01=0x0050, text=»* READ INPUT CHAR «, t00=0x0010, t01=0x015c}
0x1a70…1a7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0176}
0x1a7a…1a84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0180}
0x1a84…1a9e              Head {h00=0x0016, h01=0x0050, text=»IN200 CF A14,READE«, t00=0x0010, t01=0x018a}
0x1a9e…1ab8              Head {h00=0x0016, h01=0x0050, text=» DATA KT300,FT300 «, t00=0x0011, t01=0x0014}
0x1ab8…1aca              Head {h00=0x000e, h01=0x0050, text=» CM HEXCHA«, t00=0x0011, t01=0x002e}
0x1aca…1af2              Head {h00=0x0024, h01=0x0050, text=» CF A14,ITAB1 SEARCH IN TABLE 1 «, t00=0x0011, t01=0x0040}
0x1af2…1b04              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A1«, t00=0x0011, t01=0x0068}
0x1b04…1b24              Head {h00=0x001c, h01=0x0050, text=» RB(NZ) ERROR NOT FOUND «, t00=0x0011, t01=0x007a}
0x1b24…1b3e              Head {h00=0x0016, h01=0x0050, text=»IN230 CWK A11,/70 «, t00=0x0011, t01=0x009a}
0x1b3e…1b62              Head {h00=0x0020, h01=0x0050, text=» RB(NG) IN200 LINE NOT FULL «, t00=0x0011, t01=0x00b4}
0x1b62…1b80              Head {h00=0x001a, h01=0x0050, text=» CF A14,CRLF NEW LINE «, t00=0x0011, t01=0x00d8}
0x1b80…1b92              Head {h00=0x000e, h01=0x0050, text=» RB IN200 «, t00=0x0011, t01=0x00f6}
0x1b92…1bc6              Head {h00=0x0030, h01=0x0050, text=»KT300 DATA /042A,/0D2F,/2300 '*',CR,'/','#' «, t00=0x0011, t01=0x0108}
0x1bc6…1bf0              Head {h00=0x0026, h01=0x0050, text=»FT300 DATA IN900,IN900,IN800,IN700«, t00=0x0011, t01=0x013c}
0x1bf0…1bfe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0166}
0x1bfe…1c08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0174}
0x1c08…1c1e              Head {h00=0x0012, h01=0x0050, text=»*   BACK-SPACE«, t00=0x0011, t01=0x017e}
0x1c1e…1c28 (18, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0004}
0x1c28…1c32              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x000e}
0x1c32…1c48              Head {h00=0x0012, h01=0x0050, text=»IN700 SUK A5,1«, t00=0x0012, t01=0x0018}
0x1c48…1c6a              Head {h00=0x001e, h01=0x0050, text=» RF(N) IN710 BUFFER START «, t00=0x0012, t01=0x002e}
0x1c6a…1c7e              Head {h00=0x0010, h01=0x0050, text=» SUKL A10,1 «, t00=0x0012, t01=0x0050}
0x1c7e…1c90              Head {h00=0x000e, h01=0x0050, text=» RB IN200 «, t00=0x0012, t01=0x0064}
0x1c90…1ca6              Head {h00=0x0012, h01=0x0050, text=»IN710 LDK A5,0«, t00=0x0012, t01=0x0076}
0x1ca6…1cb8              Head {h00=0x000e, h01=0x0050, text=» RB IN200 «, t00=0x0012, t01=0x008c}
0x1cb8…1cc6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x009e}
0x1cc6…1cd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00ac}
0x1cd0…1cda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00b6}
0x1cda…1cf6              Head {h00=0x0018, h01=0x0050, text=»* HEXADECIMAL INPUT «, t00=0x0012, t01=0x00c0}
0x1cf6…1d00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00dc}
0x1d00…1d0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e6}
0x1d0a…1d36              Head {h00=0x0028, h01=0x0050, text=»IN800 CF A14,RDHEX READ HEXADECIMAL «, t00=0x0012, t01=0x00f0}
0x1d36…1d5a              Head {h00=0x0020, h01=0x0050, text=» LDR A6,A7 SAVE FIRST DIGIT «, t00=0x0012, t01=0x011c}
0x1d5a…1d6c              Head {h00=0x000e, h01=0x0050, text=» SLL A6,4 «, t00=0x0012, t01=0x0140}
0x1d6c…1d90              Head {h00=0x0020, h01=0x0050, text=» CF A14,RDHEX READ 2ND DIGIT«, t00=0x0012, t01=0x0152}
0x1d90…1da2              Head {h00=0x000e, h01=0x0050, text=» IM HEXCHA«, t00=0x0012, t01=0x0176}
0x1da2…1db4              Head {h00=0x000e, h01=0x0050, text=» ADR A7,A6«, t00=0x0012, t01=0x0188}
0x1db4…1dd2              Head {h00=0x001a, h01=0x0050, text=» CF A14,STORE STORE IT«, t00=0x0013, t01=0x000a}
0x1dd2…1dee              Head {h00=0x0018, h01=0x0050, text=» CF A14,PRSPAC SPACE«, t00=0x0013, t01=0x0028}
0x1dee…1e00              Head {h00=0x000e, h01=0x0050, text=» RB IN230 «, t00=0x0013, t01=0x0044}
0x1e00…1e0a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0056}
0x1e0a…1e14              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0060}
0x1e14…1e2a              Head {h00=0x0012, h01=0x0050, text=»* END OF INPUT«, t00=0x0013, t01=0x006a}
0x1e2a…1e34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0080}
0x1e34…1e3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x008a}
0x1e3e…1e58              Head {h00=0x0016, h01=0x0050, text=»IN900 LDKL A7,/FF «, t00=0x0013, t01=0x0094}
0x1e58…1e82              Head {h00=0x0026, h01=0x0050, text=» CF A14,STORE STORE END CHARACTER «, t00=0x0013, t01=0x00ae}
0x1e82…1ea2              Head {h00=0x001c, h01=0x0050, text=» STR A5,A12 SAVE LENGTH «, t00=0x0013, t01=0x00d8}
0x1ea2…1ecc              Head {h00=0x0026, h01=0x0050, text=» ABL OPCONT WAIT FOR NEXT COMMAND «, t00=0x0013, t01=0x00f8}
0x1ecc…1eda              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0122}
0x1eda…1ee4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0130}
0x1ee4…1eee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x013a}
0x1eee…1f14              Head {h00=0x0022, h01=0x0050, text=»* QUEUE AREA FOR TRANSMISSION «, t00=0x0013, t01=0x0144}
0x1f14…1f1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x016a}
0x1f1e…1f28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0174}
0x1f28…1f38              Head {h00=0x000c, h01=0x0050, text=»QT EQU *«, t00=0x0013, t01=0x017e}
0x1f38…1f56              Head {h00=0x001a, h01=0x0050, text=» LDR A2,A7 SAVE CHAR. «, t00=0x0013, t01=0x018e}
0x1f56…1f68              Head {h00=0x000e, h01=0x0050, text=» LDR A5,A7«, t00=0x0014, t01=0x001c}
0x1f68…1f94              Head {h00=0x0028, h01=0x0050, text=» CF A14,TRANSL TRANSLATE FOR PRINTER«, t00=0x0014, t01=0x002e}
0x1f94…1fba              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x0014, t01=0x005a}
0x1fba…1fd0              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,CTECB«, t00=0x0014, t01=0x0080}
0x1fd0…1fe2              Head {h00=0x000e, h01=0x0050, text=» LDK A1,4 «, t00=0x0014, t01=0x0096}
0x1fe2…2010              Head {h00=0x002a, h01=0x0050, text=» ST A1,ECBCW,A8 REMOVE REQUEST IF ANY «, t00=0x0014, t01=0x00a8}
0x2010…2024              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/84 «, t00=0x0014, t01=0x00d6}
0x2024…2030              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0014, t01=0x00ea}
0x2030…2040              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0014, t01=0x00f6}
0x2040…205e              Head {h00=0x001a, h01=0x0050, text=» LDR A7,A2 RESTORE A7 «, t00=0x0014, t01=0x0106}
0x205e…2072              Head {h00=0x0010, h01=0x0050, text=» LDKL A5,TRQ«, t00=0x0014, t01=0x0124}
0x2072…2084              Head {h00=0x000e, h01=0x0050, text=» LDK A6,1 «, t00=0x0014, t01=0x0138}
0x2084…2098              Head {h00=0x0010, h01=0x0050, text=»QT050 EQU * «, t00=0x0014, t01=0x014a}
0x2098…20aa              Head {h00=0x000e, h01=0x0050, text=» STR A7,A5«, t00=0x0014, t01=0x015e}
0x20aa…20c8              Head {h00=0x001a, h01=0x0050, text=» ADK A5,2 INCR. INDEX «, t00=0x0014, t01=0x0170}
0x20c8…20dc              Head {h00=0x0010, h01=0x0050, text=» LDK A7,':' «, t00=0x0014, t01=0x018e}
0x20dc…20f8              Head {h00=0x0018, h01=0x0050, text=» CF A14,PRCH PRINT @«, t00=0x0015, t01=0x0012}
0x20f8…210a              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0015, t01=0x002e}
0x210a…212e              Head {h00=0x0020, h01=0x0050, text=» CF A14,QTREAD READ TIME OUT«, t00=0x0015, t01=0x0040}
0x212e…2140              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A7«, t00=0x0015, t01=0x0064}
0x2140…2152              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0015, t01=0x0076}
0x2152…2168              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) QT060 «, t00=0x0015, t01=0x0088}
0x2168…217e              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0015, t01=0x009e}
0x217e…2192              Head {h00=0x0010, h01=0x0050, text=»QT060 EQU * «, t00=0x0015, t01=0x00b4}
0x2192…21a8              Head {h00=0x0012, h01=0x0050, text=» CF A14,QTREAD«, t00=0x0015, t01=0x00c8}
0x21a8…21ba              Head {h00=0x000e, h01=0x0050, text=» SLL A3,4 «, t00=0x0015, t01=0x00de}
0x21ba…21cc              Head {h00=0x000e, h01=0x0050, text=» ORR A3,A7«, t00=0x0015, t01=0x00f0}
0x21cc…21de              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0015, t01=0x0102}
0x21de…21f4              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) QT070 «, t00=0x0015, t01=0x0114}
0x21f4…220a              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0015, t01=0x012a}
0x220a…221e              Head {h00=0x0010, h01=0x0050, text=»QT070 EQU * «, t00=0x0015, t01=0x0140}
0x221e…2234              Head {h00=0x0012, h01=0x0050, text=» CF A14,QTREAD«, t00=0x0015, t01=0x0154}
0x2234…2246              Head {h00=0x000e, h01=0x0050, text=» ABL ERROR«, t00=0x0015, t01=0x016a}
0x2246…2250              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x017c}
0x2250…225a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0186}
0x225a…228c              Head {h00=0x002e, h01=0x0050, text=»* COMMA; READ NEXT TANSMITT BUFFER NUMBER «, t00=0x0015, t01=0x0190}
0x228c…2296              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0032}
0x2296…22a0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x003c}
0x22a0…22b4              Head {h00=0x0010, h01=0x0050, text=»QT100 EQU * «, t00=0x0016, t01=0x0046}
0x22b4…22ca              Head {h00=0x0012, h01=0x0050, text=» LDKL A14,STB «, t00=0x0016, t01=0x005a}
0x22ca…22ec              Head {h00=0x001e, h01=0x0050, text=» STR A3,A5 STORE TIME OUT «, t00=0x0016, t01=0x0070}
0x22ec…2308              Head {h00=0x0018, h01=0x0050, text=» ADK A5,2 INCR INDEX«, t00=0x0016, t01=0x0092}
0x2308…231a              Head {h00=0x000e, h01=0x0050, text=» CWK A6,60«, t00=0x0016, t01=0x00ae}
0x231a…2330              Head {h00=0x0012, h01=0x0050, text=» RF(NG) QT101 «, t00=0x0016, t01=0x00c0}
0x2330…2344              Head {h00=0x0010, h01=0x0050, text=» LDKL A11,1 «, t00=0x0016, t01=0x00d6}
0x2344…2356              Head {h00=0x000e, h01=0x0050, text=» LDK A6,1 «, t00=0x0016, t01=0x00ea}
0x2356…236a              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0016, t01=0x00fc}
0x236a…237e              Head {h00=0x0010, h01=0x0050, text=»QT101 EQU * «, t00=0x0016, t01=0x0110}
0x237e…2394              Head {h00=0x0012, h01=0x0050, text=» CF A14,QTRED1«, t00=0x0016, t01=0x0124}
0x2394…23a6              Head {h00=0x000e, h01=0x0050, text=» ABL QT050«, t00=0x0016, t01=0x013a}
0x23a6…23b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x014c}
0x23b0…23ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0156}
0x23ba…23de              Head {h00=0x0020, h01=0x0050, text=»* SEND; ACTIVATE WRITE TASK «, t00=0x0016, t01=0x0160}
0x23de…23e8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x0184}
0x23e8…23f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0016, t01=0x018e}
0x23f2…2406              Head {h00=0x0010, h01=0x0050, text=»QT150 EQU * «, t00=0x0017, t01=0x0008}
0x2406…2428              Head {h00=0x001e, h01=0x0050, text=» STR A3,A5 STORE TIME OUT «, t00=0x0017, t01=0x001c}
0x2428…2444              Head {h00=0x0018, h01=0x0050, text=» ADK A5,2 INCR INDEX«, t00=0x0017, t01=0x003e}
0x2444…245a              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/FFFF«, t00=0x0017, t01=0x005a}
0x245a…246c              Head {h00=0x000e, h01=0x0050, text=» STR A3,A5«, t00=0x0017, t01=0x0070}
0x246c…2480              Head {h00=0x0010, h01=0x0050, text=»QT155 EQU * «, t00=0x0017, t01=0x0082}
0x2480…2496              Head {h00=0x0012, h01=0x0050, text=» LDKL A7,'UT' «, t00=0x0017, t01=0x0096}
0x2496…24a2              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0017, t01=0x00ac}
0x24a2…24b8              Head {h00=0x0012, h01=0x0050, text=» DATA -4,WRITE«, t00=0x0017, t01=0x00b8}
0x24b8…24cc              Head {h00=0x0010, h01=0x0050, text=» ABL OPCONT «, t00=0x0017, t01=0x00ce}
0x24cc…24d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00e2}
0x24d6…24f0              Head {h00=0x0016, h01=0x0050, text=»* SEND CONTINUOUS «, t00=0x0017, t01=0x00ec}
0x24f0…24fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0106}
0x24fa…250e              Head {h00=0x0010, h01=0x0050, text=»QT160 EQU * «, t00=0x0017, t01=0x0110}
0x250e…2530              Head {h00=0x001e, h01=0x0050, text=» STR A3,A5 STORE TIME OUT «, t00=0x0017, t01=0x0124}
0x2530…254e              Head {h00=0x001a, h01=0x0050, text=» ADK A5,2 INCR. INDEX «, t00=0x0017, t01=0x0146}
0x254e…257a              Head {h00=0x0028, h01=0x0050, text=» LDKL A3,/CCCC INDICATE CONTINUOUS  «, t00=0x0017, t01=0x0164}
0x257a…258e              Head {h00=0x0010, h01=0x0050, text=» STR A3,A5  «, t00=0x0017, t01=0x0190}
0x258e…25b2              Head {h00=0x0020, h01=0x0050, text=» ST A5,CUEND SAVE QUEUE-END «, t00=0x0018, t01=0x0014}
0x25b2…25d8              Head {h00=0x0022, h01=0x0050, text=» RB QT155 ACTIVATE WRITE TASK «, t00=0x0018, t01=0x0038}
0x25d8…25ec              Head {h00=0x0010, h01=0x0050, text=»CUEND EQU * «, t00=0x0018, t01=0x005e}
0x25ec…25fc              Head {h00=0x000c, h01=0x0050, text=» DATA 0 «, t00=0x0018, t01=0x0072}
0x25fc…2606              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0082}
0x2606…2628              Head {h00=0x001e, h01=0x0050, text=»* STOP CONTINUOUS SENDING «, t00=0x0018, t01=0x008c}
0x2628…2632              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x00ae}
0x2632…2648              Head {h00=0x0012, h01=0x0050, text=»STPCON EQU *  «, t00=0x0018, t01=0x00b8}
0x2648…2674              Head {h00=0x0028, h01=0x0050, text=» LD A5,CUEND RESTORE QUEUE POINTER  «, t00=0x0018, t01=0x00ce}
0x2674…269a              Head {h00=0x0022, h01=0x0050, text=» ABL(Z) OPCONT NO QUEUE, QUIT «, t00=0x0018, t01=0x00fa}
0x269a…26c8              Head {h00=0x002a, h01=0x0050, text=» LDKL A3,/FFFF END OF QUEUE INDICATION«, t00=0x0018, t01=0x0120}
0x26c8…26ee              Head {h00=0x0022, h01=0x0050, text=» STR A3,A5 FLAG END OF QUEUE. «, t00=0x0018, t01=0x014e}
0x26ee…2714              Head {h00=0x0022, h01=0x0050, text=» CM CUEND CLEAR QUEUE POINTER «, t00=0x0018, t01=0x0174}
0x2714…2738              Head {h00=0x0020, h01=0x0050, text=» ABL OPCONT GET NEXT COMMAND«, t00=0x0019, t01=0x000a}
0x2738…2742              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x002e}
0x2742…2764              Head {h00=0x001e, h01=0x0050, text=»* + ; READ TRANSMIT DELAY «, t00=0x0019, t01=0x0038}
0x2764…276e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005a}
0x276e…2782              Head {h00=0x0010, h01=0x0050, text=»QT200 EQU * «, t00=0x0019, t01=0x0064}
0x2782…2798              Head {h00=0x0012, h01=0x0050, text=» LDKL A14,STB «, t00=0x0019, t01=0x0078}
0x2798…27ae              Head {h00=0x0012, h01=0x0050, text=» LDKL A3,/8000«, t00=0x0019, t01=0x008e}
0x27ae…27c4              Head {h00=0x0012, h01=0x0050, text=» CF A14,RDHEX «, t00=0x0019, t01=0x00a4}
0x27c4…27d6              Head {h00=0x000e, h01=0x0050, text=» ADR A3,A7«, t00=0x0019, t01=0x00ba}
0x27d6…27ec              Head {h00=0x0012, h01=0x0050, text=» CF A14,QTREAD«, t00=0x0019, t01=0x00cc}
0x27ec…27fe              Head {h00=0x000e, h01=0x0050, text=» SLL A3,4 «, t00=0x0019, t01=0x00e2}
0x27fe…2814              Head {h00=0x0012, h01=0x0050, text=» ADKL A3,/8000«, t00=0x0019, t01=0x00f4}
0x2814…2826              Head {h00=0x000e, h01=0x0050, text=» ORR A3,A7«, t00=0x0019, t01=0x010a}
0x2826…2838              Head {h00=0x000e, h01=0x0050, text=» RB QT070 «, t00=0x0019, t01=0x011c}
0x2838…2846              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0019, t01=0x012e}
0x2846…2850              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x013c}
0x2850…285a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0146}
0x285a…2872              Head {h00=0x0014, h01=0x0050, text=»* READ TIME OUT «, t00=0x0019, t01=0x0150}
0x2872…287c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0168}
0x287c…2886              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0172}
0x2886…289a              Head {h00=0x0010, h01=0x0050, text=»QTREAD EQU *«, t00=0x0019, t01=0x017c}
0x289a…28b0              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,TRQE «, t00=0x0019, t01=0x0190}
0x28b0…28c2              Head {h00=0x000e, h01=0x0050, text=» SUK A1,10«, t00=0x001a, t01=0x0016}
0x28c2…28d4              Head {h00=0x000e, h01=0x0050, text=» CWR A5,A1«, t00=0x001a, t01=0x0028}
0x28d4…28ea              Head {h00=0x0012, h01=0x0050, text=» ABL(G) ERROR «, t00=0x001a, t01=0x003a}
0x28ea…28fc              Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x001a, t01=0x0050}
0x28fc…2912              Head {h00=0x0012, h01=0x0050, text=» CF A14,READE «, t00=0x001a, t01=0x0062}
0x2912…292c              Head {h00=0x0016, h01=0x0050, text=» DATA KT600,FT600 «, t00=0x001a, t01=0x0078}
0x292c…2942              Head {h00=0x0012, h01=0x0050, text=» CF A14,HEXCH «, t00=0x001a, t01=0x0092}
0x2942…2958              Head {h00=0x0012, h01=0x0050, text=» ABL(NZ) ERROR«, t00=0x001a, t01=0x00a8}
0x2958…296a              Head {h00=0x000e, h01=0x0050, text=» RTN  A14 «, t00=0x001a, t01=0x00be}
0x296a…2974              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00d0}
0x2974…297e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x00da}
0x297e…29b4              Head {h00=0x0032, h01=0x0050, text=»KT600 DATA /042C,/280D,/4C00 ',''(''CR' OR'Z' «, t00=0x001a, t01=0x00e4}
0x29b4…29e0              Head {h00=0x0028, h01=0x0050, text=»FT600 DATA QT100,QT150,QT150,QT160  «, t00=0x001a, t01=0x011a}
0x29e0…29ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x0146}
0x29ea…2a08              Head {h00=0x001a, h01=0x0050, text=»* READ BUFFER NR OR + «, t00=0x001a, t01=0x0150}
0x2a08…2a12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001a, t01=0x016e}
0x2a12…2a26              Head {h00=0x0010, h01=0x0050, text=»QTRED1 EQU *«, t00=0x001a, t01=0x0178}
0x2a26…2a3c              Head {h00=0x0012, h01=0x0050, text=» LDKL A1,TRQE «, t00=0x001a, t01=0x018c}
0x2a3c…2a4e              Head {h00=0x000e, h01=0x0050, text=» SUK A1,10«, t00=0x001b, t01=0x0012}
0x2a4e…2a60              Head {h00=0x000e, h01=0x0050, text=» CWR A5,A1«, t00=0x001b, t01=0x0024}
0x2a60…2a76              Head {h00=0x0012, h01=0x0050, text=» ABL(G) ERROR «, t00=0x001b, t01=0x0036}
0x2a76…2a88              Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x001b, t01=0x004c}
0x2a88…2a9e              Head {h00=0x0012, h01=0x0050, text=» CF A14,READE «, t00=0x001b, t01=0x005e}
0x2a9e…2ab8              Head {h00=0x0016, h01=0x0050, text=» DATA KT650,FT650 «, t00=0x001b, t01=0x0074}
0x2ab8…2ace              Head {h00=0x0012, h01=0x0050, text=» CF A14,HEXCH «, t00=0x001b, t01=0x008e}
0x2ace…2ae4              Head {h00=0x0012, h01=0x0050, text=» ABL(NZ) ERROR«, t00=0x001b, t01=0x00a4}
0x2ae4…2af4              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001b, t01=0x00ba}
0x2af4…2afe              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00ca}
0x2afe…2b16              Head {h00=0x0014, h01=0x0050, text=»KT650 DATA /012B«, t00=0x001b, t01=0x00d4}
0x2b16…2b2e              Head {h00=0x0014, h01=0x0050, text=»FT650 DATA QT200«, t00=0x001b, t01=0x00ec}
0x2b2e…2b3c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0104}
0x2b3c…2b46              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0112}
0x2b46…2b50              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x011c}
0x2b50…2b7c              Head {h00=0x0028, h01=0x0050, text=»* CHECK HEXADEC. INPUT AND TRANSLATE«, t00=0x001b, t01=0x0126}
0x2b7c…2b86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0152}
0x2b86…2b9a              Head {h00=0x0010, h01=0x0050, text=»*  CR=0  OK «, t00=0x001b, t01=0x015c}
0x2b9a…2bb8              Head {h00=0x001a, h01=0x0050, text=»* CR=1,2  ILLEGAL CHAR«, t00=0x001b, t01=0x0170}
0x2bb8…2bc2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x018e}
0x2bc2…2bcc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0008}
0x2bcc…2be0              Head {h00=0x0010, h01=0x0050, text=»HEXCH EQU * «, t00=0x001c, t01=0x0012}
0x2be0…2bfe              Head {h00=0x001a, h01=0x0050, text=» ADKL A14,4 SKIP STACK«, t00=0x001c, t01=0x0026}
0x2bfe…2c10              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x001c, t01=0x0044}
0x2c10…2c24              Head {h00=0x0010, h01=0x0050, text=» SUK A1,'0' «, t00=0x001c, t01=0x0056}
0x2c24…2c3a              Head {h00=0x0012, h01=0x0050, text=» RF(N) HEXC90 «, t00=0x001c, t01=0x006a}
0x2c3a…2c4c              Head {h00=0x000e, h01=0x0050, text=» SUK A1,9 «, t00=0x001c, t01=0x0080}
0x2c4c…2c6a              Head {h00=0x001a, h01=0x0050, text=» RF(NP) HEXC10 NUMBER «, t00=0x001c, t01=0x0092}
0x2c6a…2c7c              Head {h00=0x000e, h01=0x0050, text=» SUK A1,8 «, t00=0x001c, t01=0x00b0}
0x2c7c…2c92              Head {h00=0x0012, h01=0x0050, text=» RF(N) HEXC90 «, t00=0x001c, t01=0x00c2}
0x2c92…2ca4              Head {h00=0x000e, h01=0x0050, text=» SUK A1,5 «, t00=0x001c, t01=0x00d8}
0x2ca4…2cba              Head {h00=0x0012, h01=0x0050, text=» RF(P) HEXC90 «, t00=0x001c, t01=0x00ea}
0x2cba…2ce2              Head {h00=0x0024, h01=0x0050, text=» ADK A1,15 TRANSLATE HEX LETTER «, t00=0x001c, t01=0x0100}
0x2ce2…2cf4              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x001c, t01=0x0128}
0x2cf4…2d06              Head {h00=0x000e, h01=0x0050, text=» RF HEX20 «, t00=0x001c, t01=0x013a}
0x2d06…2d1a              Head {h00=0x0010, h01=0x0050, text=»HEXC10 EQU *«, t00=0x001c, t01=0x014c}
0x2d1a…2d2c              Head {h00=0x000e, h01=0x0050, text=» ADK A1,9 «, t00=0x001c, t01=0x0160}
0x2d2c…2d3e              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A1«, t00=0x001c, t01=0x0172}
0x2d3e…2d52              Head {h00=0x0010, h01=0x0050, text=»HEX20 EQU * «, t00=0x001c, t01=0x0184}
0x2d52…2d64              Head {h00=0x000e, h01=0x0050, text=» SUR A1,A1«, t00=0x001d, t01=0x0008}
0x2d64…2d76              Head {h00=0x000e, h01=0x0050, text=» RF HEX99 «, t00=0x001d, t01=0x001a}
0x2d76…2d8a              Head {h00=0x0010, h01=0x0050, text=»HEXC90 EQU *«, t00=0x001d, t01=0x002c}
0x2d8a…2d9c              Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x001d, t01=0x0040}
0x2d9c…2db0              Head {h00=0x0010, h01=0x0050, text=»HEX99 EQU * «, t00=0x001d, t01=0x0052}
0x2db0…2dc2              Head {h00=0x000e, h01=0x0050, text=» ABR* A14 «, t00=0x001d, t01=0x0066}
0x2dc2…2dd0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0078}
0x2dd0…2dda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0086}
0x2dda…2de4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0090}
0x2de4…2dfa              Head {h00=0x0012, h01=0x0050, text=»* LIST COMMAND«, t00=0x001d, t01=0x009a}
0x2dfa…2e04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b0}
0x2e04…2e0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ba}
0x2e0e…2e20              Head {h00=0x000e, h01=0x0050, text=»LIST EQU *«, t00=0x001d, t01=0x00c4}
0x2e20…2e46              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x001d, t01=0x00d6}
0x2e46…2e5c              Head {h00=0x0012, h01=0x0050, text=» CF A14,PRSPAC«, t00=0x001d, t01=0x00fc}
0x2e5c…2e72              Head {h00=0x0012, h01=0x0050, text=» CF A14,READE «, t00=0x001d, t01=0x0112}
0x2e72…2e88              Head {h00=0x0012, h01=0x0050, text=» DATA 0,FT400 «, t00=0x001d, t01=0x0128}
0x2e88…2e9c              Head {h00=0x0010, h01=0x0050, text=»FT400 EQU * «, t00=0x001d, t01=0x013e}
0x2e9c…2eb2              Head {h00=0x0012, h01=0x0050, text=» CF A14,HEXCH «, t00=0x001d, t01=0x0152}
0x2eb2…2ec6              Head {h00=0x0010, h01=0x0050, text=» RF(Z) LI100«, t00=0x001d, t01=0x0168}
0x2ec6…2eda              Head {h00=0x0010, h01=0x0050, text=» CWK A7,/2A «, t00=0x001d, t01=0x017c}
0x2eda…2ef0              Head {h00=0x0012, h01=0x0050, text=» RF(Z) LISALL «, t00=0x001d, t01=0x0190}
0x2ef0…2f08              Head {h00=0x0014, h01=0x0050, text=» CWK A7,/0D CR? «, t00=0x001e, t01=0x0016}
0x2f08…2f1e              Head {h00=0x0012, h01=0x0050, text=» ABL(NZ) ERROR«, t00=0x001e, t01=0x002e}
0x2f1e…2f2c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001e, t01=0x0044}
0x2f2c…2f36              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0052}
0x2f36…2f40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005c}
0x2f40…2f58              Head {h00=0x0014, h01=0x0050, text=»* LIST ALL AREAS«, t00=0x001e, t01=0x0066}
0x2f58…2f62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x007e}
0x2f62…2f6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0088}
0x2f6c…2f96              Head {h00=0x0026, h01=0x0050, text=»LISALL LDK A5,0 AREA NUMBER IN A5 «, t00=0x001e, t01=0x0092}
0x2f96…2fc0              Head {h00=0x0026, h01=0x0050, text=»LISA10 CF A14,LISAR LIST ONE AREA «, t00=0x001e, t01=0x00bc}
0x2fc0…2fd2              Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x001e, t01=0x00e6}
0x2fd2…2fe4              Head {h00=0x000e, h01=0x0050, text=» CWK A5,16«, t00=0x001e, t01=0x00f8}
0x2fe4…2ffa              Head {h00=0x0012, h01=0x0050, text=» RB(NE) LISA10«, t00=0x001e, t01=0x010a}
0x2ffa…300e              Head {h00=0x0010, h01=0x0050, text=» ABL OPCONT «, t00=0x001e, t01=0x0120}
0x300e…3018              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0134}
0x3018…3022              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x013e}
0x3022…303a              Head {h00=0x0014, h01=0x0050, text=»* LIST ONE AREA «, t00=0x001e, t01=0x0148}
0x303a…3044              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0160}
0x3044…304e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x016a}
0x304e…3062              Head {h00=0x0010, h01=0x0050, text=»LI100 EQU * «, t00=0x001e, t01=0x0174}
0x3062…3074              Head {h00=0x000e, h01=0x0050, text=» LDR A5,A7«, t00=0x001e, t01=0x0188}
0x3074…308a              Head {h00=0x0012, h01=0x0050, text=» CF A14,LISAR «, t00=0x001f, t01=0x000a}
0x308a…309e              Head {h00=0x0010, h01=0x0050, text=» ABL OPCONT «, t00=0x001f, t01=0x0020}
0x309e…30a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0034}
0x30a8…30b2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x003e}
0x30b2…30dc              Head {h00=0x0026, h01=0x0050, text=»* TRANSLATE NUMBER IN A7 TO ASCII «, t00=0x001f, t01=0x0048}
0x30dc…30e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0072}
0x30e6…30f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x007c}
0x30f0…3104              Head {h00=0x0010, h01=0x0050, text=»TRANSL EQU *«, t00=0x001f, t01=0x0086}
0x3104…3118              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x001f, t01=0x009a}
0x3118…312c              Head {h00=0x0010, h01=0x0050, text=» LDK A7,'0' «, t00=0x001f, t01=0x00ae}
0x312c…3150              Head {h00=0x0020, h01=0x0050, text=» ADR A7,A5 PRINT AREA NUMBER«, t00=0x001f, t01=0x00c2}
0x3150…3164              Head {h00=0x0010, h01=0x0050, text=» CWK A7,/39 «, t00=0x001f, t01=0x00e6}
0x3164…317a              Head {h00=0x0012, h01=0x0050, text=» RF(NG) LI180 «, t00=0x001f, t01=0x00fa}
0x317a…318c              Head {h00=0x000e, h01=0x0050, text=» ADK A7,7 «, t00=0x001f, t01=0x0110}
0x318c…31a0              Head {h00=0x0010, h01=0x0050, text=»LI180 EQU * «, t00=0x001f, t01=0x0122}
0x31a0…31b0              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x001f, t01=0x0136}
0x31b0…31be              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0146}
0x31be…31c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0154}
0x31c8…31d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x015e}
0x31d2…31ea              Head {h00=0x0014, h01=0x0050, text=»* LIST ONE AREA «, t00=0x001f, t01=0x0168}
0x31ea…31f4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0180}
0x31f4…3216              Head {h00=0x001e, h01=0x0050, text=»* A5 CONTAINS AREA NUMBER «, t00=0x001f, t01=0x018a}
0x3216…3220              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x001c}
0x3220…322a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0026}
0x322a…323e              Head {h00=0x0010, h01=0x0050, text=»LISAR EQU * «, t00=0x0020, t01=0x0030}
0x323e…3254              Head {h00=0x0012, h01=0x0050, text=» CF A14,TRANSL«, t00=0x0020, t01=0x0044}
0x3254…3268              Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0020, t01=0x005a}
0x3268…327a              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0020, t01=0x006e}
0x327a…32a2              Head {h00=0x0024, h01=0x0050, text=» ST A1,PRECBL EMPTY PRINTBUFFER «, t00=0x0020, t01=0x0080}
0x32a2…32b4              Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0020, t01=0x00a8}
0x32b4…32ca              Head {h00=0x0012, h01=0x0050, text=» ST A1,LSPACE «, t00=0x0020, t01=0x00ba}
0x32ca…32e0              Head {h00=0x0012, h01=0x0050, text=» LDKL A10,AREA«, t00=0x0020, t01=0x00d0}
0x32e0…32f2              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0020, t01=0x00e6}
0x32f2…330a              Head {h00=0x0014, h01=0x0050, text=»LI200 CWR A1,A5 «, t00=0x0020, t01=0x00f8}
0x330a…331e              Head {h00=0x0010, h01=0x0050, text=» RF(E) LI210«, t00=0x0020, t01=0x0110}
0x331e…3336              Head {h00=0x0014, h01=0x0050, text=» ADKL A10,LENGTH«, t00=0x0020, t01=0x0124}
0x3336…3348              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0020, t01=0x013c}
0x3348…335a              Head {h00=0x000e, h01=0x0050, text=» RB LI200 «, t00=0x0020, t01=0x014e}
0x335a…337e              Head {h00=0x0020, h01=0x0050, text=»LI210 LDR* A9,A10 GET LENGTH«, t00=0x0020, t01=0x0160}
0x337e…3392              Head {h00=0x0010, h01=0x0050, text=» CWK A9,500 «, t00=0x0020, t01=0x0184}
0x3392…33a8              Head {h00=0x0012, h01=0x0050, text=» RF(NG) LI215 «, t00=0x0021, t01=0x0008}
0x33a8…33ba              Head {h00=0x000e, h01=0x0050, text=» LDKL A9,0«, t00=0x0021, t01=0x001e}
0x33ba…33ce              Head {h00=0x0010, h01=0x0050, text=»LI215 EQU * «, t00=0x0021, t01=0x0030}
0x33ce…33e2              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,2 «, t00=0x0021, t01=0x0044}
0x33e2…33fa              Head {h00=0x0014, h01=0x0050, text=»LI220 SUKL A9,1 «, t00=0x0021, t01=0x0058}
0x33fa…341a              Head {h00=0x001c, h01=0x0050, text=» RF(N) LI250 ALL EDITED «, t00=0x0021, t01=0x0070}
0x341a…343c              Head {h00=0x001e, h01=0x0050, text=» LCR A7,A10 GET CHARACTER «, t00=0x0021, t01=0x0090}
0x343c…3450              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x0021, t01=0x00b2}
0x3450…3462              Head {h00=0x000e, h01=0x0050, text=» CW A7,ETX«, t00=0x0021, t01=0x00c6}
0x3462…347a              Head {h00=0x0014, h01=0x0050, text=» RF(E) LI270 ETX«, t00=0x0021, t01=0x00d8}
0x347a…348c              Head {h00=0x000e, h01=0x0050, text=» CW A7,ETB«, t00=0x0021, t01=0x00f0}
0x348c…34a4              Head {h00=0x0014, h01=0x0050, text=» RF(E) LI270 ETB«, t00=0x0021, t01=0x0102}
0x34a4…34b8              Head {h00=0x0010, h01=0x0050, text=» LD A1,CODE «, t00=0x0021, t01=0x011a}
0x34b8…34d4              Head {h00=0x0018, h01=0x0050, text=» RF(NZ) LI260 EBCDIC«, t00=0x0021, t01=0x012e}
0x34d4…34ea              Head {h00=0x0012, h01=0x0050, text=» CF A14,STAB1 «, t00=0x0021, t01=0x014a}
0x34ea…350a              Head {h00=0x001c, h01=0x0050, text=» RF(Z) LI230 TEXT FOUND «, t00=0x0021, t01=0x0160}
0x350a…3520              Head {h00=0x0012, h01=0x0050, text=» CF A14,STAB2 «, t00=0x0021, t01=0x0180}
0x3520…3540              Head {h00=0x001c, h01=0x0050, text=» RF(Z) LI230 TEXT FOUND «, t00=0x0022, t01=0x0008}
0x3540…3554              Head {h00=0x0010, h01=0x0050, text=»LI225 EQU * «, t00=0x0022, t01=0x0028}
0x3554…3578              Head {h00=0x0020, h01=0x0050, text=» CF A14,EDHEXL EDIT IN HEXA «, t00=0x0022, t01=0x003c}
0x3578…358c              Head {h00=0x0010, h01=0x0050, text=»LI230 EQU * «, t00=0x0022, t01=0x0060}
0x358c…35a0              Head {h00=0x0010, h01=0x0050, text=» LDK A1,100 «, t00=0x0022, t01=0x0074}
0x35a0…35b6              Head {h00=0x0012, h01=0x0050, text=» CW A1,PRECBL «, t00=0x0022, t01=0x0088}
0x35b6…35ca              Head {h00=0x0010, h01=0x0050, text=» RB(G) LI220«, t00=0x0022, t01=0x009e}
0x35ca…35de              Head {h00=0x0010, h01=0x0050, text=»LI240 EQU * «, t00=0x0022, t01=0x00b2}
0x35de…35f4              Head {h00=0x0012, h01=0x0050, text=» CF A14,PRLINE«, t00=0x0022, t01=0x00c6}
0x35f4…3606              Head {h00=0x000e, h01=0x0050, text=» RB LI220 «, t00=0x0022, t01=0x00dc}
0x3606…361a              Head {h00=0x0010, h01=0x0050, text=»LI250 EQU * «, t00=0x0022, t01=0x00ee}
0x361a…3630              Head {h00=0x0012, h01=0x0050, text=» CF A14,PRLINE«, t00=0x0022, t01=0x0102}
0x3630…3640              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0022, t01=0x0118}
0x3640…3654              Head {h00=0x0010, h01=0x0050, text=»LI260 EQU * «, t00=0x0022, t01=0x0128}
0x3654…366a              Head {h00=0x0012, h01=0x0050, text=» CF A14,STAB3 «, t00=0x0022, t01=0x013c}
0x366a…367e              Head {h00=0x0010, h01=0x0050, text=» RB(Z) LI230«, t00=0x0022, t01=0x0152}
0x367e…3694              Head {h00=0x0012, h01=0x0050, text=» CF A14,STAB4 «, t00=0x0022, t01=0x0166}
0x3694…36a8              Head {h00=0x0010, h01=0x0050, text=» RB(Z) LI230«, t00=0x0022, t01=0x017c}
0x36a8…36ba              Head {h00=0x000e, h01=0x0050, text=» RB LI225 «, t00=0x0022, t01=0x0190}
0x36ba…36ce              Head {h00=0x0010, h01=0x0050, text=»LI270 EQU * «, t00=0x0023, t01=0x0012}
0x36ce…36e2              Head {h00=0x0010, h01=0x0050, text=» LD A1,CODE «, t00=0x0023, t01=0x0026}
0x36e2…36f8              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LI280 «, t00=0x0023, t01=0x003a}
0x36f8…3714              Head {h00=0x0018, h01=0x0050, text=» CF A14,STAB2 ASCII «, t00=0x0023, t01=0x0050}
0x3714…3728              Head {h00=0x0010, h01=0x0050, text=»LI275 EQU * «, t00=0x0023, t01=0x006c}
0x3728…373a              Head {h00=0x000e, h01=0x0050, text=» SUKL A9,1«, t00=0x0023, t01=0x0080}
0x373a…3758              Head {h00=0x001a, h01=0x0050, text=» RB(N) LI250 ALL DONE «, t00=0x0023, t01=0x0092}
0x3758…3774              Head {h00=0x0018, h01=0x0050, text=» LCR A7,A10 GET LRC «, t00=0x0023, t01=0x00b0}
0x3774…3788              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x0023, t01=0x00cc}
0x3788…379e              Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEXL«, t00=0x0023, t01=0x00e0}
0x379e…37b0              Head {h00=0x000e, h01=0x0050, text=» RB LI230 «, t00=0x0023, t01=0x00f6}
0x37b0…37c4              Head {h00=0x0010, h01=0x0050, text=»LI280 EQU * «, t00=0x0023, t01=0x0108}
0x37c4…37e0              Head {h00=0x0018, h01=0x0050, text=» CF A14,STAB4 EBCDIC«, t00=0x0023, t01=0x011c}
0x37e0…37f2              Head {h00=0x000e, h01=0x0050, text=» SUKL A9,1«, t00=0x0023, t01=0x0138}
0x37f2…3810              Head {h00=0x001a, h01=0x0050, text=» RB(N) LI250 ALL DONE «, t00=0x0023, t01=0x014a}
0x3810…383c              Head {h00=0x0028, h01=0x0050, text=» LCR A7,A10 GET FIRST CRC CHARACTER «, t00=0x0023, t01=0x0168}
0x383c…3850 (36, 0, 400) Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x0024, t01=0x0004}
0x3850…3866              Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEXL«, t00=0x0024, t01=0x0018}
0x3866…3878              Head {h00=0x000e, h01=0x0050, text=» RB LI275 «, t00=0x0024, t01=0x002e}
0x3878…3886              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x0040}
0x3886…3890              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x004e}
0x3890…389a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0058}
0x389a…38b4              Head {h00=0x0016, h01=0x0050, text=»* CONTROL COMMANDS«, t00=0x0024, t01=0x0062}
0x38b4…38be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x007c}
0x38be…38c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x0086}
0x38c8…38f2              Head {h00=0x0026, h01=0x0050, text=»IDLE LDK A2,6 SHIFT IDLE TRANSMITT«, t00=0x0024, t01=0x0090}
0x38f2…3904              Head {h00=0x000e, h01=0x0050, text=» RF WRCTRL«, t00=0x0024, t01=0x00ba}
0x3904…391a              Head {h00=0x0012, h01=0x0050, text=»OPEN LDK A2,1 «, t00=0x0024, t01=0x00cc}
0x391a…392c              Head {h00=0x000e, h01=0x0050, text=» RF WRCTRL«, t00=0x0024, t01=0x00e2}
0x392c…3942              Head {h00=0x0012, h01=0x0050, text=»RESET LDK A2,2«, t00=0x0024, t01=0x00f4}
0x3942…3956              Head {h00=0x0010, h01=0x0050, text=»WRCTRL EQU *«, t00=0x0024, t01=0x010a}
0x3956…397c              Head {h00=0x0022, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER «, t00=0x0024, t01=0x011e}
0x397c…39a4              Head {h00=0x0024, h01=0x0050, text=» LDKL A8,CTECB LOAD ECB ADDRESS «, t00=0x0024, t01=0x0144}
0x39a4…39c2              Head {h00=0x001a, h01=0x0050, text=» LDK A7,/84 AND AORDER«, t00=0x0024, t01=0x016c}
0x39c2…39ee              Head {h00=0x0028, h01=0x0050, text=» ST A2,ECBCW,A8 STORE COMMAND IN CW «, t00=0x0024, t01=0x018a}
0x39ee…39fa              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0025, t01=0x0026}
0x39fa…3a0a              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0025, t01=0x0032}
0x3a0a…3a2a              Head {h00=0x001c, h01=0x0050, text=» ABL OPCONT NEXT COMMAND«, t00=0x0025, t01=0x0042}
0x3a2a…3a34              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x0062}
0x3a34…3a3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x006c}
0x3a3e…3a5e              Head {h00=0x001c, h01=0x0050, text=»CTECB DATA /60,0,0,0,0,0«, t00=0x0025, t01=0x0076}
0x3a5e…3a6c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0025, t01=0x0096}
0x3a6c…3a76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00a4}
0x3a76…3a80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00ae}
0x3a80…3aa6              Head {h00=0x0022, h01=0x0050, text=»* PRINT ONE CHARACTER FROM A7 «, t00=0x0025, t01=0x00b8}
0x3aa6…3ab0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00de}
0x3ab0…3aba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0025, t01=0x00e8}
0x3aba…3ad4              Head {h00=0x0016, h01=0x0050, text=»PRCH LDKL A8,PRECB«, t00=0x0025, t01=0x00f2}
0x3ad4…3aec              Head {h00=0x0014, h01=0x0050, text=» SC* A7,ECBBA,A8«, t00=0x0025, t01=0x010c}
0x3aec…3b00              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/85 «, t00=0x0025, t01=0x0124}
0x3b00…3b0c              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0025, t01=0x0138}
0x3b0c…3b1c              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0025, t01=0x0144}
0x3b1c…3b40              Head {h00=0x0020, h01=0x0050, text=» ADKL A11,1 COUNT CHARACTERS«, t00=0x0025, t01=0x0154}
0x3b40…3b52              Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0025, t01=0x0178}
0x3b52…3b7e              Head {h00=0x0028, h01=0x0050, text=» ST A7,XSPACE RESET SPACE INDICATOR «, t00=0x0025, t01=0x018a}
0x3b7e…3ba2              Head {h00=0x0020, h01=0x0050, text=» LC* A7,ECBBA,A8 RESTORE A7 «, t00=0x0026, t01=0x0026}
0x3ba2…3bb2              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0026, t01=0x004a}
0x3bb2…3bbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x005a}
0x3bbc…3bc6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0064}
0x3bc6…3bea              Head {h00=0x0020, h01=0x0050, text=»TYECB DATA /20,TYBUF,1,0,0,0«, t00=0x0026, t01=0x006e}
0x3bea…3bfe              Head {h00=0x0010, h01=0x0050, text=»TYBUF RES 1 «, t00=0x0026, t01=0x0092}
0x3bfe…3c22              Head {h00=0x0020, h01=0x0050, text=»PRECB DATA /31,PRBUF,1,0,0,0«, t00=0x0026, t01=0x00a6}
0x3c22…3c36              Head {h00=0x0010, h01=0x0050, text=»PRBUF DATA 0«, t00=0x0026, t01=0x00ca}
0x3c36…3c44              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x00de}
0x3c44…3c4e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00ec}
0x3c4e…3c58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00f6}
0x3c58…3c70              Head {h00=0x0014, h01=0x0050, text=»* GENERATE CRLF «, t00=0x0026, t01=0x0100}
0x3c70…3c7a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0118}
0x3c7a…3c84              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0122}
0x3c84…3c9c              Head {h00=0x0014, h01=0x0050, text=»CRLF LDR A11,A11«, t00=0x0026, t01=0x012c}
0x3c9c…3cc2              Head {h00=0x0022, h01=0x0050, text=» RF(Z) CRLF90 ALREADY NEW LINE«, t00=0x0026, t01=0x0144}
0x3cc2…3cd6              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/0D «, t00=0x0026, t01=0x016a}
0x3cd6…3cea              Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0026, t01=0x017e}
0x3cea…3cfe (39, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDK A7,/0A «, t00=0x0027, t01=0x0004}
0x3cfe…3d12              Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0027, t01=0x0018}
0x3d12…3d38              Head {h00=0x0022, h01=0x0050, text=» IM XSPACE SET SPACE INDICATOR«, t00=0x0027, t01=0x002c}
0x3d38…3d4c              Head {h00=0x0010, h01=0x0050, text=» SUR A11,A11«, t00=0x0027, t01=0x0052}
0x3d4c…3d60              Head {h00=0x0010, h01=0x0050, text=»CRLF90 EQU *«, t00=0x0027, t01=0x0066}
0x3d60…3d70              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0027, t01=0x007a}
0x3d70…3d7e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x008a}
0x3d7e…3d88              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0098}
0x3d88…3d92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00a2}
0x3d92…3dc2              Head {h00=0x002c, h01=0x0050, text=»* READ ONE CHARACTER FROM KEYBOARD TO A7«, t00=0x0027, t01=0x00ac}
0x3dc2…3dcc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00dc}
0x3dcc…3e1a              Head {h00=0x004a, h01=0x0050, text=»* TWO WORDS FOLLOWING CALL GIVE KEYTABLE AND FUNCTION TABLE ADDRESSES «, t00=0x0027, t01=0x00e6}
0x3e1a…3e24              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0134}
0x3e24…3e5e              Head {h00=0x0036, h01=0x0050, text=»* ON ERROR GO TO NEXT INSTRUCTION ELSE TO FUNCTION«, t00=0x0027, t01=0x013e}
0x3e5e…3e68              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0178}
0x3e68…3e82              Head {h00=0x0016, h01=0x0050, text=»* A1 IS DESTROYED «, t00=0x0027, t01=0x0182}
0x3e82…3e8c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x000c}
0x3e8c…3e96              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0016}
0x3e96…3eae              Head {h00=0x0014, h01=0x0050, text=»READ LD A7,4,A14«, t00=0x0028, t01=0x0020}
0x3eae…3edc              Head {h00=0x002a, h01=0x0050, text=» LD A1,2,A7 GET FUNCTION TABLE ADDRESS«, t00=0x0028, t01=0x0038}
0x3edc…3f04              Head {h00=0x0024, h01=0x0050, text=» LDR* A7,A7 GET KEYTABLE ADDRESS«, t00=0x0028, t01=0x0066}
0x3f04…3f1a              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x0028, t01=0x008e}
0x3f1a…3f48              Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS«, t00=0x0028, t01=0x00a4}
0x3f48…3f6a              Head {h00=0x001e, h01=0x0050, text=» LDK A7,/82 STANDARD READ «, t00=0x0028, t01=0x00d2}
0x3f6a…3f76              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0028, t01=0x00f4}
0x3f76…3f86              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0028, t01=0x0100}
0x3f86…3f9a              Head {h00=0x0010, h01=0x0050, text=»READ05 EQU *«, t00=0x0028, t01=0x0110}
0x3f9a…3fba              Head {h00=0x001c, h01=0x0050, text=» ADKL A11,1 COUNT CHARS «, t00=0x0028, t01=0x0124}
0x3fba…3fcc              Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0028, t01=0x0144}
0x3fcc…3ff6              Head {h00=0x0026, h01=0x0050, text=» ST A7,XSPACE SET SPACE INDICATOR «, t00=0x0028, t01=0x0156}
0x3ff6…4022              Head {h00=0x0028, h01=0x0050, text=» LC* A7,ECBBA,A8 GET CHARACTER TO A7«, t00=0x0028, t01=0x0180}
0x4022…4036              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/7F «, t00=0x0029, t01=0x001c}
0x4036…404e              Head {h00=0x0014, h01=0x0050, text=» LD A2,ECBRC,A8 «, t00=0x0029, t01=0x0030}
0x404e…406e              Head {h00=0x001c, h01=0x0050, text=» RF(Z) READ10 READING OK«, t00=0x0029, t01=0x0048}
0x406e…4080              Head {h00=0x000e, h01=0x0050, text=» LDK A1,4 «, t00=0x0029, t01=0x0068}
0x4080…40aa              Head {h00=0x0026, h01=0x0050, text=» ADS A1,4,A14 INCR RETURN ADDRESS «, t00=0x0029, t01=0x007a}
0x40aa…40ba              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0029, t01=0x00a4}
0x40ba…40e2              Head {h00=0x0024, h01=0x0050, text=»READ10 AD A1,ECBCW,A8 ADD INDEX «, t00=0x0029, t01=0x00b4}
0x40e2…40f6              Head {h00=0x0010, h01=0x0050, text=» ADKL A14,4 «, t00=0x0029, t01=0x00dc}
0x40f6…411a              Head {h00=0x0020, h01=0x0050, text=» ABR* A1 RETURN TO FUNCTION «, t00=0x0029, t01=0x00f0}
0x411a…4124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0114}
0x4124…412e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x011e}
0x412e…4146              Head {h00=0x0014, h01=0x0050, text=»* READ AND ECHO «, t00=0x0029, t01=0x0128}
0x4146…4150              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0140}
0x4150…415a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x014a}
0x415a…416e              Head {h00=0x0010, h01=0x0050, text=»READE EQU * «, t00=0x0029, t01=0x0154}
0x416e…4182              Head {h00=0x0010, h01=0x0050, text=» LD A7,4,A14«, t00=0x0029, t01=0x0168}
0x4182…418c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x017c}
0x418c…41ba              Head {h00=0x002a, h01=0x0050, text=» LD A1,2,A7 GET FUNCTION TABLE ADDRESS«, t00=0x0029, t01=0x0186}
0x41ba…41e2              Head {h00=0x0024, h01=0x0050, text=» LDR* A7,A7 GET KEYTABLE ADDRESS«, t00=0x002a, t01=0x0024}
0x41e2…41f8              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x002a, t01=0x004c}
0x41f8…4226              Head {h00=0x002a, h01=0x0050, text=» ST A7,ECBCW,A8 STORE KEYTABLE ADDRESS«, t00=0x002a, t01=0x0062}
0x4226…4248              Head {h00=0x001e, h01=0x0050, text=» LDK A7,/82 STANDARD READ «, t00=0x002a, t01=0x0090}
0x4248…4254              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x002a, t01=0x00b2}
0x4254…4264              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x002a, t01=0x00be}
0x4264…427c              Head {h00=0x0014, h01=0x0050, text=» LC* A7,ECBBA,A8«, t00=0x002a, t01=0x00ce}
0x427c…4296              Head {h00=0x0016, h01=0x0050, text=» CF A14,PRCH ECHO «, t00=0x002a, t01=0x00e6}
0x4296…42ac              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TYECB«, t00=0x002a, t01=0x0100}
0x42ac…42be              Head {h00=0x000e, h01=0x0050, text=» RB READ05«, t00=0x002a, t01=0x0116}
0x42be…42cc              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0128}
0x42cc…42d6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0136}
0x42d6…42e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0140}
0x42e0…4308              Head {h00=0x0024, h01=0x0050, text=»* SEARCH FOR A7 CHAR IN TABLE 1 «, t00=0x002a, t01=0x014a}
0x4308…4312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0172}
0x4312…432a              Head {h00=0x0014, h01=0x0050, text=»* CR=0 IF FOUND «, t00=0x002a, t01=0x017c}
0x432a…4346 (43, 0, 400) Head {h00=0x0018, h01=0x0050, text=»* CR=1 IF NOT FOUND «, t00=0x002b, t01=0x0004}
0x4346…4350              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0020}
0x4350…435a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x002a}
0x435a…4370              Head {h00=0x0012, h01=0x0050, text=»ITAB1 LDK A2,3«, t00=0x002b, t01=0x0034}
0x4370…4392              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x002b, t01=0x004a}
0x4392…43ac              Head {h00=0x0016, h01=0x0050, text=»ITAB10 CW A2,TAB1 «, t00=0x002b, t01=0x006c}
0x43ac…43ce              Head {h00=0x001e, h01=0x0050, text=» RF(G) ITAB30 END OF TABLE«, t00=0x002b, t01=0x0086}
0x43ce…43e6              Head {h00=0x0014, h01=0x0050, text=» CC A7,TAB1-1,A2«, t00=0x002b, t01=0x00a8}
0x43e6…4402              Head {h00=0x0018, h01=0x0050, text=» RF(E) ITAB20 FOUND «, t00=0x002b, t01=0x00c0}
0x4402…4414              Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x002b, t01=0x00dc}
0x4414…4426              Head {h00=0x000e, h01=0x0050, text=» RB ITAB10«, t00=0x002b, t01=0x00ee}
0x4426…444c              Head {h00=0x0022, h01=0x0050, text=»ITAB20 LC A7,TAB1,A2 GET CODE «, t00=0x002b, t01=0x0100}
0x444c…446e              Head {h00=0x001e, h01=0x0050, text=» CF A14,STORE AND STORE IT«, t00=0x002b, t01=0x0126}
0x446e…4484              Head {h00=0x0012, h01=0x0050, text=» LDK A1,0 CR=0«, t00=0x002b, t01=0x0148}
0x4484…449e              Head {h00=0x0016, h01=0x0050, text=»ITAB30 ADKL A14,4 «, t00=0x002b, t01=0x015e}
0x449e…44b6              Head {h00=0x0014, h01=0x0050, text=» ABR* A14 RETURN«, t00=0x002b, t01=0x0178}
0x44b6…44c4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002b, t01=0x0190}
0x44c4…44ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x000e}
0x44ce…44d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0018}
0x44d8…4506              Head {h00=0x002a, h01=0x0050, text=»* STORE A7 CHARACTER IN TRANSMIT AREA «, t00=0x002c, t01=0x0022}
0x4506…4510              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0050}
0x4510…4528              Head {h00=0x0014, h01=0x0050, text=»* A9 =LRC OR CRC«, t00=0x002c, t01=0x005a}
0x4528…4544              Head {h00=0x0018, h01=0x0050, text=»* A10=BUFFER POINTER«, t00=0x002c, t01=0x0072}
0x4544…454e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x008e}
0x454e…4558              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0098}
0x4558…456c              Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x002c, t01=0x00a2}
0x456c…4580              Head {h00=0x0010, h01=0x0050, text=» LD A1,CODE «, t00=0x002c, t01=0x00b6}
0x4580…459c              Head {h00=0x0018, h01=0x0050, text=» RF(Z) STOREA ASCII «, t00=0x002c, t01=0x00ca}
0x459c…45b2              Head {h00=0x0012, h01=0x0050, text=» LD A1,HEXCHA «, t00=0x002c, t01=0x00e6}
0x45b2…45c8              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STOR01«, t00=0x002c, t01=0x00fc}
0x45c8…45da              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x002c, t01=0x0112}
0x45da…45f0              Head {h00=0x0012, h01=0x0050, text=» CF A14,ASTOEB«, t00=0x002c, t01=0x0124}
0x45f0…4602              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A2«, t00=0x002c, t01=0x013a}
0x4602…4616              Head {h00=0x0010, h01=0x0050, text=»STOR01 EQU *«, t00=0x002c, t01=0x014c}
0x4616…463a              Head {h00=0x0020, h01=0x0050, text=» CF A14,CRCCAL CALCULATE CRC«, t00=0x002c, t01=0x0160}
0x463a…464c              Head {h00=0x000e, h01=0x0050, text=» RF STOREB«, t00=0x002c, t01=0x0184}
0x464c…4660              Head {h00=0x0010, h01=0x0050, text=»STOREA EQU *«, t00=0x002d, t01=0x0008}
0x4660…4680              Head {h00=0x001c, h01=0x0050, text=» XRR A9,A7 CALCULATE LRC«, t00=0x002d, t01=0x001c}
0x4680…4694              Head {h00=0x0010, h01=0x0050, text=»STOREB EQU *«, t00=0x002d, t01=0x003c}
0x4694…46a8              Head {h00=0x0010, h01=0x0050, text=» CWK A7,SOH «, t00=0x002d, t01=0x0050}
0x46a8…46be              Head {h00=0x0012, h01=0x0050, text=» RF(E) STOR08 «, t00=0x002d, t01=0x0064}
0x46be…46d2              Head {h00=0x0010, h01=0x0050, text=» CWK A7,STX «, t00=0x002d, t01=0x007a}
0x46d2…46e8              Head {h00=0x0012, h01=0x0050, text=» RF(NE) STOR10«, t00=0x002d, t01=0x008e}
0x46e8…46fc              Head {h00=0x0010, h01=0x0050, text=»STOR08 EQU *«, t00=0x002d, t01=0x00a4}
0x46fc…4710              Head {h00=0x0010, h01=0x0050, text=» LD A1,XBCC «, t00=0x002d, t01=0x00b8}
0x4710…4726              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STOR10«, t00=0x002d, t01=0x00cc}
0x4726…4736              Head {h00=0x000c, h01=0x0050, text=» IM XBCC«, t00=0x002d, t01=0x00e2}
0x4736…4758              Head {h00=0x001e, h01=0x0050, text=» SUR A9,A9 STX: RESET BCC «, t00=0x002d, t01=0x00f2}
0x4758…4774              Head {h00=0x0018, h01=0x0050, text=»STOR10 CWK A5,LENGTH«, t00=0x002d, t01=0x0114}
0x4774…4792              Head {h00=0x001a, h01=0x0050, text=» ABL(E) ERROR OVERFLOW«, t00=0x002d, t01=0x0130}
0x4792…47ae              Head {h00=0x0018, h01=0x0050, text=» ADK A5,1 COUNT CHAR«, t00=0x002d, t01=0x014e}
0x47ae…47c2              Head {h00=0x0010, h01=0x0050, text=» SCR A7,A10 «, t00=0x002d, t01=0x016a}
0x47c2…47d6              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x002d, t01=0x017e}
0x47d6…47e8 (46, 0, 400) Head {h00=0x000e, h01=0x0050, text=» CW A7,ETX«, t00=0x002e, t01=0x0004}
0x47e8…47fe              Head {h00=0x0012, h01=0x0050, text=» RF(E) STOR11 «, t00=0x002e, t01=0x0016}
0x47fe…4810              Head {h00=0x000e, h01=0x0050, text=» CW A7,ETB«, t00=0x002e, t01=0x002c}
0x4810…4826              Head {h00=0x0012, h01=0x0050, text=» RF(NE) STOR20«, t00=0x002e, t01=0x003e}
0x4826…483a              Head {h00=0x0010, h01=0x0050, text=»STOR11 EQU *«, t00=0x002e, t01=0x0054}
0x483a…484c              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x002e, t01=0x0068}
0x484c…4862              Head {h00=0x0012, h01=0x0050, text=» CWK A5,LENGTH«, t00=0x002e, t01=0x007a}
0x4862…4878              Head {h00=0x0012, h01=0x0050, text=» ABL(E) ERROR «, t00=0x002e, t01=0x0090}
0x4878…4894              Head {h00=0x0018, h01=0x0050, text=» ADK A5,1 COUNT CHAR«, t00=0x002e, t01=0x00a6}
0x4894…48a8              Head {h00=0x0010, h01=0x0050, text=» LD A1,CODE «, t00=0x002e, t01=0x00c2}
0x48a8…48be              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) STOR30«, t00=0x002e, t01=0x00d6}
0x48be…48d2              Head {h00=0x0010, h01=0x0050, text=» ORK A7,/80 «, t00=0x002e, t01=0x00ec}
0x48d2…48fc              Head {h00=0x0026, h01=0x0050, text=» ECR A1,A7 GENERATE PARITY ON LRC «, t00=0x002e, t01=0x0100}
0x48fc…4914              Head {h00=0x0014, h01=0x0050, text=»STOR12 SLL A1,1 «, t00=0x002e, t01=0x012a}
0x4914…492a              Head {h00=0x0012, h01=0x0050, text=» RF(Z) STOR15 «, t00=0x002e, t01=0x0142}
0x492a…4940              Head {h00=0x0012, h01=0x0050, text=» RB(NN) STOR12«, t00=0x002e, t01=0x0158}
0x4940…4954              Head {h00=0x0010, h01=0x0050, text=» XRK A7,/80 «, t00=0x002e, t01=0x016e}
0x4954…4966              Head {h00=0x000e, h01=0x0050, text=» RB STOR12«, t00=0x002e, t01=0x0182}
0x4966…497a (47, 0, 400) Head {h00=0x0010, h01=0x0050, text=»STOR15 EQU *«, t00=0x002f, t01=0x0004}
0x497a…498e              Head {h00=0x0010, h01=0x0050, text=» SCR A7,A10 «, t00=0x002f, t01=0x0018}
0x498e…49a2              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x002f, t01=0x002c}
0x49a2…49c2              Head {h00=0x001c, h01=0x0050, text=» CF A14,EDHEX PRINT LRC «, t00=0x002f, t01=0x0040}
0x49c2…49d8              Head {h00=0x0012, h01=0x0050, text=»STOR20 RTN A14«, t00=0x002f, t01=0x0060}
0x49d8…49ec              Head {h00=0x0010, h01=0x0050, text=»STOR30 EQU *«, t00=0x002f, t01=0x0076}
0x49ec…4a00              Head {h00=0x0010, h01=0x0050, text=» SCR A7,A10 «, t00=0x002f, t01=0x008a}
0x4a00…4a14              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x002f, t01=0x009e}
0x4a14…4a28              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x002f, t01=0x00b2}
0x4a28…4a3e              Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEX «, t00=0x002f, t01=0x00c6}
0x4a3e…4a50              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A9«, t00=0x002f, t01=0x00dc}
0x4a50…4a62              Head {h00=0x000e, h01=0x0050, text=» SRL A7,8 «, t00=0x002f, t01=0x00ee}
0x4a62…4a78              Head {h00=0x0012, h01=0x0050, text=» CWK A5,LENGTH«, t00=0x002f, t01=0x0100}
0x4a78…4a8e              Head {h00=0x0012, h01=0x0050, text=» ABL(E) ERROR «, t00=0x002f, t01=0x0116}
0x4a8e…4aa0              Head {h00=0x000e, h01=0x0050, text=» ADK A5,1 «, t00=0x002f, t01=0x012c}
0x4aa0…4ab4              Head {h00=0x0010, h01=0x0050, text=» SCR A7,A10 «, t00=0x002f, t01=0x013e}
0x4ab4…4ac8              Head {h00=0x0010, h01=0x0050, text=» ADKL A10,1 «, t00=0x002f, t01=0x0152}
0x4ac8…4ade              Head {h00=0x0012, h01=0x0050, text=» CF A14,EDHEX «, t00=0x002f, t01=0x0166}
0x4ade…4af0              Head {h00=0x000e, h01=0x0050, text=» RB STOR20«, t00=0x002f, t01=0x017c}
0x4af0…4afe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002f, t01=0x018e}
0x4afe…4b08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x000c}
0x4b08…4b12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0016}
0x4b12…4b36              Head {h00=0x0020, h01=0x0050, text=»* READ HEXADECIMAL CHARACTER«, t00=0x0030, t01=0x0020}
0x4b36…4b40              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0044}
0x4b40…4b4a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x004e}
0x4b4a…4b64              Head {h00=0x0016, h01=0x0050, text=»RDHEX CF A14,READE«, t00=0x0030, t01=0x0058}
0x4b64…4b78              Head {h00=0x0010, h01=0x0050, text=» DATA KTRDH «, t00=0x0030, t01=0x0072}
0x4b78…4b98              Head {h00=0x001c, h01=0x0050, text=»KTRDH DATA 0 NO KEYTABLE«, t00=0x0030, t01=0x0086}
0x4b98…4bb2              Head {h00=0x0016, h01=0x0050, text=»RDH100 SUK A7,/30 «, t00=0x0030, t01=0x00a6}
0x4bb2…4bc8              Head {h00=0x0012, h01=0x0050, text=» ABL(N) ERROR «, t00=0x0030, t01=0x00c0}
0x4bc8…4bda              Head {h00=0x000e, h01=0x0050, text=» CWK A7,9 «, t00=0x0030, t01=0x00d6}
0x4bda…4bf0              Head {h00=0x0012, h01=0x0050, text=» RF(NG) RDH110«, t00=0x0030, t01=0x00e8}
0x4bf0…4c02              Head {h00=0x000e, h01=0x0050, text=» SUK A7,7 «, t00=0x0030, t01=0x00fe}
0x4c02…4c18              Head {h00=0x0012, h01=0x0050, text=» ABL(N) ERROR «, t00=0x0030, t01=0x0110}
0x4c18…4c2a              Head {h00=0x000e, h01=0x0050, text=» CWK A7,/F«, t00=0x0030, t01=0x0126}
0x4c2a…4c40              Head {h00=0x0012, h01=0x0050, text=» ABL(G) ERROR «, t00=0x0030, t01=0x0138}
0x4c40…4c56              Head {h00=0x0012, h01=0x0050, text=»RDH110 RTN A14«, t00=0x0030, t01=0x014e}
0x4c56…4c64              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0164}
0x4c64…4c6e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x0172}
0x4c6e…4c78              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x017c}
0x4c78…4ca8              Head {h00=0x002c, h01=0x0050, text=»* EDIT CHAR FROM A7 IN HEXADECIMAL FORM «, t00=0x0030, t01=0x0186}
0x4ca8…4cb2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0026}
0x4cb2…4cbc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0030}
0x4cbc…4cdc              Head {h00=0x001c, h01=0x0050, text=»EDHEX LDR A6,A7 SAVE A7 «, t00=0x0031, t01=0x003a}
0x4cdc…4cf2              Head {h00=0x0012, h01=0x0050, text=» CF A14,SPACE «, t00=0x0031, t01=0x005a}
0x4cf2…4d06              Head {h00=0x0010, h01=0x0050, text=» LDK A7,'/' «, t00=0x0031, t01=0x0070}
0x4d06…4d1a              Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x0031, t01=0x0084}
0x4d1a…4d2c              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0031, t01=0x0098}
0x4d2c…4d3e              Head {h00=0x000e, h01=0x0050, text=» SRL A7,4 «, t00=0x0031, t01=0x00aa}
0x4d3e…4d56              Head {h00=0x0014, h01=0x0050, text=» LC A7,HEXTAB,A7«, t00=0x0031, t01=0x00bc}
0x4d56…4d74              Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH 1ST CHAR «, t00=0x0031, t01=0x00d4}
0x4d74…4d86              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0031, t01=0x00f2}
0x4d86…4d98              Head {h00=0x000e, h01=0x0050, text=» ANK A7,/F«, t00=0x0031, t01=0x0104}
0x4d98…4db0              Head {h00=0x0014, h01=0x0050, text=» LC A7,HEXTAB,A7«, t00=0x0031, t01=0x0116}
0x4db0…4dce              Head {h00=0x001a, h01=0x0050, text=» CF A14,PRCH 2ND CHAR «, t00=0x0031, t01=0x012e}
0x4dce…4dea              Head {h00=0x0018, h01=0x0050, text=» CF A14,SPACE SPACE «, t00=0x0031, t01=0x014c}
0x4dea…4dfa              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0031, t01=0x0168}
0x4dfa…4e20              Head {h00=0x0022, h01=0x0050, text=»HEXTAB DATA '0123456789ABCDEF'«, t00=0x0031, t01=0x0178}
0x4e20…4e2a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x000e}
0x4e2a…4e38              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0018}
0x4e38…4e42              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0026}
0x4e42…4e4c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0030}
0x4e4c…4e7c              Head {h00=0x002c, h01=0x0050, text=»* EDIT CHAR FROM A7 IN HEXADECIMAL FORM «, t00=0x0032, t01=0x003a}
0x4e7c…4e86              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x006a}
0x4e86…4e90              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0074}
0x4e90…4eac              Head {h00=0x0018, h01=0x0050, text=»EDHEXL CF A14,SPACEL«, t00=0x0032, t01=0x007e}
0x4eac…4ec0              Head {h00=0x0010, h01=0x0050, text=» LDK A1,'/' «, t00=0x0032, t01=0x009a}
0x4ec0…4ed6              Head {h00=0x0012, h01=0x0050, text=» CF A14,STOREL«, t00=0x0032, t01=0x00ae}
0x4ed6…4ee8              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0032, t01=0x00c4}
0x4ee8…4efa              Head {h00=0x000e, h01=0x0050, text=» SRL A1,4 «, t00=0x0032, t01=0x00d6}
0x4efa…4f12              Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAX,A1«, t00=0x0032, t01=0x00e8}
0x4f12…4f32              Head {h00=0x001c, h01=0x0050, text=» CF A14,STOREL 1ST CHAR «, t00=0x0032, t01=0x0100}
0x4f32…4f44              Head {h00=0x000e, h01=0x0050, text=» LDR A1,A7«, t00=0x0032, t01=0x0120}
0x4f44…4f56              Head {h00=0x000e, h01=0x0050, text=» ANK A1,/F«, t00=0x0032, t01=0x0132}
0x4f56…4f6e              Head {h00=0x0014, h01=0x0050, text=» LC A1,HEXTAX,A1«, t00=0x0032, t01=0x0144}
0x4f6e…4f8e              Head {h00=0x001c, h01=0x0050, text=» CF A14,STOREL 2ND CHAR «, t00=0x0032, t01=0x015c}
0x4f8e…4fac              Head {h00=0x001a, h01=0x0050, text=» CF A14,SPACEL SPACEL «, t00=0x0032, t01=0x017c}
0x4fac…4fbc              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0033, t01=0x000a}
0x4fbc…4fe2              Head {h00=0x0022, h01=0x0050, text=»HEXTAX DATA '0123456789ABCDEF'«, t00=0x0033, t01=0x001a}
0x4fe2…4ff0              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0033, t01=0x0040}
0x4ff0…4ffa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x004e}
0x4ffa…5004              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0058}
0x5004…5028              Head {h00=0x0020, h01=0x0050, text=»* PRINT ONE LINE ON PRINTER «, t00=0x0033, t01=0x0062}
0x5028…5032              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0086}
0x5032…503c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0033, t01=0x0090}
0x503c…5054              Head {h00=0x0014, h01=0x0050, text=»PRLINE LDK A1,2 «, t00=0x0033, t01=0x009a}
0x5054…506a              Head {h00=0x0012, h01=0x0050, text=» CW A1,PRECBL «, t00=0x0033, t01=0x00b2}
0x506a…5092              Head {h00=0x0024, h01=0x0050, text=» RF(E) PRLI10 NOTHING IN BUFFER «, t00=0x0033, t01=0x00c8}
0x5092…50b8              Head {h00=0x0022, h01=0x0050, text=» LDK A7,/86 STD WRITE AND WAIT«, t00=0x0033, t01=0x00f0}
0x50b8…50d0              Head {h00=0x0014, h01=0x0050, text=» LDKL A8,PRLECB «, t00=0x0033, t01=0x0116}
0x50d0…50dc              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0033, t01=0x012e}
0x50dc…50ec              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0033, t01=0x013a}
0x50ec…5100              Head {h00=0x0010, h01=0x0050, text=»PRLI05 EQU *«, t00=0x0033, t01=0x014a}
0x5100…5122              Head {h00=0x001e, h01=0x0050, text=» ST A1,PRECBL RESET LENGTH«, t00=0x0033, t01=0x015e}
0x5122…5134              Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0033, t01=0x0180}
0x5134…515e (52, 0, 400) Head {h00=0x0026, h01=0x0050, text=» ST A1,XSPACE SET SPACE INDICATOR «, t00=0x0034, t01=0x0004}
0x515e…5174              Head {h00=0x0012, h01=0x0050, text=»PRLI10 RTN A14«, t00=0x0034, t01=0x002e}
0x5174…519a              Head {h00=0x0022, h01=0x0050, text=»PRLECB DATA /31,PRLBUF,2,0,0,0«, t00=0x0034, t01=0x0044}
0x519a…51c6              Head {h00=0x0028, h01=0x0050, text=»PRECBL EQU PRLECB+4 REQUESTED LENGTH«, t00=0x0034, t01=0x006a}
0x51c6…51dc              Head {h00=0x0012, h01=0x0050, text=»PRLBUF DATA 0 «, t00=0x0034, t01=0x0096}
0x51dc…51ec              Head {h00=0x000c, h01=0x0050, text=» RES 60 «, t00=0x0034, t01=0x00ac}
0x51ec…51fa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0034, t01=0x00bc}
0x51fa…5204              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00ca}
0x5204…520e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x00d4}
0x520e…5236              Head {h00=0x0024, h01=0x0050, text=»* SEARCH FOR A7 CHAR IN TABLE 1 «, t00=0x0034, t01=0x00de}
0x5236…5240              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0106}
0x5240…524a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0110}
0x524a…526a              Head {h00=0x001c, h01=0x0050, text=»* CR=1 IF NOT FOUND ELSE«, t00=0x0034, t01=0x011a}
0x526a…529a              Head {h00=0x002c, h01=0x0050, text=»* CR=0 AND CORRESPONDING CODE IS STORED «, t00=0x0034, t01=0x013a}
0x529a…52a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x016a}
0x52a4…52ae              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0034, t01=0x0174}
0x52ae…52ce              Head {h00=0x001c, h01=0x0050, text=»STAB1 LDK A2,3 SET INDEX«, t00=0x0034, t01=0x017e}
0x52ce…52f0              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x0035, t01=0x000e}
0x52f0…530a              Head {h00=0x0016, h01=0x0050, text=»STAB10 CW A2,TAB1 «, t00=0x0035, t01=0x0030}
0x530a…532c              Head {h00=0x001e, h01=0x0050, text=» RF(G) STAB30 END OF TABLE«, t00=0x0035, t01=0x004a}
0x532c…5342              Head {h00=0x0012, h01=0x0050, text=» CC A7,TAB1,A2«, t00=0x0035, t01=0x006c}
0x5342…535e              Head {h00=0x0018, h01=0x0050, text=» RF(E) STAB20 FOUND «, t00=0x0035, t01=0x0082}
0x535e…5370              Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0035, t01=0x009e}
0x5370…538c              Head {h00=0x0018, h01=0x0050, text=» RB STAB10 TRY NEXT «, t00=0x0035, t01=0x00b0}
0x538c…53c2              Head {h00=0x0032, h01=0x0050, text=»STAB20 LC A1,TAB1-1,A2 GET CORRESPONDING CODE «, t00=0x0035, t01=0x00cc}
0x53c2…53e6              Head {h00=0x0020, h01=0x0050, text=» CF A14,STOREL AND PRINT IT «, t00=0x0035, t01=0x0102}
0x53e6…53f8              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0035, t01=0x0126}
0x53f8…5424              Head {h00=0x0028, h01=0x0050, text=»STAB30 LC A2,2,A14 SET CR FOR RETURN«, t00=0x0035, t01=0x0138}
0x5424…5438              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x0035, t01=0x0164}
0x5438…544a              Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0035, t01=0x0178}
0x544a…545c              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0035, t01=0x018a}
0x545c…5470              Head {h00=0x0010, h01=0x0050, text=» SC A1,2,A14«, t00=0x0036, t01=0x000c}
0x5470…5480              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0036, t01=0x0020}
0x5480…548e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0036, t01=0x0030}
0x548e…5498              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x003e}
0x5498…54a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0048}
0x54a2…54ca              Head {h00=0x0024, h01=0x0050, text=»* SEARCH FOR A7 CHAR IN TABLE 3 «, t00=0x0036, t01=0x0052}
0x54ca…54d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x007a}
0x54d4…54de              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x0084}
0x54de…54fe              Head {h00=0x001c, h01=0x0050, text=»* CR=1 IF NOT FOUND ELSE«, t00=0x0036, t01=0x008e}
0x54fe…552e              Head {h00=0x002c, h01=0x0050, text=»* CR=0 AND CORRESPONDING CODE IS STORED «, t00=0x0036, t01=0x00ae}
0x552e…5538              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00de}
0x5538…5542              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0036, t01=0x00e8}
0x5542…5562              Head {h00=0x001c, h01=0x0050, text=»STAB3 LDK A2,3 SET INDEX«, t00=0x0036, t01=0x00f2}
0x5562…5584              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x0036, t01=0x0112}
0x5584…559c              Head {h00=0x0014, h01=0x0050, text=»STA10 CW A2,TAB3«, t00=0x0036, t01=0x0134}
0x559c…55be              Head {h00=0x001e, h01=0x0050, text=» RF(G) STA30 END OF TABLE «, t00=0x0036, t01=0x014c}
0x55be…55d4              Head {h00=0x0012, h01=0x0050, text=» CC A7,TAB3,A2«, t00=0x0036, t01=0x016e}
0x55d4…55ee              Head {h00=0x0016, h01=0x0050, text=» RF(E) STA20 FOUND«, t00=0x0036, t01=0x0184}
0x55ee…5600              Head {h00=0x000e, h01=0x0050, text=» ADK A2,2 «, t00=0x0037, t01=0x000e}
0x5600…561a              Head {h00=0x0016, h01=0x0050, text=» RB STA10 TRY NEXT«, t00=0x0037, t01=0x0020}
0x561a…5640              Head {h00=0x0022, h01=0x0050, text=»STA20 LC A1,TAB3-1,A2 GET CODE«, t00=0x0037, t01=0x003a}
0x5640…5664              Head {h00=0x0020, h01=0x0050, text=» CF A14,STOREL AND PRINT IT «, t00=0x0037, t01=0x0060}
0x5664…5676              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0037, t01=0x0084}
0x5676…56a2              Head {h00=0x0028, h01=0x0050, text=»STA30 LC A2,2,A14 SET CR FOR RETURN «, t00=0x0037, t01=0x0096}
0x56a2…56b6              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FC «, t00=0x0037, t01=0x00c2}
0x56b6…56c8              Head {h00=0x000e, h01=0x0050, text=» ANK A1,3 «, t00=0x0037, t01=0x00d6}
0x56c8…56da              Head {h00=0x000e, h01=0x0050, text=» ADR A1,A2«, t00=0x0037, t01=0x00e8}
0x56da…56ee              Head {h00=0x0010, h01=0x0050, text=» SC A1,2,A14«, t00=0x0037, t01=0x00fa}
0x56ee…56fe              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0037, t01=0x010e}
0x56fe…570c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0037, t01=0x011e}
0x570c…5716              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x012c}
0x5716…5720              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0136}
0x5720…5748              Head {h00=0x0024, h01=0x0050, text=»* SEARCH FRO A7 CHAR IN TABLE 2 «, t00=0x0037, t01=0x0140}
0x5748…5752              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0037, t01=0x0168}
0x5752…576e              Head {h00=0x0018, h01=0x0050, text=»* CR=1 IF NOT FOUND «, t00=0x0037, t01=0x0172}
0x576e…57a6              Head {h00=0x0034, h01=0x0050, text=»* CR=0 IF FOUND AND CORRESPONDING TEXT IN BUFFER«, t00=0x0037, t01=0x018e}
0x57a6…57b0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0036}
0x57b0…57ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0038, t01=0x0040}
0x57ba…57da              Head {h00=0x001c, h01=0x0050, text=»STAB2 LDK A4,3 SET INDEX«, t00=0x0038, t01=0x004a}
0x57da…57fc              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x0038, t01=0x006a}
0x57fc…5816              Head {h00=0x0016, h01=0x0050, text=»STAB40 CW A4,TAB2 «, t00=0x0038, t01=0x008c}
0x5816…5838              Head {h00=0x001e, h01=0x0050, text=» RF(G) STAB80 END OF TABLE«, t00=0x0038, t01=0x00a6}
0x5838…584e              Head {h00=0x0012, h01=0x0050, text=» CC A7,TAB2,A4«, t00=0x0038, t01=0x00c8}
0x584e…586a              Head {h00=0x0018, h01=0x0050, text=» RF(E) STAB50 FOUND «, t00=0x0038, t01=0x00de}
0x586a…587c              Head {h00=0x000e, h01=0x0050, text=» ADK A4,4 «, t00=0x0038, t01=0x00fa}
0x587c…5898              Head {h00=0x0018, h01=0x0050, text=» RB STAB40 NEXT CHAR«, t00=0x0038, t01=0x010c}
0x5898…58b4              Head {h00=0x0018, h01=0x0050, text=»STAB50 CF A14,SPACEL«, t00=0x0038, t01=0x0128}
0x58b4…58e0              Head {h00=0x0028, h01=0x0050, text=» LD A3,TAB2+1,A4 GET STRING ADDRESS «, t00=0x0038, t01=0x0144}
0x58e0…58fe              Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A3 GET LENGTH«, t00=0x0038, t01=0x0170}
0x58fe…5910              Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x0038, t01=0x018e}
0x5910…5928              Head {h00=0x0014, h01=0x0050, text=»STAB60 SUK A4,1 «, t00=0x0039, t01=0x0010}
0x5928…593e              Head {h00=0x0012, h01=0x0050, text=» RF(N) STAB70 «, t00=0x0039, t01=0x0028}
0x593e…595c              Head {h00=0x001a, h01=0x0050, text=» LCR A1,A3 PRINT TEXT «, t00=0x0039, t01=0x003e}
0x595c…596e              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0039, t01=0x005c}
0x596e…5984              Head {h00=0x0012, h01=0x0050, text=» CF A14,STOREL«, t00=0x0039, t01=0x006e}
0x5984…5996              Head {h00=0x000e, h01=0x0050, text=» RB STAB60«, t00=0x0039, t01=0x0084}
0x5996…59ba              Head {h00=0x0020, h01=0x0050, text=»STAB70 CF A14,SPACEL SPACEL «, t00=0x0039, t01=0x0096}
0x59ba…59cc              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0039, t01=0x00ba}
0x59cc…59f6              Head {h00=0x0026, h01=0x0050, text=»STAB80 RB STAB30 SET CR FOR RETURN«, t00=0x0039, t01=0x00cc}
0x59f6…5a06              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0039, t01=0x00f6}
0x5a06…5a14              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0039, t01=0x0106}
0x5a14…5a1e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0114}
0x5a1e…5a28              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x011e}
0x5a28…5a50              Head {h00=0x0024, h01=0x0050, text=»* SEARCH FRO A7 CHAR IN TABLE 4 «, t00=0x0039, t01=0x0128}
0x5a50…5a5a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0039, t01=0x0150}
0x5a5a…5a76              Head {h00=0x0018, h01=0x0050, text=»* CR=1 IF NOT FOUND «, t00=0x0039, t01=0x015a}
0x5a76…5aae              Head {h00=0x0034, h01=0x0050, text=»* CR=0 IF FOUND AND CORRESPONDING TEXT IN BUFFER«, t00=0x0039, t01=0x0176}
0x5aae…5ab8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x001e}
0x5ab8…5ac2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003a, t01=0x0028}
0x5ac2…5ae2              Head {h00=0x001c, h01=0x0050, text=»STAB4 LDK A4,3 SET INDEX«, t00=0x003a, t01=0x0032}
0x5ae2…5b04              Head {h00=0x001e, h01=0x0050, text=» LDK A1,1 CR IF NOT FOUND «, t00=0x003a, t01=0x0052}
0x5b04…5b1c              Head {h00=0x0014, h01=0x0050, text=»STA40 CW A4,TAB4«, t00=0x003a, t01=0x0074}
0x5b1c…5b3e              Head {h00=0x001e, h01=0x0050, text=» RF(G) STA80 END OF TABLE «, t00=0x003a, t01=0x008c}
0x5b3e…5b54              Head {h00=0x0012, h01=0x0050, text=» CC A7,TAB4,A4«, t00=0x003a, t01=0x00ae}
0x5b54…5b6e              Head {h00=0x0016, h01=0x0050, text=» RF(E) STA50 FOUND«, t00=0x003a, t01=0x00c4}
0x5b6e…5b80              Head {h00=0x000e, h01=0x0050, text=» ADK A4,4 «, t00=0x003a, t01=0x00de}
0x5b80…5b9c              Head {h00=0x0018, h01=0x0050, text=» RB STA40 NEXT CHAR «, t00=0x003a, t01=0x00f0}
0x5b9c…5bb8              Head {h00=0x0018, h01=0x0050, text=»STA50 CF A14,SPACEL «, t00=0x003a, t01=0x010c}
0x5bb8…5be4              Head {h00=0x0028, h01=0x0050, text=» LD A3,TAB4+1,A4 GET STRING ADDRESS «, t00=0x003a, t01=0x0128}
0x5be4…5c02              Head {h00=0x001a, h01=0x0050, text=» LDR* A4,A3 GET LENGTH«, t00=0x003a, t01=0x0154}
0x5c02…5c14              Head {h00=0x000e, h01=0x0050, text=» ADK A3,2 «, t00=0x003a, t01=0x0172}
0x5c14…5c2a              Head {h00=0x0012, h01=0x0050, text=»STA60 SUK A4,1«, t00=0x003a, t01=0x0184}
0x5c2a…5c3e              Head {h00=0x0010, h01=0x0050, text=» RF(N) STA70«, t00=0x003b, t01=0x000a}
0x5c3e…5c5c              Head {h00=0x001a, h01=0x0050, text=» LCR A1,A3 PRINT TEXT «, t00=0x003b, t01=0x001e}
0x5c5c…5c6e              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x003b, t01=0x003c}
0x5c6e…5c84              Head {h00=0x0012, h01=0x0050, text=» CF A14,STOREL«, t00=0x003b, t01=0x004e}
0x5c84…5c96              Head {h00=0x000e, h01=0x0050, text=» RB STA60 «, t00=0x003b, t01=0x0064}
0x5c96…5cb8              Head {h00=0x001e, h01=0x0050, text=»STA70 CF A14,SPACEL SPACEL«, t00=0x003b, t01=0x0076}
0x5cb8…5cca              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x003b, t01=0x0098}
0x5cca…5ce0              Head {h00=0x0012, h01=0x0050, text=»STA80 RB STA30«, t00=0x003b, t01=0x00aa}
0x5ce0…5cf0              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003b, t01=0x00c0}
0x5cf0…5cfe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003b, t01=0x00d0}
0x5cfe…5d08              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00de}
0x5d08…5d12              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x00e8}
0x5d12…5d3e              Head {h00=0x0028, h01=0x0050, text=»* STORE CHAR FROM A1 IN PRINT BUFFER«, t00=0x003b, t01=0x00f2}
0x5d3e…5d48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x011e}
0x5d48…5d52              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003b, t01=0x0128}
0x5d52…5d6e              Head {h00=0x0018, h01=0x0050, text=»STOREL LD A2,PRECBL «, t00=0x003b, t01=0x0132}
0x5d6e…5d86              Head {h00=0x0014, h01=0x0050, text=» SC A1,PRLBUF,A2«, t00=0x003b, t01=0x014e}
0x5d86…5d98              Head {h00=0x000e, h01=0x0050, text=» IM PRECBL«, t00=0x003b, t01=0x0166}
0x5d98…5daa              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x003b, t01=0x0178}
0x5daa…5dc0              Head {h00=0x0012, h01=0x0050, text=» ST A1,LSPACE «, t00=0x003b, t01=0x018a}
0x5dc0…5dd0              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003c, t01=0x0010}
0x5dd0…5dda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0020}
0x5dda…5df8              Head {h00=0x001a, h01=0x0050, text=»* PUT SPACE IN BUFFER «, t00=0x003c, t01=0x002a}
0x5df8…5e02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0048}
0x5e02…5e1e              Head {h00=0x0018, h01=0x0050, text=»SPACEL LD A1,LSPACE «, t00=0x003c, t01=0x0052}
0x5e1e…5e34              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) LSP100«, t00=0x003c, t01=0x006e}
0x5e34…5e48              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/20 «, t00=0x003c, t01=0x0084}
0x5e48…5e5e              Head {h00=0x0012, h01=0x0050, text=» CF A14,STOREL«, t00=0x003c, t01=0x0098}
0x5e5e…5e70              Head {h00=0x000e, h01=0x0050, text=» IM LSPACE«, t00=0x003c, t01=0x00ae}
0x5e70…5e86              Head {h00=0x0012, h01=0x0050, text=»LSP100 RTN A14«, t00=0x003c, t01=0x00c0}
0x5e86…5eac              Head {h00=0x0022, h01=0x0050, text=»LSPACE DATA 0 SPACE INDICATOR «, t00=0x003c, t01=0x00d6}
0x5eac…5eba              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003c, t01=0x00fc}
0x5eba…5ec4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x010a}
0x5ec4…5ece              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0114}
0x5ece…5eec              Head {h00=0x001a, h01=0x0050, text=»* PUT SPACE IN BUFFER «, t00=0x003c, t01=0x011e}
0x5eec…5ef6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x013c}
0x5ef6…5f00              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003c, t01=0x0146}
0x5f00…5f1a              Head {h00=0x0016, h01=0x0050, text=»SPACE LD A1,XSPACE«, t00=0x003c, t01=0x0150}
0x5f1a…5f30              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) SPA100«, t00=0x003c, t01=0x016a}
0x5f30…5f4a              Head {h00=0x0016, h01=0x0050, text=»PRSPAC LDK A7,' ' «, t00=0x003c, t01=0x0180}
0x5f4a…5f5e              Head {h00=0x0010, h01=0x0050, text=» CF A14,PRCH«, t00=0x003d, t01=0x000a}
0x5f5e…5f70              Head {h00=0x000e, h01=0x0050, text=» IM XSPACE«, t00=0x003d, t01=0x001e}
0x5f70…5f86              Head {h00=0x0012, h01=0x0050, text=»SPA100 RTN A14«, t00=0x003d, t01=0x0030}
0x5f86…5fac              Head {h00=0x0022, h01=0x0050, text=»XSPACE DATA 0 SPACE INDICATOR «, t00=0x003d, t01=0x0046}
0x5fac…5fb6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x006c}
0x5fb6…5fc0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0076}
0x5fc0…5fca              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x0080}
0x5fca…5ffe              Head {h00=0x0030, h01=0x0050, text=»* OCCUPIE PRINTER AND ECHO CHARACHTER IN A7 «, t00=0x003d, t01=0x008a}
0x5ffe…6008              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00be}
0x6008…6012              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003d, t01=0x00c8}
0x6012…6026              Head {h00=0x0010, h01=0x0050, text=»OCCPR EQU * «, t00=0x003d, t01=0x00d2}
0x6026…6042              Head {h00=0x0018, h01=0x0050, text=» LDR A1,A7 SAVE CHAR«, t00=0x003d, t01=0x00e6}
0x6042…6054              Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x003d, t01=0x0102}
0x6054…6062              Head {h00=0x000a, h01=0x0050, text=» LKM  «, t00=0x003d, t01=0x0114}
0x6062…6084              Head {h00=0x001e, h01=0x0050, text=» DATA -7,PRPOOL GET BUFFER«, t00=0x003d, t01=0x0122}
0x6084…60ae              Head {h00=0x0026, h01=0x0050, text=» ST A8,PROCCB SAVE BUFFER ADDRESS «, t00=0x003d, t01=0x0144}
0x60ae…60c2              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x003d, t01=0x016e}
0x60c2…60e2              Head {h00=0x001c, h01=0x0050, text=» LDR A7,A1 RESTORE CHAR «, t00=0x003d, t01=0x0182}
0x60e2…60fc              Head {h00=0x0016, h01=0x0050, text=» CF A14,PRCH ECHO «, t00=0x003e, t01=0x0012}
0x60fc…610c              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x003e, t01=0x002c}
0x610c…6116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x003c}
0x6116…6120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0046}
0x6120…612a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0050}
0x612a…6138              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x003e, t01=0x005a}
0x6138…6142              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0068}
0x6142…614c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x0072}
0x614c…6170              Head {h00=0x0020, h01=0x0050, text=»* WRITE BUFFERS ON CASSETTE «, t00=0x003e, t01=0x007c}
0x6170…617a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00a0}
0x617a…6184              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x003e, t01=0x00aa}
0x6184…6196              Head {h00=0x000e, h01=0x0050, text=»WRTC EQU *«, t00=0x003e, t01=0x00b4}
0x6196…61c8              Head {h00=0x002e, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER ECHO COMMAND«, t00=0x003e, t01=0x00c6}
0x61c8…61dc              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x003e, t01=0x00f8}
0x61dc…61fe              Head {h00=0x001e, h01=0x0050, text=» CF A14,LOAD LOAD CASSETTE«, t00=0x003e, t01=0x010c}
0x61fe…6212              Head {h00=0x0010, h01=0x0050, text=» CM TCECB+10«, t00=0x003e, t01=0x012e}
0x6212…6236              Head {h00=0x0020, h01=0x0050, text=» CF A14,WRTM WRITE TAPE MARK«, t00=0x003e, t01=0x0142}
0x6236…6248              Head {h00=0x000e, h01=0x0050, text=» LDK A1,32«, t00=0x003e, t01=0x0166}
0x6248…625e              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,AREA «, t00=0x003e, t01=0x0178}
0x625e…6272              Head {h00=0x0010, h01=0x0050, text=»WRTC10 EQU *«, t00=0x003e, t01=0x018e}
0x6272…628a              Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x003f, t01=0x0012}
0x628a…629e              Head {h00=0x0010, h01=0x0050, text=» LDKL A3,256«, t00=0x003f, t01=0x002a}
0x629e…62b6              Head {h00=0x0014, h01=0x0050, text=» ST A3,ECBRL,A8 «, t00=0x003f, t01=0x003e}
0x62b6…62ca              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/86 «, t00=0x003f, t01=0x0056}
0x62ca…62e0              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x003f, t01=0x006a}
0x62e0…62ec              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x003f, t01=0x0080}
0x62ec…630c              Head {h00=0x001c, h01=0x0050, text=» DATA 1 WRITE ONE BLOCK «, t00=0x003f, t01=0x008c}
0x630c…6322              Head {h00=0x0012, h01=0x0050, text=» LD A3,TCECB+8«, t00=0x003f, t01=0x00ac}
0x6322…6334              Head {h00=0x000e, h01=0x0050, text=» ANK A3,4 «, t00=0x003f, t01=0x00c2}
0x6334…634a              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) WRTC20«, t00=0x003f, t01=0x00d4}
0x634a…635e              Head {h00=0x0010, h01=0x0050, text=» ADKL A2,256«, t00=0x003f, t01=0x00ea}
0x635e…6370              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x003f, t01=0x00fe}
0x6370…6396              Head {h00=0x0022, h01=0x0050, text=» RB(NZ) WRTC10 NOT END OF AREA«, t00=0x003f, t01=0x0110}
0x6396…63aa              Head {h00=0x0010, h01=0x0050, text=» CF A14,WRTM«, t00=0x003f, t01=0x0136}
0x63aa…63c0              Head {h00=0x0012, h01=0x0050, text=» CF A14,UNLOAD«, t00=0x003f, t01=0x014a}
0x63c0…63d6              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT3«, t00=0x003f, t01=0x0160}
0x63d6…6404              Head {h00=0x002a, h01=0x0050, text=» RF RETCAS RETURN TO OPERATOR CONTROL «, t00=0x003f, t01=0x0176}
0x6404…640e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0014}
0x640e…6428              Head {h00=0x0016, h01=0x0050, text=»*   CASSETTE ERROR«, t00=0x0040, t01=0x001e}
0x6428…6432              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x0038}
0x6432…6446              Head {h00=0x0010, h01=0x0050, text=»WRTC20 EQU *«, t00=0x0040, t01=0x0042}
0x6446…645c              Head {h00=0x0012, h01=0x0050, text=» CF A14,UNLOAD«, t00=0x0040, t01=0x0056}
0x645c…6472              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT2«, t00=0x0040, t01=0x006c}
0x6472…64a0              Head {h00=0x002a, h01=0x0050, text=» RF RETCAS RETURN TO OPERATOR CONTROL «, t00=0x0040, t01=0x0082}
0x64a0…64c6              Head {h00=0x0022, h01=0x0050, text=»TCECB DATA /12,AREA,256,0,0,0 «, t00=0x0040, t01=0x00b0}
0x64c6…64d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00d6}
0x64d0…64e8              Head {h00=0x0014, h01=0x0050, text=»* LOAD CASSETTE «, t00=0x0040, t01=0x00e0}
0x64e8…64f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0040, t01=0x00f8}
0x64f2…6504              Head {h00=0x000e, h01=0x0050, text=»LOAD EQU *«, t00=0x0040, t01=0x0102}
0x6504…6518              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/B7 «, t00=0x0040, t01=0x0114}
0x6518…652e              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x0040, t01=0x0128}
0x652e…6556              Head {h00=0x0024, h01=0x0050, text=» IM TCECB+10 NO SEQUENCE NUMBER «, t00=0x0040, t01=0x013e}
0x6556…656a              Head {h00=0x0010, h01=0x0050, text=»LOAD10 EQU *«, t00=0x0040, t01=0x0166}
0x656a…6576              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0040, t01=0x017a}
0x6576…6594              Head {h00=0x001a, h01=0x0050, text=» DATA 1 LOAD CASSETTE «, t00=0x0040, t01=0x0186}
0x6594…65aa              Head {h00=0x0012, h01=0x0050, text=» LD A3,TCECB+8«, t00=0x0041, t01=0x0014}
0x65aa…65c0              Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/0201«, t00=0x0041, t01=0x002a}
0x65c0…65d6              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) WRTC20«, t00=0x0041, t01=0x0040}
0x65d6…65e6              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0041, t01=0x0056}
0x65e6…65f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0066}
0x65f0…660a              Head {h00=0x0016, h01=0x0050, text=»* WRITE TAPE MARK «, t00=0x0041, t01=0x0070}
0x660a…6614              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x008a}
0x6614…6626              Head {h00=0x000e, h01=0x0050, text=»WRTM EQU *«, t00=0x0041, t01=0x0094}
0x6626…663a              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/A2 «, t00=0x0041, t01=0x00a6}
0x663a…6650              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x0041, t01=0x00ba}
0x6650…6662              Head {h00=0x000e, h01=0x0050, text=» RB LOAD10«, t00=0x0041, t01=0x00d0}
0x6662…666c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x00e2}
0x666c…6686              Head {h00=0x0016, h01=0x0050, text=»* UNLOAD CASSETTE «, t00=0x0041, t01=0x00ec}
0x6686…6690              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x0106}
0x6690…66a4              Head {h00=0x0010, h01=0x0050, text=»UNLOAD EQU *«, t00=0x0041, t01=0x0110}
0x66a4…66b8              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/B8 «, t00=0x0041, t01=0x0124}
0x66b8…66ce              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x0041, t01=0x0138}
0x66ce…66da              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0041, t01=0x014e}
0x66da…66ea              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0041, t01=0x015a}
0x66ea…66fa              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0041, t01=0x016a}
0x66fa…6704              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0041, t01=0x017a}
0x6704…6718              Head {h00=0x0010, h01=0x0050, text=»LOAD1 EQU * «, t00=0x0041, t01=0x0184}
0x6718…672c              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/B7 «, t00=0x0042, t01=0x0008}
0x672c…6742              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x0042, t01=0x001c}
0x6742…6756              Head {h00=0x0010, h01=0x0050, text=» IM TCECB+10«, t00=0x0042, t01=0x0032}
0x6756…6762              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0042, t01=0x0046}
0x6762…6772              Head {h00=0x000c, h01=0x0050, text=» DATA 1 «, t00=0x0042, t01=0x0052}
0x6772…6788              Head {h00=0x0012, h01=0x0050, text=» LD A3,TCECB+8«, t00=0x0042, t01=0x0062}
0x6788…679a              Head {h00=0x000e, h01=0x0050, text=» ANK A3,1 «, t00=0x0042, t01=0x0078}
0x679a…67b0              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) WRTC20«, t00=0x0042, t01=0x008a}
0x67b0…67c0              Head {h00=0x000c, h01=0x0050, text=» RTN A14«, t00=0x0042, t01=0x00a0}
0x67c0…67ce              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0042, t01=0x00b0}
0x67ce…67d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00be}
0x67d8…67e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00c8}
0x67e2…6806              Head {h00=0x0020, h01=0x0050, text=»* READ BUFFERS FROM CASSETTE«, t00=0x0042, t01=0x00d2}
0x6806…6810              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x00f6}
0x6810…681a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0042, t01=0x0100}
0x681a…682c              Head {h00=0x000e, h01=0x0050, text=»RDTC EQU *«, t00=0x0042, t01=0x010a}
0x682c…685e              Head {h00=0x002e, h01=0x0050, text=» CF A14,OCCPR OCCUPIE PRINTER ECHO COMMAND«, t00=0x0042, t01=0x011c}
0x685e…6872              Head {h00=0x0010, h01=0x0050, text=» CF A14,CRLF«, t00=0x0042, t01=0x014e}
0x6872…6896              Head {h00=0x0020, h01=0x0050, text=» CF A14,LOAD1 LOAD1 CASSETTE«, t00=0x0042, t01=0x0162}
0x6896…68aa              Head {h00=0x0010, h01=0x0050, text=»RDTC10 EQU *«, t00=0x0042, t01=0x0186}
0x68aa…68be              Head {h00=0x0010, h01=0x0050, text=» LDK A7,/82 «, t00=0x0043, t01=0x000a}
0x68be…68d4              Head {h00=0x0012, h01=0x0050, text=» LDKL A8,TCECB«, t00=0x0043, t01=0x001e}
0x68d4…68ea              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,AREA «, t00=0x0043, t01=0x0034}
0x68ea…6902              Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0043, t01=0x004a}
0x6902…6914              Head {h00=0x000e, h01=0x0050, text=» LDK A1,32«, t00=0x0043, t01=0x0062}
0x6914…6920              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0043, t01=0x0074}
0x6920…693e              Head {h00=0x001a, h01=0x0050, text=» DATA 1 READ ONE BLOCK«, t00=0x0043, t01=0x0080}
0x693e…6954              Head {h00=0x0012, h01=0x0050, text=» LC A3,TCECB+8«, t00=0x0043, t01=0x009e}
0x6954…6968              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x0043, t01=0x00b4}
0x6968…6988              Head {h00=0x001c, h01=0x0050, text=» RB(NZ) RDTC10 TAPE MARK«, t00=0x0043, t01=0x00c8}
0x6988…699c              Head {h00=0x0010, h01=0x0050, text=»RDTC20 EQU *«, t00=0x0043, t01=0x00e8}
0x699c…69b0              Head {h00=0x0010, h01=0x0050, text=» ADKL A2,256«, t00=0x0043, t01=0x00fc}
0x69b0…69c2              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0043, t01=0x0110}
0x69c2…69e4              Head {h00=0x001e, h01=0x0050, text=» RF(Z) RDTC30 AREA FILLED «, t00=0x0043, t01=0x0122}
0x69e4…69fc              Head {h00=0x0014, h01=0x0050, text=» ST A2,ECBBA,A8 «, t00=0x0043, t01=0x0144}
0x69fc…6a08              Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0043, t01=0x015c}
0x6a08…6a26              Head {h00=0x001a, h01=0x0050, text=» DATA 1 READ ONE BLOCK«, t00=0x0043, t01=0x0168}
0x6a26…6a3c              Head {h00=0x0012, h01=0x0050, text=» LC A3,TCECB+8«, t00=0x0043, t01=0x0186}
0x6a3c…6a50              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/10 «, t00=0x0044, t01=0x000c}
0x6a50…6a70              Head {h00=0x001c, h01=0x0050, text=» RF(NZ) RDTC30 TAPE MARK«, t00=0x0044, t01=0x0020}
0x6a70…6a82              Head {h00=0x000e, h01=0x0050, text=» RB RDTC20«, t00=0x0044, t01=0x0040}
0x6a82…6a96              Head {h00=0x0010, h01=0x0050, text=»RDTC30 EQU *«, t00=0x0044, t01=0x0052}
0x6a96…6aac              Head {h00=0x0012, h01=0x0050, text=» CF A14,UNLOAD«, t00=0x0044, t01=0x0066}
0x6aac…6ac2              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TEXT4«, t00=0x0044, t01=0x007c}
0x6ac2…6acc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x0092}
0x6acc…6ad6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x009c}
0x6ad6…6b0e              Head {h00=0x0034, h01=0x0050, text=»*   PRINT MESSAGE AND RETURN TO OPERATOR CONTROL«, t00=0x0044, t01=0x00a6}
0x6b0e…6b18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0044, t01=0x00de}
0x6b18…6b2c              Head {h00=0x0010, h01=0x0050, text=»RETCAS EQU *«, t00=0x0044, t01=0x00e8}
0x6b2c…6b42              Head {h00=0x0012, h01=0x0050, text=» CF A14,PRTXT «, t00=0x0044, t01=0x00fc}
0x6b42…6b66              Head {h00=0x0020, h01=0x0050, text=» LDKL A11,1 SET A11 NOT ZERO«, t00=0x0044, t01=0x0112}
0x6b66…6b7a              Head {h00=0x0010, h01=0x0050, text=» ABL OPCONT «, t00=0x0044, t01=0x0136}
0x6b7a…6b8e              Head {h00=0x0010, h01=0x0050, text=» END ASTART «, t00=0x0044, t01=0x014a}
0x6b8e…6b92              Head {h00=0x4004, h01=0x0000}
0x6b92…6b96              00 44 01 5e                                                                                                                                                                                                                                       ┆ D ^┆
0x6b96…6b9e (69, 1, 8)   20 04 00 00 00 45 00 04                                                                                                                                                                                                                           ┆     E  ┆

Reduced view