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

⟦e5af55876⟧ 

    Length: 3754 (0xeaa)
    Notes: pts_type(SC)
    Names: »C:FUB.SC«

Derivation

└─⟦71472ef1e⟧ Bits:30009661 Philips computer tape "600103"
    └─⟦this⟧ »BDKAPP/C:FUB.SC«

PTS(SC)

	IDENT C:FUB 	CONPAC REL=1.0 DATE= 80.04.29 
			UPDATE #2
*************************************************************** 
* 
*	CONCENTRATOR APPLICATION PACKAGE  PEAB-T
* 
*	PROGRAMMER:  PER OMAN / PAN 
* 
* 
*	C : F U B 
* 
* 
*   * 
*   THIS MODULE CONTAINS THE CONCENTRATOR FUNCTIONS HANDLING
*   TRASK ACTIVATION AND EXIT 
* 
* - K:ACTA ACTIVATE TRASK FROM TRASK POOL 
* 
* - K:RETA  RELEASE TASK TO TASK POOL 
*   * 
* 
* 
* 
* 
*	THE MODULE CONTAINS THE SUBROUTINES:
* 
*	NAME	REVDAT	VERSION 
* 
*	K:ACTA	75-11-11 
*	K:RETA	76-02-12 
* 
****************************************************************
	EJECT		IDENT C:FUB 
* 
* 
*	ENTRY ADDRESSES 
* 
*************************************************************** 
* 
*		ENTRY	DESCRIPTION
* 
	ENTRY	K:ACTA	ACTIVATE TRASK FROM POOL
	ENTRY	K:RETA	RELEASE TASK
* 
* 
*	EXTERNAL REFERENSES 
* 
*************************************************************** 
* 
*		ADDRESS	IN MODULE
* 
	EXTRN	K:TACT	TPOOL 
	EXTRN	K:TPAR 
	EXTRN	TRASK
* 
* 
* 
	EJECT		IDENT C:FUB 
******************* K : A C T A ************************************* 
* 
* 
* 
*SUBROUTINE  K : A C T A
*ACTIVATES TASK FROM TASK P0OL
* 
* 
* 
* CALL SEQUENCE:	CF    A14,K:ACTA 
*		DATA  POOL,PROGR 
* 
*   ENTRY PARAM:	A1 = PARAMETER TRANSFERED TO STARTED PROGRAM 
*		POOL = NAME OF TASK POOL 
*		PROGR = NAME OF PROGRAM TO BE STARTED
* 
*   SUBROUTINES:	NONE 
* 
*  RETURN PARAM:	NONE 
* 
*  RETURN METOD:	DIRECT 
* 
*  CHANGED REGS:	A1-A3,A5,A7-A8 
* 
*  STACKER NEED:	0
* 
*   LIMITATIONS:	 
* 
*  CALLING TASK:	ANY
* 
* 
*************************************************************** 
	EJECT		IDENT C:FUB 
* 
* 
* 
K:ACTA	EQU	*
	ADKL	A14,4 
	LDR*	A2,A14
	LDR*	A3,A2 
	LD	A5,2,A2 
	ADK	A2,4 
	ST	A3,ACT100 
	LDK	A7,1 
	LKM
	DATA	-7
ACT100	DATA	0 
	LDR*	A7,A8 
	ST	A5,K:TACT,A8
	ST	A1,K:TPAR,A8
	LDR	A1,A8
	LKM
	DATA	-4,TRASK
	ABR A2 
	EJECT		IDENT C:FUB 
******************* K : R E T A ************************************* 
* 
* 
* 
*SUBROUTINE  K : R E T A
*RELEASES TASK BELONGING TO TASK POOL 
* 
* 
* 
* CALL SEQUENCE:	CF   A14,K:RETA
*		DATA TPOOL 
* 
*   ENTRY PARAM:	TPOOL = TASK POOL NAME 
* 
*   SUBROUTINES:	NONE 
* 
*  RETURN PARAM:	NO RETURN
* 
*   LIMITATIONS:	ONLY THE RUNNING TASK CAN BE RELEASED
* 
*  CALLING TASK:	ANY TASK BELONGING TO A TASK POOL
* 
* 
*************************************************************** 
	EJECT		IDENT C:FUB 
*		K : R E T A
* 
*   RELEASE TPOOL BUFFER
* 
K:RETA	EQU	*
	LD	A8,-4,A13	GET TPOOL BUF ADDRESS 
	ADKL	A14,4 
	LDR*	A1,A14
	LDR*	A1,A1	GET TPOOL NAME
	ST	A1,RETA10 
	LKM
	DATA	-8
RETA10	DATA	0	TPOOL ADDRESS 
* 
*   EXIT TASK 
* 
	LKM
	DATA	3 
	END

HexDump

0x000…034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT C:FUB  CONPAC REL=1.0 DATE= 80.04.29 «, t00=0x0000, t01=0x0004}
0x034…048             Head {h00=0x0010, h01=0x0050, text=»   UPDATE #2«, t00=0x0000, t01=0x0038}
0x048…090             Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0000, t01=0x004c}
0x090…09a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0094}
0x09a…0cc             Head {h00=0x002e, h01=0x0050, text=»* CONCENTRATOR APPLICATION PACKAGE  PEAB-T«, t00=0x0000, t01=0x009e}
0x0cc…0d6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00d0}
0x0d6…0fc             Head {h00=0x0022, h01=0x0050, text=»* PROGRAMMER:  PER OMAN / PAN «, t00=0x0000, t01=0x00da}
0x0fc…106             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0100}
0x106…110             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010a}
0x110…124             Head {h00=0x0010, h01=0x0050, text=»* C : F U B «, t00=0x0000, t01=0x0114}
0x124…12e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0128}
0x12e…138             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0132}
0x138…146             Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0000, t01=0x013c}
0x146…18a             Head {h00=0x0040, h01=0x0050, text=»*   THIS MODULE CONTAINS THE CONCENTRATOR FUNCTIONS HANDLING«, t00=0x0000, t01=0x014a}
0x18a…1b0             Head {h00=0x0022, h01=0x0050, text=»*   TRASK ACTIVATION AND EXIT «, t00=0x0000, t01=0x018e}
0x1b0…1ba             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0024}
0x1ba…1ec             Head {h00=0x002e, h01=0x0050, text=»* - K:ACTA ACTIVATE TRASK FROM TRASK POOL «, t00=0x0001, t01=0x002e}
0x1ec…1f6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x1f6…224             Head {h00=0x002a, h01=0x0050, text=»* - K:RETA  RELEASE TASK TO TASK POOL «, t00=0x0001, t01=0x006a}
0x224…232             Head {h00=0x000a, h01=0x0050, text=»*   * «, t00=0x0001, t01=0x0098}
0x232…23c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00a6}
0x23c…246             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00b0}
0x246…250             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ba}
0x250…25a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x25a…288             Head {h00=0x002a, h01=0x0050, text=»* THE MODULE CONTAINS THE SUBROUTINES:«, t00=0x0001, t01=0x00ce}
0x288…292             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00fc}
0x292…2b0             Head {h00=0x001a, h01=0x0050, text=»* NAME REVDAT VERSION «, t00=0x0001, t01=0x0106}
0x2b0…2ba             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0124}
0x2ba…2d4             Head {h00=0x0016, h01=0x0050, text=»* K:ACTA 75-11-11 «, t00=0x0001, t01=0x012e}
0x2d4…2ee             Head {h00=0x0016, h01=0x0050, text=»* K:RETA 76-02-12 «, t00=0x0001, t01=0x0148}
0x2ee…2f8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0162}
0x2f8…340             Head {h00=0x0044, h01=0x0050, text=»****************************************************************«, t00=0x0001, t01=0x016c}
0x340…35c             Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUB «, t00=0x0002, t01=0x0024}
0x35c…366             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0040}
0x366…370             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x004a}
0x370…38a             Head {h00=0x0016, h01=0x0050, text=»* ENTRY ADDRESSES «, t00=0x0002, t01=0x0054}
0x38a…394             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x006e}
0x394…3dc             Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x0078}
0x3dc…3e6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c0}
0x3e6…402             Head {h00=0x0018, h01=0x0050, text=»*  ENTRY DESCRIPTION«, t00=0x0002, t01=0x00ca}
0x402…40c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00e6}
0x40c…43a             Head {h00=0x002a, h01=0x0050, text=» ENTRY K:ACTA ACTIVATE TRASK FROM POOL«, t00=0x0002, t01=0x00f0}
0x43a…45c             Head {h00=0x001e, h01=0x0050, text=» ENTRY K:RETA RELEASE TASK«, t00=0x0002, t01=0x011e}
0x45c…466             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x466…470             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x470…48e             Head {h00=0x001a, h01=0x0050, text=»* EXTERNAL REFERENSES «, t00=0x0002, t01=0x0154}
0x48e…498             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0172}
0x498…4e0             Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0002, t01=0x017c}
0x4e0…4ea             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0034}
0x4ea…506             Head {h00=0x0018, h01=0x0050, text=»*  ADDRESS IN MODULE«, t00=0x0003, t01=0x003e}
0x506…510             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005a}
0x510…52c             Head {h00=0x0018, h01=0x0050, text=» EXTRN K:TACT TPOOL «, t00=0x0003, t01=0x0064}
0x52c…542             Head {h00=0x0012, h01=0x0050, text=» EXTRN K:TPAR «, t00=0x0003, t01=0x0080}
0x542…556             Head {h00=0x0010, h01=0x0050, text=» EXTRN TRASK«, t00=0x0003, t01=0x0096}
0x556…560             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00aa}
0x560…56a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00b4}
0x56a…574             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00be}
0x574…590             Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUB «, t00=0x0003, t01=0x00c8}
0x590…5de             Head {h00=0x004a, h01=0x0050, text=»******************* K : A C T A ************************************* «, t00=0x0003, t01=0x00e4}
0x5de…5e8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0132}
0x5e8…5f2             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x013c}
0x5f2…5fc             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0146}
0x5fc…61c             Head {h00=0x001c, h01=0x0050, text=»*SUBROUTINE  K : A C T A«, t00=0x0003, t01=0x0150}
0x61c…642             Head {h00=0x0022, h01=0x0050, text=»*ACTIVATES TASK FROM TASK P0OL«, t00=0x0003, t01=0x0170}
0x642…64c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0008}
0x64c…656             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0012}
0x656…660             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x001c}
0x660…68a             Head {h00=0x0026, h01=0x0050, text=»* CALL SEQUENCE: CF    A14,K:ACTA «, t00=0x0004, t01=0x0026}
0x68a…6a6             Head {h00=0x0018, h01=0x0050, text=»*  DATA  POOL,PROGR «, t00=0x0004, t01=0x0050}
0x6a6…6b0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x006c}
0x6b0…6f6             Head {h00=0x0042, h01=0x0050, text=»*   ENTRY PARAM: A1 = PARAMETER TRANSFERED TO STARTED PROGRAM «, t00=0x0004, t01=0x0076}
0x6f6…71a             Head {h00=0x0020, h01=0x0050, text=»*  POOL = NAME OF TASK POOL «, t00=0x0004, t01=0x00bc}
0x71a…74a             Head {h00=0x002c, h01=0x0050, text=»*  PROGR = NAME OF PROGRAM TO BE STARTED«, t00=0x0004, t01=0x00e0}
0x74a…754             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0110}
0x754…772             Head {h00=0x001a, h01=0x0050, text=»*   SUBROUTINES: NONE «, t00=0x0004, t01=0x011a}
0x772…77c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0138}
0x77c…79a             Head {h00=0x001a, h01=0x0050, text=»*  RETURN PARAM: NONE «, t00=0x0004, t01=0x0142}
0x79a…7a4             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0160}
0x7a4…7c4             Head {h00=0x001c, h01=0x0050, text=»*  RETURN METOD: DIRECT «, t00=0x0004, t01=0x016a}
0x7c4…7ce             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x018a}
0x7ce…7f6 (5, 0, 400) Head {h00=0x0024, h01=0x0050, text=»*  CHANGED REGS: A1-A3,A5,A7-A8 «, t00=0x0005, t01=0x0004}
0x7f6…800             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x002c}
0x800…81a             Head {h00=0x0016, h01=0x0050, text=»*  STACKER NEED: 0«, t00=0x0005, t01=0x0036}
0x81a…824             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0050}
0x824…83e             Head {h00=0x0016, h01=0x0050, text=»*   LIMITATIONS:  «, t00=0x0005, t01=0x005a}
0x83e…848             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0074}
0x848…864             Head {h00=0x0018, h01=0x0050, text=»*  CALLING TASK: ANY«, t00=0x0005, t01=0x007e}
0x864…86e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x009a}
0x86e…878             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a4}
0x878…8c0             Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0005, t01=0x00ae}
0x8c0…8dc             Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUB «, t00=0x0005, t01=0x00f6}
0x8dc…8e6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0112}
0x8e6…8f0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x011c}
0x8f0…8fa             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0126}
0x8fa…90e             Head {h00=0x0010, h01=0x0050, text=»K:ACTA EQU *«, t00=0x0005, t01=0x0130}
0x90e…922             Head {h00=0x0010, h01=0x0050, text=» ADKL A14,4 «, t00=0x0005, t01=0x0144}
0x922…936             Head {h00=0x0010, h01=0x0050, text=» LDR* A2,A14«, t00=0x0005, t01=0x0158}
0x936…94a             Head {h00=0x0010, h01=0x0050, text=» LDR* A3,A2 «, t00=0x0005, t01=0x016c}
0x94a…95e             Head {h00=0x0010, h01=0x0050, text=» LD A5,2,A2 «, t00=0x0005, t01=0x0180}
0x95e…970 (6, 0, 400) Head {h00=0x000e, h01=0x0050, text=» ADK A2,4 «, t00=0x0006, t01=0x0004}
0x970…986             Head {h00=0x0012, h01=0x0050, text=» ST A3,ACT100 «, t00=0x0006, t01=0x0016}
0x986…998             Head {h00=0x000e, h01=0x0050, text=» LDK A7,1 «, t00=0x0006, t01=0x002c}
0x998…9a4             Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0006, t01=0x003e}
0x9a4…9b4             Head {h00=0x000c, h01=0x0050, text=» DATA -7«, t00=0x0006, t01=0x004a}
0x9b4…9ca             Head {h00=0x0012, h01=0x0050, text=»ACT100 DATA 0 «, t00=0x0006, t01=0x005a}
0x9ca…9de             Head {h00=0x0010, h01=0x0050, text=» LDR* A7,A8 «, t00=0x0006, t01=0x0070}
0x9de…9f6             Head {h00=0x0014, h01=0x0050, text=» ST A5,K:TACT,A8«, t00=0x0006, t01=0x0084}
0x9f6…a0e             Head {h00=0x0014, h01=0x0050, text=» ST A1,K:TPAR,A8«, t00=0x0006, t01=0x009c}
0xa0e…a20             Head {h00=0x000e, h01=0x0050, text=» LDR A1,A8«, t00=0x0006, t01=0x00b4}
0xa20…a2c             Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0006, t01=0x00c6}
0xa2c…a42             Head {h00=0x0012, h01=0x0050, text=» DATA -4,TRASK«, t00=0x0006, t01=0x00d2}
0xa42…a52             Head {h00=0x000c, h01=0x0050, text=» ABR A2 «, t00=0x0006, t01=0x00e8}
0xa52…a6e             Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUB «, t00=0x0006, t01=0x00f8}
0xa6e…abc             Head {h00=0x004a, h01=0x0050, text=»******************* K : R E T A ************************************* «, t00=0x0006, t01=0x0114}
0xabc…ac6             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0162}
0xac6…ad0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x016c}
0xad0…ada             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0176}
0xada…afa             Head {h00=0x001c, h01=0x0050, text=»*SUBROUTINE  K : R E T A«, t00=0x0006, t01=0x0180}
0xafa…b28             Head {h00=0x002a, h01=0x0050, text=»*RELEASES TASK BELONGING TO TASK POOL «, t00=0x0007, t01=0x0010}
0xb28…b32             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x003e}
0xb32…b3c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0048}
0xb3c…b46             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0052}
0xb46…b6e             Head {h00=0x0024, h01=0x0050, text=»* CALL SEQUENCE: CF   A14,K:RETA«, t00=0x0007, t01=0x005c}
0xb6e…b84             Head {h00=0x0012, h01=0x0050, text=»*  DATA TPOOL «, t00=0x0007, t01=0x0084}
0xb84…b8e             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x009a}
0xb8e…bbe             Head {h00=0x002c, h01=0x0050, text=»*   ENTRY PARAM: TPOOL = TASK POOL NAME «, t00=0x0007, t01=0x00a4}
0xbbe…bc8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00d4}
0xbc8…be6             Head {h00=0x001a, h01=0x0050, text=»*   SUBROUTINES: NONE «, t00=0x0007, t01=0x00de}
0xbe6…bf0             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00fc}
0xbf0…c12             Head {h00=0x001e, h01=0x0050, text=»*  RETURN PARAM: NO RETURN«, t00=0x0007, t01=0x0106}
0xc12…c1c             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0128}
0xc1c…c5a             Head {h00=0x003a, h01=0x0050, text=»*   LIMITATIONS: ONLY THE RUNNING TASK CAN BE RELEASED«, t00=0x0007, t01=0x0132}
0xc5a…c64             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0170}
0xc64…c9e             Head {h00=0x0036, h01=0x0050, text=»*  CALLING TASK: ANY TASK BELONGING TO A TASK POOL«, t00=0x0007, t01=0x017a}
0xc9e…ca8             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0024}
0xca8…cb2             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002e}
0xcb2…cfa             Head {h00=0x0044, h01=0x0050, text=»*************************************************************** «, t00=0x0008, t01=0x0038}
0xcfa…d16             Head {h00=0x0018, h01=0x0050, text=» EJECT  IDENT C:FUB «, t00=0x0008, t01=0x0080}
0xd16…d2c             Head {h00=0x0012, h01=0x0050, text=»*  K : R E T A«, t00=0x0008, t01=0x009c}
0xd2c…d36             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b2}
0xd36…d56             Head {h00=0x001c, h01=0x0050, text=»*   RELEASE TPOOL BUFFER«, t00=0x0008, t01=0x00bc}
0xd56…d60             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00dc}
0xd60…d74             Head {h00=0x0010, h01=0x0050, text=»K:RETA EQU *«, t00=0x0008, t01=0x00e6}
0xd74…da0             Head {h00=0x0028, h01=0x0050, text=» LD A8,-4,A13 GET TPOOL BUF ADDRESS «, t00=0x0008, t01=0x00fa}
0xda0…db4             Head {h00=0x0010, h01=0x0050, text=» ADKL A14,4 «, t00=0x0008, t01=0x0126}
0xdb4…dc8             Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A14«, t00=0x0008, t01=0x013a}
0xdc8…dea             Head {h00=0x001e, h01=0x0050, text=» LDR* A1,A1 GET TPOOL NAME«, t00=0x0008, t01=0x014e}
0xdea…e00             Head {h00=0x0012, h01=0x0050, text=» ST A1,RETA10 «, t00=0x0008, t01=0x0170}
0xe00…e0c             Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0008, t01=0x0186}
0xe0c…e1c (9, 2, 142) Head {h00=0x000c, h01=0x0050, text=» DATA -8«, t00=0x0009, t01=0x0004}
0xe1c…e40             Head {h00=0x0020, h01=0x0050, text=»RETA10 DATA 0 TPOOL ADDRESS «, t00=0x0009, t01=0x0014}
0xe40…e4a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0038}
0xe4a…e60             Head {h00=0x0012, h01=0x0050, text=»*   EXIT TASK «, t00=0x0009, t01=0x0042}
0xe60…e6a             Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0058}
0xe6a…e76             Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0009, t01=0x0062}
0xe76…e86             Head {h00=0x000c, h01=0x0050, text=» DATA 3 «, t00=0x0009, t01=0x006e}
0xe86…e92             Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0009, t01=0x007e}
0xe92…e96             Head {h00=0x4004, h01=0x0000}
0xe96…e9a             00 09 00 8a                                                                                                                                                                                                                                       ┆    ┆
0xe9a…ea2 (10, 1, 8)  20 04 00 00 00 0a 00 04                                                                                                                                                                                                                           ┆        ┆
0xea2…eaa (11, 1, 8)  20 04 00 00 00 33 00 04                                                                                                                                                                                                                           ┆     3  ┆

Reduced view