Source Code

These source-code files were obtained by digitally photographing an Artemis 72 (Apollo 15-17 Command Module) program listing from a private collection and then modifying pre-existing Comanche 55 (Apollo 11) source files to incorporate changes. Photography was by Ron Burkey, and transcription was performed by a team of volunteers. Note that the page images presented online are of reduced quality, and that additional images may be available. Report any conversion errors or legibility problems in page images to info@sandroid.org. Notations on the program listing read, in part:

	GAP: ASSEMBLE REVISION 072 OF AGC PROGRAM ARTEMIS 
	BY NASA 2021114-011 11:40 FEB. 26, 1971
Note that the date is the date of the printout, not the date of the program revision.

007677,000002:                                                                                                  ## Copyright:   Public domain.
007678,000003:                                                                                                  ## Filename:    DOWNLINK_LISTS.agc
007679,000004:                                                                                                  ## Purpose:     Part of the source code for Artemis (i.e., Colossus 3),
007680,000005:                                                                                                  ##              build 072.  This is for the Command Module's (CM)
007681,000006:                                                                                                  ##              Apollo Guidance Computer (AGC), for
007682,000007:                                                                                                  ##              Apollo 15-17.
007683,000008:                                                                                                  ## Assembler:   yaYUL
007684,000009:                                                                                                  ## Contact:     Jim Lawton <jim DOT lawton AT gmail DOT com>
007685,000010:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
007686,000011:                                                                                                  ## Page Scans:  www.ibiblio.org/apollo/ScansForConversion/Artemis072/
007687,000012:                                                                                                  ## Mod history: 2009-07-27 JL   Adapted from corresponding Comanche 055 file.
007688,000013:                                                                                                  ##              2010-01-31 JL   Fixed build errors.
007689,000014:                                                                                                  ##              2010-02-11 JL   Fixed error on p190.
007690,000015:                                                                                                  ##              2010-02-20 RSB  Un-##'d this header.
007691,000016:                                                                                                  ##              2017-01-21 RSB  Proofed comment text by diff'ing vs Comanche 55
007692,000017:                                                                                                  ##                              and corrected errors found.
007693,000018: 

Page 179

007695,000020: 05,2000                                           SETLOC   DOWNTELM                              
007696,000021: 05,2000                                           BANK                                           
007697,000022: 
007698,000023: 05,2000     0337                                  EBANK=   DNTMBUFF                              
007699,000024: 
007700,000025:                                                                                                  #  SPECIAL DOWNLINK OP CODES
007701,000026:                                                                                                  #        OP CODE          ADDRESS(EXAMPLE)         SENDS..               BIT 15          BITS 14-12      BITS 11
007702,000027:                                                                                                  #                                                                                                             -0
007703,000028:                                                                                                  #        ------          ----------              ----------              ------          ----------      -------
007704,000029:                                                                                                  #                                                                                                             --
007705,000030:                                                                                                  #        1DNADR          TIME2                   (2 AGC WDS)             0               0               ECADR
007706,000031:                                                                                                  #        2DNADR          TEPHEM                  (4 AGC WDS)             0               1               ECADR
007707,000032:                                                                                                  #        3DNADR          VGBODY                  (6 AGC WDS)             0               2               ECADR
007708,000033:                                                                                                  #        4DNADR          STATE                   (8 AGC WDS)             0               3               ECADR
007709,000034:                                                                                                  #        5DNADR          UPBUFF                  (10 AGC WDS)            0               4               ECADR
007710,000035:                                                                                                  #        6DNADR          DSPTAB                  (12 AGC WDS)            0               5               ECADR
007711,000036:                                                                                                  #        DNCHAN          30                      CHANNELS                0               7               CHANNEL
007712,000037:                                                                                                  #                                                                                                        ADDRESS
007713,000038:                                                                                                  #        DNPTR           NEXTLIST                POINTS TO NEXT          0               6               ADRES
007714,000039:                                                                                                  #                                                LIST.
007715,000040: 
007716,000041:                                                                                                  #  DOWNLIST FORMAT DEFINITIONS AND RULES -
007717,000042:                                                                                                  #  1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
007718,000043:                                                                                                  #  2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
007719,000044:                                                                                                  #  3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
007720,000045:                                                                                                  #  4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
007721,000046:                                                                                                  #  5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
007722,000047:                                                                                                  #     LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
007723,000048:                                                                                                  #  6. THE DOWNLINK LISTS (INCLUDING SUBLISTS) ARE ORGANIZED SUCH THAT THE ITEMS LISTED FIRST (IN FRONT OF FBANK) ARE
007724,000049:                                                                                                  #     SENT FIRST. EXCEPTION--- SNAPSHOT SUBLISTS. IN THE SNAPSHOT SUBLISTS THE DATA REPRESENTED BY THE FIRST
007725,000050:                                                                                                  #     11 1DNADRS IS PRESERVED (IN ORDER) IN DNTMBUFF AND SENT BY THE NEXT 11 DOWNRUPTS.  THE DATA REPRESENTED BY THE
007726,000051:                                                                                                  #     LIST IS SENT IMMEDIATELY.
007727,000052: 
007728,000053: 05,2000                                           COUNT*   $$/DLIST                              
007729,000054: 05,2000                        ERASZERO           EQUALS   7                                     
007730,000055: 05,2000  0000007               SPARE              EQUALS   ERASZERO                              #  USE SPARE TO INDICATE AVAILABLE SPACE
007731,000056: 05,2000           77340        LOWIDCOD           OCT      77340                                 #  LOW ID CODE
007732,000057: 
007733,000058: 05,2001  05,2113               NOMDNLST           EQUALS   CMCSTADL                              #  FRESH START AND POST P27 DOWNLIST
007734,000059: 05,2001  05,2211               UPDNLIST           EQUALS   CMENTRDL                              #  UPDATE PROGRAM (P27) DOWNLIST
007735,000060: 

Page 180

007737,000062: 
007738,000063:                                                                                                  #  CSM POWERED FLIGHT DOWNLIST
007739,000064: 
007740,000065:                                                                                                  #  --------------------------CONTROL LIST----------------------------------
007741,000066: 
007742,000067: 05,2001                        CMPOWEDL           EQUALS                                         
007743,000068: 05,2001           32043                           DNPTR    CMPOWE01                              #  COLLECT SNAPSHOT
007744,000069: 05,2002           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007745,000070: 05,2003           32052                           DNPTR    CMPOWE02                              #  COLLECT SECOND SNAPSHOT
007746,000071: 05,2004           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007747,000072: 05,2005           32057                           DNPTR    CMPOWE03                              #  COMMON DATA
007748,000073: 05,2006           03412                           1DNADR   TIG                                   #  TIG,+1
007749,000074: 05,2007           03422                           1DNADR   DELLT4                                #  DELLT4,+1
007750,000075: 05,2010           13414                           3DNADR   RTARG                                 #  RTARG,+1,+2,...+5
007751,000076: 05,2011           03427                           1DNADR   TGO                                   #  TGO,+1
007752,000077: 05,2012           01104                           1DNADR   PIPTIME1                              #  PIPTIME1,+1
007753,000078: 05,2013           11314                           3DNADR   DELV                                  #  DELV,+1,...+4,+5
007754,000079: 05,2014           03023                           1DNADR   PACTOFF                               #  PACTOFF,YACTOFF
007755,000080: 05,2015           03223                           1DNADR   PCMD                                  #  PCMD,YCMD
007756,000081: 05,2016           03702                           1DNADR   CSTEER                                #  CSTEER,GARBAGE
007757,000082: 05,2017           12444                           3DNADR   DELVEET1                              #  CSI DELTA VELOCITY COMPONENTS   (31-33)
007758,000083: 05,2020           25733                           6DNADR   REFSMMAT                              #  REFSMMAT,+1,...+10,+11
007759,000084: 05,2021           32061                           DNPTR    CMPOWE04                              #  COMMON DATA
007760,000085: 05,2022           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007761,000086: 05,2023           32063                           DNPTR    CMPOWE05                              #  COLLECT SNAPSHOT
007762,000087: 05,2024           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007763,000088: 05,2025           32052                           DNPTR    CMPOWE02                              #  COLLECT SNAPSHOT
007764,000089: 05,2026           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007765,000090: 05,2027           32057                           DNPTR    CMPOWE03                              #  COMMON DATA
007766,000091: 05,2030           32075                           DNPTR    CMPOWE08                              #  COMMON DATA
007767,000092: 05,2031           03743                           1DNADR   ELEV                                  #  ELEV,+1
007768,000093: 05,2032           03753                           1DNADR   CENTANG                               #  CENTANG,+1
007769,000094: 05,2033           00007                           1DNADR   SPARE                                 
007770,000095: 05,2034           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
007771,000096: 05,2035           01021                           1DNADR   TEVENT                                #  TEVENT,+1
007772,000097: 05,2036           03223                           1DNADR   PCMD                                  #  PCMD,YCMD
007773,000098: 05,2037           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007774,000099: 05,2040           32101                           DNPTR    CMPOWE07                              #  COMMON DATA
007775,000100: 05,2041           13720                           3DNADR   VGTIG                                 #  VGTIG,+1,...+4,+5
007776,000101: 05,2042           64111                           -3DNADR  DELVEET2                              #  CDH DELTA VELOCITY COMPONENTS   (98-100)
007777,000102: 
007778,000103:                                                                                                  #  ---------------------------SUB LISTS------------------------------------
007779,000104: 
007780,000105: 05,2043           76746        CMPOWE01           -1DNADR  RN         +2                         #  RN+2,+3                       SNAPSHOT DATA
007781,000106: 05,2044           01033                           1DNADR   RN         +4                         #  RN+4,+5
007782,000107: 05,2045           01035                           1DNADR   VN                                    #  VN,+1
007783,000108: 05,2046           01037                           1DNADR   VN         +2                         #  VN+2,+3
007784,000109: 05,2047           01041                           1DNADR   VN         +4                         #  VN+4,+5
007785,000110: 05,2050           01043                           1DNADR   PIPTIME                               #  PIPTIME,+1
007786,000111: 05,2051           76750                           -1DNADR  RN                                    #  RN,+1
007787,000112: 
007788,000113: 05,2052           77743        CMPOWE02           -1DNADR  CDUZ                                  #  CDUZ,CDUT                     SNAPSHOT DATA

Page 181

007790,000115: 05,2053           03133                           1DNADR   ADOT                                  #  ADOT,+1/OGARATE,+1
007791,000116: 05,2054           03135                           1DNADR   ADOT       +2                         #  ADOT+2,+3/OMEGAB+2,+3
007792,000117: 05,2055           03137                           1DNADR   ADOT       +4                         #  ADOT+4,+5/OMEGAB+4,+5
007793,000118: 05,2056           77745                           -1DNADR  CDUX                                  #  CDUX,CDUY
007794,000119: 
007795,000120: 05,2057           07076        CMPOWE03           2DNADR   AK                                    #  AK,AK1,AK2,RCSFLAGS           COMMON DATA
007796,000121: 05,2060           70605                           -2DNADR  THETADX                               #  THETADX,THETADY,THETADZ,GARBAGE
007797,000122: 
007798,000123: 05,2061           20074        CMPOWE04           5DNADR   STATE                                 #  FLAGWRD0 THRU FLAGWRD9        COMMON DATA
007799,000124: 05,2062           52551                           -6DNADR  DSPTAB                                #  DISPLAY TABLES
007800,000125: 
007801,000126: 05,2063           76056        CMPOWE05           -1DNADR  R-OTHER    +2                         #  R-OTHER+2,+3                  SNAPSHOT DATA
007802,000127: 05,2064           01723                           1DNADR   R-OTHER    +4                         #  R-OTHER+4,+5
007803,000128: 05,2065           01725                           1DNADR   V-OTHER                               #  V-OTHER,+1
007804,000129: 05,2066           01727                           1DNADR   V-OTHER    +2                         #  V-OTHER+2,+3
007805,000130: 05,2067           01731                           1DNADR   V-OTHER    +4                         #  V-OTHER+4,+5
007806,000131: 05,2070           01642                           1DNADR   T-OTHER                               #  T-OTHER,+1
007807,000132: 05,2071           76060                           -1DNADR  R-OTHER                               #  R-OTHER,+1
007808,000133: 
007809,000134: 05,2072           00775        CMPOWE06           1DNADR   OPTION1                               #  OPTION1,2                     COMMON DATA
007810,000135: 05,2073           01516                           1DNADR   TET                                   #  TET,+1
007811,000136: 05,2074           07172                           2DNADR   THETADX                               #  THETADX,THETADY,THETEDZ,GARBAGE
007812,000137: 05,2075           01432        CMPOWE08           1DNADR   RSBBQ                                 #  RSBBQ,+1
007813,000138: 05,2076           34076                           DNCHAN   76                                    #  CHANNELS 76(GARBAGE),77
007814,000139: 05,2077           04374                           2DNADR   C31FLWRD                              #  C31FLWRD,FAILREG,+1,+2
007815,000140: 05,2100           73741                           -2DNADR  CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
007816,000141: 
007817,000142: 05,2101           03072        CMPOWE07           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS               COMMON DATA
007818,000143: 05,2102           03065                           1DNADR   DAPDATR1                              #  DAPDATR1,DAPDATR2
007819,000144: 05,2103           07167                           2DNADR   ERRORX                                #  ERRORX,ERRORY,ERRORZ,GARBAGE
007820,000145: 05,2104           13125                           3DNADR   WBODY                                 #  WBODY,...+5/OMEGAC,...+5
007821,000146: 05,2105           05306                           2DNADR   REDOCTR                               #  REDOCTR,THETAD,+1,+2
007822,000147: 05,2106           01333                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007823,000148: 05,2107           34011        CMPOWE09           DNCHAN   11                                    #  CHANNELS 11,12
007824,000149: 05,2110           34013                           DNCHAN   13                                    #  CHANNELS 13,14
007825,000150: 05,2111           34030                           DNCHAN   30                                    #  CHANNELS 30,31
007826,000151: 05,2112           43745                           -DNCHAN  32                                    #  CHANNELS 32,33
007827,000152: 
007828,000153:                                                                                                  #  ------------------------------------------------------------------------
007829,000154:                                                                                                  #  *** THE FOLLOWING IS A LIST OF LOCATIONS IN DOWNLINK LISTS
007830,000155:                                                                                                  #  *** BUT NOT REFERENCED IN THE DIRECTORY BECAUSE THEY ARE NOT
007831,000156:                                                                                                  #  *** THE FIRST LOCATION REFERENCED IN AN INSTRUCTION
007832,000157:                                                                                                  #  *** THIS LIST SHOULD BE UPDATED WHEN ANY CHANGES ARE MADE TO LISTS.
007833,000158: 
007834,000159:                                                                                                  #                        LOCATION                          LIST NAME
007835,000160: 
007836,000161: 05,2113  E6,1424               DL101              =        YACTOFF                               #  CMPOWEDL
007837,000162: 05,2113  E6,1624               DL102              =        YCMD                                  
007838,000163: 05,2113  0000025               DL103              =        TIME1                                 

Page 182

007840,000165: 05,2113  E6,1624               DL104              =        YCMD                                  
007841,000166: 05,2113     1340               DL105              =        HOLDFLAG                              
007842,000167: 05,2113  E7,1722               DL1055             =        VMAGI                                 
007843,000168: 05,2113  E7,1724               DL1056             =        VGTLI                                 
007844,000169: 05,2113  0000035               DL106              =        CDUT                                  #  CMPOWE02
007845,000170: 05,2113  E6,1533               DL107              =        OGARATE                               
007846,000171: 05,2113  E6,1533               DL108              =        OMEGAB                                
007847,000172: 05,2113  0000033               DL109              =        CDUY                                  
007848,000173: 05,2113  E6,1477               DL110              =        AK1                                   #  CMPOWE03
007849,000174: 05,2113  E6,1500               DL111              =        AK2                                   
007850,000175: 05,2113  E6,1501               DL112              =        RCSFLAGS                              
007851,000176: 05,2113  E6,1573               DL113              =        THETADY                               
007852,000177: 05,2113  E6,1574               DL114              =        THETADZ                               
007853,000178: 05,2113     0776               DL115              =        OPTION2                               #  CMPOWE06
007854,000179: 05,2113  E6,1573               DL116              =        THETADY                               
007855,000180: 05,2113  E6,1574               DL117              =        THETADZ                               
007856,000181: 05,2113     0375               DL118              =        FAILREG                               #  CMPOWE08
007857,000182: 05,2113  0000037               DL119              =        PIPAX                                 
007858,000183: 05,2113  0000040               DL120              =        PIPAY                                 
007859,000184: 05,2113  0000041               DL121              =        PIPAZ                                 
007860,000185: 05,2113  E6,1473               DL122              =        CSMMASS                               #  CMPOWE07
007861,000186: 05,2113  E6,1466               DL123              =        DAPDATR2                              
007862,000187: 05,2113  E6,1570               DL124              =        ERRORY                                
007863,000188: 05,2113  E6,1571               DL125              =        ERRORZ                                
007864,000189: 05,2113  E6,1525               DL126              =        OMEGAC                                
007865,000190: 05,2113     1307               DL127              =        THETAD                                
007866,000191: 05,2113     1334               DL128              =        IMODES33                              
007867,000192: 

Page 183

007869,000194: 
007870,000195:                                                                                                  #  CSM COAST AND ALIGNMENT DOWNLIST
007871,000196: 
007872,000197:                                                                                                  #  ------------------------------CONTROL LIST------------------------------
007873,000198: 
007874,000199: 05,2113                        CMCSTADL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007875,000200: 05,2113           32043                           DNPTR    CMCSTA01                              #  COLLECT SNAPSHOT
007876,000201: 05,2114           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007877,000202: 05,2115           32052                           DNPTR    CMCSTA02                              #  COLLECT SECOND SNAPSHOT
007878,000203: 05,2116           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007879,000204: 05,2117           32057                           DNPTR    CMCSTA03                              #  COMMON DATA
007880,000205: 05,2120           03412                           1DNADR   TIG                                   #  TIG,+1
007881,000206: 05,2121           00302                           1DNADR   BESTI                                 #  BESTI,BESTJ
007882,000207: 05,2122           17674                           4DNADR   MARKDOWN                              #  MARKDOWN,+1...+5,+6,GARBAGE
007883,000208: 05,2123           17460                           4DNADR   MARK2DWN                              #  MARK2DWN,+1...+5,+6
007884,000209: 05,2124           06342                           2DNADR   HAPOX                                 #  HAPOX,+1,HPERX,+1
007885,000210: 05,2125           03023                           1DNADR   PACTOFF                               #  PACTOFF, YACTOFF                 (30)
007886,000211: 05,2126           13720                           3DNADR   VGTIG                                 #  VGTIG,...+5
007887,000212: 05,2127           25733                           6DNADR   REFSMMAT                              #  REFSMMAT,+1,...+10,+11
007888,000213: 05,2130           32061                           DNPTR    CMCSTA04                              #  COMMON DATA
007889,000214: 05,2131           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007890,000215: 05,2132           32063                           DNPTR    CMCSTA05                              #  COLLECT SNAPSHOT
007891,000216: 05,2133           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007892,000217: 05,2134           32052                           DNPTR    CMCSTA02                              #  COLLECT SNAPSHOT
007893,000218: 05,2135           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007894,000219: 05,2136           32072                           DNPTR    CMCSTA06                              #  COMMON DATA
007895,000220: 05,2137           12757                           3DNADR   OGC                                   #  OGC,+1,IGC,+1,MGC,+1
007896,000221: 05,2140           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
007897,000222: 05,2141           01021                           1DNADR   TEVENT                                #  TEVENT,+1
007898,000223: 05,2142           02633                           1DNADR   LAUNCHAZ                              #  LAUNCHAZ,+1
007899,000224: 05,2143           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007900,000225: 05,2144           32101                           DNPTR    CMCSTA07                              #  COMMON DATA
007901,000226: 05,2145           52551                           -6DNADR  DSPTAB                                #  DISPLAY TABLES
007902,000227: 
007903,000228:                                                                                                  #  --------------------------SUB LISTS-------------------------------------
007904,000229: 
007905,000230: 05,2146  05,2043               CMCSTA01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
007906,000231: 
007907,000232: 05,2146  05,2052               CMCSTA02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
007908,000233: 
007909,000234: 05,2146  05,2057               CMCSTA03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
007910,000235: 
007911,000236: 05,2146  05,2061               CMCSTA04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
007912,000237: 
007913,000238: 05,2146  05,2063               CMCSTA05           EQUALS   CMPOWE05                              #  COMMON DOWNLIST DATA
007914,000239: 
007915,000240: 05,2146  05,2072               CMCSTA06           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
007916,000241: 
007917,000242: 05,2146  05,2101               CMCSTA07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
007918,000243: 
007919,000244:                                                                                                  #  ------------------------------------------------------------------------

Page 184

007921,000246:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 2
007922,000247:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
007923,000248: 
007924,000249:                                                                                                  #                        LOCATION                          LIST NAME
007925,000250: 

Typo? Should probably be CMCSTADL

007927,000252: 05,2146     0303               DL201              =        BESTJ                                 #  CSMSTADL
007928,000253: 05,2146  E4,1744               DL202              =        HPERX                                 
007929,000254: 05,2146  E6,1424               DL203              =        YACTOFF                               
007930,000255: 05,2146  0000025               DL204              =        TIME1                                 
007931,000256: 05,2146  E5,1761               DL205              =        IGC                                   
007932,000257: 05,2146  E5,1763               DL206              =        MGC                                   
007933,000258: 

Page 185

007935,000260: 
007936,000261:                                                                                                  #  CSM RENDEZVOUS AND PRETHRUST LIST
007937,000262: 
007938,000263:                                                                                                  #  ----------------------------CONTROL LIST--------------------------------
007939,000264: 
007940,000265: 05,2146                        CMRENDDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007941,000266: 05,2146           32043                           DNPTR    CMREND01                              #  COLLECT SNAPSHOT
007942,000267: 05,2147           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007943,000268: 05,2150           32052                           DNPTR    CMREND02                              #  COLLECT SECOND SNAPSHOT
007944,000269: 05,2151           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007945,000270: 05,2152           32057                           DNPTR    CMREND03                              #  COMMON DATA
007946,000271: 05,2153           03412                           1DNADR   TIG                                   #  TIG,+1
007947,000272: 05,2154           03422                           1DNADR   DELLT4                                #  DELLT4,+1
007948,000273: 05,2155           13414                           3DNADR   RTARG                                 #  RTARG,+1...+4,+5
007949,000274: 05,2156           01007                           1DNADR   VHFTIME                               #  VHFTIME,+1
007950,000275: 05,2157           17674                           4DNADR   MARKDOWN                              #  MARKDOWN,+1...+5,+6,RM
007951,000276: 05,2160           00771                           1DNADR   VHFCNT                                #  VHFCNT,TRKMKCNT
007952,000277: 05,2161           03662                           1DNADR   TTPI                                  #  TTPI,+1
007953,000278: 05,2162           03424                           1DNADR   ECSTEER                               #  ECSTEER,GARBAGE
007954,000279: 05,2163           02636                           1DNADR   DELVTPF                               #  DELVTPF,+1
007955,000280: 05,2164           06460                           2DNADR   TCDH                                  #  CDH AND CSI TIME                      (32-33)
007956,000281: 05,2165           03655                           1DNADR   TPASS4                                #  TPASS4,+1
007957,000282: 05,2166           13404                           3DNADR   DELVSLV                               #  DELVSLV,+1...+4,+5
007958,000283: 05,2167           06311                           2DNADR   RANGE                                 #  RANGE,+1,RRATE,+1
007959,000284: 05,2170           32061                           DNPTR    CMREND04                              #  COMMON DATA
007960,000285: 05,2171           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
007961,000286: 05,2172           32063                           DNPTR    CMREND05                              #  COLLECT SNAPSHOT
007962,000287: 05,2173           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007963,000288: 05,2174           32052                           DNPTR    CMREND02                              #  COLLECT SNAPSHOT
007964,000289: 05,2175           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007965,000290: 05,2176           32072                           DNPTR    CMREND06                              #  COMMON DATA
007966,000291: 05,2177           02632                           1DNADR   DIFFALT                               #  CDH DELTA ALTITUDE                    (74)
007967,000292: 05,2200           03753                           1DNADR   CENTANG                               #  CENTANG,+1
007968,000293: 05,2201           00007                           1DNADR   SPARE                                 
007969,000294: 05,2202           13645                           3DNADR   DELVEET3                              #  DELVEET3,+1,...+4,+5
007970,000295: 05,2203           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
007971,000296: 05,2204           32101                           DNPTR    CMREND07                              #  COMMON DATA
007972,000297: 05,2205           02315                           1DNADR   RTHETA                                #  RTHETA,+1
007973,000298: 05,2206           07400                           2DNADR   LAT(SPL)                              #  LAT(SPL),LNG(SPL),+1
007974,000299: 05,2207           07756                           2DNADR   VPRED                                 #  VPRED,+1,GAMMAEI,+1
007975,000300: 05,2210           77671                           -1DNADR  STATE      +10D                       #  FALGWRDS 10 AND 11
007976,000301: 
007977,000302:                                                                                                  #  ----------------------------SUB LISTS-----------------------------------
007978,000303: 
007979,000304: 05,2211  05,2043               CMREND01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
007980,000305: 
007981,000306: 05,2211  05,2052               CMREND02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
007982,000307: 
007983,000308: 05,2211  05,2057               CMREND03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
007984,000309: 
007985,000310: 05,2211  05,2061               CMREND04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA

Page 186

007987,000312: 05,2211  05,2063               CMREND05           EQUALS   CMPOWE05                              #  COMMON DOWNLIST DATA
007988,000313: 
007989,000314: 05,2211  05,2072               CMREND06           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
007990,000315: 
007991,000316: 05,2211  05,2101               CMREND07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
007992,000317: 
007993,000318:                                                                                                  #  ------------------------------------------------------------------------
007994,000319:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 3
007995,000320:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
007996,000321: 
007997,000322:                                                                                                  #                        LOCATION                          LIST NAME
007998,000323: 
007999,000324: 05,2211  E7,1703               DL301              =        RM                                    #  CMRENDDL
008000,000325: 05,2211     0772               DL3015             =        TRKMKCNT                              
008001,000326: 05,2211  E5,1462               DL302              =        TCSI                                  
008002,000327: 05,2211  E4,1713               DL303              =        RRATE                                 
008003,000328: 05,2211  0000025               DL304              =        TIME1                                 
008004,000329: 05,2211  E7,1402               DL305              =        LNG(SPL)                              
008005,000330: 05,2211  E7,1760               DL306              =        GAMMAEI                               
008006,000331: 

Page 187

008008,000333: 
008009,000334:                                                                                                  #  CSM ENTRY AND UPDATE DOWNLIST
008010,000335: 
008011,000336:                                                                                                  #  ---------------------------CONTROL LIST---------------------------------
008012,000337: 
008013,000338: 05,2211                        CMENTRDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008014,000339: 05,2211           32043                           DNPTR    CMENTR01                              #  COLLECT SNAPSHOT
008015,000340: 05,2212           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008016,000341: 05,2213           32052                           DNPTR    CMENTR02                              #  COLLECT SECOND SNAPSHOT
008017,000342: 05,2214           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008018,000343: 05,2215           32057                           DNPTR    CMENTR03                              #  COMMON DATA
008019,000344: 05,2216           07300                           2DNADR   CMDAPMOD                              #  CMDAPMOD,PREL,QREL,RREL
008020,000345: 05,2217           03635                           1DNADR   L/D1                                  #  L/D1,+1
008021,000346: 05,2220           24304                           6DNADR   UPBUFF                                #  UPBUFF,+1...+10,+11
008022,000347: 05,2221           14320                           4DNADR   UPBUFF     +12D                       #  UPBUFF+12,13...+18,19D
008023,000348: 05,2222           04300                           2DNADR   COMPNUMB                              #  COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT
008024,000349: 05,2223           03313                           1DNADR   PAXERR1                               #  PAXERR1,ROLLTM
008025,000350: 05,2224           13675                           3DNADR   LATANG                                #  LATANG,+1,RDOT,+1,THETAH,+1
008026,000351: 05,2225           07400                           2DNADR   LAT(SPL)                              #  LAT(SPL),+1,LNG(SPL),+1
008027,000352: 05,2226           03265                           1DNADR   ALFA/180                              #  ALFA/180,BETA/180
008028,000353: 05,2227           32061                           DNPTR    CMENTR04                              #  COMMON DATA
008029,000354: 05,2230           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
008030,000355: 05,2231           32260                           DNPTR    CMENTR05                              #  COLLECT SNAPSHOT
008031,000356: 05,2232           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008032,000357: 05,2233           32052                           DNPTR    CMENTR02                              #  COLLECT SNAPSHOT
008033,000358: 05,2234           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008034,000359: 05,2235           00775                           1DNADR   OPTION1                               #  OPTION1,OPTION2
008035,000360: 05,2236           01516                           1DNADR   TET                                   #  TET,+1
008036,000361: 05,2237           13167                           3DNADR   ERRORX                                #  ERRORX/Y/Z,THETADX/Y/Z
008037,000362: 05,2240           07300                           2DNADR   CMDAPMOD                              #  CMDAPMOD,PREL,QREL,RREL
008038,000363: 05,2241           24304                           6DNADR   UPBUFF                                #  UPBUFF+0,+1...+10,+11D
008039,000364: 05,2242           14320                           4DNADR   UPBUFF     +12D                       #  UPBUFF+12,+13...+18,+19D
008040,000365: 05,2243           03072                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008041,000366: 05,2244           03065                           1DNADR   DAPDATR1                              #  DAPDATR1,DAPDATR2
008042,000367: 05,2245           03314                           1DNADR   ROLLTM                                #  ROLLTM,ROLLC
008043,000368: 05,2246           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
008044,000369: 05,2247           13125                           3DNADR   WBODY                                 #  WBODY,...+5/OMEGAC,...+5
008045,000370: 05,2250           05306                           2DNADR   REDOCTR                               #  REDOCTR,THETAD+0,+1,+2
008046,000371: 05,2251           01333                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008047,000372: 05,2252           32107                           DNPTR    CMENTR09                              #  COMMON DATA
008048,000373: 05,2253           01432                           1DNADR   RSBBQ                                 #  RSBBQ,+1
008049,000374: 05,2254           34076                           DNCHAN   76                                    #  CHANNELS 76(GARBAGE),77
008050,000375: 05,2255           04374                           2DNADR   C31FLWRD                              #  C31FLWRD,FAILREG,+1,+2
008051,000376: 05,2256           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
008052,000377: 05,2257           74017                           -1DNADR  GAMMAEI                               #  GAMMAEI,+1
008053,000378: 
008054,000379:                                                                                                  #  ----------------------------SUB LISTS-----------------------------------
008055,000380: 
008056,000381: 05,2260  05,2043               CMENTR01           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
008057,000382: 
008058,000383: 05,2260  05,2052               CMENTR02           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
008059,000384: 

Page 188

008061,000386: 05,2260  05,2057               CMENTR03           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
008062,000387: 
008063,000388: 05,2260  05,2061               CMENTR04           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
008064,000389: 
008065,000390: 05,2260           76463        CMENTR05           -1DNADR  DELV                                  #  DELV,+1                       SNAPSHOT DATA
008066,000391: 05,2261           01316                           1DNADR   DELV       +2                         #  DELV+2,+3
008067,000392: 05,2262           01320                           1DNADR   DELV       +4                         #  DELV+4,+5
008068,000393: 05,2263           03726                           1DNADR   TTE                                   #  TTE,+1
008069,000394: 05,2264           03724                           1DNADR   VIO                                   #  VIO,+1
008070,000395: 05,2265           03756                           1DNADR   VPRED                                 #  VPRED,+1
008071,000396: 05,2266           76673                           -1DNADR  PIPTIME1                              #  PIPTIME1,+1
008072,000397: 
008073,000398: 05,2267  05,2101               CMENTR07           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
008074,000399: 
008075,000400: 05,2267  05,2107               CMENTR09           EQUALS   CMPOWE09                              #  COMMON DOWNLIST DATA
008076,000401: 
008077,000402:                                                                                                  #  ------------------------------------------------------------------------
008078,000403:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 4
008079,000404:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
008080,000405: 
008081,000406:                                                                                                  #                        LOCATION                          LIST NAME
008082,000407: 
008083,000408: 05,2267  E6,1701               DL401              =        PREL                                  #  CMENTRDL
008084,000409: 05,2267  E6,1702               DL402              =        QREL                                  
008085,000410: 05,2267  E6,1703               DL403              =        RREL                                  
008086,000411: 05,2267     0301               DL404              =        UPOLDMOD                              
008087,000412: 05,2267     0302               DL405              =        UPVERB                                
008088,000413: 05,2267     0303               DL406              =        UPCOUNT                               
008089,000414: 05,2267  E6,1714               DL407              =        ROLLTM                                
008090,000415: 05,2267  E7,1677               DL408              =        RDOT                                  
008091,000416: 05,2267  E7,1701               DL409              =        THETAH                                
008092,000417: 05,2267  E7,1402               DL410              =        LNG(SPL)                              
008093,000418: 05,2267  E6,1666               DL411              =        BETA/180                              
008094,000419: 05,2267  0000025               DL412              =        TIME1                                 
008095,000420: 05,2267     0776               DL413              =        OPTION2                               
008096,000421: 05,2267  E6,1570               DL414              =        ERRORY                                
008097,000422: 05,2267  E6,1571               DL415              =        ERRORZ                                
008098,000423: 05,2267  E6,1572               DL416              =        THETADX                               
008099,000424: 05,2267  E6,1573               DL417              =        THETADY                               
008100,000425: 05,2267  E6,1574               DL418              =        THETADZ                               
008101,000426: 05,2267  E6,1701               DL419              =        PREL                                  
008102,000427: 05,2267  E6,1702               DL420              =        QREL                                  
008103,000428: 05,2267  E6,1703               DL421              =        RREL                                  
008104,000429: 05,2267  E6,1473               DL422              =        CSMMASS                               
008105,000430: 05,2267  E6,1466               DL423              =        DAPDATR2                              
008106,000431: 05,2267  E6,1715               DL424              =        ROLLC                                 
008107,000432: 05,2267     1340               DL425              =        HOLDFLAG                              
008108,000433: 05,2267     0375               DL426              =        FAILREG                               
008109,000434: 

Page 189

008111,000436: 
008112,000437:                                                                                                  #  P22 DOWNLISTS
008113,000438: 
008114,000439:                                                                                                  #  ----------------------------CONTROL LIST--------------------------------
008115,000440: 
008116,000441: 05,2267                        CMPG22DL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008117,000442: 05,2267           32043                           DNPTR    CMPG2201                              #  COLLECT SNAPSHOT
008118,000443: 05,2270           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008119,000444: 05,2271           32052                           DNPTR    CMPG2202                              #  COLLECT SNAPSHOT
008120,000445: 05,2272           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008121,000446: 05,2273           32057                           DNPTR    CMPG2203                              #  COMMON DATA
008122,000447: 05,2274           32340                           DNPTR    MARK1/2                               #  MARK 1&2 DATA SNAPSHOT
008123,000448: 05,2275           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008124,000449: 05,2276           32347                           DNPTR    MARK3/4                               #  MARK 3&4 DATA SNAPSHOT
008125,000450: 05,2277           24337                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008126,000451: 05,2300           32356                           DNPTR    MARK5                                 #  MARK5 DATA SNAPSHOT
008127,000452: 05,2301           10337                           3DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008128,000453: 05,2302           03751                           1DNADR   LANDMARK                              #  LANDMARK,GARBAGE
008129,000454: 05,2303           00007                           1DNADR   SPARE                                 
008130,000455: 05,2304           00007                           1DNADR   SPARE                                 
008131,000456: 05,2305           00007                           1DNADR   SPARE                                 
008132,000457: 05,2306           32061                           DNPTR    CMPG2204                              #  COMMON DATA
008133,000458: 05,2307           00024                           1DNADR   TIME2                                 #  TIME2,TIME1
008134,000459: 05,2310           32335                           DNPTR    CMPG2205                              #  COLLECT SNAPSHOT
008135,000460: 05,2311           04337                           2DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008136,000461: 05,2312           00007                           1DNADR   SPARE                                 
008137,000462: 05,2313           00007                           1DNADR   SPARE                                 
008138,000463: 05,2314           00007                           1DNADR   SPARE                                 
008139,000464: 05,2315           00007                           1DNADR   SPARE                                 
008140,000465: 05,2316           32052                           DNPTR    CMPG2202                              #  COLLECT SNAPSHOT
008141,000466: 05,2317           14337                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008142,000467: 05,2320           32072                           DNPTR    CMPG2206                              #  COMMON DATA
008143,000468: 05,2321           03747                           1DNADR   8NN                                   #  8NN,GARBAGE
008144,000469: 05,2322           00106                           1DNADR   STATE      +10D                       #  FALGWRDS 10 AND 11
008145,000470: 05,2323           12025                           3DNADR   RLS                                   #  RLS,+1,...+4,+5
008146,000471: 05,2324           00007                           1DNADR   SPARE                                 
008147,000472: 05,2325           01337                           1DNADR   OPTMODES                              #  OPTMODES,HOLDFLAG
008148,000473: 05,2326           32101                           DNPTR    CMPG2207                              #  COMMON DATA
008149,000474: 05,2327           00007                           1DNADR   SPARE                                 
008150,000475: 05,2330           00007                           1DNADR   SPARE                                 
008151,000476: 05,2331           00007                           1DNADR   SPARE                                 
008152,000477: 05,2332           00007                           1DNADR   SPARE                                 
008153,000478: 05,2333           00007                           1DNADR   SPARE                                 
008154,000479: 05,2334           77770                           -1DNADR  SPARE                                 
008155,000480: 
008156,000481:                                                                                                  #  -----------------------------SUB LISTS----------------------------------
008157,000482: 
008158,000483: 05,2335  05,2043               CMPG2201           EQUALS   CMPOWE01                              #  COMMON DOWNLIST DATA
008159,000484: 
008160,000485: 05,2335  05,2052               CMPG2202           EQUALS   CMPOWE02                              #  COMMON DOWNLIST DATA
008161,000486: 

Page 190

008163,000488: 05,2335  05,2057               CMPG2203           EQUALS   CMPOWE03                              #  COMMON DOWNLIST DATA
008164,000489: 
008165,000490: 05,2335  05,2061               CMPG2204           EQUALS   CMPOWE04                              #  COMMON DOWNLIST DATA
008166,000491: 
008167,000492: 05,2335           77027        CMPG2205           -1DNADR  LONG                                  #  LONG,+1                       SNAPSHOT DATA
008168,000493: 05,2336           00752                           1DNADR   ALT                                   #  ALT,+1
008169,000494: 05,2337           77031                           -1DNADR  LAT                                   #  LAT,+1
008170,000495: 
008171,000496: 05,2340  05,2072               CMPG2206           EQUALS   CMPOWE06                              #  COMMON DOWNLIST DATA
008172,000497: 
008173,000498: 05,2340  05,2101               CMPG2207           EQUALS   CMPOWE07                              #  COMMON DOWNLIST DATA
008174,000499: 
008175,000500: 05,2340           74236        MARK1/2            -1DNADR  SVMRKDAT   +2                         #  SVMRKDAT+2,+3                 SNAPSHOT DATA
008176,000501: 05,2341           03543                           1DNADR   SVMRKDAT   +4                         #  SVMRKDAT+4,+5
008177,000502: 05,2342           03545                           1DNADR   SVMRKDAT   +6                         #  SVMRKDAT+6,+7
008178,000503: 05,2343           03547                           1DNADR   SVMRKDAT   +8D                        #  SVMRKDAT+8,+9
008179,000504: 05,2344           03551                           1DNADR   SVMRKDAT   +10D                       #  SVMRKDAT+10,+11
008180,000505: 05,2345           03553                           1DNADR   SVMRKDAT   +12D                       #  SVMRKDAT+12,+13
008181,000506: 05,2346           74240                           -1DNADR  SVMRKDAT                              #  SVMRKDAT,+1
008182,000507: 
008183,000508: 05,2347           74220        MARK3/4            -1DNADR  SVMRKDAT   +16D                       #  SVMRKDAT+16,+17               SNAPSHOT DATA
008184,000509: 05,2350           03561                           1DNADR   SVMRKDAT   +18D                       #  SVMRKDAT+18,+19
008185,000510: 05,2351           03563                           1DNADR   SVMRKDAT   +20D                       #  SVMRKDAT+20,+21
008186,000511: 05,2352           03565                           1DNADR   SVMRKDAT   +22D                       #  SVMRKDAT+22,+23
008187,000512: 05,2353           03567                           1DNADR   SVMRKDAT   +24D                       #  SVMRKDAT+24,+25
008188,000513: 05,2354           03571                           1DNADR   SVMRKDAT   +26D                       #  SVMRKDAT+26,+27
008189,000514: 05,2355           74222                           -1DNADR  SVMRKDAT   +14D                       #  SVMRKDAT+14,+15
008190,000515: 
008191,000516: 05,2356           74202        MARK5              -1DNADR  SVMRKDAT   +30D                       #  SVMRKDAT+30,+31                       SNAPSHOT DATA
008192,000517: 05,2357           03577                           1DNADR   SVMRKDAT   +32D                       #  SVMRKDAT+32,+33
008193,000518: 05,2360           03601                           1DNADR   SVMRKDAT   +34D                       #  SVMRKDAT+34,GARBAGE
008194,000519: 05,2361           74204                           -1DNADR  SVMRKDAT   +28D                       #  SVMRKDAT+28,+29
008195,000520: 
008196,000521:                                                                                                  #  ------------------------------------------------------------------------
008197,000522:                                                                                                  #  *** UNREFERENCED LOCATIONS USED IN LIST 5
008198,000523:                                                                                                  #  *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS
008199,000524: 
008200,000525:                                                                                                  #                        LOCATION                          LIST NAME
008201,000526: 
008202,000527: 05,2362  0000025               DL501              =        TIME1                                 #  CMPG22DL
008203,000528: 
008204,000529:                                                                                                  #  ------------------------------------------------------------------------
008205,000530: 
008206,000531: 05,2362           02113        DNTABLE            GENADR   CMCSTADL                              
008207,000532: 05,2363           02211                           GENADR   CMENTRDL                              
008208,000533: 05,2364           02146                           GENADR   CMRENDDL                              
008209,000534: 05,2365           02001                           GENADR   CMPOWEDL                              
008210,000535: 05,2366           02267                           GENADR   CMPG22DL                              
008211,000536: 
008212,000537:                                                                                                  #  ------------------------------------------------------------------------
008213,000538: 

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