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

⟦25ba3df14⟧

    Length: 20422 (0x4fc6)
    Notes: pts_type(SC)
    Names: »DRCG01.SC«

Derivation

└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
    └─⟦this⟧ »TOSSWORK/DRCG01.SC« 

PTS(SC)

	IDENT DRCG01 	REL 8.2 78-09-15  870105040820 

* 
*********************************************** 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRCG01 = DRIVER CUSTOMER OPERATED TELLER (COT)
*            GENERAL PART 
* 
* 
* 
* 
* 
*********************************************** 
* 
* 
*   THIS DRIVER HANDLES OUTPUT TO AND INPUT FROM THE
*   GENERAL PART OF THE CUSTOMER OPERATED TELLER (COT). 
*   FOUR DEVICES OF THE COT ARE CONTROLED BY THIS DRIVER: 
*         ---- MICROPROCESSOR 
*         ---- CARD READER/WRITER 
*         ---- BANKNOTE DISPENSER 
*         ---- KEYBOARD 
* 
*   THE COT MUST BE CONNECTED TO CPU VIA CHLT.
* 
*   THE DRIVER CONSISTS OF FOLLOWING PARTS: 
* 
*   A C C G : ACTIVATION PART 
* 
*   I H C G : INTERRUPT HANDLER 
* 
*   R C C G : RECOVERY ROUTINE
* 
	EJECT
* 
*   THE FOLLOWING ORDERS ARE TREATED. 
* 
*   ORDER 00: TEST STATUS 
*   ORDER 02: SCAN PIN
*   ORDER 03: SCAN KEYBOARD 
*   ORDER 06: WRITE CARD
*   ORDER 0A: READ CARD 
*   ORDER 0B: PICK NOTES
*   ORDER 11: INSERT CARD 
*   ORDER 22: FEED NOTES
*   ORDER 26: FINISH TRANSACTION
*   ORDER 31: RETURN CARD 
*   ORDER 33: SWALLOW CARD
*   ORDER 37: OPEN COT
*   ORDER 38: CLOSE COT 
* 
* 
*   NORMAL REGISTER USAGE:
* 
*   A1 = RETURN CODE
*   A2 = INPUT OR OUTPUT CHARACTER
*   A3 = BUFFER INDEX 
*   A4 = FUNCTION INDEX 
*   A5 = STACK BASE 
*   A6 = DWT-ADDRESS
*   A7 = ORDER
*   A8 = ECB-ADDRESS
	EJECT
* 
*    RETURN CODES 
* 
*   BIT 0: REQUEST ERROR
*   BIT 1: TRANSPORT ERROR NOTES, CARD
*   BIT 2: MOTOR VOLTAGE ERROR DISPENSER
*   BIT 3: TIMEOUT ERROR DISPENSER
*   BIT 4: SOLENOID ERROR DISPENSER 
*   BIT 5: ELECTRONICS ERROR DISPENSER
*   BIT 6: DETECTOR ERROR DISPENSER 
*   BIT 7: FRONT SHUTTER DOESN'T CLOSE
*   BIT 8: PARAMETER CARDS REQUESTED
*   BIT 9: INTERFACE BOARD ERROR
*   BIT 10: CLOSED
*   BIT 11: NOTES AVAILABLE TO CUSTOMER AFTER POWER BREAK 
*   BIT 12: INCORRECT LENGTH, INCORRECT PIN, DUMP ERROR 
*   BIT 13: NEGATIVE ACKNOWLEDGEMENT OF OPERATION 
*   BIT 14: THROUGHPUT ERROR
*   BIT 15: COT NOT OPERABLE
	EJECT
* 
* 
****************************
*   ENTRIES                *
****************************
* 
	ENTRY	CGAD	ADDRESS BLOCK 
* 
* 
* 
******************************************
*   EXTERNAL TOSS MODULE ENTRIES         *
******************************************
* 
	EXTRN	SAVE8
	EXTRN	STREG	STORE REGISTERS AND GO TO DISPATCHER 
	EXTRN	LDREG	LOAD REGISTERS AND RETURN
	EXTRN	OUTPUT	SUBROUTINE TO SEND CHARACTER
	EXTRN	DISIOE	I/O REQUEST ERROR 
	EXTRN	GETCHR	GET NEXT CHARACTER IN ECB-BUFFER
	EXTRN	DISEND	END I/O AND GO TO DISPATCHER
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	ECHO	ECHO SUBROUTINE 
	EXTRN	ECHEND	END OF ECHOING
	EXTRN	SETIMP 
			SET TIMER
	EXTRN	RTNA15	RETURN AND ENABLE 
	EJECT
* 
* 
********************************* 
*   DWT PARAMETERS              * 
********************************* 
* 
* 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTOR	ORDER
	EXTRN	DWTECB	ECB-ADDRESS 
* 
**************************************
*   DWT-DISPLACEMENTS                *
**************************************
* 
DWTBC	EQU	/3
DWTSB2	EQU	/1E
DWTA3	EQU	/12 
DWTA4	EQU	/14	SAVE AREA FOR A4
DWTTP	EQU	/20	TIMER POINTER 
DWTLRC	EQU	/26	LRC-ACKUMULATOR
KBPIN	EQU	/24	PIN-ECHO CHARACTER
* 
	EJECT
********************************* 
*   CONSTANTS                   * 
********************************* 
* 
CCB	FORM	5=/1D,3,8=/21,8,8=0
CRWSTX	EQU	/3B	CARD START CHARACTER 
CRWETX	EQU	/3F	CARD END CHARACTER 
FEERET	EQU	/01	FEEF NOTES AND RETURN CARD COMMANDS
SWALOW	EQU	/05	SWALLOW CARD COMMAND 
SCANK	EQU	/03	SCAN KEYBOARD COMMAND 
OPCODE	EQU	/11	OPEN COT COMMAND 
CLCODE	EQU	/12	CLOSE COT COMMAND
FICODE	EQU	/13	FINISH TRANSACTION COMMAND 
X:A	EQU	/515E 
X:B	EQU	/5253 
X:C	EQU	/5053 
X:D	EQU	/505A 
X:E	EQU	/5051 
X:F	EQU	/5050 
X:G	EQU	/5051 
X:H	EQU	/5050 
X:I	EQU	/5052 
X:J	EQU	/5250 
X:K	EQU	/5154 
X:L	EQU	/505A 
X:M	EQU	/5150 
X:N	EQU	/5103 
STARP1	EQU	X:A	START ADDRESS 1:ST PIN FIELD 
STOPP1	EQU	X:B	STOP  ADDRESS      " 
STARP2	EQU	X:C	START ADDRESS 2:ND        "
STOPP2	EQU	X:D	STOP  ADDRESS             "
STARP3	EQU	X:E	START ADDRESS 3:RD         " 
STOPP3	EQU	X:F	STOP  ADDRESS             "
STARP4	EQU	X:G	START ADDRESS 4:TH        "
STOPP4	EQU	X:H	STOP  ADDRESS           "
TISWCA	EQU	X:I	TIMEOUT FOR SWALLOW CARD 
TIANTC	EQU	X:J	TIMEOUT FOR ANSWER FROM TC 
TIPILO	EQU	X:K	TIMEOUT FOR PIN PARAMETER LOADING
TIBUZZ	EQU	X:L	TIME FOR BUZZER ALARM
LENGNO	EQU	X:M	LENGTH OF NOTES
KEYTYP	EQU	X:N	KEYBOARD TYPE AND END CHARACTER
* 
COTTIM	EQU	30	FEED TIMEOUT
	EJECT
* 
* 
********************* 
*   TABLES          * 
********************* 
* 
CGAD	EQU	*
	DATA	ACCG	ACTIVATION DRIVER
	DATA	IHCG	INTERRUPT HANDLER
	DATA	RCCG	RECOVERY ROUTINE 
CTTAB	DATA	/110A,/0631,/330B,/2202,/0338,/3726
	DATA	/FF 
CTLEN	EQU	*-CTTAB 
* 
FUNTAB	DATA	CARDIN,RECARD,WRCARD	INSERT CARD, READ CARD, WRITE CARD 
	DATA	RETUCA,SWALL,PICK	RETURN CARD, SWALLOW CARD, PICK NOTES 
	DATA	FEED,SCANPI,SCANKE	FEED NOTES, SCAN PIN,SCAN KEYBOARD 
	DATA	CLOSE,OPEN,FITRAN	CLOSE COT, OPEN COT, FINISH TRANSACTION 
	DATA	TEST	TEST STATUS
	EJECT
* 
* 
*    C G A D
* 
*    ACTIVATION PART
* 
ACCG	EQU	*
* 
*   ORDER CHECK 
* 
	LDK	A4,CTLEN 
ACCG10	CC	A7,CTTAB-1,A4	CHECK IF LEGAL ORDER
	RF(E)	ACCG30	FOUND 
	SUK	A4,1 
	RB(NZ)	ACCG10	TRY NEXT 
ACCG20	ABL	DISIOE	ILLEGAL ORDER 
* 
*   CHECK IF PARAMETER CARD LOADING REQUESTED. IF SO, 
*   FINISH ALL REQUESTS WITH BIT 8 SET. 
* 
ACCG30	EQU	*
	LDR*	A1,A6	CHANNEL PARAMETER 
	ANK	A1,/80	PIN LOADING ? 
	RF(NE)	ENDIO 
* 
*   CHECK IF POWER FAIL. IF SO, END REQUEST 
*   WITH RETURN CODE BIT 14 SET.
* 
	LD	A2,DWTST,A6 
	LDR	A7,A2
	ANKL	A2,/400 
	RF(E)	ACCG35 
	XRS	A2,DWTST,A6
	LDK	A1,2 
	RF	ENDIO 
	EJECT
* 
*   CHECK IF COT CLOSED. IF SO, END ALL 
*   REQUESTS BUT OPEN WITH RETURN CODE BIT 10.
* 
ACCG35	EQU	*
	CWK	A4,11
	RF(E)	ACCG38 
	LDR	A2,A7
	SLL	A2,6 
	RF(N)	ACCG38 
	LDK	A1,0 
	SUK	A4,10	CLOSE ORDER ?
	RF(E)	ENDIO	YES
	LDK	A1,/20 
	RF	ENDIO 
* 
*   MODIFY DEVICE ADDRESS DEPENDING ON KEYBOARD,
*   CARD READER/WRITER, OR DISPENSER ORDER AND
*   JUMP TO VALID FUNCTION MODULE.
* 
ACCG38	EQU	*
	LDK	A2,5	DEVICE ADDRESS 5
	CWR	A4,A2	CARD READER/WRITER ORDER ? 
	RF(G)	ACCG40	NO
	LDK	A2,3	DEVICE ADDRESS 3
ACCG40	EQU	*
	CF	A5,MODIFY	MODIFY DEVICE ADDRESS 
ACCG50	EQU	*
	LDK	A3,0 
	SLL	A4,1 
	ABI	FUNTAB-2,A4	JUMP TO VALID FUNCTION MODULE
	EJECT
* 
*    CHECK IF CARD-IN-READER MESSAGE HAS COME 
*    OR WAIT FOR THAT MESSAGE 
* 
CARDIN	EQU	*
	LDR	A2,A7
	ANK	A2,/FF 
	RF(NE)	CARD10
CARD05	EQU	*
	CF	A5,STREG	WAIT FOR COT MESSAGE 
	SUK	A1,3	DEVICE CODE CORRECT ? 
	RF(NE)	THRERR	NO 
CARD10	EQU	*
	SUK	A2,/0C	CARD IN READER ?
	RF(E)	ENDIO
CARD12	SUK	A2,/34	FRONT SHUTTER DOESNT CLOSE ?
	RF(NE)	CARD20	NO 
CARD15	EQU	*
	LDK	A1,1	FRONT SHUTTER DOESNT CLOSE
	RF	CARD40
CARD20	ADK	A2,/3E	TRANSPORT ERROR ? 
	RF(E)	CARD30	YES 
	SUK	A2,2	OPERATION INCORRECT ? 
	RF(NE)	CARD22	NO 
CARD21	LDK	A1,4 
	RF	ENDIO 
CARD22	SUK	A2,2	POSITIVE OPERATION ?
	RF(E)	ENDIO	YES
	SUK	A2,7	CARD TAKEN ?
	RF(NE)	CARD23
	SUK	A4,10	SWALLOW CARD REQUEST ? 
	RB(E)	CARD21 
	RF	ENDIO 
CARD23	EQU	*
	SUK	A2,/13	CARD SWALLOWED ?
	RF(NE)	CARD24	NO 
	SUK	A4,10	SWALLOW CARD ORDER ? 
	RF(E)	ENDIO
	RB	CARD21	NO INDICATE ERROR
CARD24	ADK	A2,/20	RESET CHARACTER CODE
	CWK	A4,4	READ ORDER /
	RF(E)	RECA05	YES 
	RF	THRERR	NO 
CARD30	EQU	*
	LDK	A1,/40	TRANSPORT ERROR 
CARD40	SLL	A1,8 
	EJECT
ENDIO	LDK	A2,0
	SC	A2,DWTBC,A6	CLEAR BYTE COUNTER
	LDKL	A5,DWTSB2	LOAD STACKBASE
	ADR	A5,A6
	LDR	A4,A1	SAVE A1
	CF	A5,ECHEND	END I/O ECHO DEVICE 
	LD	A2,DWTTP,A6	TIMER ? 
	RF(E)	ENDIT
	CM*	DWTTP,A6 
	CM	DWTTP,A6
ENDIT	EQU	* 
	LDR	A1,A4	RELOAD A1
	ABL	DISEND 
	EJECT
* 
* 
RECARD	EQU	*
	LD	A2,10,A8	GET TRACK NUMBER 
	ADK	A2,8 
CAROUT	EQU	*
	CF	A5,OUTPUT	SEND READ TRACK COMMAND 
	CM	DWTLRC,A6	CLEAR LRC-ACKUMULATOR 
	RB	CARD05
RECA05	EQU	*
	LDR	A3,A3	FIRST CHARACTER
	RF(N)	RECA40	NO, LRC-CHARACTER 
	RF(NE)	RECA10	NO, DATA INPUT 
	ADK	A3,/80 
	CCB	A2,CRWSTX	START CHARACTER ?
	RF(E)	RECA25 
THRERR	EQU	*
	LDK	A1,2	INDICATE THROUGHPUT ERROR 
	RB	ENDIO	END I/O 
RECA10	EQU	*
	ANK	A3,/7F 
	CCB	A2,CRWETX	END CHARACTER ?
	RF(NE)	RECA20	NO 
	ST	A3,6,A8	YES STORE EFFECTIVE LENGTH
	NGR	A3,A3	NEGATE REGISTER
	RF	RECA25
RECA20	EQU	*
	CF	A15,STORE	STORE CHARACTER IN ECB-BUFFER 
	CW	A3,4,A8	EFF. LENGTH = REQ. LENGTH 
	ABL(G)	SCA175
RECA25	XRS	A2,DWTLRC,A6	UPDATE LRC-ACKUMULATOR
	SUK	A2,/30	VALID CODE ?
	RF(N)	RECA30	NO
	SUK	A2,/F	NUMERIC VALUE ?
	RB(NP)	CARD05	YES
RECA30	EQU	*
	LDK	A1,4	INDICATE CODE CHECK ERROR 
	ABL	SCA200	STORE EFF. LENGTH AND END I/O 
RECA40	EQU	*
	XR	A2,DWTLRC,A6	CHECK LRC
	ANK	A2,/F
	RB(NE)	THRERR	INCORRECT
ENDI01	RB	ENDIO	STORE EFF. LENGTH AND END I/O 
	EJECT
* 
* 
WRCARD	EQU	*
	LDK	A2,CRWSTX	CARD START CHARACTER 
WRCA10	EQU	*
	CF	A5,OUTPUT	SEND START CHARACTER
	CF	A15,GETCHR	GET NEXT CHARACTER IN BUFFER 
	LDR	A1,A1	LAST CHARACTER ? 
	RB(NE)	WRCA10	NO 
	LDK	A2,CRWETX	CARD END CHARACTER 
	RB	CAROUT
RETUCA	LDK	A2,FEERET	RETURN CARD COMMAND
	RB	CAROUT
SWALL	LDK	A2,SWALOW	SWALLOW CARD COMMAND
	RB	CAROUT
	EJECT
* 
* 
PICK	EQU	*
	LD	A2,4,A8	GET NUMBER OF NOTES TO PICK 
	ORK	A2,/30 
MICOUT	EQU	*
	CF	A5,OUTPUT	SEND PICK COMMAND 
	LDK	A3,0 
	RF	PICK10
PICK05	EQU	*
	LD	A2,DWTST,A6	STATUS
	ANK	A2,/FF 
	RF(NZ)	PICK15
PICK10	EQU	*
	CF	A5,STREG	WAIT FOR PICK MESSAGE
PICK15	EQU	*
	LDR	A7,A4
	SUK	A7,20	CLOSE COMMAND ?
	RF(E)	CLOS10	YES 
	ADK	A7,6	KEYBOARD REQUEST ?
	RF(P)	SCAN10	YES 
	SUK	A1,5	DEVICE ADDRESS VALID ?
	RB(NE)	THRERR
	SUK	A2,/10	
	LDK	A7,5	LOOP COUNTER
	LDK	A1,2	RETURN CARD BUILDSTONE
MICLOP	SUK	A2,1	CORRECT ERRORTYPE ? 
	RB(E)	CARD40	YES 
	SUK	A7,1	LAST LOOP ? 
	RF(E)	MICEND	YES 
	SLL	A1,1	PREPARE RETURN CODE 
	RB	MICLOP
MICEND	CWK	A4,14	FEED REQUEST ? 
	RF(E)	FEED10	YES 
	SUK	A2,2	DUMP ERROR ?
	RF(E)	SCA175	YES 
	ADK	A2,/17	RESET CHAR. CODE
	LDR	A3,A3	PICK NUMBER
	RF(N)	PICK25	NO, FIRST DUMP CHARACTER
	RF(NE)	PICK30	NO, SECOND DUMP CHARACTER
	ANK	A2,/F
	CW	A2,4,A8	NUMBER OF PICKED NOTES CORRECT
	RB(NE)	RECA30
	ST	A2,6,A8	NUMBER OF PICKED NOTES
PICK20	SUK	A3,1	INDICATE WAIT FOR FIRST DUMP CODE 
	RB	PICK10
PICK25	EQU	*
	LDR	A3,A2	SAVE FIRST DUMP CODE 
	RB	PICK10
PICK30	ANK	A2,/F
	ANK	A3,/F
PICK40	SUK	A3,1 
	RF(N)	PICK50 
	ADK	A2,/A
	RB	PICK40
PICK50	ST	A2,10,A8	STORE NUMBER OF DUMPED NOTES 
PICK60	EQU	*
	LDK	A1,0 
	RB	ENDI01
	EJECT
* 
* 
CLOSE	LDK	A2,CLCODE	CLOSE COMMAND 
	RB	MICOUT
CLOS10	SUK	A2,/1D	CLOSED ?
	RB(NE)	THRERR
	RB	PICK60
FEED	EQU	*
	LDK	A3,2 
	LDK	A2,FEERET	FEED NOTES COMMAND 
	RB	MICOUT
			OR RETURN CARD COMMAND 
FEED10	SUK	A2,1	NOTES NOT AVAILABLE ? 
	RB(E)	RECA30	YES 
	ADK	A2,/10	NOTES AVAILABLE ? 
	RF(NE)	FEED30
	LDR	A3,A3	POWER BREAK ?
	RF(N)	FEED20	YES 
	LDK	A3,1	INDICATE MONEY AVAILABLE
	RB	PICK10
FEED20	LDK	A1,/10	INDICATE MONEY AVAILABLE AFTER POWER BREAK
ENDI02	EQU	*
	RB	ENDI01
FEED30	SUK	A2,7	NOTES TAKEN ? 
FEEDER	EQU	*
	RB(NE)	THRERR
	LDR	A3,A3	POWER BREAK ?
	RB(N)	FEED20	YES 
	RB	PICK60
	EJECT
* 
* 
SCANKE	EQU	*
	LDK	A2,SCANK	SCAN KEYBOARD COMMAND 
	RB	MICOUT
SCAN10	EQU	*
	SUK	A1,1 
			DEVICE ADDRESS = 1 ? 
	RF(E)	SCAN12 
	SUK	A1,4 
	RB(NE)	FEEDER
	SUK	A2,4 
	RB(E)	RECA30 
	SUK	A2,2 
	RB(E)	ENDI01 
	ABL	THRERR 
SCAN12	SUK	A7,2	PIN REQUEST ? 
	RF(E)	PIN10	YES
	CF	A15,STORE	STORE CHARACTER 
SCAN15	LD	A1,10,A8	GET KEY-TABLE ADDRESS
	RF(E)	SCA100	NO KEYTABLE 
	LCR	A7,A1	TABLE LENGTH 
	ANK	A7,/FF 
	ADR	A1,A7	LAST PLACE IN KEY-TABLE
	ADK	A1,1 
SCAN20	SUK	A7,1 
	RF(N)	SCA100	KEY NOT FOUND IN KEYTABLE 
	SUK	A1,1	NEXT KEY
	CCR	A2,A1	EOR-CHARACTER
	RB(NE)	SCAN20
	LDK	A1,0 
	ADR	A7,A7	YES, DOUBLE INDEX
	ST	A7,10,A8	STORE INDEX IN CONTROL WORD
	RF	SCA200
SCA100	CCK	A2,/3030	NUMERIC CHARACTER ? 
	ABL(N)	RECA30	NO 
	LDK	A7,0 
	CF	A5,ECHO	ECHO CHAR 
	CW	A3,4,A8	LENGTH OVERFLOW ? 
	RB(NE)	PICK10	NO 
SCA175	LDK	A1,8 
SCA200	ST	A3,6,A8	STORE EFFECTIVE LENGTH
	RB	ENDI02
	EJECT
* 
* 
SCANPI	EQU	*
	LD	A2,4,A8	GET WANTED NUMBER OF CHARACTERS 
	LDR	A3,A2
	CF	A5,OUTPUT	SEND START COMMAND
PIN05	EQU	* 
	RB	PICK10
PIN10	EQU	* 
	SUK	A2,4	INCORRECT PIN ? 
	RB(E)	SCA175 
	SUK	A2,2 
	RB(E)	ENDI02 
	SUK	A2,/52	PIN INPUT ? 
	RF(E)	PIN20
	ADK	A2,/58	RESET A2
	RB	SCAN15
PIN20	EQU	* 
	SC	A2,DWTBC,A6	RESET RECIVER BUFFER AREA 
	LC	A2,KBPIN,A6 
	CF	A5,ECHO 
	LDK	A1,1 
	ABL	PICK05 
	EJECT
* 
* 
TEST	EQU	*
	LDK	A2,0 
	RF	OPEN10
FITRAN	LDK	A2,FICODE	FINISH TRANSACTION COMMAND 
	RF	OPEN10
OPEN	EQU	*
	LDK	A2,OPCODE	OPEN COMMAND 
OPEN10	CF	A5,OUTPUT 
	LDKL	A2,/200 
	ORS	A2,DWTST,A6
ENDI03	RB	ENDI02
	EJECT
* 
* 
* 
*    I H C G
* 
*    INTERRUPT HANDLER
* 
IHCG	EQU	*
	LDR	A4,A2
	SRL	A4,12
	ANK	A4,7 
	ANK	A2,/FF 
	LD	A3,DWTST,A6	GET STATUS WORD 
	RF(NN)	IHC100	BUSY 
	LDR	A3,A2
	SUK	A4,3	DEVICE ADDRESS 3 ?
	RF(NE)	IHCG30	NO 
	SUK	A3,2	TRANSPORT ERROR ? 
	RF(E)	IHCG20	YES 
	SUK	A3,10	CARD IN READER MESSAGE ? 
	RF(E)	IHCG20	YES 
	SUK	A3,/34	FRONT SHUTTER DOESN'T CLOSE ? 
	RF(NE)	EXIT
IHCG20	ORS	A2,DWTST,A6	SET BIT IN STATUS WORD 
EXIT	ABL	TDISP
	EJECT



IHCG30	EQU	*
	SUK	A4,2	DEVICE ADDRESS 5 ?
	RB(NE)	EXIT	NO 
	SUK	A3,/1C	PIN LOADED ?
	RF(E)	IHCG90 
	ADK	A3,/19	STATUS REQUEST ?
	RB(NE)	EXIT
	EJECT
* 
*   SEND STATUS MESSAGE 
* 
IHCG80	EQU	*
	LDK	A2,5 
	LDKL	A5,DWTSB2 
	ADR	A5,A6	STACK BASE 
	CF	A5,MODIFY	MODIFY DEVICE ADDRESS 
	LDKL	A2,/7FFF
	ANS	A2,DWTST,A6	SET BUSY 
	LDK	A4,28
	LDKL	A3,STINTA 
IHCG85	LCR	A2,A3	GET FIRST CHARACTER
	CF	A5,OUTPUT	SEND
	ADK	A3,1 
	CWK	A3,STINTE	LAST CHARACTER ? 
	RB(NE)	IHCG85
	LDK	A1,/80 
	ORRS	A1,A6	INDICATE WAIT FOR PIN CARDS 
	RB	ENDI03
IHCG90	LDKL	A1,/FF7F
	ANRS	A1,A6	RESET PIN CARD WAIT INDICATOR 
	RB	EXIT
	EJECT
* 
*   DEVICE BUSY 
* 
IHC100	EQU	*
	LDR	A1,A1	RETURN CODE FROM CHLT ?
	RB(NE)	EXIT
	LDR	A1,A4	OUTPUT ANSWER ?
	RF(E)	IHRET	YES
	SUK	A4,5	DEVICE ADDRESS 5 ?
	RF(NE)	IHC200	NO 
	ADK	A3,3	STATUS REQUEST ?
	RB(E)	IHCG80	YES 
	SUK	A3,/15	INTERFACE BOARD ERROR ? 
	RF(NE)	IHC105
	LDK	A1,/40	INDICATE INTERFACE BOARD ERROR
	RB	ENDI03
IHC105	SUK	A3,1 
	RF(NE)	IHC110	NOT TRANSMISSION TIMEOUT 
	LDK	A1,2	INDICATE TRANSMISSION PROBLEMS
	RB	ENDI03
IHC110	SUK	A3,3	PIN PARAMETER LOADED MESSAGE ?
	RB(E)	IHCG90	YES 
IHRET	ABL	LDREG 
IHC200	ADK	A4,2 
	RB(E)	IHRET
	ADK	A4,2 
	ABL(NE)	THRERR 
	LC	A4,DWTST,A6	STATUS BYTE 
	ANK	A4,1 
	RB(NE)	IHRET 
	SC	A2,DWTST+1,A6	INDICATE ERROR RECEIVED 
	RB	EXIT
	EJECT
* 
* 
* 
*    R C C G
* 
*    RECOVERY ROUTINE 
* 
RCCG	EQU	*
	CF	A15,SAVE8 
	LD	A4,DWTST,A6	BUSY ?
	RF(N)	RCCG20 
	LD	A4,DWTA4,A6	GET FUNCTION INDEX
	SUK	A4,28	STATUS TRANSMISSION ?
	RB(E)	IHCG80 
	ADK	A4,22	WRITE ?
	RF(E)	RCCG30	YES 
	SUK	A4,8	FEED ?
	RF(NE)	RCCG10
	LD	A3,DWTA3,A6 
	RF(NE)	RCCG05
	SUK	A3,1	INDICATE POWER FAIL 
	LD	A4,DWTA4,A6	FUNCTION INDEX
	ABL	PICK10 
RCCG05	SUK	A3,1 
	ABL(E)	FEED20
RCCG10	LD	A4,DWTST,A6	LEFT BYTE OF STATUS WORD
	SLL	A4,3	RECOVERY BIT SET? 
	ABL(NN)	THRERR	NO
	RB	EXIT
RCCG20	LDKL	A1,/400 
	ORS	A1,DWTST,A6
	RB	EXIT
RCCG30	LD	A8,DWTECB,A6
	LDK	A4,3 
	LDK	A1,2 
	ORS	A1,8,A8
	ABL	ACCG50 
	EJECT
* 
*    STORE = SUBROUTINE TO STORE CHARACTER IN 
*            ECB-BUFFER AND INCREMENT BUFFER INDEX
* 
STORE	EQU	* 
	LD	A7,2,A8	BUFFER ADDRESS
	ADR	A7,A3	ADD BUFFER INDEX 
	SCR	A2,A7	STORE CHARACTER
	ADK	A3,1	INCREMENT INDEX 
	ABL	RTNA15 
* 
* 
*    MODIFY = SUBROUTINE TO MODIFY
*             DEVICE ADDRESS IN DWTCHP. 
* 
MODIFY	EQU	*
	LDR*	A3,A6	GET DWTCHP
	ANKL	A3,/8FFF
	SRC	A2,4 
	ORR	A3,A2
	STR	A3,A6	RESTORE
	RTN	A5 
	EJECT
* 
* 
*    STINTA = STATUS INFORMATION TABLE
* 
STINTA	EQU	*
	DATA	STARP1,STOPP1,STARP2,STOPP2 
	DATA	STARP3,STOPP3,STARP4,STOPP4 
	DATA	TISWCA,TIANTC,TIPILO,TIBUZZ 
	DATA	LENGNO,KEYTYP 
STINTE	EQU	*
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRCG01  REL 8.2 78-09-15  870105040820 «, t00=0x0000, t01=0x0004}
0x0036…003e              Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x003a}
0x003e…0048              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0042}
0x0048…0080              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0000, t01=0x004c}
0x0080…008a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0084}
0x008a…00b2              Head {h00=0x0024, h01=0x0050, text=»*   PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x008e}
0x00b2…00bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b6}
0x00bc…00f6              Head {h00=0x0036, h01=0x0050, text=»*   DRCG01 = DRIVER CUSTOMER OPERATED TELLER (COT)«, t00=0x0000, t01=0x00c0}
0x00f6…0118              Head {h00=0x001e, h01=0x0050, text=»*            GENERAL PART «, t00=0x0000, t01=0x00fa}
0x0118…0122              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011c}
0x0122…012c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0126}
0x012c…0136              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…0140              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…014a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0182              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0000, t01=0x014e}
0x0182…018c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0186}
0x018c…0196              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0190}
0x0196…01d2              Head {h00=0x0038, h01=0x0050, text=»*   THIS DRIVER HANDLES OUTPUT TO AND INPUT FROM THE«, t00=0x0001, t01=0x000a}
0x01d2…0212              Head {h00=0x003c, h01=0x0050, text=»*   GENERAL PART OF THE CUSTOMER OPERATED TELLER (COT). «, t00=0x0001, t01=0x0046}
0x0212…0254              Head {h00=0x003e, h01=0x0050, text=»*   FOUR DEVICES OF THE COT ARE CONTROLED BY THIS DRIVER: «, t00=0x0001, t01=0x0086}
0x0254…027a              Head {h00=0x0022, h01=0x0050, text=»*         ---- MICROPROCESSOR «, t00=0x0001, t01=0x00c8}
0x027a…02a4              Head {h00=0x0026, h01=0x0050, text=»*         ---- CARD READER/WRITER «, t00=0x0001, t01=0x00ee}
0x02a4…02ce              Head {h00=0x0026, h01=0x0050, text=»*         ---- BANKNOTE DISPENSER «, t00=0x0001, t01=0x0118}
0x02ce…02ee              Head {h00=0x001c, h01=0x0050, text=»*         ---- KEYBOARD «, t00=0x0001, t01=0x0142}
0x02ee…02f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0162}
0x02f8…032e              Head {h00=0x0032, h01=0x0050, text=»*   THE COT MUST BE CONNECTED TO CPU VIA CHLT.«, t00=0x0001, t01=0x016c}
0x032e…0338              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0012}
0x0338…036c              Head {h00=0x0030, h01=0x0050, text=»*   THE DRIVER CONSISTS OF FOLLOWING PARTS: «, t00=0x0002, t01=0x001c}
0x036c…0376              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0050}
0x0376…039c              Head {h00=0x0022, h01=0x0050, text=»*   A C C G : ACTIVATION PART «, t00=0x0002, t01=0x005a}
0x039c…03a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0080}
0x03a6…03ce              Head {h00=0x0024, h01=0x0050, text=»*   I H C G : INTERRUPT HANDLER «, t00=0x0002, t01=0x008a}
0x03ce…03d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b2}
0x03d8…03fe              Head {h00=0x0022, h01=0x0050, text=»*   R C C G : RECOVERY ROUTINE«, t00=0x0002, t01=0x00bc}
0x03fe…0408              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e2}
0x0408…0416              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x00ec}
0x0416…0420              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00fa}
0x0420…044e              Head {h00=0x002a, h01=0x0050, text=»*   THE FOLLOWING ORDERS ARE TREATED. «, t00=0x0002, t01=0x0104}
0x044e…0458              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0132}
0x0458…047a              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 00: TEST STATUS «, t00=0x0002, t01=0x013c}
0x047a…0498              Head {h00=0x001a, h01=0x0050, text=»*   ORDER 02: SCAN PIN«, t00=0x0002, t01=0x015e}
0x0498…04bc              Head {h00=0x0020, h01=0x0050, text=»*   ORDER 03: SCAN KEYBOARD «, t00=0x0002, t01=0x017c}
0x04bc…04dc              Head {h00=0x001c, h01=0x0050, text=»*   ORDER 06: WRITE CARD«, t00=0x0003, t01=0x0010}
0x04dc…04fc              Head {h00=0x001c, h01=0x0050, text=»*   ORDER 0A: READ CARD «, t00=0x0003, t01=0x0030}
0x04fc…051c              Head {h00=0x001c, h01=0x0050, text=»*   ORDER 0B: PICK NOTES«, t00=0x0003, t01=0x0050}
0x051c…053e              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 11: INSERT CARD «, t00=0x0003, t01=0x0070}
0x053e…055e              Head {h00=0x001c, h01=0x0050, text=»*   ORDER 22: FEED NOTES«, t00=0x0003, t01=0x0092}
0x055e…0586              Head {h00=0x0024, h01=0x0050, text=»*   ORDER 26: FINISH TRANSACTION«, t00=0x0003, t01=0x00b2}
0x0586…05a8              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 31: RETURN CARD «, t00=0x0003, t01=0x00da}
0x05a8…05ca              Head {h00=0x001e, h01=0x0050, text=»*   ORDER 33: SWALLOW CARD«, t00=0x0003, t01=0x00fc}
0x05ca…05e8              Head {h00=0x001a, h01=0x0050, text=»*   ORDER 37: OPEN COT«, t00=0x0003, t01=0x011e}
0x05e8…0608              Head {h00=0x001c, h01=0x0050, text=»*   ORDER 38: CLOSE COT «, t00=0x0003, t01=0x013c}
0x0608…0612              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015c}
0x0612…061c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0166}
0x061c…063e              Head {h00=0x001e, h01=0x0050, text=»*   NORMAL REGISTER USAGE:«, t00=0x0003, t01=0x0170}
0x063e…0648 (4, 0, 400)  Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0004}
0x0648…0664              Head {h00=0x0018, h01=0x0050, text=»*   A1 = RETURN CODE«, t00=0x0004, t01=0x000e}
0x0664…068e              Head {h00=0x0026, h01=0x0050, text=»*   A2 = INPUT OR OUTPUT CHARACTER«, t00=0x0004, t01=0x002a}
0x068e…06ac              Head {h00=0x001a, h01=0x0050, text=»*   A3 = BUFFER INDEX «, t00=0x0004, t01=0x0054}
0x06ac…06cc              Head {h00=0x001c, h01=0x0050, text=»*   A4 = FUNCTION INDEX «, t00=0x0004, t01=0x0072}
0x06cc…06e8              Head {h00=0x0018, h01=0x0050, text=»*   A5 = STACK BASE «, t00=0x0004, t01=0x0092}
0x06e8…0704              Head {h00=0x0018, h01=0x0050, text=»*   A6 = DWT-ADDRESS«, t00=0x0004, t01=0x00ae}
0x0704…071a              Head {h00=0x0012, h01=0x0050, text=»*   A7 = ORDER«, t00=0x0004, t01=0x00ca}
0x071a…0736              Head {h00=0x0018, h01=0x0050, text=»*   A8 = ECB-ADDRESS«, t00=0x0004, t01=0x00e0}
0x0736…0744              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x00fc}
0x0744…074e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x010a}
0x074e…0768              Head {h00=0x0016, h01=0x0050, text=»*    RETURN CODES «, t00=0x0004, t01=0x0114}
0x0768…0772              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012e}
0x0772…0792              Head {h00=0x001c, h01=0x0050, text=»*   BIT 0: REQUEST ERROR«, t00=0x0004, t01=0x0138}
0x0792…07c0              Head {h00=0x002a, h01=0x0050, text=»*   BIT 1: TRANSPORT ERROR NOTES, CARD«, t00=0x0004, t01=0x0158}
0x07c0…07f0              Head {h00=0x002c, h01=0x0050, text=»*   BIT 2: MOTOR VOLTAGE ERROR DISPENSER«, t00=0x0004, t01=0x0186}
0x07f0…081a              Head {h00=0x0026, h01=0x0050, text=»*   BIT 3: TIMEOUT ERROR DISPENSER«, t00=0x0005, t01=0x0026}
0x081a…0846              Head {h00=0x0028, h01=0x0050, text=»*   BIT 4: SOLENOID ERROR DISPENSER «, t00=0x0005, t01=0x0050}
0x0846…0874              Head {h00=0x002a, h01=0x0050, text=»*   BIT 5: ELECTRONICS ERROR DISPENSER«, t00=0x0005, t01=0x007c}
0x0874…08a0              Head {h00=0x0028, h01=0x0050, text=»*   BIT 6: DETECTOR ERROR DISPENSER «, t00=0x0005, t01=0x00aa}
0x08a0…08ce              Head {h00=0x002a, h01=0x0050, text=»*   BIT 7: FRONT SHUTTER DOESN'T CLOSE«, t00=0x0005, t01=0x00d6}
0x08ce…08fa              Head {h00=0x0028, h01=0x0050, text=»*   BIT 8: PARAMETER CARDS REQUESTED«, t00=0x0005, t01=0x0104}
0x08fa…0922              Head {h00=0x0024, h01=0x0050, text=»*   BIT 9: INTERFACE BOARD ERROR«, t00=0x0005, t01=0x0130}
0x0922…093c              Head {h00=0x0016, h01=0x0050, text=»*   BIT 10: CLOSED«, t00=0x0005, t01=0x0158}
0x093c…097e              Head {h00=0x003e, h01=0x0050, text=»*   BIT 11: NOTES AVAILABLE TO CUSTOMER AFTER POWER BREAK «, t00=0x0005, t01=0x0172}
0x097e…09be              Head {h00=0x003c, h01=0x0050, text=»*   BIT 12: INCORRECT LENGTH, INCORRECT PIN, DUMP ERROR «, t00=0x0006, t01=0x0024}
0x09be…09f8              Head {h00=0x0036, h01=0x0050, text=»*   BIT 13: NEGATIVE ACKNOWLEDGEMENT OF OPERATION «, t00=0x0006, t01=0x0064}
0x09f8…0a1c              Head {h00=0x0020, h01=0x0050, text=»*   BIT 14: THROUGHPUT ERROR«, t00=0x0006, t01=0x009e}
0x0a1c…0a40              Head {h00=0x0020, h01=0x0050, text=»*   BIT 15: COT NOT OPERABLE«, t00=0x0006, t01=0x00c2}
0x0a40…0a4e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x00e6}
0x0a4e…0a58              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x0a58…0a62              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00fe}
0x0a62…0a86              Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0006, t01=0x0108}
0x0a86…0aaa              Head {h00=0x0020, h01=0x0050, text=»*   ENTRIES                *«, t00=0x0006, t01=0x012c}
0x0aaa…0ace              Head {h00=0x0020, h01=0x0050, text=»****************************«, t00=0x0006, t01=0x0150}
0x0ace…0ad8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0174}
0x0ad8…0afa              Head {h00=0x001e, h01=0x0050, text=» ENTRY CGAD ADDRESS BLOCK «, t00=0x0006, t01=0x017e}
0x0afa…0b04              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0010}
0x0b04…0b0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x001a}
0x0b0e…0b18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0024}
0x0b18…0b4a              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x002e}
0x0b4a…0b7c              Head {h00=0x002e, h01=0x0050, text=»*   EXTERNAL TOSS MODULE ENTRIES         *«, t00=0x0007, t01=0x0060}
0x0b7c…0bae              Head {h00=0x002e, h01=0x0050, text=»******************************************«, t00=0x0007, t01=0x0092}
0x0bae…0bb8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c4}
0x0bb8…0bcc              Head {h00=0x0010, h01=0x0050, text=» EXTRN SAVE8«, t00=0x0007, t01=0x00ce}
0x0bcc…0c06              Head {h00=0x0036, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND GO TO DISPATCHER «, t00=0x0007, t01=0x00e2}
0x0c06…0c34              Head {h00=0x002a, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS AND RETURN«, t00=0x0007, t01=0x011c}
0x0c34…0c66              Head {h00=0x002e, h01=0x0050, text=» EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER«, t00=0x0007, t01=0x014a}
0x0c66…0c8e              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0007, t01=0x017c}
0x0c8e…0cc4              Head {h00=0x0032, h01=0x0050, text=» EXTRN GETCHR GET NEXT CHARACTER IN ECB-BUFFER«, t00=0x0008, t01=0x0014}
0x0cc4…0cf6              Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND END I/O AND GO TO DISPATCHER«, t00=0x0008, t01=0x004a}
0x0cf6…0d1c              Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0008, t01=0x007c}
0x0d1c…0d40              Head {h00=0x0020, h01=0x0050, text=» EXTRN ECHO ECHO SUBROUTINE «, t00=0x0008, t01=0x00a2}
0x0d40…0d64              Head {h00=0x0020, h01=0x0050, text=» EXTRN ECHEND END OF ECHOING«, t00=0x0008, t01=0x00c6}
0x0d64…0d7a              Head {h00=0x0012, h01=0x0050, text=» EXTRN SETIMP «, t00=0x0008, t01=0x00ea}
0x0d7a…0d8e              Head {h00=0x0010, h01=0x0050, text=»   SET TIMER«, t00=0x0008, t01=0x0100}
0x0d8e…0db6              Head {h00=0x0024, h01=0x0050, text=» EXTRN RTNA15 RETURN AND ENABLE «, t00=0x0008, t01=0x0114}
0x0db6…0dc4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x013c}
0x0dc4…0dce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x014a}
0x0dce…0dd8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0154}
0x0dd8…0e02              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0008, t01=0x015e}
0x0e02…0e2c              Head {h00=0x0026, h01=0x0050, text=»*   DWT PARAMETERS              * «, t00=0x0008, t01=0x0188}
0x0e2c…0e56              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x0009, t01=0x0022}
0x0e56…0e60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x004c}
0x0e60…0e6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0056}
0x0e6a…0e86              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0009, t01=0x0060}
0x0e86…0ea0              Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0009, t01=0x007c}
0x0ea0…0ec2              Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTECB ECB-ADDRESS «, t00=0x0009, t01=0x0096}
0x0ec2…0ecc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b8}
0x0ecc…0efa              Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0009, t01=0x00c2}
0x0efa…0f28              Head {h00=0x002a, h01=0x0050, text=»*   DWT-DISPLACEMENTS                *«, t00=0x0009, t01=0x00f0}
0x0f28…0f56              Head {h00=0x002a, h01=0x0050, text=»**************************************«, t00=0x0009, t01=0x011e}
0x0f56…0f60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x014c}
0x0f60…0f74              Head {h00=0x0010, h01=0x0050, text=»DWTBC EQU /3«, t00=0x0009, t01=0x0156}
0x0f74…0f8a              Head {h00=0x0012, h01=0x0050, text=»DWTSB2 EQU /1E«, t00=0x0009, t01=0x016a}
0x0f8a…0fa0              Head {h00=0x0012, h01=0x0050, text=»DWTA3 EQU /12 «, t00=0x0009, t01=0x0180}
0x0fa0…0fc6              Head {h00=0x0022, h01=0x0050, text=»DWTA4 EQU /14 SAVE AREA FOR A4«, t00=0x000a, t01=0x0008}
0x0fc6…0fea              Head {h00=0x0020, h01=0x0050, text=»DWTTP EQU /20 TIMER POINTER «, t00=0x000a, t01=0x002e}
0x0fea…1010              Head {h00=0x0022, h01=0x0050, text=»DWTLRC EQU /26 LRC-ACKUMULATOR«, t00=0x000a, t01=0x0052}
0x1010…1038              Head {h00=0x0024, h01=0x0050, text=»KBPIN EQU /24 PIN-ECHO CHARACTER«, t00=0x000a, t01=0x0078}
0x1038…1042              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00a0}
0x1042…1050              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00aa}
0x1050…107a              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x000a, t01=0x00b8}
0x107a…10a4              Head {h00=0x0026, h01=0x0050, text=»*   CONSTANTS                   * «, t00=0x000a, t01=0x00e2}
0x10a4…10ce              Head {h00=0x0026, h01=0x0050, text=»********************************* «, t00=0x000a, t01=0x010c}
0x10ce…10d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0136}
0x10d8…10fc              Head {h00=0x0020, h01=0x0050, text=»CCB FORM 5=/1D,3,8=/21,8,8=0«, t00=0x000a, t01=0x0140}
0x10fc…1128              Head {h00=0x0028, h01=0x0050, text=»CRWSTX EQU /3B CARD START CHARACTER «, t00=0x000a, t01=0x0164}
0x1128…1152              Head {h00=0x0026, h01=0x0050, text=»CRWETX EQU /3F CARD END CHARACTER «, t00=0x000a, t01=0x0190}
0x1152…118c              Head {h00=0x0036, h01=0x0050, text=»FEERET EQU /01 FEEF NOTES AND RETURN CARD COMMANDS«, t00=0x000b, t01=0x002a}
0x118c…11b8              Head {h00=0x0028, h01=0x0050, text=»SWALOW EQU /05 SWALLOW CARD COMMAND «, t00=0x000b, t01=0x0064}
0x11b8…11e4              Head {h00=0x0028, h01=0x0050, text=»SCANK EQU /03 SCAN KEYBOARD COMMAND «, t00=0x000b, t01=0x0090}
0x11e4…120c              Head {h00=0x0024, h01=0x0050, text=»OPCODE EQU /11 OPEN COT COMMAND «, t00=0x000b, t01=0x00bc}
0x120c…1234              Head {h00=0x0024, h01=0x0050, text=»CLCODE EQU /12 CLOSE COT COMMAND«, t00=0x000b, t01=0x00e4}
0x1234…1266              Head {h00=0x002e, h01=0x0050, text=»FICODE EQU /13 FINISH TRANSACTION COMMAND «, t00=0x000b, t01=0x010c}
0x1266…127c              Head {h00=0x0012, h01=0x0050, text=»X:A EQU /515E «, t00=0x000b, t01=0x013e}
0x127c…1292              Head {h00=0x0012, h01=0x0050, text=»X:B EQU /5253 «, t00=0x000b, t01=0x0154}
0x1292…12a8              Head {h00=0x0012, h01=0x0050, text=»X:C EQU /5053 «, t00=0x000b, t01=0x016a}
0x12a8…12be              Head {h00=0x0012, h01=0x0050, text=»X:D EQU /505A «, t00=0x000b, t01=0x0180}
0x12be…12d4              Head {h00=0x0012, h01=0x0050, text=»X:E EQU /5051 «, t00=0x000c, t01=0x0008}
0x12d4…12ea              Head {h00=0x0012, h01=0x0050, text=»X:F EQU /5050 «, t00=0x000c, t01=0x001e}
0x12ea…1300              Head {h00=0x0012, h01=0x0050, text=»X:G EQU /5051 «, t00=0x000c, t01=0x0034}
0x1300…1316              Head {h00=0x0012, h01=0x0050, text=»X:H EQU /5050 «, t00=0x000c, t01=0x004a}
0x1316…132c              Head {h00=0x0012, h01=0x0050, text=»X:I EQU /5052 «, t00=0x000c, t01=0x0060}
0x132c…1342              Head {h00=0x0012, h01=0x0050, text=»X:J EQU /5250 «, t00=0x000c, t01=0x0076}
0x1342…1358              Head {h00=0x0012, h01=0x0050, text=»X:K EQU /5154 «, t00=0x000c, t01=0x008c}
0x1358…136e              Head {h00=0x0012, h01=0x0050, text=»X:L EQU /505A «, t00=0x000c, t01=0x00a2}
0x136e…1384              Head {h00=0x0012, h01=0x0050, text=»X:M EQU /5150 «, t00=0x000c, t01=0x00b8}
0x1384…139a              Head {h00=0x0012, h01=0x0050, text=»X:N EQU /5103 «, t00=0x000c, t01=0x00ce}
0x139a…13ce              Head {h00=0x0030, h01=0x0050, text=»STARP1 EQU X:A START ADDRESS 1:ST PIN FIELD «, t00=0x000c, t01=0x00e4}
0x13ce…13fa              Head {h00=0x0028, h01=0x0050, text=»STOPP1 EQU X:B STOP  ADDRESS      " «, t00=0x000c, t01=0x0118}
0x13fa…142c              Head {h00=0x002e, h01=0x0050, text=»STARP2 EQU X:C START ADDRESS 2:ND        "«, t00=0x000c, t01=0x0144}
0x142c…145e              Head {h00=0x002e, h01=0x0050, text=»STOPP2 EQU X:D STOP  ADDRESS             "«, t00=0x000c, t01=0x0176}
0x145e…1492              Head {h00=0x0030, h01=0x0050, text=»STARP3 EQU X:E START ADDRESS 3:RD         " «, t00=0x000d, t01=0x0018}
0x1492…14c4              Head {h00=0x002e, h01=0x0050, text=»STOPP3 EQU X:F STOP  ADDRESS             "«, t00=0x000d, t01=0x004c}
0x14c4…14f6              Head {h00=0x002e, h01=0x0050, text=»STARP4 EQU X:G START ADDRESS 4:TH        "«, t00=0x000d, t01=0x007e}
0x14f6…1526              Head {h00=0x002c, h01=0x0050, text=»STOPP4 EQU X:H STOP  ADDRESS           "«, t00=0x000d, t01=0x00b0}
0x1526…1556              Head {h00=0x002c, h01=0x0050, text=»TISWCA EQU X:I TIMEOUT FOR SWALLOW CARD «, t00=0x000d, t01=0x00e0}
0x1556…1588              Head {h00=0x002e, h01=0x0050, text=»TIANTC EQU X:J TIMEOUT FOR ANSWER FROM TC «, t00=0x000d, t01=0x0110}
0x1588…15c0              Head {h00=0x0034, h01=0x0050, text=»TIPILO EQU X:K TIMEOUT FOR PIN PARAMETER LOADING«, t00=0x000d, t01=0x0142}
0x15c0…15ec              Head {h00=0x0028, h01=0x0050, text=»TIBUZZ EQU X:L TIME FOR BUZZER ALARM«, t00=0x000d, t01=0x017a}
0x15ec…1612              Head {h00=0x0022, h01=0x0050, text=»LENGNO EQU X:M LENGTH OF NOTES«, t00=0x000e, t01=0x0016}
0x1612…1648              Head {h00=0x0032, h01=0x0050, text=»KEYTYP EQU X:N KEYBOARD TYPE AND END CHARACTER«, t00=0x000e, t01=0x003c}
0x1648…1652              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0072}
0x1652…1674              Head {h00=0x001e, h01=0x0050, text=»COTTIM EQU 30 FEED TIMEOUT«, t00=0x000e, t01=0x007c}
0x1674…1682              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x009e}
0x1682…168c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ac}
0x168c…1696              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00b6}
0x1696…16b4              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x00c0}
0x16b4…16d2              Head {h00=0x001a, h01=0x0050, text=»*   TABLES          * «, t00=0x000e, t01=0x00de}
0x16d2…16f0              Head {h00=0x001a, h01=0x0050, text=»********************* «, t00=0x000e, t01=0x00fc}
0x16f0…16fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x011a}
0x16fa…170c              Head {h00=0x000e, h01=0x0050, text=»CGAD EQU *«, t00=0x000e, t01=0x0124}
0x170c…1730              Head {h00=0x0020, h01=0x0050, text=» DATA ACCG ACTIVATION DRIVER«, t00=0x000e, t01=0x0136}
0x1730…1754              Head {h00=0x0020, h01=0x0050, text=» DATA IHCG INTERRUPT HANDLER«, t00=0x000e, t01=0x015a}
0x1754…1778              Head {h00=0x0020, h01=0x0050, text=» DATA RCCG RECOVERY ROUTINE «, t00=0x000e, t01=0x017e}
0x1778…17ae              Head {h00=0x0032, h01=0x0050, text=»CTTAB DATA /110A,/0631,/330B,/2202,/0338,/3726«, t00=0x000f, t01=0x0012}
0x17ae…17c0              Head {h00=0x000e, h01=0x0050, text=» DATA /FF «, t00=0x000f, t01=0x0048}
0x17c0…17da              Head {h00=0x0016, h01=0x0050, text=»CTLEN EQU *-CTTAB «, t00=0x000f, t01=0x005a}
0x17da…17e4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0074}
0x17e4…1830              Head {h00=0x0048, h01=0x0050, text=»FUNTAB DATA CARDIN,RECARD,WRCARD INSERT CARD, READ CARD, WRITE CARD «, t00=0x000f, t01=0x007e}
0x1830…1876              Head {h00=0x0042, h01=0x0050, text=» DATA RETUCA,SWALL,PICK RETURN CARD, SWALLOW CARD, PICK NOTES «, t00=0x000f, t01=0x00ca}
0x1876…18ba              Head {h00=0x0040, h01=0x0050, text=» DATA FEED,SCANPI,SCANKE FEED NOTES, SCAN PIN,SCAN KEYBOARD «, t00=0x000f, t01=0x0110}
0x18ba…1902              Head {h00=0x0044, h01=0x0050, text=» DATA CLOSE,OPEN,FITRAN CLOSE COT, OPEN COT, FINISH TRANSACTION «, t00=0x000f, t01=0x0154}
0x1902…1920              Head {h00=0x001a, h01=0x0050, text=» DATA TEST TEST STATUS«, t00=0x0010, t01=0x000c}
0x1920…192e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0010, t01=0x002a}
0x192e…1938              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0038}
0x1938…1942              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0042}
0x1942…1956              Head {h00=0x0010, h01=0x0050, text=»*    C G A D«, t00=0x0010, t01=0x004c}
0x1956…1960              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0060}
0x1960…197c              Head {h00=0x0018, h01=0x0050, text=»*    ACTIVATION PART«, t00=0x0010, t01=0x006a}
0x197c…1986              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0086}
0x1986…1998              Head {h00=0x000e, h01=0x0050, text=»ACCG EQU *«, t00=0x0010, t01=0x0090}
0x1998…19a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00a2}
0x19a2…19ba              Head {h00=0x0014, h01=0x0050, text=»*   ORDER CHECK «, t00=0x0010, t01=0x00ac}
0x19ba…19c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c4}
0x19c4…19da              Head {h00=0x0012, h01=0x0050, text=» LDK A4,CTLEN «, t00=0x0010, t01=0x00ce}
0x19da…1a0e              Head {h00=0x0030, h01=0x0050, text=»ACCG10 CC A7,CTTAB-1,A4 CHECK IF LEGAL ORDER«, t00=0x0010, t01=0x00e4}
0x1a0e…1a2a              Head {h00=0x0018, h01=0x0050, text=» RF(E) ACCG30 FOUND «, t00=0x0010, t01=0x0118}
0x1a2a…1a3c              Head {h00=0x000e, h01=0x0050, text=» SUK A4,1 «, t00=0x0010, t01=0x0134}
0x1a3c…1a5c              Head {h00=0x001c, h01=0x0050, text=» RB(NZ) ACCG10 TRY NEXT «, t00=0x0010, t01=0x0146}
0x1a5c…1a84              Head {h00=0x0024, h01=0x0050, text=»ACCG20 ABL DISIOE ILLEGAL ORDER «, t00=0x0010, t01=0x0166}
0x1a84…1a8e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x018e}
0x1a8e…1acc              Head {h00=0x003a, h01=0x0050, text=»*   CHECK IF PARAMETER CARD LOADING REQUESTED. IF SO, «, t00=0x0011, t01=0x0008}
0x1acc…1afc              Head {h00=0x002c, h01=0x0050, text=»*   FINISH ALL REQUESTS WITH BIT 8 SET. «, t00=0x0011, t01=0x0046}
0x1afc…1b06              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0076}
0x1b06…1b1a              Head {h00=0x0010, h01=0x0050, text=»ACCG30 EQU *«, t00=0x0011, t01=0x0080}
0x1b1a…1b40              Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A6 CHANNEL PARAMETER «, t00=0x0011, t01=0x0094}
0x1b40…1b62              Head {h00=0x001e, h01=0x0050, text=» ANK A1,/80 PIN LOADING ? «, t00=0x0011, t01=0x00ba}
0x1b62…1b78              Head {h00=0x0012, h01=0x0050, text=» RF(NE) ENDIO «, t00=0x0011, t01=0x00dc}
0x1b78…1b82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x00f2}
0x1b82…1bb6              Head {h00=0x0030, h01=0x0050, text=»*   CHECK IF POWER FAIL. IF SO, END REQUEST «, t00=0x0011, t01=0x00fc}
0x1bb6…1bde              Head {h00=0x0024, h01=0x0050, text=»*   WITH RETURN CODE BIT 14 SET.«, t00=0x0011, t01=0x0130}
0x1bde…1be8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0158}
0x1be8…1c00              Head {h00=0x0014, h01=0x0050, text=» LD A2,DWTST,A6 «, t00=0x0011, t01=0x0162}
0x1c00…1c12              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A2«, t00=0x0011, t01=0x017a}
0x1c12…1c28              Head {h00=0x0012, h01=0x0050, text=» ANKL A2,/400 «, t00=0x0011, t01=0x018c}
0x1c28…1c3e              Head {h00=0x0012, h01=0x0050, text=» RF(E) ACCG35 «, t00=0x0012, t01=0x0012}
0x1c3e…1c56              Head {h00=0x0014, h01=0x0050, text=» XRS A2,DWTST,A6«, t00=0x0012, t01=0x0028}
0x1c56…1c68              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0012, t01=0x0040}
0x1c68…1c7a              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0012, t01=0x0052}
0x1c7a…1c88              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0012, t01=0x0064}
0x1c88…1c92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0072}
0x1c92…1cc2              Head {h00=0x002c, h01=0x0050, text=»*   CHECK IF COT CLOSED. IF SO, END ALL «, t00=0x0012, t01=0x007c}
0x1cc2…1cf8              Head {h00=0x0032, h01=0x0050, text=»*   REQUESTS BUT OPEN WITH RETURN CODE BIT 10.«, t00=0x0012, t01=0x00ac}
0x1cf8…1d02              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00e2}
0x1d02…1d16              Head {h00=0x0010, h01=0x0050, text=»ACCG35 EQU *«, t00=0x0012, t01=0x00ec}
0x1d16…1d28              Head {h00=0x000e, h01=0x0050, text=» CWK A4,11«, t00=0x0012, t01=0x0100}
0x1d28…1d3e              Head {h00=0x0012, h01=0x0050, text=» RF(E) ACCG38 «, t00=0x0012, t01=0x0112}
0x1d3e…1d50              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0012, t01=0x0128}
0x1d50…1d62              Head {h00=0x000e, h01=0x0050, text=» SLL A2,6 «, t00=0x0012, t01=0x013a}
0x1d62…1d78              Head {h00=0x0012, h01=0x0050, text=» RF(N) ACCG38 «, t00=0x0012, t01=0x014c}
0x1d78…1d8a              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0012, t01=0x0162}
0x1d8a…1daa              Head {h00=0x001c, h01=0x0050, text=» SUK A4,10 CLOSE ORDER ?«, t00=0x0012, t01=0x0174}
0x1daa…1dc2 (19, 0, 400) Head {h00=0x0014, h01=0x0050, text=» RF(E) ENDIO YES«, t00=0x0013, t01=0x0004}
0x1dc2…1dd6              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/20 «, t00=0x0013, t01=0x001c}
0x1dd6…1de8              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0013, t01=0x0030}
0x1de8…1df2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0042}
0x1df2…1e2a              Head {h00=0x0034, h01=0x0050, text=»*   MODIFY DEVICE ADDRESS DEPENDING ON KEYBOARD,«, t00=0x0013, t01=0x004c}
0x1e2a…1e60              Head {h00=0x0032, h01=0x0050, text=»*   CARD READER/WRITER, OR DISPENSER ORDER AND«, t00=0x0013, t01=0x0084}
0x1e60…1e8a              Head {h00=0x0026, h01=0x0050, text=»*   JUMP TO VALID FUNCTION MODULE.«, t00=0x0013, t01=0x00ba}
0x1e8a…1e94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00e4}
0x1e94…1ea8              Head {h00=0x0010, h01=0x0050, text=»ACCG38 EQU *«, t00=0x0013, t01=0x00ee}
0x1ea8…1eca              Head {h00=0x001e, h01=0x0050, text=» LDK A2,5 DEVICE ADDRESS 5«, t00=0x0013, t01=0x0102}
0x1eca…1ef8              Head {h00=0x002a, h01=0x0050, text=» CWR A4,A2 CARD READER/WRITER ORDER ? «, t00=0x0013, t01=0x0124}
0x1ef8…1f10              Head {h00=0x0014, h01=0x0050, text=» RF(G) ACCG40 NO«, t00=0x0013, t01=0x0152}
0x1f10…1f32              Head {h00=0x001e, h01=0x0050, text=» LDK A2,3 DEVICE ADDRESS 3«, t00=0x0013, t01=0x016a}
0x1f32…1f46              Head {h00=0x0010, h01=0x0050, text=»ACCG40 EQU *«, t00=0x0013, t01=0x018c}
0x1f46…1f72              Head {h00=0x0028, h01=0x0050, text=» CF A5,MODIFY MODIFY DEVICE ADDRESS «, t00=0x0014, t01=0x0010}
0x1f72…1f86              Head {h00=0x0010, h01=0x0050, text=»ACCG50 EQU *«, t00=0x0014, t01=0x003c}
0x1f86…1f98              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0014, t01=0x0050}
0x1f98…1faa              Head {h00=0x000e, h01=0x0050, text=» SLL A4,1 «, t00=0x0014, t01=0x0062}
0x1faa…1fe0              Head {h00=0x0032, h01=0x0050, text=» ABI FUNTAB-2,A4 JUMP TO VALID FUNCTION MODULE«, t00=0x0014, t01=0x0074}
0x1fe0…1fee              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0014, t01=0x00aa}
0x1fee…1ff8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x00b8}
0x1ff8…202e              Head {h00=0x0032, h01=0x0050, text=»*    CHECK IF CARD-IN-READER MESSAGE HAS COME «, t00=0x0014, t01=0x00c2}
0x202e…2054              Head {h00=0x0022, h01=0x0050, text=»*    OR WAIT FOR THAT MESSAGE «, t00=0x0014, t01=0x00f8}
0x2054…205e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0014, t01=0x011e}
0x205e…2072              Head {h00=0x0010, h01=0x0050, text=»CARDIN EQU *«, t00=0x0014, t01=0x0128}
0x2072…2084              Head {h00=0x000e, h01=0x0050, text=» LDR A2,A7«, t00=0x0014, t01=0x013c}
0x2084…2098              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0014, t01=0x014e}
0x2098…20ae              Head {h00=0x0012, h01=0x0050, text=» RF(NE) CARD10«, t00=0x0014, t01=0x0162}
0x20ae…20c2              Head {h00=0x0010, h01=0x0050, text=»CARD05 EQU *«, t00=0x0014, t01=0x0178}
0x20c2…20ec              Head {h00=0x0026, h01=0x0050, text=» CF A5,STREG WAIT FOR COT MESSAGE «, t00=0x0014, t01=0x018c}
0x20ec…2114              Head {h00=0x0024, h01=0x0050, text=» SUK A1,3 DEVICE CODE CORRECT ? «, t00=0x0015, t01=0x0026}
0x2114…212e              Head {h00=0x0016, h01=0x0050, text=» RF(NE) THRERR NO «, t00=0x0015, t01=0x004e}
0x212e…2142              Head {h00=0x0010, h01=0x0050, text=»CARD10 EQU *«, t00=0x0015, t01=0x0068}
0x2142…2166              Head {h00=0x0020, h01=0x0050, text=» SUK A2,/0C CARD IN READER ?«, t00=0x0015, t01=0x007c}
0x2166…217a              Head {h00=0x0010, h01=0x0050, text=» RF(E) ENDIO«, t00=0x0015, t01=0x00a0}
0x217a…21b0              Head {h00=0x0032, h01=0x0050, text=»CARD12 SUK A2,/34 FRONT SHUTTER DOESNT CLOSE ?«, t00=0x0015, t01=0x00b4}
0x21b0…21ca              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CARD20 NO «, t00=0x0015, t01=0x00ea}
0x21ca…21de              Head {h00=0x0010, h01=0x0050, text=»CARD15 EQU *«, t00=0x0015, t01=0x0104}
0x21de…220a              Head {h00=0x0028, h01=0x0050, text=» LDK A1,1 FRONT SHUTTER DOESNT CLOSE«, t00=0x0015, t01=0x0118}
0x220a…221c              Head {h00=0x000e, h01=0x0050, text=» RF CARD40«, t00=0x0015, t01=0x0144}
0x221c…2248              Head {h00=0x0028, h01=0x0050, text=»CARD20 ADK A2,/3E TRANSPORT ERROR ? «, t00=0x0015, t01=0x0156}
0x2248…2262              Head {h00=0x0016, h01=0x0050, text=» RF(E) CARD30 YES «, t00=0x0015, t01=0x0182}
0x2262…228a              Head {h00=0x0024, h01=0x0050, text=» SUK A2,2 OPERATION INCORRECT ? «, t00=0x0016, t01=0x000c}
0x228a…22a4              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CARD22 NO «, t00=0x0016, t01=0x0034}
0x22a4…22bc              Head {h00=0x0014, h01=0x0050, text=»CARD21 LDK A1,4 «, t00=0x0016, t01=0x004e}
0x22bc…22ce              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0016, t01=0x0066}
0x22ce…22fa              Head {h00=0x0028, h01=0x0050, text=»CARD22 SUK A2,2 POSITIVE OPERATION ?«, t00=0x0016, t01=0x0078}
0x22fa…2312              Head {h00=0x0014, h01=0x0050, text=» RF(E) ENDIO YES«, t00=0x0016, t01=0x00a4}
0x2312…2330              Head {h00=0x001a, h01=0x0050, text=» SUK A2,7 CARD TAKEN ?«, t00=0x0016, t01=0x00bc}
0x2330…2346              Head {h00=0x0012, h01=0x0050, text=» RF(NE) CARD23«, t00=0x0016, t01=0x00da}
0x2346…2370              Head {h00=0x0026, h01=0x0050, text=» SUK A4,10 SWALLOW CARD REQUEST ? «, t00=0x0016, t01=0x00f0}
0x2370…2386              Head {h00=0x0012, h01=0x0050, text=» RB(E) CARD21 «, t00=0x0016, t01=0x011a}
0x2386…2398              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x0016, t01=0x0130}
0x2398…23ac              Head {h00=0x0010, h01=0x0050, text=»CARD23 EQU *«, t00=0x0016, t01=0x0142}
0x23ac…23d0              Head {h00=0x0020, h01=0x0050, text=» SUK A2,/13 CARD SWALLOWED ?«, t00=0x0016, t01=0x0156}
0x23d0…23ea              Head {h00=0x0016, h01=0x0050, text=» RF(NE) CARD24 NO «, t00=0x0016, t01=0x017a}
0x23ea…2412 (23, 0, 400) Head {h00=0x0024, h01=0x0050, text=» SUK A4,10 SWALLOW CARD ORDER ? «, t00=0x0017, t01=0x0004}
0x2412…2426              Head {h00=0x0010, h01=0x0050, text=» RF(E) ENDIO«, t00=0x0017, t01=0x002c}
0x2426…244a              Head {h00=0x0020, h01=0x0050, text=» RB CARD21 NO INDICATE ERROR«, t00=0x0017, t01=0x0040}
0x244a…2478              Head {h00=0x002a, h01=0x0050, text=»CARD24 ADK A2,/20 RESET CHARACTER CODE«, t00=0x0017, t01=0x0064}
0x2478…2496              Head {h00=0x001a, h01=0x0050, text=» CWK A4,4 READ ORDER /«, t00=0x0017, t01=0x0092}
0x2496…24b0              Head {h00=0x0016, h01=0x0050, text=» RF(E) RECA05 YES «, t00=0x0017, t01=0x00b0}
0x24b0…24c6              Head {h00=0x0012, h01=0x0050, text=» RF THRERR NO «, t00=0x0017, t01=0x00ca}
0x24c6…24da              Head {h00=0x0010, h01=0x0050, text=»CARD30 EQU *«, t00=0x0017, t01=0x00e0}
0x24da…24fe              Head {h00=0x0020, h01=0x0050, text=» LDK A1,/40 TRANSPORT ERROR «, t00=0x0017, t01=0x00f4}
0x24fe…2516              Head {h00=0x0014, h01=0x0050, text=»CARD40 SLL A1,8 «, t00=0x0017, t01=0x0118}
0x2516…2524              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0130}
0x2524…253a              Head {h00=0x0012, h01=0x0050, text=»ENDIO LDK A2,0«, t00=0x0017, t01=0x013e}
0x253a…2564              Head {h00=0x0026, h01=0x0050, text=» SC A2,DWTBC,A6 CLEAR BYTE COUNTER«, t00=0x0017, t01=0x0154}
0x2564…258a              Head {h00=0x0022, h01=0x0050, text=» LDKL A5,DWTSB2 LOAD STACKBASE«, t00=0x0017, t01=0x017e}
0x258a…259c              Head {h00=0x000e, h01=0x0050, text=» ADR A5,A6«, t00=0x0018, t01=0x0014}
0x259c…25b6              Head {h00=0x0016, h01=0x0050, text=» LDR A4,A1 SAVE A1«, t00=0x0018, t01=0x0026}
0x25b6…25e0              Head {h00=0x0026, h01=0x0050, text=» CF A5,ECHEND END I/O ECHO DEVICE «, t00=0x0018, t01=0x0040}
0x25e0…2600              Head {h00=0x001c, h01=0x0050, text=» LD A2,DWTTP,A6 TIMER ? «, t00=0x0018, t01=0x006a}
0x2600…2614              Head {h00=0x0010, h01=0x0050, text=» RF(E) ENDIT«, t00=0x0018, t01=0x008a}
0x2614…262a              Head {h00=0x0012, h01=0x0050, text=» CM* DWTTP,A6 «, t00=0x0018, t01=0x009e}
0x262a…263e              Head {h00=0x0010, h01=0x0050, text=» CM DWTTP,A6«, t00=0x0018, t01=0x00b4}
0x263e…2652              Head {h00=0x0010, h01=0x0050, text=»ENDIT EQU * «, t00=0x0018, t01=0x00c8}
0x2652…266e              Head {h00=0x0018, h01=0x0050, text=» LDR A1,A4 RELOAD A1«, t00=0x0018, t01=0x00dc}
0x266e…2682              Head {h00=0x0010, h01=0x0050, text=» ABL DISEND «, t00=0x0018, t01=0x00f8}
0x2682…2690              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x010c}
0x2690…269a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x011a}
0x269a…26a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0124}
0x26a4…26b8              Head {h00=0x0010, h01=0x0050, text=»RECARD EQU *«, t00=0x0018, t01=0x012e}
0x26b8…26de              Head {h00=0x0022, h01=0x0050, text=» LD A2,10,A8 GET TRACK NUMBER «, t00=0x0018, t01=0x0142}
0x26de…26f0              Head {h00=0x000e, h01=0x0050, text=» ADK A2,8 «, t00=0x0018, t01=0x0168}
0x26f0…2704              Head {h00=0x0010, h01=0x0050, text=»CAROUT EQU *«, t00=0x0018, t01=0x017a}
0x2704…2732              Head {h00=0x002a, h01=0x0050, text=» CF A5,OUTPUT SEND READ TRACK COMMAND «, t00=0x0018, t01=0x018e}
0x2732…275e              Head {h00=0x0028, h01=0x0050, text=» CM DWTLRC,A6 CLEAR LRC-ACKUMULATOR «, t00=0x0019, t01=0x002c}
0x275e…2770              Head {h00=0x000e, h01=0x0050, text=» RB CARD05«, t00=0x0019, t01=0x0058}
0x2770…2784              Head {h00=0x0010, h01=0x0050, text=»RECA05 EQU *«, t00=0x0019, t01=0x006a}
0x2784…27a6              Head {h00=0x001e, h01=0x0050, text=» LDR A3,A3 FIRST CHARACTER«, t00=0x0019, t01=0x007e}
0x27a6…27ce              Head {h00=0x0024, h01=0x0050, text=» RF(N) RECA40 NO, LRC-CHARACTER «, t00=0x0019, t01=0x00a0}
0x27ce…27f4              Head {h00=0x0022, h01=0x0050, text=» RF(NE) RECA10 NO, DATA INPUT «, t00=0x0019, t01=0x00c8}
0x27f4…2808              Head {h00=0x0010, h01=0x0050, text=» ADK A3,/80 «, t00=0x0019, t01=0x00ee}
0x2808…2830              Head {h00=0x0024, h01=0x0050, text=» CCB A2,CRWSTX START CHARACTER ?«, t00=0x0019, t01=0x0102}
0x2830…2846              Head {h00=0x0012, h01=0x0050, text=» RF(E) RECA25 «, t00=0x0019, t01=0x012a}
0x2846…285a              Head {h00=0x0010, h01=0x0050, text=»THRERR EQU *«, t00=0x0019, t01=0x0140}
0x285a…2886              Head {h00=0x0028, h01=0x0050, text=» LDK A1,2 INDICATE THROUGHPUT ERROR «, t00=0x0019, t01=0x0154}
0x2886…28a0              Head {h00=0x0016, h01=0x0050, text=» RB ENDIO END I/O «, t00=0x0019, t01=0x0180}
0x28a0…28b4              Head {h00=0x0010, h01=0x0050, text=»RECA10 EQU *«, t00=0x001a, t01=0x000a}
0x28b4…28c8              Head {h00=0x0010, h01=0x0050, text=» ANK A3,/7F «, t00=0x001a, t01=0x001e}
0x28c8…28ee              Head {h00=0x0022, h01=0x0050, text=» CCB A2,CRWETX END CHARACTER ?«, t00=0x001a, t01=0x0032}
0x28ee…2908              Head {h00=0x0016, h01=0x0050, text=» RF(NE) RECA20 NO «, t00=0x001a, t01=0x0058}
0x2908…2936              Head {h00=0x002a, h01=0x0050, text=» ST A3,6,A8 YES STORE EFFECTIVE LENGTH«, t00=0x001a, t01=0x0072}
0x2936…2958              Head {h00=0x001e, h01=0x0050, text=» NGR A3,A3 NEGATE REGISTER«, t00=0x001a, t01=0x00a0}
0x2958…296a              Head {h00=0x000e, h01=0x0050, text=» RF RECA25«, t00=0x001a, t01=0x00c2}
0x296a…297e              Head {h00=0x0010, h01=0x0050, text=»RECA20 EQU *«, t00=0x001a, t01=0x00d4}
0x297e…29b2              Head {h00=0x0030, h01=0x0050, text=» CF A15,STORE STORE CHARACTER IN ECB-BUFFER «, t00=0x001a, t01=0x00e8}
0x29b2…29e0              Head {h00=0x002a, h01=0x0050, text=» CW A3,4,A8 EFF. LENGTH = REQ. LENGTH «, t00=0x001a, t01=0x011c}
0x29e0…29f6              Head {h00=0x0012, h01=0x0050, text=» ABL(G) SCA175«, t00=0x001a, t01=0x014a}
0x29f6…2a2c              Head {h00=0x0032, h01=0x0050, text=»RECA25 XRS A2,DWTLRC,A6 UPDATE LRC-ACKUMULATOR«, t00=0x001a, t01=0x0160}
0x2a2c…2a4c              Head {h00=0x001c, h01=0x0050, text=» SUK A2,/30 VALID CODE ?«, t00=0x001b, t01=0x0008}
0x2a4c…2a64              Head {h00=0x0014, h01=0x0050, text=» RF(N) RECA30 NO«, t00=0x001b, t01=0x0028}
0x2a64…2a86              Head {h00=0x001e, h01=0x0050, text=» SUK A2,/F NUMERIC VALUE ?«, t00=0x001b, t01=0x0040}
0x2a86…2aa0              Head {h00=0x0016, h01=0x0050, text=» RB(NP) CARD05 YES«, t00=0x001b, t01=0x0062}
0x2aa0…2ab4              Head {h00=0x0010, h01=0x0050, text=»RECA30 EQU *«, t00=0x001b, t01=0x007c}
0x2ab4…2ae0              Head {h00=0x0028, h01=0x0050, text=» LDK A1,4 INDICATE CODE CHECK ERROR «, t00=0x001b, t01=0x0090}
0x2ae0…2b12              Head {h00=0x002e, h01=0x0050, text=» ABL SCA200 STORE EFF. LENGTH AND END I/O «, t00=0x001b, t01=0x00bc}
0x2b12…2b26              Head {h00=0x0010, h01=0x0050, text=»RECA40 EQU *«, t00=0x001b, t01=0x00ee}
0x2b26…2b48              Head {h00=0x001e, h01=0x0050, text=» XR A2,DWTLRC,A6 CHECK LRC«, t00=0x001b, t01=0x0102}
0x2b48…2b5a              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x001b, t01=0x0124}
0x2b5a…2b7a              Head {h00=0x001c, h01=0x0050, text=» RB(NE) THRERR INCORRECT«, t00=0x001b, t01=0x0136}
0x2b7a…2bb0              Head {h00=0x0032, h01=0x0050, text=»ENDI01 RB ENDIO STORE EFF. LENGTH AND END I/O «, t00=0x001b, t01=0x0156}
0x2bb0…2bbe              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x018c}
0x2bbe…2bc8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x000a}
0x2bc8…2bd2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001c, t01=0x0014}
0x2bd2…2be6              Head {h00=0x0010, h01=0x0050, text=»WRCARD EQU *«, t00=0x001c, t01=0x001e}
0x2be6…2c12              Head {h00=0x0028, h01=0x0050, text=» LDK A2,CRWSTX CARD START CHARACTER «, t00=0x001c, t01=0x0032}
0x2c12…2c26              Head {h00=0x0010, h01=0x0050, text=»WRCA10 EQU *«, t00=0x001c, t01=0x005e}
0x2c26…2c50              Head {h00=0x0026, h01=0x0050, text=» CF A5,OUTPUT SEND START CHARACTER«, t00=0x001c, t01=0x0072}
0x2c50…2c84              Head {h00=0x0030, h01=0x0050, text=» CF A15,GETCHR GET NEXT CHARACTER IN BUFFER «, t00=0x001c, t01=0x009c}
0x2c84…2ca8              Head {h00=0x0020, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER ? «, t00=0x001c, t01=0x00d0}
0x2ca8…2cc2              Head {h00=0x0016, h01=0x0050, text=» RB(NE) WRCA10 NO «, t00=0x001c, t01=0x00f4}
0x2cc2…2cec              Head {h00=0x0026, h01=0x0050, text=» LDK A2,CRWETX CARD END CHARACTER «, t00=0x001c, t01=0x010e}
0x2cec…2cfe              Head {h00=0x000e, h01=0x0050, text=» RB CAROUT«, t00=0x001c, t01=0x0138}
0x2cfe…2d2e              Head {h00=0x002c, h01=0x0050, text=»RETUCA LDK A2,FEERET RETURN CARD COMMAND«, t00=0x001c, t01=0x014a}
0x2d2e…2d40              Head {h00=0x000e, h01=0x0050, text=» RB CAROUT«, t00=0x001c, t01=0x017a}
0x2d40…2d70              Head {h00=0x002c, h01=0x0050, text=»SWALL LDK A2,SWALOW SWALLOW CARD COMMAND«, t00=0x001c, t01=0x018c}
0x2d70…2d82              Head {h00=0x000e, h01=0x0050, text=» RB CAROUT«, t00=0x001d, t01=0x002c}
0x2d82…2d90              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x003e}
0x2d90…2d9a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x004c}
0x2d9a…2da4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0056}
0x2da4…2db6              Head {h00=0x000e, h01=0x0050, text=»PICK EQU *«, t00=0x001d, t01=0x0060}
0x2db6…2de6              Head {h00=0x002c, h01=0x0050, text=» LD A2,4,A8 GET NUMBER OF NOTES TO PICK «, t00=0x001d, t01=0x0072}
0x2de6…2dfa              Head {h00=0x0010, h01=0x0050, text=» ORK A2,/30 «, t00=0x001d, t01=0x00a2}
0x2dfa…2e0e              Head {h00=0x0010, h01=0x0050, text=»MICOUT EQU *«, t00=0x001d, t01=0x00b6}
0x2e0e…2e36              Head {h00=0x0024, h01=0x0050, text=» CF A5,OUTPUT SEND PICK COMMAND «, t00=0x001d, t01=0x00ca}
0x2e36…2e48              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x001d, t01=0x00f2}
0x2e48…2e5a              Head {h00=0x000e, h01=0x0050, text=» RF PICK10«, t00=0x001d, t01=0x0104}
0x2e5a…2e6e              Head {h00=0x0010, h01=0x0050, text=»PICK05 EQU *«, t00=0x001d, t01=0x0116}
0x2e6e…2e8c              Head {h00=0x001a, h01=0x0050, text=» LD A2,DWTST,A6 STATUS«, t00=0x001d, t01=0x012a}
0x2e8c…2ea0              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x001d, t01=0x0148}
0x2ea0…2eb6              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) PICK15«, t00=0x001d, t01=0x015c}
0x2eb6…2eca              Head {h00=0x0010, h01=0x0050, text=»PICK10 EQU *«, t00=0x001d, t01=0x0172}
0x2eca…2ef4              Head {h00=0x0026, h01=0x0050, text=» CF A5,STREG WAIT FOR PICK MESSAGE«, t00=0x001d, t01=0x0186}
0x2ef4…2f08              Head {h00=0x0010, h01=0x0050, text=»PICK15 EQU *«, t00=0x001e, t01=0x0020}
0x2f08…2f1a              Head {h00=0x000e, h01=0x0050, text=» LDR A7,A4«, t00=0x001e, t01=0x0034}
0x2f1a…2f3c              Head {h00=0x001e, h01=0x0050, text=» SUK A7,20 CLOSE COMMAND ?«, t00=0x001e, t01=0x0046}
0x2f3c…2f56              Head {h00=0x0016, h01=0x0050, text=» RF(E) CLOS10 YES «, t00=0x001e, t01=0x0068}
0x2f56…2f7a              Head {h00=0x0020, h01=0x0050, text=» ADK A7,6 KEYBOARD REQUEST ?«, t00=0x001e, t01=0x0082}
0x2f7a…2f94              Head {h00=0x0016, h01=0x0050, text=» RF(P) SCAN10 YES «, t00=0x001e, t01=0x00a6}
0x2f94…2fbc              Head {h00=0x0024, h01=0x0050, text=» SUK A1,5 DEVICE ADDRESS VALID ?«, t00=0x001e, t01=0x00c0}
0x2fbc…2fd2              Head {h00=0x0012, h01=0x0050, text=» RB(NE) THRERR«, t00=0x001e, t01=0x00e8}
0x2fd2…2fe6              Head {h00=0x0010, h01=0x0050, text=» SUK A2,/10 «, t00=0x001e, t01=0x00fe}
0x2fe6…3004              Head {h00=0x001a, h01=0x0050, text=» LDK A7,5 LOOP COUNTER«, t00=0x001e, t01=0x0112}
0x3004…302c              Head {h00=0x0024, h01=0x0050, text=» LDK A1,2 RETURN CARD BUILDSTONE«, t00=0x001e, t01=0x0130}
0x302c…3058              Head {h00=0x0028, h01=0x0050, text=»MICLOP SUK A2,1 CORRECT ERRORTYPE ? «, t00=0x001e, t01=0x0158}
0x3058…3072              Head {h00=0x0016, h01=0x0050, text=» RB(E) CARD40 YES «, t00=0x001e, t01=0x0184}
0x3072…3090              Head {h00=0x001a, h01=0x0050, text=» SUK A7,1 LAST LOOP ? «, t00=0x001f, t01=0x000e}
0x3090…30aa              Head {h00=0x0016, h01=0x0050, text=» RF(E) MICEND YES «, t00=0x001f, t01=0x002c}
0x30aa…30d0              Head {h00=0x0022, h01=0x0050, text=» SLL A1,1 PREPARE RETURN CODE «, t00=0x001f, t01=0x0046}
0x30d0…30e2              Head {h00=0x000e, h01=0x0050, text=» RB MICLOP«, t00=0x001f, t01=0x006c}
0x30e2…310a              Head {h00=0x0024, h01=0x0050, text=»MICEND CWK A4,14 FEED REQUEST ? «, t00=0x001f, t01=0x007e}
0x310a…3124              Head {h00=0x0016, h01=0x0050, text=» RF(E) FEED10 YES «, t00=0x001f, t01=0x00a6}
0x3124…3142              Head {h00=0x001a, h01=0x0050, text=» SUK A2,2 DUMP ERROR ?«, t00=0x001f, t01=0x00c0}
0x3142…315c              Head {h00=0x0016, h01=0x0050, text=» RF(E) SCA175 YES «, t00=0x001f, t01=0x00de}
0x315c…3180              Head {h00=0x0020, h01=0x0050, text=» ADK A2,/17 RESET CHAR. CODE«, t00=0x001f, t01=0x00f8}
0x3180…319e              Head {h00=0x001a, h01=0x0050, text=» LDR A3,A3 PICK NUMBER«, t00=0x001f, t01=0x011c}
0x319e…31cc              Head {h00=0x002a, h01=0x0050, text=» RF(N) PICK25 NO, FIRST DUMP CHARACTER«, t00=0x001f, t01=0x013a}
0x31cc…31fc              Head {h00=0x002c, h01=0x0050, text=» RF(NE) PICK30 NO, SECOND DUMP CHARACTER«, t00=0x001f, t01=0x0168}
0x31fc…320e              Head {h00=0x000e, h01=0x0050, text=» ANK A2,/F«, t00=0x0020, t01=0x0008}
0x320e…3240              Head {h00=0x002e, h01=0x0050, text=» CW A2,4,A8 NUMBER OF PICKED NOTES CORRECT«, t00=0x0020, t01=0x001a}
0x3240…3256              Head {h00=0x0012, h01=0x0050, text=» RB(NE) RECA30«, t00=0x0020, t01=0x004c}
0x3256…3280              Head {h00=0x0026, h01=0x0050, text=» ST A2,6,A8 NUMBER OF PICKED NOTES«, t00=0x0020, t01=0x0062}
0x3280…32ba              Head {h00=0x0036, h01=0x0050, text=»PICK20 SUK A3,1 INDICATE WAIT FOR FIRST DUMP CODE «, t00=0x0020, t01=0x008c}
0x32ba…32cc              Head {h00=0x000e, h01=0x0050, text=» RB PICK10«, t00=0x0020, t01=0x00c6}
0x32cc…32e0              Head {h00=0x0010, h01=0x0050, text=»PICK25 EQU *«, t00=0x0020, t01=0x00d8}
0x32e0…3308              Head {h00=0x0024, h01=0x0050, text=» LDR A3,A2 SAVE FIRST DUMP CODE «, t00=0x0020, t01=0x00ec}
0x3308…331a              Head {h00=0x000e, h01=0x0050, text=» RB PICK10«, t00=0x0020, t01=0x0114}
0x331a…3332              Head {h00=0x0014, h01=0x0050, text=»PICK30 ANK A2,/F«, t00=0x0020, t01=0x0126}
0x3332…3344              Head {h00=0x000e, h01=0x0050, text=» ANK A3,/F«, t00=0x0020, t01=0x013e}
0x3344…335c              Head {h00=0x0014, h01=0x0050, text=»PICK40 SUK A3,1 «, t00=0x0020, t01=0x0150}
0x335c…3372              Head {h00=0x0012, h01=0x0050, text=» RF(N) PICK50 «, t00=0x0020, t01=0x0168}
0x3372…3384              Head {h00=0x000e, h01=0x0050, text=» ADK A2,/A«, t00=0x0020, t01=0x017e}
0x3384…3396              Head {h00=0x000e, h01=0x0050, text=» RB PICK40«, t00=0x0020, t01=0x0190}
0x3396…33ce              Head {h00=0x0034, h01=0x0050, text=»PICK50 ST A2,10,A8 STORE NUMBER OF DUMPED NOTES «, t00=0x0021, t01=0x0012}
0x33ce…33e2              Head {h00=0x0010, h01=0x0050, text=»PICK60 EQU *«, t00=0x0021, t01=0x004a}
0x33e2…33f4              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0021, t01=0x005e}
0x33f4…3406              Head {h00=0x000e, h01=0x0050, text=» RB ENDI01«, t00=0x0021, t01=0x0070}
0x3406…3414              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0021, t01=0x0082}
0x3414…341e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0090}
0x341e…3428              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x009a}
0x3428…3452              Head {h00=0x0026, h01=0x0050, text=»CLOSE LDK A2,CLCODE CLOSE COMMAND «, t00=0x0021, t01=0x00a4}
0x3452…3464              Head {h00=0x000e, h01=0x0050, text=» RB MICOUT«, t00=0x0021, t01=0x00ce}
0x3464…3486              Head {h00=0x001e, h01=0x0050, text=»CLOS10 SUK A2,/1D CLOSED ?«, t00=0x0021, t01=0x00e0}
0x3486…349c              Head {h00=0x0012, h01=0x0050, text=» RB(NE) THRERR«, t00=0x0021, t01=0x0102}
0x349c…34ae              Head {h00=0x000e, h01=0x0050, text=» RB PICK60«, t00=0x0021, t01=0x0118}
0x34ae…34c0              Head {h00=0x000e, h01=0x0050, text=»FEED EQU *«, t00=0x0021, t01=0x012a}
0x34c0…34d2              Head {h00=0x000e, h01=0x0050, text=» LDK A3,2 «, t00=0x0021, t01=0x013c}
0x34d2…34fc              Head {h00=0x0026, h01=0x0050, text=» LDK A2,FEERET FEED NOTES COMMAND «, t00=0x0021, t01=0x014e}
0x34fc…350e              Head {h00=0x000e, h01=0x0050, text=» RB MICOUT«, t00=0x0021, t01=0x0178}
0x350e…3530              Head {h00=0x001e, h01=0x0050, text=»   OR RETURN CARD COMMAND «, t00=0x0021, t01=0x018a}
0x3530…355e              Head {h00=0x002a, h01=0x0050, text=»FEED10 SUK A2,1 NOTES NOT AVAILABLE ? «, t00=0x0022, t01=0x001c}
0x355e…3578              Head {h00=0x0016, h01=0x0050, text=» RB(E) RECA30 YES «, t00=0x0022, t01=0x004a}
0x3578…359e              Head {h00=0x0022, h01=0x0050, text=» ADK A2,/10 NOTES AVAILABLE ? «, t00=0x0022, t01=0x0064}
0x359e…35b4              Head {h00=0x0012, h01=0x0050, text=» RF(NE) FEED30«, t00=0x0022, t01=0x008a}
0x35b4…35d4              Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 POWER BREAK ?«, t00=0x0022, t01=0x00a0}
0x35d4…35ee              Head {h00=0x0016, h01=0x0050, text=» RF(N) FEED20 YES «, t00=0x0022, t01=0x00c0}
0x35ee…3618              Head {h00=0x0026, h01=0x0050, text=» LDK A3,1 INDICATE MONEY AVAILABLE«, t00=0x0022, t01=0x00da}
0x3618…362a              Head {h00=0x000e, h01=0x0050, text=» RB PICK10«, t00=0x0022, t01=0x0104}
0x362a…366e              Head {h00=0x0040, h01=0x0050, text=»FEED20 LDK A1,/10 INDICATE MONEY AVAILABLE AFTER POWER BREAK«, t00=0x0022, t01=0x0116}
0x366e…3682              Head {h00=0x0010, h01=0x0050, text=»ENDI02 EQU *«, t00=0x0022, t01=0x015a}
0x3682…3694              Head {h00=0x000e, h01=0x0050, text=» RB ENDI01«, t00=0x0022, t01=0x016e}
0x3694…36ba              Head {h00=0x0022, h01=0x0050, text=»FEED30 SUK A2,7 NOTES TAKEN ? «, t00=0x0022, t01=0x0180}
0x36ba…36ce              Head {h00=0x0010, h01=0x0050, text=»FEEDER EQU *«, t00=0x0023, t01=0x0016}
0x36ce…36e4              Head {h00=0x0012, h01=0x0050, text=» RB(NE) THRERR«, t00=0x0023, t01=0x002a}
0x36e4…3704              Head {h00=0x001c, h01=0x0050, text=» LDR A3,A3 POWER BREAK ?«, t00=0x0023, t01=0x0040}
0x3704…371e              Head {h00=0x0016, h01=0x0050, text=» RB(N) FEED20 YES «, t00=0x0023, t01=0x0060}
0x371e…3730              Head {h00=0x000e, h01=0x0050, text=» RB PICK60«, t00=0x0023, t01=0x007a}
0x3730…373e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0023, t01=0x008c}
0x373e…3748              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x009a}
0x3748…3752              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0023, t01=0x00a4}
0x3752…3766              Head {h00=0x0010, h01=0x0050, text=»SCANKE EQU *«, t00=0x0023, t01=0x00ae}
0x3766…3792              Head {h00=0x0028, h01=0x0050, text=» LDK A2,SCANK SCAN KEYBOARD COMMAND «, t00=0x0023, t01=0x00c2}
0x3792…37a4              Head {h00=0x000e, h01=0x0050, text=» RB MICOUT«, t00=0x0023, t01=0x00ee}
0x37a4…37b8              Head {h00=0x0010, h01=0x0050, text=»SCAN10 EQU *«, t00=0x0023, t01=0x0100}
0x37b8…37ca              Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x0023, t01=0x0114}
0x37ca…37ea              Head {h00=0x001c, h01=0x0050, text=»   DEVICE ADDRESS = 1 ? «, t00=0x0023, t01=0x0126}
0x37ea…3800              Head {h00=0x0012, h01=0x0050, text=» RF(E) SCAN12 «, t00=0x0023, t01=0x0146}
0x3800…3812              Head {h00=0x000e, h01=0x0050, text=» SUK A1,4 «, t00=0x0023, t01=0x015c}
0x3812…3828              Head {h00=0x0012, h01=0x0050, text=» RB(NE) FEEDER«, t00=0x0023, t01=0x016e}
0x3828…383a              Head {h00=0x000e, h01=0x0050, text=» SUK A2,4 «, t00=0x0023, t01=0x0184}
0x383a…3850              Head {h00=0x0012, h01=0x0050, text=» RB(E) RECA30 «, t00=0x0024, t01=0x0008}
0x3850…3862              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0024, t01=0x001e}
0x3862…3878              Head {h00=0x0012, h01=0x0050, text=» RB(E) ENDI01 «, t00=0x0024, t01=0x0030}
0x3878…388c              Head {h00=0x0010, h01=0x0050, text=» ABL THRERR «, t00=0x0024, t01=0x0046}
0x388c…38b2              Head {h00=0x0022, h01=0x0050, text=»SCAN12 SUK A7,2 PIN REQUEST ? «, t00=0x0024, t01=0x005a}
0x38b2…38ca              Head {h00=0x0014, h01=0x0050, text=» RF(E) PIN10 YES«, t00=0x0024, t01=0x0080}
0x38ca…38f0              Head {h00=0x0022, h01=0x0050, text=» CF A15,STORE STORE CHARACTER «, t00=0x0024, t01=0x0098}
0x38f0…3920              Head {h00=0x002c, h01=0x0050, text=»SCAN15 LD A1,10,A8 GET KEY-TABLE ADDRESS«, t00=0x0024, t01=0x00be}
0x3920…3942              Head {h00=0x001e, h01=0x0050, text=» RF(E) SCA100 NO KEYTABLE «, t00=0x0024, t01=0x00ee}
0x3942…3962              Head {h00=0x001c, h01=0x0050, text=» LCR A7,A1 TABLE LENGTH «, t00=0x0024, t01=0x0110}
0x3962…3976              Head {h00=0x0010, h01=0x0050, text=» ANK A7,/FF «, t00=0x0024, t01=0x0130}
0x3976…39a0              Head {h00=0x0026, h01=0x0050, text=» ADR A1,A7 LAST PLACE IN KEY-TABLE«, t00=0x0024, t01=0x0144}
0x39a0…39b2              Head {h00=0x000e, h01=0x0050, text=» ADK A1,1 «, t00=0x0024, t01=0x016e}
0x39b2…39ca              Head {h00=0x0014, h01=0x0050, text=»SCAN20 SUK A7,1 «, t00=0x0024, t01=0x0180}
0x39ca…39fa              Head {h00=0x002c, h01=0x0050, text=» RF(N) SCA100 KEY NOT FOUND IN KEYTABLE «, t00=0x0025, t01=0x0008}
0x39fa…3a14              Head {h00=0x0016, h01=0x0050, text=» SUK A1,1 NEXT KEY«, t00=0x0025, t01=0x0038}
0x3a14…3a34              Head {h00=0x001c, h01=0x0050, text=» CCR A2,A1 EOR-CHARACTER«, t00=0x0025, t01=0x0052}
0x3a34…3a4a              Head {h00=0x0012, h01=0x0050, text=» RB(NE) SCAN20«, t00=0x0025, t01=0x0072}
0x3a4a…3a5c              Head {h00=0x000e, h01=0x0050, text=» LDK A1,0 «, t00=0x0025, t01=0x0088}
0x3a5c…3a80              Head {h00=0x0020, h01=0x0050, text=» ADR A7,A7 YES, DOUBLE INDEX«, t00=0x0025, t01=0x009a}
0x3a80…3ab0              Head {h00=0x002c, h01=0x0050, text=» ST A7,10,A8 STORE INDEX IN CONTROL WORD«, t00=0x0025, t01=0x00be}
0x3ab0…3ac2              Head {h00=0x000e, h01=0x0050, text=» RF SCA200«, t00=0x0025, t01=0x00ee}
0x3ac2…3af2              Head {h00=0x002c, h01=0x0050, text=»SCA100 CCK A2,/3030 NUMERIC CHARACTER ? «, t00=0x0025, t01=0x0100}
0x3af2…3b0c              Head {h00=0x0016, h01=0x0050, text=» ABL(N) RECA30 NO «, t00=0x0025, t01=0x0130}
0x3b0c…3b1e              Head {h00=0x000e, h01=0x0050, text=» LDK A7,0 «, t00=0x0025, t01=0x014a}
0x3b1e…3b3c              Head {h00=0x001a, h01=0x0050, text=» CF A5,ECHO ECHO CHAR «, t00=0x0025, t01=0x015c}
0x3b3c…3b62              Head {h00=0x0022, h01=0x0050, text=» CW A3,4,A8 LENGTH OVERFLOW ? «, t00=0x0025, t01=0x017a}
0x3b62…3b7c              Head {h00=0x0016, h01=0x0050, text=» RB(NE) PICK10 NO «, t00=0x0026, t01=0x0010}
0x3b7c…3b94              Head {h00=0x0014, h01=0x0050, text=»SCA175 LDK A1,8 «, t00=0x0026, t01=0x002a}
0x3b94…3bc4              Head {h00=0x002c, h01=0x0050, text=»SCA200 ST A3,6,A8 STORE EFFECTIVE LENGTH«, t00=0x0026, t01=0x0042}
0x3bc4…3bd6              Head {h00=0x000e, h01=0x0050, text=» RB ENDI02«, t00=0x0026, t01=0x0072}
0x3bd6…3be4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x0084}
0x3be4…3bee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0092}
0x3bee…3bf8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x009c}
0x3bf8…3c0c              Head {h00=0x0010, h01=0x0050, text=»SCANPI EQU *«, t00=0x0026, t01=0x00a6}
0x3c0c…3c40              Head {h00=0x0030, h01=0x0050, text=» LD A2,4,A8 GET WANTED NUMBER OF CHARACTERS «, t00=0x0026, t01=0x00ba}
0x3c40…3c52              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0026, t01=0x00ee}
0x3c52…3c7a              Head {h00=0x0024, h01=0x0050, text=» CF A5,OUTPUT SEND START COMMAND«, t00=0x0026, t01=0x0100}
0x3c7a…3c8e              Head {h00=0x0010, h01=0x0050, text=»PIN05 EQU * «, t00=0x0026, t01=0x0128}
0x3c8e…3ca0              Head {h00=0x000e, h01=0x0050, text=» RB PICK10«, t00=0x0026, t01=0x013c}
0x3ca0…3cb4              Head {h00=0x0010, h01=0x0050, text=»PIN10 EQU * «, t00=0x0026, t01=0x014e}
0x3cb4…3cd6              Head {h00=0x001e, h01=0x0050, text=» SUK A2,4 INCORRECT PIN ? «, t00=0x0026, t01=0x0162}
0x3cd6…3cec              Head {h00=0x0012, h01=0x0050, text=» RB(E) SCA175 «, t00=0x0026, t01=0x0184}
0x3cec…3cfe              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0027, t01=0x000a}
0x3cfe…3d14              Head {h00=0x0012, h01=0x0050, text=» RB(E) ENDI02 «, t00=0x0027, t01=0x001c}
0x3d14…3d34              Head {h00=0x001c, h01=0x0050, text=» SUK A2,/52 PIN INPUT ? «, t00=0x0027, t01=0x0032}
0x3d34…3d48              Head {h00=0x0010, h01=0x0050, text=» RF(E) PIN20«, t00=0x0027, t01=0x0052}
0x3d48…3d64              Head {h00=0x0018, h01=0x0050, text=» ADK A2,/58 RESET A2«, t00=0x0027, t01=0x0066}
0x3d64…3d76              Head {h00=0x000e, h01=0x0050, text=» RB SCAN15«, t00=0x0027, t01=0x0082}
0x3d76…3d8a              Head {h00=0x0010, h01=0x0050, text=»PIN20 EQU * «, t00=0x0027, t01=0x0094}
0x3d8a…3dbc              Head {h00=0x002e, h01=0x0050, text=» SC A2,DWTBC,A6 RESET RECIVER BUFFER AREA «, t00=0x0027, t01=0x00a8}
0x3dbc…3dd4              Head {h00=0x0014, h01=0x0050, text=» LC A2,KBPIN,A6 «, t00=0x0027, t01=0x00da}
0x3dd4…3de8              Head {h00=0x0010, h01=0x0050, text=» CF A5,ECHO «, t00=0x0027, t01=0x00f2}
0x3de8…3dfa              Head {h00=0x000e, h01=0x0050, text=» LDK A1,1 «, t00=0x0027, t01=0x0106}
0x3dfa…3e0e              Head {h00=0x0010, h01=0x0050, text=» ABL PICK05 «, t00=0x0027, t01=0x0118}
0x3e0e…3e1c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x012c}
0x3e1c…3e26              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x013a}
0x3e26…3e30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0144}
0x3e30…3e42              Head {h00=0x000e, h01=0x0050, text=»TEST EQU *«, t00=0x0027, t01=0x014e}
0x3e42…3e54              Head {h00=0x000e, h01=0x0050, text=» LDK A2,0 «, t00=0x0027, t01=0x0160}
0x3e54…3e66              Head {h00=0x000e, h01=0x0050, text=» RF OPEN10«, t00=0x0027, t01=0x0172}
0x3e66…3e9e              Head {h00=0x0034, h01=0x0050, text=»FITRAN LDK A2,FICODE FINISH TRANSACTION COMMAND «, t00=0x0027, t01=0x0184}
0x3e9e…3eb0              Head {h00=0x000e, h01=0x0050, text=» RF OPEN10«, t00=0x0028, t01=0x002c}
0x3eb0…3ec2              Head {h00=0x000e, h01=0x0050, text=»OPEN EQU *«, t00=0x0028, t01=0x003e}
0x3ec2…3ee6              Head {h00=0x0020, h01=0x0050, text=» LDK A2,OPCODE OPEN COMMAND «, t00=0x0028, t01=0x0050}
0x3ee6…3f02              Head {h00=0x0018, h01=0x0050, text=»OPEN10 CF A5,OUTPUT «, t00=0x0028, t01=0x0074}
0x3f02…3f18              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/200 «, t00=0x0028, t01=0x0090}
0x3f18…3f30              Head {h00=0x0014, h01=0x0050, text=» ORS A2,DWTST,A6«, t00=0x0028, t01=0x00a6}
0x3f30…3f48              Head {h00=0x0014, h01=0x0050, text=»ENDI03 RB ENDI02«, t00=0x0028, t01=0x00be}
0x3f48…3f56              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00d6}
0x3f56…3f60              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e4}
0x3f60…3f6a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00ee}
0x3f6a…3f74              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00f8}
0x3f74…3f88              Head {h00=0x0010, h01=0x0050, text=»*    I H C G«, t00=0x0028, t01=0x0102}
0x3f88…3f92              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0116}
0x3f92…3fb0              Head {h00=0x001a, h01=0x0050, text=»*    INTERRUPT HANDLER«, t00=0x0028, t01=0x0120}
0x3fb0…3fba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x013e}
0x3fba…3fcc              Head {h00=0x000e, h01=0x0050, text=»IHCG EQU *«, t00=0x0028, t01=0x0148}
0x3fcc…3fde              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0028, t01=0x015a}
0x3fde…3ff0              Head {h00=0x000e, h01=0x0050, text=» SRL A4,12«, t00=0x0028, t01=0x016c}
0x3ff0…4002              Head {h00=0x000e, h01=0x0050, text=» ANK A4,7 «, t00=0x0028, t01=0x017e}
0x4002…4016              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x0028, t01=0x0190}
0x4016…403e              Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTST,A6 GET STATUS WORD «, t00=0x0029, t01=0x0014}
0x403e…405a              Head {h00=0x0018, h01=0x0050, text=» RF(NN) IHC100 BUSY «, t00=0x0029, t01=0x003c}
0x405a…406c              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x0029, t01=0x0058}
0x406c…4090              Head {h00=0x0020, h01=0x0050, text=» SUK A4,3 DEVICE ADDRESS 3 ?«, t00=0x0029, t01=0x006a}
0x4090…40aa              Head {h00=0x0016, h01=0x0050, text=» RF(NE) IHCG30 NO «, t00=0x0029, t01=0x008e}
0x40aa…40ce              Head {h00=0x0020, h01=0x0050, text=» SUK A3,2 TRANSPORT ERROR ? «, t00=0x0029, t01=0x00a8}
0x40ce…40e8              Head {h00=0x0016, h01=0x0050, text=» RF(E) IHCG20 YES «, t00=0x0029, t01=0x00cc}
0x40e8…4114              Head {h00=0x0028, h01=0x0050, text=» SUK A3,10 CARD IN READER MESSAGE ? «, t00=0x0029, t01=0x00e6}
0x4114…412e              Head {h00=0x0016, h01=0x0050, text=» RF(E) IHCG20 YES «, t00=0x0029, t01=0x0112}
0x412e…4160              Head {h00=0x002e, h01=0x0050, text=» SUK A3,/34 FRONT SHUTTER DOESN'T CLOSE ? «, t00=0x0029, t01=0x012c}
0x4160…4174              Head {h00=0x0010, h01=0x0050, text=» RF(NE) EXIT«, t00=0x0029, t01=0x015e}
0x4174…41aa              Head {h00=0x0032, h01=0x0050, text=»IHCG20 ORS A2,DWTST,A6 SET BIT IN STATUS WORD «, t00=0x0029, t01=0x0172}
0x41aa…41c0              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x002a, t01=0x0018}
0x41c0…41ce              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x002e}
0x41ce…41d6              Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x003c}
0x41d6…41de              Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x0044}
0x41de…41e6              Head {h00=0x0004, h01=0x0050, t00=0x002a, t01=0x004c}
0x41e6…41fa              Head {h00=0x0010, h01=0x0050, text=»IHCG30 EQU *«, t00=0x002a, t01=0x0054}
0x41fa…421e              Head {h00=0x0020, h01=0x0050, text=» SUK A4,2 DEVICE ADDRESS 5 ?«, t00=0x002a, t01=0x0068}
0x421e…4236              Head {h00=0x0014, h01=0x0050, text=» RB(NE) EXIT NO «, t00=0x002a, t01=0x008c}
0x4236…4256              Head {h00=0x001c, h01=0x0050, text=» SUK A3,/1C PIN LOADED ?«, t00=0x002a, t01=0x00a4}
0x4256…426c              Head {h00=0x0012, h01=0x0050, text=» RF(E) IHCG90 «, t00=0x002a, t01=0x00c4}
0x426c…4290              Head {h00=0x0020, h01=0x0050, text=» ADK A3,/19 STATUS REQUEST ?«, t00=0x002a, t01=0x00da}
0x4290…42a4              Head {h00=0x0010, h01=0x0050, text=» RB(NE) EXIT«, t00=0x002a, t01=0x00fe}
0x42a4…42b2              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0112}
0x42b2…42bc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0120}
0x42bc…42dc              Head {h00=0x001c, h01=0x0050, text=»*   SEND STATUS MESSAGE «, t00=0x002a, t01=0x012a}
0x42dc…42e6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x014a}
0x42e6…42fa              Head {h00=0x0010, h01=0x0050, text=»IHCG80 EQU *«, t00=0x002a, t01=0x0154}
0x42fa…430c              Head {h00=0x000e, h01=0x0050, text=» LDK A2,5 «, t00=0x002a, t01=0x0168}
0x430c…4324              Head {h00=0x0014, h01=0x0050, text=» LDKL A5,DWTSB2 «, t00=0x002a, t01=0x017a}
0x4324…4342 (43, 0, 400) Head {h00=0x001a, h01=0x0050, text=» ADR A5,A6 STACK BASE «, t00=0x002b, t01=0x0004}
0x4342…436e              Head {h00=0x0028, h01=0x0050, text=» CF A5,MODIFY MODIFY DEVICE ADDRESS «, t00=0x002b, t01=0x0022}
0x436e…4384              Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/7FFF«, t00=0x002b, t01=0x004e}
0x4384…43a6              Head {h00=0x001e, h01=0x0050, text=» ANS A2,DWTST,A6 SET BUSY «, t00=0x002b, t01=0x0064}
0x43a6…43b8              Head {h00=0x000e, h01=0x0050, text=» LDK A4,28«, t00=0x002b, t01=0x0086}
0x43b8…43d0              Head {h00=0x0014, h01=0x0050, text=» LDKL A3,STINTA «, t00=0x002b, t01=0x0098}
0x43d0…43fc              Head {h00=0x0028, h01=0x0050, text=»IHCG85 LCR A2,A3 GET FIRST CHARACTER«, t00=0x002b, t01=0x00b0}
0x43fc…4416              Head {h00=0x0016, h01=0x0050, text=» CF A5,OUTPUT SEND«, t00=0x002b, t01=0x00dc}
0x4416…4428              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x002b, t01=0x00f6}
0x4428…4450              Head {h00=0x0024, h01=0x0050, text=» CWK A3,STINTE LAST CHARACTER ? «, t00=0x002b, t01=0x0108}
0x4450…4466              Head {h00=0x0012, h01=0x0050, text=» RB(NE) IHCG85«, t00=0x002b, t01=0x0130}
0x4466…447a              Head {h00=0x0010, h01=0x0050, text=» LDK A1,/80 «, t00=0x002b, t01=0x0146}
0x447a…44aa              Head {h00=0x002c, h01=0x0050, text=» ORRS A1,A6 INDICATE WAIT FOR PIN CARDS «, t00=0x002b, t01=0x015a}
0x44aa…44bc              Head {h00=0x000e, h01=0x0050, text=» RB ENDI03«, t00=0x002b, t01=0x018a}
0x44bc…44d8              Head {h00=0x0018, h01=0x0050, text=»IHCG90 LDKL A1,/FF7F«, t00=0x002c, t01=0x000c}
0x44d8…450a              Head {h00=0x002e, h01=0x0050, text=» ANRS A1,A6 RESET PIN CARD WAIT INDICATOR «, t00=0x002c, t01=0x0028}
0x450a…451a              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x002c, t01=0x005a}
0x451a…4528              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002c, t01=0x006a}
0x4528…4532              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0078}
0x4532…454a              Head {h00=0x0014, h01=0x0050, text=»*   DEVICE BUSY «, t00=0x002c, t01=0x0082}
0x454a…4554              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x009a}
0x4554…4568              Head {h00=0x0010, h01=0x0050, text=»IHC100 EQU *«, t00=0x002c, t01=0x00a4}
0x4568…4592              Head {h00=0x0026, h01=0x0050, text=» LDR A1,A1 RETURN CODE FROM CHLT ?«, t00=0x002c, t01=0x00b8}
0x4592…45a6              Head {h00=0x0010, h01=0x0050, text=» RB(NE) EXIT«, t00=0x002c, t01=0x00e2}
0x45a6…45c8              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A4 OUTPUT ANSWER ?«, t00=0x002c, t01=0x00f6}
0x45c8…45e0              Head {h00=0x0014, h01=0x0050, text=» RF(E) IHRET YES«, t00=0x002c, t01=0x0118}
0x45e0…4604              Head {h00=0x0020, h01=0x0050, text=» SUK A4,5 DEVICE ADDRESS 5 ?«, t00=0x002c, t01=0x0130}
0x4604…461e              Head {h00=0x0016, h01=0x0050, text=» RF(NE) IHC200 NO «, t00=0x002c, t01=0x0154}
0x461e…4640              Head {h00=0x001e, h01=0x0050, text=» ADK A3,3 STATUS REQUEST ?«, t00=0x002c, t01=0x016e}
0x4640…465a              Head {h00=0x0016, h01=0x0050, text=» RB(E) IHCG80 YES «, t00=0x002c, t01=0x0190}
0x465a…4686              Head {h00=0x0028, h01=0x0050, text=» SUK A3,/15 INTERFACE BOARD ERROR ? «, t00=0x002d, t01=0x001a}
0x4686…469c              Head {h00=0x0012, h01=0x0050, text=» RF(NE) IHC105«, t00=0x002d, t01=0x0046}
0x469c…46ce              Head {h00=0x002e, h01=0x0050, text=» LDK A1,/40 INDICATE INTERFACE BOARD ERROR«, t00=0x002d, t01=0x005c}
0x46ce…46e0              Head {h00=0x000e, h01=0x0050, text=» RB ENDI03«, t00=0x002d, t01=0x008e}
0x46e0…46f8              Head {h00=0x0014, h01=0x0050, text=»IHC105 SUK A3,1 «, t00=0x002d, t01=0x00a0}
0x46f8…4728              Head {h00=0x002c, h01=0x0050, text=» RF(NE) IHC110 NOT TRANSMISSION TIMEOUT «, t00=0x002d, t01=0x00b8}
0x4728…4758              Head {h00=0x002c, h01=0x0050, text=» LDK A1,2 INDICATE TRANSMISSION PROBLEMS«, t00=0x002d, t01=0x00e8}
0x4758…476a              Head {h00=0x000e, h01=0x0050, text=» RB ENDI03«, t00=0x002d, t01=0x0118}
0x476a…47a0              Head {h00=0x0032, h01=0x0050, text=»IHC110 SUK A3,3 PIN PARAMETER LOADED MESSAGE ?«, t00=0x002d, t01=0x012a}
0x47a0…47ba              Head {h00=0x0016, h01=0x0050, text=» RB(E) IHCG90 YES «, t00=0x002d, t01=0x0160}
0x47ba…47d2              Head {h00=0x0014, h01=0x0050, text=»IHRET ABL LDREG «, t00=0x002d, t01=0x017a}
0x47d2…47ea (46, 0, 400) Head {h00=0x0014, h01=0x0050, text=»IHC200 ADK A4,2 «, t00=0x002e, t01=0x0004}
0x47ea…47fe              Head {h00=0x0010, h01=0x0050, text=» RB(E) IHRET«, t00=0x002e, t01=0x001c}
0x47fe…4810              Head {h00=0x000e, h01=0x0050, text=» ADK A4,2 «, t00=0x002e, t01=0x0030}
0x4810…4828              Head {h00=0x0014, h01=0x0050, text=» ABL(NE) THRERR «, t00=0x002e, t01=0x0042}
0x4828…484c              Head {h00=0x0020, h01=0x0050, text=» LC A4,DWTST,A6 STATUS BYTE «, t00=0x002e, t01=0x005a}
0x484c…485e              Head {h00=0x000e, h01=0x0050, text=» ANK A4,1 «, t00=0x002e, t01=0x007e}
0x485e…4874              Head {h00=0x0012, h01=0x0050, text=» RB(NE) IHRET «, t00=0x002e, t01=0x0090}
0x4874…48a6              Head {h00=0x002e, h01=0x0050, text=» SC A2,DWTST+1,A6 INDICATE ERROR RECEIVED «, t00=0x002e, t01=0x00a6}
0x48a6…48b6              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x002e, t01=0x00d8}
0x48b6…48c4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002e, t01=0x00e8}
0x48c4…48ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x00f6}
0x48ce…48d8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0100}
0x48d8…48e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x010a}
0x48e2…48f6              Head {h00=0x0010, h01=0x0050, text=»*    R C C G«, t00=0x002e, t01=0x0114}
0x48f6…4900              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0128}
0x4900…491e              Head {h00=0x001a, h01=0x0050, text=»*    RECOVERY ROUTINE «, t00=0x002e, t01=0x0132}
0x491e…4928              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002e, t01=0x0150}
0x4928…493a              Head {h00=0x000e, h01=0x0050, text=»RCCG EQU *«, t00=0x002e, t01=0x015a}
0x493a…4950              Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x002e, t01=0x016c}
0x4950…496e              Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 BUSY ?«, t00=0x002e, t01=0x0182}
0x496e…4984              Head {h00=0x0012, h01=0x0050, text=» RF(N) RCCG20 «, t00=0x002f, t01=0x0010}
0x4984…49ae              Head {h00=0x0026, h01=0x0050, text=» LD A4,DWTA4,A6 GET FUNCTION INDEX«, t00=0x002f, t01=0x0026}
0x49ae…49d6              Head {h00=0x0024, h01=0x0050, text=» SUK A4,28 STATUS TRANSMISSION ?«, t00=0x002f, t01=0x0050}
0x49d6…49ec              Head {h00=0x0012, h01=0x0050, text=» RB(E) IHCG80 «, t00=0x002f, t01=0x0078}
0x49ec…4a06              Head {h00=0x0016, h01=0x0050, text=» ADK A4,22 WRITE ?«, t00=0x002f, t01=0x008e}
0x4a06…4a20              Head {h00=0x0016, h01=0x0050, text=» RF(E) RCCG30 YES «, t00=0x002f, t01=0x00a8}
0x4a20…4a38              Head {h00=0x0014, h01=0x0050, text=» SUK A4,8 FEED ?«, t00=0x002f, t01=0x00c2}
0x4a38…4a4e              Head {h00=0x0012, h01=0x0050, text=» RF(NE) RCCG10«, t00=0x002f, t01=0x00da}
0x4a4e…4a66              Head {h00=0x0014, h01=0x0050, text=» LD A3,DWTA3,A6 «, t00=0x002f, t01=0x00f0}
0x4a66…4a7c              Head {h00=0x0012, h01=0x0050, text=» RF(NE) RCCG05«, t00=0x002f, t01=0x0108}
0x4a7c…4aa2              Head {h00=0x0022, h01=0x0050, text=» SUK A3,1 INDICATE POWER FAIL «, t00=0x002f, t01=0x011e}
0x4aa2…4ac8              Head {h00=0x0022, h01=0x0050, text=» LD A4,DWTA4,A6 FUNCTION INDEX«, t00=0x002f, t01=0x0144}
0x4ac8…4adc              Head {h00=0x0010, h01=0x0050, text=» ABL PICK10 «, t00=0x002f, t01=0x016a}
0x4adc…4af4              Head {h00=0x0014, h01=0x0050, text=»RCCG05 SUK A3,1 «, t00=0x002f, t01=0x017e}
0x4af4…4b0a              Head {h00=0x0012, h01=0x0050, text=» ABL(E) FEED20«, t00=0x0030, t01=0x0008}
0x4b0a…4b40              Head {h00=0x0032, h01=0x0050, text=»RCCG10 LD A4,DWTST,A6 LEFT BYTE OF STATUS WORD«, t00=0x0030, t01=0x001e}
0x4b40…4b64              Head {h00=0x0020, h01=0x0050, text=» SLL A4,3 RECOVERY BIT SET? «, t00=0x0030, t01=0x0054}
0x4b64…4b7e              Head {h00=0x0016, h01=0x0050, text=» ABL(NN) THRERR NO«, t00=0x0030, t01=0x0078}
0x4b7e…4b8e              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x0030, t01=0x0092}
0x4b8e…4baa              Head {h00=0x0018, h01=0x0050, text=»RCCG20 LDKL A1,/400 «, t00=0x0030, t01=0x00a2}
0x4baa…4bc2              Head {h00=0x0014, h01=0x0050, text=» ORS A1,DWTST,A6«, t00=0x0030, t01=0x00be}
0x4bc2…4bd2              Head {h00=0x000c, h01=0x0050, text=» RB EXIT«, t00=0x0030, t01=0x00d6}
0x4bd2…4bf0              Head {h00=0x001a, h01=0x0050, text=»RCCG30 LD A8,DWTECB,A6«, t00=0x0030, t01=0x00e6}
0x4bf0…4c02              Head {h00=0x000e, h01=0x0050, text=» LDK A4,3 «, t00=0x0030, t01=0x0104}
0x4c02…4c14              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x0030, t01=0x0116}
0x4c14…4c28              Head {h00=0x0010, h01=0x0050, text=» ORS A1,8,A8«, t00=0x0030, t01=0x0128}
0x4c28…4c3c              Head {h00=0x0010, h01=0x0050, text=» ABL ACCG50 «, t00=0x0030, t01=0x013c}
0x4c3c…4c4a              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0030, t01=0x0150}
0x4c4a…4c54              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0030, t01=0x015e}
0x4c54…4c8a              Head {h00=0x0032, h01=0x0050, text=»*    STORE = SUBROUTINE TO STORE CHARACTER IN «, t00=0x0030, t01=0x0168}
0x4c8a…4cc4              Head {h00=0x0036, h01=0x0050, text=»*            ECB-BUFFER AND INCREMENT BUFFER INDEX«, t00=0x0031, t01=0x000e}
0x4cc4…4cce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0048}
0x4cce…4ce2              Head {h00=0x0010, h01=0x0050, text=»STORE EQU * «, t00=0x0031, t01=0x0052}
0x4ce2…4d04              Head {h00=0x001e, h01=0x0050, text=» LD A7,2,A8 BUFFER ADDRESS«, t00=0x0031, t01=0x0066}
0x4d04…4d28              Head {h00=0x0020, h01=0x0050, text=» ADR A7,A3 ADD BUFFER INDEX «, t00=0x0031, t01=0x0088}
0x4d28…4d4a              Head {h00=0x001e, h01=0x0050, text=» SCR A2,A7 STORE CHARACTER«, t00=0x0031, t01=0x00ac}
0x4d4a…4d6c              Head {h00=0x001e, h01=0x0050, text=» ADK A3,1 INCREMENT INDEX «, t00=0x0031, t01=0x00ce}
0x4d6c…4d80              Head {h00=0x0010, h01=0x0050, text=» ABL RTNA15 «, t00=0x0031, t01=0x00f0}
0x4d80…4d8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0104}
0x4d8a…4d94              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x010e}
0x4d94…4dbe              Head {h00=0x0026, h01=0x0050, text=»*    MODIFY = SUBROUTINE TO MODIFY«, t00=0x0031, t01=0x0118}
0x4dbe…4dee              Head {h00=0x002c, h01=0x0050, text=»*             DEVICE ADDRESS IN DWTCHP. «, t00=0x0031, t01=0x0142}
0x4dee…4df8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0031, t01=0x0172}
0x4df8…4e0c              Head {h00=0x0010, h01=0x0050, text=»MODIFY EQU *«, t00=0x0031, t01=0x017c}
0x4e0c…4e2a              Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A6 GET DWTCHP«, t00=0x0031, t01=0x0190}
0x4e2a…4e40              Head {h00=0x0012, h01=0x0050, text=» ANKL A3,/8FFF«, t00=0x0032, t01=0x001e}
0x4e40…4e52              Head {h00=0x000e, h01=0x0050, text=» SRC A2,4 «, t00=0x0032, t01=0x0034}
0x4e52…4e64              Head {h00=0x000e, h01=0x0050, text=» ORR A3,A2«, t00=0x0032, t01=0x0046}
0x4e64…4e7e              Head {h00=0x0016, h01=0x0050, text=» STR A3,A6 RESTORE«, t00=0x0032, t01=0x0058}
0x4e7e…4e8e              Head {h00=0x000c, h01=0x0050, text=» RTN A5 «, t00=0x0032, t01=0x0072}
0x4e8e…4e9c              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0032, t01=0x0082}
0x4e9c…4ea6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x0090}
0x4ea6…4eb0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x009a}
0x4eb0…4ede              Head {h00=0x002a, h01=0x0050, text=»*    STINTA = STATUS INFORMATION TABLE«, t00=0x0032, t01=0x00a4}
0x4ede…4ee8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0032, t01=0x00d2}
0x4ee8…4efc              Head {h00=0x0010, h01=0x0050, text=»STINTA EQU *«, t00=0x0032, t01=0x00dc}
0x4efc…4f26              Head {h00=0x0026, h01=0x0050, text=» DATA STARP1,STOPP1,STARP2,STOPP2 «, t00=0x0032, t01=0x00f0}
0x4f26…4f50              Head {h00=0x0026, h01=0x0050, text=» DATA STARP3,STOPP3,STARP4,STOPP4 «, t00=0x0032, t01=0x011a}
0x4f50…4f7a              Head {h00=0x0026, h01=0x0050, text=» DATA TISWCA,TIANTC,TIPILO,TIBUZZ «, t00=0x0032, t01=0x0144}
0x4f7a…4f96              Head {h00=0x0018, h01=0x0050, text=» DATA LENGNO,KEYTYP «, t00=0x0032, t01=0x016e}
0x4f96…4faa              Head {h00=0x0010, h01=0x0050, text=»STINTE EQU *«, t00=0x0032, t01=0x018a}
0x4faa…4fb6              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0033, t01=0x000e}
0x4fb6…4fba              Head {h00=0x4004, h01=0x0000}
0x4fba…4fbe              00 33 00 1a                                                                                                                                                                                                                                       ┆ 3  ┆
0x4fbe…4fc6 (52, 1, 8)   20 04 00 00 00 34 00 04                                                                                                                                                                                                                           ┆     4  ┆

Reduced view