*COMDECK  COMSCPA  CPA      CTEXT  COMSCPA - CTI COMMON POINTER AREA DEFINITIONS. 
          SPACE  4,10 
          IF     -DEF,QUAL$,1 
          QUAL   CPA
          BASE   D
*         COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978. 
          TITLE  COMSCPA - CTI COMMON POINTER AREA DEFINITIONS. 
 CPA      SPACE  4,10 
***       COMSCPA - CTI COMMON POINTER AREA DEFINITIONS.
* 
*         R. A. MATTHEWS.          12/03/77.
          SPACE  4,10 
***       COMSCPA - CTI COMMON POINTER AREA DEFINITIONS.
* 
*         COMSCPA DEFINES THE CTI COMMON POINTER AREA AS IT RESIDES IN
*         THE PP AFTER A TAPE OR DISK DEADSTART. THESE SYMBOLS MAY ALSO 
*         BE USED TO DETERMINE THE LOCATION OF POINTERS IN READ/WRITE 
*         BUFFERS BY BIASING THE BUFFER LOCATION BY THE LOAD ADDRESS. 
* 
*         EXAMPLE:  
* 
*         LDM    BUFFER+OSDP-IPLA  LOAD FIRST BYTE OF OS POINTER WORD 
* 
*                BUFFER = FWA OF D/S SECTOR IN BUFFER.
*                OSDP = COMSCPA DEFINITION FOR FIRST OS DISK ADDRESS
*                       BYTE. 
*                IPLA = COMSCPA DEFINITION FOR IPL FIRST BYTE OF LOAD.
  
  
**        CONSTANTS USED FOR CALCULATIONS.
  
 LE77     EQU    17B               LENGTH OF PRFX TABLE IN CM WORDS 
 LE6P     EQU    1                 LENGTH OF 6PPM TABLE IN CM WORDS 
 BPW      EQU    5                 BYTES PER CM WORD
 DSLN     EQU    502B              DISK SECTOR LENGTH IN BYTES
 PRU      EQU    DSLN/BPW*BPW      LENGTH OF SECTOR (INTEGRAL CM WORDS) 
 CPA      SPACE  4,10 
***       COMMON POINTER AREA.
          SPACE  4,10 
**        THE NEXT GROUP OF SYBMOLS DEFINES THE ORDER OF SYMBOLS IN THE 
*         THE COMMON POINTER AREA. THE POINTERS ARE EACH 1 CM WORD LONG 
*         AND ARE RANKED FROM THE HIGH ORDER OF THE PP (7777B) TOWARD 
*         THE IPL PROGRAM.  THIS METHOD SHOULD ALLOW THE GREATEST 
*         FLEXABILITY IN CHANGING THE SIZES OF THESE TWO AREAS. 
  
 OSRN     EQU    1                 OS RESERVED WORD 
 OSDN     EQU    OSRN+1            OS DISK ADDRESS
 DSRN     EQU    OSDN+1            DIAGNOSTIC SEQUENCER RESERVED WORD 
 DSDN     EQU    DSRN+1            DIAGNOSTIC SEQUENCER DISK ADDRESS
 MSRN     EQU    DSDN+1            CMSE RESERVED WORD 
 MSDN     EQU    MSRN+1            CMSE DISK ADDRESS
 CIRN     EQU    MSDN+1            CTI WORD 2 
 CIDN     EQU    CIRN+1            CTI WORD 1 
  
  
**        THESE NEXT SYMBOLS DEFINE THE FIRST BYTE OF THE POINTERS IN 
*         THE PP WHEN IPL IS LOADED.
  
  
 OSRP     EQU    10000B-BPW*OSRN   OS RESERVED WORD 
 OSDP     EQU    10000B-BPW*OSDN   OS DISK ADDRESS
 DSRP     EQU    10000B-BPW*DSRN   DIAGNOSTIC SEQUENCER RESERVED WORD 
 DSDP     EQU    10000B-BPW*DSDN   DIAGNOSTIC SEQUENCER DISK ADDRESS
 MSRP     EQU    10000B-BPW*MSRN   CMSE RESERVED WORD 
 MSDP     EQU    10000B-BPW*MSDN   CMSE DISK ADDRESS
 CIRP     EQU    10000B-BPW*CIRN   DISK ADDR OF 1ST CTI ROUTINE 
 CIDP     EQU    10000B-BPW*CIDN   DISK ADDR FOR IPL TO LOAD FROM 
  
*         SYMBOLS BEFORE THIS POINT CANNOT BE OVERLAYED 
*         BY IPL CODE.  SYMBOLS FOLLOWING THIS POINT
*         MUST BE FOR SPACE RESERVATION ONLY SINCE AT 
*         THE TIME IPL IS LOADED, IPL CODE WILL BE IN 
*         THIS AREA.  THE FOLLOWING SYMBOL DEFINES THE
*         HIGHEST ADDRESS THAT MAY BE USED BY IPL CODE. 
  
 IPLLWA   EQU    CIDP-1            IPL LAST WORD ADDRESS MAX
  
  
**        THE FOLLOWING SYMBOL DEFINES A 8 PP WORD STRING OF THE FORM 
* 
*         24/CMRA, 24/CMFL, 24/ECSRA, 24/ECSFL
* 
*         WHICH IS USED BY DDS TO RESTRICT DIAGNOSTIC USAGE OF CM AND 
*         ECS WHEN THE INITIALIZATION LEVEL IS 3 OR GREATER.
  
  
 DDSMEM   EQU    CIDP-8 
 DSP      SPACE  4,10 
**        THE FOLLOWING SYMBOLS DEFINE THE AREA IN THE PP WHERE A COPY
*         OF THE DEADSTART PANEL IS SAVED.
  
  
 DSPNLZ   EQU    DDSMEM-20B-1      VIRTUAL ZERO OF D.S. PANEL COPY
 DSPNL    EQU    DSPNLZ+5          FWA OF DEADSTART PANEL COPY
 HDT      SPACE  4,10 
**        THE FOLLOWING DEFINES THE HARDWARE DESCRIPTOR TABLE 
* 
  
 HDTL     EQU    20D               LENGTH OF THE HDT
 HDT      EQU    DSPNL-HDTL        FWA OF THE HDT 
  
 PRT0     EQU    HDT+0
 PRT1     EQU    HDT+1
 PRT2     EQU    HDT+2
 PRT3     EQU    HDT+3
 PRT4     EQU    HDT+4
 PRT5     EQU    HDT+5
 PRT6     EQU    HDT+6
 PRT7     EQU    HDT+7
 DEGR     EQU    HDT+8
 CMSZ     EQU    HDT+9
 OPTN     EQU    HDT+11 
 PPP0     EQU    HDT+12 
 PPP1     EQU    HDT+13 
 LPP0     EQU    HDT+14 
 LPP1     EQU    HDT+15 
 PPPU     EQU    HDT+16 
 LPPU     EQU    HDT+18 
  
 CPAFWA   EQU    HDT               FWA OF COMMON POINTER AREA 
          SPACE  4,10 
          BASE   *
          IF     -DEF,QUAL$,1 
          QUAL   *
          ENDX
