|
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: 4568 (0x11d8)
Notes: pts_type(SC)
Names: »INPRET.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/INPRET.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/INPRET.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/INPRET.SC«
IDENT INPRET REL 8.2 78-09-15 870105040820
*
**************************************************
*
* PHILIPS TERMINAL SYSTEM PTS
*
* INPRET = SUBROUTINE INTERPRETER
*
*
*
*
*
*
**************************************************
*
*
* THIS IS A SUBROUTINE INTERPRETER TO HANDLE SUBROUTINE
* CALLS USING THE A14 STACK. THE INTERPRETER IS CALLED
* WITH INSTRUCTION CODES /C001 - /C0FF WHERE /1 - /FF IS A
* INDEX. INDEX VAULES ARE 1,2,3,4......
* THE INDEX IS USED TO GET ABSOLUTE ADDRESS TO THE CALLED
* SUBROUTINE FROM A ADDRESS TABLE. START ADDRESS OF THIS TABLE
* IS STORED IN COMMUNICATION VECTOR TABLE. ('CVTINP')
*
* THE INTERPRETER MAY ALSO EXECUTE THE FOLLOWING TWO INSTRUCTIONS:
*
* LD R1,DISPL,A13 CALLING CODE: CXYY
*
* ST R1,DISPL,A13 CALLING CODE: DXYY
*
* X = R1 = REGISTERS A1 -A14
* YY = DISPL (DISPLACMENT)
*
*
*
EJECT
*
*
*********
* ENTRY *
*********
*
*
ENTRY IHINPT TRAP INTERRUPT ADDRESS
*
*
*
*************
* EXTERNALS *
*************
*
*
EXTRN CVTINP FUNCTION TABLE ADDRESS
EXTRN RETUR3
EJECT
*
*
* I H I N P T
*
* INTERPRETER TRAP HANDLER
*
IHINPT EQU *
STR A1,A15 SAVE A1-A3 ON STACK
STR A2,A15
STR A3,A15 SAVE A3 ON STACK
LD A1,10,A15 LOAD TRAP ADDRESS
LDR* A2,A1 LOAD TRAP CODE
ADK A1,2
ST A1,10,A15 SAVE RETURN ADDRESS
LDR A3,A2 SAVE CODE IN A3
ANKL A3,/F00 MASK OUT REGISTER CODE
RF(Z) INT200 BRANCH IF SUBROUTINE CALL
*
*
* EXECUTE LOAD/STORE INSTRUCTION
*
SC A2,DISPL+1 STORE DISPLACMENT
SRL A3,1 SHIFT TO FIT INSTRUCTION CODE
SLL A2,3
RF(NN) INT100 BRANCH IF LOAD INSTRUCTION
ADK A3,1 INDICATE STORE INSTRUCTION
INT100 ADKL A3,/8056 GET COMPLETE INSTRUCTION CODE
ST A3,INSTR STORE INSTRUCTION TO BE EXECUTED
LDR* A3,A15 RESORE A3
LDR* A2,A15 RESTORE A1-A2
LDR* A1,A15
INSTR DATA 0 LOAD/STORE INSTRUCTION
DISPL DATA 0 DISPLACMENT
STR A1,A15 SAVE A1
CF A15,IHSTAK SAVE CONDITION REGISTER
IHSTAK LDR* A1,A15 GET COND. REG
ST A1,6,A15 STORE IN RETURN PSW
LDR* A1,A15 DUMMY TO ADJUST STACK
LDR* A1,A15 RELOAD A1
RTN A15 RETURN TO USER PROGRAM
EJECT
*
*
* EXECUTE SUBROUTINE CALL
*
INT200 EQU *
STR A1,A14 STORE CONTINUATION ADDRESS ON A14 STACK
LD A3,8,A15
ST A3,-2,A14 STORE PSW ON A14 STACK
SUKL A14,4 ADJUST STACK POINTER
ANKL A2,/1FFF GET INDEX AND
ADR A2,A2 DOUBLE IT
AD A2,CVTINP ADD FUNCTION TABLE START ADDRESS
LDR* A2,A2 GET SUBROUTINE START ADDRESS AND
ST A2,10,A15 STORE IT ON A15 STACK
ABL RETUR3 RESTORE A1-A3 AND GO TO CALLED SUBROUTINE
*
*
END
0x0000…0036 (0, 0, 400) Head {h00=0x0032, h01=0x0050, text=» IDENT INPRET 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…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=»* INPRET = SUBROUTINE INTERPRETER «, t00=0x0000, t01=0x00c2}
0x00ea…00f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00ee}
0x00f4…00fe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f8}
0x00fe…0108 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0102}
0x0108…0112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x010c}
0x0112…011c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0116}
0x011c…0126 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0120}
0x0126…0160 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x012a}
0x0160…016a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0164}
0x016a…0174 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x016e}
0x0174…01b6 Head {h00=0x003e, h01=0x0050, text=»* THIS IS A SUBROUTINE INTERPRETER TO HANDLE SUBROUTINE «, t00=0x0000, t01=0x0178}
0x01b6…01f6 Head {h00=0x003c, h01=0x0050, text=»* CALLS USING THE A14 STACK. THE INTERPRETER IS CALLED«, t00=0x0001, t01=0x002a}
0x01f6…023a Head {h00=0x0040, h01=0x0050, text=»* WITH INSTRUCTION CODES /C001 - /C0FF WHERE /1 - /FF IS A«, t00=0x0001, t01=0x006a}
0x023a…026c Head {h00=0x002e, h01=0x0050, text=»* INDEX. INDEX VAULES ARE 1,2,3,4...... «, t00=0x0001, t01=0x00ae}
0x026c…02b0 Head {h00=0x0040, h01=0x0050, text=»* THE INDEX IS USED TO GET ABSOLUTE ADDRESS TO THE CALLED «, t00=0x0001, t01=0x00e0}
0x02b0…02f8 Head {h00=0x0044, h01=0x0050, text=»* SUBROUTINE FROM A ADDRESS TABLE. START ADDRESS OF THIS TABLE«, t00=0x0001, t01=0x0124}
0x02f8…0338 Head {h00=0x003c, h01=0x0050, text=»* IS STORED IN COMMUNICATION VECTOR TABLE. ('CVTINP') «, t00=0x0001, t01=0x016c}
0x0338…0342 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x001c}
0x0342…038e Head {h00=0x0048, h01=0x0050, text=»* THE INTERPRETER MAY ALSO EXECUTE THE FOLLOWING TWO INSTRUCTIONS:«, t00=0x0002, t01=0x0026}
0x038e…0398 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0072}
0x0398…03ca Head {h00=0x002e, h01=0x0050, text=»* LD R1,DISPL,A13 CALLING CODE: CXYY «, t00=0x0002, t01=0x007c}
0x03ca…03d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ae}
0x03d4…0406 Head {h00=0x002e, h01=0x0050, text=»* ST R1,DISPL,A13 CALLING CODE: DXYY «, t00=0x0002, t01=0x00b8}
0x0406…0410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00ea}
0x0410…0438 Head {h00=0x0024, h01=0x0050, text=»* X = R1 = REGISTERS A1 -A14 «, t00=0x0002, t01=0x00f4}
0x0438…045c Head {h00=0x0020, h01=0x0050, text=»* YY = DISPL (DISPLACMENT)«, t00=0x0002, t01=0x011c}
0x045c…0466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0140}
0x0466…0470 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x014a}
0x0470…047a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0154}
0x047a…0488 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0002, t01=0x015e}
0x0488…0492 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x016c}
0x0492…049c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0176}
0x049c…04ae Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0002, t01=0x0180}
0x04ae…04c0 (3, 0, 400) Head {h00=0x000e, h01=0x0050, text=»* ENTRY * «, t00=0x0003, t01=0x0004}
0x04c0…04d2 Head {h00=0x000e, h01=0x0050, text=»********* «, t00=0x0003, t01=0x0016}
0x04d2…04dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0028}
0x04dc…04e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0032}
0x04e6…0512 Head {h00=0x0028, h01=0x0050, text=» ENTRY IHINPT TRAP INTERRUPT ADDRESS«, t00=0x0003, t01=0x003c}
0x0512…051c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0068}
0x051c…0526 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0072}
0x0526…0530 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x007c}
0x0530…0546 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x0086}
0x0546…055c Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0003, t01=0x009c}
0x055c…0572 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0003, t01=0x00b2}
0x0572…057c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00c8}
0x057c…0586 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x00d2}
0x0586…05b2 Head {h00=0x0028, h01=0x0050, text=» EXTRN CVTINP FUNCTION TABLE ADDRESS«, t00=0x0003, t01=0x00dc}
0x05b2…05c8 Head {h00=0x0012, h01=0x0050, text=» EXTRN RETUR3 «, t00=0x0003, t01=0x0108}
0x05c8…05d6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x011e}
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…0602 Head {h00=0x0014, h01=0x0050, text=»* I H I N P T «, t00=0x0003, t01=0x0140}
0x0602…060c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0158}
0x060c…0630 Head {h00=0x0020, h01=0x0050, text=»* INTERPRETER TRAP HANDLER«, t00=0x0003, t01=0x0162}
0x0630…063a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0186}
0x063a…064e Head {h00=0x0010, h01=0x0050, text=»IHINPT EQU *«, t00=0x0003, t01=0x0190}
0x064e…0676 Head {h00=0x0024, h01=0x0050, text=» STR A1,A15 SAVE A1-A3 ON STACK «, t00=0x0004, t01=0x0014}
0x0676…068a Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x0004, t01=0x003c}
0x068a…06ae Head {h00=0x0020, h01=0x0050, text=» STR A3,A15 SAVE A3 ON STACK«, t00=0x0004, t01=0x0050}
0x06ae…06d6 Head {h00=0x0024, h01=0x0050, text=» LD A1,10,A15 LOAD TRAP ADDRESS «, t00=0x0004, t01=0x0074}
0x06d6…06f8 Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A1 LOAD TRAP CODE«, t00=0x0004, t01=0x009c}
0x06f8…070a Head {h00=0x000e, h01=0x0050, text=» ADK A1,2 «, t00=0x0004, t01=0x00be}
0x070a…0734 Head {h00=0x0026, h01=0x0050, text=» ST A1,10,A15 SAVE RETURN ADDRESS «, t00=0x0004, t01=0x00d0}
0x0734…0756 Head {h00=0x001e, h01=0x0050, text=» LDR A3,A2 SAVE CODE IN A3«, t00=0x0004, t01=0x00fa}
0x0756…0782 Head {h00=0x0028, h01=0x0050, text=» ANKL A3,/F00 MASK OUT REGISTER CODE«, t00=0x0004, t01=0x011c}
0x0782…07b2 Head {h00=0x002c, h01=0x0050, text=» RF(Z) INT200 BRANCH IF SUBROUTINE CALL «, t00=0x0004, t01=0x0148}
0x07b2…07bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0178}
0x07bc…07c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0182}
0x07c6…07f0 Head {h00=0x0026, h01=0x0050, text=»* EXECUTE LOAD/STORE INSTRUCTION«, t00=0x0004, t01=0x018c}
0x07f0…07fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0026}
0x07fa…0822 Head {h00=0x0024, h01=0x0050, text=» SC A2,DISPL+1 STORE DISPLACMENT«, t00=0x0005, t01=0x0030}
0x0822…0852 Head {h00=0x002c, h01=0x0050, text=» SRL A3,1 SHIFT TO FIT INSTRUCTION CODE «, t00=0x0005, t01=0x0058}
0x0852…0864 Head {h00=0x000e, h01=0x0050, text=» SLL A2,3 «, t00=0x0005, t01=0x0088}
0x0864…0896 Head {h00=0x002e, h01=0x0050, text=» RF(NN) INT100 BRANCH IF LOAD INSTRUCTION «, t00=0x0005, t01=0x009a}
0x0896…08c2 Head {h00=0x0028, h01=0x0050, text=» ADK A3,1 INDICATE STORE INSTRUCTION«, t00=0x0005, t01=0x00cc}
0x08c2…08fc Head {h00=0x0036, h01=0x0050, text=»INT100 ADKL A3,/8056 GET COMPLETE INSTRUCTION CODE«, t00=0x0005, t01=0x00f8}
0x08fc…0932 Head {h00=0x0032, h01=0x0050, text=» ST A3,INSTR STORE INSTRUCTION TO BE EXECUTED «, t00=0x0005, t01=0x0132}
0x0932…0950 Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A15 RESORE A3«, t00=0x0005, t01=0x0168}
0x0950…0972 Head {h00=0x001e, h01=0x0050, text=» LDR* A2,A15 RESTORE A1-A2«, t00=0x0005, t01=0x0186}
0x0972…0986 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x0006, t01=0x0018}
0x0986…09b2 Head {h00=0x0028, h01=0x0050, text=»INSTR DATA 0 LOAD/STORE INSTRUCTION «, t00=0x0006, t01=0x002c}
0x09b2…09d2 Head {h00=0x001c, h01=0x0050, text=»DISPL DATA 0 DISPLACMENT«, t00=0x0006, t01=0x0058}
0x09d2…09ee Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 SAVE A1 «, t00=0x0006, t01=0x0078}
0x09ee…0a1c Head {h00=0x002a, h01=0x0050, text=» CF A15,IHSTAK SAVE CONDITION REGISTER«, t00=0x0006, t01=0x0094}
0x0a1c…0a44 Head {h00=0x0024, h01=0x0050, text=»IHSTAK LDR* A1,A15 GET COND. REG«, t00=0x0006, t01=0x00c2}
0x0a44…0a6c Head {h00=0x0024, h01=0x0050, text=» ST A1,6,A15 STORE IN RETURN PSW«, t00=0x0006, t01=0x00ea}
0x0a6c…0a96 Head {h00=0x0026, h01=0x0050, text=» LDR* A1,A15 DUMMY TO ADJUST STACK«, t00=0x0006, t01=0x0112}
0x0a96…0ab4 Head {h00=0x001a, h01=0x0050, text=» LDR* A1,A15 RELOAD A1«, t00=0x0006, t01=0x013c}
0x0ab4…0adc Head {h00=0x0024, h01=0x0050, text=» RTN A15 RETURN TO USER PROGRAM «, t00=0x0006, t01=0x015a}
0x0adc…0aea Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x0182}
0x0aea…0af4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0190}
0x0af4…0afe Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000a}
0x0afe…0b22 Head {h00=0x0020, h01=0x0050, text=»* EXECUTE SUBROUTINE CALL «, t00=0x0007, t01=0x0014}
0x0b22…0b2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0038}
0x0b2c…0b40 Head {h00=0x0010, h01=0x0050, text=»INT200 EQU *«, t00=0x0007, t01=0x0042}
0x0b40…0b7c Head {h00=0x0038, h01=0x0050, text=» STR A1,A14 STORE CONTINUATION ADDRESS ON A14 STACK «, t00=0x0007, t01=0x0056}
0x0b7c…0b90 Head {h00=0x0010, h01=0x0050, text=» LD A3,8,A15«, t00=0x0007, t01=0x0092}
0x0b90…0bbc Head {h00=0x0028, h01=0x0050, text=» ST A3,-2,A14 STORE PSW ON A14 STACK«, t00=0x0007, t01=0x00a6}
0x0bbc…0be4 Head {h00=0x0024, h01=0x0050, text=» SUKL A14,4 ADJUST STACK POINTER«, t00=0x0007, t01=0x00d2}
0x0be4…0c08 Head {h00=0x0020, h01=0x0050, text=» ANKL A2,/1FFF GET INDEX AND«, t00=0x0007, t01=0x00fa}
0x0c08…0c24 Head {h00=0x0018, h01=0x0050, text=» ADR A2,A2 DOUBLE IT«, t00=0x0007, t01=0x011e}
0x0c24…0c5a Head {h00=0x0032, h01=0x0050, text=» AD A2,CVTINP ADD FUNCTION TABLE START ADDRESS«, t00=0x0007, t01=0x013a}
0x0c5a…0c8e Head {h00=0x0030, h01=0x0050, text=» LDR* A2,A2 GET SUBROUTINE START ADDRESS AND«, t00=0x0007, t01=0x0170}
0x0c8e…0cba Head {h00=0x0028, h01=0x0050, text=» ST A2,10,A15 STORE IT ON A15 STACK «, t00=0x0008, t01=0x0014}
0x0cba…0cf8 Head {h00=0x003a, h01=0x0050, text=» ABL RETUR3 RESTORE A1-A3 AND GO TO CALLED SUBROUTINE «, t00=0x0008, t01=0x0040}
0x0cf8…0d02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x007e}
0x0d02…0d0c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0088}
0x0d0c…0d18 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0008, t01=0x0092}
0x0d18…0d1c Head {h00=0x4004, h01=0x0000}
0x0d1c…0d20 00 08 00 9e ┆ ┆
0x0d20…0d28 (9, 1, 8) 20 04 00 00 00 09 00 04 ┆ ┆
0x0d28…0d78 (10, 0, 400) 00 09 01 8c 00 22 00 50 2a 20 20 2d 42 49 54 53 20 30 2d 37 20 49 4e 20 54 48 45 20 46 49 52 53 54 20 57 4f 52 44 00 0a 00 08 00 20 00 50 2a 20 20 2d 45 43 42 45 4c 20 20 45 46 46 45 43 54 49 56 45 20 4c 45 4e 47 54 48 20 00 0a 00 2e 00 1a ┆ " P* -BITS 0-7 IN THE FIRST WORD P* -ECBEL EFFECTIVE LENGTH . ┆
0x0d78…0dc8 00 50 2a 20 20 2d 45 43 42 52 43 20 20 52 45 54 55 52 4e 20 43 4f 44 45 00 0a 00 52 00 06 00 50 2a 20 00 0a 00 70 00 04 00 50 00 0a 00 7a 00 04 00 50 00 0a 00 82 00 04 00 50 00 0a 00 8a 00 06 00 50 2a 20 00 0a 00 92 00 32 00 50 2a 5c 47 45 ┆ P* -ECBRC RETURN CODE R P* p P z P P P* 2 P* GE┆
0x0dc8…0e18 54 20 44 57 54 20 41 44 44 52 45 53 53 20 41 4e 44 20 43 48 45 43 4b 20 49 46 20 44 45 56 49 43 45 20 49 53 20 42 55 53 59 20 00 0a 00 9c 00 06 00 50 2a 20 00 0a 00 d2 00 04 00 50 00 0a 00 dc 00 04 00 50 00 0a 00 e4 00 28 00 50 54 49 4f 5c ┆T DWT ADDRESS AND CHECK IF DEVICE IS BUSY P* P P ( PTIO ┆
0x0e18…0e68 43 46 5c 41 31 35 2c 46 4e 44 44 57 54 5c 53 45 41 52 43 48 20 44 57 54 20 41 44 44 52 45 53 53 00 0a 00 ec 00 12 00 50 5c 4c 44 4b 4c 5c 41 33 2c 2f 38 30 30 30 00 0a 01 18 00 0e 00 50 5c 4c 44 52 5c 41 36 2c 41 36 00 0a 01 2e 00 24 00 50 ┆CF A15,FNDDWT SEARCH DWT ADDRESS P LDKL A3,/8000 P LDR A6,A6 . $ P┆
0x0e68…0eb8 5c 41 42 4c 28 5a 29 5c 54 49 4f 45 52 52 5c 46 49 4c 45 20 43 4f 44 45 20 55 4e 4b 4e 4f 57 4e 00 0a 01 40 00 1c 00 50 5c 4c 44 5c 41 39 2c 32 2c 41 35 5c 54 41 53 4b 20 53 54 41 54 55 53 20 00 0a 01 68 00 20 00 50 5c 4c 44 52 5c 41 31 31 ┆ ABL(Z) TIOERR FILE CODE UNKNOWN @ P LD A9,2,A5 TASK STATUS h P LDR A11┆
0x0eb8…0f08 (11, 0, 400) 2c 41 39 5c 53 41 56 45 20 54 41 53 4b 20 53 54 41 54 55 53 00 0a 01 88 00 20 00 50 5c 52 46 28 4e 29 5c 54 49 4f 30 32 30 5c 44 4d 54 41 53 4b 20 43 41 4c 4c 49 4e 47 00 0b 00 1c 00 24 00 50 5c 4c 44 4b 4c 5c 41 39 2c 2f 34 30 30 30 5c 52 ┆,A9 SAVE TASK STATUS P RF(N) TIO020 DMTASK CALLING $ P LDKL A9,/4000 R┆
0x0f08…0f58 45 51 55 45 53 54 20 42 55 53 59 20 42 49 54 20 00 0b 00 40 00 14 00 50 5c 41 4e 5c 41 39 2c 44 57 54 53 54 2c 41 36 20 00 0b 00 68 00 2c 00 50 5c 52 46 28 4e 5a 29 5c 54 49 4f 51 32 30 5c 52 45 51 20 42 55 53 59 2c 4e 4f 54 20 44 4d 54 41 ┆EQUEST BUSY BIT @ P AN A9,DWTST,A6 h , P RF(NZ) TIOQ20 REQ BUSY,NOT DMTA┆
0x0f58…0fa8 53 4b 20 43 41 4c 4c 20 00 0b 00 80 00 10 00 50 54 49 4f 30 32 30 5c 45 51 55 5c 2a 00 0b 00 b0 00 12 00 50 5c 43 43 4b 5c 41 37 2c 2f 42 42 30 30 20 00 0b 00 c4 00 20 00 50 5c 41 42 4c 28 45 29 5c 41 54 54 41 43 48 5c 41 54 54 41 43 48 20 ┆SK CALL PTIO020 EQU * P CCK A7,/BB00 P ABL(E) ATTACH ATTACH ┆
0x0fa8…0ff8 4f 52 44 45 52 20 00 0b 00 da 00 12 00 50 5c 43 43 4b 5c 41 37 2c 2f 42 43 30 30 20 00 0b 00 fe 00 20 00 50 5c 41 42 4c 28 45 29 5c 44 45 54 41 43 48 5c 44 45 54 41 43 48 20 4f 52 44 45 52 20 00 0b 01 14 00 1c 00 50 5c 4c 44 52 5c 41 31 31 ┆ORDER P CCK A7,/BC00 P ABL(E) DETACH DETACH ORDER P LDR A11┆
0x0ff8…1048 2c 41 31 31 5c 54 41 53 4b 20 53 54 41 54 55 53 00 0b 01 38 00 2e 00 50 5c 52 46 28 4e 29 5c 54 49 4f 30 33 30 5c 44 4d 20 54 41 53 4b 2c 53 4b 49 50 20 41 54 54 41 43 48 20 43 4f 4e 54 52 4f 4c 20 00 0b 01 58 00 1e 00 50 5c 4c 44 4b 4c 5c ┆,A11 TASK STATUS 8 . P RF(N) TIO030 DM TASK,SKIP ATTACH CONTROL X P LDKL ┆
0x1048…1098 (12, 0, 400) 41 31 30 2c 2f 30 38 30 30 5c 41 54 54 41 43 48 20 42 49 54 00 0b 01 8a 00 14 00 50 5c 41 4e 5c 41 31 30 2c 44 57 54 53 54 2c 41 36 00 0c 00 1c 00 1e 00 50 5c 52 46 28 5a 29 5c 54 49 4f 30 33 30 5c 4e 4f 54 20 41 54 54 41 43 48 45 44 00 0c ┆A10,/0800 ATTACH BIT P AN A10,DWTST,A6 P RF(Z) TIO030 NOT ATTACHED ┆
0x1098…10e8 00 34 00 14 00 50 5c 43 57 5c 41 35 2c 44 57 54 54 41 42 2c 41 36 00 0c 00 56 00 2a 00 50 5c 52 46 28 4e 45 29 5c 54 49 4f 51 32 30 5c 41 54 54 41 43 48 45 44 20 54 4f 20 4f 54 48 45 52 20 54 41 53 4b 20 00 0c 00 6e 00 14 00 50 5c 41 4e 5c ┆ 4 P CW A5,DWTTAB,A6 V * P RF(NE) TIOQ20 ATTACHED TO OTHER TASK n P AN ┆
0x10e8…1138 41 33 2c 44 57 54 53 54 2c 41 36 20 00 0c 00 9c 00 1e 00 50 5c 52 46 28 5a 29 5c 54 49 4f 51 30 35 5c 44 45 56 49 43 45 20 42 55 53 59 20 00 0c 00 b4 00 10 00 50 54 49 4f 30 33 30 5c 45 51 55 5c 2a 00 0c 00 d6 00 14 00 50 5c 41 4e 5c 41 33 ┆A3,DWTST,A6 P RF(Z) TIOQ05 DEVICE BUSY PTIO030 EQU * P AN A3┆
0x1138…1188 2c 44 57 54 53 54 2c 41 36 20 00 0c 00 ea 00 1e 00 50 5c 52 46 28 5a 29 5c 54 49 4f 51 32 30 5c 44 45 56 49 43 45 20 42 55 53 59 20 00 0c 01 02 00 10 00 50 54 49 4f 30 33 35 5c 45 51 55 5c 2a 00 0c 01 24 00 24 00 50 5c 53 43 5c 41 32 2c 44 ┆,DWTST,A6 P RF(Z) TIOQ20 DEVICE BUSY PTIO035 EQU * $ $ P SC A2,D┆
0x1188…11d8 57 54 4f 52 2c 41 36 5c 53 54 4f 52 45 20 44 57 54 20 49 4e 44 45 58 20 00 0c 01 38 00 1e 00 50 5c 4c 44 4b 5c 41 32 2c 2f 34 30 5c 43 48 45 43 4b 20 49 46 20 45 43 48 4f 20 00 0c 01 60 00 0e 00 50 5c 41 4e 52 5c 41 32 2c 41 37 00 0c 01 82 ┆WTOR,A6 STORE DWT INDEX 8 P LDK A2,/40 CHECK IF ECHO ` P ANR A2,A7 ┆