|
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: 7834 (0x1e9a)
Notes: pts_type(SC)
Names: »TPROC.SC«
└─⟦35fda6e03⟧ Bits:30009701 Philips computer tape "BARCLAY"
└─⟦this⟧ »M:DEMO/TPROC.SC«
└─⟦4358b8014⟧ Bits:30009669 Philips computer tape "600124"
└─⟦this⟧ »MON10/TPROC.SC«
└─⟦5c22ed822⟧ Bits:30009675 Philips computer tape "600209"
└─⟦this⟧ »M:DENJ/TPROC.SC«
└─⟦79fbed147⟧ Bits:30009697 Philips computer tape "600414"
└─⟦this⟧ »M:DECE/TPROC.SC«
└─⟦bf903a231⟧ Bits:30009665 Philips computer tape "600109"
└─⟦this⟧ »M:DENJ/TPROC.SC«
└─⟦this⟧ »MON10/TPROC.SC«
IDENT TPROC REL 10.0 80-03-14 870105041000 * * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * TPROC = TOSS LKM PROCESSORS * * * * * * ************************************************** * * * THIS MODULE CONTAINS THE FOLLOWING * TOSS LKM PROCESSORS: * * - TWAIT = WAIT * * - TMWAIT = MULTIPLE WAIT * * - TACTOT = ACTIVATE/RESTART TASK * EJECT TPROC * * *********** * ENTRIES * *********** * * ENTRY TWAIT WAIT PROCESSOR ENTRY TMWAIT MULTIPLE WAIT PROCESSOR ENTRY TACTOT ACTIVATE/RESTART PROCESSOR EJECT TPROC * * ************* * EXTERNALS * ************* * * EXTRN TDISP DISPATCHER EXTRN QTJOB QUEUE TASK FOR DISPATCHING EXTRN LKMQDI QUEUE TASK AND DISPATCH EXTRN ACTDIS ACTIVATE TASK AND DISPATCH EXTRN LKMRQE LKM REQUEST ERROR EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID EXTRN TTB:SA TTAB SAVE AREA EXTRN DWTST DWT STATUS EXTRN DWTTAB TTAB ADDRESS EXTRN DWTWAT WAIT/ACTIVATE INDICATOR EJECT TPROC * * ***************************************** * * CONDITIONAL ASSEMBLY * ***************************************** * * A PROGRAM VERSION USING TOSS MMU PAGING * IS OBTAINED BY SETTING MMUPAG EQU 1. * MMUPAG EQU 1 * EJECT TPROC * * ******** * WAIT * ******** * * * THIS IS THE WAIT LKM PROCESSOR. * * THIS MODULE IS ENTERED WHEN THE TASK * WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. * * IT IS ENTERED FROM THE LKM HANDLER * WITH THE FOLLOWING PARAMETERS: * * A5 = TTAB ADDRESS * A8 = ECB ADDRESS * * TWAIT CF A15,FNDDWT SEARCH DWT ADDRESS ADK A6,0 SET CR RF(Z) TP:RQE FILE CODE NOT FOUND * IFT MMUPAG=0 LDR* A1,A8 RETURN IF EVENT COMPLETED XIF * IFT MMUPAG=1 ELR A1,A8 RETURN IF EVENT COMPLETED XIF * RF(N) TP:QDI I/O ALREADY COMPLETED IM DWTWAT,A6 NO, SET WAIT INDICATOR IN DWT * T:DISP ABL TDISP GO TO DISPATCHER * EJECT TPROC * * ********** * TACTOT * ********** * * * THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR. * * THIS MODULE IS ENTERED FROM THE LKM HANDLER * WHEN A TASK HAS TO BE ACTIVATED. * * THE FOLLOWING PARAMETERS ARE SUPPLIED:- * * A1 = PARAMETER WHEN A4 NOT ZERO * A4 = START ADDRESS AT ACTIVATION, ELSE ZERO * A5 = TTAB * A7 = IDENTIFICATION FOR TASK TO BE ACTIVATED * * TACTOT EQU * CF A15,FNDTID FIND TTAB ADDRESS ADK A2,0 SET CR RF(Z) TP:RQE TASK NOT IN SYSTEM CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING LD A3,TTB:SA+6,A5 GET SEGMENT NUMBER LDR A5,A2 LDR A2,A4 RF(Z) TP:QDI RESTART: QUEUE FOR DISPATCHING ABL ACTDIS ACTIVATE TASK AND DISPATCH * EJECT TPROC * * ********** * TMWAIT * ********** * * * THIS IS THE MULTIPLE WAIT LKM PROCESSOR. * * IT IS ENTERED FROM THE LKM HANDLER * WITH THE FOLLOWING PARAMETERS: * * A5 = TTAB ADDRESS * A7 = ECBBLK ADDRESS * * WHEN ONE OF THE SPECIFIED EVENTS IS COMPLETED, * RETURN IS MADE TO THE CALLING TASK VIA TENDIO * WITH THE FOLLOWING PARAMETERS: * * A8 = ECB ADDRESS OF COMPLETED EVENT * * IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO). * * NOTICE THAT ALL EVENTS MUST HAVE * BEEN ISSUED IN THE NO WAIT MODE. * * EJECT TPROC * * TMWAIT EQU * MULTIPLE WAIT ENTRY LDK A3,0 * IFT MMUPAG=0 LDR* A1,A7 GET NO OF ECB:S IN ECBBLK XIF * IFT MMUPAG=1 ELR A1,A7 GET NO OF ECB:S IN ECBBLK XIF * RF(NP) TP:RQE REQUEST ERROR IF <= 0 * TMW:10 EQU * ADK A7,2 POINT TO NEXT ECB ADDRESS IN ECBBLK * IFT MMUPAG=0 LDR* A8,A7 GET ECB ADDRESS LDR* A2,A8 GET FIRST WORD OF ECB XIF * IFT MMUPAG=1 ELR A8,A7 GET ECB ADDRESS ELR A2,A8 GET FIRST WORD OF ECB XIF * RF(N) TMW:30 I/O ALREADY COMPLETED CF A15,FNDDWT NO, SEARCH DWT ADDRESS FROM FILE CODE ADK A6,0 SET CR RF(Z) TP:RQE NOT FOUND * EJECT TPROC * * LD A2,DWTST,A6 GET DWT STATUS RF(N) TP:RQE NOT BUSY CW A5,DWTTAB,A6 RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT ORK A6,1 SET BIT 15 ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR RF(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK LDR A9,A6 SAVE FIRST DWT ADDRESS LDR A3,A6 * TMW:20 EQU * ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE LDR A9,A6 SAVE THIS DWT ADDRESS SUK A1,1 RB(P) TMW:10 MORE ECB:S IN ECBBLK ST A3,DWTWAT,A9 NO, SET FIRST DWT ADDRESS IN THE LAST RB T:DISP GO TO DISPATCHER * TMW:30 EQU * ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR RF(Z) TP:QDI FIRST ECB IN ECBBLK * TMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR LDR* A2,A3 GET NEXT DWT ADDRESS RF(Z) TP:QDI NO MORE DWT:S CMR A3 SET TO NO WAIT AGAIN LDR A3,A2 RB TMW:40 * EJECT TPROC * * TP:RQE EQU * ABL LKMRQE LKM REQUEST ERROR * TP:QDI EQU * ABL LKMQDI QUEUE TASK AND DISPATCH * * * END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT TPROC REL 10.0 80-03-14 870105041000«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0046 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0040}
0x0046…0050 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x004a}
0x0050…008a Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0054}
0x008a…0094 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x008e}
0x0094…00bc Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x0098}
0x00bc…00c6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c0}
0x00c6…00ee Head {h00=0x0024, h01=0x0050, text=»* TPROC = TOSS LKM PROCESSORS «, t00=0x0000, t01=0x00ca}
0x00ee…00f8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f2}
0x00f8…0102 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00fc}
0x0102…010c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0106}
0x010c…0116 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0110}
0x0116…0120 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x011a}
0x0120…012a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0124}
0x012a…0164 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x012e}
0x0164…016e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0168}
0x016e…0178 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0172}
0x0178…01a6 Head {h00=0x002a, h01=0x0050, text=»* THIS MODULE CONTAINS THE FOLLOWING«, t00=0x0000, t01=0x017c}
0x01a6…01c6 Head {h00=0x001c, h01=0x0050, text=»* TOSS LKM PROCESSORS:«, t00=0x0001, t01=0x001a}
0x01c6…01d0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x003a}
0x01d0…01ec Head {h00=0x0018, h01=0x0050, text=»* - TWAIT = WAIT «, t00=0x0001, t01=0x0044}
0x01ec…01f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0060}
0x01f6…021a Head {h00=0x0020, h01=0x0050, text=»* - TMWAIT = MULTIPLE WAIT«, t00=0x0001, t01=0x006a}
0x021a…0224 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x008e}
0x0224…0250 Head {h00=0x0028, h01=0x0050, text=»* - TACTOT = ACTIVATE/RESTART TASK«, t00=0x0001, t01=0x0098}
0x0250…025a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00c4}
0x025a…0270 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0001, t01=0x00ce}
0x0270…027a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00e4}
0x027a…0284 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x00ee}
0x0284…0298 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x00f8}
0x0298…02ac Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0001, t01=0x010c}
0x02ac…02c0 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0001, t01=0x0120}
0x02c0…02ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0134}
0x02ca…02d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x013e}
0x02d4…02f8 Head {h00=0x0020, h01=0x0050, text=» ENTRY TWAIT WAIT PROCESSOR «, t00=0x0001, t01=0x0148}
0x02f8…0326 Head {h00=0x002a, h01=0x0050, text=» ENTRY TMWAIT MULTIPLE WAIT PROCESSOR «, t00=0x0001, t01=0x016c}
0x0326…0356 Head {h00=0x002c, h01=0x0050, text=» ENTRY TACTOT ACTIVATE/RESTART PROCESSOR«, t00=0x0002, t01=0x000a}
0x0356…036c Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0002, t01=0x003a}
0x036c…0376 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x0050}
0x0376…0380 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x005a}
0x0380…0396 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0064}
0x0396…03ac Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0002, t01=0x007a}
0x03ac…03c2 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0002, t01=0x0090}
0x03c2…03cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00a6}
0x03cc…03d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0002, t01=0x00b0}
0x03d6…03f6 Head {h00=0x001c, h01=0x0050, text=» EXTRN TDISP DISPATCHER «, t00=0x0002, t01=0x00ba}
0x03f6…0426 Head {h00=0x002c, h01=0x0050, text=» EXTRN QTJOB QUEUE TASK FOR DISPATCHING «, t00=0x0002, t01=0x00da}
0x0426…0454 Head {h00=0x002a, h01=0x0050, text=» EXTRN LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0002, t01=0x010a}
0x0454…0484 Head {h00=0x002c, h01=0x0050, text=» EXTRN ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0002, t01=0x0138}
0x0484…04ac Head {h00=0x0024, h01=0x0050, text=» EXTRN LKMRQE LKM REQUEST ERROR «, t00=0x0002, t01=0x0168}
0x04ac…04e2 Head {h00=0x0032, h01=0x0050, text=» EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE «, t00=0x0002, t01=0x0190}
0x04e2…0516 Head {h00=0x0030, h01=0x0050, text=» EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID«, t00=0x0003, t01=0x0036}
0x0516…053a Head {h00=0x0020, h01=0x0050, text=» EXTRN TTB:SA TTAB SAVE AREA«, t00=0x0003, t01=0x006a}
0x053a…055a Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0003, t01=0x008e}
0x055a…057c Head {h00=0x001e, h01=0x0050, text=» EXTRN DWTTAB TTAB ADDRESS«, t00=0x0003, t01=0x00ae}
0x057c…05aa Head {h00=0x002a, h01=0x0050, text=» EXTRN DWTWAT WAIT/ACTIVATE INDICATOR «, t00=0x0003, t01=0x00d0}
0x05aa…05c0 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0003, t01=0x00fe}
0x05c0…05ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0114}
0x05ca…05d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x011e}
0x05d4…0606 Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x0128}
0x0606…0610 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x015a}
0x0610…062e Head {h00=0x001a, h01=0x0050, text=»* CONDITIONAL ASSEMBLY«, t00=0x0003, t01=0x0164}
0x062e…0638 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0182}
0x0638…066a Head {h00=0x002e, h01=0x0050, text=»***************************************** «, t00=0x0003, t01=0x018c}
0x066a…0674 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x002e}
0x0674…06a6 Head {h00=0x002e, h01=0x0050, text=»* A PROGRAM VERSION USING TOSS MMU PAGING «, t00=0x0004, t01=0x0038}
0x06a6…06d4 Head {h00=0x002a, h01=0x0050, text=»* IS OBTAINED BY SETTING MMUPAG EQU 1.«, t00=0x0004, t01=0x006a}
0x06d4…06de Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0098}
0x06de…06f2 Head {h00=0x0010, h01=0x0050, text=»MMUPAG EQU 1«, t00=0x0004, t01=0x00a2}
0x06f2…06fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00b6}
0x06fc…0712 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0004, t01=0x00c0}
0x0712…071c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00d6}
0x071c…0726 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x00e0}
0x0726…0736 Head {h00=0x000c, h01=0x0050, text=»********«, t00=0x0004, t01=0x00ea}
0x0736…0746 Head {h00=0x000c, h01=0x0050, text=»* WAIT *«, t00=0x0004, t01=0x00fa}
0x0746…0756 Head {h00=0x000c, h01=0x0050, text=»********«, t00=0x0004, t01=0x010a}
0x0756…0760 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x011a}
0x0760…076a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x0124}
0x076a…0796 Head {h00=0x0028, h01=0x0050, text=»* THIS IS THE WAIT LKM PROCESSOR. «, t00=0x0004, t01=0x012e}
0x0796…07a0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0004, t01=0x015a}
0x07a0…07d0 Head {h00=0x002c, h01=0x0050, text=»* THIS MODULE IS ENTERED WHEN THE TASK«, t00=0x0004, t01=0x0164}
0x07d0…080a (5, 0, 400) Head {h00=0x0036, h01=0x0050, text=»* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. «, t00=0x0005, t01=0x0004}
0x080a…0814 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x003e}
0x0814…0842 Head {h00=0x002a, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0005, t01=0x0048}
0x0842…086c Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:«, t00=0x0005, t01=0x0076}
0x086c…0876 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00a0}
0x0876…0894 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0005, t01=0x00aa}
0x0894…08b0 Head {h00=0x0018, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x0005, t01=0x00c8}
0x08b0…08ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00e4}
0x08ba…08c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x00ee}
0x08c4…08f2 Head {h00=0x002a, h01=0x0050, text=»TWAIT CF A15,FNDDWT SEARCH DWT ADDRESS«, t00=0x0005, t01=0x00f8}
0x08f2…090a Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x0005, t01=0x0126}
0x090a…0934 Head {h00=0x0026, h01=0x0050, text=» RF(Z) TP:RQE FILE CODE NOT FOUND «, t00=0x0005, t01=0x013e}
0x0934…093e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0168}
0x093e…0954 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x0005, t01=0x0172}
0x0954…0982 Head {h00=0x002a, h01=0x0050, text=» LDR* A1,A8 RETURN IF EVENT COMPLETED «, t00=0x0005, t01=0x0188}
0x0982…098e Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0006, t01=0x0026}
0x098e…0998 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0032}
0x0998…09ae Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x0006, t01=0x003c}
0x09ae…09da Head {h00=0x0028, h01=0x0050, text=» ELR A1,A8 RETURN IF EVENT COMPLETED«, t00=0x0006, t01=0x0052}
0x09da…09e6 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x0006, t01=0x007e}
0x09e6…09f0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x008a}
0x09f0…0a1c Head {h00=0x0028, h01=0x0050, text=» RF(N) TP:QDI I/O ALREADY COMPLETED «, t00=0x0006, t01=0x0094}
0x0a1c…0a50 Head {h00=0x0030, h01=0x0050, text=» IM DWTWAT,A6 NO, SET WAIT INDICATOR IN DWT «, t00=0x0006, t01=0x00c0}
0x0a50…0a5a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00f4}
0x0a5a…0a84 Head {h00=0x0026, h01=0x0050, text=»T:DISP ABL TDISP GO TO DISPATCHER «, t00=0x0006, t01=0x00fe}
0x0a84…0a8e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0128}
0x0a8e…0aa4 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0006, t01=0x0132}
0x0aa4…0aae Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0148}
0x0aae…0ab8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0152}
0x0ab8…0aca Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0006, t01=0x015c}
0x0aca…0adc Head {h00=0x000e, h01=0x0050, text=»* TACTOT *«, t00=0x0006, t01=0x016e}
0x0adc…0aee Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0006, t01=0x0180}
0x0aee…0af8 (7, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0004}
0x0af8…0b02 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x000e}
0x0b02…0b3e Head {h00=0x0038, h01=0x0050, text=»* THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR.«, t00=0x0007, t01=0x0018}
0x0b3e…0b48 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0054}
0x0b48…0b80 Head {h00=0x0034, h01=0x0050, text=»* THIS MODULE IS ENTERED FROM THE LKM HANDLER «, t00=0x0007, t01=0x005e}
0x0b80…0bac Head {h00=0x0028, h01=0x0050, text=»* WHEN A TASK HAS TO BE ACTIVATED.«, t00=0x0007, t01=0x0096}
0x0bac…0bb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x00c2}
0x0bb6…0bea Head {h00=0x0030, h01=0x0050, text=»* THE FOLLOWING PARAMETERS ARE SUPPLIED:- «, t00=0x0007, t01=0x00cc}
0x0bea…0bf4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0007, t01=0x0100}
0x0bf4…0c20 Head {h00=0x0028, h01=0x0050, text=»* A1 = PARAMETER WHEN A4 NOT ZERO «, t00=0x0007, t01=0x010a}
0x0c20…0c58 Head {h00=0x0034, h01=0x0050, text=»* A4 = START ADDRESS AT ACTIVATION, ELSE ZERO «, t00=0x0007, t01=0x0136}
0x0c58…0c6e Head {h00=0x0012, h01=0x0050, text=»* A5 = TTAB «, t00=0x0007, t01=0x016e}
0x0c6e…0ca6 Head {h00=0x0034, h01=0x0050, text=»* A7 = IDENTIFICATION FOR TASK TO BE ACTIVATED«, t00=0x0007, t01=0x0184}
0x0ca6…0cb0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x002c}
0x0cb0…0cba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0036}
0x0cba…0cce Head {h00=0x0010, h01=0x0050, text=»TACTOT EQU *«, t00=0x0008, t01=0x0040}
0x0cce…0cf6 Head {h00=0x0024, h01=0x0050, text=» CF A15,FNDTID FIND TTAB ADDRESS«, t00=0x0008, t01=0x0054}
0x0cf6…0d0e Head {h00=0x0014, h01=0x0050, text=» ADK A2,0 SET CR«, t00=0x0008, t01=0x007c}
0x0d0e…0d36 Head {h00=0x0024, h01=0x0050, text=» RF(Z) TP:RQE TASK NOT IN SYSTEM«, t00=0x0008, t01=0x0094}
0x0d36…0d6e Head {h00=0x0034, h01=0x0050, text=» CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING«, t00=0x0008, t01=0x00bc}
0x0d6e…0d9c Head {h00=0x002a, h01=0x0050, text=» LD A3,TTB:SA+6,A5 GET SEGMENT NUMBER «, t00=0x0008, t01=0x00f4}
0x0d9c…0dae Head {h00=0x000e, h01=0x0050, text=» LDR A5,A2«, t00=0x0008, t01=0x0122}
0x0dae…0dc0 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0008, t01=0x0134}
0x0dc0…0df4 Head {h00=0x0030, h01=0x0050, text=» RF(Z) TP:QDI RESTART: QUEUE FOR DISPATCHING«, t00=0x0008, t01=0x0146}
0x0df4…0e22 Head {h00=0x002a, h01=0x0050, text=» ABL ACTDIS ACTIVATE TASK AND DISPATCH«, t00=0x0008, t01=0x017a}
0x0e22…0e2c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0018}
0x0e2c…0e42 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0009, t01=0x0022}
0x0e42…0e4c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0038}
0x0e4c…0e56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0042}
0x0e56…0e68 Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x004c}
0x0e68…0e7a Head {h00=0x000e, h01=0x0050, text=»* TMWAIT *«, t00=0x0009, t01=0x005e}
0x0e7a…0e8c Head {h00=0x000e, h01=0x0050, text=»**********«, t00=0x0009, t01=0x0070}
0x0e8c…0e96 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0082}
0x0e96…0ea0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x008c}
0x0ea0…0ed4 Head {h00=0x0030, h01=0x0050, text=»* THIS IS THE MULTIPLE WAIT LKM PROCESSOR.«, t00=0x0009, t01=0x0096}
0x0ed4…0ede Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00ca}
0x0ede…0f0c Head {h00=0x002a, h01=0x0050, text=»* IT IS ENTERED FROM THE LKM HANDLER«, t00=0x0009, t01=0x00d4}
0x0f0c…0f36 Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:«, t00=0x0009, t01=0x0102}
0x0f36…0f40 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x012c}
0x0f40…0f5e Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0009, t01=0x0136}
0x0f5e…0f7e Head {h00=0x001c, h01=0x0050, text=»* A7 = ECBBLK ADDRESS «, t00=0x0009, t01=0x0154}
0x0f7e…0f88 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0174}
0x0f88…0fc2 Head {h00=0x0036, h01=0x0050, text=»* WHEN ONE OF THE SPECIFIED EVENTS IS COMPLETED,«, t00=0x0009, t01=0x017e}
0x0fc2…0ffc Head {h00=0x0036, h01=0x0050, text=»* RETURN IS MADE TO THE CALLING TASK VIA TENDIO «, t00=0x000a, t01=0x0028}
0x0ffc…1026 Head {h00=0x0026, h01=0x0050, text=»* WITH THE FOLLOWING PARAMETERS:«, t00=0x000a, t01=0x0062}
0x1026…1030 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x008c}
0x1030…1060 Head {h00=0x002c, h01=0x0050, text=»* A8 = ECB ADDRESS OF COMPLETED EVENT «, t00=0x000a, t01=0x0096}
0x1060…106a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c6}
0x106a…10ac Head {h00=0x003e, h01=0x0050, text=»* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO).«, t00=0x000a, t01=0x00d0}
0x10ac…10b6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0112}
0x10b6…10e2 Head {h00=0x0028, h01=0x0050, text=»* NOTICE THAT ALL EVENTS MUST HAVE«, t00=0x000a, t01=0x011c}
0x10e2…110e Head {h00=0x0028, h01=0x0050, text=»* BEEN ISSUED IN THE NO WAIT MODE.«, t00=0x000a, t01=0x0148}
0x110e…1118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0174}
0x1118…1122 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x017e}
0x1122…1138 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x000a, t01=0x0188}
0x1138…1142 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x000e}
0x1142…114c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0018}
0x114c…1174 Head {h00=0x0024, h01=0x0050, text=»TMWAIT EQU * MULTIPLE WAIT ENTRY«, t00=0x000b, t01=0x0022}
0x1174…1186 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x000b, t01=0x004a}
0x1186…1190 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x005c}
0x1190…11a6 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000b, t01=0x0066}
0x11a6…11d4 Head {h00=0x002a, h01=0x0050, text=» LDR* A1,A7 GET NO OF ECB:S IN ECBBLK «, t00=0x000b, t01=0x007c}
0x11d4…11e0 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x00aa}
0x11e0…11ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00b6}
0x11ea…1200 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000b, t01=0x00c0}
0x1200…122c Head {h00=0x0028, h01=0x0050, text=» ELR A1,A7 GET NO OF ECB:S IN ECBBLK«, t00=0x000b, t01=0x00d6}
0x122c…1238 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000b, t01=0x0102}
0x1238…1242 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x010e}
0x1242…126e Head {h00=0x0028, h01=0x0050, text=» RF(NP) TP:RQE REQUEST ERROR IF <= 0«, t00=0x000b, t01=0x0118}
0x126e…1278 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x0144}
0x1278…128c Head {h00=0x0010, h01=0x0050, text=»TMW:10 EQU *«, t00=0x000b, t01=0x014e}
0x128c…12c2 Head {h00=0x0032, h01=0x0050, text=» ADK A7,2 POINT TO NEXT ECB ADDRESS IN ECBBLK «, t00=0x000b, t01=0x0162}
0x12c2…12cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0008}
0x12cc…12e2 Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=0 «, t00=0x000c, t01=0x0012}
0x12e2…1306 Head {h00=0x0020, h01=0x0050, text=» LDR* A8,A7 GET ECB ADDRESS «, t00=0x000c, t01=0x0028}
0x1306…1330 Head {h00=0x0026, h01=0x0050, text=» LDR* A2,A8 GET FIRST WORD OF ECB «, t00=0x000c, t01=0x004c}
0x1330…133c Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x0076}
0x133c…1346 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0082}
0x1346…135c Head {h00=0x0012, h01=0x0050, text=» IFT MMUPAG=1 «, t00=0x000c, t01=0x008c}
0x135c…137e Head {h00=0x001e, h01=0x0050, text=» ELR A8,A7 GET ECB ADDRESS«, t00=0x000c, t01=0x00a2}
0x137e…13a6 Head {h00=0x0024, h01=0x0050, text=» ELR A2,A8 GET FIRST WORD OF ECB«, t00=0x000c, t01=0x00c4}
0x13a6…13b2 Head {h00=0x0008, h01=0x0050, text=» XIF«, t00=0x000c, t01=0x00ec}
0x13b2…13bc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x00f8}
0x13bc…13e8 Head {h00=0x0028, h01=0x0050, text=» RF(N) TMW:30 I/O ALREADY COMPLETED «, t00=0x000c, t01=0x0102}
0x13e8…1424 Head {h00=0x0038, h01=0x0050, text=» CF A15,FNDDWT NO, SEARCH DWT ADDRESS FROM FILE CODE«, t00=0x000c, t01=0x012e}
0x1424…143c Head {h00=0x0014, h01=0x0050, text=» ADK A6,0 SET CR«, t00=0x000c, t01=0x016a}
0x143c…145c Head {h00=0x001c, h01=0x0050, text=» RF(Z) TP:RQE NOT FOUND «, t00=0x000c, t01=0x0182}
0x145c…1466 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0012}
0x1466…147c Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x000d, t01=0x001c}
0x147c…1486 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0032}
0x1486…1490 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x003c}
0x1490…14b6 Head {h00=0x0022, h01=0x0050, text=» LD A2,DWTST,A6 GET DWT STATUS«, t00=0x000d, t01=0x0046}
0x14b6…14d4 Head {h00=0x001a, h01=0x0050, text=» RF(N) TP:RQE NOT BUSY«, t00=0x000d, t01=0x006c}
0x14d4…14ec Head {h00=0x0014, h01=0x0050, text=» CW A5,DWTTAB,A6«, t00=0x000d, t01=0x008a}
0x14ec…1522 Head {h00=0x0032, h01=0x0050, text=» RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK«, t00=0x000d, t01=0x00a2}
0x1522…1556 Head {h00=0x0030, h01=0x0050, text=» LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR«, t00=0x000d, t01=0x00d8}
0x1556…1586 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) TP:RQE REQUEST ISSUED WITH WAIT «, t00=0x000d, t01=0x010c}
0x1586…15a2 Head {h00=0x0018, h01=0x0050, text=» ORK A6,1 SET BIT 15«, t00=0x000d, t01=0x013c}
0x15a2…15d8 Head {h00=0x0032, h01=0x0050, text=» ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR «, t00=0x000d, t01=0x0158}
0x15d8…160a Head {h00=0x002e, h01=0x0050, text=» RF(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK«, t00=0x000d, t01=0x018e}
0x160a…1634 Head {h00=0x0026, h01=0x0050, text=» LDR A9,A6 SAVE FIRST DWT ADDRESS «, t00=0x000e, t01=0x0030}
0x1634…1646 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A6«, t00=0x000e, t01=0x005a}
0x1646…1650 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x006c}
0x1650…1664 Head {h00=0x0010, h01=0x0050, text=»TMW:20 EQU *«, t00=0x000e, t01=0x0076}
0x1664…16a0 Head {h00=0x0038, h01=0x0050, text=» ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE «, t00=0x000e, t01=0x008a}
0x16a0…16c8 Head {h00=0x0024, h01=0x0050, text=» LDR A9,A6 SAVE THIS DWT ADDRESS«, t00=0x000e, t01=0x00c6}
0x16c8…16da Head {h00=0x000e, h01=0x0050, text=» SUK A1,1 «, t00=0x000e, t01=0x00ee}
0x16da…1704 Head {h00=0x0026, h01=0x0050, text=» RB(P) TMW:10 MORE ECB:S IN ECBBLK«, t00=0x000e, t01=0x0100}
0x1704…1742 Head {h00=0x003a, h01=0x0050, text=» ST A3,DWTWAT,A9 NO, SET FIRST DWT ADDRESS IN THE LAST«, t00=0x000e, t01=0x012a}
0x1742…1766 Head {h00=0x0020, h01=0x0050, text=» RB T:DISP GO TO DISPATCHER «, t00=0x000e, t01=0x0168}
0x1766…1770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018c}
0x1770…1784 Head {h00=0x0010, h01=0x0050, text=»TMW:30 EQU *«, t00=0x000f, t01=0x0008}
0x1784…17bc Head {h00=0x0034, h01=0x0050, text=» ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA «, t00=0x000f, t01=0x001c}
0x17bc…17f2 Head {h00=0x0032, h01=0x0050, text=» ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR «, t00=0x000f, t01=0x0054}
0x17f2…181c Head {h00=0x0026, h01=0x0050, text=» RF(Z) TP:QDI FIRST ECB IN ECBBLK «, t00=0x000f, t01=0x008a}
0x181c…1826 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x00b4}
0x1826…1864 Head {h00=0x003a, h01=0x0050, text=»TMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR«, t00=0x000f, t01=0x00be}
0x1864…188c Head {h00=0x0024, h01=0x0050, text=» LDR* A2,A3 GET NEXT DWT ADDRESS«, t00=0x000f, t01=0x00fc}
0x188c…18b0 Head {h00=0x0020, h01=0x0050, text=» RF(Z) TP:QDI NO MORE DWT:S «, t00=0x000f, t01=0x0124}
0x18b0…18d4 Head {h00=0x0020, h01=0x0050, text=» CMR A3 SET TO NO WAIT AGAIN«, t00=0x000f, t01=0x0148}
0x18d4…18e6 Head {h00=0x000e, h01=0x0050, text=» LDR A3,A2«, t00=0x000f, t01=0x016c}
0x18e6…18f8 Head {h00=0x000e, h01=0x0050, text=» RB TMW:40«, t00=0x000f, t01=0x017e}
0x18f8…1902 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0190}
0x1902…1918 Head {h00=0x0012, h01=0x0050, text=» EJECT TPROC«, t00=0x0010, t01=0x000a}
0x1918…1922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x0020}
0x1922…192c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x002a}
0x192c…1940 Head {h00=0x0010, h01=0x0050, text=»TP:RQE EQU *«, t00=0x0010, t01=0x0034}
0x1940…1966 Head {h00=0x0022, h01=0x0050, text=» ABL LKMRQE LKM REQUEST ERROR «, t00=0x0010, t01=0x0048}
0x1966…1970 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x006e}
0x1970…1984 Head {h00=0x0010, h01=0x0050, text=»TP:QDI EQU *«, t00=0x0010, t01=0x0078}
0x1984…19b0 Head {h00=0x0028, h01=0x0050, text=» ABL LKMQDI QUEUE TASK AND DISPATCH «, t00=0x0010, t01=0x008c}
0x19b0…19ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00b8}
0x19ba…19c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00c2}
0x19c4…19ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0010, t01=0x00cc}
0x19ce…19da Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x0010, t01=0x00d6}
0x19da…19de Head {h00=0x4004, h01=0x0000}
0x19de…19e2 00 10 00 e2 ┆ ┆
0x19e2…19ea (17, 1, 8) 20 04 00 00 00 11 00 04 ┆ ┆
0x19ea…1a3a (18, 0, 400) 54 4f 54 59 50 45 20 4e 41 4d 45 20 00 19 01 80 00 38 00 50 55 50 4e 55 4d 42 5c 45 51 55 5c 37 5c 53 41 56 45 20 41 52 45 41 20 4e 55 4d 42 45 52 20 4f 46 20 43 4f 50 49 45 53 20 28 53 48 41 44 4f 57 2d 54 42 4c 29 00 1a 00 14 00 06 00 50 ┆TOTYPE NAME 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) P┆
0x1a3a…1a8a 2a 20 00 1a 00 50 00 2e 00 50 55 52 3a 52 45 43 5c 45 51 55 5c 36 5c 52 45 43 4f 52 44 20 4c 45 4e 47 54 48 20 49 4e 20 52 45 41 4c 20 55 3a 42 54 41 42 20 00 1a 00 5a 00 2a 00 50 55 52 41 44 44 52 5c 45 51 55 5c 32 5c 41 44 44 52 45 53 53 ┆* P . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB Z * PURADDR EQU 2 ADDRESS┆
0x1a8a…1ada 20 54 4f 20 46 49 52 53 54 20 52 45 41 4c 20 55 57 42 00 1a 00 8c 00 20 00 50 55 52 4e 55 4d 42 5c 45 51 55 5c 34 5c 4e 55 4d 42 45 52 20 4f 46 20 55 57 42 27 53 00 1a 00 ba 00 1e 00 50 55 52 4c 45 4e 47 5c 45 51 55 5c 36 5c 4c 45 4e 47 54 ┆ TO FIRST REAL UWB PURNUMB EQU 4 NUMBER OF UWB'S PURLENG EQU 6 LENGT┆
0x1ada…1b2a 48 20 4f 46 20 55 57 42 00 1a 00 de 00 0a 00 50 5c 45 4a 45 43 54 00 1a 01 00 00 08 00 50 5c 5c 5c 5c 00 1a 01 0e 00 08 00 50 5c 5c 5c 5c 00 1a 01 1a 00 08 00 50 5c 5c 5c 5c 00 1a 01 26 00 24 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆H OF UWB P EJECT P P P & $ P**************┆
0x1b2a…1b7a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1a 01 32 00 24 00 50 2a 20 43 4f 4e 46 49 47 55 52 41 54 49 4f 4e 20 46 49 4c 45 20 28 43 4f 4e 46 49 47 29 20 2a 20 00 1a 01 5a 00 24 00 50 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a ┆***************** 2 $ P* CONFIGURATION FILE (CONFIG) * Z $ P**************┆
0x1b7a…1bca (19, 0, 400) 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 2a 20 00 1a 01 82 00 08 00 50 5c 5c 5c 20 00 1b 00 1a 00 1c 00 50 2a 20 54 41 53 4b 20 44 45 46 49 4e 49 54 49 4f 4e 20 42 4c 4f 43 4b 3a 00 1b 00 26 00 1e 00 50 54 44 42 42 54 5c 45 51 55 5c ┆***************** P P* TASK DEFINITION BLOCK: & PTDBBT EQU ┆
0x1bca…1c1a 30 5c 31 41 20 42 4c 4f 43 4b 20 54 59 50 45 20 00 1b 00 46 00 28 00 50 54 44 42 4e 54 5c 45 51 55 5c 54 44 42 42 54 2b 31 5c 32 4e 20 4e 55 4d 42 45 52 20 4f 46 20 54 41 53 4b 53 00 1b 00 68 00 2c 00 50 54 44 42 49 44 5c 45 51 55 5c 54 44 ┆0 1A BLOCK TYPE F ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS h , PTDBID EQU TD┆
0x1c1a…1c6a 42 4e 54 2b 32 5c 36 41 20 54 41 53 4b 20 49 44 20 53 54 41 52 54 20 56 41 4c 55 45 00 1b 00 94 00 2c 00 50 54 44 42 4d 43 5c 45 51 55 5c 54 44 42 49 44 2b 36 5c 36 41 20 4d 41 54 43 48 49 4e 47 20 54 41 53 4b 20 43 4c 41 53 53 00 1b 00 c4 ┆BNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS ┆
0x1c6a…1cba 00 24 00 50 54 44 42 54 4c 5c 45 51 55 5c 54 44 42 4d 43 2b 36 5c 36 41 20 54 41 53 4b 20 4c 45 56 45 4c 20 00 1b 00 f4 00 3a 00 50 54 44 42 4e 43 5c 45 51 55 5c 54 44 42 54 4c 2b 36 5c 32 4e 20 4e 55 4d 42 45 52 20 4f 46 20 54 45 52 4d 49 ┆ $ PTDBTL EQU TDBMC+6 6A TASK LEVEL : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMI┆
0x1cba…1d0a 4e 41 4c 20 44 45 56 49 43 45 20 43 4c 41 53 53 45 53 00 1b 01 1c 00 06 00 50 2a 20 00 1b 01 5a 00 26 00 50 54 44 42 46 53 54 5c 45 51 55 5c 54 44 42 4e 43 2b 32 5c 46 49 52 53 54 20 54 45 52 4d 20 44 45 46 20 00 1b 01 64 00 24 00 50 54 44 ┆NAL DEVICE CLASSES P* Z & PTDBFST EQU TDBNC+2 FIRST TERM DEF d $ PTD┆
0x1d0a…1d5a (20, 0, 400) 43 5c 45 51 55 5c 37 5c 54 45 52 4d 49 4e 41 4c 20 44 45 56 49 43 45 20 43 4c 41 53 53 20 00 1b 01 8e 00 1e 00 50 54 4c 43 5c 45 51 55 5c 36 5c 4c 49 4e 45 20 43 4f 4e 4e 45 43 54 49 4f 4e 20 00 1c 00 26 00 28 00 50 54 44 42 52 45 43 5c 45 ┆C EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION & ( PTDBREC E┆
0x1d5a…1daa 51 55 5c 54 44 43 2b 54 4c 43 5c 54 44 42 2d 52 45 43 4f 52 44 20 4c 45 4e 47 54 48 00 1c 00 48 00 06 00 50 2a 20 00 1c 00 74 00 2a 00 50 53 44 43 5c 45 51 55 5c 37 5c 53 50 45 43 49 41 4c 20 44 45 56 49 43 45 20 43 4c 41 53 53 2d 52 45 43 ┆QU TDC+TLC TDB-RECORD LENGTH H P* t * PSDC EQU 7 SPECIAL DEVICE CLASS-REC┆
0x1daa…1dfa 4f 52 44 20 00 1c 00 7e 00 06 00 50 2a 20 00 1c 00 ac 00 20 00 50 2a 20 43 4f 4d 4d 4f 4e 20 44 45 56 49 43 45 20 44 45 46 2e 20 42 4c 4f 43 4b 3a 20 00 1c 00 b6 00 1e 00 50 43 44 42 42 54 5c 45 51 55 5c 30 5c 31 41 20 42 4c 4f 43 4b 20 54 ┆ORD ~ P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK T┆
0x1dfa…1e4a 59 50 45 20 00 1c 00 da 00 36 00 50 43 44 42 4e 43 5c 45 51 55 5c 43 44 42 42 54 2b 31 5c 32 4e 20 4e 55 4d 42 45 52 20 4f 46 20 53 50 45 43 2e 20 44 45 56 2e 20 43 4c 41 53 53 45 53 20 00 1c 00 fc 00 28 00 50 53 44 43 46 53 54 5c 45 51 55 ┆YPE 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES ( PSDCFST EQU┆
0x1e4a…1e9a 5c 43 44 42 4e 43 2b 32 5c 46 49 52 53 54 20 53 44 43 2d 52 45 43 4f 52 44 20 00 1c 01 36 00 06 00 50 2a 20 00 1c 01 62 00 06 00 50 2a 20 00 1c 01 6c 00 26 00 50 2a 20 55 53 45 52 20 57 4f 52 4b 20 42 4c 4f 43 4b 20 54 59 50 45 20 44 45 46 ┆ CDBNC+2 FIRST SDC-RECORD 6 P* b P* l & P* USER WORK BLOCK TYPE DEF┆