|
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: 20016 (0x4e30)
Notes: pts_type(SC)
Names: »MSUBS.SC«
└─⟦c47f25c27⟧ Bits:30009688 Philips computer tape "600318"
└─⟦this⟧ »M:KMDV/MSUBS.SC«
└─⟦efe3a1cfc⟧ Bits:30009667 Philips computer tape "600113"
└─⟦this⟧ »TOSSWORK/MSUBS.SC«
└─⟦fcfed1ed9⟧ Bits:30009706 Philips computer tape "M_167"
└─⟦this⟧ »M:167D/MSUBS.SC«
IDENT MSUBS REL 8.2 78-09-15 870105040820 SWLXY INCLUDED REL 8.1 78-04-21 * ************************************************** * * PHILIPS TERMINAL SYSTEM PTS * * MSUBS = MONITOR SUBROUTINES * * * * * * ************************************************** * * THIS MODULE CONTAINS THE FOLLOWING MONITOR * SUBROUTINES: * * -SAVE8 SAVE 8 REGISTERS ON STACK * -QTJOB QUEUE TERMINAL JOB FOR DISPATCHING * -QMJOB QUEUE MONITOR JOB FOF DISPATCHING * -ACTOT ACTIVATE TERMINAL PROGRAM ON FIFO BASIS * -ACTOTP ACTIVATE TERMINAL PROGRAM ON LIFO BASIS * -EXIT PROGRAM EXIT * -GETBLK GET A FREE MONITOR BLOCK * -FREBLK SET A MONITOR BLOCK FREE * -FNDDWT FIND DWT ADDRESS * -FNDTID FIND TERMINAL IDENTIFICATION * -TABIO ABORT I/O WITH ACTIVATION * -TENDIO END I/O * -PFINIT RESTAR DEVICE * -SWL48 SWITCH TO LEVEL 48 * -SWLXY SWITCH TO LEVEL XY * -HALT HALT MODULE EJECT * *********** * ENTRIES * *********** * * ENTRY SAVE8 SAVE 8 REGISTERS ENTRY QTJOB QUEUE TERMINAL JOB ENTRY QMJOB QUEUE MONITOR JOB ENTRY ACTOT ACTIVATE TERMINAL ENTRY EXIT PROGRAM EXIT ENTRY GETBLK GET BLOCK ENTRY FREBLK SET BLOCK FREE ENTRY FNDDWT FIND DWT ENTRY FNDTID FIND TERMINAL INDENTIFICATION ENTRY TABIO ABORT I/O WITH ACTIVATION ENTRY TENDIO END I/O ENTRY PFINIT RESTART DEVICE ENTRY SWL48 SWITCH TO LEVEL 48 ENTRY SWLXY SWITCH TO LEVEL XY ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE ENTRY INTSAV SAVE AREA LAST INTERRUPT ENTRY HALT HALT-MODULE EJECT * * * ENTRIES TO RESTORE REGISTERS A8-A1 WITHOUT * ENEABLE INTERRUPTS * * ENTRY IHRET8 RESTORE FROM A8 ENTRY IHRET7 A7 ENTRY IHRET6 A6 ENTRY IHRET5 A5 ENTRY IHRET4 A4 ENTRY IHRET3 A3 ENTRY IHRET2 A2 ENTRY IHRET1 A1 ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS EJECT * ************* * EXTERNALS * ************* * * EXTRN DISQUE POINTER TO FIRST PLACE IN DISPATCHER QUEUE EXTRN TTMJOB TTAB-ADDRESS OF MJOB EXTRN TTB:ST TERMINAL STATUS AND PRIORITY LEVEL EXTRN TTB:ID TERMINAL IDENTIFICATION EXTRN TTB:SA SAVE AREA EXTRN TTB:PP POINTER TO PENDING QUEUE EXTRN TTB:TD TERMINAL DEVICE TABLE EXTRN RETUR8 EXTRN FREQUE POINTER TO FIRST FREE MONITOR BLOCK EXTRN DWTST DWT STATUS EXTRN DWTADR -DRIVER ENTRY EXTRN DWTWAT -WAIT/ACTIVATE INDICATOR EXTRN DWTECB -ECB ADDRESS EXTRN DWTTQ =ADDRESS TO TTAB ON QUEUE EXTRN DWTTAB -TTAB ADDRESS EXTRN DWTTDM DM TASK TTAB ADDRESS EXTRN TCTAB TERMINAL CONTROL TABLE EXTRN CDTAB COMMON DEVICE TABLE EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED EXTRN TTB:SP,TTB:SS EXTRN RTNA15 RETURN AND ENABLE EXTRN TIODM,CHKIND,REQEND DM-ENTRIES * * SOP EQU /2E SOP DEVICE ADDRESS EJECT * * * S A V E 8 * * SUBROUTINE TO SAVE 8 REGISTERS ON STACK * WITHOUT ENABLING INTERRUPTS. * * SAVE8 EQU * INH INHIBIT INTERRUPTS STR A3,A15 STR A4,A15 STR A5,A15 STR A6,A15 STR A7,A15 STR A8,A15 LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) ST A3,SAVE81 AND MODIFY BRANCH ADDRESS ST A2,14,A15 ST A1,16,A15 LD A3,12,A15 RESTORE A3 ABL 0 THIS IS USED TO BRANCH BACK SAVE81 EQU *-2 * EJECT * * * Q T J O B * * SUBROUTINE TO QUEUE TERMINAL JOB FOR DISPATCHING * ENTRY PARAMETER:- * * A5 = TTAB-ADDRESS OF PROGRAM TO BE QUEUED. * * THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON * PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS * PUT LAST IN QUEUE. * * * QTJOB EQU * INH STR A1,A15 SAVE A1-A3 ON STACK STR A2,A15 STR A3,A15 LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS LC A3,TTB:ST+1,A5 LOAD LEVEL TO BE QUEUED QTJ010 LDR A2,A1 SAVE LAST ADDRESS LDR* A1,A1 FOLLOW THE THREAD RF(Z) QTJ020 END QUEUE FOUND CC A3,TTB:ST+1,A1 COMPARE LEVELS RB(NL) QTJ010 TRY NEXT QTJ020 STR A1,A5 INSET IN QUEUE STR A5,A2 ABL IHRET3 EJECT * * * Q M J O B * * SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49 * ENTRY PARAMETERS:- * * A1 = PARAMETER * * A2 = DISPATCH ADDRESS * * A5 IS SET TO TTAB-ADDRESS OF MONITORJOBS AND THE * SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE * JOB. * * * QMJOB EQU * CF A15,SAVE8 LDKL A5,TTMJOB SET TTAB-ADDRESS LDK A3,0 RF ACT02 AND GO TO ACTOT EJECT * * * A C T O T , A C T O T P * * SUBROUTINE TO ACTIVATE A TERMINAL PROGRAM. * ENTRY PARAMETERS:- * * A1 = PARAMETER * A2 = DISPATCH ADDRESS * A3 = SEGMENT POINTER * A5 = TTAB-ADDRESS * A7 = ABORT PARAMETER, 0 IF NO ABORTION OF I/O * * - IF REQUESTED PROGRAM IS NOT ACTIVE THE PROGRAM IS * PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. * - IF PROGRAM IS ACTIVE, THE REQUEST IS PUT IN A PENDING * QUEUE. * - ACTOT WILL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS * - ACTOTP WILL PUT REQUEST IN PENDING QUEUE ON LIFO BASIS * * ACTOTP EQU * CF A15,SAVE8 SAVE REGISTERS LDK A6,1 INDICATE LIFO RF ACT03 ACTOT EQU * CF A15,SAVE8 SAVE REGISTERS ACT02 LDK A6,0 INDICATE FIFO PENDING QUEUING ACT03 EQU * LD A4,TTB:SA,A5 IS PROGRAM ACTIVE? RF(NZ) ACT020 YES, PUT IN PENDING QUEUE LDR A3,A3 RF(E) ACT05 LD A4,2,A3 LOAD ADDRESS ADR A2,A4 ST A4,TTB:SS,A5 LAST SEGMENT START ACT05 ST A2,TTB:SA,A5 DISPATCH ADDRESS ST A3,TTB:SP,A5 SEGMENT POINTER ST A1,TTB:SA+2,A5 AND PARAMETER LD A4,TTB:ID,A5 SET TERMINAL ID ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA ST A7,TTB:SA+14,A5 TO A7 IN SAVE AREA CF A15,QTJOB AND QUEUE THE JOB ACT010 ABL IHRET8 EJECT * * * PUT REQUEST IN PENDING QUEUE. * ACT020 CF A15,GETBLK GET A FREE BLOCK LDR A2,A4 LDR A1,A7 ABORT PARAMETER CF A15,GETBLK ADKL A5,TTB:PP ACT030 LDR A3,A5 SAVE ADDRESS LDR* A5,A5 FOLLOW THE QUEUE THREAD LDR A6,A6 QUEUE ON FIFO BASIS? RF(NZ) ACT040 NO, PUT FIRST IN QUEUE LDR A5,A5 END OF QUEUE? RB(NZ) ACT030 NO, TRY NEXT! ACT040 EQU * STR A4,A3 SET BLOCK IN QUEUE STR A5,A4 RB ACT010 EJECT * * * E X I T * * SUBROUTINE TO SET A PROGRAM FREE AND QUEUE FIRST * PENDING PROGRAM * * ENTRY PARAMETER:- * * A5 = TTAB-ADDRESS * REGISTERS A3 AND A4 ARE LOST * EXIT EQU * INH CM TTB:SA,A5 RESET PROGRAM COUNTER LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER RF(Z) EXT010 NO PENDING PROGRAM LDR* A3,A4 GET QUEUE THREAD ST A3,TTB:PP,A5 AND SAVE IN PENDING POINTER CF A15,FREBLK RELEASE BLOCK AND GET PARAMS LDR A7,A1 ABORT PARAMETER LDR A4,A2 CF A15,FREBLK CF A15,ACTOT ACTIVATE TERMINAL EXT010 RF GBL020 EJECT * * * G E T B L K * * SUBROUTINE TO GET A FREE BLOCK FROM MONITOR * BLOCK POOL.REGISTERS A3-A1 ARE STORED IN FOUND * FREE BLOCK. * * EXIT PARAMETER:- * * A4 = ADDRESS TO FOUND FREE BLOCK * * * GETBLK EQU * INH STR A5,A15 SAVE A5 LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE RF(NZ) GBL010 LDK A1,/B HALT PARAMETER CF A15,HALT HALT IF ALL BLOCKS OCCUPIED GBL010 LDR* A5,A4 ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE STR A3,A4 STORE A3-A1 IN BLOCK ST A2,2,A4 ST A1,4,A4 LDR* A5,A15 RESTORE A5 GBL020 ABL IHRTN EJECT * * * F R E B L K * * SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK * AND SET THIS BLOCK FREE. * * ENTRY PARAMETER:- * * A4 = BLOCKADDRESS * * EXIT PARAMETERS:- * * A3 = FIRST PARAMETER IN BLOCK * A2 = SECOND " " * A1 = THIRD " " * * FREBLK EQU * INH LDR* A3,A4 UPDATE A3 LD A1,FREQUE STR A1,A4 ST A4,FREQUE SET BLOCK FREE LD A2,2,A4 LD A1,4,A4 ABL IHRTN EJECT * * F N D D W T * * ENTRY PARAMETERS:- * * A5 = TTAB ADDRESS * A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT * A8 = ECB ADDRESS * * EXIT PARAMETERS:- * * A2 = DWT INDEX * A6 = DWT ADDRESS IF FOUND ELSE 0 * FNDDWT STR A1,A15 SAVE A1 LDKL A6,TTB:TD ADR A6,A5 GET ADDRESS TO TERMINAL DEVICE TABLE LDR* A1,A6 GET TABLE LENGTH ADK A6,2 ADDRESS TO FIRST FILE CODE LDR* A2,A8 LOAD FILE CODE FROM ECB FND100 SUK A1,4 RF(N) FND110 FILE CODE NOT IN TTAB CC A2,1,A6 SEARCH IN DEVICE TABLE RF(NE) FND106 BRANCH IF NOT FOUND STR A1,A15 LD A1,2,A6 DWT ADDR LD A1,DWTADR,A1 DRIVER ENTRY CWK A1,TIODM RF(NE) FND200 NOT DM REQ CF A15,CHKIND CHECK INDEX IN DM DMSUBR RF FND200 INDEX OK LDR* A1,A15 FND106 EQU * ADK A6,4 ADDRESS TO NEXT FILE CODE RB FND100 TRY NEXT EJECT * * SEARCH IN COMMON DEVICE TABLE * FND110 LD A6,CDTAB CDTAB ADDRESS LDR* A1,A6 CDTAB LENGTH ADK A6,2 POINTER TO FIRST ENTRY FND120 SUK A1,4 RF(N) FND130 FILE CODE NOT FOUND CC A2,1,A6 RF(NE) FND126 FILE CODE NOT FOUND STR A1,A15 LD A1,2,A6 LD A1,DWTADR,A1 CWK A1,TIODM RF(NE) FND200 NOT DM REQ CF A15,CHKIND CHECK INDEX IN DM RF FND200 INDEX OK LDR* A1,A15 FND126 EQU * ADK A6,4 RB FND120 TRY NEXT ENTRY IN CDTAB FND130 SUR A6,A6 RF FND210 FND200 LDR* A1,A15 RESET STACK LCR A2,A6 LOAD DWT INDEX LD A6,2,A6 LOAD DWT ADDRESS FND210 RF IHRET1 EJECT * * * F N D T I D * * * SUBROUTINE TO FIND TTAB ADDRESS FROM TERMINAL IDENTIFICATION * * * ENTRY PARAMETER: * * A7 = TERMINAL IDNETIFICATION * * * EXIT PARAMETER: * * A2 = TTAB ADDRESS * A2 = 0 INDICATES ILLEGAL IDENTIFICATION * * FNDTID STR A1,A15 SAVE REG. A1 LD* A1,TCTAB TCTAB LENGTH AD A1,TCTAB FTI010 SUK A1,2 CW A1,TCTAB RF(E) FTI030 ALL TTABS EXAMINED LDR* A2,A1 TTAB ADDRESS RB(Z) FTI010 NOT IN SYSTEM CW A7,TTB:ID,A2 COMPARE IDENTIFICATIONS RB(NE) FTI010 NO MATCH. TRY NEXT FTI020 RF IHRET1 FTI030 SUR A2,A2 ILLEGAL IDENTIFICATION RF IHRET1 EJECT * * * T E N D I O , T A B I O * * * THIS MODULE IS CALLED WHEN COMPLETION OF * I/O OCCURS. * * - IF I/O AND ACTIVATION REQUEST:- * * ACTOT IS CALLED TO START THE TASK * * -IF NORMAL I/O WITH WAIT:- * * QTJOB IS CALLED TO QUEUE THE TASK * FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- * * A5 = TTAB-ADDRESS * * -IF NORMAL I/O WITH NO WAIT:- * * NO ACTION REQUIRED * * IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTECQ NOT = ZERO) * THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION * * ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- * * A1 = RETURN CODE * A6 = DWT ADDRESS * NO REGISTERS ARE DESTROYED * * N.B. THE ECB RETURN CODE IS UPDATED BY MEANS OF * AN 'ORS' INSTRUCTION * * * TABIO HAS THE SAME FUNCTION AS TENDIO EXCEPT ABORT PARAMETER A7 * WILL BE SET TO 1 BEFORE ACTOT IS CALLED IN CASE OF ACTIVATION. * (FOR TENDIO THE ABORT PARAMETER = 0) EJECT * * CHECK IF ANY TERMINAL ON QUEUE FOR THIS DEVICE * TABIO EQU * CF A15,SAVE8 SAVE REG ON STACK LDK A7,1 ABORT PARAMETER=1 RF TEN100 TENDIO EQU * CF A15,SAVE8 SAVE A1-A8 ON STACK LDK A7,0 ABORT PARAMETER=0 (NO ABORTION) TEN100 EQU * LD A5,DWTTQ,A6 ANY TASK QUEUED? RF(Z) TEN110 NO LD A2,2,A5 TASK STATUS RF(N) TEN105 DM REQUEST NEXT LDKL A2,/800 ATTACH BIT 4 AN A2,DWTST,A6 RF(Z) TEN105 DEVICE NOT ATTACHED CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK? RF(NE) TEN110 YES, DON'T QUEUE TASK TEN105 EQU * LDR* A3,A5 YES: UPDATE QUEUE ANCHOR ADDRESS ST A3,DWTTQ,A6 CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST EJECT * * * UPDATE ECB AND DWT * * TEN110 EQU * LD A5,DWTTAB,A6 GET TTAB ADDRESS FROM DWT LDKL A2,TIODM CW A2,DWTADR,A6 RF(NZ) TEN115 NO DM REQUEST LD A5,DWTTDM,A6 GET TTAB ADDRESS CF A15,REQEND RESET REQ BUSY FOR ALL FILES TEN115 EQU * LDKL A2,/8000 ORS A2,DWTST,A6 INDICATE DEVICE READY IN DWT LDKL A3,/DBFF RESET ECHO-BIT AND BITS 5,6 ANS A3,DWTST,A6 RESET ECHO-BIT IN STATUS DWT LD A3,DWTECB,A6 GET ECB ADDRESS RF(Z) TEN130 BRANCH IF ENTERED FROM ECHO OR RECOVERY ORRS A2,A3 SET EVENT COMPLETED IN ECB ORS A1,8,A3 SET RETURN CODE IN ECB CM DWTECB,A6 RESET ECB ADDRESS EJECT * * CHECK IF WAIT OR ACTIVATION * LD A4,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR RF(Z) TEN130 NOT WAIT OR ACTIVATION CWK A4,1 RF(E) TEN120 WAIT CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS RF TEN130 RETURN TEN120 EQU * CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING TEN130 EQU * EJECT * * * RESTORE REGISTERS AND RETURN WITHOUT * ENABLE INTERRUPTS * * IHRET8 LDR* A8,A15 IHRET7 LDR* A7,A15 IHRET6 LDR* A6,A15 IHRET5 LDR* A5,A15 IHRET4 LDR* A4,A15 IHRET3 LDR* A3,A15 IHRET2 LDR* A2,A15 IHRET1 LDR* A1,A15 IHRTN INH ADKL A15,4 ADJUST STACK POINTER ABR* A15 AND RETURN EJECT * * * P F I N I T * * SUBROUTINE TO RESTART DEVICES. * * ALL RESTART ROUTINES GIVEN IN TABLE 'PFTAB' ARE CALLED. * REGISTERS A1-A8 ARE AVAILABLE FOR THE RESTART ROUTINES. * * PFINIT EQU * LDK A1,2 SET INDEX TO FIRST ROUTINE PFI100 CW A1,PFTAB CHECK IF LAST RF(NL) PFI110 ALL RESTARTED STR A1,A15 SAVE A1 CFI A15,PFTAB,A1 CALL RESTART MODULE LDR* A1,A15 RESTORE A1 ADK A1,2 NEXT DEVICE RB PFI100 PFI110 RF SWLRTN RETURN WHEN ALL STARTED EJECT * * * S W L 4 8 * * SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. * * SWL48 EQU * INH STR A1,A15 LDKL A1,/C000 PSW FOR LEVEL 48 ST A1,4,A15 SAVE IT ON A15 STACK LDR* A1,A15 RESTORE A1 SWLRTN ABL RTNA15 RETURN TO CALLER AND ENB * EJECT MSUBS * * * S W L X Y * * SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO: * :=48 IF LEVEL ON STACK IS >=48 * :=XY " " " " " XY<48 * * SWLXY EQU * INH STR A1,A15 SAVE A1 LDKL A1,/7FF ANS A1,4,A15 CLEAR LEVEL TO BE SET LC A1,28,A15 GET LEVEL FROM STACK ANK A1,/FC CWK A1,/C0 LEVEL IS IN BITS 8-13 RF(NL) LEV48 LEVEL >= 48? ECR A1,A1 NO ORK A1,/C0 SET RUN AND ENABLE FLIP FLOPS (BITS 8&9) * SETLEV EQU * ORS A1,4,A15 SET NEW LEVEL ON STACK LDR* A1,A15 RESTORE A1 RTN A15 * LEV48 EQU * LEVEL WAS >= 48 LDKL A1,/C0C0 SET LEVEL TO 48 AND BITS 8&9 RB SETLEV * EJECT * * INTERRUPT SAVE AND HALT MODULE * INTSAV DATA 0 SAVA15 DATA 0 ILLINT LDK A1,5 HALT PARAMETER CF A15,HALT HALT EQU * CF A15,SAVE8 STR A9,A15 STR A10,A15 STR A11,A15 STR A12,A15 STR A13,A15 STR A14,A15 ST A15,SAVA15 OTR A1,0,SOP INDICATE TYPE OF HALT HLT END
0x0000…0034 (0, 0, 400) Head {h00=0x0030, h01=0x0050, text=» IDENT MSUBS REL 8.2 78-09-15 870105040820«, t00=0x0000, t01=0x0004}
0x0034…003c Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0038}
0x003c…0056 Head {h00=0x0016, h01=0x0050, text=» SWLXY INCLUDED «, t00=0x0000, t01=0x0040}
0x0056…0072 Head {h00=0x0018, h01=0x0050, text=» REL 8.1 78-04-21 «, t00=0x0000, t01=0x005a}
0x0072…007a Head {h00=0x0004, h01=0x0050, t00=0x0000, t01=0x0076}
0x007a…0084 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x007e}
0x0084…00be Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0088}
0x00be…00c8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00c2}
0x00c8…00f0 Head {h00=0x0024, h01=0x0050, text=»* PHILIPS TERMINAL SYSTEM PTS «, t00=0x0000, t01=0x00cc}
0x00f0…00fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x00f4}
0x00fa…0122 Head {h00=0x0024, h01=0x0050, text=»* MSUBS = MONITOR SUBROUTINES «, t00=0x0000, t01=0x00fe}
0x0122…012c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0126}
0x012c…0136 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0130}
0x0136…0140 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x013a}
0x0140…014a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0144}
0x014a…0154 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x014e}
0x0154…015e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0000, t01=0x0158}
0x015e…0198 Head {h00=0x0036, h01=0x0050, text=»**************************************************«, t00=0x0000, t01=0x0162}
0x0198…01a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x000c}
0x01a2…01d8 Head {h00=0x0032, h01=0x0050, text=»* THIS MODULE CONTAINS THE FOLLOWING MONITOR«, t00=0x0001, t01=0x0016}
0x01d8…01f0 Head {h00=0x0014, h01=0x0050, text=»* SUBROUTINES:«, t00=0x0001, t01=0x004c}
0x01f0…01fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0001, t01=0x0064}
0x01fa…022a Head {h00=0x002c, h01=0x0050, text=»* -SAVE8 SAVE 8 REGISTERS ON STACK «, t00=0x0001, t01=0x006e}
0x022a…0262 Head {h00=0x0034, h01=0x0050, text=»* -QTJOB QUEUE TERMINAL JOB FOR DISPATCHING«, t00=0x0001, t01=0x009e}
0x0262…0298 Head {h00=0x0032, h01=0x0050, text=»* -QMJOB QUEUE MONITOR JOB FOF DISPATCHING«, t00=0x0001, t01=0x00d6}
0x0298…02d6 Head {h00=0x003a, h01=0x0050, text=»* -ACTOT ACTIVATE TERMINAL PROGRAM ON FIFO BASIS «, t00=0x0001, t01=0x010c}
0x02d6…0314 Head {h00=0x003a, h01=0x0050, text=»* -ACTOTP ACTIVATE TERMINAL PROGRAM ON LIFO BASIS «, t00=0x0001, t01=0x014a}
0x0314…0336 Head {h00=0x001e, h01=0x0050, text=»* -EXIT PROGRAM EXIT «, t00=0x0001, t01=0x0188}
0x0336…0364 Head {h00=0x002a, h01=0x0050, text=»* -GETBLK GET A FREE MONITOR BLOCK«, t00=0x0002, t01=0x001a}
0x0364…0392 Head {h00=0x002a, h01=0x0050, text=»* -FREBLK SET A MONITOR BLOCK FREE«, t00=0x0002, t01=0x0048}
0x0392…03b8 Head {h00=0x0022, h01=0x0050, text=»* -FNDDWT FIND DWT ADDRESS«, t00=0x0002, t01=0x0076}
0x03b8…03ea Head {h00=0x002e, h01=0x0050, text=»* -FNDTID FIND TERMINAL IDENTIFICATION«, t00=0x0002, t01=0x009c}
0x03ea…041a Head {h00=0x002c, h01=0x0050, text=»* -TABIO ABORT I/O WITH ACTIVATION «, t00=0x0002, t01=0x00ce}
0x041a…0438 Head {h00=0x001a, h01=0x0050, text=»* -TENDIO END I/O «, t00=0x0002, t01=0x00fe}
0x0438…045c Head {h00=0x0020, h01=0x0050, text=»* -PFINIT RESTAR DEVICE «, t00=0x0002, t01=0x011c}
0x045c…0484 Head {h00=0x0024, h01=0x0050, text=»* -SWL48 SWITCH TO LEVEL 48«, t00=0x0002, t01=0x0140}
0x0484…04ac Head {h00=0x0024, h01=0x0050, text=»* -SWLXY SWITCH TO LEVEL XY«, t00=0x0002, t01=0x0168}
0x04ac…04ce Head {h00=0x001e, h01=0x0050, text=»* -HALT HALT MODULE «, t00=0x0002, t01=0x0190}
0x04ce…04dc Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0003, t01=0x0022}
0x04dc…04e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0030}
0x04e6…04fa Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x003a}
0x04fa…050e Head {h00=0x0010, h01=0x0050, text=»* ENTRIES * «, t00=0x0003, t01=0x004e}
0x050e…0522 Head {h00=0x0010, h01=0x0050, text=»*********** «, t00=0x0003, t01=0x0062}
0x0522…052c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0076}
0x052c…0536 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0003, t01=0x0080}
0x0536…055c Head {h00=0x0022, h01=0x0050, text=» ENTRY SAVE8 SAVE 8 REGISTERS «, t00=0x0003, t01=0x008a}
0x055c…0584 Head {h00=0x0024, h01=0x0050, text=» ENTRY QTJOB QUEUE TERMINAL JOB «, t00=0x0003, t01=0x00b0}
0x0584…05aa Head {h00=0x0022, h01=0x0050, text=» ENTRY QMJOB QUEUE MONITOR JOB«, t00=0x0003, t01=0x00d8}
0x05aa…05d0 Head {h00=0x0022, h01=0x0050, text=» ENTRY ACTOT ACTIVATE TERMINAL«, t00=0x0003, t01=0x00fe}
0x05d0…05f0 Head {h00=0x001c, h01=0x0050, text=» ENTRY EXIT PROGRAM EXIT«, t00=0x0003, t01=0x0124}
0x05f0…0610 Head {h00=0x001c, h01=0x0050, text=» ENTRY GETBLK GET BLOCK «, t00=0x0003, t01=0x0144}
0x0610…0634 Head {h00=0x0020, h01=0x0050, text=» ENTRY FREBLK SET BLOCK FREE«, t00=0x0003, t01=0x0164}
0x0634…0652 Head {h00=0x001a, h01=0x0050, text=» ENTRY FNDDWT FIND DWT«, t00=0x0003, t01=0x0188}
0x0652…0686 Head {h00=0x0030, h01=0x0050, text=» ENTRY FNDTID FIND TERMINAL INDENTIFICATION «, t00=0x0004, t01=0x0016}
0x0686…06b4 Head {h00=0x002a, h01=0x0050, text=» ENTRY TABIO ABORT I/O WITH ACTIVATION«, t00=0x0004, t01=0x004a}
0x06b4…06d2 Head {h00=0x001a, h01=0x0050, text=» ENTRY TENDIO END I/O «, t00=0x0004, t01=0x0078}
0x06d2…06f6 Head {h00=0x0020, h01=0x0050, text=» ENTRY PFINIT RESTART DEVICE«, t00=0x0004, t01=0x0096}
0x06f6…071e Head {h00=0x0024, h01=0x0050, text=» ENTRY SWL48 SWITCH TO LEVEL 48 «, t00=0x0004, t01=0x00ba}
0x071e…0746 Head {h00=0x0024, h01=0x0050, text=» ENTRY SWLXY SWITCH TO LEVEL XY «, t00=0x0004, t01=0x00e2}
0x0746…0776 Head {h00=0x002c, h01=0x0050, text=» ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE «, t00=0x0004, t01=0x010a}
0x0776…07a4 Head {h00=0x002a, h01=0x0050, text=» ENTRY INTSAV SAVE AREA LAST INTERRUPT«, t00=0x0004, t01=0x013a}
0x07a4…07c4 Head {h00=0x001c, h01=0x0050, text=» ENTRY HALT HALT-MODULE «, t00=0x0004, t01=0x0168}
0x07c4…07d2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0004, t01=0x0188}
0x07d2…07dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0008}
0x07dc…07e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0012}
0x07e6…081c Head {h00=0x0032, h01=0x0050, text=»* ENTRIES TO RESTORE REGISTERS A8-A1 WITHOUT«, t00=0x0005, t01=0x001c}
0x081c…083a Head {h00=0x001a, h01=0x0050, text=»* ENEABLE INTERRUPTS«, t00=0x0005, t01=0x0052}
0x083a…0844 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x0070}
0x0844…084e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0005, t01=0x007a}
0x084e…0874 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET8 RESTORE FROM A8 «, t00=0x0005, t01=0x0084}
0x0874…089a Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET7 A7 «, t00=0x0005, t01=0x00aa}
0x089a…08c0 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET6 A6 «, t00=0x0005, t01=0x00d0}
0x08c0…08e6 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET5 A5 «, t00=0x0005, t01=0x00f6}
0x08e6…090c Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET4 A4 «, t00=0x0005, t01=0x011c}
0x090c…0932 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET3 A3 «, t00=0x0005, t01=0x0142}
0x0932…0958 Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET2 A2 «, t00=0x0005, t01=0x0168}
0x0958…097e Head {h00=0x0022, h01=0x0050, text=» ENTRY IHRET1 A1 «, t00=0x0005, t01=0x018e}
0x097e…09b4 Head {h00=0x0032, h01=0x0050, text=» ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS «, t00=0x0006, t01=0x0024}
0x09b4…09c2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0006, t01=0x005a}
0x09c2…09cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x0068}
0x09cc…09e2 Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x0072}
0x09e2…09f8 Head {h00=0x0012, h01=0x0050, text=»* EXTERNALS * «, t00=0x0006, t01=0x0088}
0x09f8…0a0e Head {h00=0x0012, h01=0x0050, text=»************* «, t00=0x0006, t01=0x009e}
0x0a0e…0a18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00b4}
0x0a18…0a22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0006, t01=0x00be}
0x0a22…0a62 Head {h00=0x003c, h01=0x0050, text=» EXTRN DISQUE POINTER TO FIRST PLACE IN DISPATCHER QUEUE«, t00=0x0006, t01=0x00c8}
0x0a62…0a8c Head {h00=0x0026, h01=0x0050, text=» EXTRN TTMJOB TTAB-ADDRESS OF MJOB«, t00=0x0006, t01=0x0108}
0x0a8c…0ac4 Head {h00=0x0034, h01=0x0050, text=» EXTRN TTB:ST TERMINAL STATUS AND PRIORITY LEVEL«, t00=0x0006, t01=0x0132}
0x0ac4…0af2 Head {h00=0x002a, h01=0x0050, text=» EXTRN TTB:ID TERMINAL IDENTIFICATION «, t00=0x0006, t01=0x016a}
0x0af2…0b12 Head {h00=0x001c, h01=0x0050, text=» EXTRN TTB:SA SAVE AREA «, t00=0x0007, t01=0x0008}
0x0b12…0b40 Head {h00=0x002a, h01=0x0050, text=» EXTRN TTB:PP POINTER TO PENDING QUEUE«, t00=0x0007, t01=0x0028}
0x0b40…0b6c Head {h00=0x0028, h01=0x0050, text=» EXTRN TTB:TD TERMINAL DEVICE TABLE «, t00=0x0007, t01=0x0056}
0x0b6c…0b82 Head {h00=0x0012, h01=0x0050, text=» EXTRN RETUR8 «, t00=0x0007, t01=0x0082}
0x0b82…0bbc Head {h00=0x0036, h01=0x0050, text=» EXTRN FREQUE POINTER TO FIRST FREE MONITOR BLOCK «, t00=0x0007, t01=0x0098}
0x0bbc…0bdc Head {h00=0x001c, h01=0x0050, text=» EXTRN DWTST DWT STATUS «, t00=0x0007, t01=0x00d2}
0x0bdc…0c02 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTADR -DRIVER ENTRY«, t00=0x0007, t01=0x00f2}
0x0c02…0c34 Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTWAT -WAIT/ACTIVATE INDICATOR «, t00=0x0007, t01=0x0118}
0x0c34…0c5a Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTECB -ECB ADDRESS «, t00=0x0007, t01=0x014a}
0x0c5a…0c8c Head {h00=0x002e, h01=0x0050, text=» EXTRN DWTTQ =ADDRESS TO TTAB ON QUEUE «, t00=0x0007, t01=0x0170}
0x0c8c…0cb2 Head {h00=0x0022, h01=0x0050, text=» EXTRN DWTTAB -TTAB ADDRESS«, t00=0x0008, t01=0x0012}
0x0cb2…0cdc Head {h00=0x0026, h01=0x0050, text=» EXTRN DWTTDM DM TASK TTAB ADDRESS«, t00=0x0008, t01=0x0038}
0x0cdc…0d08 Head {h00=0x0028, h01=0x0050, text=» EXTRN TCTAB TERMINAL CONTROL TABLE «, t00=0x0008, t01=0x0062}
0x0d08…0d30 Head {h00=0x0024, h01=0x0050, text=» EXTRN CDTAB COMMON DEVICE TABLE«, t00=0x0008, t01=0x008e}
0x0d30…0d66 Head {h00=0x0032, h01=0x0050, text=» EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED «, t00=0x0008, t01=0x00b6}
0x0d66…0d82 Head {h00=0x0018, h01=0x0050, text=» EXTRN TTB:SP,TTB:SS«, t00=0x0008, t01=0x00ec}
0x0d82…0daa Head {h00=0x0024, h01=0x0050, text=» EXTRN RTNA15 RETURN AND ENABLE «, t00=0x0008, t01=0x0108}
0x0daa…0dd8 Head {h00=0x002a, h01=0x0050, text=» EXTRN TIODM,CHKIND,REQEND DM-ENTRIES «, t00=0x0008, t01=0x0130}
0x0dd8…0de2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x015e}
0x0de2…0dec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0008, t01=0x0168}
0x0dec…0e12 Head {h00=0x0022, h01=0x0050, text=»SOP EQU /2E SOP DEVICE ADDRESS«, t00=0x0008, t01=0x0172}
0x0e12…0e20 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0009, t01=0x0008}
0x0e20…0e2a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0016}
0x0e2a…0e34 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0020}
0x0e34…0e4a Head {h00=0x0012, h01=0x0050, text=»* S A V E 8 «, t00=0x0009, t01=0x002a}
0x0e4a…0e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x0040}
0x0e54…0e88 Head {h00=0x0030, h01=0x0050, text=»* SUBROUTINE TO SAVE 8 REGISTERS ON STACK «, t00=0x0009, t01=0x004a}
0x0e88…0eb0 Head {h00=0x0024, h01=0x0050, text=»* WITHOUT ENABLING INTERRUPTS.«, t00=0x0009, t01=0x007e}
0x0eb0…0eba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00a6}
0x0eba…0ec4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0009, t01=0x00b0}
0x0ec4…0ed8 Head {h00=0x0010, h01=0x0050, text=»SAVE8 EQU * «, t00=0x0009, t01=0x00ba}
0x0ed8…0ef8 Head {h00=0x001c, h01=0x0050, text=» INH INHIBIT INTERRUPTS«, t00=0x0009, t01=0x00ce}
0x0ef8…0f0c Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x0009, t01=0x00ee}
0x0f0c…0f20 Head {h00=0x0010, h01=0x0050, text=» STR A4,A15 «, t00=0x0009, t01=0x0102}
0x0f20…0f34 Head {h00=0x0010, h01=0x0050, text=» STR A5,A15 «, t00=0x0009, t01=0x0116}
0x0f34…0f48 Head {h00=0x0010, h01=0x0050, text=» STR A6,A15 «, t00=0x0009, t01=0x012a}
0x0f48…0f5c Head {h00=0x0010, h01=0x0050, text=» STR A7,A15 «, t00=0x0009, t01=0x013e}
0x0f5c…0f70 Head {h00=0x0010, h01=0x0050, text=» STR A8,A15 «, t00=0x0009, t01=0x0152}
0x0f70…0fa0 Head {h00=0x002c, h01=0x0050, text=» LD A3,16,A15 LOAD P.C. (RETURN ADDRESS)«, t00=0x0009, t01=0x0166}
0x0fa0…0fd0 Head {h00=0x002c, h01=0x0050, text=» ST A3,SAVE81 AND MODIFY BRANCH ADDRESS «, t00=0x000a, t01=0x0008}
0x0fd0…0fe6 Head {h00=0x0012, h01=0x0050, text=» ST A2,14,A15 «, t00=0x000a, t01=0x0038}
0x0fe6…0ffc Head {h00=0x0012, h01=0x0050, text=» ST A1,16,A15 «, t00=0x000a, t01=0x004e}
0x0ffc…101c Head {h00=0x001c, h01=0x0050, text=» LD A3,12,A15 RESTORE A3«, t00=0x000a, t01=0x0064}
0x101c…1046 Head {h00=0x0026, h01=0x0050, text=» ABL 0 THIS IS USED TO BRANCH BACK«, t00=0x000a, t01=0x0084}
0x1046…105c Head {h00=0x0012, h01=0x0050, text=»SAVE81 EQU *-2«, t00=0x000a, t01=0x00ae}
0x105c…1066 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00c4}
0x1066…1074 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000a, t01=0x00ce}
0x1074…107e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00dc}
0x107e…1088 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x00e6}
0x1088…109e Head {h00=0x0012, h01=0x0050, text=»* Q T J O B «, t00=0x000a, t01=0x00f0}
0x109e…10a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x0106}
0x10a8…10e4 Head {h00=0x0038, h01=0x0050, text=»* SUBROUTINE TO QUEUE TERMINAL JOB FOR DISPATCHING«, t00=0x000a, t01=0x0110}
0x10e4…1102 Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETER:- «, t00=0x000a, t01=0x014c}
0x1102…110c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000a, t01=0x016a}
0x110c…1142 Head {h00=0x0032, h01=0x0050, text=»* A5 = TTAB-ADDRESS OF PROGRAM TO BE QUEUED.«, t00=0x000a, t01=0x0174}
0x1142…114c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x001a}
0x114c…1188 Head {h00=0x0038, h01=0x0050, text=»* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON «, t00=0x000b, t01=0x0024}
0x1188…11c4 Head {h00=0x0038, h01=0x0050, text=»* PRIORITY BASIS. WITHIN ONE PRIORITY LEVEL JOB IS«, t00=0x000b, t01=0x0060}
0x11c4…11e2 Head {h00=0x001a, h01=0x0050, text=»* PUT LAST IN QUEUE.«, t00=0x000b, t01=0x009c}
0x11e2…11ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ba}
0x11ec…11f6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00c4}
0x11f6…1200 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000b, t01=0x00ce}
0x1200…1214 Head {h00=0x0010, h01=0x0050, text=»QTJOB EQU * «, t00=0x000b, t01=0x00d8}
0x1214…1220 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x000b, t01=0x00ec}
0x1220…1248 Head {h00=0x0024, h01=0x0050, text=» STR A1,A15 SAVE A1-A3 ON STACK «, t00=0x000b, t01=0x00f8}
0x1248…125c Head {h00=0x0010, h01=0x0050, text=» STR A2,A15 «, t00=0x000b, t01=0x0120}
0x125c…1270 Head {h00=0x0010, h01=0x0050, text=» STR A3,A15 «, t00=0x000b, t01=0x0134}
0x1270…12a2 Head {h00=0x002e, h01=0x0050, text=» LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS «, t00=0x000b, t01=0x0148}
0x12a2…12d4 Head {h00=0x002e, h01=0x0050, text=» LC A3,TTB:ST+1,A5 LOAD LEVEL TO BE QUEUED«, t00=0x000b, t01=0x017a}
0x12d4…12fe Head {h00=0x0026, h01=0x0050, text=»QTJ010 LDR A2,A1 SAVE LAST ADDRESS«, t00=0x000c, t01=0x001c}
0x12fe…1324 Head {h00=0x0022, h01=0x0050, text=» LDR* A1,A1 FOLLOW THE THREAD «, t00=0x000c, t01=0x0046}
0x1324…134a Head {h00=0x0022, h01=0x0050, text=» RF(Z) QTJ020 END QUEUE FOUND «, t00=0x000c, t01=0x006c}
0x134a…1374 Head {h00=0x0026, h01=0x0050, text=» CC A3,TTB:ST+1,A1 COMPARE LEVELS «, t00=0x000c, t01=0x0092}
0x1374…1394 Head {h00=0x001c, h01=0x0050, text=» RB(NL) QTJ010 TRY NEXT «, t00=0x000c, t01=0x00bc}
0x1394…13bc Head {h00=0x0024, h01=0x0050, text=»QTJ020 STR A1,A5 INSET IN QUEUE «, t00=0x000c, t01=0x00dc}
0x13bc…13ce Head {h00=0x000e, h01=0x0050, text=» STR A5,A2«, t00=0x000c, t01=0x0104}
0x13ce…13e2 Head {h00=0x0010, h01=0x0050, text=» ABL IHRET3 «, t00=0x000c, t01=0x0116}
0x13e2…13f0 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000c, t01=0x012a}
0x13f0…13fa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0138}
0x13fa…1404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0142}
0x1404…141a Head {h00=0x0012, h01=0x0050, text=»* Q M J O B «, t00=0x000c, t01=0x014c}
0x141a…1424 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000c, t01=0x0162}
0x1424…145c Head {h00=0x0034, h01=0x0050, text=»* SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49«, t00=0x000c, t01=0x016c}
0x145c…147a Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETERS:-«, t00=0x000d, t01=0x0014}
0x147a…1484 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0032}
0x1484…149e Head {h00=0x0016, h01=0x0050, text=»* A1 = PARAMETER«, t00=0x000d, t01=0x003c}
0x149e…14a8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0056}
0x14a8…14ca Head {h00=0x001e, h01=0x0050, text=»* A2 = DISPATCH ADDRESS «, t00=0x000d, t01=0x0060}
0x14ca…14d4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0082}
0x14d4…1510 Head {h00=0x0038, h01=0x0050, text=»* A5 IS SET TO TTAB-ADDRESS OF MONITORJOBS AND THE«, t00=0x000d, t01=0x008c}
0x1510…1550 Head {h00=0x003c, h01=0x0050, text=»* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE«, t00=0x000d, t01=0x00c8}
0x1550…1560 Head {h00=0x000c, h01=0x0050, text=»* JOB.«, t00=0x000d, t01=0x0108}
0x1560…156a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0118}
0x156a…1574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x0122}
0x1574…157e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000d, t01=0x012c}
0x157e…1592 Head {h00=0x0010, h01=0x0050, text=»QMJOB EQU * «, t00=0x000d, t01=0x0136}
0x1592…15a8 Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x000d, t01=0x014a}
0x15a8…15d0 Head {h00=0x0024, h01=0x0050, text=» LDKL A5,TTMJOB SET TTAB-ADDRESS«, t00=0x000d, t01=0x0160}
0x15d0…15e2 Head {h00=0x000e, h01=0x0050, text=» LDK A3,0 «, t00=0x000d, t01=0x0188}
0x15e2…1604 Head {h00=0x001e, h01=0x0050, text=» RF ACT02 AND GO TO ACTOT «, t00=0x000e, t01=0x000a}
0x1604…1612 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x000e, t01=0x002c}
0x1612…161c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x003a}
0x161c…1626 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0044}
0x1626…164a Head {h00=0x0020, h01=0x0050, text=»* A C T O T , A C T O T P «, t00=0x000e, t01=0x004e}
0x164a…1654 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x0072}
0x1654…168a Head {h00=0x0032, h01=0x0050, text=»* SUBROUTINE TO ACTIVATE A TERMINAL PROGRAM.«, t00=0x000e, t01=0x007c}
0x168a…16a8 Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETERS:-«, t00=0x000e, t01=0x00b2}
0x16a8…16b2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x00d0}
0x16b2…16cc Head {h00=0x0016, h01=0x0050, text=»* A1 = PARAMETER«, t00=0x000e, t01=0x00da}
0x16cc…16ee Head {h00=0x001e, h01=0x0050, text=»* A2 = DISPATCH ADDRESS «, t00=0x000e, t01=0x00f4}
0x16ee…170e Head {h00=0x001c, h01=0x0050, text=»* A3 = SEGMENT POINTER«, t00=0x000e, t01=0x0116}
0x170e…172c Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB-ADDRESS «, t00=0x000e, t01=0x0136}
0x172c…1766 Head {h00=0x0036, h01=0x0050, text=»* A7 = ABORT PARAMETER, 0 IF NO ABORTION OF I/O «, t00=0x000e, t01=0x0154}
0x1766…1770 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000e, t01=0x018e}
0x1770…17b0 Head {h00=0x003c, h01=0x0050, text=»* - IF REQUESTED PROGRAM IS NOT ACTIVE THE PROGRAM IS «, t00=0x000f, t01=0x0008}
0x17b0…17ee Head {h00=0x003a, h01=0x0050, text=»* PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. «, t00=0x000f, t01=0x0048}
0x17ee…1832 Head {h00=0x0040, h01=0x0050, text=»* - IF PROGRAM IS ACTIVE, THE REQUEST IS PUT IN A PENDING «, t00=0x000f, t01=0x0086}
0x1832…1846 Head {h00=0x0010, h01=0x0050, text=»* QUEUE.«, t00=0x000f, t01=0x00ca}
0x1846…188a Head {h00=0x0040, h01=0x0050, text=»* - ACTOT WILL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS «, t00=0x000f, t01=0x00de}
0x188a…18ce Head {h00=0x0040, h01=0x0050, text=»* - ACTOTP WILL PUT REQUEST IN PENDING QUEUE ON LIFO BASIS«, t00=0x000f, t01=0x0122}
0x18ce…18d8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0166}
0x18d8…18e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x000f, t01=0x0170}
0x18e2…18f6 Head {h00=0x0010, h01=0x0050, text=»ACTOTP EQU *«, t00=0x000f, t01=0x017a}
0x18f6…191a Head {h00=0x0020, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS«, t00=0x000f, t01=0x018e}
0x191a…193a Head {h00=0x001c, h01=0x0050, text=» LDK A6,1 INDICATE LIFO «, t00=0x0010, t01=0x0022}
0x193a…194c Head {h00=0x000e, h01=0x0050, text=» RF ACT03 «, t00=0x0010, t01=0x0042}
0x194c…1960 Head {h00=0x0010, h01=0x0050, text=»ACTOT EQU * «, t00=0x0010, t01=0x0054}
0x1960…1984 Head {h00=0x0020, h01=0x0050, text=» CF A15,SAVE8 SAVE REGISTERS«, t00=0x0010, t01=0x0068}
0x1984…19b8 Head {h00=0x0030, h01=0x0050, text=»ACT02 LDK A6,0 INDICATE FIFO PENDING QUEUING«, t00=0x0010, t01=0x008c}
0x19b8…19cc Head {h00=0x0010, h01=0x0050, text=»ACT03 EQU * «, t00=0x0010, t01=0x00c0}
0x19cc…19f8 Head {h00=0x0028, h01=0x0050, text=» LD A4,TTB:SA,A5 IS PROGRAM ACTIVE? «, t00=0x0010, t01=0x00d4}
0x19f8…1a28 Head {h00=0x002c, h01=0x0050, text=» RF(NZ) ACT020 YES, PUT IN PENDING QUEUE«, t00=0x0010, t01=0x0100}
0x1a28…1a3a Head {h00=0x000e, h01=0x0050, text=» LDR A3,A3«, t00=0x0010, t01=0x0130}
0x1a3a…1a4e Head {h00=0x0010, h01=0x0050, text=» RF(E) ACT05«, t00=0x0010, t01=0x0142}
0x1a4e…1a6e Head {h00=0x001c, h01=0x0050, text=» LD A4,2,A3 LOAD ADDRESS«, t00=0x0010, t01=0x0156}
0x1a6e…1a80 Head {h00=0x000e, h01=0x0050, text=» ADR A2,A4«, t00=0x0010, t01=0x0176}
0x1a80…1aac Head {h00=0x0028, h01=0x0050, text=» ST A4,TTB:SS,A5 LAST SEGMENT START «, t00=0x0010, t01=0x0188}
0x1aac…1ada Head {h00=0x002a, h01=0x0050, text=»ACT05 ST A2,TTB:SA,A5 DISPATCH ADDRESS«, t00=0x0011, t01=0x0024}
0x1ada…1b02 Head {h00=0x0024, h01=0x0050, text=» ST A3,TTB:SP,A5 SEGMENT POINTER«, t00=0x0011, t01=0x0052}
0x1b02…1b2a Head {h00=0x0024, h01=0x0050, text=» ST A1,TTB:SA+2,A5 AND PARAMETER«, t00=0x0011, t01=0x007a}
0x1b2a…1b52 Head {h00=0x0024, h01=0x0050, text=» LD A4,TTB:ID,A5 SET TERMINAL ID«, t00=0x0011, t01=0x00a2}
0x1b52…1b80 Head {h00=0x002a, h01=0x0050, text=» ST A4,TTB:SA+4,A5 TO A2 IN SAVE AREA «, t00=0x0011, t01=0x00ca}
0x1b80…1bae Head {h00=0x002a, h01=0x0050, text=» ST A7,TTB:SA+14,A5 TO A7 IN SAVE AREA«, t00=0x0011, t01=0x00f8}
0x1bae…1bd6 Head {h00=0x0024, h01=0x0050, text=» CF A15,QTJOB AND QUEUE THE JOB «, t00=0x0011, t01=0x0126}
0x1bd6…1bf0 Head {h00=0x0016, h01=0x0050, text=»ACT010 ABL IHRET8 «, t00=0x0011, t01=0x014e}
0x1bf0…1bfe Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0011, t01=0x0168}
0x1bfe…1c08 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0176}
0x1c08…1c12 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0011, t01=0x0180}
0x1c12…1c3c Head {h00=0x0026, h01=0x0050, text=»* PUT REQUEST IN PENDING QUEUE. «, t00=0x0011, t01=0x018a}
0x1c3c…1c46 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0012, t01=0x0024}
0x1c46…1c74 Head {h00=0x002a, h01=0x0050, text=»ACT020 CF A15,GETBLK GET A FREE BLOCK «, t00=0x0012, t01=0x002e}
0x1c74…1c86 Head {h00=0x000e, h01=0x0050, text=» LDR A2,A4«, t00=0x0012, t01=0x005c}
0x1c86…1ca8 Head {h00=0x001e, h01=0x0050, text=» LDR A1,A7 ABORT PARAMETER«, t00=0x0012, t01=0x006e}
0x1ca8…1cbe Head {h00=0x0012, h01=0x0050, text=» CF A15,GETBLK«, t00=0x0012, t01=0x0090}
0x1cbe…1cd6 Head {h00=0x0014, h01=0x0050, text=» ADKL A5,TTB:PP «, t00=0x0012, t01=0x00a6}
0x1cd6…1cfc Head {h00=0x0022, h01=0x0050, text=»ACT030 LDR A3,A5 SAVE ADDRESS «, t00=0x0012, t01=0x00be}
0x1cfc…1d28 Head {h00=0x0028, h01=0x0050, text=» LDR* A5,A5 FOLLOW THE QUEUE THREAD «, t00=0x0012, t01=0x00e4}
0x1d28…1d50 Head {h00=0x0024, h01=0x0050, text=» LDR A6,A6 QUEUE ON FIFO BASIS? «, t00=0x0012, t01=0x0110}
0x1d50…1d7e Head {h00=0x002a, h01=0x0050, text=» RF(NZ) ACT040 NO, PUT FIRST IN QUEUE «, t00=0x0012, t01=0x0138}
0x1d7e…1d9e Head {h00=0x001c, h01=0x0050, text=» LDR A5,A5 END OF QUEUE?«, t00=0x0012, t01=0x0166}
0x1d9e…1dc2 Head {h00=0x0020, h01=0x0050, text=» RB(NZ) ACT030 NO, TRY NEXT!«, t00=0x0012, t01=0x0186}
0x1dc2…1dd6 Head {h00=0x0010, h01=0x0050, text=»ACT040 EQU *«, t00=0x0013, t01=0x001a}
0x1dd6…1dfc Head {h00=0x0022, h01=0x0050, text=» STR A4,A3 SET BLOCK IN QUEUE «, t00=0x0013, t01=0x002e}
0x1dfc…1e0e Head {h00=0x000e, h01=0x0050, text=» STR A5,A4«, t00=0x0013, t01=0x0054}
0x1e0e…1e20 Head {h00=0x000e, h01=0x0050, text=» RB ACT010«, t00=0x0013, t01=0x0066}
0x1e20…1e2e Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0013, t01=0x0078}
0x1e2e…1e38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0086}
0x1e38…1e42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0090}
0x1e42…1e56 Head {h00=0x0010, h01=0x0050, text=»* E X I T «, t00=0x0013, t01=0x009a}
0x1e56…1e60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x00ae}
0x1e60…1e9c Head {h00=0x0038, h01=0x0050, text=»* SUBROUTINE TO SET A PROGRAM FREE AND QUEUE FIRST«, t00=0x0013, t01=0x00b8}
0x1e9c…1eb8 Head {h00=0x0018, h01=0x0050, text=»* PENDING PROGRAM «, t00=0x0013, t01=0x00f4}
0x1eb8…1ec2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0110}
0x1ec2…1ee0 Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETER:- «, t00=0x0013, t01=0x011a}
0x1ee0…1eea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0138}
0x1eea…1f08 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB-ADDRESS «, t00=0x0013, t01=0x0142}
0x1f08…1f30 Head {h00=0x0024, h01=0x0050, text=»* REGISTERS A3 AND A4 ARE LOST«, t00=0x0013, t01=0x0160}
0x1f30…1f3a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0013, t01=0x0188}
0x1f3a…1f4c (20, 0, 400) Head {h00=0x000e, h01=0x0050, text=»EXIT EQU *«, t00=0x0014, t01=0x0004}
0x1f4c…1f58 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0014, t01=0x0016}
0x1f58…1f84 Head {h00=0x0028, h01=0x0050, text=» CM TTB:SA,A5 RESET PROGRAM COUNTER «, t00=0x0014, t01=0x0022}
0x1f84…1fb8 Head {h00=0x0030, h01=0x0050, text=» LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER«, t00=0x0014, t01=0x004e}
0x1fb8…1fe0 Head {h00=0x0024, h01=0x0050, text=» RF(Z) EXT010 NO PENDING PROGRAM«, t00=0x0014, t01=0x0082}
0x1fe0…2004 Head {h00=0x0020, h01=0x0050, text=» LDR* A3,A4 GET QUEUE THREAD«, t00=0x0014, t01=0x00aa}
0x2004…2038 Head {h00=0x0030, h01=0x0050, text=» ST A3,TTB:PP,A5 AND SAVE IN PENDING POINTER«, t00=0x0014, t01=0x00ce}
0x2038…206c Head {h00=0x0030, h01=0x0050, text=» CF A15,FREBLK RELEASE BLOCK AND GET PARAMS «, t00=0x0014, t01=0x0102}
0x206c…208e Head {h00=0x001e, h01=0x0050, text=» LDR A7,A1 ABORT PARAMETER«, t00=0x0014, t01=0x0136}
0x208e…20a0 Head {h00=0x000e, h01=0x0050, text=» LDR A4,A2«, t00=0x0014, t01=0x0158}
0x20a0…20b6 Head {h00=0x0012, h01=0x0050, text=» CF A15,FREBLK«, t00=0x0014, t01=0x016a}
0x20b6…20de Head {h00=0x0024, h01=0x0050, text=» CF A15,ACTOT ACTIVATE TERMINAL «, t00=0x0014, t01=0x0180}
0x20de…20f6 Head {h00=0x0014, h01=0x0050, text=»EXT010 RF GBL020«, t00=0x0015, t01=0x0018}
0x20f6…2104 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0015, t01=0x0030}
0x2104…210e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x003e}
0x210e…2118 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0048}
0x2118…2130 Head {h00=0x0014, h01=0x0050, text=»* G E T B L K «, t00=0x0015, t01=0x0052}
0x2130…213a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x006a}
0x213a…2172 Head {h00=0x0034, h01=0x0050, text=»* SUBROUTINE TO GET A FREE BLOCK FROM MONITOR «, t00=0x0015, t01=0x0074}
0x2172…21ac Head {h00=0x0036, h01=0x0050, text=»* BLOCK POOL.REGISTERS A3-A1 ARE STORED IN FOUND«, t00=0x0015, t01=0x00ac}
0x21ac…21c4 Head {h00=0x0014, h01=0x0050, text=»* FREE BLOCK. «, t00=0x0015, t01=0x00e6}
0x21c4…21ce Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x00fe}
0x21ce…21ea Head {h00=0x0018, h01=0x0050, text=»* EXIT PARAMETER:-«, t00=0x0015, t01=0x0108}
0x21ea…21f4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0124}
0x21f4…2220 Head {h00=0x0028, h01=0x0050, text=»* A4 = ADDRESS TO FOUND FREE BLOCK«, t00=0x0015, t01=0x012e}
0x2220…222a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x015a}
0x222a…2234 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x0164}
0x2234…223e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0015, t01=0x016e}
0x223e…2252 Head {h00=0x0010, h01=0x0050, text=»GETBLK EQU *«, t00=0x0015, t01=0x0178}
0x2252…225e Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0015, t01=0x018c}
0x225e…227a Head {h00=0x0018, h01=0x0050, text=» STR A5,A15 SAVE A5 «, t00=0x0016, t01=0x0008}
0x227a…22ae Head {h00=0x0030, h01=0x0050, text=» LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE «, t00=0x0016, t01=0x0024}
0x22ae…22c4 Head {h00=0x0012, h01=0x0050, text=» RF(NZ) GBL010«, t00=0x0016, t01=0x0058}
0x22c4…22e6 Head {h00=0x001e, h01=0x0050, text=» LDK A1,/B HALT PARAMETER «, t00=0x0016, t01=0x006e}
0x22e6…2318 Head {h00=0x002e, h01=0x0050, text=» CF A15,HALT HALT IF ALL BLOCKS OCCUPIED «, t00=0x0016, t01=0x0090}
0x2318…2332 Head {h00=0x0016, h01=0x0050, text=»GBL010 LDR* A5,A4 «, t00=0x0016, t01=0x00c2}
0x2332…2364 Head {h00=0x002e, h01=0x0050, text=» ST A5,FREQUE TAKE BLOCK OUT OF FREE QUEUE«, t00=0x0016, t01=0x00dc}
0x2364…238c Head {h00=0x0024, h01=0x0050, text=» STR A3,A4 STORE A3-A1 IN BLOCK «, t00=0x0016, t01=0x010e}
0x238c…23a0 Head {h00=0x0010, h01=0x0050, text=» ST A2,2,A4 «, t00=0x0016, t01=0x0136}
0x23a0…23b4 Head {h00=0x0010, h01=0x0050, text=» ST A1,4,A4 «, t00=0x0016, t01=0x014a}
0x23b4…23d4 Head {h00=0x001c, h01=0x0050, text=» LDR* A5,A15 RESTORE A5 «, t00=0x0016, t01=0x015e}
0x23d4…23ec Head {h00=0x0014, h01=0x0050, text=»GBL020 ABL IHRTN«, t00=0x0016, t01=0x017e}
0x23ec…23fa Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0017, t01=0x0008}
0x23fa…2404 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0016}
0x2404…240e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0020}
0x240e…2426 Head {h00=0x0014, h01=0x0050, text=»* F R E B L K «, t00=0x0017, t01=0x002a}
0x2426…2430 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0042}
0x2430…246e Head {h00=0x003a, h01=0x0050, text=»* SUBROUTINE TO GET PARAMETERS FROM A MONITOR BLOCK «, t00=0x0017, t01=0x004c}
0x246e…2492 Head {h00=0x0020, h01=0x0050, text=»* AND SET THIS BLOCK FREE.«, t00=0x0017, t01=0x008a}
0x2492…249c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00ae}
0x249c…24ba Head {h00=0x001a, h01=0x0050, text=»* ENTRY PARAMETER:- «, t00=0x0017, t01=0x00b8}
0x24ba…24c4 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00d6}
0x24c4…24e2 Head {h00=0x001a, h01=0x0050, text=»* A4 = BLOCKADDRESS «, t00=0x0017, t01=0x00e0}
0x24e2…24ec Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x00fe}
0x24ec…250a Head {h00=0x001a, h01=0x0050, text=»* EXIT PARAMETERS:- «, t00=0x0017, t01=0x0108}
0x250a…2514 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0017, t01=0x0126}
0x2514…253e Head {h00=0x0026, h01=0x0050, text=»* A3 = FIRST PARAMETER IN BLOCK «, t00=0x0017, t01=0x0130}
0x253e…2566 Head {h00=0x0024, h01=0x0050, text=»* A2 = SECOND " " «, t00=0x0017, t01=0x015a}
0x2566…258e Head {h00=0x0024, h01=0x0050, text=»* A1 = THIRD " " «, t00=0x0017, t01=0x0182}
0x258e…2598 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x001a}
0x2598…25a2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0024}
0x25a2…25b6 Head {h00=0x0010, h01=0x0050, text=»FREBLK EQU *«, t00=0x0018, t01=0x002e}
0x25b6…25c2 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x0018, t01=0x0042}
0x25c2…25e0 Head {h00=0x001a, h01=0x0050, text=» LDR* A3,A4 UPDATE A3 «, t00=0x0018, t01=0x004e}
0x25e0…25f6 Head {h00=0x0012, h01=0x0050, text=» LD A1,FREQUE «, t00=0x0018, t01=0x006c}
0x25f6…2608 Head {h00=0x000e, h01=0x0050, text=» STR A1,A4«, t00=0x0018, t01=0x0082}
0x2608…262c Head {h00=0x0020, h01=0x0050, text=» ST A4,FREQUE SET BLOCK FREE«, t00=0x0018, t01=0x0094}
0x262c…2640 Head {h00=0x0010, h01=0x0050, text=» LD A2,2,A4 «, t00=0x0018, t01=0x00b8}
0x2640…2654 Head {h00=0x0010, h01=0x0050, text=» LD A1,4,A4 «, t00=0x0018, t01=0x00cc}
0x2654…2666 Head {h00=0x000e, h01=0x0050, text=» ABL IHRTN«, t00=0x0018, t01=0x00e0}
0x2666…2674 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0018, t01=0x00f2}
0x2674…267c Head {h00=0x0004, h01=0x0050, t00=0x0018, t01=0x0100}
0x267c…2686 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0108}
0x2686…269c Head {h00=0x0012, h01=0x0050, text=»* F N D D W T «, t00=0x0018, t01=0x0112}
0x269c…26a6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x0128}
0x26a6…26c2 Head {h00=0x0018, h01=0x0050, text=»* ENTRY PARAMETERS:-«, t00=0x0018, t01=0x0132}
0x26c2…26cc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0018, t01=0x014e}
0x26cc…26e8 Head {h00=0x0018, h01=0x0050, text=»* A5 = TTAB ADDRESS «, t00=0x0018, t01=0x0158}
0x26e8…2722 Head {h00=0x0036, h01=0x0050, text=»* A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT«, t00=0x0018, t01=0x0174}
0x2722…273c Head {h00=0x0016, h01=0x0050, text=»* A8 = ECB ADDRESS«, t00=0x0019, t01=0x001e}
0x273c…2746 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x0038}
0x2746…2762 Head {h00=0x0018, h01=0x0050, text=»* EXIT PARAMETERS:- «, t00=0x0019, t01=0x0042}
0x2762…276c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x005e}
0x276c…2784 Head {h00=0x0014, h01=0x0050, text=»* A2 = DWT INDEX«, t00=0x0019, t01=0x0068}
0x2784…27ae Head {h00=0x0026, h01=0x0050, text=»* A6 = DWT ADDRESS IF FOUND ELSE 0«, t00=0x0019, t01=0x0080}
0x27ae…27b8 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0019, t01=0x00aa}
0x27b8…27c0 Head {h00=0x0004, h01=0x0050, t00=0x0019, t01=0x00b4}
0x27c0…27e2 Head {h00=0x001e, h01=0x0050, text=»FNDDWT STR A1,A15 SAVE A1 «, t00=0x0019, t01=0x00bc}
0x27e2…27fa Head {h00=0x0014, h01=0x0050, text=» LDKL A6,TTB:TD «, t00=0x0019, t01=0x00de}
0x27fa…2832 Head {h00=0x0034, h01=0x0050, text=» ADR A6,A5 GET ADDRESS TO TERMINAL DEVICE TABLE «, t00=0x0019, t01=0x00f6}
0x2832…2856 Head {h00=0x0020, h01=0x0050, text=» LDR* A1,A6 GET TABLE LENGTH«, t00=0x0019, t01=0x012e}
0x2856…2882 Head {h00=0x0028, h01=0x0050, text=» ADK A6,2 ADDRESS TO FIRST FILE CODE«, t00=0x0019, t01=0x0152}
0x2882…28ae Head {h00=0x0028, h01=0x0050, text=» LDR* A2,A8 LOAD FILE CODE FROM ECB «, t00=0x0019, t01=0x017e}
0x28ae…28b6 Head {h00=0x0004, h01=0x0050, t00=0x001a, t01=0x001a}
0x28b6…28ce Head {h00=0x0014, h01=0x0050, text=»FND100 SUK A1,4 «, t00=0x001a, t01=0x0022}
0x28ce…28fa Head {h00=0x0028, h01=0x0050, text=» RF(N) FND110 FILE CODE NOT IN TTAB «, t00=0x001a, t01=0x003a}
0x28fa…2924 Head {h00=0x0026, h01=0x0050, text=» CC A2,1,A6 SEARCH IN DEVICE TABLE«, t00=0x001a, t01=0x0066}
0x2924…294e Head {h00=0x0026, h01=0x0050, text=» RF(NE) FND106 BRANCH IF NOT FOUND«, t00=0x001a, t01=0x0090}
0x294e…2962 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x001a, t01=0x00ba}
0x2962…297e Head {h00=0x0018, h01=0x0050, text=» LD A1,2,A6 DWT ADDR«, t00=0x001a, t01=0x00ce}
0x297e…29a4 Head {h00=0x0022, h01=0x0050, text=» LD A1,DWTADR,A1 DRIVER ENTRY «, t00=0x001a, t01=0x00ea}
0x29a4…29ba Head {h00=0x0012, h01=0x0050, text=» CWK A1,TIODM «, t00=0x001a, t01=0x0110}
0x29ba…29dc Head {h00=0x001e, h01=0x0050, text=» RF(NE) FND200 NOT DM REQ «, t00=0x001a, t01=0x0126}
0x29dc…2a0c Head {h00=0x002c, h01=0x0050, text=» CF A15,CHKIND CHECK INDEX IN DM DMSUBR «, t00=0x001a, t01=0x0148}
0x2a0c…2a28 Head {h00=0x0018, h01=0x0050, text=» RF FND200 INDEX OK «, t00=0x001a, t01=0x0178}
0x2a28…2a3c (27, 0, 400) Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x001b, t01=0x0004}
0x2a3c…2a50 Head {h00=0x0010, h01=0x0050, text=»FND106 EQU *«, t00=0x001b, t01=0x0018}
0x2a50…2a7c Head {h00=0x0028, h01=0x0050, text=» ADK A6,4 ADDRESS TO NEXT FILE CODE «, t00=0x001b, t01=0x002c}
0x2a7c…2a98 Head {h00=0x0018, h01=0x0050, text=» RB FND100 TRY NEXT «, t00=0x001b, t01=0x0058}
0x2a98…2aa6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001b, t01=0x0074}
0x2aa6…2ab0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x0082}
0x2ab0…2ad8 Head {h00=0x0024, h01=0x0050, text=»* SEARCH IN COMMON DEVICE TABLE «, t00=0x001b, t01=0x008c}
0x2ad8…2ae2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001b, t01=0x00b4}
0x2ae2…2aea Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x00be}
0x2aea…2b12 Head {h00=0x0024, h01=0x0050, text=»FND110 LD A6,CDTAB CDTAB ADDRESS«, t00=0x001b, t01=0x00c6}
0x2b12…2b32 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A6 CDTAB LENGTH«, t00=0x001b, t01=0x00ee}
0x2b32…2b5a Head {h00=0x0024, h01=0x0050, text=» ADK A6,2 POINTER TO FIRST ENTRY«, t00=0x001b, t01=0x010e}
0x2b5a…2b62 Head {h00=0x0004, h01=0x0050, t00=0x001b, t01=0x0136}
0x2b62…2b7a Head {h00=0x0014, h01=0x0050, text=»FND120 SUK A1,4 «, t00=0x001b, t01=0x013e}
0x2b7a…2ba4 Head {h00=0x0026, h01=0x0050, text=» RF(N) FND130 FILE CODE NOT FOUND «, t00=0x001b, t01=0x0156}
0x2ba4…2bb8 Head {h00=0x0010, h01=0x0050, text=» CC A2,1,A6 «, t00=0x001b, t01=0x0180}
0x2bb8…2be2 (28, 0, 400) Head {h00=0x0026, h01=0x0050, text=» RF(NE) FND126 FILE CODE NOT FOUND«, t00=0x001c, t01=0x0004}
0x2be2…2bf6 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x001c, t01=0x002e}
0x2bf6…2c0a Head {h00=0x0010, h01=0x0050, text=» LD A1,2,A6 «, t00=0x001c, t01=0x0042}
0x2c0a…2c22 Head {h00=0x0014, h01=0x0050, text=» LD A1,DWTADR,A1«, t00=0x001c, t01=0x0056}
0x2c22…2c38 Head {h00=0x0012, h01=0x0050, text=» CWK A1,TIODM «, t00=0x001c, t01=0x006e}
0x2c38…2c5a Head {h00=0x001e, h01=0x0050, text=» RF(NE) FND200 NOT DM REQ «, t00=0x001c, t01=0x0084}
0x2c5a…2c82 Head {h00=0x0024, h01=0x0050, text=» CF A15,CHKIND CHECK INDEX IN DM«, t00=0x001c, t01=0x00a6}
0x2c82…2c9e Head {h00=0x0018, h01=0x0050, text=» RF FND200 INDEX OK «, t00=0x001c, t01=0x00ce}
0x2c9e…2cb2 Head {h00=0x0010, h01=0x0050, text=» LDR* A1,A15«, t00=0x001c, t01=0x00ea}
0x2cb2…2cc6 Head {h00=0x0010, h01=0x0050, text=»FND126 EQU *«, t00=0x001c, t01=0x00fe}
0x2cc6…2cd8 Head {h00=0x000e, h01=0x0050, text=» ADK A6,4 «, t00=0x001c, t01=0x0112}
0x2cd8…2d02 Head {h00=0x0026, h01=0x0050, text=» RB FND120 TRY NEXT ENTRY IN CDTAB«, t00=0x001c, t01=0x0124}
0x2d02…2d0a Head {h00=0x0004, h01=0x0050, t00=0x001c, t01=0x014e}
0x2d0a…2d22 Head {h00=0x0014, h01=0x0050, text=»FND130 SUR A6,A6«, t00=0x001c, t01=0x0156}
0x2d22…2d34 Head {h00=0x000e, h01=0x0050, text=» RF FND210«, t00=0x001c, t01=0x016e}
0x2d34…2d5a Head {h00=0x0022, h01=0x0050, text=»FND200 LDR* A1,A15 RESET STACK«, t00=0x001c, t01=0x0180}
0x2d5a…2d7c Head {h00=0x001e, h01=0x0050, text=» LCR A2,A6 LOAD DWT INDEX «, t00=0x001d, t01=0x0016}
0x2d7c…2da0 Head {h00=0x0020, h01=0x0050, text=» LD A6,2,A6 LOAD DWT ADDRESS«, t00=0x001d, t01=0x0038}
0x2da0…2db8 Head {h00=0x0014, h01=0x0050, text=»FND210 RF IHRET1«, t00=0x001d, t01=0x005c}
0x2db8…2dc6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001d, t01=0x0074}
0x2dc6…2dd0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0082}
0x2dd0…2dda Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x008c}
0x2dda…2df0 Head {h00=0x0012, h01=0x0050, text=»* F N D T I D «, t00=0x001d, t01=0x0096}
0x2df0…2dfa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00ac}
0x2dfa…2e04 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x00b6}
0x2e04…2e4a Head {h00=0x0042, h01=0x0050, text=»* SUBROUTINE TO FIND TTAB ADDRESS FROM TERMINAL IDENTIFICATION«, t00=0x001d, t01=0x00c0}
0x2e4a…2e54 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0106}
0x2e54…2e5e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0110}
0x2e5e…2e78 Head {h00=0x0016, h01=0x0050, text=»* ENTRY PARAMETER:«, t00=0x001d, t01=0x011a}
0x2e78…2e82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0134}
0x2e82…2ea8 Head {h00=0x0022, h01=0x0050, text=»* A7 = TERMINAL IDNETIFICATION«, t00=0x001d, t01=0x013e}
0x2ea8…2eb2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x0164}
0x2eb2…2ebc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001d, t01=0x016e}
0x2ebc…2ed6 Head {h00=0x0016, h01=0x0050, text=»* EXIT PARAMETER: «, t00=0x001d, t01=0x0178}
0x2ed6…2ee0 (30, 0, 400) Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0004}
0x2ee0…2efc Head {h00=0x0018, h01=0x0050, text=»* A2 = TTAB ADDRESS «, t00=0x001e, t01=0x000e}
0x2efc…2f2e Head {h00=0x002e, h01=0x0050, text=»* A2 = 0 INDICATES ILLEGAL IDENTIFICATION «, t00=0x001e, t01=0x002a}
0x2f2e…2f38 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x005c}
0x2f38…2f42 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001e, t01=0x0066}
0x2f42…2f68 Head {h00=0x0022, h01=0x0050, text=»FNDTID STR A1,A15 SAVE REG. A1«, t00=0x001e, t01=0x0070}
0x2f68…2f8a Head {h00=0x001e, h01=0x0050, text=» LD* A1,TCTAB TCTAB LENGTH«, t00=0x001e, t01=0x0096}
0x2f8a…2f9e Head {h00=0x0010, h01=0x0050, text=» AD A1,TCTAB«, t00=0x001e, t01=0x00b8}
0x2f9e…2fa6 Head {h00=0x0004, h01=0x0050, t00=0x001e, t01=0x00cc}
0x2fa6…2fbe Head {h00=0x0014, h01=0x0050, text=»FTI010 SUK A1,2 «, t00=0x001e, t01=0x00d4}
0x2fbe…2fd2 Head {h00=0x0010, h01=0x0050, text=» CW A1,TCTAB«, t00=0x001e, t01=0x00ec}
0x2fd2…2ffa Head {h00=0x0024, h01=0x0050, text=» RF(E) FTI030 ALL TTABS EXAMINED«, t00=0x001e, t01=0x0100}
0x2ffa…301a Head {h00=0x001c, h01=0x0050, text=» LDR* A2,A1 TTAB ADDRESS«, t00=0x001e, t01=0x0128}
0x301a…303e Head {h00=0x0020, h01=0x0050, text=» RB(Z) FTI010 NOT IN SYSTEM «, t00=0x001e, t01=0x0148}
0x303e…306e Head {h00=0x002c, h01=0x0050, text=» CW A7,TTB:ID,A2 COMPARE IDENTIFICATIONS«, t00=0x001e, t01=0x016c}
0x306e…3098 Head {h00=0x0026, h01=0x0050, text=» RB(NE) FTI010 NO MATCH. TRY NEXT «, t00=0x001f, t01=0x000c}
0x3098…30a0 Head {h00=0x0004, h01=0x0050, t00=0x001f, t01=0x0036}
0x30a0…30b8 Head {h00=0x0014, h01=0x0050, text=»FTI020 RF IHRET1«, t00=0x001f, t01=0x003e}
0x30b8…30e8 Head {h00=0x002c, h01=0x0050, text=»FTI030 SUR A2,A2 ILLEGAL IDENTIFICATION «, t00=0x001f, t01=0x0056}
0x30e8…30fa Head {h00=0x000e, h01=0x0050, text=» RF IHRET1«, t00=0x001f, t01=0x0086}
0x30fa…3108 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x001f, t01=0x0098}
0x3108…3112 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00a6}
0x3112…311c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00b0}
0x311c…3144 Head {h00=0x0024, h01=0x0050, text=»* T E N D I O , T A B I O «, t00=0x001f, t01=0x00ba}
0x3144…314e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00e2}
0x314e…3158 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x00ec}
0x3158…318a Head {h00=0x002e, h01=0x0050, text=»* THIS MODULE IS CALLED WHEN COMPLETION OF«, t00=0x001f, t01=0x00f6}
0x318a…31a0 Head {h00=0x0012, h01=0x0050, text=»* I/O OCCURS. «, t00=0x001f, t01=0x0128}
0x31a0…31aa Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x013e}
0x31aa…31d6 Head {h00=0x0028, h01=0x0050, text=»* - IF I/O AND ACTIVATION REQUEST:- «, t00=0x001f, t01=0x0148}
0x31d6…31e0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x001f, t01=0x0174}
0x31e0…320e Head {h00=0x002a, h01=0x0050, text=»* ACTOT IS CALLED TO START THE TASK «, t00=0x001f, t01=0x017e}
0x320e…3218 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x001c}
0x3218…323c Head {h00=0x0020, h01=0x0050, text=»* -IF NORMAL I/O WITH WAIT:-«, t00=0x0020, t01=0x0026}
0x323c…3246 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x004a}
0x3246…3274 Head {h00=0x002a, h01=0x0050, text=»* QTJOB IS CALLED TO QUEUE THE TASK «, t00=0x0020, t01=0x0054}
0x3274…32b0 Head {h00=0x0038, h01=0x0050, text=»* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- «, t00=0x0020, t01=0x0082}
0x32b0…32ba Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00be}
0x32ba…32d8 Head {h00=0x001a, h01=0x0050, text=»* A5 = TTAB-ADDRESS «, t00=0x0020, t01=0x00c8}
0x32d8…32e2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x00e6}
0x32e2…330a Head {h00=0x0024, h01=0x0050, text=»* -IF NORMAL I/O WITH NO WAIT:- «, t00=0x0020, t01=0x00f0}
0x330a…3314 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0118}
0x3314…3332 Head {h00=0x001a, h01=0x0050, text=»* NO ACTION REQUIRED«, t00=0x0020, t01=0x0122}
0x3332…333c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0020, t01=0x0140}
0x333c…3380 Head {h00=0x0040, h01=0x0050, text=»* IF AN EVENT WAS QUEUED FOR THIS DEVICE (DWTECQ NOT = ZERO)«, t00=0x0020, t01=0x014a}
0x3380…33cc Head {h00=0x0048, h01=0x0050, text=»* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION«, t00=0x0020, t01=0x018e}
0x33cc…33d6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x004a}
0x33d6…340a Head {h00=0x0030, h01=0x0050, text=»* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- «, t00=0x0021, t01=0x0054}
0x340a…3414 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0088}
0x3414…3430 Head {h00=0x0018, h01=0x0050, text=»* A1 = RETURN CODE«, t00=0x0021, t01=0x0092}
0x3430…344c Head {h00=0x0018, h01=0x0050, text=»* A6 = DWT ADDRESS«, t00=0x0021, t01=0x00ae}
0x344c…3470 Head {h00=0x0020, h01=0x0050, text=»* NO REGISTERS ARE DESTROYED«, t00=0x0021, t01=0x00ca}
0x3470…347a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x00ee}
0x347a…34b4 Head {h00=0x0036, h01=0x0050, text=»* N.B. THE ECB RETURN CODE IS UPDATED BY MEANS OF «, t00=0x0021, t01=0x00f8}
0x34b4…34d2 Head {h00=0x001a, h01=0x0050, text=»* AN 'ORS' INSTRUCTION«, t00=0x0021, t01=0x0132}
0x34d2…34dc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x0150}
0x34dc…34e6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0021, t01=0x015a}
0x34e6…3530 Head {h00=0x0046, h01=0x0050, text=»* TABIO HAS THE SAME FUNCTION AS TENDIO EXCEPT ABORT PARAMETER A7«, t00=0x0021, t01=0x0164}
0x3530…357a Head {h00=0x0046, h01=0x0050, text=»* WILL BE SET TO 1 BEFORE ACTOT IS CALLED IN CASE OF ACTIVATION. «, t00=0x0022, t01=0x001e}
0x357a…35aa Head {h00=0x002c, h01=0x0050, text=»* (FOR TENDIO THE ABORT PARAMETER = 0) «, t00=0x0022, t01=0x0068}
0x35aa…35b8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0022, t01=0x0098}
0x35b8…35c2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00a6}
0x35c2…35fa Head {h00=0x0034, h01=0x0050, text=»* CHECK IF ANY TERMINAL ON QUEUE FOR THIS DEVICE«, t00=0x0022, t01=0x00b0}
0x35fa…3604 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0022, t01=0x00e8}
0x3604…3618 Head {h00=0x0010, h01=0x0050, text=»TABIO EQU * «, t00=0x0022, t01=0x00f2}
0x3618…3640 Head {h00=0x0024, h01=0x0050, text=» CF A15,SAVE8 SAVE REG ON STACK «, t00=0x0022, t01=0x0106}
0x3640…3664 Head {h00=0x0020, h01=0x0050, text=» LDK A7,1 ABORT PARAMETER=1 «, t00=0x0022, t01=0x012e}
0x3664…3676 Head {h00=0x000e, h01=0x0050, text=» RF TEN100«, t00=0x0022, t01=0x0152}
0x3676…368a Head {h00=0x0010, h01=0x0050, text=»TENDIO EQU *«, t00=0x0022, t01=0x0164}
0x368a…36b4 Head {h00=0x0026, h01=0x0050, text=» CF A15,SAVE8 SAVE A1-A8 ON STACK «, t00=0x0022, t01=0x0178}
0x36b4…36e6 Head {h00=0x002e, h01=0x0050, text=» LDK A7,0 ABORT PARAMETER=0 (NO ABORTION) «, t00=0x0023, t01=0x0012}
0x36e6…36fa Head {h00=0x0010, h01=0x0050, text=»TEN100 EQU *«, t00=0x0023, t01=0x0044}
0x36fa…3722 Head {h00=0x0024, h01=0x0050, text=» LD A5,DWTTQ,A6 ANY TASK QUEUED?«, t00=0x0023, t01=0x0058}
0x3722…373a Head {h00=0x0014, h01=0x0050, text=» RF(Z) TEN110 NO«, t00=0x0023, t01=0x0080}
0x373a…3742 Head {h00=0x0004, h01=0x0050, t00=0x0023, t01=0x0098}
0x3742…3762 Head {h00=0x001c, h01=0x0050, text=» LD A2,2,A5 TASK STATUS «, t00=0x0023, t01=0x00a0}
0x3762…3788 Head {h00=0x0022, h01=0x0050, text=» RF(N) TEN105 DM REQUEST NEXT «, t00=0x0023, t01=0x00c0}
0x3788…37aa Head {h00=0x001e, h01=0x0050, text=» LDKL A2,/800 ATTACH BIT 4«, t00=0x0023, t01=0x00e6}
0x37aa…37c2 Head {h00=0x0014, h01=0x0050, text=» AN A2,DWTST,A6 «, t00=0x0023, t01=0x0108}
0x37c2…37ec Head {h00=0x0026, h01=0x0050, text=» RF(Z) TEN105 DEVICE NOT ATTACHED «, t00=0x0023, t01=0x0120}
0x37ec…381c Head {h00=0x002c, h01=0x0050, text=» CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK?«, t00=0x0023, t01=0x014a}
0x381c…3848 Head {h00=0x0028, h01=0x0050, text=» RF(NE) TEN110 YES, DON'T QUEUE TASK«, t00=0x0023, t01=0x017a}
0x3848…385c Head {h00=0x0010, h01=0x0050, text=»TEN105 EQU *«, t00=0x0024, t01=0x0016}
0x385c…3890 Head {h00=0x0030, h01=0x0050, text=» LDR* A3,A5 YES: UPDATE QUEUE ANCHOR ADDRESS«, t00=0x0024, t01=0x002a}
0x3890…38a8 Head {h00=0x0014, h01=0x0050, text=» ST A3,DWTTQ,A6 «, t00=0x0024, t01=0x005e}
0x38a8…38da Head {h00=0x002e, h01=0x0050, text=» CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST«, t00=0x0024, t01=0x0076}
0x38da…38e8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0024, t01=0x00a8}
0x38e8…38f2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00b6}
0x38f2…38fc Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00c0}
0x38fc…3918 Head {h00=0x0018, h01=0x0050, text=»* UPDATE ECB AND DWT«, t00=0x0024, t01=0x00ca}
0x3918…3922 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00e6}
0x3922…392c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0024, t01=0x00f0}
0x392c…3934 Head {h00=0x0004, h01=0x0050, t00=0x0024, t01=0x00fa}
0x3934…3948 Head {h00=0x0010, h01=0x0050, text=»TEN110 EQU *«, t00=0x0024, t01=0x0102}
0x3948…397a Head {h00=0x002e, h01=0x0050, text=» LD A5,DWTTAB,A6 GET TTAB ADDRESS FROM DWT«, t00=0x0024, t01=0x0116}
0x397a…3990 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,TIODM«, t00=0x0024, t01=0x0148}
0x3990…39a8 Head {h00=0x0014, h01=0x0050, text=» CW A2,DWTADR,A6«, t00=0x0024, t01=0x015e}
0x39a8…39cc Head {h00=0x0020, h01=0x0050, text=» RF(NZ) TEN115 NO DM REQUEST«, t00=0x0024, t01=0x0176}
0x39cc…39f6 Head {h00=0x0026, h01=0x0050, text=» LD A5,DWTTDM,A6 GET TTAB ADDRESS «, t00=0x0025, t01=0x000a}
0x39f6…3a2a Head {h00=0x0030, h01=0x0050, text=» CF A15,REQEND RESET REQ BUSY FOR ALL FILES «, t00=0x0025, t01=0x0034}
0x3a2a…3a3e Head {h00=0x0010, h01=0x0050, text=»TEN115 EQU *«, t00=0x0025, t01=0x0068}
0x3a3e…3a54 Head {h00=0x0012, h01=0x0050, text=» LDKL A2,/8000«, t00=0x0025, t01=0x007c}
0x3a54…3a8a Head {h00=0x0032, h01=0x0050, text=» ORS A2,DWTST,A6 INDICATE DEVICE READY IN DWT «, t00=0x0025, t01=0x0092}
0x3a8a…3abc Head {h00=0x002e, h01=0x0050, text=» LDKL A3,/DBFF RESET ECHO-BIT AND BITS 5,6«, t00=0x0025, t01=0x00c8}
0x3abc…3af2 Head {h00=0x0032, h01=0x0050, text=» ANS A3,DWTST,A6 RESET ECHO-BIT IN STATUS DWT «, t00=0x0025, t01=0x00fa}
0x3af2…3b1a Head {h00=0x0024, h01=0x0050, text=» LD A3,DWTECB,A6 GET ECB ADDRESS«, t00=0x0025, t01=0x0130}
0x3b1a…3b58 Head {h00=0x003a, h01=0x0050, text=» RF(Z) TEN130 BRANCH IF ENTERED FROM ECHO OR RECOVERY «, t00=0x0025, t01=0x0158}
0x3b58…3b86 Head {h00=0x002a, h01=0x0050, text=» ORRS A2,A3 SET EVENT COMPLETED IN ECB«, t00=0x0026, t01=0x0008}
0x3b86…3bb2 Head {h00=0x0028, h01=0x0050, text=» ORS A1,8,A3 SET RETURN CODE IN ECB «, t00=0x0026, t01=0x0036}
0x3bb2…3bda Head {h00=0x0024, h01=0x0050, text=» CM DWTECB,A6 RESET ECB ADDRESS «, t00=0x0026, t01=0x0062}
0x3bda…3be8 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0026, t01=0x008a}
0x3be8…3bf2 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x0098}
0x3bf2…3c18 Head {h00=0x0022, h01=0x0050, text=»* CHECK IF WAIT OR ACTIVATION «, t00=0x0026, t01=0x00a2}
0x3c18…3c22 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0026, t01=0x00c8}
0x3c22…3c56 Head {h00=0x0030, h01=0x0050, text=» LD A4,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR«, t00=0x0026, t01=0x00d2}
0x3c56…3c82 Head {h00=0x0028, h01=0x0050, text=» RF(Z) TEN130 NOT WAIT OR ACTIVATION«, t00=0x0026, t01=0x0106}
0x3c82…3c94 Head {h00=0x000e, h01=0x0050, text=» CWK A4,1 «, t00=0x0026, t01=0x0132}
0x3c94…3cae Head {h00=0x0016, h01=0x0050, text=» RF(E) TEN120 WAIT«, t00=0x0026, t01=0x0144}
0x3cae…3cea Head {h00=0x0038, h01=0x0050, text=» CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR«, t00=0x0026, t01=0x015e}
0x3cea…3d1c Head {h00=0x002e, h01=0x0050, text=» CF A15,ACTOTP ACTIVATE TASK ON LIFO BASIS«, t00=0x0027, t01=0x000a}
0x3d1c…3d36 Head {h00=0x0016, h01=0x0050, text=» RF TEN130 RETURN «, t00=0x0027, t01=0x003c}
0x3d36…3d4a Head {h00=0x0010, h01=0x0050, text=»TEN120 EQU *«, t00=0x0027, t01=0x0056}
0x3d4a…3d80 Head {h00=0x0032, h01=0x0050, text=» CF A15,QTJOB WAIT: QUEUE TASK FOR DISPATCHING«, t00=0x0027, t01=0x006a}
0x3d80…3d94 Head {h00=0x0010, h01=0x0050, text=»TEN130 EQU *«, t00=0x0027, t01=0x00a0}
0x3d94…3da2 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0027, t01=0x00b4}
0x3da2…3dac Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00c2}
0x3dac…3db6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x00cc}
0x3db6…3de6 Head {h00=0x002c, h01=0x0050, text=»* RESTORE REGISTERS AND RETURN WITHOUT«, t00=0x0027, t01=0x00d6}
0x3de6…3e04 Head {h00=0x001a, h01=0x0050, text=»* ENABLE INTERRUPTS «, t00=0x0027, t01=0x0106}
0x3e04…3e0e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x0124}
0x3e0e…3e18 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0027, t01=0x012e}
0x3e18…3e32 Head {h00=0x0016, h01=0x0050, text=»IHRET8 LDR* A8,A15«, t00=0x0027, t01=0x0138}
0x3e32…3e4c Head {h00=0x0016, h01=0x0050, text=»IHRET7 LDR* A7,A15«, t00=0x0027, t01=0x0152}
0x3e4c…3e66 Head {h00=0x0016, h01=0x0050, text=»IHRET6 LDR* A6,A15«, t00=0x0027, t01=0x016c}
0x3e66…3e80 Head {h00=0x0016, h01=0x0050, text=»IHRET5 LDR* A5,A15«, t00=0x0027, t01=0x0186}
0x3e80…3e9a Head {h00=0x0016, h01=0x0050, text=»IHRET4 LDR* A4,A15«, t00=0x0028, t01=0x0010}
0x3e9a…3eb4 Head {h00=0x0016, h01=0x0050, text=»IHRET3 LDR* A3,A15«, t00=0x0028, t01=0x002a}
0x3eb4…3ece Head {h00=0x0016, h01=0x0050, text=»IHRET2 LDR* A2,A15«, t00=0x0028, t01=0x0044}
0x3ece…3ee8 Head {h00=0x0016, h01=0x0050, text=»IHRET1 LDR* A1,A15«, t00=0x0028, t01=0x005e}
0x3ee8…3efa Head {h00=0x000e, h01=0x0050, text=»IHRTN INH «, t00=0x0028, t01=0x0078}
0x3efa…3f22 Head {h00=0x0024, h01=0x0050, text=» ADKL A15,4 ADJUST STACK POINTER«, t00=0x0028, t01=0x008a}
0x3f22…3f3e Head {h00=0x0018, h01=0x0050, text=» ABR* A15 AND RETURN«, t00=0x0028, t01=0x00b2}
0x3f3e…3f4c Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x0028, t01=0x00ce}
0x3f4c…3f56 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00dc}
0x3f56…3f60 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x00e6}
0x3f60…3f78 Head {h00=0x0014, h01=0x0050, text=»* P F I N I T «, t00=0x0028, t01=0x00f0}
0x3f78…3f82 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x0108}
0x3f82…3fac Head {h00=0x0026, h01=0x0050, text=»* SUBROUTINE TO RESTART DEVICES.«, t00=0x0028, t01=0x0112}
0x3fac…3fb6 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0028, t01=0x013c}
0x3fb6…3ffa Head {h00=0x0040, h01=0x0050, text=»* ALL RESTART ROUTINES GIVEN IN TABLE 'PFTAB' ARE CALLED. «, t00=0x0028, t01=0x0146}
0x3ffa…403e Head {h00=0x0040, h01=0x0050, text=»* REGISTERS A1-A8 ARE AVAILABLE FOR THE RESTART ROUTINES. «, t00=0x0028, t01=0x018a}
0x403e…4048 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x003e}
0x4048…4052 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x0029, t01=0x0048}
0x4052…4066 Head {h00=0x0010, h01=0x0050, text=»PFINIT EQU *«, t00=0x0029, t01=0x0052}
0x4066…4092 Head {h00=0x0028, h01=0x0050, text=» LDK A1,2 SET INDEX TO FIRST ROUTINE«, t00=0x0029, t01=0x0066}
0x4092…40ba Head {h00=0x0024, h01=0x0050, text=»PFI100 CW A1,PFTAB CHECK IF LAST«, t00=0x0029, t01=0x0092}
0x40ba…40de Head {h00=0x0020, h01=0x0050, text=» RF(NL) PFI110 ALL RESTARTED«, t00=0x0029, t01=0x00ba}
0x40de…40fa Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 SAVE A1 «, t00=0x0029, t01=0x00de}
0x40fa…4128 Head {h00=0x002a, h01=0x0050, text=» CFI A15,PFTAB,A1 CALL RESTART MODULE «, t00=0x0029, t01=0x00fa}
0x4128…4148 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A15 RESTORE A1 «, t00=0x0029, t01=0x0128}
0x4148…4166 Head {h00=0x001a, h01=0x0050, text=» ADK A1,2 NEXT DEVICE «, t00=0x0029, t01=0x0148}
0x4166…4178 Head {h00=0x000e, h01=0x0050, text=» RB PFI100«, t00=0x0029, t01=0x0166}
0x4178…41a8 Head {h00=0x002c, h01=0x0050, text=»PFI110 RF SWLRTN RETURN WHEN ALL STARTED«, t00=0x0029, t01=0x0178}
0x41a8…41b6 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002a, t01=0x0018}
0x41b6…41c0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0026}
0x41c0…41ca Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0030}
0x41ca…41e0 Head {h00=0x0012, h01=0x0050, text=»* S W L 4 8 «, t00=0x002a, t01=0x003a}
0x41e0…41ea Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0050}
0x41ea…4228 Head {h00=0x003a, h01=0x0050, text=»* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48.«, t00=0x002a, t01=0x005a}
0x4228…4232 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0098}
0x4232…423c Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x00a2}
0x423c…4250 Head {h00=0x0010, h01=0x0050, text=»SWL48 EQU * «, t00=0x002a, t01=0x00ac}
0x4250…425c Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002a, t01=0x00c0}
0x425c…4270 Head {h00=0x0010, h01=0x0050, text=» STR A1,A15 «, t00=0x002a, t01=0x00cc}
0x4270…4298 Head {h00=0x0024, h01=0x0050, text=» LDKL A1,/C000 PSW FOR LEVEL 48 «, t00=0x002a, t01=0x00e0}
0x4298…42c2 Head {h00=0x0026, h01=0x0050, text=» ST A1,4,A15 SAVE IT ON A15 STACK «, t00=0x002a, t01=0x0108}
0x42c2…42e2 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A15 RESTORE A1 «, t00=0x002a, t01=0x0132}
0x42e2…4314 Head {h00=0x002e, h01=0x0050, text=»SWLRTN ABL RTNA15 RETURN TO CALLER AND ENB«, t00=0x002a, t01=0x0152}
0x4314…431e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002a, t01=0x0184}
0x431e…4334 Head {h00=0x0012, h01=0x0050, text=» EJECT MSUBS«, t00=0x002a, t01=0x018e}
0x4334…433e Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x0014}
0x433e…4348 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x001e}
0x4348…435e Head {h00=0x0012, h01=0x0050, text=»* S W L X Y«, t00=0x002b, t01=0x0028}
0x435e…4368 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x003e}
0x4368…43a4 Head {h00=0x0038, h01=0x0050, text=»* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO:«, t00=0x002b, t01=0x0048}
0x43a4…43d0 Head {h00=0x0028, h01=0x0050, text=»* :=48 IF LEVEL ON STACK IS >=48 «, t00=0x002b, t01=0x0084}
0x43d0…43fc Head {h00=0x0028, h01=0x0050, text=»* :=XY " " " " " XY<48«, t00=0x002b, t01=0x00b0}
0x43fc…4406 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00dc}
0x4406…4410 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002b, t01=0x00e6}
0x4410…4424 Head {h00=0x0010, h01=0x0050, text=»SWLXY EQU * «, t00=0x002b, t01=0x00f0}
0x4424…4430 Head {h00=0x0008, h01=0x0050, text=» INH«, t00=0x002b, t01=0x0104}
0x4430…444c Head {h00=0x0018, h01=0x0050, text=» STR A1,A15 SAVE A1 «, t00=0x002b, t01=0x0110}
0x444c…4462 Head {h00=0x0012, h01=0x0050, text=» LDKL A1,/7FF «, t00=0x002b, t01=0x012c}
0x4462…448e Head {h00=0x0028, h01=0x0050, text=» ANS A1,4,A15 CLEAR LEVEL TO BE SET «, t00=0x002b, t01=0x0142}
0x448e…44b8 Head {h00=0x0026, h01=0x0050, text=» LC A1,28,A15 GET LEVEL FROM STACK«, t00=0x002b, t01=0x016e}
0x44b8…44cc Head {h00=0x0010, h01=0x0050, text=» ANK A1,/FC «, t00=0x002c, t01=0x0008}
0x44cc…44f6 Head {h00=0x0026, h01=0x0050, text=» CWK A1,/C0 LEVEL IS IN BITS 8-13 «, t00=0x002c, t01=0x001c}
0x44f6…4518 Head {h00=0x001e, h01=0x0050, text=» RF(NL) LEV48 LEVEL >= 48?«, t00=0x002c, t01=0x0046}
0x4518…452e Head {h00=0x0012, h01=0x0050, text=» ECR A1,A1 NO «, t00=0x002c, t01=0x0068}
0x452e…456a Head {h00=0x0038, h01=0x0050, text=» ORK A1,/C0 SET RUN AND ENABLE FLIP FLOPS (BITS 8&9)«, t00=0x002c, t01=0x007e}
0x456a…4574 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x00ba}
0x4574…4588 Head {h00=0x0010, h01=0x0050, text=»SETLEV EQU *«, t00=0x002c, t01=0x00c4}
0x4588…45b4 Head {h00=0x0028, h01=0x0050, text=» ORS A1,4,A15 SET NEW LEVEL ON STACK«, t00=0x002c, t01=0x00d8}
0x45b4…45d4 Head {h00=0x001c, h01=0x0050, text=» LDR* A1,A15 RESTORE A1 «, t00=0x002c, t01=0x0104}
0x45d4…45e4 Head {h00=0x000c, h01=0x0050, text=» RTN A15«, t00=0x002c, t01=0x0124}
0x45e4…45ee Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002c, t01=0x0134}
0x45ee…4612 Head {h00=0x0020, h01=0x0050, text=»LEV48 EQU * LEVEL WAS >= 48 «, t00=0x002c, t01=0x013e}
0x4612…4646 Head {h00=0x0030, h01=0x0050, text=» LDKL A1,/C0C0 SET LEVEL TO 48 AND BITS 8&9 «, t00=0x002c, t01=0x0162}
0x4646…4658 Head {h00=0x000e, h01=0x0050, text=» RB SETLEV«, t00=0x002d, t01=0x0008}
0x4658…4662 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x001a}
0x4662…4670 Head {h00=0x000a, h01=0x0050, text=» EJECT«, t00=0x002d, t01=0x0024}
0x4670…467a Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0032}
0x467a…46a6 Head {h00=0x0028, h01=0x0050, text=»* INTERRUPT SAVE AND HALT MODULE «, t00=0x002d, t01=0x003c}
0x46a6…46b0 Head {h00=0x0006, h01=0x0050, text=»* «, t00=0x002d, t01=0x0068}
0x46b0…46c6 Head {h00=0x0012, h01=0x0050, text=»INTSAV DATA 0 «, t00=0x002d, t01=0x0072}
0x46c6…46dc Head {h00=0x0012, h01=0x0050, text=»SAVA15 DATA 0 «, t00=0x002d, t01=0x0088}
0x46dc…4702 Head {h00=0x0022, h01=0x0050, text=»ILLINT LDK A1,5 HALT PARAMETER«, t00=0x002d, t01=0x009e}
0x4702…4716 Head {h00=0x0010, h01=0x0050, text=» CF A15,HALT«, t00=0x002d, t01=0x00c4}
0x4716…4728 Head {h00=0x000e, h01=0x0050, text=»HALT EQU *«, t00=0x002d, t01=0x00d8}
0x4728…473e Head {h00=0x0012, h01=0x0050, text=» CF A15,SAVE8 «, t00=0x002d, t01=0x00ea}
0x473e…4752 Head {h00=0x0010, h01=0x0050, text=» STR A9,A15 «, t00=0x002d, t01=0x0100}
0x4752…4766 Head {h00=0x0010, h01=0x0050, text=» STR A10,A15«, t00=0x002d, t01=0x0114}
0x4766…477a Head {h00=0x0010, h01=0x0050, text=» STR A11,A15«, t00=0x002d, t01=0x0128}
0x477a…478e Head {h00=0x0010, h01=0x0050, text=» STR A12,A15«, t00=0x002d, t01=0x013c}
0x478e…47a2 Head {h00=0x0010, h01=0x0050, text=» STR A13,A15«, t00=0x002d, t01=0x0150}
0x47a2…47b6 Head {h00=0x0010, h01=0x0050, text=» STR A14,A15«, t00=0x002d, t01=0x0164}
0x47b6…47cc Head {h00=0x0012, h01=0x0050, text=» ST A15,SAVA15«, t00=0x002d, t01=0x0178}
0x47cc…47f8 Head {h00=0x0028, h01=0x0050, text=» OTR A1,0,SOP INDICATE TYPE OF HALT «, t00=0x002d, t01=0x018e}
0x47f8…4804 Head {h00=0x0008, h01=0x0050, text=» HLT«, t00=0x002e, t01=0x002a}
0x4804…4810 Head {h00=0x0008, h01=0x0050, text=» END«, t00=0x002e, t01=0x0036}
0x4810…4814 Head {h00=0x4004, h01=0x0000}
0x4814…4818 00 2e 00 42 ┆ . B┆
0x4818…4820 (47, 1, 8) 20 04 00 00 00 2f 00 04 ┆ / ┆
0x4820…4870 (48, 2, 126) 00 57 01 54 00 73 50 16 00 77 52 34 00 81 00 88 00 87 00 f0 00 02 01 60 00 48 00 44 04 21 36 90 00 9b 50 0a 00 b3 50 16 00 bb 01 42 00 c7 01 54 00 d7 50 16 00 e3 00 ec 00 eb 01 0a 01 17 54 08 01 1d 01 42 01 1f 57 30 01 29 54 26 01 2f 01 42 ┆ W T sP wR4 ` H D !6 P P B T P T B W0 )T& / B┆
0x4870…489e 01 41 57 0e 01 49 50 06 01 6d 55 0a 01 8d 50 0a 00 03 00 1c 00 0e 00 0a 07 04 00 00 00 00 01 9e 00 00 00 03 00 68 40 04 00 00 00 03 00 7a ┆ AW IP mU P h@ z┆
0x489e…48ee (49, 2, 228) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 44 52 49 43 30 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 31 20 37 38 2d 30 34 2d 32 31 20 20 38 37 30 31 30 35 30 34 30 38 31 30 00 00 00 04 00 1a ┆ J F IDENT DRIC0X REL 8.1 78-04-21 870105040810 ┆
0x48ee…493e 00 16 01 0a c4 49 54 41 42 52 54 cc a4 49 54 41 44 49 a4 49 54 41 44 4f 00 00 00 52 00 0e 00 0a 05 04 bc 49 54 41 44 49 00 00 00 00 00 70 00 0e 00 0a 05 04 bc 49 54 41 44 4f 00 00 00 00 00 82 00 0c 00 08 02 03 a2 49 48 52 54 4e 00 00 00 94 ┆ ITABRT ITADI ITADO R ITADI p ITADO IHRTN ┆
0x493e…4982 00 10 00 0c 05 05 dc 49 54 41 42 52 54 cc 00 00 00 00 00 a4 00 12 00 0e 03 06 00 00 00 01 40 00 8f 20 00 00 00 02 00 00 00 b8 00 0e 00 0a 07 04 00 00 00 00 00 04 00 00 00 00 00 ce 40 04 00 00 00 00 00 e0 ┆ ITABRT @ @ ┆
0x4982…49d2 (50, 0, 398) 00 4a 00 46 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 41 54 54 41 43 48 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 52 45 4c 20 38 2e 31 20 37 38 2d 30 34 2d 32 31 20 20 38 37 30 31 30 35 30 34 30 38 31 30 00 00 00 04 00 1e ┆ J F IDENT ATTACH REL 8.1 78-04-21 870105040810 ┆
0x49d2…4a22 00 1a 01 0c c4 41 54 54 41 43 48 cc c4 44 45 54 41 43 48 ff c4 41 54 54 3a 43 48 c1 00 00 00 52 00 10 00 0c 05 05 dc 41 54 54 41 43 48 cc 00 00 00 00 00 74 00 0e 00 0a 02 04 c2 54 54 42 3a 53 54 c1 00 00 00 88 00 2c 00 28 03 13 00 00 00 01 ┆ ATTACH DETACH ATT:CH R ATTACH t TTB:ST , ( ┆
0x4a22…4a72 01 10 84 10 54 00 a0 43 00 08 82 20 40 00 a2 54 00 00 00 02 50 00 b2 55 00 00 00 02 57 00 82 20 08 00 00 00 00 9a 00 0c 00 08 02 03 a2 44 57 54 53 54 00 00 00 ca 00 0e 00 0a 02 04 c2 44 57 54 54 41 42 00 00 00 00 da 00 0c 00 08 02 03 a2 54 ┆ T C @ T P U W DWTST DWTTAB T┆
0x4a72…4ac2 49 4f 44 4d 00 00 00 ec 00 2c 00 28 03 13 00 00 00 1d 22 24 81 08 a2 58 00 00 00 04 54 00 83 58 00 00 00 04 56 00 a9 59 00 00 00 04 85 59 00 00 00 06 84 20 00 00 00 fc 00 0e 00 0a 02 04 c2 44 57 54 41 44 52 c5 00 00 01 2c 00 0e 00 0a 02 04 ┆IODM , ( "$ X T X V Y Y DWTADR , ┆
0x4ac2…4b10 c2 46 52 45 42 4c 4b d3 00 00 01 3e 00 2c 00 28 03 13 00 00 00 35 90 00 00 00 00 08 ec 58 00 00 00 0a 54 00 f7 a1 00 00 f7 a1 00 00 84 10 50 00 a0 71 00 02 83 30 83 29 00 00 01 50 00 0e 00 0a 02 04 c2 54 49 4f 45 52 52 56 00 00 01 80 ┆ FREBLK > , ( 5 X T P q 0 ) P TIOERRV ┆
0x4b10…4b60 (51, 0, 400) 00 2c 00 28 03 13 00 00 00 51 44 10 f7 a1 00 00 00 0c 03 00 8f 20 00 00 00 0e 83 20 80 00 5f 0a ed 58 00 00 00 06 58 0c f7 a1 00 00 00 01 00 04 00 0e 00 0a 02 04 c2 47 45 54 42 4c 4b 4b 00 01 00 34 00 2c 00 28 03 13 00 00 00 6b 00 08 84 10 ┆ , ( QD _ X X GETBLKK 4 , ( k ┆
0x4b60…4bb0 54 00 81 42 00 0a 5a 1a 54 00 03 40 5f 24 81 41 00 00 81 14 f7 a1 00 00 00 10 81 40 00 00 00 01 00 46 00 0e 00 0a 02 04 c2 53 45 54 49 4d 50 4b 00 01 00 76 00 0e 00 0a 02 04 c2 54 49 4f 51 32 30 42 00 01 00 88 00 10 00 0c 05 05 dc 44 45 54 ┆T B Z T @_$ A @ F SETIMPK v TIOQ20B DET┆
0x4bb0…4c00 41 43 48 ff 00 a0 00 01 00 9a 00 2c 00 28 03 13 00 00 00 89 02 08 81 31 84 41 00 00 14 02 81 18 f7 a1 00 00 00 12 00 00 00 00 04 00 8f 20 00 00 00 14 84 10 5c 4e 00 01 00 ae 00 2c 00 28 03 13 00 00 00 a5 11 12 81 20 08 00 a1 58 00 00 00 04 ┆ACH , ( 1 A N , ( X ┆
0x4c00…4c50 58 54 ed 58 00 00 00 06 5c 5a b1 59 00 00 00 04 84 20 00 00 00 08 00 01 00 de 00 2c 00 28 03 13 00 00 00 bd 40 00 ec 58 00 00 00 0a 54 00 f7 a1 00 00 5f 74 82 18 f7 a1 00 00 5f 7c 86 04 82 28 12 02 85 28 f7 a1 00 01 01 0e 00 0c 00 08 02 03 ┆XT X Z Y , ( @ X T _t _| ( ( ┆
0x4c50…4ca0 a2 44 57 54 54 51 00 01 01 3e 00 2c 00 28 03 13 00 00 00 db 08 80 00 00 81 30 81 29 f7 a1 00 00 00 0c 81 18 91 20 00 00 00 16 82 04 81 24 54 00 81 20 40 00 a9 55 00 01 01 4e 00 0c 00 08 02 03 a2 54 44 49 53 50 00 01 01 7e 00 0e 00 0a 02 04 ┆ DWTTQ > , ( 0 ) $T @ U N TDISP ~ ┆
0x4ca0…4cf0 (52, 0, 400) c2 54 54 42 3a 53 41 4b 00 01 01 8e 00 0c 00 08 02 03 a2 54 50 51 55 45 00 02 00 10 00 2c 00 28 03 13 00 00 00 f7 90 10 00 00 00 02 8f 20 00 00 00 18 e9 14 5c 16 81 24 81 29 03 04 93 55 00 00 00 1a f7 a1 00 00 8f 20 00 02 00 20 00 10 00 0c ┆ TTB:SAK TPQUE , ( $ ) U ┆
0x4cf0…4d40 05 05 dc 41 54 54 3a 43 48 c1 01 12 00 02 00 50 00 0c 00 08 02 03 a2 49 48 52 54 4e 00 02 00 64 00 2c 00 28 03 13 08 00 01 11 80 08 00 00 00 1c 00 00 84 20 01 12 82 10 84 30 50 00 ed 50 00 04 5c 0c 8f 20 00 00 00 1e 81 14 11 1c 00 02 00 74 ┆ ATT:CH P IHRTN d , ( 0P P t┆
0x4d40…4d90 00 0e 00 0a 02 04 c2 46 44 42 41 44 46 20 00 02 00 a4 00 2c 00 28 03 13 00 00 01 2d 04 20 81 24 02 40 aa 45 00 08 8f 20 00 00 00 1e f9 04 84 18 94 20 00 00 00 20 03 0a 1b 02 52 00 82 30 00 02 00 b6 00 2c 00 28 03 13 00 00 01 49 09 10 50 00 ┆ FDBADF , ( - $ @ E R 0 , ( I P ┆
0x4d90…4de0 81 04 52 00 a9 49 00 00 00 04 85 49 00 00 00 06 57 00 a1 49 00 00 00 04 f7 a1 00 00 14 02 00 02 00 e6 00 0c 00 08 02 03 a2 51 54 4a 4f 42 00 02 01 16 00 2c 00 28 03 13 00 00 01 63 22 12 5f 22 8f 20 00 00 00 1e 81 94 85 48 00 00 00 16 50 00 ┆ R I I W I QTJOB , ( c" _" H P ┆
0x4de0…4e30 87 34 87 49 00 00 00 16 f7 a1 00 00 00 22 00 02 01 26 00 14 00 10 03 07 00 00 01 7b 20 00 85 06 8f 20 00 00 00 1e 00 02 01 56 00 48 00 44 04 21 03 4f 00 03 54 52 00 11 50 06 00 17 57 5e 00 23 54 3c 00 29 56 3c 00 3b 54 04 00 3f 01 3a 00 43 ┆ 4 I " & { V H D ! O TR P W^ #T< )V< ;T ? : C┆