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

⟦111bb286c⟧

    Length: 4736 (0x1280)
    Notes: pts_type(SC)
    Names: »CCAPP.SC«

Derivation

└─⟦2a21e4bb5⟧ Bits:30009691 Philips computer tape "600408"
    └─⟦this⟧ »BDKAPP/CCAPP.SC« 

PTS(SC)

	IDENT CCAPP 	CONPAC REL=0.0 DATE= 77.10.12 
*************************************************************** 
* 
*	U S E R  MODULE OF CONCENTRATOR APPLICATION  PEAB-T 
* 
*	PROGRAMMER:  JES
* 
* 
*	C C A P P 
* 
* 
*   * 
*   THIS MODULE HANDLES UNIDENTIFIED MESSAGES RECEIVED
*   FROM TRUNK LINE BY DCCC.
*   THE CC READ BUFFER SHOULD BE RELEASED AS SOON AS
*   POSSIBLE BY CALLING K:RCCB
*   * 
* 
*	THE MODULE RUNS UNDER TASK: TRASK  (FROM POOL TPSUP)
* 
*	ACTIVATED BY: DCCC
* 
* 
* 
* 
* 
*	THE MODULE CONTAINS THE SUBROUTINES:
* 
*	NAME	REVDAT	VERSION 
* 
* 
* 
* 
* 
*************************************************************** 
	EJECT
* 
* 
*	ENTRY ADDRESSES 
* 
*************************************************************** 
* 
*		ENTRY	DESCRIPTION
* 
	ENTRY	CCAPP
	EJECT
* 
* 
*	EXTERNAL REFERENSES 
* 
*************************************************************** 
* 
*		ADDRESS	IN MODULE
* 
* 
	EXTRN	K:RCCB	K:CCH 
	EXTRN	K:RETA	C:FUB 
	EXTRN	TPSUP	C:TPL
	EXTRN	ECBTB1,ECBTB2
	EXTRN	K:LINB,CCBUF 
	EXTRN	K:LW 
* 
* 
*	EQUATES 
* 
* 
INPBL	EQU	-4	INDEX TO INPUT BUFFER LENGTH 
* 
	EJECT
************************************************************
* 
*   C C A P P 
* 
************************************************************
CCAPP	EQU	*	ACTIVATION POINT
* 
* 
*   TAKE CARE OF UNIDENTIFIED MESSAGE 
* 
* 
*   A1 = BUFFER POINTER 
* 
* 
* 
* 
	LDKL	A2,K:LINB	GET TC WRITE BUFFER 
	ADR	A2,A13 
	LD	A3,-4,A1	GET LENGTH 
	ADK	A3,1 
	ST	A3,-4,A2	AND STORE
	LDR	A4,A2
	ADK	A4,1	ADJUST FOR STA
	LDR	A6,A1

SAP20	LCR	A5,A6	MOVE REPLY
	SCR	A5,A4
	ADK	A6,1 
	ADK	A4,1 
	SUK	A3,1 
	RB(NZ)	SAP20 
	EJECT
	LDKL	A5,ECBTB1	GET LINE 1 TABEL
	ST	A5,ECBTST 
	AD	A5,ECBTB1 
	LDK	A6,1	IND.LINE 1
	RF	SUP100
SUP000	EQU	*
	CWK	A6,2	LINE 1 AND 2 CHECKED ?
	RF(E)	SUP400 
	LDKL	A5,ECBTB2 
	ST	A5,ECBTST 
	AD	A5,ECBTB2 
	LDK	A6,2	IND.LINE 2
SUP100	EQU	*
	ADK	A5,2 
	LD	A7,-2,A1	GET SIM.DEV. 
	SLL	A7,8 
	ANKL	A7,/FF00
SUP200	EQU	*
	SUK	A5,4 
	CWK	A5,ECBTST	END OF TABEL 
ECBTST	EQU	*-2
	RB(NP)	SUP000
	LDR*	A8,A5 
	ANKL	A8,/FF00
	CWR	A8,A7	OK?
	RB(NE)	SUP200
	SUK	A5,2	GET TCA AND DEV.
	LDR*	A3,A5	GET TCA AND DEV.
	ANKL	A3,/FF00	TCA
	ORR	A3,A6	TCA AND LINE NO
	ST	A3,-2,A2	IN BUFFER
	LDR*	A3,A5 
	ANK	A3,/FF	GET DEV.
	SCR	A3,A2	IN BUFFER
* 
* 
* 
*   RELEASE BUFFER
*   A1 = BUFFER POINTER 
* 
* 
SUP400	EQU	*
	CF	A14,K:RCCB
* 
* 
*	WRITE MESS. TO TC 
* 
* 
	CF	A14,K:LW
* 
*   EXIT
* 
	CF	A14,K:RETA
	DATA	TPSUP 
* 
	END

HexDump

0x0000…0034 (0, 0, 400)  Head {h00=0x0030, h01=0x0050, text=» IDENT CCAPP  CONPAC REL=0.0 DATE= 77.10.12 «, t00=0x0000, t01=0x0004}
0x0034…007c              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0000, t01=0x0038}
0x007c…0086              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0080}
0x0086…00c4              Head {h00=0x003a, h01=0x0050, text=»* U S E R  MODULE OF CONCENTRATOR APPLICATION  PEAB-T «, t00=0x0000, t01=0x008a}
0x00c4…00ce              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c8}
0x00ce…00e8              Head {h00=0x0016, h01=0x0050, text=»* PROGRAMMER:  JES«, t00=0x0000, t01=0x00d2}
0x00e8…00f2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ec}
0x00f2…00fc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f6}
0x00fc…0110              Head {h00=0x0010, h01=0x0050, text=»* C C A P P «, t00=0x0000, t01=0x0100}
0x0110…011a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0114}
0x011a…0124              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011e}
0x0124…0132              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0000, t01=0x0128}
0x0132…0170              Head {h00=0x003a, h01=0x0050, text=»*   THIS MODULE HANDLES UNIDENTIFIED MESSAGES RECEIVED«, t00=0x0000, t01=0x0136}
0x0170…0194              Head {h00=0x0020, h01=0x0050, text=»*   FROM TRUNK LINE BY DCCC.«, t00=0x0000, t01=0x0174}
0x0194…01d0              Head {h00=0x0038, h01=0x0050, text=»*   THE CC READ BUFFER SHOULD BE RELEASED AS SOON AS«, t00=0x0001, t01=0x0008}
0x01d0…01f6              Head {h00=0x0022, h01=0x0050, text=»*   POSSIBLE BY CALLING K:RCCB«, t00=0x0001, t01=0x0044}
0x01f6…0204              Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x006a}
0x0204…020e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0078}
0x020e…024c              Head {h00=0x003a, h01=0x0050, text=»* THE MODULE RUNS UNDER TASK: TRASK  (FROM POOL TPSUP)«, t00=0x0001, t01=0x0082}
0x024c…0256              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c0}
0x0256…0272              Head {h00=0x0018, h01=0x0050, text=»* ACTIVATED BY: DCCC«, t00=0x0001, t01=0x00ca}
0x0272…027c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e6}
0x027c…0286              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00f0}
0x0286…0290              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fa}
0x0290…029a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0104}
0x029a…02a4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x010e}
0x02a4…02d2              Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x0118}
0x02d2…02dc              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0146}
0x02dc…02fa              Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x0150}
0x02fa…0304              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x016e}
0x0304…030e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0178}
0x030e…0318              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0182}
0x0318…0322              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x018c}
0x0322…032c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0008}
0x032c…0374              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0012}
0x0374…0382              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x005a}
0x0382…038c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0068}
0x038c…0396              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0072}
0x0396…03b0              Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x007c}
0x03b0…03ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0096}
0x03ba…0402              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x00a0}
0x0402…040c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e8}
0x040c…0428              Head {h00=0x0018, h01=0x0050, text=»*  ENTRY DESCRIPTION«, t00=0x0002, t01=0x00f2}
0x0428…0432              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x010e}
0x0432…0446              Head {h00=0x0010, h01=0x0050, text=» ENTRY CCAPP«, t00=0x0002, t01=0x0118}
0x0446…0454              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x012c}
0x0454…045e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x013a}
0x045e…0468              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0144}
0x0468…0486              Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0002, t01=0x014e}
0x0486…0490              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016c}
0x0490…04d8              Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0176}
0x04d8…04e2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x002e}
0x04e2…04fe              Head {h00=0x0018, h01=0x0050, text=»*  ADDRESS IN MODULE«, t00=0x0003, t01=0x0038}
0x04fe…0508              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0054}
0x0508…0512              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005e}
0x0512…052e              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:RCCB K:CCH «, t00=0x0003, t01=0x0068}
0x052e…054a              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:RETA C:FUB «, t00=0x0003, t01=0x0084}
0x054a…0564              Head {h00=0x0016, h01=0x0050, text=» EXTRN TPSUP C:TPL«, t00=0x0003, t01=0x00a0}
0x0564…0580              Head {h00=0x0018, h01=0x0050, text=» EXTRN ECBTB1,ECBTB2«, t00=0x0003, t01=0x00ba}
0x0580…059c              Head {h00=0x0018, h01=0x0050, text=» EXTRN K:LINB,CCBUF «, t00=0x0003, t01=0x00d6}
0x059c…05b0              Head {h00=0x0010, h01=0x0050, text=» EXTRN K:LW «, t00=0x0003, t01=0x00f2}
0x05b0…05ba              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0106}
0x05ba…05c4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0110}
0x05c4…05d6              Head {h00=0x000e, h01=0x0050, text=»* EQUATES «, t00=0x0003, t01=0x011a}
0x05d6…05e0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x012c}
0x05e0…05ea              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0136}
0x05ea…061c              Head {h00=0x002e, h01=0x0050, text=»INPBL EQU -4 INDEX TO INPUT BUFFER LENGTH «, t00=0x0003, t01=0x0140}
0x061c…0626              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0172}
0x0626…0634              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x017c}
0x0634…0678              Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0003, t01=0x018a}
0x0678…0682              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x003e}
0x0682…0698              Head {h00=0x0012, h01=0x0050, text=»*   C C A P P «, t00=0x0004, t01=0x0048}
0x0698…06a2              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x005e}
0x06a2…06e6              Head {h00=0x0040, h01=0x0050, text=»************************************************************«, t00=0x0004, t01=0x0068}
0x06e6…070a              Head {h00=0x0020, h01=0x0050, text=»CCAPP EQU * ACTIVATION POINT«, t00=0x0004, t01=0x00ac}
0x070a…0714              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d0}
0x0714…071e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00da}
0x071e…074c              Head {h00=0x002a, h01=0x0050, text=»*   TAKE CARE OF UNIDENTIFIED MESSAGE «, t00=0x0004, t01=0x00e4}
0x074c…0756              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0112}
0x0756…0760              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x011c}
0x0760…0780              Head {h00=0x001c, h01=0x0050, text=»*   A1 = BUFFER POINTER «, t00=0x0004, t01=0x0126}
0x0780…078a              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0146}
0x078a…0794              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0150}
0x0794…079e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015a}
0x079e…07a8              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0164}
0x07a8…07d4              Head {h00=0x0028, h01=0x0050, text=» LDKL A2,K:LINB GET TC WRITE BUFFER «, t00=0x0004, t01=0x016e}
0x07d4…07e8              Head {h00=0x0010, h01=0x0050, text=» ADR A2,A13 «, t00=0x0005, t01=0x000a}
0x07e8…0808              Head {h00=0x001c, h01=0x0050, text=» LD A3,-4,A1 GET LENGTH «, t00=0x0005, t01=0x001e}
0x0808…081a              Head {h00=0x000e, h01=0x0050, text=» ADK A3,1 «, t00=0x0005, t01=0x003e}
0x081a…0838              Head {h00=0x001a, h01=0x0050, text=» ST A3,-4,A2 AND STORE«, t00=0x0005, t01=0x0050}
0x0838…084a              Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0005, t01=0x006e}
0x084a…086a              Head {h00=0x001c, h01=0x0050, text=» ADK A4,1 ADJUST FOR STA«, t00=0x0005, t01=0x0080}
0x086a…087c              Head {h00=0x000e, h01=0x0050, text=» LDR A6,A1«, t00=0x0005, t01=0x00a0}
0x087c…0884              Head {h00=0x0004, h01=0x0050, t00=0x0005, t01=0x00b2}
0x0884…08a6              Head {h00=0x001e, h01=0x0050, text=»SAP20 LCR A5,A6 MOVE REPLY«, t00=0x0005, t01=0x00ba}
0x08a6…08b8              Head {h00=0x000e, h01=0x0050, text=» SCR A5,A4«, t00=0x0005, t01=0x00dc}
0x08b8…08ca              Head {h00=0x000e, h01=0x0050, text=» ADK A6,1 «, t00=0x0005, t01=0x00ee}
0x08ca…08dc              Head {h00=0x000e, h01=0x0050, text=» ADK A4,1 «, t00=0x0005, t01=0x0100}
0x08dc…08ee              Head {h00=0x000e, h01=0x0050, text=» SUK A3,1 «, t00=0x0005, t01=0x0112}
0x08ee…0904              Head {h00=0x0012, h01=0x0050, text=» RB(NZ) SAP20 «, t00=0x0005, t01=0x0124}
0x0904…0912              Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0005, t01=0x013a}
0x0912…093a              Head {h00=0x0024, h01=0x0050, text=» LDKL A5,ECBTB1 GET LINE 1 TABEL«, t00=0x0005, t01=0x0148}
0x093a…0950              Head {h00=0x0012, h01=0x0050, text=» ST A5,ECBTST «, t00=0x0005, t01=0x0170}
0x0950…0966              Head {h00=0x0012, h01=0x0050, text=» AD A5,ECBTB1 «, t00=0x0005, t01=0x0186}
0x0966…0982              Head {h00=0x0018, h01=0x0050, text=» LDK A6,1 IND.LINE 1«, t00=0x0006, t01=0x000c}
0x0982…0994              Head {h00=0x000e, h01=0x0050, text=» RF SUP100«, t00=0x0006, t01=0x0028}
0x0994…09a8              Head {h00=0x0010, h01=0x0050, text=»SUP000 EQU *«, t00=0x0006, t01=0x003a}
0x09a8…09d0              Head {h00=0x0024, h01=0x0050, text=» CWK A6,2 LINE 1 AND 2 CHECKED ?«, t00=0x0006, t01=0x004e}
0x09d0…09e6              Head {h00=0x0012, h01=0x0050, text=» RF(E) SUP400 «, t00=0x0006, t01=0x0076}
0x09e6…09fe              Head {h00=0x0014, h01=0x0050, text=» LDKL A5,ECBTB2 «, t00=0x0006, t01=0x008c}
0x09fe…0a14              Head {h00=0x0012, h01=0x0050, text=» ST A5,ECBTST «, t00=0x0006, t01=0x00a4}
0x0a14…0a2a              Head {h00=0x0012, h01=0x0050, text=» AD A5,ECBTB2 «, t00=0x0006, t01=0x00ba}
0x0a2a…0a46              Head {h00=0x0018, h01=0x0050, text=» LDK A6,2 IND.LINE 2«, t00=0x0006, t01=0x00d0}
0x0a46…0a5a              Head {h00=0x0010, h01=0x0050, text=»SUP100 EQU *«, t00=0x0006, t01=0x00ec}
0x0a5a…0a6c              Head {h00=0x000e, h01=0x0050, text=» ADK A5,2 «, t00=0x0006, t01=0x0100}
0x0a6c…0a8e              Head {h00=0x001e, h01=0x0050, text=» LD A7,-2,A1 GET SIM.DEV. «, t00=0x0006, t01=0x0112}
0x0a8e…0aa0              Head {h00=0x000e, h01=0x0050, text=» SLL A7,8 «, t00=0x0006, t01=0x0134}
0x0aa0…0ab6              Head {h00=0x0012, h01=0x0050, text=» ANKL A7,/FF00«, t00=0x0006, t01=0x0146}
0x0ab6…0aca              Head {h00=0x0010, h01=0x0050, text=»SUP200 EQU *«, t00=0x0006, t01=0x015c}
0x0aca…0adc              Head {h00=0x000e, h01=0x0050, text=» SUK A5,4 «, t00=0x0006, t01=0x0170}
0x0adc…0b00              Head {h00=0x0020, h01=0x0050, text=» CWK A5,ECBTST END OF TABEL «, t00=0x0006, t01=0x0182}
0x0b00…0b16              Head {h00=0x0012, h01=0x0050, text=»ECBTST EQU *-2«, t00=0x0007, t01=0x0016}
0x0b16…0b2c              Head {h00=0x0012, h01=0x0050, text=» RB(NP) SUP000«, t00=0x0007, t01=0x002c}
0x0b2c…0b40              Head {h00=0x0010, h01=0x0050, text=» LDR* A8,A5 «, t00=0x0007, t01=0x0042}
0x0b40…0b56              Head {h00=0x0012, h01=0x0050, text=» ANKL A8,/FF00«, t00=0x0007, t01=0x0056}
0x0b56…0b6c              Head {h00=0x0012, h01=0x0050, text=» CWR A8,A7 OK?«, t00=0x0007, t01=0x006c}
0x0b6c…0b82              Head {h00=0x0012, h01=0x0050, text=» RB(NE) SUP200«, t00=0x0007, t01=0x0082}
0x0b82…0ba4              Head {h00=0x001e, h01=0x0050, text=» SUK A5,2 GET TCA AND DEV.«, t00=0x0007, t01=0x0098}
0x0ba4…0bc8              Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A5 GET TCA AND DEV.«, t00=0x0007, t01=0x00ba}
0x0bc8…0be2              Head {h00=0x0016, h01=0x0050, text=» ANKL A3,/FF00 TCA«, t00=0x0007, t01=0x00de}
0x0be2…0c04              Head {h00=0x001e, h01=0x0050, text=» ORR A3,A6 TCA AND LINE NO«, t00=0x0007, t01=0x00f8}
0x0c04…0c22              Head {h00=0x001a, h01=0x0050, text=» ST A3,-2,A2 IN BUFFER«, t00=0x0007, t01=0x011a}
0x0c22…0c36              Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A5 «, t00=0x0007, t01=0x0138}
0x0c36…0c52              Head {h00=0x0018, h01=0x0050, text=» ANK A3,/FF GET DEV.«, t00=0x0007, t01=0x014c}
0x0c52…0c6e              Head {h00=0x0018, h01=0x0050, text=» SCR A3,A2 IN BUFFER«, t00=0x0007, t01=0x0168}
0x0c6e…0c78              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0184}
0x0c78…0c82              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x018e}
0x0c82…0c8c              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0008}
0x0c8c…0ca6              Head {h00=0x0016, h01=0x0050, text=»*   RELEASE BUFFER«, t00=0x0008, t01=0x0012}
0x0ca6…0cc6              Head {h00=0x001c, h01=0x0050, text=»*   A1 = BUFFER POINTER «, t00=0x0008, t01=0x002c}
0x0cc6…0cd0              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x004c}
0x0cd0…0cda              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0056}
0x0cda…0cee              Head {h00=0x0010, h01=0x0050, text=»SUP400 EQU *«, t00=0x0008, t01=0x0060}
0x0cee…0d04              Head {h00=0x0012, h01=0x0050, text=» CF A14,K:RCCB«, t00=0x0008, t01=0x0074}
0x0d04…0d0e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x008a}
0x0d0e…0d18              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0094}
0x0d18…0d34              Head {h00=0x0018, h01=0x0050, text=»* WRITE MESS. TO TC «, t00=0x0008, t01=0x009e}
0x0d34…0d3e              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00ba}
0x0d3e…0d48              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00c4}
0x0d48…0d5c              Head {h00=0x0010, h01=0x0050, text=» CF A14,K:LW«, t00=0x0008, t01=0x00ce}
0x0d5c…0d66              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00e2}
0x0d66…0d76              Head {h00=0x000c, h01=0x0050, text=»*   EXIT«, t00=0x0008, t01=0x00ec}
0x0d76…0d80              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00fc}
0x0d80…0d96              Head {h00=0x0012, h01=0x0050, text=» CF A14,K:RETA«, t00=0x0008, t01=0x0106}
0x0d96…0daa              Head {h00=0x0010, h01=0x0050, text=» DATA TPSUP «, t00=0x0008, t01=0x011c}
0x0daa…0db4              Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0130}
0x0db4…0dc0              Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0008, t01=0x013a}
0x0dc0…0dc4              Head {h00=0x4004, h01=0x0000}
0x0dc4…0dc8              00 08 01 46                                                                                                                                                                                                                                       ┆   F┆
0x0dc8…0dd0 (9, 1, 8)    20 04 00 00 00 09 00 04                                                                                                                                                                                                                           ┆        ┆
0x0dd0…0e20 (10, 0, 400) ee 7a da 5c 1c 05 22 9b 85 a0 00 00 86 d6 00 02 96 96 f6 a1 00 00 01 01 81 41 00 00 81 41 00 00 81 20 00 00 83 40 00 00 13 02 11 02 11 02 86 04 96 0c 16 01 86 25 11 02 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 56 0e 85 20 ff fb 11 02 84 25   ┆ z    "                  A   A       @               %        R   W   V        %┆
0x0e20…0e70              15 01 5a 08 5f 2a 19 02 07 00 87 25 81 20 00 00 83 40 00 00 13 02 11 02 85 04 11 02 86 04 96 0c 86 25 11 04 86 04 16 0a 86 25 11 02 84 0c 1c 0e 84 25 91 08 82 0c 02 00 9a 0c 12 06 11 02 87 25 12 02 5a 08 81 14 91 0c 80 a0 00 00 b1 03 52 04   ┆  Z _*     %     @               %       %       %             %  Z           R ┆
0x0e70…0ec0              e9 02 57 02 e8 84 5d 40 11 02 87 25 81 40 00 00 83 40 00 00 13 02 86 04 96 0c 86 25 91 0c 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 5d 18 87 25 81 40 00 00 83 40 00 00 04 00 13 02 00 01 01 80 43 43 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆  W   ]@   % @   @         %        R   W   ]  % @   @          CC              ┆
0x0ec0…0f10              00 00 00 00 5d 1a 87 25 81 40 00 00 83 40 00 00 13 02 86 04 96 0c 86 25 91 0c 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 5d 18 87 25 57 00 f6 a1 00 00 00 00 00 00 1c 01 59 0c 87 20 4f 50 28 04 ff fc 01 58 01 00 81 41 00 00 28 04 00 60 00 00   ┆    ]  % @   @         %        R   W   ]  %W           Y   OP(    X   A  (  `  ┆
0x0f10…0f60              00 00 00 00 00 00 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e0 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 40 00 00 00 0e   ┆                                                                           @    ┆
0x0f60…0fb0 (11, 0, 400) 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 01 80 4f 50 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 4a ac 45 31 63 c0 ab ce 33 03 04 a9   ┆                                    OP                              J E1c   3   ┆
0x0fb0…1000              43 87 9a 80 b5 d6 84 ed bc ba e2 7a 63 a9 e8 98 fb 5c 9a 5d 83 a7 2c da d9 50 11 84 07 5a 00 05 00 00 00 00 00 00 00 00 00 00 01 80 00 01 00 00 01 80 00 02 00 00 01 80 00 03 00 5a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 d5 5c 1d b5   ┆C          zc      ]  ,  P   Z                             Z                    ┆
0x1000…1050              cd eb 34 c4 00 20 00 00 00 78 00 00 00 00 00 00 00 30 08 98 00 00 00 00 08 98 00 00 00 00 08 98 00 00 00 00 00 00 00 00 00 61 00 00 00 78 00 00 00 00 00 00 ec 7c da 7c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆  4      x       0                       a   x       | |                        ┆
0x1050…10a0              00 00 08 98 00 00 52 3a 22 9c f0 64 f2 7a 12 60 40 9c 1f 30 fc 7f 74 d4 d9 1b 46 9a 34 b6 0c fe fa 7a d3 ad d9 7c 62 ba 04 04 6a ba e0 19 bb f6 74 d4 90 45 88 40 e7 29 3a b4 a2 9a ee 9b 3a 9a 24 d3 27 9c bc f6 28 9e e4 96 63 ed 47 9a 0c 81   ┆      R:"  d z `@  0  t   F 4    z   |b   j     t  E @ ):     : $ '   (   c G   ┆
0x10a0…10f0              ef aa e3 10 36 b0 48 26 a4 76 96 7f dc 7a 3a 7a f4 fb 06 99 97 7e ee 7a da 5c 1c 05 22 9b 9d 07 79 d4 4c b6 a0 da 90 40 dd ab 3e b4 cf 10 84 bc 82 9c 94 db 96 db 32 5a 00 00 40 00 00 79 52 04 90 01 00 00 00 30 00 12 7d b1 7a ea 9d d7 24 dc   ┆    6 H& v   z:z     ~ z    "   y L    @  >           2Z  @  yR      0  } z   $ ┆
0x10f0…1140 (12, 0, 400) ee 7a da 5c 1c 05 22 9b 85 a0 00 00 86 d6 00 02 96 96 f6 a1 00 00 01 01 81 41 00 00 81 41 00 00 81 20 00 00 83 40 00 00 13 02 11 02 11 02 86 04 96 0c 16 01 86 25 11 02 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 56 0e 85 20 ff fb 11 02 84 25   ┆ z    "                  A   A       @               %        R   W   V        %┆
0x1140…1190              15 01 5a 08 5f 2a 19 02 07 00 87 25 81 20 00 00 83 40 00 00 13 02 11 02 85 04 11 02 86 04 96 0c 86 25 11 04 86 04 16 0a 86 25 11 02 84 0c 1c 0e 84 25 91 08 82 0c 02 00 9a 0c 12 06 11 02 87 25 12 02 5a 08 81 14 91 0c 80 a0 00 00 b1 03 52 04   ┆  Z _*     %     @               %       %       %             %  Z           R ┆
0x1190…11e0              e9 02 57 02 e8 84 5d 40 11 02 87 25 81 40 00 00 83 40 00 00 13 02 86 04 96 0c 86 25 91 0c 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 5d 18 87 25 81 40 00 00 83 40 00 00 04 00 13 02 00 01 01 80 43 43 00 00 00 00 00 00 00 00 00 00 00 00 00 00   ┆  W   ]@   % @   @         %        R   W   ]  % @   @          CC              ┆
0x11e0…1230              00 00 00 00 5d 1a 87 25 81 40 00 00 83 40 00 00 13 02 86 04 96 0c 86 25 91 0c 85 20 00 00 b1 15 52 04 e9 14 57 02 ed 04 5d 18 87 25 57 00 f6 a1 00 00 00 00 00 00 1c 01 59 0c 87 20 4f 50 28 04 ff fc 01 58 01 00 81 41 00 00 28 04 00 60 00 00   ┆    ]  % @   @         %        R   W   ]  %W           Y   OP(    X   A  (  `  ┆
0x1230…1280              00 00 00 00 00 00 00 00 00 02 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 e0 00 00 00 00 00 00 00 00 00 00 00 00 01 00 00 00 00 00 40 00 00 00 0e   ┆                                                                           @    ┆

Reduced view