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

⟦75bc9d57b⟧ 

    Length: 4772 (0x12a4)
    Notes: pts_type(SC)
    Names: »DRCP01.SC«

Derivation

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

PTS(SC)

	IDENT DRCP01 	REL 8.2 78-09-15  870105040820 

* 
**********************************************: 
* 
*   PHILIPS TERMINAL SYSTEM PTS 
* 
*   DRCP01 = DRIVER COT PRINTER 
* 
* 
* 
* 
* 
* 
*********************************************** 
* 
*    THIS DRIVER HANDLES OUTPUT TO COT PRINTER. 
* 
*    THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT. 
* 
* 
*    THE DRIVER CONSISTS OF THE FOLLOWING PARTS:
* 
*    A C C P :    ACTIVATION PART 
*    I H C P :    INTERRUPT HANDLER 
* 
*    R C C P :     RECOVERY ROUTINE 
* 
* 
*    THE FOLLOWING ORDERS ARE TREATED:
* 
*    ORDER 06:   WRITE
*    ORDER 22: CUT RECEIPT
	EJECT
* 
* 
*    NORMAL REGISTER USAGE: 
* 
*    REGISTER A1: RETURN CODE 
*             A2: OUTPUT CHARACTER
*             A3: WORK REGISTER 
*             A4: WORK REGISTER 
*             A5: WORK REGISTER 
*             A6: DWT-ADDRESS 
*             A7: ORDER 
*             A8: ECB-ADDRESS 
* 
	EJECT
* 
* 
*********************** 
*    ENTRIES          * 
*********************** 
* 
	ENTRY	CPAD 
* 
************************************* 
*    EXTERNALS                    * 
************************************* 
	EXTRN	SAVE8	SAVE REGS
	EXTRN	TENDIO	END I/O 
	EXTRN	DISEND	PERFORM END I/O AND DISPATCH
	EXTRN	TDISP	DISPATCHER ENTRY 
	EXTRN	OUTPUT	OUTPUT CHAR.
	EXTRN	LDREG	LOAD REGISTERS AND RETURN
	EXTRN	STREG	STORE REGISTERS AND DISPATCH 
	EXTRN	GETCHR	GET CHARACTER 
	EXTRN	DISIOE	I/O REQUEST ERROR 
	EXTRN	DWTST	STATUS 
	EXTRN	DWTOR	ORDER
	EXTRN	ECHRTN	RETURN FROM ECHO ROUTINE
	EJECT
* 
* 
******************************* 
*    CONSTANTS                * 
******************************* 
* 
DWTBC	EQU	/3
* 
************************* 
*      TABLES           * 
************************* 
* 
CPAD	EQU	*
	DATA	ACCP	ACTIVATION DRIVER
	DATA	IHCP	INTERRUPT HANDLER
	DATA	RCCP	RECOVERY ROUTINE 
* 
* 
* 
	EJECT
* 
* 
******************************************* 
*    CONDITIONAL ASSEMBLY               * 
******************************************* 
* 
* 
* 
* 
********************************************
*    DWT-DISPLACEMENTS                     *
********************************************
* 
	EJECT
* 
*    A C C P
* 
*    ACTIVATION PART: CHECH VALIDITY OF ORDERS
*                     AND STARTS THE PROCESSING 
* 
ACCP	EQU	*
	LDKL	A4,/4000
	ORRS	A4,A6 
	LC	A3,DWTOR,A6 
	ANK	A3,1	JOURNAL PRINTER?
	RF(NE)	ACP05	YES 
	XRRS	A4,A6	NO, SET DEV. ADR. TO RECEIPT PRINTER
ACP05	EQU	* 
	SUK	A7,/22	CUT ? 
	RF(E)	ACCP30 
	ADK	A7,/1C	WRITE ? 
	ABL(NE)	DISIOE	REQUEST ERROR 
	LDK	A3,0	START BUFFER INDEX
	LDK	A4,0 
ACCP10	EQU	*
	CF	A15,GETCHR	GET ONE CHARACTER
	LDR	A1,A1	LAST CHARACTER 
	RF(E)	ACCP20	YES 
	CF	A5,OUTPUT 
	RB	ACCP10
ACCP20	EQU	*
	LDK	A2,/03 
ACCP25	CF	A5,OUTPUT 
ACCP27	CF	A5,STREG
	ANK	A2,/7F 
	SUK	A2,2 
	RF(Z)	ACCP65	END OF PAPER
	SUK	A7,6 
	RF(NE)	ACCP70
	SUK	A2,2 
	RF(NZ)	ENDIO	
	LDK	A2,/20 
	ORS	A2,8,A8
	RB	ACCP27
ACCP30	LDK	A2,/60 
	LDK	A3,0 
ACCP35	CF	A5,OUTPUT 
	LDR	A3,A3
	RF(NE)	ACCP50
	LDK	A2,/20 
	ADK	A3,1 
	RB	ACCP35
ACCP50	LDK	A2,/13 
	ST	A3,6,A8 
	RB	ACCP25
ACCP65	LDKL	A1,/4000	RECEIPT STUCK
	RF	ENDIO 
ACCP70	SUK	A2,4 
	RB(E)	ACCP27 
ENDIO	ABL	DISEND
	EJECT
* 
*   I H C P 
* 
*    INTERRUPT HANDLER: PROCESS OF INTERRUPT
* 
IHCP	EQU	*
	LD	A4,DWTST,A6	STATUS
	RF(N)	EXIT 
	LDR	A1,A1	RETURN CODE
	RB(NE)	ENDIO	YES END I/O 
	ABL	LDREG
EXIT	ABL	TDISP
	EJECT
* 
*    R C C P
* 
* 
RCCP	EQU	*
	CF	A15,SAVE8 
	LD	A7,DWTST,A6 
	RB(N)	EXIT 
	LDK	A1,2 
	RB	ENDIO 
* 
* 
	END

HexDump

0x0000…0036 (0, 0, 400)  Head {h00=0x0032, h01=0x0050, text=» IDENT DRCP01  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…00e4              Head {h00=0x0024, h01=0x0050, text=»*   DRCP01 = DRIVER COT PRINTER «, t00=0x0000, t01=0x00c0}
0x00e4…00ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00e8}
0x00ee…00f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x00f8…0102              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…0158              Head {h00=0x0034, h01=0x0050, text=»*********************************************** «, t00=0x0000, t01=0x0124}
0x0158…0162              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x015c}
0x0162…019a              Head {h00=0x0034, h01=0x0050, text=»*    THIS DRIVER HANDLES OUTPUT TO COT PRINTER. «, t00=0x0000, t01=0x0166}
0x019a…01a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000e}
0x01a4…01e4              Head {h00=0x003c, h01=0x0050, text=»*    THE COT MUST BE CONNECTED TO CPU VIA CHLT OR CHRT. «, t00=0x0001, t01=0x0018}
0x01e4…01ee              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0058}
0x01ee…01f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0062}
0x01f8…0230              Head {h00=0x0034, h01=0x0050, text=»*    THE DRIVER CONSISTS OF THE FOLLOWING PARTS:«, t00=0x0001, t01=0x006c}
0x0230…023a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a4}
0x023a…0264              Head {h00=0x0026, h01=0x0050, text=»*    A C C P :    ACTIVATION PART «, t00=0x0001, t01=0x00ae}
0x0264…0290              Head {h00=0x0028, h01=0x0050, text=»*    I H C P :    INTERRUPT HANDLER «, t00=0x0001, t01=0x00d8}
0x0290…029a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x029a…02c6              Head {h00=0x0028, h01=0x0050, text=»*    R C C P :     RECOVERY ROUTINE «, t00=0x0001, t01=0x010e}
0x02c6…02d0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013a}
0x02d0…02da              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0144}
0x02da…0308              Head {h00=0x002a, h01=0x0050, text=»*    THE FOLLOWING ORDERS ARE TREATED:«, t00=0x0001, t01=0x014e}
0x0308…0312              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x017c}
0x0312…0330              Head {h00=0x001a, h01=0x0050, text=»*    ORDER 06:   WRITE«, t00=0x0001, t01=0x0186}
0x0330…0352              Head {h00=0x001e, h01=0x0050, text=»*    ORDER 22: CUT RECEIPT«, t00=0x0002, t01=0x0014}
0x0352…0360              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x0036}
0x0360…036a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0044}
0x036a…0374              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004e}
0x0374…0398              Head {h00=0x0020, h01=0x0050, text=»*    NORMAL REGISTER USAGE: «, t00=0x0002, t01=0x0058}
0x0398…03a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x007c}
0x03a2…03c8              Head {h00=0x0022, h01=0x0050, text=»*    REGISTER A1: RETURN CODE «, t00=0x0002, t01=0x0086}
0x03c8…03f2              Head {h00=0x0026, h01=0x0050, text=»*             A2: OUTPUT CHARACTER«, t00=0x0002, t01=0x00ac}
0x03f2…041a              Head {h00=0x0024, h01=0x0050, text=»*             A3: WORK REGISTER «, t00=0x0002, t01=0x00d6}
0x041a…0442              Head {h00=0x0024, h01=0x0050, text=»*             A4: WORK REGISTER «, t00=0x0002, t01=0x00fe}
0x0442…046a              Head {h00=0x0024, h01=0x0050, text=»*             A5: WORK REGISTER «, t00=0x0002, t01=0x0126}
0x046a…0490              Head {h00=0x0022, h01=0x0050, text=»*             A6: DWT-ADDRESS «, t00=0x0002, t01=0x014e}
0x0490…04b0              Head {h00=0x001c, h01=0x0050, text=»*             A7: ORDER «, t00=0x0002, t01=0x0174}
0x04b0…04d6 (3, 0, 400)  Head {h00=0x0022, h01=0x0050, text=»*             A8: ECB-ADDRESS «, t00=0x0003, t01=0x0004}
0x04d6…04e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002a}
0x04e0…04ee              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0034}
0x04ee…04f8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0042}
0x04f8…0502              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x004c}
0x0502…0522              Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0003, t01=0x0056}
0x0522…0542              Head {h00=0x001c, h01=0x0050, text=»*    ENTRIES          * «, t00=0x0003, t01=0x0076}
0x0542…0562              Head {h00=0x001c, h01=0x0050, text=»*********************** «, t00=0x0003, t01=0x0096}
0x0562…056c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b6}
0x056c…0580              Head {h00=0x0010, h01=0x0050, text=» ENTRY CPAD «, t00=0x0003, t01=0x00c0}
0x0580…058a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d4}
0x058a…05b8              Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0003, t01=0x00de}
0x05b8…05e4              Head {h00=0x0028, h01=0x0050, text=»*    EXTERNALS                    * «, t00=0x0003, t01=0x010c}
0x05e4…0612              Head {h00=0x002a, h01=0x0050, text=»************************************* «, t00=0x0003, t01=0x0138}
0x0612…0630              Head {h00=0x001a, h01=0x0050, text=» EXTRN SAVE8 SAVE REGS«, t00=0x0003, t01=0x0166}
0x0630…064e              Head {h00=0x001a, h01=0x0050, text=» EXTRN TENDIO END I/O «, t00=0x0003, t01=0x0184}
0x064e…0680              Head {h00=0x002e, h01=0x0050, text=» EXTRN DISEND PERFORM END I/O AND DISPATCH«, t00=0x0004, t01=0x0012}
0x0680…06a6              Head {h00=0x0022, h01=0x0050, text=» EXTRN TDISP DISPATCHER ENTRY «, t00=0x0004, t01=0x0044}
0x06a6…06c8              Head {h00=0x001e, h01=0x0050, text=» EXTRN OUTPUT OUTPUT CHAR.«, t00=0x0004, t01=0x006a}
0x06c8…06f6              Head {h00=0x002a, h01=0x0050, text=» EXTRN LDREG LOAD REGISTERS AND RETURN«, t00=0x0004, t01=0x008c}
0x06f6…0728              Head {h00=0x002e, h01=0x0050, text=» EXTRN STREG STORE REGISTERS AND DISPATCH «, t00=0x0004, t01=0x00ba}
0x0728…074c              Head {h00=0x0020, h01=0x0050, text=» EXTRN GETCHR GET CHARACTER «, t00=0x0004, t01=0x00ec}
0x074c…0774              Head {h00=0x0024, h01=0x0050, text=» EXTRN DISIOE I/O REQUEST ERROR «, t00=0x0004, t01=0x0110}
0x0774…0790              Head {h00=0x0018, h01=0x0050, text=» EXTRN DWTST STATUS «, t00=0x0004, t01=0x0138}
0x0790…07aa              Head {h00=0x0016, h01=0x0050, text=» EXTRN DWTOR ORDER«, t00=0x0004, t01=0x0154}
0x07aa…07d8              Head {h00=0x002a, h01=0x0050, text=» EXTRN ECHRTN RETURN FROM ECHO ROUTINE«, t00=0x0004, t01=0x016e}
0x07d8…07e6              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x000c}
0x07e6…07f0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x001a}
0x07f0…07fa              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0024}
0x07fa…0822              Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x0005, t01=0x002e}
0x0822…084a              Head {h00=0x0024, h01=0x0050, text=»*    CONSTANTS                * «, t00=0x0005, t01=0x0056}
0x084a…0872              Head {h00=0x0024, h01=0x0050, text=»******************************* «, t00=0x0005, t01=0x007e}
0x0872…087c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a6}
0x087c…0890              Head {h00=0x0010, h01=0x0050, text=»DWTBC EQU /3«, t00=0x0005, t01=0x00b0}
0x0890…089a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00c4}
0x089a…08bc              Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0005, t01=0x00ce}
0x08bc…08de              Head {h00=0x001e, h01=0x0050, text=»*      TABLES           * «, t00=0x0005, t01=0x00f0}
0x08de…0900              Head {h00=0x001e, h01=0x0050, text=»************************* «, t00=0x0005, t01=0x0112}
0x0900…090a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0134}
0x090a…091c              Head {h00=0x000e, h01=0x0050, text=»CPAD EQU *«, t00=0x0005, t01=0x013e}
0x091c…0940              Head {h00=0x0020, h01=0x0050, text=» DATA ACCP ACTIVATION DRIVER«, t00=0x0005, t01=0x0150}
0x0940…0964              Head {h00=0x0020, h01=0x0050, text=» DATA IHCP INTERRUPT HANDLER«, t00=0x0005, t01=0x0174}
0x0964…0988              Head {h00=0x0020, h01=0x0050, text=» DATA RCCP RECOVERY ROUTINE «, t00=0x0006, t01=0x0008}
0x0988…0992              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x002c}
0x0992…099c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0036}
0x099c…09a6              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0040}
0x09a6…09b4              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x004a}
0x09b4…09be              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0058}
0x09be…09c8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0062}
0x09c8…09fc              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x006c}
0x09fc…0a2e              Head {h00=0x002e, h01=0x0050, text=»*    CONDITIONAL ASSEMBLY               * «, t00=0x0006, t01=0x00a0}
0x0a2e…0a62              Head {h00=0x0030, h01=0x0050, text=»******************************************* «, t00=0x0006, t01=0x00d2}
0x0a62…0a6c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0106}
0x0a6c…0a76              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0110}
0x0a76…0a80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x011a}
0x0a80…0a8a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0124}
0x0a8a…0abe              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0006, t01=0x012e}
0x0abe…0af2              Head {h00=0x0030, h01=0x0050, text=»*    DWT-DISPLACEMENTS                     *«, t00=0x0006, t01=0x0162}
0x0af2…0b26              Head {h00=0x0030, h01=0x0050, text=»********************************************«, t00=0x0007, t01=0x0008}
0x0b26…0b30              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003c}
0x0b30…0b3e              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0007, t01=0x0046}
0x0b3e…0b48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b48…0b5c              Head {h00=0x0010, h01=0x0050, text=»*    A C C P«, t00=0x0007, t01=0x005e}
0x0b5c…0b66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0072}
0x0b66…0b9c              Head {h00=0x0032, h01=0x0050, text=»*    ACTIVATION PART: CHECH VALIDITY OF ORDERS«, t00=0x0007, t01=0x007c}
0x0b9c…0bd4              Head {h00=0x0034, h01=0x0050, text=»*                     AND STARTS THE PROCESSING «, t00=0x0007, t01=0x00b2}
0x0bd4…0bde              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00ea}
0x0bde…0bf0              Head {h00=0x000e, h01=0x0050, text=»ACCP EQU *«, t00=0x0007, t01=0x00f4}
0x0bf0…0c06              Head {h00=0x0012, h01=0x0050, text=» LDKL A4,/4000«, t00=0x0007, t01=0x0106}
0x0c06…0c1a              Head {h00=0x0010, h01=0x0050, text=» ORRS A4,A6 «, t00=0x0007, t01=0x011c}
0x0c1a…0c32              Head {h00=0x0014, h01=0x0050, text=» LC A3,DWTOR,A6 «, t00=0x0007, t01=0x0130}
0x0c32…0c54              Head {h00=0x001e, h01=0x0050, text=» ANK A3,1 JOURNAL PRINTER?«, t00=0x0007, t01=0x0148}
0x0c54…0c6e              Head {h00=0x0016, h01=0x0050, text=» RF(NE) ACP05 YES «, t00=0x0007, t01=0x016a}
0x0c6e…0ca6              Head {h00=0x0034, h01=0x0050, text=» XRRS A4,A6 NO, SET DEV. ADR. TO RECEIPT PRINTER«, t00=0x0007, t01=0x0184}
0x0ca6…0cba              Head {h00=0x0010, h01=0x0050, text=»ACP05 EQU * «, t00=0x0008, t01=0x002c}
0x0cba…0cd4              Head {h00=0x0016, h01=0x0050, text=» SUK A7,/22 CUT ? «, t00=0x0008, t01=0x0040}
0x0cd4…0cea              Head {h00=0x0012, h01=0x0050, text=» RF(E) ACCP30 «, t00=0x0008, t01=0x005a}
0x0cea…0d06              Head {h00=0x0018, h01=0x0050, text=» ADK A7,/1C WRITE ? «, t00=0x0008, t01=0x0070}
0x0d06…0d2c              Head {h00=0x0022, h01=0x0050, text=» ABL(NE) DISIOE REQUEST ERROR «, t00=0x0008, t01=0x008c}
0x0d2c…0d50              Head {h00=0x0020, h01=0x0050, text=» LDK A3,0 START BUFFER INDEX«, t00=0x0008, t01=0x00b2}
0x0d50…0d62              Head {h00=0x000e, h01=0x0050, text=» LDK A4,0 «, t00=0x0008, t01=0x00d6}
0x0d62…0d76              Head {h00=0x0010, h01=0x0050, text=»ACCP10 EQU *«, t00=0x0008, t01=0x00e8}
0x0d76…0d9e              Head {h00=0x0024, h01=0x0050, text=» CF A15,GETCHR GET ONE CHARACTER«, t00=0x0008, t01=0x00fc}
0x0d9e…0dc0              Head {h00=0x001e, h01=0x0050, text=» LDR A1,A1 LAST CHARACTER «, t00=0x0008, t01=0x0124}
0x0dc0…0dda              Head {h00=0x0016, h01=0x0050, text=» RF(E) ACCP20 YES «, t00=0x0008, t01=0x0146}
0x0dda…0df0              Head {h00=0x0012, h01=0x0050, text=» CF A5,OUTPUT «, t00=0x0008, t01=0x0160}
0x0df0…0e02              Head {h00=0x000e, h01=0x0050, text=» RB ACCP10«, t00=0x0008, t01=0x0176}
0x0e02…0e16              Head {h00=0x0010, h01=0x0050, text=»ACCP20 EQU *«, t00=0x0008, t01=0x0188}
0x0e16…0e2a              Head {h00=0x0010, h01=0x0050, text=» LDK A2,/03 «, t00=0x0009, t01=0x000c}
0x0e2a…0e46              Head {h00=0x0018, h01=0x0050, text=»ACCP25 CF A5,OUTPUT «, t00=0x0009, t01=0x0020}
0x0e46…0e60              Head {h00=0x0016, h01=0x0050, text=»ACCP27 CF A5,STREG«, t00=0x0009, t01=0x003c}
0x0e60…0e74              Head {h00=0x0010, h01=0x0050, text=» ANK A2,/7F «, t00=0x0009, t01=0x0056}
0x0e74…0e86              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0009, t01=0x006a}
0x0e86…0ea8              Head {h00=0x001e, h01=0x0050, text=» RF(Z) ACCP65 END OF PAPER«, t00=0x0009, t01=0x007c}
0x0ea8…0eba              Head {h00=0x000e, h01=0x0050, text=» SUK A7,6 «, t00=0x0009, t01=0x009e}
0x0eba…0ed0              Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACCP70«, t00=0x0009, t01=0x00b0}
0x0ed0…0ee2              Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0009, t01=0x00c6}
0x0ee2…0ef8              Head {h00=0x0012, h01=0x0050, text=» RF(NZ) ENDIO «, t00=0x0009, t01=0x00d8}
0x0ef8…0f0c              Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x0009, t01=0x00ee}
0x0f0c…0f20              Head {h00=0x0010, h01=0x0050, text=» ORS A2,8,A8«, t00=0x0009, t01=0x0102}
0x0f20…0f32              Head {h00=0x000e, h01=0x0050, text=» RB ACCP27«, t00=0x0009, t01=0x0116}
0x0f32…0f4c              Head {h00=0x0016, h01=0x0050, text=»ACCP30 LDK A2,/60 «, t00=0x0009, t01=0x0128}
0x0f4c…0f5e              Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0009, t01=0x0142}
0x0f5e…0f7a              Head {h00=0x0018, h01=0x0050, text=»ACCP35 CF A5,OUTPUT «, t00=0x0009, t01=0x0154}
0x0f7a…0f8c              Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0009, t01=0x0170}
0x0f8c…0fa2              Head {h00=0x0012, h01=0x0050, text=» RF(NE) ACCP50«, t00=0x0009, t01=0x0182}
0x0fa2…0fb6              Head {h00=0x0010, h01=0x0050, text=» LDK A2,/20 «, t00=0x000a, t01=0x0008}
0x0fb6…0fc8              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x000a, t01=0x001c}
0x0fc8…0fda              Head {h00=0x000e, h01=0x0050, text=» RB ACCP35«, t00=0x000a, t01=0x002e}
0x0fda…0ff4              Head {h00=0x0016, h01=0x0050, text=»ACCP50 LDK A2,/13 «, t00=0x000a, t01=0x0040}
0x0ff4…1008              Head {h00=0x0010, h01=0x0050, text=» ST A3,6,A8 «, t00=0x000a, t01=0x005a}
0x1008…101a              Head {h00=0x000e, h01=0x0050, text=» RB ACCP25«, t00=0x000a, t01=0x006e}
0x101a…1044              Head {h00=0x0026, h01=0x0050, text=»ACCP65 LDKL A1,/4000 RECEIPT STUCK«, t00=0x000a, t01=0x0080}
0x1044…1056              Head {h00=0x000e, h01=0x0050, text=» RF ENDIO «, t00=0x000a, t01=0x00aa}
0x1056…106e              Head {h00=0x0014, h01=0x0050, text=»ACCP70 SUK A2,4 «, t00=0x000a, t01=0x00bc}
0x106e…1084              Head {h00=0x0012, h01=0x0050, text=» RB(E) ACCP27 «, t00=0x000a, t01=0x00d4}
0x1084…109c              Head {h00=0x0014, h01=0x0050, text=»ENDIO ABL DISEND«, t00=0x000a, t01=0x00ea}
0x109c…10aa              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x0102}
0x10aa…10b4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0110}
0x10b4…10c8              Head {h00=0x0010, h01=0x0050, text=»*   I H C P «, t00=0x000a, t01=0x011a}
0x10c8…10d2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x012e}
0x10d2…1106              Head {h00=0x0030, h01=0x0050, text=»*    INTERRUPT HANDLER: PROCESS OF INTERRUPT«, t00=0x000a, t01=0x0138}
0x1106…1110              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016c}
0x1110…1122              Head {h00=0x000e, h01=0x0050, text=»IHCP EQU *«, t00=0x000a, t01=0x0176}
0x1122…1140              Head {h00=0x001a, h01=0x0050, text=» LD A4,DWTST,A6 STATUS«, t00=0x000a, t01=0x0188}
0x1140…1154              Head {h00=0x0010, h01=0x0050, text=» RF(N) EXIT «, t00=0x000b, t01=0x0016}
0x1154…1172              Head {h00=0x001a, h01=0x0050, text=» LDR A1,A1 RETURN CODE«, t00=0x000b, t01=0x002a}
0x1172…1194              Head {h00=0x001e, h01=0x0050, text=» RB(NE) ENDIO YES END I/O «, t00=0x000b, t01=0x0048}
0x1194…11a6              Head {h00=0x000e, h01=0x0050, text=» ABL LDREG«, t00=0x000b, t01=0x006a}
0x11a6…11bc              Head {h00=0x0012, h01=0x0050, text=»EXIT ABL TDISP«, t00=0x000b, t01=0x007c}
0x11bc…11ca              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000b, t01=0x0092}
0x11ca…11d4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00a0}
0x11d4…11e8              Head {h00=0x0010, h01=0x0050, text=»*    R C C P«, t00=0x000b, t01=0x00aa}
0x11e8…11f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00be}
0x11f2…11fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c8}
0x11fc…120e              Head {h00=0x000e, h01=0x0050, text=»RCCP EQU *«, t00=0x000b, t01=0x00d2}
0x120e…1224              Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x000b, t01=0x00e4}
0x1224…123c              Head {h00=0x0014, h01=0x0050, text=» LD A7,DWTST,A6 «, t00=0x000b, t01=0x00fa}
0x123c…1250              Head {h00=0x0010, h01=0x0050, text=» RB(N) EXIT «, t00=0x000b, t01=0x0112}
0x1250…1262              Head {h00=0x000e, h01=0x0050, text=» LDK A1,2 «, t00=0x000b, t01=0x0126}
0x1262…1274              Head {h00=0x000e, h01=0x0050, text=» RB ENDIO «, t00=0x000b, t01=0x0138}
0x1274…127e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x014a}
0x127e…1288              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0154}
0x1288…1294              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x000b, t01=0x015e}
0x1294…1298              Head {h00=0x4004, h01=0x0000}
0x1298…129c              00 0b 01 6a                                                                                                                                                                                                                                       ┆   j┆
0x129c…12a4 (12, 1, 8)   20 04 00 00 00 0c 00 04                                                                                                                                                                                                                           ┆        ┆

Reduced view