|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 7764 (0x1e54)
Notes: pts_type(SC)
Names: »ASOINT.SC«
└─⟦110b7ed5e⟧ Bits:30009664 Philips computer tape "600106"
└─⟦this⟧ »TOSSWORK/ASOINT.SC«
IDENT ASOINT REL 9.2 79-11-16 870105040920 * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * ASOINT = SUBROUTINE INTERPRETER * FOR ASSEMBLY OVERLAY AND * MMU PAGING * * ************************************************** * * * A14 STACK CONTENTS AT SUBROUTINE CALLS * * 1: PROGRAM STATUS WORD * 2: RETURN ADDRESS * 3: CURRENT SEGMENT POINTER (=0 IF ROOT) * 4: PARAMETER= 2ND WORD AFTER USER TRAP CODE * 5: PARAMETER= 1ST WORD AFTER USER TRAP CODE * * ************************************************** * * * USED TRAP CODES: * * /6001-/61FF EXCEPT /60FF FOR SUBROUTINE CALLS * /60FF FOR RETURN FROM SUBROUTINE * /6401-/65FF FOR JUMP REQUESTS * * THE LAST 9 BITS POINTS INTO THE SUBROUTINE TABLE * ************************************************** EJECT INPREO * * ********* * ENTRY * ********* * * ENTRY IHINPT TRAP INTERRUPT ADDRESS * * * ************* * EXTERNALS * ************* * * EXTRN UPDLRI UPDATE LRU QUEUE EXTRN SCTLAC LOGICAL ADDRESS OF THE ROOT EXTRN PRUN EXTRN TTB:PW PROGRAM STATUS WORD EXTRN TTB:SB SEGMENT BLOCK ADDRESS EXTRN TTB:LA LAST SEGENT LOAD ADDRESS EXTRN TTB:SA EXTRN TTB:ST EXTRN TTB:MT MMU TABLE ENTRY EXTRN SCTLAP LOGICAL ADDRESS OF PAGES EXTRN SCTSEG ADDRESS TO SEGMENT TABLE EXTRN MONMMU MMU TABLE FOR MONITOR * * CONSTANTS * FUNCTB EQU 0 RELATIVE ADDRESS OF FUNCTION TABLE IN ROOT EJECT INPREO ******************************************************* * * I H I N P T * * INTERPRETER TRAP HANDLER * ******************************************************* * IHINPT EQU * MS 8,-14,A15 SAVE A1 TO A8 ON USER STACK LD A6,4,A15 GET TRAP ADDRESS ELR A5,A6 AND TRAP CODE CWK A5,/60FF RF(E) IHIN10 RETURN REQUEST LDR A1,A5 *** SAVE TRAP CODE IN A5 ANKL A1,/400 RF(NZ) IHIN10 JUMP REQUEST SUKL A14,10 IHIN10 EQU * LDR A1,A15 LDR A2,A14 LDK A3,16 SUK A1,14 SUK A2,14 MVSU A3 SUKL A14,16 ADK A6,2 RETURN ADDRESS EJECT INPREO ****************************************************** * * EXAMINE TRAP CODE * ******************************************************* * LD A4,PRUN TTAB-ADDRESS OF RUNNING PROGRAM LD A8,TTB:LA,A4 *** SAVE CURRENT SEGMENT IN A8 LDR A2,A5 TRAP CODE LDR A1,A2 ANKL A2,/1FF GET INDEX ANKL A1,/400 RF(NE) INT600 EXECUTE JUMP CWK A2,/FF RF(E) INT400 EXECUTE RETURN EJECT ******************************************************* * * EXECUTE SUBROUTINE CALL/ JUMP * ******************************************************* * LD A3,2,A15 GET PROGRAM STATUS WORD ES A3,16+2,A14 SAVE IT ES A6,16+4,A14 STORE RETURN ADDRESS ON STACK ES A8,16+6,A14 STORE SP ON STACK ELR A1,A6 GET PARAMETER 1 ES A1,16+10,A14 SAVE IT ON USER STACK EL A1,2,A6 GET PARAMETER 2 ES A1,16+8,A14 SAVE IT ON USE STACK INT600 EQU * SUK A2,1 ADR A2,A2 DOUBLE INDEX LD A3,SCTLAC LOG ADDRESS OF COMMON PART ADKL A3,FUNCTB ELR A3,A3 FUNCTION TABLE START ADR A2,A3 ELR A2,A2 SUBROUTINE POINTER LDR A3,A2 ANK A2,/FF SUK A2,1 ADR A2,A2 SRL A3,8 RF(Z) INT250 SEGMENT 0 LDR A6,A3 *** SAVE WANTED SEGMENT IN A6 SLL A3,3 AD A3,SCTSEG SEG TABLE POINTER CW A3,TTB:SB,A4 SAME SEG? RF(NE) NEWSEG NO - GET NEW SEGMENT * INT220 EQU * LD A1,SCTLAP LOGICAL ADDRESS OF PAGES ADK A1,8 INT230 EQU * ADR A2,A1 ELR A2,A2 LDR A1,A14 ADKL A14,16 RF RETTUR CONTINUE USER PROGRAM * INT250 EQU * LD A1,SCTLAC LOGICAL ADDRESS OF COMMON PART ADK A2,2 EXCLUDE FIRST WORD OF ROOT RB INT230 * EJECT INPREO ******************************************************* * * EXECUTE RETURN TRAP * ******************************************************* * INT400 EQU * EL A2,16+4,A14 UNMODIFIED RETURN ADRESS EL A3,16+6,A14 GET CURRENT SEGMENT RF(Z) INT500 ROOT SEGMENT CW A3,TTB:SB,A4 SAME SEG ? RF(E) INT500 LDR A6,A3 SU A6,SCTSEG SRL A6,3 *** SAVE WANTED SEGMENT IN A6 RF NEWSEG GET NEW SEGMENT * INT500 EQU * EL A1,16+2,A14 GET PSW FROM USER STACK ST A1,2,A15 LDR A1,A14 ADKL A14,16+10 UPDATE STACK POINTER FOR RETURN RF RETTUR EJECT ******************************************************* * * CONTINUE USER PROGRAM * * A1= POINTER TO SAVE AREA ON A14 STACK * A2= RETURN ADDRESS * A3= CURRENT SEGMENT POINTER * ******************************************************* * RETTUR EQU * ST A2,4,A15 ST A2,TTB:SA,A4 DISPATCH ADDRESS ST A3,TTB:LA,A4 STORE CURRENT SEGM =TTB:SB OR 0 LDR A2,A15 RESTORE A1-A8 ADK A1,2 SUK A2,14 LDK A3,16 MVUS A3 ML 8,-14,A15 RTN A15 RETURN TO USER PROGRAM * EJECT ******************************************************* * * GET REQUESTED SEGMENT * * A5= TRAP CODE * A6= REQUESTED SEGMENT NBR * ******************************************************* * NEWSEG EQU * ADKL A15,4 LDR A7,A6 ENB LKM DATA 9 INH SUKL A15,4 LD A1,TTB:PW,A4 ORK A1,1 SET USER MODE ST A1,2,A15 SET USER MODE ST A1,TTB:PW,A4 CWR A7,A6 SEGMENT CORRECTLY LOADED RF(NE) ERROR NO - ERROR CWK A5,/60FF RB(NE) INT220 END SUBROUTINE CALL/ JUMP RB INT500 END RETURN REQUEST EJECT ******************************************************* * * ERROR HANDLING * * AT ENTRY: * A7= -1. REQUEST ERROR * A7= -2. DISC I/O ERROR * A7= -3. DISC NOT OPERABLE * * A3= SEGMENT POINTER OF REQUESTED SEGMENT * A4= TTAB ADDRESS OF CALLING TASK * A5= TRAP CODE * A6= EXPECTED SEGMENT NBR * A8= SEGMENT POINTER AT CALL * ******************************************************* * ERROR EQU * LD A2,SCTLAC CALCULATE DISPATCH ADDRESS OF ERROR ROUTINE ADKL A2,FUNCTB ELR A2,A2 SUK A2,2 ELR A2,A2 DISPATCH ADDRESS ES A7,14,A14 SET RETURN CODE IN A7 LDR A1,A14 ADKL A14,16+10 DATA /6300 *** JUMP TO DEBUGGER *** LDK A3,0 RB RETTUR * * END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT ASOINT REL 9.2 79-11-16 870105040920 «, 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…0082 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x004c}
0x0082…008c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0086}
0x008c…00b4 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0090}
0x00b4…00be Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00b8}
0x00be…00ea Head {h00=0x0028, h01=0x0050, text=»* ASOINT = SUBROUTINE INTERPRETER «, t00=0x0000, t01=0x00c2}
0x00ea…0110 Head {h00=0x0022, h01=0x0050, text=»* FOR ASSEMBLY OVERLAY AND«, t00=0x0000, t01=0x00ee}
0x0110…0128 Head {h00=0x0014, h01=0x0050, text=»* MMU PAGING«, t00=0x0000, t01=0x0114}
0x0128…0132 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x012c}
0x0132…013c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0136}
0x013c…0176 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0140}
0x0176…0180 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x017a}
0x0180…018a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0184}
0x018a…01bc Head {h00=0x002e, h01=0x0050, text=»* A14 STACK CONTENTS AT SUBROUTINE CALLS«, t00=0x0000, t01=0x018e}
0x01bc…01c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0030}
0x01c6…01ea Head {h00=0x0020, h01=0x0050, text=»* 1: PROGRAM STATUS WORD «, t00=0x0001, t01=0x003a}
0x01ea…0208 Head {h00=0x001a, h01=0x0050, text=»* 2: RETURN ADDRESS«, t00=0x0001, t01=0x005e}
0x0208…023c Head {h00=0x0030, h01=0x0050, text=»* 3: CURRENT SEGMENT POINTER (=0 IF ROOT)«, t00=0x0001, t01=0x007c}
0x023c…0274 Head {h00=0x0034, h01=0x0050, text=»* 4: PARAMETER= 2ND WORD AFTER USER TRAP CODE«, t00=0x0001, t01=0x00b0}
0x0274…02ac Head {h00=0x0034, h01=0x0050, text=»* 5: PARAMETER= 1ST WORD AFTER USER TRAP CODE«, t00=0x0001, t01=0x00e8}
0x02ac…02b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0120}
0x02b6…02c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x012a}
0x02c0…02fa Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0001, t01=0x0134}
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…032a Head {h00=0x0018, h01=0x0050, text=»* USED TRAP CODES:«, t00=0x0001, t01=0x0182}
0x032a…0334 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x000e}
0x0334…036c Head {h00=0x0034, h01=0x0050, text=»* /6001-/61FF EXCEPT /60FF FOR SUBROUTINE CALLS «, t00=0x0002, t01=0x0018}
0x036c…03aa Head {h00=0x003a, h01=0x0050, text=»* /60FF FOR RETURN FROM SUBROUTINE «, t00=0x0002, t01=0x0050}
0x03aa…03de Head {h00=0x0030, h01=0x0050, text=»* /6401-/65FF FOR JUMP REQUESTS«, t00=0x0002, t01=0x008e}
0x03de…03e8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00c2}
0x03e8…0424 Head {h00=0x0038, h01=0x0050, text=»* THE LAST 9 BITS POINTS INTO THE SUBROUTINE TABLE«, t00=0x0002, t01=0x00cc}
0x0424…042e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0108}
0x042e…0468 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0002, t01=0x0112}
0x0468…0480 Head {h00=0x0014, h01=0x0050, text=» EJECT INPREO «, t00=0x0002, t01=0x014c}
0x0480…048a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0164}
0x048a…0494 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016e}
0x0494…04a6 Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0002, t01=0x0178}
0x04a6…04b8 Head {h00=0x000e, h01=0x0050, text=»* ENTRY * «, t00=0x0002, t01=0x018a}
0x04b8…04ca Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0003, t01=0x000c}
0x04ca…04d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x001e}
0x04d4…04de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0028}
0x04de…050a Head {h00=0x0028, h01=0x0050, text=» ENTRY IHINPT TRAP INTERRUPT ADDRESS«, t00=0x0003, t01=0x0032}
0x050a…0514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x005e}
0x0514…051e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0068}
0x051e…0528 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x0528…053e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x007c}
0x053e…0554 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x0092}
0x0554…056a Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x00a8}
0x056a…0574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00be}
0x0574…057e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c8}
0x057e…05a4 Head {h00=0x0022, h01=0x0050, text=» EXTRN UPDLRI UPDATE LRU QUEUE«, t00=0x0003, t01=0x00d2}
0x05a4…05d6 Head {h00=0x002e, h01=0x0050, text=» EXTRN SCTLAC LOGICAL ADDRESS OF THE ROOT «, t00=0x0003, t01=0x00f8}
0x05d6…05ea Head {h00=0x0010, h01=0x0050, text=» EXTRN PRUN «, t00=0x0003, t01=0x012a}
0x05ea…0614 Head {h00=0x0026, h01=0x0050, text=» EXTRN TTB:PW PROGRAM STATUS WORD «, t00=0x0003, t01=0x013e}
0x0614…0640 Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:SB SEGMENT BLOCK ADDRESS «, t00=0x0003, t01=0x0168}
0x0640…066e (4, 0, 400) Head {h00=0x002a, h01=0x0050, text=» EXTRN TTB:LA LAST SEGENT LOAD ADDRESS«, t00=0x0004, t01=0x0004}
0x066e…0684 Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:SA «, t00=0x0004, t01=0x0032}
0x0684…069a Head {h00=0x0012, h01=0x0050, text=» EXTRN TTB:ST «, t00=0x0004, t01=0x0048}
0x069a…06c0 Head {h00=0x0022, h01=0x0050, text=» EXTRN TTB:MT MMU TABLE ENTRY «, t00=0x0004, t01=0x005e}
0x06c0…06ee Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTLAP LOGICAL ADDRESS OF PAGES«, t00=0x0004, t01=0x0084}
0x06ee…071c Head {h00=0x002a, h01=0x0050, text=» EXTRN SCTSEG ADDRESS TO SEGMENT TABLE«, t00=0x0004, t01=0x00b2}
0x071c…0748 Head {h00=0x0028, h01=0x0050, text=» EXTRN MONMMU MMU TABLE FOR MONITOR «, t00=0x0004, t01=0x00e0}
0x0748…0752 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x010c}
0x0752…0768 Head {h00=0x0012, h01=0x0050, text=»* CONSTANTS«, t00=0x0004, t01=0x0116}
0x0768…0772 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x012c}
0x0772…07b2 Head {h00=0x003c, h01=0x0050, text=»FUNCTB EQU 0 RELATIVE ADDRESS OF FUNCTION TABLE IN ROOT «, t00=0x0004, t01=0x0136}
0x07b2…07ca Head {h00=0x0014, h01=0x0050, text=» EJECT INPREO «, t00=0x0004, t01=0x0176}
0x07ca…080a Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0004, t01=0x018e}
0x080a…0814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003e}
0x0814…082c Head {h00=0x0014, h01=0x0050, text=»* I H I N P T «, t00=0x0005, t01=0x0048}
0x082c…0836 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0060}
0x0836…085a Head {h00=0x0020, h01=0x0050, text=»* INTERPRETER TRAP HANDLER«, t00=0x0005, t01=0x006a}
0x085a…0864 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x008e}
0x0864…08a4 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0005, t01=0x0098}
0x08a4…08ae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00d8}
0x08ae…08c2 Head {h00=0x0010, h01=0x0050, text=»IHINPT EQU *«, t00=0x0005, t01=0x00e2}
0x08c2…08f4 Head {h00=0x002e, h01=0x0050, text=» MS 8,-14,A15 SAVE A1 TO A8 ON USER STACK «, t00=0x0005, t01=0x00f6}
0x08f4…091a Head {h00=0x0022, h01=0x0050, text=» LD A6,4,A15 GET TRAP ADDRESS «, t00=0x0005, t01=0x0128}
0x091a…093a Head {h00=0x001c, h01=0x0050, text=» ELR A5,A6 AND TRAP CODE«, t00=0x0005, t01=0x014e}
0x093a…0950 Head {h00=0x0012, h01=0x0050, text=» CWK A5,/60FF «, t00=0x0005, t01=0x016e}
0x0950…0974 Head {h00=0x0020, h01=0x0050, text=» RF(E) IHIN10 RETURN REQUEST«, t00=0x0005, t01=0x0184}
0x0974…09a0 Head {h00=0x0028, h01=0x0050, text=» LDR A1,A5 *** SAVE TRAP CODE IN A5 «, t00=0x0006, t01=0x0018}
0x09a0…09b6 Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/400 «, t00=0x0006, t01=0x0044}
0x09b6…09da Head {h00=0x0020, h01=0x0050, text=» RF(NZ) IHIN10 JUMP REQUEST «, t00=0x0006, t01=0x005a}
0x09da…09ee Head {h00=0x0010, h01=0x0050, text=» SUKL A14,10«, t00=0x0006, t01=0x007e}
0x09ee…0a02 Head {h00=0x0010, h01=0x0050, text=»IHIN10 EQU *«, t00=0x0006, t01=0x0092}
0x0a02…0a16 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A15 «, t00=0x0006, t01=0x00a6}
0x0a16…0a2a Head {h00=0x0010, h01=0x0050, text=» LDR A2,A14 «, t00=0x0006, t01=0x00ba}
0x0a2a…0a3c Head {h00=0x000e, h01=0x0050, text=» LDK A3,16«, t00=0x0006, t01=0x00ce}
0x0a3c…0a4e Head {h00=0x000e, h01=0x0050, text=» SUK A1,14«, t00=0x0006, t01=0x00e0}
0x0a4e…0a60 Head {h00=0x000e, h01=0x0050, text=» SUK A2,14«, t00=0x0006, t01=0x00f2}
0x0a60…0a70 Head {h00=0x000c, h01=0x0050, text=» MVSU A3«, t00=0x0006, t01=0x0104}
0x0a70…0a84 Head {h00=0x0010, h01=0x0050, text=» SUKL A14,16«, t00=0x0006, t01=0x0114}
0x0a84…0aa4 Head {h00=0x001c, h01=0x0050, text=» ADK A6,2 RETURN ADDRESS«, t00=0x0006, t01=0x0128}
0x0aa4…0abc Head {h00=0x0014, h01=0x0050, text=» EJECT INPREO «, t00=0x0006, t01=0x0148}
0x0abc…0afa Head {h00=0x003a, h01=0x0050, text=»******************************************************«, t00=0x0006, t01=0x0160}
0x0afa…0b04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b04…0b22 Head {h00=0x001a, h01=0x0050, text=»* EXAMINE TRAP CODE «, t00=0x0007, t01=0x0018}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0036}
0x0b2c…0b6c Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0007, t01=0x0040}
0x0b6c…0b76 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0080}
0x0b76…0baa Head {h00=0x0030, h01=0x0050, text=» LD A4,PRUN TTAB-ADDRESS OF RUNNING PROGRAM «, t00=0x0007, t01=0x008a}
0x0baa…0be2 Head {h00=0x0034, h01=0x0050, text=» LD A8,TTB:LA,A4 *** SAVE CURRENT SEGMENT IN A8 «, t00=0x0007, t01=0x00be}
0x0be2…0bfe Head {h00=0x0018, h01=0x0050, text=» LDR A2,A5 TRAP CODE«, t00=0x0007, t01=0x00f6}
0x0bfe…0c10 Head {h00=0x000e, h01=0x0050, text=» LDR A1,A2«, t00=0x0007, t01=0x0112}
0x0c10…0c30 Head {h00=0x001c, h01=0x0050, text=» ANKL A2,/1FF GET INDEX «, t00=0x0007, t01=0x0124}
0x0c30…0c38 Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x0144}
0x0c38…0c4e Head {h00=0x0012, h01=0x0050, text=» ANKL A1,/400 «, t00=0x0007, t01=0x014c}
0x0c4e…0c72 Head {h00=0x0020, h01=0x0050, text=» RF(NE) INT600 EXECUTE JUMP «, t00=0x0007, t01=0x0162}
0x0c72…0c7a Head {h00=0x0004, h01=0x0050, t00=0x0007, t01=0x0186}
0x0c7a…0c8e Head {h00=0x0010, h01=0x0050, text=» CWK A2,/FF «, t00=0x0007, t01=0x018e}
0x0c8e…0cb2 Head {h00=0x0020, h01=0x0050, text=» RF(E) INT400 EXECUTE RETURN«, t00=0x0008, t01=0x0012}
0x0cb2…0cc0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0008, t01=0x0036}
0x0cc0…0d00 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0008, t01=0x0044}
0x0d00…0d0a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0084}
0x0d0a…0d34 Head {h00=0x0026, h01=0x0050, text=»* EXECUTE SUBROUTINE CALL/ JUMP «, t00=0x0008, t01=0x008e}
0x0d34…0d3e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x00b8}
0x0d3e…0d7e Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0008, t01=0x00c2}
0x0d7e…0d88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0102}
0x0d88…0db4 Head {h00=0x0028, h01=0x0050, text=» LD A3,2,A15 GET PROGRAM STATUS WORD«, t00=0x0008, t01=0x010c}
0x0db4…0dd4 Head {h00=0x001c, h01=0x0050, text=» ES A3,16+2,A14 SAVE IT «, t00=0x0008, t01=0x0138}
0x0dd4…0e0a Head {h00=0x0032, h01=0x0050, text=» ES A6,16+4,A14 STORE RETURN ADDRESS ON STACK «, t00=0x0008, t01=0x0158}
0x0e0a…0e34 Head {h00=0x0026, h01=0x0050, text=» ES A8,16+6,A14 STORE SP ON STACK «, t00=0x0008, t01=0x018e}
0x0e34…0e56 Head {h00=0x001e, h01=0x0050, text=» ELR A1,A6 GET PARAMETER 1«, t00=0x0009, t01=0x0028}
0x0e56…0e84 Head {h00=0x002a, h01=0x0050, text=» ES A1,16+10,A14 SAVE IT ON USER STACK«, t00=0x0009, t01=0x004a}
0x0e84…0ea8 Head {h00=0x0020, h01=0x0050, text=» EL A1,2,A6 GET PARAMETER 2 «, t00=0x0009, t01=0x0078}
0x0ea8…0ed4 Head {h00=0x0028, h01=0x0050, text=» ES A1,16+8,A14 SAVE IT ON USE STACK«, t00=0x0009, t01=0x009c}
0x0ed4…0ee8 Head {h00=0x0010, h01=0x0050, text=»INT600 EQU *«, t00=0x0009, t01=0x00c8}
0x0ee8…0efa Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x0009, t01=0x00dc}
0x0efa…0f1a Head {h00=0x001c, h01=0x0050, text=» ADR A2,A2 DOUBLE INDEX «, t00=0x0009, t01=0x00ee}
0x0f1a…0f4a Head {h00=0x002c, h01=0x0050, text=» LD A3,SCTLAC LOG ADDRESS OF COMMON PART«, t00=0x0009, t01=0x010e}
0x0f4a…0f62 Head {h00=0x0014, h01=0x0050, text=» ADKL A3,FUNCTB «, t00=0x0009, t01=0x013e}
0x0f62…0f8a Head {h00=0x0024, h01=0x0050, text=» ELR A3,A3 FUNCTION TABLE START «, t00=0x0009, t01=0x0156}
0x0f8a…0f9c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A3«, t00=0x0009, t01=0x017e}
0x0f9c…0fc2 Head {h00=0x0022, h01=0x0050, text=» ELR A2,A2 SUBROUTINE POINTER «, t00=0x0009, t01=0x0190}
0x0fc2…0fd4 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000a, t01=0x0026}
0x0fd4…0fe8 Head {h00=0x0010, h01=0x0050, text=» ANK A2,/FF «, t00=0x000a, t01=0x0038}
0x0fe8…0ffa Head {h00=0x000e, h01=0x0050, text=» SUK A2,1 «, t00=0x000a, t01=0x004c}
0x0ffa…100c Head {h00=0x000e, h01=0x0050, text=» ADR A2,A2«, t00=0x000a, t01=0x005e}
0x100c…101e Head {h00=0x000e, h01=0x0050, text=» SRL A3,8 «, t00=0x000a, t01=0x0070}
0x101e…103e Head {h00=0x001c, h01=0x0050, text=» RF(Z) INT250 SEGMENT 0 «, t00=0x000a, t01=0x0082}
0x103e…106e Head {h00=0x002c, h01=0x0050, text=» LDR A6,A3 *** SAVE WANTED SEGMENT IN A6«, t00=0x000a, t01=0x00a2}
0x106e…1080 Head {h00=0x000e, h01=0x0050, text=» SLL A3,3 «, t00=0x000a, t01=0x00d2}
0x1080…10a8 Head {h00=0x0024, h01=0x0050, text=» AD A3,SCTSEG SEG TABLE POINTER «, t00=0x000a, t01=0x00e4}
0x10a8…10ca Head {h00=0x001e, h01=0x0050, text=» CW A3,TTB:SB,A4 SAME SEG?«, t00=0x000a, t01=0x010c}
0x10ca…10f6 Head {h00=0x0028, h01=0x0050, text=» RF(NE) NEWSEG NO - GET NEW SEGMENT «, t00=0x000a, t01=0x012e}
0x10f6…1100 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x015a}
0x1100…1108 Head {h00=0x0004, h01=0x0050, t00=0x000a, t01=0x0164}
0x1108…111c Head {h00=0x0010, h01=0x0050, text=»INT220 EQU *«, t00=0x000a, t01=0x016c}
0x111c…114a Head {h00=0x002a, h01=0x0050, text=» LD A1,SCTLAP LOGICAL ADDRESS OF PAGES«, t00=0x000a, t01=0x0180}
0x114a…115c Head {h00=0x000e, h01=0x0050, text=» ADK A1,8 «, t00=0x000b, t01=0x001e}
0x115c…1170 Head {h00=0x0010, h01=0x0050, text=»INT230 EQU *«, t00=0x000b, t01=0x0030}
0x1170…1182 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A1«, t00=0x000b, t01=0x0044}
0x1182…1194 Head {h00=0x000e, h01=0x0050, text=» ELR A2,A2«, t00=0x000b, t01=0x0056}
0x1194…11a8 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A14 «, t00=0x000b, t01=0x0068}
0x11a8…11bc Head {h00=0x0010, h01=0x0050, text=» ADKL A14,16«, t00=0x000b, t01=0x007c}
0x11bc…11e4 Head {h00=0x0024, h01=0x0050, text=» RF RETTUR CONTINUE USER PROGRAM«, t00=0x000b, t01=0x0090}
0x11e4…11ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b8}
0x11ee…1202 Head {h00=0x0010, h01=0x0050, text=»INT250 EQU *«, t00=0x000b, t01=0x00c2}
0x1202…1236 Head {h00=0x0030, h01=0x0050, text=» LD A1,SCTLAC LOGICAL ADDRESS OF COMMON PART«, t00=0x000b, t01=0x00d6}
0x1236…1262 Head {h00=0x0028, h01=0x0050, text=» ADK A2,2 EXCLUDE FIRST WORD OF ROOT«, t00=0x000b, t01=0x010a}
0x1262…1274 Head {h00=0x000e, h01=0x0050, text=» RB INT230«, t00=0x000b, t01=0x0136}
0x1274…127e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0148}
0x127e…1296 Head {h00=0x0014, h01=0x0050, text=» EJECT INPREO «, t00=0x000b, t01=0x0152}
0x1296…12d6 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000b, t01=0x016a}
0x12d6…12e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x001a}
0x12e0…1300 Head {h00=0x001c, h01=0x0050, text=»* EXECUTE RETURN TRAP «, t00=0x000c, t01=0x0024}
0x1300…130a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0044}
0x130a…134a Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000c, t01=0x004e}
0x134a…1354 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x008e}
0x1354…1368 Head {h00=0x0010, h01=0x0050, text=»INT400 EQU *«, t00=0x000c, t01=0x0098}
0x1368…1398 Head {h00=0x002c, h01=0x0050, text=» EL A2,16+4,A14 UNMODIFIED RETURN ADRESS«, t00=0x000c, t01=0x00ac}
0x1398…13a0 Head {h00=0x0004, h01=0x0050, t00=0x000c, t01=0x00dc}
0x13a0…13cc Head {h00=0x0028, h01=0x0050, text=» EL A3,16+6,A14 GET CURRENT SEGMENT «, t00=0x000c, t01=0x00e4}
0x13cc…13ee Head {h00=0x001e, h01=0x0050, text=» RF(Z) INT500 ROOT SEGMENT«, t00=0x000c, t01=0x0110}
0x13ee…1412 Head {h00=0x0020, h01=0x0050, text=» CW A3,TTB:SB,A4 SAME SEG ? «, t00=0x000c, t01=0x0132}
0x1412…1428 Head {h00=0x0012, h01=0x0050, text=» RF(E) INT500 «, t00=0x000c, t01=0x0156}
0x1428…143a Head {h00=0x000e, h01=0x0050, text=» LDR A6,A3«, t00=0x000c, t01=0x016c}
0x143a…1450 Head {h00=0x0012, h01=0x0050, text=» SU A6,SCTSEG «, t00=0x000c, t01=0x017e}
0x1450…1480 (13, 0, 400) Head {h00=0x002c, h01=0x0050, text=» SRL A6,3 *** SAVE WANTED SEGMENT IN A6 «, t00=0x000d, t01=0x0004}
0x1480…14a2 Head {h00=0x001e, h01=0x0050, text=» RF NEWSEG GET NEW SEGMENT«, t00=0x000d, t01=0x0034}
0x14a2…14ac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0056}
0x14ac…14b4 Head {h00=0x0004, h01=0x0050, t00=0x000d, t01=0x0060}
0x14b4…14c8 Head {h00=0x0010, h01=0x0050, text=»INT500 EQU *«, t00=0x000d, t01=0x0068}
0x14c8…14f8 Head {h00=0x002c, h01=0x0050, text=» EL A1,16+2,A14 GET PSW FROM USER STACK «, t00=0x000d, t01=0x007c}
0x14f8…150c Head {h00=0x0010, h01=0x0050, text=» ST A1,2,A15«, t00=0x000d, t01=0x00ac}
0x150c…1520 Head {h00=0x0010, h01=0x0050, text=» LDR A1,A14 «, t00=0x000d, t01=0x00c0}
0x1520…1558 Head {h00=0x0034, h01=0x0050, text=» ADKL A14,16+10 UPDATE STACK POINTER FOR RETURN «, t00=0x000d, t01=0x00d4}
0x1558…156a Head {h00=0x000e, h01=0x0050, text=» RF RETTUR«, t00=0x000d, t01=0x010c}
0x156a…1578 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000d, t01=0x011e}
0x1578…15b8 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000d, t01=0x012c}
0x15b8…15c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x016c}
0x15c2…15e4 Head {h00=0x001e, h01=0x0050, text=»* CONTINUE USER PROGRAM «, t00=0x000d, t01=0x0176}
0x15e4…15ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0008}
0x15ee…161e Head {h00=0x002c, h01=0x0050, text=»* A1= POINTER TO SAVE AREA ON A14 STACK «, t00=0x000e, t01=0x0012}
0x161e…163a Head {h00=0x0018, h01=0x0050, text=»* A2= RETURN ADDRESS«, t00=0x000e, t01=0x0042}
0x163a…1660 Head {h00=0x0022, h01=0x0050, text=»* A3= CURRENT SEGMENT POINTER «, t00=0x000e, t01=0x005e}
0x1660…166a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0084}
0x166a…16aa Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000e, t01=0x008e}
0x16aa…16b4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00ce}
0x16b4…16bc Head {h00=0x0004, h01=0x0050, t00=0x000e, t01=0x00d8}
0x16bc…16d0 Head {h00=0x0010, h01=0x0050, text=»RETTUR EQU *«, t00=0x000e, t01=0x00e0}
0x16d0…16e4 Head {h00=0x0010, h01=0x0050, text=» ST A2,4,A15«, t00=0x000e, t01=0x00f4}
0x16e4…170e Head {h00=0x0026, h01=0x0050, text=» ST A2,TTB:SA,A4 DISPATCH ADDRESS «, t00=0x000e, t01=0x0108}
0x170e…1746 Head {h00=0x0034, h01=0x0050, text=» ST A3,TTB:LA,A4 STORE CURRENT SEGM =TTB:SB OR 0«, t00=0x000e, t01=0x0132}
0x1746…1768 Head {h00=0x001e, h01=0x0050, text=» LDR A2,A15 RESTORE A1-A8 «, t00=0x000e, t01=0x016a}
0x1768…177a Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x000e, t01=0x018c}
0x177a…178c Head {h00=0x000e, h01=0x0050, text=» SUK A2,14«, t00=0x000f, t01=0x000e}
0x178c…179e Head {h00=0x000e, h01=0x0050, text=» LDK A3,16«, t00=0x000f, t01=0x0020}
0x179e…17ae Head {h00=0x000c, h01=0x0050, text=» MVUS A3«, t00=0x000f, t01=0x0032}
0x17ae…17c4 Head {h00=0x0012, h01=0x0050, text=» ML 8,-14,A15 «, t00=0x000f, t01=0x0042}
0x17c4…17ec Head {h00=0x0024, h01=0x0050, text=» RTN A15 RETURN TO USER PROGRAM «, t00=0x000f, t01=0x0058}
0x17ec…17f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0080}
0x17f6…1804 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000f, t01=0x008a}
0x1804…1844 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000f, t01=0x0098}
0x1844…184e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00d8}
0x184e…1870 Head {h00=0x001e, h01=0x0050, text=»* GET REQUESTED SEGMENT «, t00=0x000f, t01=0x00e2}
0x1870…187a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0104}
0x187a…1892 Head {h00=0x0014, h01=0x0050, text=»* A5= TRAP CODE «, t00=0x000f, t01=0x010e}
0x1892…18b6 Head {h00=0x0020, h01=0x0050, text=»* A6= REQUESTED SEGMENT NBR «, t00=0x000f, t01=0x0126}
0x18b6…18c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x014a}
0x18c0…1900 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x000f, t01=0x0154}
0x1900…190a (16, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0004}
0x190a…191e Head {h00=0x0010, h01=0x0050, text=»NEWSEG EQU *«, t00=0x0010, t01=0x000e}
0x191e…1932 Head {h00=0x0010, h01=0x0050, text=» ADKL A15,4 «, t00=0x0010, t01=0x0022}
0x1932…1944 Head {h00=0x000e, h01=0x0050, text=» LDR A7,A6«, t00=0x0010, t01=0x0036}
0x1944…1950 Head {h00=0x0008, h01=0x0050, text=» ENB«, t00=0x0010, t01=0x0048}
0x1950…195c Head {h00=0x0008, h01=0x0050, text=» LKM«, t00=0x0010, t01=0x0054}
0x195c…196c Head {h00=0x000c, h01=0x0050, text=» DATA 9 «, t00=0x0010, t01=0x0060}
0x196c…1978 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0010, t01=0x0070}
0x1978…198c Head {h00=0x0010, h01=0x0050, text=» SUKL A15,4 «, t00=0x0010, t01=0x007c}
0x198c…19a4 Head {h00=0x0014, h01=0x0050, text=» LD A1,TTB:PW,A4«, t00=0x0010, t01=0x0090}
0x19a4…19c4 Head {h00=0x001c, h01=0x0050, text=» ORK A1,1 SET USER MODE «, t00=0x0010, t01=0x00a8}
0x19c4…19e6 Head {h00=0x001e, h01=0x0050, text=» ST A1,2,A15 SET USER MODE«, t00=0x0010, t01=0x00c8}
0x19e6…19fe Head {h00=0x0014, h01=0x0050, text=» ST A1,TTB:PW,A4«, t00=0x0010, t01=0x00ea}
0x19fe…1a2a Head {h00=0x0028, h01=0x0050, text=» CWR A7,A6 SEGMENT CORRECTLY LOADED «, t00=0x0010, t01=0x0102}
0x1a2a…1a4a Head {h00=0x001c, h01=0x0050, text=» RF(NE) ERROR NO - ERROR«, t00=0x0010, t01=0x012e}
0x1a4a…1a60 Head {h00=0x0012, h01=0x0050, text=» CWK A5,/60FF «, t00=0x0010, t01=0x014e}
0x1a60…1a90 Head {h00=0x002c, h01=0x0050, text=» RB(NE) INT220 END SUBROUTINE CALL/ JUMP«, t00=0x0010, t01=0x0164}
0x1a90…1ab6 (17, 0, 400) Head {h00=0x0022, h01=0x0050, text=» RB INT500 END RETURN REQUEST «, t00=0x0011, t01=0x0004}
0x1ab6…1ac4 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x002a}
0x1ac4…1b04 Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0011, t01=0x0038}
0x1b04…1b0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0078}
0x1b0e…1b28 Head {h00=0x0016, h01=0x0050, text=»* ERROR HANDLING«, t00=0x0011, t01=0x0082}
0x1b28…1b32 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x009c}
0x1b32…1b48 Head {h00=0x0012, h01=0x0050, text=»* AT ENTRY: «, t00=0x0011, t01=0x00a6}
0x1b48…1b68 Head {h00=0x001c, h01=0x0050, text=»* A7= -1. REQUEST ERROR «, t00=0x0011, t01=0x00bc}
0x1b68…1b88 Head {h00=0x001c, h01=0x0050, text=»* A7= -2. DISC I/O ERROR«, t00=0x0011, t01=0x00dc}
0x1b88…1bac Head {h00=0x0020, h01=0x0050, text=»* A7= -3. DISC NOT OPERABLE «, t00=0x0011, t01=0x00fc}
0x1bac…1bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0120}
0x1bb6…1be8 Head {h00=0x002e, h01=0x0050, text=»* A3= SEGMENT POINTER OF REQUESTED SEGMENT«, t00=0x0011, t01=0x012a}
0x1be8…1c12 Head {h00=0x0026, h01=0x0050, text=»* A4= TTAB ADDRESS OF CALLING TASK«, t00=0x0011, t01=0x015c}
0x1c12…1c2a Head {h00=0x0014, h01=0x0050, text=»* A5= TRAP CODE «, t00=0x0011, t01=0x0186}
0x1c2a…1c4c Head {h00=0x001e, h01=0x0050, text=»* A6= EXPECTED SEGMENT NBR«, t00=0x0012, t01=0x000e}
0x1c4c…1c72 Head {h00=0x0022, h01=0x0050, text=»* A8= SEGMENT POINTER AT CALL «, t00=0x0012, t01=0x0030}
0x1c72…1c7c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0056}
0x1c7c…1cbc Head {h00=0x003c, h01=0x0050, text=»******************************************************* «, t00=0x0012, t01=0x0060}
0x1cbc…1cc6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x00a0}
0x1cc6…1cda Head {h00=0x0010, h01=0x0050, text=»ERROR EQU * «, t00=0x0012, t01=0x00aa}
0x1cda…1d1c Head {h00=0x003e, h01=0x0050, text=» LD A2,SCTLAC CALCULATE DISPATCH ADDRESS OF ERROR ROUTINE «, t00=0x0012, t01=0x00be}
0x1d1c…1d34 Head {h00=0x0014, h01=0x0050, text=» ADKL A2,FUNCTB «, t00=0x0012, t01=0x0100}
0x1d34…1d46 Head {h00=0x000e, h01=0x0050, text=» ELR A2,A2«, t00=0x0012, t01=0x0118}
0x1d46…1d58 Head {h00=0x000e, h01=0x0050, text=» SUK A2,2 «, t00=0x0012, t01=0x012a}
0x1d58…1d7c Head {h00=0x0020, h01=0x0050, text=» ELR A2,A2 DISPATCH ADDRESS «, t00=0x0012, t01=0x013c}
0x1d7c…1da8 Head {h00=0x0028, h01=0x0050, text=» ES A7,14,A14 SET RETURN CODE IN A7 «, t00=0x0012, t01=0x0160}
0x1da8…1dbc Head {h00=0x0010, h01=0x0050, text=» LDR A1,A14 «, t00=0x0012, t01=0x018c}
0x1dbc…1dd4 Head {h00=0x0014, h01=0x0050, text=» ADKL A14,16+10 «, t00=0x0013, t01=0x0010}
0x1dd4…1e00 Head {h00=0x0028, h01=0x0050, text=» DATA /6300 *** JUMP TO DEBUGGER ***«, t00=0x0013, t01=0x0028}
0x1e00…1e12 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x0013, t01=0x0054}
0x1e12…1e24 Head {h00=0x000e, h01=0x0050, text=» RB RETTUR«, t00=0x0013, t01=0x0066}
0x1e24…1e2e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0078}
0x1e2e…1e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0082}
0x1e38…1e44 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0013, t01=0x008c}
0x1e44…1e48 Head {h00=0x4004, h01=0x0000}
0x1e48…1e4c 00 13 00 98 ┆ ┆
0x1e4c…1e54 (20, 1, 8) 20 04 00 00 00 14 00 04 ┆ ┆