Source Code
|
This is a reconstruction of the AGC program Luminary 99 Rev 0. It was the third release
of the Lunar Module flight software targeted for use in Apollo 11, after Luminary 96 and 97.
A bug (which had been around since at least Apollo 10, Luminary 69) was
discovered in Rev 0 shortly before the Apollo 11 flight, resulting in a last minute
revision into Rev 1,
which is what actually flew rather than
the Rev 0 presented here. A hardcopy of Rev 0 is known to
exist — it belonged to AGC developer Allan Klumpp for many years — but
unfortunately the Virtual AGC Project has not had access to that hardcopy. Thus
the code you see here had been reconstructed (we believe accurately) rather than
transcribed. The first step of the reconstruction of the Rev 0 source code was
the transcription of the Rev 1 source code from a hardcopy in the MIT Museum collection.
The process of reverting the active portion of the source code (i.e., other than
program comments) from Rev 1 to Rev 0 was very minor, consisting
only of moving the position of the STARTSB1 label in
FRESH START AND RESTART. Allan had previously given
us the checksums of the memory banks of Rev 0, and we have verified the program presented here has checksums
identical to all banks of Allan's listing of Rev 0. The notations on Allan's Rev 0 program listing read,
in part:GAP: ASSEMBLE REVISION 099 OF AGC PROGRAM LUMINARY BY NASA 2021112-051 A single program comment is known to differ between Rev 0 and Rev 1, but these are harder to reconstruct and verify than changes to the active portion of the code. Thus it is possible that there are additional differences between the program comments in Rev 0 and Rev 1 that are unknown to us, and therefore are not reflected in the code presented here. |
008013,000002: ## Copyright: Public domain.
008014,000003: ## Filename: DOWNLINK_LISTS.agc
008015,000004: ## Purpose: Part of the reconstructed source code for LMY99 Rev 0,
008016,000005: ## otherwise known as Luminary Rev 99, the third release
008017,000006: ## of the Apollo Guidance Computer (AGC) software for Apollo 11.
008018,000007: ## It differs from LMY99 Rev 1 (the flown version) only in the
008019,000008: ## placement of a single label. The corrections shown here have
008020,000009: ## been verified to have the same bank checksums as AGC developer
008021,000010: ## Allan Klumpp's copy of Luminary Rev 99, and so are believed
008022,000011: ## to be accurate. This file is intended to be a faithful
008023,000012: ## recreation, except that the code format has been changed to
008024,000013: ## conform to the requirements of the yaYUL assembler rather than
008025,000014: ## the original YUL assembler.
008026,000015: ##
008027,000016: ## Assembler: yaYUL
008028,000017: ## Contact: Hartmuth Gutsche <hgutsche@xplornet.com>.
008029,000018: ## Website: www.ibiblio.org/apollo.
008030,000019: ## Pages: 193-205
008031,000020: ## Mod history: 2009-05-19 HG Transcribed from page images.
008032,000021: ## 2016-12-13 RSB Proofed text comments with octopus/ProoferComments
008033,000022: ## and corrected the errors found.
008034,000023: ## 2017-01-26 RSB Back-ported comment-text fixes found while
008035,000024: ## proofing corresponding Luminary 69 file.
008036,000025: ## 2017-03-05 RSB A few comment-text fixes found while proofing
008037,000026: ## Luminary 116.
008038,000027: ## 2017-03-15 RSB Comment-text fixes identified in 5-way
008039,000028: ## side-by-side diff of Luminary 69/99/116/131/210.
008040,000029: ## 2017-08-01 MAS Created from LMY99 Rev 1.
008041,000030:
008042,000031: ## This source code has been transcribed or otherwise adapted from
008043,000032: ## digitized images of a hardcopy from the MIT Museum. The digitization
008044,000033: ## was performed by Paul Fjeld, and arranged for by Deborah Douglas of
008045,000034: ## the Museum. Many thanks to both. The images (with suitable reduction
008046,000035: ## in storage size and consequent reduction in image quality as well) are
008047,000036: ## available online at www.ibiblio.org/apollo. If for some reason you
008048,000037: ## find that the images are illegible, contact me at info@sandroid.org
008049,000038: ## about getting access to the (much) higher-quality images which Paul
008050,000039: ## actually created.
008051,000040: ##
008052,000041: ## The code has been modified to match LMY99 Revision 0, otherwise
008053,000042: ## known as Luminary Revision 99, the Apollo 11 software release preceeding
008054,000043: ## the listing from which it was transcribed. It has been verified to
008055,000044: ## contain the same bank checksums as AGC developer Allan Klumpp's listing
008056,000045: ## of Luminary Revision 99 (for which we do not have scans).
008057,000046: ##
008058,000047: ## Notations on Allan Klumpp's listing read, in part:
008059,000048: ##
008060,000049: ## ASSEMBLE REVISION 099 OF AGC PROGRAM LUMINARY BY NASA 2021112-51
008061,000050:
|
|
Page 193 |
008063,000052: 22,2004 BANK 22
008064,000053: 05,2000 SETLOC DOWNTELM
008065,000054: 05,2000 BANK
008066,000055:
008067,000056: 05,2065 0340 EBANK= DNTMBUFF
008068,000057:
008069,000058: # SPECIAL DOWNLINK OP CODES
008070,000059: # OP CODE ADDRESS(EXAMPLE) SENDS.. BIT 15 BITS 14-12 BITS 11
008071,000060: # -0
008072,000061: # ------ ---------- ---------- ------ ---------- -------
008073,000062: # --
008074,000063: # 1DNADR TIME2 (2 AGC WDS) 0 0 ECADR
008075,000064: # 2DNADR TEPHEM (4 AGC WDS) 0 1 ECADR
008076,000065: # 3DNADR VGBODY (6 AGC WDS) 0 2 ECADR
008077,000066: # 4DNADR STATE (8 AGC WDS) 0 3 ECADR
008078,000067: # 5DNADR UPBUFF (10 AGC WDS) 0 4 ECADR
008079,000068: # 6DNADR DSPTAB (12 AGC WDS) 0 5 ECADR
008080,000069: # DNCHAN 30 CHANNELS 0 7 CHANNEL
008081,000070: # ADDRESS
008082,000071: # DNPTR NEXTLIST POINTS TO NEXT 0 6 ADRES
008083,000072: # LIST.
008084,000073:
008085,000074: # DOWNLIST FORMAT DEFINITIONS AND RULES-
008086,000075: # 1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
008087,000076: # 2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
008088,000077: # 3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
008089,000078: # 4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
008090,000079: # 5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
008091,000080: # LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
008092,000081:
008093,000082: 05,2065 COUNT* $$/DLIST
008094,000083: 05,2065 ERASZERO EQUALS 7
008095,000084: 05,2065 0000007 UNKNOWN EQUALS ERASZERO
008096,000085: 05,2065 0000007 SPARE EQUALS ERASZERO # USE SPARE TO INDICATE AVAILABLE SPACE
008097,000086: 05,2065 77340 LOWIDCOD OCT 77340 # LOW ID CODE
008098,000087:
008099,000088: 05,2066 05,2172 NOMDNLST EQUALS LMCSTADL # FRESH START AND POST P27 DOWNLIST
008100,000089:
008101,000090: 05,2066 05,2407 AGSLIST EQUALS LMAGSIDL
008102,000091:
008103,000092: 05,2066 05,2407 UPDNLIST EQUALS LMAGSIDL # UPDATE PROGRAM (P27) DOWNLIST
008104,000093:
|
|
Page 194 |
008106,000095: # LM ORBITAL MANEUVERS LIST
008107,000096:
008108,000097: # ----------------- CONTROL LIST --------------------------
008109,000098:
008110,000099: 05,2066 LMORBMDL EQUALS # SEND ID BY SPECIAL CODING
008111,000100: 05,2066 32127 DNPTR LMORBM01 # COLLECT SNAPSHOT
008112,000101: 05,2067 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008113,000102: 05,2070 03451 1DNADR DELLT4 # DELLT4,+1
008114,000103: 05,2071 13443 3DNADR RTARG # RTARG,+1...+5
008115,000104: 05,2072 02256 1DNADR ELEV # ELEV,+1
008116,000105: 05,2073 01344 1DNADR TEVENT # TEVENT,+1
008117,000106: 05,2074 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
008118,000107: 05,2075 03633 1DNADR TCSI # TCSI,+1
008119,000108: 05,2076 12266 3DNADR DELVEET1 # DELVEET1 +0...+5
008120,000109: 05,2077 13700 3DNADR VGTIG # VGTIG +0...+5
008121,000110: 05,2100 01340 1DNADR DNLRVELZ # DNLRVELZ,DNLRALT
008122,000111: 05,2101 03630 1DNADR TPASS4 # TPASS4,+1
008123,000112: 05,2102 32136 DNPTR LMORBM02 # COMMON DATA
008124,000113: 05,2103 00024 1DNADR TIME2 # TIME2/1
008125,000114: 05,2104 32145 DNPTR LMORBM03 # COLLECT SNAPSHOT
008126,000115: 05,2105 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008127,000116: 05,2106 32154 DNPTR LMORBM04 # COMMON DATA
008128,000117: 05,2107 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008129,000118: 05,2110 00007 1DNADR SPARE
008130,000119: 05,2111 01776 1DNADR TCDH # TCDH,+1
008131,000120: 05,2112 12274 3DNADR DELVEET2 # DELVEET2 +0...+5
008132,000121: 05,2113 03635 1DNADR TTPI # TTPI,+1
008133,000122: 05,2114 12365 3DNADR DELVEET3 # DELVEET3 +0...+5
008134,000123: 05,2115 01333 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
008135,000124: 05,2116 05336 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008136,000125: 05,2117 03577 1DNADR DIFFALT # DIFFALT,+1
008137,000126: 05,2120 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008138,000127: 05,2121 01302 1DNADR IMODES30 # IMODES30,IMODES33
008139,000128: 05,2122 03441 1DNADR TIG # TIG,+1
008140,000129: 05,2123 32157 DNPTR LMORBM05 # COMMON DATA
008141,000130: 05,2124 32170 DNPTR LMORBM06 # COMMON DATA
008142,000131: 05,2125 00007 1DNADR SPARE # FORMERLY PIF
008143,000132: 05,2126 74261 -1DNADR TGO # TGO,+1
008144,000133:
008145,000134: # ----------------- SUB-LISTS ----------------------------
008146,000135:
008147,000136: 05,2127 76056 LMORBM01 -1DNADR R-OTHER +2 # R-OTHER +2,+3 SNAPSHOT
008148,000137: 05,2130 01723 1DNADR R-OTHER +4 # R-OTHER +4,+5
008149,000138: 05,2131 01725 1DNADR V-OTHER # V-OTHER,+1
008150,000139: 05,2132 01727 1DNADR V-OTHER +2 # V-OTHER +2,+3
008151,000140: 05,2133 01731 1DNADR V-OTHER +4 # V-OTHER +4,+5
008152,000141: 05,2134 01570 1DNADR T-OTHER # T-OTHER,+1
008153,000142: 05,2135 76060 -1DNADR R-OTHER # R-OTHER +0,+1
008154,000143:
008155,000144: 05,2136 04320 LMORBM02 2DNADR REDOCTR # REDOCTR,THETAD,+1,+2 COMMON DATA
|
|
Page 195 |
008157,000146: 05,2137 01432 1DNADR RSBBQ # RSBBQ,+1
008158,000147: 05,2140 07021 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008159,000148: 05,2141 07235 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE
008160,000149: 05,2142 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008161,000150: 05,2143 24074 6DNADR STATE # STATE +0...+11D (FLAGWORDS)
008162,000151: 05,2144 52754 -6DNADR DSPTAB # DSPTAB TABLES
008163,000152:
008164,000153: 05,2145 76555 LMORBM03 -1DNADR RN +2 # RN +2,+3 SNAPSHOT
008165,000154: 05,2146 01224 1DNADR RN +4 # RN +4,+5
008166,000155: 05,2147 01226 1DNADR VN # VN,+1
008167,000156: 05,2150 01230 1DNADR VN +2 # VN +2,+3
008168,000157: 05,2151 01232 1DNADR VN +4 # VN +4,+5
008169,000158: 05,2152 01234 1DNADR PIPTIME # PIPTIME,+1
008170,000159: 05,2153 76557 -1DNADR RN # RN,+1
008171,000160:
008172,000161: 05,2154 07243 LMORBM04 2DNADR OMEGAPD # OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
008173,000162: 05,2155 10372 3DNADR CADRFLSH # CADRFLSH,+1,+2,FAILREG,+1,+2
008174,000163: 05,2156 77667 -1DNADR RADMODES # RADMODES,DAPBOOLS COMMON DATA
008175,000164:
008176,000165: 05,2157 07021 LMORBM05 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008177,000166: 05,2160 07235 2DNADR CDUXD # CDUXD,CDUXD,CDUZD,GARBAGE
008178,000167: 05,2161 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008179,000168: 05,2162 03024 1DNADR ALPHAQ # ALPHAQ,ALPHAR COMMON DATA
008180,000169: 05,2163 03113 1DNADR POSTORKP # POSTORKP,NEGTORKP
008181,000170: 05,2164 34011 DNCHAN 11 # CHANNELS 11,12
008182,000171: 05,2165 34013 DNCHAN 13 # CHANNELS 13,14
008183,000172: 05,2166 34030 DNCHAN 30 # CHANNELS 30,31
008184,000173: 05,2167 43745 -DNCHAN 32 # CHANNELS 32,33
008185,000174:
008186,000175: 05,2170 03560 LMORBM06 1DNADR PIPTIME1 # PIPTIME,+1 COMMON DATA
008187,000176: 05,2171 67453 -3DNADR DELV # DELV +0...+5
008188,000177:
008189,000178: # ---------------------------------------------------------
008190,000179:
|
|
Page 196 |
008192,000181: # LM COAST AND ALIGNMENT DOWNLIST
008193,000182:
008194,000183: # ----------------- CONTROL LIST --------------------------
008195,000184:
008196,000185: 05,2172 LMCSTADL EQUALS # SEND ID BY SPECIAL CODING
008197,000186: 05,2172 32127 DNPTR LMCSTA01 # COLLECT SNAPSHOT
008198,000187: 05,2173 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008199,000188: 05,2174 02020 1DNADR AGSK # AGSK,+1
008200,000189: 05,2175 02774 1DNADR TALIGN # TALIGN,+1
008201,000190: 05,2176 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008202,000191: 05,2177 01333 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
008203,000192: 05,2200 01344 1DNADR TEVENT # TEVENT,+1
008204,000193: 05,2201 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
008205,000194: 05,2202 00735 1DNADR AOTCODE # AOTCODE,GARBAGE
008206,000195: 05,2203 12022 3DNADR RLS # RLS +0...+5
008207,000196: 05,2204 05336 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008208,000197: 05,2205 32224 DNPTR LMCSTA06 # COMMON DATA
008209,000198: 05,2206 32136 DNPTR LMCSTA02 # COMMON DATA
008210,000199: 05,2207 00024 1DNADR TIME2 # TIME2/1
008211,000200: 05,2210 32145 DNPTR LMCSTA03 # COLLECT SNAPSHOT
008212,000201: 05,2211 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008213,000202: 05,2212 32154 DNPTR LMCSTA04 # COMMON DATA
008214,000203: 05,2213 32226 DNPTR LMCSTA07 # COMMON DATA
008215,000204: 05,2214 05336 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008216,000205: 05,2215 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
008217,000206: 05,2216 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008218,000207: 05,2217 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008219,000208: 05,2220 01302 1DNADR IMODES30 # IMODES30,IMODES33
008220,000209: 05,2221 03441 1DNADR TIG # TIG,+1
008221,000210: 05,2222 32157 DNPTR LMCSTA05 # COMMON DATA
008222,000211: 05,2223 52754 -6DNADR DSPTAB # DSPTAB +0...+11D TABLE
008223,000212:
008224,000213: # ----------------- SUB-LISTS ----------------------------
008225,000214:
008226,000215: 05,2224 05,2127 LMCSTA01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008227,000216: 05,2224 05,2136 LMCSTA02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008228,000217: 05,2224 05,2145 LMCSTA03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008229,000218: 05,2224 05,2154 LMCSTA04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008230,000219: 05,2224 05,2157 LMCSTA05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008231,000220:
008232,000221: 05,2224 05700 LMCSTA06 2DNADR X789 # X789 +0...+3 COMMON DATA
008233,000222: 05,2225 77665 -1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008234,000223: 05,2226 12737 LMCSTA07 3DNADR OGC # OGC,+1,IGC,+1,MGC,+1 COMMON DATA
008235,000224: 05,2227 02755 1DNADR BESTI # BESTI,BESTJ
008236,000225: 05,2230 12760 3DNADR STARSAV1 # STARSAV1 +0...+5
008237,000226: 05,2231 65011 -3DNADR STARSAV2 # STARSAV2 +0...+5
|
|
Page 197 |
008239,000228: # -----------------------------------------------------------
008240,000229:
|
|
Page 198 |
008242,000231: # LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008243,000232:
008244,000233: # ----------------- CONTROL LIST --------------------------
008245,000234:
008246,000235: 05,2232 LMRENDDL EQUALS # SEND ID BY SPECIAL CODING
008247,000236: 05,2232 32127 DNPTR LMREND01 # COLLECT SNAPSHOT
008248,000237: 05,2233 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008249,000238: 05,2234 32276 DNPTR LMREND07 # COLLECT SNAPSHOT
008250,000239: 05,2235 14340 4DNADR DNTMBUFF # SEND SNAPSHOT
008251,000240: 05,2236 03451 1DNADR DELLT4 # DELLT4,+1
008252,000241: 05,2237 13443 3DNADR RTARG # RTARG +0...+5
008253,000242: 05,2240 13433 3DNADR DELVSLV # DELVSLV +0...+5
008254,000243: 05,2241 03633 1DNADR TCSI # TCSI,+1
008255,000244: 05,2242 12266 3DNADR DELVEET1 # DELVEET +0-..+5
008256,000245: 05,2243 00007 1DNADR SPARE
008257,000246: 05,2244 03630 1DNADR TPASS4 # TPASS4,+1
008258,000247: 05,2245 32224 DNPTR LMREND06 # COMMON DATA
008259,000248: 05,2246 32136 DNPTR LMREND02 # COMMON DATA
008260,000249: 05,2247 00024 1DNADR TIME2 # TIME2/1
008261,000250: 05,2250 32145 DNPTR LMREND03 # COLLECT SNAPSHOT
008262,000251: 05,2251 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008263,000252: 05,2252 32154 DNPTR LMREND04 # COMMON DATA
008264,000253: 05,2253 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008265,000254: 05,2254 00007 1DNADR SPARE
008266,000255: 05,2255 01776 1DNADR TCDH # TCDH,+1
008267,000256: 05,2256 12274 3DNADR DELVEET2 # DELVEET2 +0...+5
008268,000257: 05,2257 03635 1DNADR TTPI # TTPI,+1
008269,000258: 05,2260 12365 3DNADR DELVEET3 # DELVEET3 +0...+5
008270,000259: 05,2261 02256 1DNADR ELEV # ELEV,+1
008271,000260: 05,2262 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
008272,000261: 05,2263 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008273,000262: 05,2264 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008274,000263: 05,2265 01302 1DNADR IMODES30 # IMODES30,IMODES33
008275,000264: 05,2266 03441 1DNADR TIG # TIG,+1
008276,000265: 05,2267 32157 DNPTR LMREND05 # COMMON DATA
008277,000266: 05,2270 02302 1DNADR DELTAR # DELTAR,+1
008278,000267: 05,2271 03620 1DNADR CENTANG # CENTANG,+1
008279,000268: 05,2272 03466 1DNADR NN # NN,+1
008280,000269: 05,2273 03577 1DNADR DIFFALT # DIFFALT,+1
008281,000270: 05,2274 02347 1DNADR DELVTPF # DELVTPF,+1
008282,000271: 05,2275 77770 -1DNADR SPARE
008283,000272:
008284,000273: # ----------------- SUB-LISTS ----------------------------
008285,000274:
008286,000275: 05,2276 05,2127 LMREND01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008287,000276: 05,2276 05,2136 LMREND02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008288,000277: 05,2276 05,2145 LMREND03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
|
|
Page 199 |
008290,000279: 05,2276 05,2154 LMREND04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008291,000280: 05,2276 05,2157 LMREND05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008292,000281: 05,2276 05,2224 LMREND06 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008293,000282:
008294,000283: 05,2276 74320 LMREND07 -1DNADR AIG # AIG,AMG SNAPSHOT
008295,000284: 05,2277 03461 1DNADR AOG # AOG,TRKMKCNT
008296,000285: 05,2300 03752 1DNADR TANGNB # TANGNB,+1
008297,000286: 05,2301 03754 1DNADR MKTIME # MKTIME,+1
008298,000287: 05,2302 74017 -1DNADR RANGRDOT # DNRRANGE,DNRRDOT
008299,000288:
008300,000289: # ---------------------------------------------------------
008301,000290:
|
|
Page 200 |
008303,000292: # LM DESCENT AND ASCENT DOWNLIST
008304,000293:
008305,000294: # ----------------- CONTROL LIST --------------------------
008306,000295:
008307,000296: 05,2303 LMDSASDL EQUALS # SEND ID BY SPECIAL CODING
008308,000297: 05,2303 32341 DNPTR LMDSAS07 # COLLECT SNAPSHOT
008309,000298: 05,2304 32355 DNPTR LMDSAS08 # SEND SNAPSHOT
008310,000299: 05,2305 01344 1DNADR TEVENT # TEVENT,+1
008311,000300: 05,2306 13253 3DNADR UNFC/2 # UNFC/2 +0...+5
008312,000301: 05,2307 13645 3DNADR VGVECT # VGVECT +0...+5
008313,000302: 05,2310 03642 1DNADR TTF/8 # TTF/8,+1
008314,000303: 05,2311 03664 1DNADR DELTAH # DELTAH,+1
008315,000304: 05,2312 12022 3DNADR RLS # RLS +0...+5
008316,000305: 05,2313 00007 1DNADR SPARE
008317,000306: 05,2314 32224 DNPTR LMDSAS09 # COMMON DATA
008318,000307: 05,2315 32136 DNPTR LMDSAS02 # COMMON DATA
008319,000308: 05,2316 00024 1DNADR TIME2 # TIME2/1
008320,000309: 05,2317 32145 DNPTR LMDSAS03 # COLLECT SNAPSHOT
008321,000310: 05,2320 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008322,000311: 05,2321 32154 DNPTR LMDSAS04 # COMMON DATA
008323,000312: 05,2322 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008324,000313: 05,2323 12636 3DNADR RGU # RGU +0...+5
008325,000314: 05,2324 13626 3DNADR VGU # VGU +0...+5
008326,000315: 05,2325 13634 3DNADR LAND # LAND +0...+5
008327,000316: 05,2326 02262 1DNADR AT # AT,+1
008328,000317: 05,2327 02400 1DNADR TLAND # TLAND,+1
008329,000318: 05,2330 03615 1DNADR FC # FC,GARBAGE
008330,000319: 05,2331 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008331,000320: 05,2332 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008332,000321: 05,2333 01302 1DNADR IMODES30 # IMODES30,IMODES33
008333,000322: 05,2334 03441 1DNADR TIG # TIG,+1
008334,000323: 05,2335 32157 DNPTR LMDSAS05 # COMMON DATA
008335,000324: 05,2336 32170 DNPTR LMDSAS06 # COMMON DATA
008336,000325: 05,2337 03614 1DNADR PSEUDO55 # PSEUDO55,GARBAGE
008337,000326: 05,2340 74324 -1DNADR TTOGO # TTOGO,+1
008338,000327:
008339,000328: # ----------------- SUB-LISTS ----------------------------
008340,000329:
008341,000330: 05,2341 05,2136 LMDSAS02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008342,000331: 05,2341 05,2145 LMDSAS03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008343,000332: 05,2341 05,2154 LMDSAS04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008344,000333: 05,2341 05,2157 LMDSAS05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008345,000334: 05,2341 05,2170 LMDSAS06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
008346,000335:
008347,000336: 05,2341 75441 LMDSAS07 -1DNADR LRZCDUDL # LRZCDUDL,GARBAGE SNAPSHOT
008348,000337: 05,2342 03651 1DNADR VSELECT # VSELECT,GARBAGE
008349,000338: 05,2343 02337 1DNADR LRVTIMDL # LRVTIMDL,+1
|
|
Page 201 |
008351,000340: 05,2344 03652 1DNADR VMEAS # VMEAS,+1
008352,000341: 05,2345 03754 1DNADR MKTIME # MKTIME,+1
008353,000342: 05,2346 03654 1DNADR HMEAS # HMEAS,+1
008354,000343: 05,2347 03756 1DNADR RM # RM,+1
008355,000344: 05,2350 03457 1DNADR AIG # AIG,AMG
008356,000345: 05,2351 03461 1DNADR AOG # AOG,TRKMKCNT
008357,000346: 05,2352 03752 1DNADR TANGNB # TANGNB,+1
008358,000347: 05,2353 03754 1DNADR MKTIME # MKTIME,+1
008359,000348: 05,2354 75443 -1DNADR LRXCDUDL # LRXCDUDL,LRYCDUDL
008360,000349:
008361,000350: 05,2355 24340 LMDSAS08 6DNADR DNTMBUFF # SEND SNAPSHOT
008362,000351: 05,2356 57423 -5DNADR DNTMBUFF +12D
008363,000352:
008364,000353: 05,2357 05,2224 LMDSAS09 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008365,000354:
008366,000355: # ---------------------------------------------------------
008367,000356:
|
|
Page 202 |
008369,000358: # LM LUNAR SURFACE ALIGN DOWNLIST
008370,000359:
008371,000360: # ----------------- CONTROL LIST --------------------------
008372,000361:
008373,000362: 05,2357 LMLSALDL EQUALS # SEND ID BY SPECIAL CODING
008374,000363: 05,2357 32127 DNPTR LMLSAL01 # COLLECT SNAPSHOT
008375,000364: 05,2360 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008376,000365: 05,2361 32276 DNPTR LMLSAL07 # COLLECT SNAPSHOT
008377,000366: 05,2362 14340 4DNADR DNTMBUFF # SEND SHAPSHOT
008378,000367: 05,2363 02774 1DNADR TALIGN # TALIGN,+1
008379,000368: 05,2364 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
008380,000369: 05,2365 26236 6DNADR YNBSAV # YNBSAV +0...+5,ZNBSAV +0...+5
008381,000370: 05,2366 32224 DNPTR LMLSAL08 # COMMON DATA
008382,000371: 05,2367 32136 DNPTR LMLSAL02 # COMMON DATA
008383,000372: 05,2370 00024 1DNADR TIME2 # TIME/1
008384,000373: 05,2371 32145 DNPTR LMLSAL03 # COLLECT SNAPSHOT
008385,000374: 05,2372 24340 6DNADR DNTMBUFF # SEND SHAPSHOT
008386,000375: 05,2373 32154 DNPTR LMLSAL04 # COMMON DATA
008387,000376: 05,2374 32226 DNPTR LMLSAL09 # COMMON DATA
008388,000377: 05,2375 12230 3DNADR GSAV # GSAV +0...+5
008389,000378: 05,2376 02020 1DNADR AGSK # AGSK,+1
008390,000379: 05,2377 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008391,000380: 05,2400 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008392,000381: 05,2401 01302 1DNADR IMODES30 # IMODES30,IMODES33
008393,000382: 05,2402 03441 1DNADR TIG # TIG,+1
008394,000383: 05,2403 32157 DNPTR LMLSAL05 # COMMON DATA
008395,000384: 05,2404 32170 DNPTR LMLSAL06 # COMMON DATA
008396,000385: 05,2405 00007 1DNADR SPARE
008397,000386: 05,2406 77770 -1DNADR SPARE
008398,000387:
008399,000388: # ----------------- SUB-LISTS ----------------------------
008400,000389:
008401,000390: 05,2407 05,2127 LMLSAL01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008402,000391: 05,2407 05,2136 LMLSAL02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008403,000392: 05,2407 05,2145 LMLSAL03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008404,000393: 05,2407 05,2154 LMLSAL04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008405,000394: 05,2407 05,2157 LMLSAL05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008406,000395: 05,2407 05,2170 LMLSAL06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
008407,000396: 05,2407 05,2276 LMLSAL07 EQUALS LMREND07 # COMMON DOWNLIST DATA
008408,000397: 05,2407 05,2224 LMLSAL08 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008409,000398: 05,2407 05,2226 LMLSAL09 EQUALS LMCSTA07 # COMMON DOWNLIST DATA
008410,000399:
|
|
Page 203 |
008412,000401: # ---------------------------------------------------------
008413,000402:
|
|
Page 204 |
008415,000404: # LM AGS INITIALIZATION AND UPDATE DOWNLIST
008416,000405:
008417,000406: # ----------------- CONTROL LIST --------------------------
008418,000407:
008419,000408: 05,2407 LMAGSIDL EQUALS # SEND IO BY SPECIAL CODING
008420,000409: 05,2407 12200 3DNADR AGSBUFF +0 # AGSBUFF +0...+5
008421,000410: 05,2410 02214 1DNADR AGSBUFF +12D # AGSBUFF +12D,GARBAGE
008422,000411: 05,2411 12201 3DNADR AGSBUFF +1 # AGSBUFF +1...+6
008423,000412: 05,2412 02215 1DNADR AGSBUFF +13D # AGSBUFF +13D, GARBAGE
008424,000413: 05,2413 12206 3DNADR AGSBUFF +6 # AGSBUFF +6...+11
008425,000414: 05,2414 02214 1DNADR AGSBUFF +12D # AGSBUFF +12,GARBAGE
008426,000415: 05,2415 12207 3DNADR AGSBUFF +7 # AGSBUFF +7...+12D
008427,000416: 05,2416 02215 1DNADR AGSBUFF +13D # AGSBUFF +13D,GARBAGE
008428,000417: 05,2417 25170 6DNADR COMPNUMB # COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
008429,000418: # UPBUFF +0...+7
008430,000419: 05,2420 25204 6DNADR UPBUFF +8D # UPBUFF +8D...+19D
008431,000420: 05,2421 32136 DNPTR LMAGSI02 # COMMON DATA
008432,000421: 05,2422 00024 1DNADR TIME2 # TIME2/1
008433,000422: 05,2423 32145 DNPTR LMAGSI03 # COLLECT SNAPSHOT
008434,000423: 05,2424 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008435,000424: 05,2425 32154 DNPTR LMAGSI04 # COMMON DATA
008436,000425: 05,2426 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008437,000426: 05,2427 00007 1DNADR SPARE
008438,000427: 05,2430 00007 1DNADR SPARE
008439,000428: 05,2431 02020 1DNADR AGSK # AGSK,+1
008440,000429: 05,2432 25174 6DNADR UPBUFF # UPBUFF +0...+11D
008441,000430: 05,2433 15210 4DNADR UPBUFF +12D # UPBUFF +12D...+19D
008442,000431: 05,2434 01331 1DNADR LEMMASS # LEMMASS,CSMMASS
008443,000432: 05,2435 01302 1DNADR IMODES30 # IMODES30,IMODES33
008444,000433: 05,2436 00007 1DNADR SPARE
008445,000434: 05,2437 32157 DNPTR LMAGSI05 # COMMON DATA
008446,000435: 05,2440 52754 -6DNADR DSPTAB # DSPTAB +0...+11D
008447,000436:
008448,000437: # ----------------- SUB-LISTS ----------------------------
008449,000438:
008450,000439: 05,2441 05,2136 LMAGSI02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008451,000440: 05,2441 05,2145 LMAGSI03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008452,000441: 05,2441 05,2154 LMAGSI04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008453,000442: 05,2441 05,2157 LMAGSI05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008454,000443:
008455,000444: # ---------------------------------------------------------
008456,000445:
008457,000446: 05,2441 02172 DNTABLE GENADR LMCSTADL # LM COAST AND ALIGN DOWNLIST
008458,000447: 05,2442 02407 GENADR LMAGSIDL # LM AGS INITIALIZATION/UPDATE DOWNLIST
008459,000448: 05,2443 02232 GENADR LMRENDDL # LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008460,000449: 05,2444 02066 GENADR LMORBMDL # LM ORBITAL MANEUVERS DOWNLIST
008461,000450: 05,2445 02303 GENADR LMDSASDL # LM DESCENT AND ASCENT DOWNLIST
|
|
Page 205 |
008463,000452: 05,2446 02357 GENADR LMLSALDL # LM LUNAR SURFACE ALIGN DOWNLIST
008464,000453:
008465,000454: # ---------------------------------------------------------------
008466,000455:
008467,000456:
End of include-file DOWNLINK_LISTS.agc. Parent file is MAIN.agc