Source Code

These source-code files are part of a reconstructed copy of Artemis 071, the first release of the Apollo 15 through 17 Command Module (CM) Apollo Guidance Computer (AGC) software.

The reconstruction began with source code of Artemis 072 previously transcribed from a digitized copy of that program. The code was then updated by undoing changes between the two versions. The reconstruction was verified by matching memory-bank checksums to those listed in drawing 2021154-. Note that page numbers in the reconstructed code match those on the Artemis 072 printout, although the changed code would likely have changed page numbers for a real Artemis 071 listing.

Comments from the original source code are prefixed with a single '#' symbol, whereas comments added later are prefixed by "##" or "###". Report any errors noted by creating an issue report at the Virtual AGC project's GitHub repository.

007626,000002:                                                                                                  ## Copyright:   Public domain.
007627,000003:                                                                                                  ## Filename:    DOWNLINK_LISTS.agc
007628,000004:                                                                                                  ## Purpose:     A section of Artemis revision 071.
007629,000005:                                                                                                  ##              It is part of the reconstructed source code for the first
007630,000006:                                                                                                  ##              release of the flight software for the Command Module's
007631,000007:                                                                                                  ##              (CM) Apollo Guidance Computer (AGC) for Apollo 15 through
007632,000008:                                                                                                  ##              17. The code has been recreated from a copy of Artemis 072.
007633,000009:                                                                                                  ##              It has been adapted such that the resulting bugger words
007634,000010:                                                                                                  ##              exactly match those specified for Artemis 071 in NASA
007635,000011:                                                                                                  ##              drawing 2021154-, which gives relatively high confidence
007636,000012:                                                                                                  ##              that the reconstruction is correct.
007637,000013:                                                                                                  ## Reference:   179
007638,000014:                                                                                                  ## Assembler:   yaYUL
007639,000015:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
007640,000016:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
007641,000017:                                                                                                  ## Mod history: 2019-08-14 MAS  Created from Artemis 072.
007642,000018: 

Page 179

007644,000020: 05,2000                                           SETLOC   DOWNTELM                              
007645,000021: 05,2000                                           BANK                                           
007646,000022: 
007647,000023: 05,2000     0337                                  EBANK=   DNTMBUFF                              
007648,000024: 
007649,000025:                                                                                                  #  SPECIAL DOWNLINK OP CODES
007650,000026:                                                                                                  #        OP CODE          ADDRESS(EXAMPLE)         SENDS..               BIT 15          BITS 14-12      BITS 11
007651,000027:                                                                                                  #                                                                                                             -0
007652,000028:                                                                                                  #        ------          ----------              ----------              ------          ----------      -------
007653,000029:                                                                                                  #                                                                                                             --
007654,000030:                                                                                                  #        1DNADR          TIME2                   (2 AGC WDS)             0               0               ECADR
007655,000031:                                                                                                  #        2DNADR          TEPHEM                  (4 AGC WDS)             0               1               ECADR
007656,000032:                                                                                                  #        3DNADR          VGBODY                  (6 AGC WDS)             0               2               ECADR
007657,000033:                                                                                                  #        4DNADR          STATE                   (8 AGC WDS)             0               3               ECADR
007658,000034:                                                                                                  #        5DNADR          UPBUFF                  (10 AGC WDS)            0               4               ECADR
007659,000035:                                                                                                  #        6DNADR          DSPTAB                  (12 AGC WDS)            0               5               ECADR
007660,000036:                                                                                                  #        DNCHAN          30                      CHANNELS                0               7               CHANNEL
007661,000037:                                                                                                  #                                                                                                        ADDRESS
007662,000038:                                                                                                  #        DNPTR           NEXTLIST                POINTS TO NEXT          0               6               ADRES
007663,000039:                                                                                                  #                                                LIST.
007664,000040: 
007665,000041:                                                                                                  #  DOWNLIST FORMAT DEFINITIONS AND RULES -
007666,000042:                                                                                                  #  1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
007667,000043:                                                                                                  #  2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
007668,000044:                                                                                                  #  3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
007669,000045:                                                                                                  #  4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
007670,000046:                                                                                                  #  5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
007671,000047:                                                                                                  #     LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
007672,000048:                                                                                                  #  6. THE DOWNLINK LISTS (INCLUDING SUBLISTS) ARE ORGANIZED SUCH THAT THE ITEMS LISTED FIRST (IN FRONT OF FBANK) ARE
007673,000049:                                                                                                  #     SENT FIRST. EXCEPTION--- SNAPSHOT SUBLISTS. IN THE SNAPSHOT SUBLISTS THE DATA REPRESENTED BY THE FIRST
007674,000050:                                                                                                  #     11 1DNADRS IS PRESERVED (IN ORDER) IN DNTMBUFF AND SENT BY THE NEXT 11 DOWNRUPTS.  THE DATA REPRESENTED BY THE
007675,000051:                                                                                                  #     LIST IS SENT IMMEDIATELY.
007676,000052: 
007677,000053: 05,2000                                           COUNT*   $$/DLIST                              
007678,000054: 05,2000                        ERASZERO           EQUALS   7                                     
007679,000055: 05,2000  0000007               SPARE              EQUALS   ERASZERO                              #  USE SPARE TO INDICATE AVAILABLE SPACE
007680,000056: 05,2000           77340        LOWIDCOD           OCT      77340                                 #  LOW ID CODE
007681,000057: 
007682,000058: 05,2001  05,2113               NOMDNLST           EQUALS   CMCSTADL                              #  FRESH START AND POST P27 DOWNLIST
007683,000059: 05,2001  05,2211               UPDNLIST           EQUALS   CMENTRDL                              #  UPDATE PROGRAM (P27) DOWNLIST
007684,000060: 

Page 180

007686,000062: 
007687,000063:                                                                                                  #  CSM POWERED FLIGHT DOWNLIST
007688,000064: 
007689,000065:                                                                                                  #  --------------------------CONTROL LIST----------------------------------
007690,000066: 
007691,000067: 05,2001                        CMPOWEDL           EQUALS                                         
007692,000068: 05,2001           32043                           DNPTR    CMPOWE01                              #  COLLECT SNAPSHOT
007693,000069: 05,2002           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007694,000070: 05,2003           32052                           DNPTR    CMPOWE02                              #  COLLECT SECOND SNAPSHOT
007695,000071: 05,2004           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007696,000072: 05,2005           32057                           DNPTR    CMPOWE03                              #  COMMON DATA
007697,000073: 05,2006           03412                           1DNADR   TIG                                   #  TIG,+1
007698,000074: 05,2007           03422                           1DNADR   DELLT4                                #  DELLT4,+1
007699,000075: 05,2010           13414                           3DNADR   RTARG                                 #  RTARG,+1,+2,...+5
007700,000076: 05,2011           03427                           1DNADR   TGO                                   #  TGO,+1
007701,000077: 05,2012           01104                           1DNADR   PIPTIME1                              #  PIPTIME1,+1
007702,000078: 05,2013           11314                           3DNADR   DELV                                  #  DELV,+1,...+4,+5
007703,000079: 05,2014           03023                           1DNADR   PACTOFF                               #  PACTOFF,YACTOFF
007704,000080: 05,2015           03223                           1DNADR   PCMD                                  #  PCMD,YCMD
007705,000081: 05,2016           03702                           1DNADR   CSTEER                                #  CSTEER,GARBAGE
007706,000082: 05,2017           12444                           3DNADR   DELVEET1                              #  CSI DELTA VELOCITY COMPONENTS   (31-33)
007707,000083: 05,2020           25733                           6DNADR   REFSMMAT                              #  REFSMMAT,+1,...+10,+11
007708,000084: 05,2021           32061                           DNPTR    CMPOWE04                              #  COMMON DATA
007709,000085: 05,2022           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007710,000086: 05,2023           32063                           DNPTR    CMPOWE05                              #  COLLECT SNAPSHOT
007711,000087: 05,2024           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007712,000088: 05,2025           32052                           DNPTR    CMPOWE02                              #  COLLECT SNAPSHOT
007713,000089: 05,2026           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007714,000090: 05,2027           32057                           DNPTR    CMPOWE03                              #  COMMON DATA
007715,000091: 05,2030           32075                           DNPTR    CMPOWE08                              #  COMMON DATA
007716,000092: 05,2031           03743                           1DNADR   ELEV                                  #  ELEV,+1
007717,000093: 05,2032           03753                           1DNADR   CENTANG                               #  CENTANG,+1
007718,000094: 05,2033           00007                           1DNADR   SPARE                                 
007719,000095: 05,2034           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
007720,000096: 05,2035           01021                           1DNADR   TEVENT                                #  TEVENT,+1
007721,000097: 05,2036           03223                           1DNADR   PCMD                                  #  PCMD,YCMD
007722,000098: 05,2037           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007723,000099: 05,2040           32101                           DNPTR    CMPOWE07                              #  COMMON DATA
007724,000100: 05,2041           13720                           3DNADR   VGTIG                                 #  VGTIG,+1,...+4,+5
007725,000101: 05,2042           64111                           -3DNADR  DELVEET2                              #  CDH DELTA VELOCITY COMPONENTS   (98-100)
007726,000102: 
007727,000103:                                                                                                  #  ---------------------------SUB LISTS------------------------------------
007728,000104: 
007729,000105: 05,2043           76746        CMPOWE01           -1DNADR  RN         +2                         #  RN+2,+3                       SNAPSHOT DATA
007730,000106: 05,2044           01033                           1DNADR   RN         +4                         #  RN+4,+5
007731,000107: 05,2045           01035                           1DNADR   VN                                    #  VN,+1
007732,000108: 05,2046           01037                           1DNADR   VN         +2                         #  VN+2,+3
007733,000109: 05,2047           01041                           1DNADR   VN         +4                         #  VN+4,+5
007734,000110: 05,2050           01043                           1DNADR   PIPTIME                               #  PIPTIME,+1
007735,000111: 05,2051           76750                           -1DNADR  RN                                    #  RN,+1
007736,000112: 
007737,000113: 05,2052           77743        CMPOWE02           -1DNADR  CDUZ                                  #  CDUZ,CDUT                     SNAPSHOT DATA

Page 181

007739,000115: 05,2053           03133                           1DNADR   ADOT                                  #  ADOT,+1/OGARATE,+1
007740,000116: 05,2054           03135                           1DNADR   ADOT       +2                         #  ADOT+2,+3/OMEGAB+2,+3
007741,000117: 05,2055           03137                           1DNADR   ADOT       +4                         #  ADOT+4,+5/OMEGAB+4,+5
007742,000118: 05,2056           77745                           -1DNADR  CDUX                                  #  CDUX,CDUY
007743,000119: 
007744,000120: 05,2057           07076        CMPOWE03           2DNADR   AK                                    #  AK,AK1,AK2,RCSFLAGS           COMMON DATA
007745,000121: 05,2060           70605                           -2DNADR  THETADX                               #  THETADX,THETADY,THETADZ,GARBAGE
007746,000122: 
007747,000123: 05,2061           20074        CMPOWE04           5DNADR   STATE                                 #  FLAGWRD0 THRU FLAGWRD9        COMMON DATA
007748,000124: 05,2062           52551                           -6DNADR  DSPTAB                                #  DISPLAY TABLES
007749,000125: 
007750,000126: 05,2063           76056        CMPOWE05           -1DNADR  R-OTHER    +2                         #  R-OTHER+2,+3                  SNAPSHOT DATA
007751,000127: 05,2064           01723                           1DNADR   R-OTHER    +4                         #  R-OTHER+4,+5
007752,000128: 05,2065           01725                           1DNADR   V-OTHER                               #  V-OTHER,+1
007753,000129: 05,2066           01727                           1DNADR   V-OTHER    +2                         #  V-OTHER+2,+3
007754,000130: 05,2067           01731                           1DNADR   V-OTHER    +4                         #  V-OTHER+4,+5
007755,000131: 05,2070           01642                           1DNADR   T-OTHER                               #  T-OTHER,+1
007756,000132: 05,2071           76060                           -1DNADR  R-OTHER                               #  R-OTHER,+1
007757,000133: 
007758,000134: 05,2072           00775        CMPOWE06           1DNADR   OPTION1                               #  OPTION1,2                     COMMON DATA
007759,000135: 05,2073           01516                           1DNADR   TET                                   #  TET,+1
007760,000136: 05,2074           07172                           2DNADR   THETADX                               #  THETADX,THETADY,THETEDZ,GARBAGE
007761,000137: 05,2075           01432        CMPOWE08           1DNADR   RSBBQ                                 #  RSBBQ,+1
007762,000138: 05,2076           34076                           DNCHAN   76                                    #  CHANNELS 76(GARBAGE),77
007763,000139: 05,2077           04374                           2DNADR   C31FLWRD                              #  C31FLWRD,FAILREG,+1,+2
007764,000140: 05,2100           73741                           -2DNADR  CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
007765,000141: 
007766,000142: 05,2101           03072        CMPOWE07           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS               COMMON DATA
007767,000143: 05,2102           03065                           1DNADR   DAPDATR1                              #  DAPDATR1,DAPDATR2
007768,000144: 05,2103           07167                           2DNADR   ERRORX                                #  ERRORX,ERRORY,ERRORZ,GARBAGE
007769,000145: 05,2104           13125                           3DNADR   WBODY                                 #  WBODY,...+5/OMEGAC,...+5
007770,000146: 05,2105           05306                           2DNADR   REDOCTR                               #  REDOCTR,THETAD,+1,+2
007771,000147: 05,2106           01333                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007772,000148: 05,2107           34011        CMPOWE09           DNCHAN   11                                    #  CHANNELS 11,12
007773,000149: 05,2110           34013                           DNCHAN   13                                    #  CHANNELS 13,14
007774,000150: 05,2111           34030                           DNCHAN   30                                    #  CHANNELS 30,31
007775,000151: 05,2112           43745                           -DNCHAN  32                                    #  CHANNELS 32,33
007776,000152: 
007777,000153:                                                                                                  #  ------------------------------------------------------------------------
007778,000154:                                                                                                  #  *** THE FOLLOWING IS A LIST OF LOCATIONS IN DOWNLINK LISTS
007779,000155:                                                                                                  #  *** BUT NOT REFERENCED IN THE DIRECTORY BECAUSE THEY ARE NOT
007780,000156:                                                                                                  #  *** THE FIRST LOCATION REFERENCED IN AN INSTRUCTION
007781,000157:                                                                                                  #  *** THIS LIST SHOULD BE UPDATED WHEN ANY CHANGES ARE MADE TO LISTS.
007782,000158: 
007783,000159:                                                                                                  #                        LOCATION                          LIST NAME
007784,000160: 
007785,000161: 05,2113  E6,1424               DL101              =        YACTOFF                               #  CMPOWEDL
007786,000162: 05,2113  E6,1624               DL102              =        YCMD                                  
007787,000163: 05,2113  0000025               DL103              =        TIME1                                 

Page 182

007789,000165: 05,2113  E6,1624               DL104              =        YCMD                                  
007790,000166: 05,2113     1340               DL105              =        HOLDFLAG                              
007791,000167: 05,2113  E7,1722               DL1055             =        VMAGI                                 
007792,000168: 05,2113  E7,1724               DL1056             =        VGTLI                                 
007793,000169: 05,2113  0000035               DL106              =        CDUT                                  #  CMPOWE02
007794,000170: 05,2113  E6,1533               DL107              =        OGARATE                               
007795,000171: 05,2113  E6,1533               DL108              =        OMEGAB                                
007796,000172: 05,2113  0000033               DL109              =        CDUY                                  
007797,000173: 05,2113  E6,1477               DL110              =        AK1                                   #  CMPOWE03
007798,000174: 05,2113  E6,1500               DL111              =        AK2                                   
007799,000175: 05,2113  E6,1501               DL112              =        RCSFLAGS                              
007800,000176: 05,2113  E6,1573               DL113              =        THETADY                               
007801,000177: 05,2113  E6,1574               DL114              =        THETADZ                               
007802,000178: 05,2113     0776               DL115              =        OPTION2                               #  CMPOWE06
007803,000179: 05,2113  E6,1573               DL116              =        THETADY                               
007804,000180: 05,2113  E6,1574               DL117              =        THETADZ                               
007805,000181: 05,2113     0375               DL118              =        FAILREG                               #  CMPOWE08
007806,000182: 05,2113  0000037               DL119              =        PIPAX                                 
007807,000183: 05,2113  0000040               DL120              =        PIPAY                                 
007808,000184: 05,2113  0000041               DL121              =        PIPAZ                                 
007809,000185: 05,2113  E6,1473               DL122              =        CSMMASS                               #  CMPOWE07
007810,000186: 05,2113  E6,1466               DL123              =        DAPDATR2                              
007811,000187: 05,2113  E6,1570               DL124              =        ERRORY                                
007812,000188: 05,2113  E6,1571               DL125              =        ERRORZ                                
007813,000189: 05,2113  E6,1525               DL126              =        OMEGAC                                
007814,000190: 05,2113     1307               DL127              =        THETAD                                
007815,000191: 05,2113     1334               DL128              =        IMODES33                              
007816,000192: 

Page 183

007818,000194: 
007819,000195:                                                                                                  #  CSM COAST AND ALIGNMENT DOWNLIST
007820,000196: 
007821,000197:                                                                                                  #  ------------------------------CONTROL LIST------------------------------
007822,000198: 
007823,000199: 05,2113                        CMCSTADL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007824,000200: 05,2113           32043                           DNPTR    CMCSTA01                              #  COLLECT SNAPSHOT
007825,000201: 05,2114           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007826,000202: 05,2115           32052                           DNPTR    CMCSTA02                              #  COLLECT SECOND SNAPSHOT
007827,000203: 05,2116           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007828,000204: 05,2117           32057                           DNPTR    CMCSTA03                              #  COMMON DATA
007829,000205: 05,2120           03412                           1DNADR   TIG                                   #  TIG,+1
007830,000206: 05,2121           00302                           1DNADR   BESTI                                 #  BESTI,BESTJ
007831,000207: 05,2122           17674                           4DNADR   MARKDOWN                              #  MARKDOWN,+1...+5,+6,GARBAGE
007832,000208: 05,2123           17460                           4DNADR   MARK2DWN                              #  MARK2DWN,+1...+5,+6
007833,000209: 05,2124           06342                           2DNADR   HAPOX                                 #  HAPOX,+1,HPERX,+1
007834,000210: 05,2125           03023                           1DNADR   PACTOFF                               #  PACTOFF, YACTOFF                 (30)
007835,000211: 05,2126           13720                           3DNADR   VGTIG                                 #  VGTIG,...+5
007836,000212: 05,2127           25733                           6DNADR   REFSMMAT                              #  REFSMMAT,+1,...+10,+11
007837,000213: 05,2130           32061                           DNPTR    CMCSTA04                              #  COMMON DATA
007838,000214: 05,2131           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007839,000215: 05,2132           32063                           DNPTR    CMCSTA05                              #  COLLECT SNAPSHOT
007840,000216: 05,2133           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007841,000217: 05,2134           32052                           DNPTR    CMCSTA02                              #  COLLECT SNAPSHOT
007842,000218: 05,2135           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007843,000219: 05,2136           32072                           DNPTR    CMCSTA06                              #  COMMON DATA
007844,000220: 05,2137           12757                           3DNADR   OGC                                   #  OGC,+1,IGC,+1,MGC,+1
007845,000221: 05,2140           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
007846,000222: 05,2141           01021                           1DNADR   TEVENT                                #  TEVENT,+1
007847,000223: 05,2142           02633                           1DNADR   LAUNCHAZ                              #  LAUNCHAZ,+1
007848,000224: 05,2143           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007849,000225: 05,2144           32101                           DNPTR    CMCSTA07                              #  COMMON DATA
007850,000226: 05,2145           52551                           -6DNADR  DSPTAB                                #  DISPLAY TABLES
007851,000227: 
007852,000228:                                                                                                  #  --------------------------SUB LISTS-------------------------------------
007853,000229: 
007854,000230: 05,2146  05,2043               CMCSTA01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
007855,000231: 
007856,000232: 05,2146  05,2052               CMCSTA02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
007857,000233: 
007858,000234: 05,2146  05,2057               CMCSTA03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
007859,000235: 
007860,000236: 05,2146  05,2061               CMCSTA04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
007861,000237: 
007862,000238: 05,2146  05,2063               CMCSTA05           EQUALS   CMPOWE05                              #  COMMON DOWNLIST DATA
007863,000239: 
007864,000240: 05,2146  05,2072               CMCSTA06           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
007865,000241: 
007866,000242: 05,2146  05,2101               CMCSTA07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
007867,000243: 
007868,000244:                                                                                                  #  ------------------------------------------------------------------------

Page 184

007870,000246:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 2
007871,000247:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
007872,000248: 
007873,000249:                                                                                                  #                        LOCATION                          LIST NAME
007874,000250: 

Typo? Should probably be CMCSTADL

007876,000252: 05,2146     0303               DL201              =        BESTJ                                 #  CSMSTADL
007877,000253: 05,2146  E4,1744               DL202              =        HPERX                                 
007878,000254: 05,2146  E6,1424               DL203              =        YACTOFF                               
007879,000255: 05,2146  0000025               DL204              =        TIME1                                 
007880,000256: 05,2146  E5,1761               DL205              =        IGC                                   
007881,000257: 05,2146  E5,1763               DL206              =        MGC                                   
007882,000258: 

Page 185

007884,000260: 
007885,000261:                                                                                                  #  CSM RENDEZVOUS AND PRETHRUST LIST
007886,000262: 
007887,000263:                                                                                                  #  ----------------------------CONTROL LIST--------------------------------
007888,000264: 
007889,000265: 05,2146                        CMRENDDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007890,000266: 05,2146           32043                           DNPTR    CMREND01                              #  COLLECT SNAPSHOT
007891,000267: 05,2147           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007892,000268: 05,2150           32052                           DNPTR    CMREND02                              #  COLLECT SECOND SNAPSHOT
007893,000269: 05,2151           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007894,000270: 05,2152           32057                           DNPTR    CMREND03                              #  COMMON DATA
007895,000271: 05,2153           03412                           1DNADR   TIG                                   #  TIG,+1
007896,000272: 05,2154           03422                           1DNADR   DELLT4                                #  DELLT4,+1
007897,000273: 05,2155           13414                           3DNADR   RTARG                                 #  RTARG,+1...+4,+5
007898,000274: 05,2156           01007                           1DNADR   VHFTIME                               #  VHFTIME,+1
007899,000275: 05,2157           17674                           4DNADR   MARKDOWN                              #  MARKDOWN,+1...+5,+6,RM
007900,000276: 05,2160           00771                           1DNADR   VHFCNT                                #  VHFCNT,TRKMKCNT
007901,000277: 05,2161           03662                           1DNADR   TTPI                                  #  TTPI,+1
007902,000278: 05,2162           03424                           1DNADR   ECSTEER                               #  ECSTEER,GARBAGE
007903,000279: 05,2163           02636                           1DNADR   DELVTPF                               #  DELVTPF,+1
007904,000280: 05,2164           06460                           2DNADR   TCDH                                  #  CDH AND CSI TIME                      (32-33)
007905,000281: 05,2165           03655                           1DNADR   TPASS4                                #  TPASS4,+1
007906,000282: 05,2166           13404                           3DNADR   DELVSLV                               #  DELVSLV,+1...+4,+5
007907,000283: 05,2167           06311                           2DNADR   RANGE                                 #  RANGE,+1,RRATE,+1
007908,000284: 05,2170           32061                           DNPTR    CMREND04                              #  COMMON DATA
007909,000285: 05,2171           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007910,000286: 05,2172           32063                           DNPTR    CMREND05                              #  COLLECT SNAPSHOT
007911,000287: 05,2173           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007912,000288: 05,2174           32052                           DNPTR    CMREND02                              #  COLLECT SNAPSHOT
007913,000289: 05,2175           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007914,000290: 05,2176           32072                           DNPTR    CMREND06                              #  COMMON DATA
007915,000291: 05,2177           02632                           1DNADR   DIFFALT                               #  CDH DELTA ALTITUDE                    (74)
007916,000292: 05,2200           03753                           1DNADR   CENTANG                               #  CENTANG,+1
007917,000293: 05,2201           00007                           1DNADR   SPARE                                 
007918,000294: 05,2202           13645                           3DNADR   DELVEET3                              #  DELVEET3,+1,...+4,+5
007919,000295: 05,2203           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007920,000296: 05,2204           32101                           DNPTR    CMREND07                              #  COMMON DATA
007921,000297: 05,2205           02315                           1DNADR   RTHETA                                #  RTHETA,+1
007922,000298: 05,2206           07400                           2DNADR   LAT(SPL)                              #  LAT(SPL),LNG(SPL),+1
007923,000299: 05,2207           07756                           2DNADR   VPRED                                 #  VPRED,+1,GAMMAEI,+1
007924,000300: 05,2210           77671                           -1DNADR  STATE      +10D                       #  FALGWRDS 10 AND 11
007925,000301: 
007926,000302:                                                                                                  #  ----------------------------SUB LISTS-----------------------------------
007927,000303: 
007928,000304: 05,2211  05,2043               CMREND01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
007929,000305: 
007930,000306: 05,2211  05,2052               CMREND02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
007931,000307: 
007932,000308: 05,2211  05,2057               CMREND03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
007933,000309: 
007934,000310: 05,2211  05,2061               CMREND04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA

Page 186

007936,000312: 05,2211  05,2063               CMREND05           EQUALS   CMPOWE05                              #  COMMON DOWNLIST DATA
007937,000313: 
007938,000314: 05,2211  05,2072               CMREND06           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
007939,000315: 
007940,000316: 05,2211  05,2101               CMREND07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
007941,000317: 
007942,000318:                                                                                                  #  ------------------------------------------------------------------------
007943,000319:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 3
007944,000320:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
007945,000321: 
007946,000322:                                                                                                  #                        LOCATION                          LIST NAME
007947,000323: 
007948,000324: 05,2211  E7,1703               DL301              =        RM                                    #  CMRENDDL
007949,000325: 05,2211     0772               DL3015             =        TRKMKCNT                              
007950,000326: 05,2211  E5,1462               DL302              =        TCSI                                  
007951,000327: 05,2211  E4,1713               DL303              =        RRATE                                 
007952,000328: 05,2211  0000025               DL304              =        TIME1                                 
007953,000329: 05,2211  E7,1402               DL305              =        LNG(SPL)                              
007954,000330: 05,2211  E7,1760               DL306              =        GAMMAEI                               
007955,000331: 

Page 187

007957,000333: 
007958,000334:                                                                                                  #  CSM ENTRY AND UPDATE DOWNLIST
007959,000335: 
007960,000336:                                                                                                  #  ---------------------------CONTROL LIST---------------------------------
007961,000337: 
007962,000338: 05,2211                        CMENTRDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007963,000339: 05,2211           32043                           DNPTR    CMENTR01                              #  COLLECT SNAPSHOT
007964,000340: 05,2212           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007965,000341: 05,2213           32052                           DNPTR    CMENTR02                              #  COLLECT SECOND SNAPSHOT
007966,000342: 05,2214           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007967,000343: 05,2215           32057                           DNPTR    CMENTR03                              #  COMMON DATA
007968,000344: 05,2216           07300                           2DNADR   CMDAPMOD                              #  CMDAPMOD,PREL,QREL,RREL
007969,000345: 05,2217           03635                           1DNADR   L/D1                                  #  L/D1,+1
007970,000346: 05,2220           24304                           6DNADR   UPBUFF                                #  UPBUFF,+1...+10,+11
007971,000347: 05,2221           14320                           4DNADR   UPBUFF     +12D                       #  UPBUFF+12,13...+18,19D
007972,000348: 05,2222           04300                           2DNADR   COMPNUMB                              #  COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT
007973,000349: 05,2223           03313                           1DNADR   PAXERR1                               #  PAXERR1,ROLLTM
007974,000350: 05,2224           13675                           3DNADR   LATANG                                #  LATANG,+1,RDOT,+1,THETAH,+1
007975,000351: 05,2225           07400                           2DNADR   LAT(SPL)                              #  LAT(SPL),+1,LNG(SPL),+1
007976,000352: 05,2226           03265                           1DNADR   ALFA/180                              #  ALFA/180,BETA/180
007977,000353: 05,2227           32061                           DNPTR    CMENTR04                              #  COMMON DATA
007978,000354: 05,2230           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007979,000355: 05,2231           32260                           DNPTR    CMENTR05                              #  COLLECT SNAPSHOT
007980,000356: 05,2232           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007981,000357: 05,2233           32052                           DNPTR    CMENTR02                              #  COLLECT SNAPSHOT
007982,000358: 05,2234           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007983,000359: 05,2235           00775                           1DNADR   OPTION1                               #  OPTION1,OPTION2
007984,000360: 05,2236           01516                           1DNADR   TET                                   #  TET,+1
007985,000361: 05,2237           13167                           3DNADR   ERRORX                                #  ERRORX/Y/Z,THETADX/Y/Z
007986,000362: 05,2240           07300                           2DNADR   CMDAPMOD                              #  CMDAPMOD,PREL,QREL,RREL
007987,000363: 05,2241           24304                           6DNADR   UPBUFF                                #  UPBUFF+0,+1...+10,+11D
007988,000364: 05,2242           14320                           4DNADR   UPBUFF     +12D                       #  UPBUFF+12,+13...+18,+19D
007989,000365: 05,2243           03072                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007990,000366: 05,2244           03065                           1DNADR   DAPDATR1                              #  DAPDATR1,DAPDATR2
007991,000367: 05,2245           03314                           1DNADR   ROLLTM                                #  ROLLTM,ROLLC
007992,000368: 05,2246           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007993,000369: 05,2247           13125                           3DNADR   WBODY                                 #  WBODY,...+5/OMEGAC,...+5
007994,000370: 05,2250           05306                           2DNADR   REDOCTR                               #  REDOCTR,THETAD+0,+1,+2
007995,000371: 05,2251           01333                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007996,000372: 05,2252           32107                           DNPTR    CMENTR09                              #  COMMON DATA
007997,000373: 05,2253           01432                           1DNADR   RSBBQ                                 #  RSBBQ,+1
007998,000374: 05,2254           34076                           DNCHAN   76                                    #  CHANNELS 76(GARBAGE),77
007999,000375: 05,2255           04374                           2DNADR   C31FLWRD                              #  C31FLWRD,FAILREG,+1,+2
008000,000376: 05,2256           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
008001,000377: 05,2257           74017                           -1DNADR  GAMMAEI                               #  GAMMAEI,+1
008002,000378: 
008003,000379:                                                                                                  #  ----------------------------SUB LISTS-----------------------------------
008004,000380: 
008005,000381: 05,2260  05,2043               CMENTR01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
008006,000382: 
008007,000383: 05,2260  05,2052               CMENTR02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
008008,000384: 

Page 188

008010,000386: 05,2260  05,2057               CMENTR03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
008011,000387: 
008012,000388: 05,2260  05,2061               CMENTR04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
008013,000389: 
008014,000390: 05,2260           76463        CMENTR05           -1DNADR  DELV                                  #  DELV,+1                       SNAPSHOT DATA
008015,000391: 05,2261           01316                           1DNADR   DELV       +2                         #  DELV+2,+3
008016,000392: 05,2262           01320                           1DNADR   DELV       +4                         #  DELV+4,+5
008017,000393: 05,2263           03726                           1DNADR   TTE                                   #  TTE,+1
008018,000394: 05,2264           03724                           1DNADR   VIO                                   #  VIO,+1
008019,000395: 05,2265           03756                           1DNADR   VPRED                                 #  VPRED,+1
008020,000396: 05,2266           76673                           -1DNADR  PIPTIME1                              #  PIPTIME1,+1
008021,000397: 
008022,000398: 05,2267  05,2101               CMENTR07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
008023,000399: 
008024,000400: 05,2267  05,2107               CMENTR09           EQUALS   CMPOWE09                              #  COMMON DOWNLIST DATA
008025,000401: 
008026,000402:                                                                                                  #  ------------------------------------------------------------------------
008027,000403:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 4
008028,000404:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
008029,000405: 
008030,000406:                                                                                                  #                        LOCATION                          LIST NAME
008031,000407: 
008032,000408: 05,2267  E6,1701               DL401              =        PREL                                  #  CMENTRDL
008033,000409: 05,2267  E6,1702               DL402              =        QREL                                  
008034,000410: 05,2267  E6,1703               DL403              =        RREL                                  
008035,000411: 05,2267     0301               DL404              =        UPOLDMOD                              
008036,000412: 05,2267     0302               DL405              =        UPVERB                                
008037,000413: 05,2267     0303               DL406              =        UPCOUNT                               
008038,000414: 05,2267  E6,1714               DL407              =        ROLLTM                                
008039,000415: 05,2267  E7,1677               DL408              =        RDOT                                  
008040,000416: 05,2267  E7,1701               DL409              =        THETAH                                
008041,000417: 05,2267  E7,1402               DL410              =        LNG(SPL)                              
008042,000418: 05,2267  E6,1666               DL411              =        BETA/180                              
008043,000419: 05,2267  0000025               DL412              =        TIME1                                 
008044,000420: 05,2267     0776               DL413              =        OPTION2                               
008045,000421: 05,2267  E6,1570               DL414              =        ERRORY                                
008046,000422: 05,2267  E6,1571               DL415              =        ERRORZ                                
008047,000423: 05,2267  E6,1572               DL416              =        THETADX                               
008048,000424: 05,2267  E6,1573               DL417              =        THETADY                               
008049,000425: 05,2267  E6,1574               DL418              =        THETADZ                               
008050,000426: 05,2267  E6,1701               DL419              =        PREL                                  
008051,000427: 05,2267  E6,1702               DL420              =        QREL                                  
008052,000428: 05,2267  E6,1703               DL421              =        RREL                                  
008053,000429: 05,2267  E6,1473               DL422              =        CSMMASS                               
008054,000430: 05,2267  E6,1466               DL423              =        DAPDATR2                              
008055,000431: 05,2267  E6,1715               DL424              =        ROLLC                                 
008056,000432: 05,2267     1340               DL425              =        HOLDFLAG                              
008057,000433: 05,2267     0375               DL426              =        FAILREG                               
008058,000434: 

Page 189

008060,000436: 
008061,000437:                                                                                                  #  P22 DOWNLISTS
008062,000438: 
008063,000439:                                                                                                  #  ----------------------------CONTROL LIST--------------------------------
008064,000440: 
008065,000441: 05,2267                        CMPG22DL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008066,000442: 05,2267           32043                           DNPTR    CMPG2201                              #  COLLECT SNAPSHOT
008067,000443: 05,2270           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008068,000444: 05,2271           32052                           DNPTR    CMPG2202                              #  COLLECT SNAPSHOT
008069,000445: 05,2272           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008070,000446: 05,2273           32057                           DNPTR    CMPG2203                              #  COMMON DATA
008071,000447: 05,2274           32340                           DNPTR    MARK1/2                               #  MARK 1&2 DATA SNAPSHOT
008072,000448: 05,2275           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008073,000449: 05,2276           32347                           DNPTR    MARK3/4                               #  MARK 3&4 DATA SNAPSHOT
008074,000450: 05,2277           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008075,000451: 05,2300           32356                           DNPTR    MARK5                                 #  MARK5 DATA SNAPSHOT
008076,000452: 05,2301           10337                           3DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008077,000453: 05,2302           03751                           1DNADR   LANDMARK                              #  LANDMARK,GARBAGE
008078,000454: 05,2303           00007                           1DNADR   SPARE                                 
008079,000455: 05,2304           00007                           1DNADR   SPARE                                 
008080,000456: 05,2305           00007                           1DNADR   SPARE                                 
008081,000457: 05,2306           32061                           DNPTR    CMPG2204                              #  COMMON DATA
008082,000458: 05,2307           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
008083,000459: 05,2310           32335                           DNPTR    CMPG2205                              #  COLLECT SNAPSHOT
008084,000460: 05,2311           04337                           2DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008085,000461: 05,2312           00007                           1DNADR   SPARE                                 
008086,000462: 05,2313           00007                           1DNADR   SPARE                                 
008087,000463: 05,2314           00007                           1DNADR   SPARE                                 
008088,000464: 05,2315           00007                           1DNADR   SPARE                                 
008089,000465: 05,2316           32052                           DNPTR    CMPG2202                              #  COLLECT SNAPSHOT
008090,000466: 05,2317           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008091,000467: 05,2320           32072                           DNPTR    CMPG2206                              #  COMMON DATA
008092,000468: 05,2321           03747                           1DNADR   8NN                                   #  8NN,GARBAGE
008093,000469: 05,2322           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
008094,000470: 05,2323           12025                           3DNADR   RLS                                   #  RLS,+1,...+4,+5
008095,000471: 05,2324           00007                           1DNADR   SPARE                                 
008096,000472: 05,2325           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
008097,000473: 05,2326           32101                           DNPTR    CMPG2207                              #  COMMON DATA
008098,000474: 05,2327           00007                           1DNADR   SPARE                                 
008099,000475: 05,2330           00007                           1DNADR   SPARE                                 
008100,000476: 05,2331           00007                           1DNADR   SPARE                                 
008101,000477: 05,2332           00007                           1DNADR   SPARE                                 
008102,000478: 05,2333           00007                           1DNADR   SPARE                                 
008103,000479: 05,2334           77770                           -1DNADR  SPARE                                 
008104,000480: 
008105,000481:                                                                                                  #  -----------------------------SUB LISTS----------------------------------
008106,000482: 
008107,000483: 05,2335  05,2043               CMPG2201           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
008108,000484: 
008109,000485: 05,2335  05,2052               CMPG2202           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
008110,000486: 

Page 190

008112,000488: 05,2335  05,2057               CMPG2203           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
008113,000489: 
008114,000490: 05,2335  05,2061               CMPG2204           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
008115,000491: 
008116,000492: 05,2335           77027        CMPG2205           -1DNADR  LONG                                  #  LONG,+1                       SNAPSHOT DATA
008117,000493: 05,2336           00752                           1DNADR   ALT                                   #  ALT,+1
008118,000494: 05,2337           77031                           -1DNADR  LAT                                   #  LAT,+1
008119,000495: 
008120,000496: 05,2340  05,2072               CMPG2206           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
008121,000497: 
008122,000498: 05,2340  05,2101               CMPG2207           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
008123,000499: 
008124,000500: 05,2340           74236        MARK1/2            -1DNADR  SVMRKDAT   +2                         #  SVMRKDAT+2,+3                 SNAPSHOT DATA
008125,000501: 05,2341           03543                           1DNADR   SVMRKDAT   +4                         #  SVMRKDAT+4,+5
008126,000502: 05,2342           03545                           1DNADR   SVMRKDAT   +6                         #  SVMRKDAT+6,+7
008127,000503: 05,2343           03547                           1DNADR   SVMRKDAT   +8D                        #  SVMRKDAT+8,+9
008128,000504: 05,2344           03551                           1DNADR   SVMRKDAT   +10D                       #  SVMRKDAT+10,+11
008129,000505: 05,2345           03553                           1DNADR   SVMRKDAT   +12D                       #  SVMRKDAT+12,+13
008130,000506: 05,2346           74240                           -1DNADR  SVMRKDAT                              #  SVMRKDAT,+1
008131,000507: 
008132,000508: 05,2347           74220        MARK3/4            -1DNADR  SVMRKDAT   +16D                       #  SVMRKDAT+16,+17               SNAPSHOT DATA
008133,000509: 05,2350           03561                           1DNADR   SVMRKDAT   +18D                       #  SVMRKDAT+18,+19
008134,000510: 05,2351           03563                           1DNADR   SVMRKDAT   +20D                       #  SVMRKDAT+20,+21
008135,000511: 05,2352           03565                           1DNADR   SVMRKDAT   +22D                       #  SVMRKDAT+22,+23
008136,000512: 05,2353           03567                           1DNADR   SVMRKDAT   +24D                       #  SVMRKDAT+24,+25
008137,000513: 05,2354           03571                           1DNADR   SVMRKDAT   +26D                       #  SVMRKDAT+26,+27
008138,000514: 05,2355           74222                           -1DNADR  SVMRKDAT   +14D                       #  SVMRKDAT+14,+15
008139,000515: 
008140,000516: 05,2356           74202        MARK5              -1DNADR  SVMRKDAT   +30D                       #  SVMRKDAT+30,+31                       SNAPSHOT DATA
008141,000517: 05,2357           03577                           1DNADR   SVMRKDAT   +32D                       #  SVMRKDAT+32,+33
008142,000518: 05,2360           03601                           1DNADR   SVMRKDAT   +34D                       #  SVMRKDAT+34,GARBAGE
008143,000519: 05,2361           74204                           -1DNADR  SVMRKDAT   +28D                       #  SVMRKDAT+28,+29
008144,000520: 
008145,000521:                                                                                                  #  ------------------------------------------------------------------------
008146,000522:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 5
008147,000523:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
008148,000524: 
008149,000525:                                                                                                  #                        LOCATION                          LIST NAME
008150,000526: 
008151,000527: 05,2362  0000025               DL501              =        TIME1                                 #  CMPG22DL
008152,000528: 
008153,000529:                                                                                                  #  ------------------------------------------------------------------------
008154,000530: 
008155,000531: 05,2362           02113        DNTABLE            GENADR   CMCSTADL                              
008156,000532: 05,2363           02211                           GENADR   CMENTRDL                              
008157,000533: 05,2364           02146                           GENADR   CMRENDDL                              
008158,000534: 05,2365           02001                           GENADR   CMPOWEDL                              
008159,000535: 05,2366           02267                           GENADR   CMPG22DL                              
008160,000536: 
008161,000537:                                                                                                  #  ------------------------------------------------------------------------
008162,000538: 

End of include-file DOWNLINK_LISTS.agc.  Parent file is MAIN.agc