          EJECT
*         CTEXT CTC$DFT_DIRECT_CELLS
          TITLE  DIRECT LOCATION ASSIGNMENTS.
 CELLS    SPACE  4,10
****      DIRECT LOCATION ASSIGNMENTS.
*
*         NOTE THAT CERTAIN DIRECT CELLS HAVE SPECIAL USAGE
*         EARLY IN *DFT* PRESET SINCE THEY CONTAIN HANDOFF VALUES
*         FROM EITHER *SCI* OR *DFT* ITSELF (WHEN STARTING UP
*         DFT-S).


 T0       EQU    0
 T1       EQU    1
 T2       EQU    2
 T3       EQU    3
 T4       EQU    4
 T5       EQU    5
 T6       EQU    6
 T7       EQU    7
 CM       EQU    10 - 13
 BC       EQU    14 - 17
 SN       EQU    20          OFFSET TO SUBROUTINE NAMES
 SS       EQU    21          4/STATUS, 12/COMPOSITE STATUS SUMMARY
 JT       EQU    22 - 25     JOB TYPE FOR 180 REQUESTS
 TF       EQU    26          TEMPORARY FLAG
 FE       EQU    27          TEMPORARY FLAG
 W0       EQU    30          WORKING STORAGE
 W1       EQU    31
 W2       EQU    32
 W3       EQU    33
 W4       EQU    34
 W5       EQU    35
 W6       EQU    36
 W7       EQU    37
 RS       EQU    40 - 43     MODEL DEPENDENT BUFFER POINTER
 BW       EQU    44 - 47     BUFFER CONTROL WORDS POINTER
 EI       EQU    50          ELEMENT INDEX
 ET       EQU    51          ELEMENT TYPE
 RN       EQU    52          MAINTENANCE REGISTER NUMBER
 DO       EQU    53          DIRECTORY OFFSET
 DP       EQU    54 - 56     DFT BLOCK POINTER
 EC       EQU    57          ELEMENT CONNECT CODE
 CP       EQU    60          PROCESSOR NUMBER
 HP       EQU    61 - 62     HARDWARE TABLE POINTER
 MD       EQU    63          MODEL OF HARDWARE ELEMENT
 PO       EQU    64          MEMORY PORT OFFSET
 ST       EQU    65          LAST OVERLAY USED INDEX
 IB       EQU    66 - 70     INTERFACE BLOCK POINTER
          ORG    70
          CON    0           IOU DESIGNATOR AT START UP (SET FOR DFT-S)
 DH       EQU    71 - 73     DIRECTORY POINTER
          ORG    74
 ON       CON    1           CONSTANT ONE
 MP       CON    0,0,0       MAINTENANCE REGISTER BUFFER POINTER
          ORG    100
 CONS     SPACE  4,10
*         ASSEMBLY CONSTANTS.


 RR       EQU    400000      R-REGISTER ACTIVATOR
 CH       EQU    10          DUMMY CHANNEL NUMBER FOR DUMP/LOAD/IDLE ROUTINES

*         END DECK CTC$DFT_DIRECT_CELLS
