Source Code

These source-code files are part of a reconstructed copy of LM131 revision 1, the final release of the Apollo 13 Lunar Module (LM) Apollo Guidance Computer (AGC) software.

The source reconstruction began with source code of Luminary 131 previously transcribed from a digitized copy of that program. A dump of the flight spare core rope memory module B5, part number 2010802-171, serial number RAY 411, was obtained. This module is the only module different between Luminary 131 and LM131 revision 1. The dump was disassembled and all changes were incorporated into these source files. Note that page numbers in the reconstructed code match those on the Luminary 131 printout, although the changed code would likely have changed page numbers for a real LM131 revision 1 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.

007789,000002:                                                                                                  ## Copyright:   Public domain.
007790,000003:                                                                                                  ## Filename:    DOWNLINK_LISTS.agc
007791,000004:                                                                                                  ## Purpose:     A section of LM131 revision 1.
007792,000005:                                                                                                  ##              It is part of the reconstructed source code for the final
007793,000006:                                                                                                  ##              release of the flight software for the Lunar Module's (LM)
007794,000007:                                                                                                  ##              Apollo Guidance Computer (AGC) for Apollo 13. The code has
007795,000008:                                                                                                  ##              been reconstructed from a listing of Luminary 131 and a dump
007796,000009:                                                                                                  ##              of a core rope memory module B5, part number 2010802-171,
007797,000010:                                                                                                  ##              which is the only module different between LM131 revision 1
007798,000011:                                                                                                  ##              and Luminary 131. The executable generated from this source
007799,000012:                                                                                                  ##              has been verified against the module dump, so while the names,
007800,000013:                                                                                                  ##              comments, and ordering may not be exactly correct, the
007801,000014:                                                                                                  ##              resulting binary is.
007802,000015:                                                                                                  ## Reference:   pp. 195-207
007803,000016:                                                                                                  ## Assembler:   yaYUL
007804,000017:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
007805,000018:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
007806,000019:                                                                                                  ## Mod history: 2022-10-28 MAS  Created from Luminary 131.
007807,000020: 

Page 195

007809,000022: 22,2004                                           BANK     22                                    
007810,000023: 05,2000                                           SETLOC   DOWNTELM                              
007811,000024: 05,2000                                           BANK                                           
007812,000025: 
007813,000026: 05,2065     0340                                  EBANK=   DNTMBUFF                              
007814,000027: 
007815,000028:                                                                                                  #  SPECIAL DOWNLINK OP CODES
007816,000029:                                                                                                  #        OP CODE          ADDRESS(EXAMPLE)         SENDS..               BIT 15          BITS 14-12      BITS 11
007817,000030:                                                                                                  #                                                                                                             -0
007818,000031:                                                                                                  #        ------          ----------              ----------              ------          ----------      -------
007819,000032:                                                                                                  #                                                                                                             --
007820,000033:                                                                                                  #        1DNADR          TIME2                   (2 AGC WDS)             0               0               ECADR
007821,000034:                                                                                                  #        2DNADR          TEPHEM                  (4 AGC WDS)             0               1               ECADR
007822,000035:                                                                                                  #        3DNADR          VGBODY                  (6 AGC WDS)             0               2               ECADR
007823,000036:                                                                                                  #        4DNADR          STATE                   (8 AGC WDS)             0               3               ECADR
007824,000037:                                                                                                  #        5DNADR          UPBUFF                  (10 AGC WDS)            0               4               ECADR
007825,000038:                                                                                                  #        6DNADR          DSPTAB                  (12 AGC WDS)            0               5               ECADR
007826,000039:                                                                                                  #        DNCHAN          30                      CHANNELS                0               7               CHANNEL
007827,000040:                                                                                                  #                                                                                                        ADDRESS
007828,000041:                                                                                                  #        DNPTR           NEXTLIST                POINTS TO NEXT          0               6               ADRES
007829,000042:                                                                                                  #                                                 LIST.
007830,000043: 
007831,000044:                                                                                                  #  DOWNLIST FORMAT DEFINITIONS AND RULES-
007832,000045:                                                                                                  #  1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
007833,000046:                                                                                                  #  2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
007834,000047:                                                                                                  #  3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
007835,000048:                                                                                                  #  4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
007836,000049:                                                                                                  #  5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
007837,000050:                                                                                                  #     LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
007838,000051: 
007839,000052: 05,2065                                           COUNT*   $$/DLIST                              
007840,000053: 05,2065                        ERASZERO           EQUALS   7                                     
007841,000054: 05,2065  0000007               UNKNOWN            EQUALS   ERASZERO                              
007842,000055: 05,2065  0000007               SPARE              EQUALS   ERASZERO                              #  USE SPARE TO INDICATE AVAILABLE SPACE
007843,000056: 05,2065           77340        LOWIDCOD           OCT      77340                                 #  LOW ID CODE
007844,000057: 
007845,000058: 05,2066  05,2172               NOMDNLST           EQUALS   LMCSTADL                              #  FRESH START AND POST P27 DOWNLIST
007846,000059: 
007847,000060: 05,2066  05,2407               AGSLIST            EQUALS   LMAGSIDL                              
007848,000061: 
007849,000062: 05,2066  05,2407               UPDNLIST           EQUALS   LMAGSIDL                              #  UPDATE PROGRAM (P27) DOWNLIST
007850,000063: 

Page 196

007852,000065:                                                                                                  #  LM ORBITAL MANEUVERS LIST
007853,000066: 
007854,000067:                                                                                                  #  -----------------  CONTROL LIST   --------------------------
007855,000068: 
007856,000069: 05,2066                        LMORBMDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007857,000070: 05,2066           32127                           DNPTR    LMORBM01                              #  COLLECT SNAPSHOT
007858,000071: 05,2067           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007859,000072: 05,2070           03451                           1DNADR   DELLT4                                #  DELLT4,+1
007860,000073: 05,2071           13443                           3DNADR   RTARG                                 #  RTARG,+1...+5
007861,000074: 05,2072           02256                           1DNADR   ELEV                                  #  ELEV,+1
007862,000075: 05,2073           01341                           1DNADR   TEVENT                                #  TEVENT,+1
007863,000076: 05,2074           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
007864,000077: 05,2075           03633                           1DNADR   TCSI                                  #  TCSI,+1
007865,000078: 05,2076           12266                           3DNADR   DELVEET1                              #  DELVEET1 +0...+5
007866,000079: 05,2077           13700                           3DNADR   VGTIG                                 #  VGTIG +0...+5
007867,000080: 05,2100           01335                           1DNADR   DNLRVELZ                              #  DNLRVELZ,DNLRALT
007868,000081: 05,2101           03630                           1DNADR   TPASS4                                #  TPASS4,+1
007869,000082: 05,2102           32136                           DNPTR    LMORBM02                              #  COMMON DATA
007870,000083: 05,2103           00024                           1DNADR   TIME2                                 #  TIME2/1
007871,000084: 05,2104           32145                           DNPTR    LMORBM03                              #  COLLECT SNAPSHOT
007872,000085: 05,2105           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007873,000086: 05,2106           32154                           DNPTR    LMORBM04                              #  COMMON DATA
007874,000087: 05,2107           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007875,000088: 05,2110           00007                           1DNADR   SPARE                                 
007876,000089: 05,2111           01776                           1DNADR   TCDH                                  #  TCDH,+1
007877,000090: 05,2112           12274                           3DNADR   DELVEET2                              #  DELVEET2 +0...+5
007878,000091: 05,2113           03635                           1DNADR   TTPI                                  #  TTPI,+1
007879,000092: 05,2114           12365                           3DNADR   DELVEET3                              #  DELVEET3 +0...+5
007880,000093: 05,2115           01330                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
007881,000094: 05,2116           05333                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007882,000095: 05,2117           03577                           1DNADR   DIFFALT                               #  DIFFALT,+1
007883,000096: 05,2120           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007884,000097: 05,2121           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007885,000098: 05,2122           03441                           1DNADR   TIG                                   #  TIG,+1
007886,000099: 05,2123           32157                           DNPTR    LMORBM05                              #  COMMON DATA
007887,000100: 05,2124           32170                           DNPTR    LMORBM06                              #  COMMON DATA
007888,000101: 05,2125           00007                           1DNADR   SPARE                                 #  FORMERLY PIF
007889,000102: 05,2126           74261                           -1DNADR  TGO                                   #  TGO,+1
007890,000103: 
007891,000104:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
007892,000105: 
007893,000106: 05,2127           76056        LMORBM01           -1DNADR  R-OTHER    +2                         #  R-OTHER +2,+3         SNAPSHOT
007894,000107: 05,2130           01723                           1DNADR   R-OTHER    +4                         #  R-OTHER +4,+5
007895,000108: 05,2131           01725                           1DNADR   V-OTHER                               #  V-OTHER,+1
007896,000109: 05,2132           01727                           1DNADR   V-OTHER    +2                         #  V-OTHER +2,+3
007897,000110: 05,2133           01731                           1DNADR   V-OTHER    +4                         #  V-OTHER +4,+5
007898,000111: 05,2134           01570                           1DNADR   T-OTHER                               #  T-OTHER,+1
007899,000112: 05,2135           76060                           -1DNADR  R-OTHER                               #  R-OTHER +0,+1
007900,000113: 
007901,000114: 05,2136           04320        LMORBM02           2DNADR   REDOCTR                               #  REDOCTR,THETAD,+1,+2  COMMON DATA

Page 197

007903,000116: 05,2137           01432                           1DNADR   RSBBQ                                 #  RSBBQ,+1
007904,000117: 05,2140           07021                           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
007905,000118: 05,2141           07234                           2DNADR   CDUXD                                 #  CDUXD,CDUYD,CDUZD,GARBAGE
007906,000119: 05,2142           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
007907,000120: 05,2143           24074                           6DNADR   STATE                                 #  STATE +0...+11D (FLAGWORDS)
007908,000121: 05,2144           52755                           -6DNADR  DSPTAB                                #  DSPTAB TABLES
007909,000122: 
007910,000123: 05,2145           76556        LMORBM03           -1DNADR  RN         +2                         #  RN +2,+3              SNAPSHOT
007911,000124: 05,2146           01223                           1DNADR   RN         +4                         #  RN +4,+5
007912,000125: 05,2147           01225                           1DNADR   VN                                    #  VN,+1
007913,000126: 05,2150           01227                           1DNADR   VN         +2                         #  VN +2,+3
007914,000127: 05,2151           01231                           1DNADR   VN         +4                         #  VN +4,+5
007915,000128: 05,2152           01233                           1DNADR   PIPTIME                               #  PIPTIME,+1
007916,000129: 05,2153           76560                           -1DNADR  RN                                    #  RN,+1
007917,000130: 
007918,000131: 05,2154           07242        LMORBM04           2DNADR   OMEGAPD                               #  OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
007919,000132: 05,2155           10372                           3DNADR   CADRFLSH                              #  CADRFLSH,+1,+2,FAILREG,+1,+2
007920,000133: 05,2156           77667                           -1DNADR  RADMODES                              #  RADMODES,DAPBOOLS     COMMON DATA
007921,000134: 
007922,000135: 05,2157           07021        LMORBM05           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
007923,000136: 05,2160           07234                           2DNADR   CDUXD                                 #  CDUXD,CDUXD,CDUZD,GARBAGE
007924,000137: 05,2161           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
007925,000138: 05,2162           03024                           1DNADR   ALPHAQ                                #  ALPHAQ,ALPHAR         COMMON DATA
007926,000139: 05,2163           03113                           1DNADR   POSTORKP                              #  POSTORKP,NEGTORKP
007927,000140: 05,2164           34011                           DNCHAN   11                                    #  CHANNELS 11,12
007928,000141: 05,2165           34013                           DNCHAN   13                                    #  CHANNELS 13,14
007929,000142: 05,2166           34030                           DNCHAN   30                                    #  CHANNELS 30,31
007930,000143: 05,2167           43745                           -DNCHAN  32                                    #  CHANNELS 32,33
007931,000144: 
007932,000145: 05,2170           03560        LMORBM06           1DNADR   PIPTIME1                              #  PIPTIME,+1            COMMON DATA
007933,000146: 05,2171           67453                           -3DNADR  DELV                                  #  DELV +0...+5
007934,000147: 
007935,000148:                                                                                                  #  ---------------------------------------------------------
007936,000149: 

Page 198

007938,000151:                                                                                                  #  LM COAST AND ALIGNMENT DOWNLIST
007939,000152: 
007940,000153:                                                                                                  #  -----------------  CONTROL LIST   --------------------------
007941,000154: 
007942,000155: 05,2172                        LMCSTADL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007943,000156: 05,2172           32127                           DNPTR    LMCSTA01                              #  COLLECT SNAPSHOT
007944,000157: 05,2173           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007945,000158: 05,2174           02020                           1DNADR   AGSK                                  #  AGSK,+1
007946,000159: 05,2175           02774                           1DNADR   TALIGN                                #  TALIGN,+1
007947,000160: 05,2176           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007948,000161: 05,2177           01330                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
007949,000162: 05,2200           01341                           1DNADR   TEVENT                                #  TEVENT,+1
007950,000163: 05,2201           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
007951,000164: 05,2202           00734                           1DNADR   AOTCODE                               #  AOTCODE,GARBAGE
007952,000165: 05,2203           12022                           3DNADR   RLS                                   #  RLS +0...+5
007953,000166: 05,2204           05333                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007954,000167: 05,2205           13700                           3DNADR   VGTIG                                 #  VGTIGX,Y,Z
007955,000168: 05,2206           32136                           DNPTR    LMCSTA02                              #  COMMON DATA
007956,000169: 05,2207           00024                           1DNADR   TIME2                                 #  TIME2/1
007957,000170: 05,2210           32145                           DNPTR    LMCSTA03                              #  COLLECT SNAPSHOT
007958,000171: 05,2211           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007959,000172: 05,2212           32154                           DNPTR    LMCSTA04                              #  COMMON DATA
007960,000173: 05,2213           32226                           DNPTR    LMCSTA07                              #  COMMON DATA
007961,000174: 05,2214           05333                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007962,000175: 05,2215           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
007963,000176: 05,2216           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
007964,000177: 05,2217           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
007965,000178: 05,2220           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
007966,000179: 05,2221           03441                           1DNADR   TIG                                   #  TIG,+1
007967,000180: 05,2222           32157                           DNPTR    LMCSTA05                              #  COMMON DATA
007968,000181: 05,2223           52755                           -6DNADR  DSPTAB                                #  DSPTAB +0...+11D TABLE
007969,000182: 
007970,000183:                                                                                                  #  -----------------  SUB-LISTS   ----------------------------
007971,000184: 
007972,000185: 05,2224  05,2127               LMCSTA01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
007973,000186: 05,2224  05,2136               LMCSTA02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
007974,000187: 05,2224  05,2145               LMCSTA03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
007975,000188: 05,2224  05,2154               LMCSTA04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
007976,000189: 05,2224  05,2157               LMCSTA05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
007977,000190: 
007978,000191: 05,2224           05700        LMCSTA06           2DNADR   X789                                  #  X789 +0...+3          COMMON DATA
007979,000192: 05,2225           77665                           -1DNADR  LASTYCMD                              #  LASTYCMD,LASTXCMD
007980,000193: 05,2226           12737        LMCSTA07           3DNADR   OGC                                   #  OGC,+1,IGC,+1,MGC,+1  COMMON DATA
007981,000194: 05,2227           02755                           1DNADR   BESTI                                 #  BESTI,BESTJ
007982,000195: 05,2230           12760                           3DNADR   STARSAV1                              #  STARSAV1 +0...+5
007983,000196: 05,2231           65011                           -3DNADR  STARSAV2                              #  STARSAV2 +0...+5

Page 199

007985,000198:                                                                                                  #  -----------------------------------------------------------
007986,000199: 

Page 200

007988,000201:                                                                                                  #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
007989,000202: 
007990,000203:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
007991,000204: 
007992,000205: 05,2232                        LMRENDDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
007993,000206: 05,2232           32127                           DNPTR    LMREND01                              #  COLLECT SNAPSHOT
007994,000207: 05,2233           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007995,000208: 05,2234           32276                           DNPTR    LMREND07                              #  COLLECT SNAPSHOT
007996,000209: 05,2235           14340                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
007997,000210: 05,2236           03451                           1DNADR   DELLT4                                #  DELLT4,+1
007998,000211: 05,2237           13443                           3DNADR   RTARG                                 #  RTARG +0...+5
007999,000212: 05,2240           13433                           3DNADR   DELVSLV                               #  DELVSLV +0...+5
008000,000213: 05,2241           03633                           1DNADR   TCSI                                  #  TCSI,+1
008001,000214: 05,2242           12266                           3DNADR   DELVEET1                              #  DELVEET +0-..+5
008002,000215: 05,2243           00007                           1DNADR   SPARE                                 
008003,000216: 05,2244           03630                           1DNADR   TPASS4                                #  TPASS4,+1
008004,000217: 05,2245           32224                           DNPTR    LMREND06                              #  COMMON DATA
008005,000218: 05,2246           32136                           DNPTR    LMREND02                              #  COMMON DATA
008006,000219: 05,2247           00024                           1DNADR   TIME2                                 #  TIME2/1
008007,000220: 05,2250           32145                           DNPTR    LMREND03                              #  COLLECT SNAPSHOT
008008,000221: 05,2251           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008009,000222: 05,2252           32154                           DNPTR    LMREND04                              #  COMMON DATA
008010,000223: 05,2253           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008011,000224: 05,2254           00007                           1DNADR   SPARE                                 
008012,000225: 05,2255           01776                           1DNADR   TCDH                                  #  TCDH,+1
008013,000226: 05,2256           12274                           3DNADR   DELVEET2                              #  DELVEET2 +0...+5
008014,000227: 05,2257           03635                           1DNADR   TTPI                                  #  TTPI,+1
008015,000228: 05,2260           12365                           3DNADR   DELVEET3                              #  DELVEET3 +0...+5
008016,000229: 05,2261           02256                           1DNADR   ELEV                                  #  ELEV,+1
008017,000230: 05,2262           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
008018,000231: 05,2263           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
008019,000232: 05,2264           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008020,000233: 05,2265           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008021,000234: 05,2266           03441                           1DNADR   TIG                                   #  TIG,+1
008022,000235: 05,2267           32157                           DNPTR    LMREND05                              #  COMMON DATA
008023,000236: 05,2270           00007                           1DNADR   SPARE                                 
008024,000237: 05,2271           03620                           1DNADR   CENTANG                               #  CENTANG,+1
008025,000238: 05,2272           03466                           1DNADR   NN                                    #  NN,+1
008026,000239: 05,2273           03577                           1DNADR   DIFFALT                               #  DIFFALT,+1
008027,000240: 05,2274           02347                           1DNADR   DELVTPF                               #  DELVTPF,+1
008028,000241: 05,2275           77770                           -1DNADR  SPARE                                 
008029,000242: 
008030,000243:                                                                                                  #  -----------------  SUB-LISTS  ----------------------------
008031,000244: 
008032,000245: 05,2276  05,2127               LMREND01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
008033,000246: 05,2276  05,2136               LMREND02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008034,000247: 05,2276  05,2145               LMREND03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA

Page 201

008036,000249: 05,2276  05,2154               LMREND04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008037,000250: 05,2276  05,2157               LMREND05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008038,000251: 05,2276  05,2224               LMREND06           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
008039,000252: 
008040,000253: 05,2276           74320        LMREND07           -1DNADR  AIG                                   #  AIG,AMG               SNAPSHOT
008041,000254: 05,2277           03461                           1DNADR   AOG                                   #  AOG,TRKMKCNT
008042,000255: 05,2300           03752                           1DNADR   TANGNB                                #  TANGNB,+1
008043,000256: 05,2301           03754                           1DNADR   MKTIME                                #  MKTIME,+1
008044,000257: 05,2302           74017                           -1DNADR  RANGRDOT                              #  DNRRANGE,DNRRDOT
008045,000258: 
008046,000259:                                                                                                  #  ---------------------------------------------------------
008047,000260: 

Page 202

008049,000262:                                                                                                  #  LM DESCENT AND ASCENT DOWNLIST
008050,000263: 
008051,000264:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
008052,000265: 
008053,000266: 05,2303                        LMDSASDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008054,000267: 05,2303           32341                           DNPTR    LMDSAS07                              #  COLLECT SNAPSHOT
008055,000268: 05,2304           32355                           DNPTR    LMDSAS08                              #  SEND SNAPSHOT
008056,000269: 05,2305           01341                           1DNADR   TEVENT                                #  TEVENT,+1
008057,000270: 05,2306           13252                           3DNADR   UNFC/2                                #  UNFC/2 +0...+5
008058,000271: 05,2307           13645                           3DNADR   VGVECT                                #  VGVECT +0...+5
008059,000272: 05,2310           03642                           1DNADR   TTF/8                                 #  TTF/8,+1
008060,000273: 05,2311           03664                           1DNADR   DELTAH                                #  DELTAH,+1
008061,000274: 05,2312           12022                           3DNADR   RLS                                   #  RLS +0...+5
008062,000275: 05,2313           02276                           1DNADR   ZDOTD                                 #  ZDOTD,+1
008063,000276: 05,2314           32224                           DNPTR    LMDSAS09                              #  COMMON DATA
008064,000277: 05,2315           32136                           DNPTR    LMDSAS02                              #  COMMON DATA
008065,000278: 05,2316           00024                           1DNADR   TIME2                                 #  TIME2/1
008066,000279: 05,2317           32145                           DNPTR    LMDSAS03                              #  COLLECT SNAPSHOT
008067,000280: 05,2320           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008068,000281: 05,2321           32154                           DNPTR    LMDSAS04                              #  COMMON DATA
008069,000282: 05,2322           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008070,000283: 05,2323           12626                           3DNADR   RGU                                   #  RGU +0...+5
008071,000284: 05,2324           13626                           3DNADR   VGU                                   #  VGU +0...+5
008072,000285: 05,2325           13634                           3DNADR   LAND                                  #  LAND +0...+5
008073,000286: 05,2326           02262                           1DNADR   AT                                    #  AT,+1
008074,000287: 05,2327           02400                           1DNADR   TLAND                                 #  TLAND,+1
008075,000288: 05,2330           03615                           1DNADR   FC                                    #  FC,GARBAGE
008076,000289: 05,2331           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
008077,000290: 05,2332           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008078,000291: 05,2333           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008079,000292: 05,2334           03441                           1DNADR   TIG                                   #  TIG,+1
008080,000293: 05,2335           32157                           DNPTR    LMDSAS05                              #  COMMON DATA
008081,000294: 05,2336           32170                           DNPTR    LMDSAS06                              #  COMMON DATA
008082,000295: 05,2337           03614                           1DNADR   PSEUDO55                              #  PSEUDO55,GARBAGE
008083,000296: 05,2340           74324                           -1DNADR  TTOGO                                 #  TTOGO,+1
008084,000297: 
008085,000298:                                                                                                  #  -----------------  SUB-LISTS  ----------------------------
008086,000299: 
008087,000300: 05,2341  05,2136               LMDSAS02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008088,000301: 05,2341  05,2145               LMDSAS03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
008089,000302: 05,2341  05,2154               LMDSAS04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008090,000303: 05,2341  05,2157               LMDSAS05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008091,000304: 05,2341  05,2170               LMDSAS06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
008092,000305: 
008093,000306: 05,2341           75441        LMDSAS07           -1DNADR  LRZCDUDL                              #  LRZCDUDL,GARBAGE              SNAPSHOT
008094,000307: 05,2342           03651                           1DNADR   VSELECT                               #  VSELECT,GARBAGE
008095,000308: 05,2343           02337                           1DNADR   LRVTIMDL                              #  LRVTIMDL,+1

Page 203

008097,000310: 05,2344           03652                           1DNADR   VMEAS                                 #  VMEAS,+1
008098,000311: 05,2345           03754                           1DNADR   MKTIME                                #  MKTIME,+1
008099,000312: 05,2346           03654                           1DNADR   HMEAS                                 #  HMEAS,+1
008100,000313: 05,2347           03756                           1DNADR   RM                                    #  RM,+1
008101,000314: 05,2350           03457                           1DNADR   AIG                                   #  AIG,AMG
008102,000315: 05,2351           03461                           1DNADR   AOG                                   #  AOG,TRKMKCNT
008103,000316: 05,2352           03752                           1DNADR   TANGNB                                #  TANGNB,+1
008104,000317: 05,2353           03754                           1DNADR   MKTIME                                #  MKTIME,+1
008105,000318: 05,2354           75443                           -1DNADR  LRXCDUDL                              #  LRXCDUDL,LRYCDUDL
008106,000319: 
008107,000320: 05,2355           24340        LMDSAS08           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008108,000321: 05,2356           57423                           -5DNADR  DNTMBUFF   +12D                       
008109,000322: 
008110,000323: 05,2357  05,2224               LMDSAS09           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
008111,000324: 
008112,000325:                                                                                                  #  ---------------------------------------------------------
008113,000326: 

Page 204

008115,000328:                                                                                                  #  LM LUNAR SURFACE ALIGN DOWNLIST
008116,000329: 
008117,000330:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
008118,000331: 
008119,000332: 05,2357                        LMLSALDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
008120,000333: 05,2357           32127                           DNPTR    LMLSAL01                              #  COLLECT SNAPSHOT
008121,000334: 05,2360           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008122,000335: 05,2361           32276                           DNPTR    LMLSAL07                              #  COLLECT SNAPSHOT
008123,000336: 05,2362           14340                           4DNADR   DNTMBUFF                              #  SEND SHAPSHOT
008124,000337: 05,2363           02774                           1DNADR   TALIGN                                #  TALIGN,+1
008125,000338: 05,2364           25733                           6DNADR   REFSMMAT                              #  REFSMMAT +0...+11D
008126,000339: 05,2365           26236                           6DNADR   YNBSAV                                #  YNBSAV +0...+5,ZNBSAV +0...+5
008127,000340: 05,2366           32224                           DNPTR    LMLSAL08                              #  COMMON DATA
008128,000341: 05,2367           32136                           DNPTR    LMLSAL02                              #  COMMON DATA
008129,000342: 05,2370           00024                           1DNADR   TIME2                                 #  TIME/1
008130,000343: 05,2371           32145                           DNPTR    LMLSAL03                              #  COLLECT SNAPSHOT
008131,000344: 05,2372           24340                           6DNADR   DNTMBUFF                              #  SEND SHAPSHOT
008132,000345: 05,2373           32154                           DNPTR    LMLSAL04                              #  COMMON DATA
008133,000346: 05,2374           32226                           DNPTR    LMLSAL09                              #  COMMON DATA
008134,000347: 05,2375           12230                           3DNADR   GSAV                                  #  GSAV +0...+5
008135,000348: 05,2376           02020                           1DNADR   AGSK                                  #  AGSK,+1
008136,000349: 05,2377           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
008137,000350: 05,2400           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008138,000351: 05,2401           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008139,000352: 05,2402           03441                           1DNADR   TIG                                   #  TIG,+1
008140,000353: 05,2403           32157                           DNPTR    LMLSAL05                              #  COMMON DATA
008141,000354: 05,2404           32170                           DNPTR    LMLSAL06                              #  COMMON DATA
008142,000355: 05,2405           00007                           1DNADR   SPARE                                 
008143,000356: 05,2406           77770                           -1DNADR  SPARE                                 
008144,000357: 
008145,000358:                                                                                                  #  -----------------  SUB-LISTS  ----------------------------
008146,000359: 
008147,000360: 05,2407  05,2127               LMLSAL01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
008148,000361: 05,2407  05,2136               LMLSAL02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008149,000362: 05,2407  05,2145               LMLSAL03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
008150,000363: 05,2407  05,2154               LMLSAL04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008151,000364: 05,2407  05,2157               LMLSAL05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008152,000365: 05,2407  05,2170               LMLSAL06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
008153,000366: 05,2407  05,2276               LMLSAL07           EQUALS   LMREND07                              #  COMMON DOWNLIST DATA
008154,000367: 05,2407  05,2224               LMLSAL08           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
008155,000368: 05,2407  05,2226               LMLSAL09           EQUALS   LMCSTA07                              #  COMMON DOWNLIST DATA
008156,000369: 

Page 205

008158,000371:                                                                                                  #  ---------------------------------------------------------
008159,000372: 

Page 206

008161,000374:                                                                                                  #  LM AGS INITIALIZATION AND UPDATE DOWNLIST
008162,000375: 
008163,000376:                                                                                                  #  -----------------  CONTROL LIST  --------------------------
008164,000377: 
008165,000378: 05,2407                        LMAGSIDL           EQUALS                                         #  SEND IO BY SPECIAL CODING
008166,000379: 05,2407           12200                           3DNADR   AGSBUFF    +0                         #  AGSBUFF +0...+5
008167,000380: 05,2410           02214                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF +12D,GARBAGE
008168,000381: 05,2411           12201                           3DNADR   AGSBUFF    +1                         #  AGSBUFF +1...+6
008169,000382: 05,2412           02215                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF +13D, GARBAGE
008170,000383: 05,2413           12206                           3DNADR   AGSBUFF    +6                         #  AGSBUFF +6...+11
008171,000384: 05,2414           02214                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF +12,GARBAGE
008172,000385: 05,2415           12207                           3DNADR   AGSBUFF    +7                         #  AGSBUFF +7...+12D
008173,000386: 05,2416           02215                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF +13D,GARBAGE
008174,000387: 05,2417           25167                           6DNADR   COMPNUMB                              #  COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
008175,000388:                                                                                                  #  UPBUFF +0...+7
008176,000389: 05,2420           25203                           6DNADR   UPBUFF     +8D                        #  UPBUFF +8D...+19D
008177,000390: 05,2421           32136                           DNPTR    LMAGSI02                              #  COMMON DATA
008178,000391: 05,2422           00024                           1DNADR   TIME2                                 #  TIME2/1
008179,000392: 05,2423           32145                           DNPTR    LMAGSI03                              #  COLLECT SNAPSHOT
008180,000393: 05,2424           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
008181,000394: 05,2425           32154                           DNPTR    LMAGSI04                              #  COMMON DATA
008182,000395: 05,2426           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008183,000396: 05,2427           00007                           1DNADR   SPARE                                 
008184,000397: 05,2430           00007                           1DNADR   SPARE                                 
008185,000398: 05,2431           02020                           1DNADR   AGSK                                  #  AGSK,+1
008186,000399: 05,2432           25173                           6DNADR   UPBUFF                                #  UPBUFF +0...+11D
008187,000400: 05,2433           15207                           4DNADR   UPBUFF     +12D                       #  UPBUFF +12D...+19D
008188,000401: 05,2434           01326                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
008189,000402: 05,2435           01277                           1DNADR   IMODES30                              #  IMODES30,IMODES33
008190,000403: 05,2436           00007                           1DNADR   SPARE                                 
008191,000404: 05,2437           32157                           DNPTR    LMAGSI05                              #  COMMON DATA
008192,000405: 05,2440           52755                           -6DNADR  DSPTAB                                #  DSPTAB +0...+11D
008193,000406: 
008194,000407:                                                                                                  #  -----------------  SUB-LISTS  ----------------------------
008195,000408: 
008196,000409: 05,2441  05,2136               LMAGSI02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
008197,000410: 05,2441  05,2145               LMAGSI03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
008198,000411: 05,2441  05,2154               LMAGSI04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
008199,000412: 05,2441  05,2157               LMAGSI05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
008200,000413: 
008201,000414:                                                                                                  #  ---------------------------------------------------------
008202,000415: 
008203,000416: 05,2441           02172        DNTABLE            GENADR   LMCSTADL                              #  LM COAST AND ALIGN DOWNLIST
008204,000417: 05,2442           02407                           GENADR   LMAGSIDL                              #  LM AGS INITIALIZATION/UPDATE DOWNLIST
008205,000418: 05,2443           02232                           GENADR   LMRENDDL                              #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008206,000419: 05,2444           02066                           GENADR   LMORBMDL                              #  LM ORBITAL MANEUVERS DOWNLIST
008207,000420: 05,2445           02303                           GENADR   LMDSASDL                              #  LM DESCENT AND ASCENT DOWNLIST

Page 207

008209,000422: 05,2446           02357                           GENADR   LMLSALDL                              #  LM LUNAR SURFACE ALIGN DOWNLIST
008210,000423: 
008211,000424:                                                                                                  #  ---------------------------------------------------------------
008212,000425: 
008213,000426: 

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