Source Code

These source-code files were transcribed from scans made from Don Eyles's personal copy of Luminary 069. They were scanned at archive.org's Boston facility, and the scanning was sponsored by Onno Hommes. The code was transcribed from these scans by a team of volunteers who are referenced in the program comments. Comments from the original source code are prefixed with a single '#' symbol, whereas comments added later are prefixed by "##" or "###". In some cases, where similar code blocks exist in previously-transcribed AGC programs (primarily Luminary 99, from Apollo 11) those code blocks were used as a starting point and then corrected to agree with the Luminary 69 scans. The full scans are available at the Virtual AGC project's collection at archive.org, while more-convenient reduced-size (but reduced-quality) images are available at the main Virtual AGC website. Report any errors noted by creating an issue report at the Virtual AGC project's GitHub repository. Notations on the program listing read, in part:

	GAP:  ASSEMBLE REVISION 069 OF AGC PROGRAM LUMINARY BY NASA 2021112-011
	19:02 NOV. 25,1968
Note that the date is the date of the printout, not the date of the program revision.

009065,000002:                                                                                                  ## Copyright:   Public domain.
009066,000003:                                                                                                  ## Filename:    DOWNLINK_LISTS.agc
009067,000004:                                                                                                  ## Purpose:     The main source file for Luminary revision 069.
009068,000005:                                                                                                  ##              It is part of the source code for the original release
009069,000006:                                                                                                  ##              of the flight software for the Lunar Module's (LM) Apollo
009070,000007:                                                                                                  ##              Guidance Computer (AGC) for Apollo 10. The actual flown
009071,000008:                                                                                                  ##              version was Luminary 69 revision 2, which included a
009072,000009:                                                                                                  ##              newer lunar gravity model and only affected module 2.
009073,000010:                                                                                                  ##              This file is intended to be a faithful transcription, except
009074,000011:                                                                                                  ##              that the code format has been changed to conform to the
009075,000012:                                                                                                  ##              requirements of the yaYUL assembler rather than the
009076,000013:                                                                                                  ##              original YUL assembler.
009077,000014:                                                                                                  ## Reference:   pp. 208-220
009078,000015:                                                                                                  ## Assembler:   yaYUL
009079,000016:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
009080,000017:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
009081,000018:                                                                                                  ## Mod history: 2016-12-13 MAS  Created from Luminary 99.
009082,000019:                                                                                                  ##              2017-01-08 HG   Transcribed
009083,000020:                                                                                                  ##              2017-01-25 RSB  Proofed comment text using octopus/prooferComments
009084,000021:                                                                                                  ##                              and fixed errors found.
009085,000022:                                                                                                  ##              2017-03-05 RSB  A few comment-text fixes identified while proofing
009086,000023:                                                                                                  ##                              Luminary 116.
009087,000024:                                                                                                  ##              2017-03-15 RSB  Comment-text fixes identified in 5-way
009088,000025:                                                                                                  ##                              side-by-side diff of Luminary 69/99/116/131/210.
009089,000026: 

Page 208

009091,000028: 22,2004                                           BANK     22                                    
009092,000029: 05,2000                                           SETLOC   DOWNTELM                              
009093,000030: 05,2000                                           BANK                                           
009094,000031: 
009095,000032: 05,2065     0340                                  EBANK=   DNTMBUFF                              
009096,000033: 
009097,000034:                                                                                                  #  SPECIAL DOWNLINK OP CODES
009098,000035:                                                                                                  #        OP CODE  ADDRESS(EXAMPLE) SENDS..     BIT 15  BITS 14-12 BITS 11
009099,000036:                                                                                                  #                                                                      -0
009100,000037:                                                                                                  #        ------  ----------      ----------    ------  ---------- -------
009101,000038:                                                                                                  #                                                                      --
009102,000039:                                                                                                  #        1DNADR  TIME2           (2 AGC WDS)     0         0      ECADR
009103,000040:                                                                                                  #        2DNADR  TEPHEM          (4 AGC WDS)     0         1      ECADR
009104,000041:                                                                                                  #        3DNADR  VGBODY          (6 AGC WDS)     0         2      ECADR
009105,000042:                                                                                                  #        4DNADR  STATE           (8 AGC WDS)     0         3      ECADR
009106,000043:                                                                                                  #        5DNADR  UPBUFF          (10 AGC WDS)    0         4      ECADR
009107,000044:                                                                                                  #        6DNADR  DSPTAB          (12 AGC WDS)    0         5      ECADR
009108,000045:                                                                                                  #        DNCHAN  30              CHANNELS        0         7      CHANNEL
009109,000046:                                                                                                  #                                                                 ADDRESS
009110,000047:                                                                                                  #        DNPTR   NEXTLIST        POINTS TO NEXT  0         6      ADRES
009111,000048:                                                                                                  #                                 LIST.
009112,000049: 
009113,000050:                                                                                                  #  DOWNLIST FORMAT DEFINITIONS AND RULES-
009114,000051:                                                                                                  #  1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
009115,000052:                                                                                                  #  2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
009116,000053:                                                                                                  #  3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
009117,000054:                                                                                                  #  4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
009118,000055:                                                                                                  #  5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
009119,000056:                                                                                                  #     LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
009120,000057: 
009121,000058: 05,2065                                           COUNT*   $$/DLIST                              
009122,000059: 05,2065                        ERASZERO           EQUALS   7                                     
009123,000060: 05,2065  0000007               UNKNOWN            EQUALS   ERASZERO                              
009124,000061: 05,2065  0000007               SPARE              EQUALS   ERASZERO                              #  USE SPARE TO INDICATE AVAILABLE SPACE
009125,000062: 05,2065           77340        LOWIDCOD           OCT      77340                                 #  LOW ID CODE
009126,000063: 
009127,000064: 
009128,000065: 05,2066  05,2172               NOMDNLST           EQUALS   LMCSTADL                              #  FRESH START AND POST P27 DOWNLIST
009129,000066: 
009130,000067: 05,2066  05,2407               AGSLIST            EQUALS   LMAGSIDL                              
009131,000068: 
009132,000069: 05,2066  05,2407               UPDNLIST           EQUALS   LMAGSIDL                              #  UPDATE PROGRAM (P27) DOWNLIST
009133,000070: 

Page 209

009135,000072:                                                                                                  #  LM ORBITAL MANEUVERS LIST
009136,000073: 
009137,000074:                                                                                                  #      -----------------  CONTROL LIST  --------------------------
009138,000075: 
009139,000076: 05,2066                        LMORBMDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
009140,000077: 05,2066           32127                           DNPTR    LMORBM01                              #  COLLECT SNAPSHOT
009141,000078: 05,2067           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009142,000079: 05,2070           03447                           1DNADR   DELLT4                                #  DELLT4,+1
009143,000080: 05,2071           13441                           3DNADR   RTARG                                 #  RTARG,+1...+5
009144,000081: 05,2072           02262                           1DNADR   ELEV                                  #  ELEV,+1
009145,000082: 05,2073           01344                           1DNADR   TEVENT                                #  TEVENT,+1
009146,000083: 05,2074           25733                           6DNADR   REFSMMAT                              #  REFSMMAT+0...+11D
009147,000084: 05,2075           03631                           1DNADR   TCSI                                  #  TCSI,+1
009148,000085: 05,2076           12272                           3DNADR   DELVEET1                              #  DELVEET1+0...+5
009149,000086: 05,2077           13704                           3DNADR   VGTIG                                 #  VGTIG+0...+5
009150,000087: 05,2100           01340                           1DNADR   DNLRVELZ                              #  DNLRVELZ,DNLRALT
009151,000088: 05,2101           03626                           1DNADR   TPASS4                                #  TPASS4,+1
009152,000089: 05,2102           32136                           DNPTR    LMORBM02                              #  COMMON DATA
009153,000090: 05,2103           00024                           1DNADR   TIME2                                 #  TIME2/1
009154,000091: 05,2104           32145                           DNPTR    LMORBM03                              #  COLLECT SNAPSHOT
009155,000092: 05,2105           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009156,000093: 05,2106           32154                           DNPTR    LMORBM04                              #  COMMON DATA
009157,000094: 05,2107           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009158,000095: 05,2110           00007                           1DNADR   SPARE                                 
009159,000096: 05,2111           03373                           1DNADR   TCDH                                  #  TCDH,+1
009160,000097: 05,2112           12300                           3DNADR   DELVEET2                              #  DELVEET2+0...+5
009161,000098: 05,2113           03633                           1DNADR   TTPI                                  #  TTPI,+1
009162,000099: 05,2114           13365                           3DNADR   DELVEET3                              #  DELVEET3+0...+5
009163,000100: 05,2115           01333                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
009164,000101: 05,2116           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
009165,000102: 05,2117           03575                           1DNADR   DIFFALT                               #  DIFFALT,+1
009166,000103: 05,2120           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009167,000104: 05,2121           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009168,000105: 05,2122           03437                           1DNADR   TIG                                   #  TIG,+1
009169,000106: 05,2123           32157                           DNPTR    LMORBM05                              #  COMMON DATA
009170,000107: 05,2124           32170                           DNPTR    LMORBM06                              #  COMMON DATA
009171,000108: 05,2125           00007                           1DNADR   SPARE                                 #  FORMERLY PIF
009172,000109: 05,2126           74263                           -1DNADR  TGO                                   #  TGO,+1
009173,000110: 
009174,000111:                                                                                                  #      -----------------  SUB-LISTS  ----------------------------
009175,000112: 
009176,000113: 05,2127           76056        LMORBM01           -1DNADR  R-OTHER    +2                         #  R-OTHER+2,+3             SNAPSHOT
009177,000114: 05,2130           01723                           1DNADR   R-OTHER    +4                         #  R-OTHER+4,+5
009178,000115: 05,2131           01725                           1DNADR   V-OTHER                               #  V-OTHER,+1
009179,000116: 05,2132           01727                           1DNADR   V-OTHER    +2                         #  V-OTHER+2,+3
009180,000117: 05,2133           01731                           1DNADR   V-OTHER    +4                         #  V-OTHER+4,+5
009181,000118: 05,2134           01570                           1DNADR   T-OTHER                               #  T-OTHER,+1
009182,000119: 05,2135           76060                           -1DNADR  R-OTHER                               #  R-OTHER+0,+1
009183,000120: 
009184,000121: 05,2136           04320        LMORBM02           2DNADR   REDOCTR                               #  REDOCTR,THETAD,+1,+2     COMMON DATA
009185,000122: 

Page 210

009187,000124: 05,2137           01432                           1DNADR   RSBBQ                                 #  RSBBQ,+1
009188,000125: 05,2140           07017                           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
009189,000126: 05,2141           07233                           2DNADR   CDUXD                                 #  CDUXD,CDUYD,CDUZD,GARBAGE
009190,000127: 05,2142           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
009191,000128: 05,2143           24074                           6DNADR   STATE                                 #  STATE+0...+11D (FLAGWORDS)
009192,000129: 05,2144           52754                           -6DNADR  DSPTAB                                #  DSPTAB TABLES
009193,000130: 
009194,000131: 05,2145           76555        LMORBM03           -1DNADR  RN         +2                         #  RN +2,+3                 SNAPSHOT
009195,000132: 05,2146           01224                           1DNADR   RN         +4                         #  RN +4,+5
009196,000133: 05,2147           01226                           1DNADR   VN                                    #  VN,+1
009197,000134: 05,2150           01230                           1DNADR   VN         +2                         #  VN +2,+3
009198,000135: 05,2151           01232                           1DNADR   VN         +4                         #  VN +4,+5
009199,000136: 05,2152           01234                           1DNADR   PIPTIME                               #  PIPTIME,+1
009200,000137: 05,2153           76557                           -1DNADR  RN                                    #  RN,+1
009201,000138: 
009202,000139: 05,2154           07241        LMORBM04           2DNADR   OMEGAPD                               #  OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
009203,000140: 05,2155           10372                           3DNADR   CADRFLSH                              #  CADRFLSH,+1,+2,FAILREG,+1,+2
009204,000141: 05,2156           77667                           -1DNADR  RADMODES                              #  RADMODES,DAPBOOLS        COMMON DATA
009205,000142: 
009206,000143: 05,2157           07017        LMORBM05           2DNADR   OMEGAP                                #  OMEGAP,OMEGAQ,OMEGAR,GARBAGE
009207,000144: 05,2160           07233                           2DNADR   CDUXD                                 #  CDUXD,CDUXD,CDUZD,GARBAGE
009208,000145: 05,2161           04032                           2DNADR   CDUX                                  #  CDUX,CDUY,CDUZ,CDUT
009209,000146: 05,2162           03022                           1DNADR   ALPHAQ                                #  ALPHAQ,ALPHAR            COMMON DATA
009210,000147: 05,2163           03113                           1DNADR   POSTORKP                              #  POSTORKP,NEGTORKP
009211,000148: 05,2164           34011                           DNCHAN   11                                    #  CHANNELS11,12
009212,000149: 05,2165           34013                           DNCHAN   13                                    #  CHANNELS13,14
009213,000150: 05,2166           34030                           DNCHAN   30                                    #  CHANNELS30,31
009214,000151: 05,2167           43745                           -DNCHAN  32                                    #  CHANNELS32,33
009215,000152: 
009216,000153: 05,2170           03556        LMORBM06           1DNADR   PIPTIME1                              #  PIPTIME,+1               COMMON DATA
009217,000154: 05,2171           67453                           -3DNADR  DELV                                  #  DELV+0...+5
009218,000155: 
009219,000156:                                                                                                  #      ---------------------------------------------------------
009220,000157: 

Page 211

009222,000159:                                                                                                  #  LM COAST AND ALIGNMENT DOWNLIST
009223,000160: 
009224,000161:                                                                                                  #      -----------------  CONTROL LIST  --------------------------
009225,000162: 
009226,000163: 05,2172                        LMCSTADL           EQUALS                                         #  SEND ID BY SPECIAL CODING
009227,000164: 05,2172           32127                           DNPTR    LMCSTA01                              #  COLLECT SNAPSHOT
009228,000165: 05,2173           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009229,000166: 05,2174           02020                           1DNADR   AGSK                                  #  AGSK,+1
009230,000167: 05,2175           02774                           1DNADR   TALIGN                                #  TALIGN,+1
009231,000168: 05,2176           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009232,000169: 05,2177           01333                           1DNADR   DNRRANGE                              #  DNRRANGE,DNRRDOT
009233,000170: 05,2200           01344                           1DNADR   TEVENT                                #  TEVENT,+1
009234,000171: 05,2201           25733                           6DNADR   REFSMMAT                              #  REFSMMAT+0...+11D
009235,000172: 05,2202           00735                           1DNADR   AOTCODE                               #  AOTCODE,GARBAGE
009236,000173: 05,2203           13704                           3DNADR   VGTIG                                 #  VGTIG+0...+5
009237,000174: 05,2204           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
009238,000175: 05,2205           32224                           DNPTR    LMCSTA06                              #  COMMON DATA
009239,000176: 05,2206           32136                           DNPTR    LMCSTA02                              #  COMMON DATA
009240,000177: 05,2207           00024                           1DNADR   TIME2                                 #  TIME2/1
009241,000178: 05,2210           32145                           DNPTR    LMCSTA03                              #  COLLECT SNAPSHOT
009242,000179: 05,2211           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009243,000180: 05,2212           32154                           DNPTR    LMCSTA04                              #  COMMON DATA
009244,000181: 05,2213           32226                           DNPTR    LMCSTA07                              #  COMMON DATA
009245,000182: 05,2214           05336                           2DNADR   DNLRVELX                              #  DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
009246,000183: 05,2215           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
009247,000184: 05,2216           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
009248,000185: 05,2217           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009249,000186: 05,2220           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009250,000187: 05,2221           03437                           1DNADR   TIG                                   #  TIG,+1
009251,000188: 05,2222           32157                           DNPTR    LMCSTA05                              #  COMMON DATA
009252,000189: 05,2223           52754                           -6DNADR  DSPTAB                                #  DSPTAB+0...+11D TABLE
009253,000190: 
009254,000191:                                                                                                  #      -----------------  SUB-LISTS   ----------------------------
009255,000192: 
009256,000193: 05,2224  05,2127               LMCSTA01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
009257,000194: 
009258,000195: 05,2224  05,2136               LMCSTA02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
009259,000196: 
009260,000197: 05,2224  05,2145               LMCSTA03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
009261,000198: 
009262,000199: 05,2224  05,2154               LMCSTA04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
009263,000200: 
009264,000201: 05,2224  05,2157               LMCSTA05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
009265,000202: 
009266,000203: 05,2224           05700        LMCSTA06           2DNADR   X789                                  #  X789+0...+3               COMMON DATA
009267,000204: 05,2225           77665                           -1DNADR  LASTYCMD                              #  LASTYCMD,LASTXCMD
009268,000205: 05,2226           12737        LMCSTA07           3DNADR   OGC                                   #  OGC,+1,IGC,+1,MGC,+1      COMMON DATA
009269,000206: 05,2227           02755                           1DNADR   BESTI                                 #  BESTI,BESTJ
009270,000207: 05,2230           12760                           3DNADR   STARSAV1                              #  STARSAV1+0...+5
009271,000208: 05,2231           65011                           -3DNADR  STARSAV2                              #  STARSAV2+0...+5
009272,000209: 

Page 212

009274,000211:                                                                                                  #      -----------------------------------------------------------
009275,000212: 

Page 213

009277,000214:                                                                                                  #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
009278,000215: 
009279,000216:                                                                                                  #      -----------------  CONTROL LIST   --------------------------
009280,000217: 
009281,000218: 05,2232                        LMRENDDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
009282,000219: 05,2232           32127                           DNPTR    LMREND01                              #  COLLECT SNAPSHOT
009283,000220: 05,2233           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009284,000221: 05,2234           32276                           DNPTR    LMREND07                              #  COLLECT SNAPSHOT
009285,000222: 05,2235           14340                           4DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009286,000223: 05,2236           03447                           1DNADR   DELLT4                                #  DELLT4,+1
009287,000224: 05,2237           13441                           3DNADR   RTARG                                 #  RTARG+0...+5
009288,000225: 05,2240           13431                           3DNADR   DELVSLV                               #  DELVSLV+0...+5
009289,000226: 05,2241           03631                           1DNADR   TCSI                                  #  TCSI,+1
009290,000227: 05,2242           12272                           3DNADR   DELVEET1                              #  DELVEET+0-..+5
009291,000228: 05,2243           00007                           1DNADR   SPARE                                 
009292,000229: 05,2244           03626                           1DNADR   TPASS4                                #  TPASS4,+1
009293,000230: 05,2245           32224                           DNPTR    LMREND06                              #  COMMON DATA
009294,000231: 05,2246           32136                           DNPTR    LMREND02                              #  COMMON DATA
009295,000232: 05,2247           00024                           1DNADR   TIME2                                 #  TIME2/1
009296,000233: 05,2250           32145                           DNPTR    LMREND03                              #  COLLECT SNAPSHOT
009297,000234: 05,2251           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009298,000235: 05,2252           32154                           DNPTR    LMREND04                              #  COMMON DATA
009299,000236: 05,2253           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009300,000237: 05,2254           00007                           1DNADR   SPARE                                 
009301,000238: 05,2255           03373                           1DNADR   TCDH                                  #  TCDH,+1
009302,000239: 05,2256           12300                           3DNADR   DELVEET2                              #  DELVEET2+0...+5
009303,000240: 05,2257           03633                           1DNADR   TTPI                                  #  TTPI,+1
009304,000241: 05,2260           13365                           3DNADR   DELVEET3                              #  DELVEET3+0...+5
009305,000242: 05,2261           02262                           1DNADR   ELEV                                  #  ELEV,+1
009306,000243: 05,2262           04036                           2DNADR   CDUS                                  #  CDUS,PIPAX,PIPAY,PIPAZ
009307,000244: 05,2263           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
009308,000245: 05,2264           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009309,000246: 05,2265           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009310,000247: 05,2266           03437                           1DNADR   TIG                                   #  TIG,+1
009311,000248: 05,2267           32157                           DNPTR    LMREND05                              #  COMMON DATA
009312,000249: 05,2270           02306                           1DNADR   DELTAR                                #  DELTAR,+1
009313,000250: 05,2271           03616                           1DNADR   CENTANG                               #  CENTANG,+1
009314,000251: 05,2272           03464                           1DNADR   NN                                    #  NN,+1
009315,000252: 05,2273           03575                           1DNADR   DIFFALT                               #  DIFFALT,+1
009316,000253: 05,2274           02353                           1DNADR   DELVTPF                               #  DELVTPF,+1
009317,000254: 05,2275           77770                           -1DNADR  SPARE                                 
009318,000255: 
009319,000256:                                                                                                  #      -----------------  SUB-LISTS   ----------------------------
009320,000257: 
009321,000258: 05,2276  05,2127               LMREND01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
009322,000259: 
009323,000260: 05,2276  05,2136               LMREND02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
009324,000261: 
009325,000262: 05,2276  05,2145               LMREND03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
009326,000263: 

Page 214

009328,000265: 05,2276  05,2154               LMREND04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
009329,000266: 
009330,000267: 05,2276  05,2157               LMREND05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
009331,000268: 
009332,000269: 05,2276  05,2224               LMREND06           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
009333,000270: 
009334,000271: 05,2276           74322        LMREND07           -1DNADR  AIG                                   #  AIG,AMG              SNAPSHOT
009335,000272: 05,2277           03457                           1DNADR   AOG                                   #  AOG,TRKMKCNT
009336,000273: 05,2300           03750                           1DNADR   TANGNB                                #  TANGNB,+1
009337,000274: 05,2301           03752                           1DNADR   MKTIME                                #  MKTIME,+1
009338,000275: 05,2302           76444                           -1DNADR  DNRRANGE                              #  DNRRANGE,DNRRDOT
009339,000276: 
009340,000277:                                                                                                  #      ------------------------------------------------------------
009341,000278: 

Page 215

009343,000280:                                                                                                  #  LM DESCENT AND ASCENT DOWNLIST
009344,000281: 
009345,000282:                                                                                                  #      -----------------  CONTROL LIST   --------------------------
009346,000283: 
009347,000284: 05,2303                        LMDSASDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
009348,000285: 05,2303           32341                           DNPTR    LMDSAS07                              #  COLLECT SNAPSHOT
009349,000286: 05,2304           32355                           DNPTR    LMDSAS08                              #  SEND SNAPSHOT
009350,000287: 05,2305           01344                           1DNADR   TEVENT                                #  TEVENT,+1
009351,000288: 05,2306           13251                           3DNADR   UNFC/2                                #  UNFC/2+0...+5
009352,000289: 05,2307           13645                           3DNADR   VGVECT                                #  VGVECT+0...+5
009353,000290: 05,2310           03640                           1DNADR   TTF/8                                 #  TTF/8,+1
009354,000291: 05,2311           03662                           1DNADR   DELTAH                                #  DELTAH,+1
009355,000292: 05,2312           12022                           3DNADR   RLS                                   #  RLS+0...+5
009356,000293: 05,2313           00007                           1DNADR   SPARE                                 
009357,000294: 05,2314           32224                           DNPTR    LMDSAS09                              #  COMMON DATA
009358,000295: 05,2315           32136                           DNPTR    LMDSAS02                              #  COMMON DATA
009359,000296: 05,2316           00024                           1DNADR   TIME2                                 #  TIME2/1
009360,000297: 05,2317           32145                           DNPTR    LMDSAS03                              #  COLLECT SNAPSHOT
009361,000298: 05,2320           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009362,000299: 05,2321           32154                           DNPTR    LMDSAS04                              #  COMMON DATA
009363,000300: 05,2322           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009364,000301: 05,2323           12543                           3DNADR   RGU                                   #  RGU+0...+5
009365,000302: 05,2324           13624                           3DNADR   VGU                                   #  VGU+0...+5
009366,000303: 05,2325           13632                           3DNADR   LAND                                  #  LAND+0...+5
009367,000304: 05,2326           02256                           1DNADR   AT                                    #  AT,+1
009368,000305: 05,2327           02400                           1DNADR   TLAND                                 #  TLAND,+1
009369,000306: 05,2330           03613                           1DNADR   FC                                    #  FC,GARBAGE
009370,000307: 05,2331           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
009371,000308: 05,2332           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009372,000309: 05,2333           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009373,000310: 05,2334           03437                           1DNADR   TIG                                   #  TIG,+1
009374,000311: 05,2335           32157                           DNPTR    LMDSAS05                              #  COMMON DATA
009375,000312: 05,2336           32170                           DNPTR    LMDSAS06                              #  COMMON DATA
009376,000313: 05,2337           03612                           1DNADR   PSEUDO55                              #  PSEUDO55,GARBAGE
009377,000314: 05,2340           74326                           -1DNADR  TTOGO                                 #  TTOGO,+1
009378,000315:                                                                                                  #      -----------------  SUB-LISTS   ----------------------------
009379,000316: 
009380,000317: 05,2341  05,2136               LMDSAS02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
009381,000318: 
009382,000319: 05,2341  05,2145               LMDSAS03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
009383,000320: 
009384,000321: 05,2341  05,2154               LMDSAS04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
009385,000322: 
009386,000323: 05,2341  05,2157               LMDSAS05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
009387,000324: 
009388,000325: 05,2341  05,2170               LMDSAS06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
009389,000326: 
009390,000327: 05,2341           75435        LMDSAS07           -1DNADR  LRZCDUDL                              #  LRZCDUDL,GARBAGE               SNAPSHOT
009391,000328: 05,2342           03647                           1DNADR   VSELECT                               #  VSELECT,GARBAGE
009392,000329: 05,2343           02343                           1DNADR   LRVTIMDL                              #  LRVTIMDL,+1
009393,000330: 

Page 216

009395,000332: 05,2344           03650                           1DNADR   VMEAS                                 #  VMEAS,+1
009396,000333: 05,2345           03752                           1DNADR   MKTIME                                #  MKTIME,+1
009397,000334: 05,2346           03652                           1DNADR   HMEAS                                 #  HMEAS,+1
009398,000335: 05,2347           03754                           1DNADR   RM                                    #  RM,+1
009399,000336: 05,2350           03455                           1DNADR   AIG                                   #  AIG,AMG
009400,000337: 05,2351           03457                           1DNADR   AOG                                   #  AOG,TRKMKCNT
009401,000338: 05,2352           03750                           1DNADR   TANGNB                                #  TANGNB,+1
009402,000339: 05,2353           03752                           1DNADR   MKTIME                                #  MKTIME,+1
009403,000340: 05,2354           75437                           -1DNADR  LRXCDUDL                              #  LRXCDUDL,LRYCDUDL
009404,000341: 
009405,000342: 05,2355           24340        LMDSAS08           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009406,000343: 05,2356           57423                           -5DNADR  DNTMBUFF   +12D                       
009407,000344: 
009408,000345: 05,2357  05,2224               LMDSAS09           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
009409,000346: 
009410,000347:                                                                                                  #      ---------------------------------------------------------
009411,000348: 

Page 217

009413,000350:                                                                                                  #  LM LUNAR SURFACE ALIGN DOWNLIST
009414,000351: 
009415,000352:                                                                                                  #      -----------------  CONTROL LIST  --------------------------
009416,000353: 
009417,000354: 05,2357                        LMLSALDL           EQUALS                                         #  SEND ID BY SPECIAL CODING
009418,000355: 05,2357           32127                           DNPTR    LMLSAL01                              #  COLLECT SNAPSHOT
009419,000356: 05,2360           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009420,000357: 05,2361           32276                           DNPTR    LMLSAL07                              #  COLLECT SNAPSHOT
009421,000358: 05,2362           14340                           4DNADR   DNTMBUFF                              #  SEND SHAPSHOT
009422,000359: 05,2363           02774                           1DNADR   TALIGN                                #  TALIGN,+1
009423,000360: 05,2364           25733                           6DNADR   REFSMMAT                              #  REFSMMAT+0...+11D
009424,000361: 05,2365           26242                           6DNADR   YNBSAV                                #  YNBSAV+0...+5,ZNBSAV+0...+5
009425,000362: 05,2366           32224                           DNPTR    LMLSAL08                              #  COMMON DATA
009426,000363: 05,2367           32136                           DNPTR    LMLSAL02                              #  COMMON DATA
009427,000364: 05,2370           00024                           1DNADR   TIME2                                 #  TIME/1
009428,000365: 05,2371           32145                           DNPTR    LMLSAL03                              #  COLLECT SNAPSHOT
009429,000366: 05,2372           24340                           6DNADR   DNTMBUFF                              #  SEND SHAPSHOT
009430,000367: 05,2373           32154                           DNPTR    LMLSAL04                              #  COMMON DATA
009431,000368: 05,2374           32226                           DNPTR    LMLSAL09                              #  COMMON DATA
009432,000369: 05,2375           12234                           3DNADR   GSAV                                  #  GSAV+0...+5
009433,000370: 05,2376           02020                           1DNADR   AGSK                                  #  AGSK,+1
009434,000371: 05,2377           00112                           1DNADR   LASTYCMD                              #  LASTYCMD,LASTXCMD
009435,000372: 05,2400           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009436,000373: 05,2401           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009437,000374: 05,2402           03437                           1DNADR   TIG                                   #  TIG,+1
009438,000375: 05,2403           32157                           DNPTR    LMLSAL05                              #  COMMON DATA
009439,000376: 05,2404           32170                           DNPTR    LMLSAL06                              #  COMMON DATA
009440,000377: 05,2405           00007                           1DNADR   SPARE                                 
009441,000378: 05,2406           77770                           -1DNADR  SPARE                                 
009442,000379: 
009443,000380:                                                                                                  #      -----------------  SUB-LISTS   ----------------------------
009444,000381: 
009445,000382: 05,2407  05,2127               LMLSAL01           EQUALS   LMORBM01                              #  COMMON DOWNLIST DATA
009446,000383: 
009447,000384: 05,2407  05,2136               LMLSAL02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
009448,000385: 
009449,000386: 05,2407  05,2145               LMLSAL03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
009450,000387: 
009451,000388: 05,2407  05,2154               LMLSAL04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
009452,000389: 
009453,000390: 05,2407  05,2157               LMLSAL05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
009454,000391: 
009455,000392: 05,2407  05,2170               LMLSAL06           EQUALS   LMORBM06                              #  COMMON DOWNLIST DATA
009456,000393: 
009457,000394: 05,2407  05,2276               LMLSAL07           EQUALS   LMREND07                              #  COMMON DOWNLIST DATA
009458,000395: 
009459,000396: 05,2407  05,2224               LMLSAL08           EQUALS   LMCSTA06                              #  COMMON DOWNLIST DATA
009460,000397: 
009461,000398: 05,2407  05,2226               LMLSAL09           EQUALS   LMCSTA07                              #  COMMON DOWNLIST DATA
009462,000399: 

Page 218

009464,000401:                                                                                                  #      ---------------------------------------------------------
009465,000402: 

Page 219

009467,000404:                                                                                                  #  LM AGS INITIALIZATION AND UPDATE DOWNLIST
009468,000405: 
009469,000406:                                                                                                  #      -----------------  CONTROL LIST  --------------------------
009470,000407: 
009471,000408: 05,2407                        LMAGSIDL           EQUALS                                         #  SEND IO BY SPECIAL CODING
009472,000409: 05,2407           12204                           3DNADR   AGSBUFF    +0                         #  AGSBUFF+0...+5
009473,000410: 05,2410           02220                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF+12D,GARBAGE
009474,000411: 05,2411           12205                           3DNADR   AGSBUFF    +1                         #  AGSBUFF+1...+6
009475,000412: 05,2412           02221                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF+13D, GARBAGE
009476,000413: 05,2413           12212                           3DNADR   AGSBUFF    +6                         #  AGSBUFF+6...+11
009477,000414: 05,2414           02220                           1DNADR   AGSBUFF    +12D                       #  AGSBUFF+12,GARBAGE
009478,000415: 05,2415           12213                           3DNADR   AGSBUFF    +7                         #  AGSBUFF+7...+12D
009479,000416: 05,2416           02221                           1DNADR   AGSBUFF    +13D                       #  AGSBUFF+13D,GARBAGE
009480,000417: 05,2417           25170                           6DNADR   COMPNUMB                              #  COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
009481,000418:                                                                                                  #  UPBUFF+0...+7
009482,000419: 05,2420           25204                           6DNADR   UPBUFF     +8D                        #  UPBUFF +8D...+19D
009483,000420: 05,2421           32136                           DNPTR    LMAGSI02                              #  COMMON DATA
009484,000421: 05,2422           00024                           1DNADR   TIME2                                 #  TIME2/1
009485,000422: 05,2423           32145                           DNPTR    LMAGSI03                              #  COLLECT SNAPSHOT
009486,000423: 05,2424           24340                           6DNADR   DNTMBUFF                              #  SEND SNAPSHOT
009487,000424: 05,2425           32154                           DNPTR    LMAGSI04                              #  COMMON DATA
009488,000425: 05,2426           07115                           2DNADR   POSTORKU                              #  POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009489,000426: 05,2427           00007                           1DNADR   SPARE                                 
009490,000427: 05,2430           00007                           1DNADR   SPARE                                 
009491,000428: 05,2431           02020                           1DNADR   AGSK                                  #  AGSK,+1
009492,000429: 05,2432           25174                           6DNADR   UPBUFF                                #  UPBUFF+0...+11D
009493,000430: 05,2433           15210                           4DNADR   UPBUFF     +12D                       #  UPBUFF+12D...+19D
009494,000431: 05,2434           01331                           1DNADR   LEMMASS                               #  LEMMASS,CSMMASS
009495,000432: 05,2435           01302                           1DNADR   IMODES30                              #  IMODES30,IMODES33
009496,000433: 05,2436           00007                           1DNADR   SPARE                                 
009497,000434: 05,2437           32157                           DNPTR    LMAGSI05                              #  COMMON DATA
009498,000435: 05,2440           52754                           -6DNADR  DSPTAB                                #  DSPTAB+0...+11D
009499,000436: 
009500,000437:                                                                                                  #      -----------------  SUB-LISTS   ----------------------------
009501,000438: 
009502,000439: 05,2441  05,2136               LMAGSI02           EQUALS   LMORBM02                              #  COMMON DOWNLIST DATA
009503,000440: 
009504,000441: 05,2441  05,2145               LMAGSI03           EQUALS   LMORBM03                              #  COMMON DOWNLIST DATA
009505,000442: 
009506,000443: 05,2441  05,2154               LMAGSI04           EQUALS   LMORBM04                              #  COMMON DOWNLIST DATA
009507,000444: 
009508,000445: 05,2441  05,2157               LMAGSI05           EQUALS   LMORBM05                              #  COMMON DOWNLIST DATA
009509,000446: 
009510,000447:                                                                                                  #      ---------------------------------------------------------
009511,000448: 
009512,000449: 05,2441           02172        DNTABLE            GENADR   LMCSTADL                              #  LM COAST AND ALIGN DOWNLIST
009513,000450: 05,2442           02407                           GENADR   LMAGSIDL                              #  LM AGS INITIALIZATION/UPDATE DOWNLIST
009514,000451: 05,2443           02232                           GENADR   LMRENDDL                              #  LM RENDEZVOUS AND PRE-THRUST DOWNLIST
009515,000452: 05,2444           02066                           GENADR   LMORBMDL                              #  LM ORBITAL MANEUVERS DOWNLIST
009516,000453: 05,2445           02303                           GENADR   LMDSASDL                              #  LM DESCENT AND ASCENT DOWNLIST
009517,000454: 

Page 220

009519,000456: 05,2446           02357                           GENADR   LMLSALDL                              #  LM LUNAR SURFACE ALIGN DOWNLIST
009520,000457: 
009521,000458:                                                                                                  #      ---------------------------------------------------------------
009522,000459: 
009523,000460: 

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