Source Code

These source-code files are part of a reconstructed copy of Luminary 98, a development version of the Apollo 11 Lunar Module (LM) Apollo Guidance Computer (AGC) software.

The reconstruction began with source code of Luminary 99 revision 1 previously transcribed from a digitized copy of that program. The code was then updated by undoing changes described in original Luminary memo 85, using asterisks indicating changed lines in the listing as a guide. While no listing of this version is known to exist, nor are the memory-bank checksums available, the reconstruction is believed to be correct because it was an an intermediate step in reconstructing Luminary 97 whose reconstruction was verified by matching memory-bank checksums to those listed in drawing 2021152G. Note that page numbers in the reconstructed code match those on the Luminary 099 revision 001 printout, although the added code would likely have changed page numbers for a real Luminary 98 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.

007672,000002:                                                                                                  ## Copyright:   Public domain.
007673,000003:                                                                                                  ## Filename:    DOWNLINK_LISTS.agc
007674,000004:                                                                                                  ## Purpose:     A section of Luminary revision 98.
007675,000005:                                                                                                  ##              It is part of the reconstructed source code for the a
007676,000006:                                                                                                  ##              development version of the flight software for the Lunar 
007677,000007:                                                                                                  ##              Module's (LM) Apollo Guidance Computer (AGC) for Apollo 11.
007678,000008:                                                                                                  ##              The code has been recreated from a copy of Luminary 99
007679,000009:                                                                                                  ##              revision 001, using asterisks indicating changed lines in
007680,000010:                                                                                                  ##              the listing and Luminary Memo #85, which lists changes between
007681,000011:                                                                                                  ##              Luminary 98 and 99.
007682,000012:                                                                                                  ## Reference:   pp. 193-205
007683,000013:                                                                                                  ## Assembler:   yaYUL
007684,000014:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
007685,000015:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
007686,000016:                                                                                                  ## Mod history: 2019-07-28 MAS  Created from Luminary 99.
007687,000017: 

Page 193

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

Page 194

007732,000062:                                                                                                  #  LM ORBITAL MANEUVERS LIST
007733,000063: 
007734,000064:                                                                                                  #  ----------------- CONTROL LIST --------------------------
007735,000065: 
007736,000066: 05,2066                        LMORBMDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007737,000067: 05,2066           32127                           DNPTR    LMORBM01                              #  COLLECT SNAPSHOT
007738,000068: 05,2067           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007739,000069: 05,2070           03451                           1DNADR   DELLT4                                #  DELLT4,+1
007740,000070: 05,2071           13443                           3DNADR   RTARG                                 #  RTARG,+1...+5
007741,000071: 05,2072           02256                           1DNADR   ELEV                                  #  ELEV,+1
007742,000072: 05,2073           01344                           1DNADR   TEVENT                                #  TEVENT,+1
007743,000073: 05,2074           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
007744,000074: 05,2075           03633                           1DNADR   TCSI                                  #  TCSI,+1
007745,000075: 05,2076           12266                           3DNADR   DELVEET1                              #  DELVEET1 +0...+5
007746,000076: 05,2077           13700                           3DNADR   VGTIG                                 #  VGTIG +0...+5
007747,000077: 05,2100           01340                           1DNADR   DNLRVELZ                              #  DNLRVELZ,DNLRALT
007748,000078: 05,2101           03630                           1DNADR   TPASS4                                #  TPASS4,+1
007749,000079: 05,2102           32136                           DNPTR    LMORBM02                              #  COMMON DATA
007750,000080: 05,2103           00024                           1DNADR   TIME2                                 #  TIME2/1
007751,000081: 05,2104           32145                           DNPTR    LMORBM03                              #  COLLECT SNAPSHOT
007752,000082: 05,2105           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007753,000083: 05,2106           32154                           DNPTR    LMORBM04                              #  COMMON DATA
007754,000084: 05,2107           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007755,000085: 05,2110           00007                           1DNADR   SPARE                                 
007756,000086: 05,2111           01776                           1DNADR   TCDH                                  #  TCDH,+1
007757,000087: 05,2112           12274                           3DNADR   DELVEET2                              #  DELVEET2 +0...+5
007758,000088: 05,2113           03635                           1DNADR   TTPI                                  #  TTPI,+1
007759,000089: 05,2114           12365                           3DNADR   DELVEET3                              #  DELVEET3 +0...+5
007760,000090: 05,2115           01333                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
007761,000091: 05,2116           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007762,000092: 05,2117           03577                           1DNADR   DIFFALT                               #  DIFFALT,+1
007763,000093: 05,2120           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007764,000094: 05,2121           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007765,000095: 05,2122           03441                           1DNADR   TIG                                   #  TIG,+1
007766,000096: 05,2123           32157                           DNPTR    LMORBM05                              #  COMMON DATA
007767,000097: 05,2124           32170                           DNPTR    LMORBM06                              #  COMMON DATA
007768,000098: 05,2125           00007                           1DNADR   SPARE                                 #  FORMERLY PIF
007769,000099: 05,2126           74261                           -1DNADR  TGO                                   #  TGO,+1
007770,000100: 
007771,000101:                                                                                                  #  -----------------  SUB-LISTS  ----------------------------
007772,000102: 
007773,000103: 05,2127           76056        LMORBM01           -1DNADR  R-OTHER    +2                         #  R-OTHER +2,+3         SNAPSHOT
007774,000104: 05,2130           01723                           1DNADR   R-OTHER    +4                         #  R-OTHER +4,+5
007775,000105: 05,2131           01725                           1DNADR   V-OTHER                               #  V-OTHER,+1
007776,000106: 05,2132           01727                           1DNADR   V-OTHER    +2                         #  V-OTHER +2,+3
007777,000107: 05,2133           01731                           1DNADR   V-OTHER    +4                         #  V-OTHER +4,+5
007778,000108: 05,2134           01570                           1DNADR   T-OTHER                               #  T-OTHER,+1
007779,000109: 05,2135           76060                           -1DNADR  R-OTHER                               #  R-OTHER +0,+1
007780,000110: 
007781,000111: 05,2136           04320        LMORBM02           2DNADR   REDOCTR                               #  REDOCTR,THETAD,+1,+2  COMMON DATA

Page 195

007783,000113: 05,2137           01432                           1DNADR   RSBBQ                                 #  RSBBQ,+1
007784,000114: 05,2140           07021                           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
007785,000115: 05,2141           07235                           2DNADR   CDUXD                                 #  CDUXD,CDUYD,CDUZD,GARBAGE
007786,000116: 05,2142           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
007787,000117: 05,2143           24074                           6DNADR   STATE                                 #  STATE +0...+11D (FLAGWORDS)
007788,000118: 05,2144           52754                           -6DNADR  DSPTAB                                #  DSPTAB TABLES
007789,000119: 
007790,000120: 05,2145           76555        LMORBM03           -1DNADR  RN         +2                         #  RN +2,+3              SNAPSHOT
007791,000121: 05,2146           01224                           1DNADR   RN         +4                         #  RN +4,+5
007792,000122: 05,2147           01226                           1DNADR   VN                                    #  VN,+1
007793,000123: 05,2150           01230                           1DNADR   VN         +2                         #  VN +2,+3
007794,000124: 05,2151           01232                           1DNADR   VN         +4                         #  VN +4,+5
007795,000125: 05,2152           01234                           1DNADR   PIPTIME                               #  PIPTIME,+1
007796,000126: 05,2153           76557                           -1DNADR  RN                                    #  RN,+1
007797,000127: 
007798,000128: 05,2154           07243        LMORBM04           2DNADR   OMEGAPD                               #  OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
007799,000129: 05,2155           10372                           3DNADR   CADRFLSH                              #  CADRFLSH,+1,+2,FAILREG,+1,+2
007800,000130: 05,2156           77667                           -1DNADR  RADMODES                              #  RADMODES,DAPBOOLS     COMMON DATA
007801,000131: 
007802,000132: 05,2157           07021        LMORBM05           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
007803,000133: 05,2160           07235                           2DNADR   CDUXD                                 #  CDUXD,CDUXD,CDUZD,GARBAGE
007804,000134: 05,2161           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
007805,000135: 05,2162           03024                           1DNADR   ALPHAQ                                #  ALPHAQ,ALPHAR         COMMON DATA
007806,000136: 05,2163           03113                           1DNADR   POSTORKP                              #  POSTORKP,NEGTORKP
007807,000137: 05,2164           34011                           DNCHAN   11                                    #  CHANNELS 11,12
007808,000138: 05,2165           34013                           DNCHAN   13                                    #  CHANNELS 13,14
007809,000139: 05,2166           34030                           DNCHAN   30                                    #  CHANNELS 30,31
007810,000140: 05,2167           43745                           -DNCHAN  32                                    #  CHANNELS 32,33
007811,000141: 
007812,000142: 05,2170           03560        LMORBM06           1DNADR   PIPTIME1                              #  PIPTIME,+1            COMMON DATA
007813,000143: 05,2171           67453                           -3DNADR  DELV                                  #  DELV +0...+5
007814,000144: 
007815,000145:                                                                                                  #  ---------------------------------------------------------
007816,000146: 

Page 196

007818,000148:                                                                                                  #  LM COAST AND ALIGNMENT DOWNLIST
007819,000149: 
007820,000150:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
007821,000151: 
007822,000152: 05,2172                        LMCSTADL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007823,000153: 05,2172           32127                           DNPTR    LMCSTA01                              #  COLLECT SNAPSHOT
007824,000154: 05,2173           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007825,000155: 05,2174           02020                           1DNADR   AGSK                                  #  AGSK,+1
007826,000156: 05,2175           02774                           1DNADR   TALIGN                                #  TALIGN,+1
007827,000157: 05,2176           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007828,000158: 05,2177           01333                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
007829,000159: 05,2200           01344                           1DNADR   TEVENT                                #  TEVENT,+1
007830,000160: 05,2201           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
007831,000161: 05,2202           00735                           1DNADR   AOTCODE                               #  AOTCODE,GARBAGE
007832,000162: 05,2203           12022                           3DNADR   RLS                                   #  RLS +0...+5
007833,000163: 05,2204           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007834,000164: 05,2205           32224                           DNPTR    LMCSTA06                              #  COMMON DATA
007835,000165: 05,2206           32136                           DNPTR    LMCSTA02                              #  COMMON DATA
007836,000166: 05,2207           00024                           1DNADR   TIME2                                 #  TIME2/1
007837,000167: 05,2210           32145                           DNPTR    LMCSTA03                              #  COLLECT SNAPSHOT
007838,000168: 05,2211           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007839,000169: 05,2212           32154                           DNPTR    LMCSTA04                              #  COMMON DATA
007840,000170: 05,2213           32226                           DNPTR    LMCSTA07                              #  COMMON DATA
007841,000171: 05,2214           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007842,000172: 05,2215           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
007843,000173: 05,2216           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
007844,000174: 05,2217           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007845,000175: 05,2220           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007846,000176: 05,2221           03441                           1DNADR   TIG                                   #  TIG,+1
007847,000177: 05,2222           32157                           DNPTR    LMCSTA05                              #  COMMON DATA
007848,000178: 05,2223           52754                           -6DNADR  DSPTAB                                #  DSPTAB +0...+11D TABLE
007849,000179: 
007850,000180:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
007851,000181: 
007852,000182: 05,2224  05,2127               LMCSTA01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
007853,000183: 05,2224  05,2136               LMCSTA02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
007854,000184: 05,2224  05,2145               LMCSTA03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
007855,000185: 05,2224  05,2154               LMCSTA04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
007856,000186: 05,2224  05,2157               LMCSTA05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
007857,000187: 
007858,000188: 05,2224           05700        LMCSTA06           2DNADR   X789                                  #  X789 +0...+3          COMMON DATA
007859,000189: 05,2225           77665                           -1DNADR  LASTYCMD                              #  LASTYCMD,LASTXCMD
007860,000190: 05,2226           12737        LMCSTA07           3DNADR   OGC                                   #  OGC,+1,IGC,+1,MGC,+1  COMMON DATA
007861,000191: 05,2227           02755                           1DNADR   BESTI                                 #  BESTI,BESTJ
007862,000192: 05,2230           12760                           3DNADR   STARSAV1                              #  STARSAV1 +0...+5
007863,000193: 05,2231           65011                           -3DNADR  STARSAV2                              #  STARSAV2 +0...+5

Page 197

007865,000195:                                                                                                  #  -----------------------------------------------------------
007866,000196: 

Page 198

007868,000198:                                                                                                  #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
007869,000199: 
007870,000200:                                                                                                  #  -----------------  CONTROL LIST   --------------------------
007871,000201: 
007872,000202: 05,2232                        LMRENDDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007873,000203: 05,2232           32127                           DNPTR    LMREND01                              #  COLLECT SNAPSHOT
007874,000204: 05,2233           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007875,000205: 05,2234           32276                           DNPTR    LMREND07                              #  COLLECT SNAPSHOT
007876,000206: 05,2235           14340                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007877,000207: 05,2236           03451                           1DNADR   DELLT4                                #  DELLT4,+1
007878,000208: 05,2237           13443                           3DNADR   RTARG                                 #  RTARG +0...+5
007879,000209: 05,2240           13433                           3DNADR   DELVSLV                               #  DELVSLV +0...+5
007880,000210: 05,2241           03633                           1DNADR   TCSI                                  #  TCSI,+1
007881,000211: 05,2242           12266                           3DNADR   DELVEET1                              #  DELVEET +0-..+5
007882,000212: 05,2243           00007                           1DNADR   SPARE                                 
007883,000213: 05,2244           03630                           1DNADR   TPASS4                                #  TPASS4,+1
007884,000214: 05,2245           32224                           DNPTR    LMREND06                              #  COMMON DATA
007885,000215: 05,2246           32136                           DNPTR    LMREND02                              #  COMMON DATA
007886,000216: 05,2247           00024                           1DNADR   TIME2                                 #  TIME2/1
007887,000217: 05,2250           32145                           DNPTR    LMREND03                              #  COLLECT SNAPSHOT
007888,000218: 05,2251           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007889,000219: 05,2252           32154                           DNPTR    LMREND04                              #  COMMON DATA
007890,000220: 05,2253           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007891,000221: 05,2254           00007                           1DNADR   SPARE                                 
007892,000222: 05,2255           01776                           1DNADR   TCDH                                  #  TCDH,+1
007893,000223: 05,2256           12274                           3DNADR   DELVEET2                              #  DELVEET2 +0...+5
007894,000224: 05,2257           03635                           1DNADR   TTPI                                  #  TTPI,+1
007895,000225: 05,2260           12365                           3DNADR   DELVEET3                              #  DELVEET3 +0...+5
007896,000226: 05,2261           02256                           1DNADR   ELEV                                  #  ELEV,+1
007897,000227: 05,2262           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
007898,000228: 05,2263           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
007899,000229: 05,2264           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007900,000230: 05,2265           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007901,000231: 05,2266           03441                           1DNADR   TIG                                   #  TIG,+1
007902,000232: 05,2267           32157                           DNPTR    LMREND05                              #  COMMON DATA
007903,000233: 05,2270           02302                           1DNADR   DELTAR                                #  DELTAR,+1
007904,000234: 05,2271           03620                           1DNADR   CENTANG                               #  CENTANG,+1
007905,000235: 05,2272           03466                           1DNADR   NN                                    #  NN,+1
007906,000236: 05,2273           03577                           1DNADR   DIFFALT                               #  DIFFALT,+1
007907,000237: 05,2274           02347                           1DNADR   DELVTPF                               #  DELVTPF,+1
007908,000238: 05,2275           77770                           -1DNADR  SPARE                                 
007909,000239: 
007910,000240:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
007911,000241: 
007912,000242: 05,2276  05,2127               LMREND01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
007913,000243: 05,2276  05,2136               LMREND02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
007914,000244: 05,2276  05,2145               LMREND03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA

Page 199

007916,000246: 05,2276  05,2154               LMREND04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
007917,000247: 05,2276  05,2157               LMREND05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
007918,000248: 05,2276  05,2224               LMREND06           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
007919,000249: 
007920,000250: 05,2276           74320        LMREND07           -1DNADR  AIG                                   #  AIG,AMG               SNAPSHOT
007921,000251: 05,2277           03461                           1DNADR   AOG                                   #  AOG,TRKMKCNT
007922,000252: 05,2300           03752                           1DNADR   TANGNB                                #  TANGNB,+1
007923,000253: 05,2301           03754                           1DNADR   MKTIME                                #  MKTIME,+1
007924,000254: 05,2302           74017                           -1DNADR  RANGRDOT                              #  DNRRANGE,DNRRDOT
007925,000255: 
007926,000256:                                                                                                  #  ---------------------------------------------------------
007927,000257: 

Page 200

007929,000259:                                                                                                  #  LM DESCENT AND ASCENT DOWNLIST
007930,000260: 
007931,000261:                                                                                                  #  -----------------  CONTROL LIST   --------------------------
007932,000262: 
007933,000263: 05,2303                        LMDSASDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007934,000264: 05,2303           32341                           DNPTR    LMDSAS07                              #  COLLECT SNAPSHOT
007935,000265: 05,2304           32355                           DNPTR    LMDSAS08                              #  SEND SNAPSHOT
007936,000266: 05,2305           01344                           1DNADR   TEVENT                                #  TEVENT,+1
007937,000267: 05,2306           13253                           3DNADR   UNFC/2                                #  UNFC/2 +0...+5
007938,000268: 05,2307           13645                           3DNADR   VGVECT                                #  VGVECT +0...+5
007939,000269: 05,2310           03642                           1DNADR   TTF/8                                 #  TTF/8,+1
007940,000270: 05,2311           03664                           1DNADR   DELTAH                                #  DELTAH,+1
007941,000271: 05,2312           12022                           3DNADR   RLS                                   #  RLS +0...+5
007942,000272: 05,2313           00007                           1DNADR   SPARE                                 
007943,000273: 05,2314           32224                           DNPTR    LMDSAS09                              #  COMMON DATA
007944,000274: 05,2315           32136                           DNPTR    LMDSAS02                              #  COMMON DATA
007945,000275: 05,2316           00024                           1DNADR   TIME2                                 #  TIME2/1
007946,000276: 05,2317           32145                           DNPTR    LMDSAS03                              #  COLLECT SNAPSHOT
007947,000277: 05,2320           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007948,000278: 05,2321           32154                           DNPTR    LMDSAS04                              #  COMMON DATA
007949,000279: 05,2322           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007950,000280: 05,2323           12636                           3DNADR   RGU                                   #  RGU +0...+5
007951,000281: 05,2324           13626                           3DNADR   VGU                                   #  VGU +0...+5
007952,000282: 05,2325           13634                           3DNADR   LAND                                  #  LAND +0...+5
007953,000283: 05,2326           02262                           1DNADR   AT                                    #  AT,+1
007954,000284: 05,2327           02400                           1DNADR   TLAND                                 #  TLAND,+1
007955,000285: 05,2330           03615                           1DNADR   FC                                    #  FC,GARBAGE
007956,000286: 05,2331           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
007957,000287: 05,2332           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007958,000288: 05,2333           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007959,000289: 05,2334           03441                           1DNADR   TIG                                   #  TIG,+1
007960,000290: 05,2335           32157                           DNPTR    LMDSAS05                              #  COMMON DATA
007961,000291: 05,2336           32170                           DNPTR    LMDSAS06                              #  COMMON DATA
007962,000292: 05,2337           03614                           1DNADR   PSEUDO55                              #  PSEUDO55,GARBAGE
007963,000293: 05,2340           74324                           -1DNADR  TTOGO                                 #  TTOGO,+1
007964,000294: 
007965,000295:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
007966,000296: 
007967,000297: 05,2341  05,2136               LMDSAS02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
007968,000298: 05,2341  05,2145               LMDSAS03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
007969,000299: 05,2341  05,2154               LMDSAS04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
007970,000300: 05,2341  05,2157               LMDSAS05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
007971,000301: 05,2341  05,2170               LMDSAS06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
007972,000302: 
007973,000303: 05,2341           75441        LMDSAS07           -1DNADR  LRZCDUDL                              #  LRZCDUDL,GARBAGE              SNAPSHOT
007974,000304: 05,2342           03651                           1DNADR   VSELECT                               #  VSELECT,GARBAGE
007975,000305: 05,2343           02337                           1DNADR   LRVTIMDL                              #  LRVTIMDL,+1

Page 201

007977,000307: 05,2344           03652                           1DNADR   VMEAS                                 #  VMEAS,+1
007978,000308: 05,2345           03754                           1DNADR   MKTIME                                #  MKTIME,+1
007979,000309: 05,2346           03654                           1DNADR   HMEAS                                 #  HMEAS,+1
007980,000310: 05,2347           03756                           1DNADR   RM                                    #  RM,+1
007981,000311: 05,2350           03457                           1DNADR   AIG                                   #  AIG,AMG
007982,000312: 05,2351           03461                           1DNADR   AOG                                   #  AOG,TRKMKCNT
007983,000313: 05,2352           03752                           1DNADR   TANGNB                                #  TANGNB,+1
007984,000314: 05,2353           03754                           1DNADR   MKTIME                                #  MKTIME,+1
007985,000315: 05,2354           75443                           -1DNADR  LRXCDUDL                              #  LRXCDUDL,LRYCDUDL
007986,000316: 
007987,000317: 05,2355           24340        LMDSAS08           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007988,000318: 05,2356           57423                           -5DNADR  DNTMBUFF   +12D                       
007989,000319: 
007990,000320: 05,2357  05,2224               LMDSAS09           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
007991,000321: 
007992,000322:                                                                                                  #  ---------------------------------------------------------
007993,000323: 

Page 202

007995,000325:                                                                                                  #  LM LUNAR SURFACE ALIGN DOWNLIST
007996,000326: 
007997,000327:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
007998,000328: 
007999,000329: 05,2357                        LMLSALDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008000,000330: 05,2357           32127                           DNPTR    LMLSAL01                              #  COLLECT SNAPSHOT
008001,000331: 05,2360           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008002,000332: 05,2361           32276                           DNPTR    LMLSAL07                              #  COLLECT SNAPSHOT
008003,000333: 05,2362           14340                           4DNADR   DNTMBUFF                              #  SEND SHAPSHOT
008004,000334: 05,2363           02774                           1DNADR   TALIGN                                #  TALIGN,+1
008005,000335: 05,2364           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
008006,000336: 05,2365           26236                           6DNADR   YNBSAV                                #  YNBSAV +0...+5,ZNBSAV +0...+5
008007,000337: 05,2366           32224                           DNPTR    LMLSAL08                              #  COMMON DATA
008008,000338: 05,2367           32136                           DNPTR    LMLSAL02                              #  COMMON DATA
008009,000339: 05,2370           00024                           1DNADR   TIME2                                 #  TIME/1
008010,000340: 05,2371           32145                           DNPTR    LMLSAL03                              #  COLLECT SNAPSHOT
008011,000341: 05,2372           24340                           6DNADR   DNTMBUFF                              #  SEND SHAPSHOT
008012,000342: 05,2373           32154                           DNPTR    LMLSAL04                              #  COMMON DATA
008013,000343: 05,2374           32226                           DNPTR    LMLSAL09                              #  COMMON DATA
008014,000344: 05,2375           12230                           3DNADR   GSAV                                  #  GSAV +0...+5
008015,000345: 05,2376           02020                           1DNADR   AGSK                                  #  AGSK,+1
008016,000346: 05,2377           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
008017,000347: 05,2400           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008018,000348: 05,2401           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008019,000349: 05,2402           03441                           1DNADR   TIG                                   #  TIG,+1
008020,000350: 05,2403           32157                           DNPTR    LMLSAL05                              #  COMMON DATA
008021,000351: 05,2404           32170                           DNPTR    LMLSAL06                              #  COMMON DATA
008022,000352: 05,2405           00007                           1DNADR   SPARE                                 
008023,000353: 05,2406           77770                           -1DNADR  SPARE                                 
008024,000354: 
008025,000355:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
008026,000356: 
008027,000357: 05,2407  05,2127               LMLSAL01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
008028,000358: 05,2407  05,2136               LMLSAL02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008029,000359: 05,2407  05,2145               LMLSAL03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
008030,000360: 05,2407  05,2154               LMLSAL04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008031,000361: 05,2407  05,2157               LMLSAL05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008032,000362: 05,2407  05,2170               LMLSAL06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
008033,000363: 05,2407  05,2276               LMLSAL07           EQUALS   LMREND07                              #  COMMON DOWNLIST DATA
008034,000364: 05,2407  05,2224               LMLSAL08           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
008035,000365: 05,2407  05,2226               LMLSAL09           EQUALS   LMCSTA07                              #  COMMON DOWNLIST DATA
008036,000366: 

Page 203

008038,000368:                                                                                                  #  ---------------------------------------------------------
008039,000369: 

Page 204

008041,000371:                                                                                                  #  LM AGS INITIALIZATION AND UPDATE DOWNLIST
008042,000372: 
008043,000373:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
008044,000374: 
008045,000375: 05,2407                        LMAGSIDL           EQUALS                                         #  SEND IO BY SPECIAL CODING
008046,000376: 05,2407           12200                           3DNADR   AGSBUFF    +0                         #  AGSBUFF +0...+5
008047,000377: 05,2410           02214                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF +12D,GARBAGE
008048,000378: 05,2411           12201                           3DNADR   AGSBUFF    +1                         #  AGSBUFF +1...+6
008049,000379: 05,2412           02215                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF +13D, GARBAGE
008050,000380: 05,2413           12206                           3DNADR   AGSBUFF    +6                         #  AGSBUFF +6...+11
008051,000381: 05,2414           02214                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF +12,GARBAGE
008052,000382: 05,2415           12207                           3DNADR   AGSBUFF    +7                         #  AGSBUFF +7...+12D
008053,000383: 05,2416           02215                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF +13D,GARBAGE
008054,000384: 05,2417           25170                           6DNADR   COMPNUMB                              #  COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
008055,000385:                                                                                                  #  UPBUFF +0...+7
008056,000386: 05,2420           25204                           6DNADR   UPBUFF     +8D                        #  UPBUFF +8D...+19D
008057,000387: 05,2421           32136                           DNPTR    LMAGSI02                              #  COMMON DATA
008058,000388: 05,2422           00024                           1DNADR   TIME2                                 #  TIME2/1
008059,000389: 05,2423           32145                           DNPTR    LMAGSI03                              #  COLLECT SNAPSHOT
008060,000390: 05,2424           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008061,000391: 05,2425           32154                           DNPTR    LMAGSI04                              #  COMMON DATA
008062,000392: 05,2426           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008063,000393: 05,2427           00007                           1DNADR   SPARE                                 
008064,000394: 05,2430           00007                           1DNADR   SPARE                                 
008065,000395: 05,2431           02020                           1DNADR   AGSK                                  #  AGSK,+1
008066,000396: 05,2432           25174                           6DNADR   UPBUFF                                #  UPBUFF +0...+11D
008067,000397: 05,2433           15210                           4DNADR   UPBUFF     +12D                       #  UPBUFF +12D...+19D
008068,000398: 05,2434           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008069,000399: 05,2435           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008070,000400: 05,2436           00007                           1DNADR   SPARE                                 
008071,000401: 05,2437           32157                           DNPTR    LMAGSI05                              #  COMMON DATA
008072,000402: 05,2440           52754                           -6DNADR  DSPTAB                                #  DSPTAB +0...+11D
008073,000403: 
008074,000404:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
008075,000405: 
008076,000406: 05,2441  05,2136               LMAGSI02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008077,000407: 05,2441  05,2145               LMAGSI03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
008078,000408: 05,2441  05,2154               LMAGSI04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008079,000409: 05,2441  05,2157               LMAGSI05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008080,000410: 
008081,000411:                                                                                                  #  ---------------------------------------------------------
008082,000412: 
008083,000413: 05,2441           02172        DNTABLE            GENADR   LMCSTADL                              #  LM COAST AND ALIGN DOWNLIST
008084,000414: 05,2442           02407                           GENADR   LMAGSIDL                              #  LM AGS INITIALIZATION/UPDATE DOWNLIST
008085,000415: 05,2443           02232                           GENADR   LMRENDDL                              #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008086,000416: 05,2444           02066                           GENADR   LMORBMDL                              #  LM ORBITAL MANEUVERS DOWNLIST
008087,000417: 05,2445           02303                           GENADR   LMDSASDL                              #  LM DESCENT AND ASCENT DOWNLIST

Page 205

008089,000419: 05,2446           02357                           GENADR   LMLSALDL                              #  LM LUNAR SURFACE ALIGN DOWNLIST
008090,000420: 
008091,000421:                                                                                                  #  ---------------------------------------------------------------
008092,000422: 
008093,000423: 

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