GAP: ASSEMBLE REVISION 131 OF AGC PROGRAM LUMINARY BY NASA 2021112-091 17:53 DEC. 19, 1969Note that the date is the date the printout was made, not the date on which the program revision was released, although these happen to be very close together.
Source Code
|
|
This source code is very close to the Apollo Guidance Computer software for the
Apollo 13 Lunar module. This revision of the Luminary 131 program is from December
of 1969, whereas there was a later revision in January of 1970, and still another
revision in February, which is the code that flew on the mission.
As far as this transcription is concerned, it was originally from a copy made in 1991 of
a printout from the collection of AGC developer Don Eyles for collector David Craig.
It was subsequently scanned by Gary Neff, reprocessed for online
presentation at the now-discontinued History of Recent Science and Technology (HRST) website
of MIT's Dibner Institute (the full-quality scans being discarded in the process),
and finally transcribed by Ron Burkey for the Virtual AGC Project. Although a
high-quality replacement scan for a completely illegible page was later provided by Gary
Neff, the reduced legibility of the reprocessed HRST posting nevertheless caused many
errors to be introduced into the transcription. Accordingly, a second scan of the same physical
printout was made in 2017 for the Virtual AGC Project's collection at the Internet Archive,
and used to correct the transcription errors. All of the scanned materials mentioned,
as well as other Luminary 131 related material, are available online.
Don Eyles apprently made additional hand-written notes in printout between 1991 and 2017,
so the two scans are not identical in that respect. The page-headings in the printout read, in part:GAP: ASSEMBLE REVISION 131 OF AGC PROGRAM LUMINARY BY NASA 2021112-091 17:53 DEC. 19, 1969Note that the date is the date the printout was made, not the date on which the program revision was released, although these happen to be very close together. |
007870,000002: ## Copyright: Public domain.
007871,000003: ## Filename: DOWNLINK_LISTS.agc
007872,000004: ## Purpose: The DOWNLINK LISTS code for for Luminary 1C, revision 131.
007873,000005: ## It is part of the source code for the Lunar Module's (LM)
007874,000006: ## Apollo Guidance Computer (AGC) for Apollo 13.
007875,000007: ## This file is intended to be a faithful transcription, except
007876,000008: ## that the code format has been changed to conform to the
007877,000009: ## requirements of the yaYUL assembler rather than the
007878,000010: ## original YUL assembler.
007879,000011: ## Reference: pp. 195=2-8
007880,000012: ## Contact: Ron Burkey <info@sandroid.org>.
007881,000013: ## Website: www.ibiblio.org/apollo/index.html
007882,000014: ## Mod history: 05/05/03 RSB. Began transcribing.
007883,000015: ## 05/14/05 RSB. Corrected website reference above.
007884,000016: ## 2017-01-06 RSB Page numbers now agree with those on the
007885,000017: ## original harcopy, as opposed to the PDF page
007886,000018: ## numbers in 1701.pdf.
007887,000019: ## 2017-01-26 RSB Back-ported comment-text fixes found while
007888,000020: ## proofing corresponding Luminary 69 file.
007889,000021: ## 2017-02-16 RSB Proofed comment text using octopus/ProoferComments.
007890,000022: ## 2017-02-28 RSB Fixed lingering typos.
007891,000023: ## 2017-03-05 RSB A few comment-text fixes identified while proofing
007892,000024: ## Luminary 116.
007893,000025: ## 2017-03-15 RSB Comment-text fixes identified in 5-way
007894,000026: ## side-by-side diff of Luminary 69/99/116/131/210.
007895,000027:
|
|
Page 195 |
007897,000029: 22,2004 BANK 22
007898,000030: 05,2000 SETLOC DOWNTELM
007899,000031: 05,2000 BANK
007900,000032:
007901,000033: 05,2065 0340 EBANK= DNTMBUFF
007902,000034:
007903,000035: # SPECIAL DOWNLINK OP CODES
007904,000036: # OP CODE ADDRESS(EXAMPLE) SENDS.. BIT 15 BITS 14-12 BITS 11
007905,000037: # -0
007906,000038: # ------ ---------- ---------- ------ ---------- -------
007907,000039: # --
007908,000040: # 1DNADR TIME2 (2 AGC WDS) 0 0 ECADR
007909,000041: # 2DNADR TEPHEM (4 AGC WDS) 0 1 ECADR
007910,000042: # 3DNADR VGBODY (6 AGC WDS) 0 2 ECADR
007911,000043: # 4DNADR STATE (8 AGC WDS) 0 3 ECADR
007912,000044: # 5DNADR UPBUFF (10 AGC WDS) 0 4 ECADR
007913,000045: # 6DNADR DSPTAB (12 AGC WDS) 0 5 ECADR
007914,000046: # DNCHAN 30 CHANNELS 0 7 CHANNEL
007915,000047: # ADDRESS
007916,000048: # DNPTR NEXTLIST POINTS TO NEXT 0 6 ADRES
007917,000049: # LIST.
007918,000050:
007919,000051: # DOWNLIST FORMAT DEFINITIONS AND RULES-
007920,000052: # 1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
007921,000053: # 2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
007922,000054: # 3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
007923,000055: # 4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
007924,000056: # 5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
007925,000057: # LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
007926,000058:
007927,000059: 05,2065 COUNT* $$/DLIST
007928,000060: 05,2065 ERASZERO EQUALS 7
007929,000061: 05,2065 0000007 UNKNOWN EQUALS ERASZERO
007930,000062: 05,2065 0000007 SPARE EQUALS ERASZERO # USE SPARE TO INDICATE AVAILABLE SPACE
007931,000063: 05,2065 77340 LOWIDCOD OCT 77340 # LOW ID CODE
007932,000064:
007933,000065: 05,2066 05,2172 NOMDNLST EQUALS LMCSTADL # FRESH START AND POST P27 DOWNLIST
007934,000066:
007935,000067: 05,2066 05,2407 AGSLIST EQUALS LMAGSIDL
007936,000068:
007937,000069: 05,2066 05,2407 UPDNLIST EQUALS LMAGSIDL # UPDATE PROGRAM (P27) DOWNLIST
007938,000070:
|
|
Page 196 |
007940,000072: # LM ORBITAL MANEUVERS LIST
007941,000073:
007942,000074: # ----------------- CONTROL LIST --------------------------
007943,000075:
007944,000076: 05,2066 LMORBMDL EQUALS # SEND ID BY SPECIAL CODING
007945,000077: 05,2066 32127 DNPTR LMORBM01 # COLLECT SNAPSHOT
007946,000078: 05,2067 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
007947,000079: 05,2070 03451 1DNADR DELLT4 # DELLT4,+1
007948,000080: 05,2071 13443 3DNADR RTARG # RTARG,+1...+5
007949,000081: 05,2072 02256 1DNADR ELEV # ELEV,+1
007950,000082: 05,2073 01341 1DNADR TEVENT # TEVENT,+1
007951,000083: 05,2074 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
007952,000084: 05,2075 03633 1DNADR TCSI # TCSI,+1
007953,000085: 05,2076 12266 3DNADR DELVEET1 # DELVEET1 +0...+5
007954,000086: 05,2077 13700 3DNADR VGTIG # VGTIG +0...+5
007955,000087: 05,2100 01335 1DNADR DNLRVELZ # DNLRVELZ,DNLRALT
007956,000088: 05,2101 03630 1DNADR TPASS4 # TPASS4,+1
007957,000089: 05,2102 32136 DNPTR LMORBM02 # COMMON DATA
007958,000090: 05,2103 00024 1DNADR TIME2 # TIME2/1
007959,000091: 05,2104 32145 DNPTR LMORBM03 # COLLECT SNAPSHOT
007960,000092: 05,2105 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
007961,000093: 05,2106 32154 DNPTR LMORBM04 # COMMON DATA
007962,000094: 05,2107 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
007963,000095: 05,2110 00007 1DNADR SPARE
007964,000096: 05,2111 01776 1DNADR TCDH # TCDH,+1
007965,000097: 05,2112 12274 3DNADR DELVEET2 # DELVEET2 +0...+5
007966,000098: 05,2113 03635 1DNADR TTPI # TTPI,+1
007967,000099: 05,2114 12365 3DNADR DELVEET3 # DELVEET3 +0...+5
007968,000100: 05,2115 01330 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
007969,000101: 05,2116 05333 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
007970,000102: 05,2117 03577 1DNADR DIFFALT # DIFFALT,+1
007971,000103: 05,2120 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
007972,000104: 05,2121 01277 1DNADR IMODES30 # IMODES30,IMODES33
007973,000105: 05,2122 03441 1DNADR TIG # TIG,+1
007974,000106: 05,2123 32157 DNPTR LMORBM05 # COMMON DATA
007975,000107: 05,2124 32170 DNPTR LMORBM06 # COMMON DATA
007976,000108: 05,2125 00007 1DNADR SPARE # FORMERLY PIF
007977,000109: 05,2126 74261 -1DNADR TGO # TGO,+1
007978,000110:
007979,000111: # ----------------- SUB-LISTS ----------------------------
007980,000112:
007981,000113: 05,2127 76056 LMORBM01 -1DNADR R-OTHER +2 # R-OTHER +2,+3 SNAPSHOT
007982,000114: 05,2130 01723 1DNADR R-OTHER +4 # R-OTHER +4,+5
007983,000115: 05,2131 01725 1DNADR V-OTHER # V-OTHER,+1
007984,000116: 05,2132 01727 1DNADR V-OTHER +2 # V-OTHER +2,+3
007985,000117: 05,2133 01731 1DNADR V-OTHER +4 # V-OTHER +4,+5
007986,000118: 05,2134 01570 1DNADR T-OTHER # T-OTHER,+1
007987,000119: 05,2135 76060 -1DNADR R-OTHER # R-OTHER +0,+1
007988,000120:
007989,000121: 05,2136 04320 LMORBM02 2DNADR REDOCTR # REDOCTR,THETAD,+1,+2 COMMON DATA
|
|
Page 197 |
007991,000123: 05,2137 01432 1DNADR RSBBQ # RSBBQ,+1
007992,000124: 05,2140 07021 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
007993,000125: 05,2141 07234 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE
007994,000126: 05,2142 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
007995,000127: 05,2143 24074 6DNADR STATE # STATE +0...+11D (FLAGWORDS)
007996,000128: 05,2144 52755 -6DNADR DSPTAB # DSPTAB TABLES
007997,000129:
007998,000130: 05,2145 76556 LMORBM03 -1DNADR RN +2 # RN +2,+3 SNAPSHOT
007999,000131: 05,2146 01223 1DNADR RN +4 # RN +4,+5
008000,000132: 05,2147 01225 1DNADR VN # VN,+1
008001,000133: 05,2150 01227 1DNADR VN +2 # VN +2,+3
008002,000134: 05,2151 01231 1DNADR VN +4 # VN +4,+5
008003,000135: 05,2152 01233 1DNADR PIPTIME # PIPTIME,+1
008004,000136: 05,2153 76560 -1DNADR RN # RN,+1
008005,000137:
008006,000138: 05,2154 07242 LMORBM04 2DNADR OMEGAPD # OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
008007,000139: 05,2155 10372 3DNADR CADRFLSH # CADRFLSH,+1,+2,FAILREG,+1,+2
008008,000140: 05,2156 77667 -1DNADR RADMODES # RADMODES,DAPBOOLS COMMON DATA
008009,000141:
008010,000142: 05,2157 07021 LMORBM05 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008011,000143: 05,2160 07234 2DNADR CDUXD # CDUXD,CDUXD,CDUZD,GARBAGE
008012,000144: 05,2161 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008013,000145: 05,2162 03024 1DNADR ALPHAQ # ALPHAQ,ALPHAR COMMON DATA
008014,000146: 05,2163 03113 1DNADR POSTORKP # POSTORKP,NEGTORKP
008015,000147: 05,2164 34011 DNCHAN 11 # CHANNELS 11,12
008016,000148: 05,2165 34013 DNCHAN 13 # CHANNELS 13,14
008017,000149: 05,2166 34030 DNCHAN 30 # CHANNELS 30,31
008018,000150: 05,2167 43745 -DNCHAN 32 # CHANNELS 32,33
008019,000151:
008020,000152: 05,2170 03560 LMORBM06 1DNADR PIPTIME1 # PIPTIME,+1 COMMON DATA
008021,000153: 05,2171 67453 -3DNADR DELV # DELV +0...+5
008022,000154:
008023,000155: # ---------------------------------------------------------
008024,000156:
|
|
Page 198 |
008026,000158: # LM COAST AND ALIGNMENT DOWNLIST
008027,000159:
008028,000160: # ----------------- CONTROL LIST --------------------------
008029,000161:
008030,000162: 05,2172 LMCSTADL EQUALS # SEND ID BY SPECIAL CODING
008031,000163: 05,2172 32127 DNPTR LMCSTA01 # COLLECT SNAPSHOT
008032,000164: 05,2173 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008033,000165: 05,2174 02020 1DNADR AGSK # AGSK,+1
008034,000166: 05,2175 02774 1DNADR TALIGN # TALIGN,+1
008035,000167: 05,2176 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008036,000168: 05,2177 01330 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
008037,000169: 05,2200 01341 1DNADR TEVENT # TEVENT,+1
008038,000170: 05,2201 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
008039,000171: 05,2202 00734 1DNADR AOTCODE # AOTCODE,GARBAGE
008040,000172: 05,2203 12022 3DNADR RLS # RLS +0...+5
008041,000173: 05,2204 05333 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008042,000174: 05,2205 13700 3DNADR VGTIG # VGTIGX,Y,Z
008043,000175: 05,2206 32136 DNPTR LMCSTA02 # COMMON DATA
008044,000176: 05,2207 00024 1DNADR TIME2 # TIME2/1
008045,000177: 05,2210 32145 DNPTR LMCSTA03 # COLLECT SNAPSHOT
008046,000178: 05,2211 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008047,000179: 05,2212 32154 DNPTR LMCSTA04 # COMMON DATA
008048,000180: 05,2213 32226 DNPTR LMCSTA07 # COMMON DATA
008049,000181: 05,2214 05333 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008050,000182: 05,2215 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
008051,000183: 05,2216 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008052,000184: 05,2217 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008053,000185: 05,2220 01277 1DNADR IMODES30 # IMODES30,IMODES33
008054,000186: 05,2221 03441 1DNADR TIG # TIG,+1
008055,000187: 05,2222 32157 DNPTR LMCSTA05 # COMMON DATA
008056,000188: 05,2223 52755 -6DNADR DSPTAB # DSPTAB +0...+11D TABLE
008057,000189:
008058,000190: # ----------------- SUB-LISTS ----------------------------
008059,000191:
008060,000192: 05,2224 05,2127 LMCSTA01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008061,000193: 05,2224 05,2136 LMCSTA02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008062,000194: 05,2224 05,2145 LMCSTA03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008063,000195: 05,2224 05,2154 LMCSTA04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008064,000196: 05,2224 05,2157 LMCSTA05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008065,000197:
008066,000198: 05,2224 05700 LMCSTA06 2DNADR X789 # X789 +0...+3 COMMON DATA
008067,000199: 05,2225 77665 -1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008068,000200: 05,2226 12737 LMCSTA07 3DNADR OGC # OGC,+1,IGC,+1,MGC,+1 COMMON DATA
008069,000201: 05,2227 02755 1DNADR BESTI # BESTI,BESTJ
008070,000202: 05,2230 12760 3DNADR STARSAV1 # STARSAV1 +0...+5
008071,000203: 05,2231 65011 -3DNADR STARSAV2 # STARSAV2 +0...+5
|
|
Page 199 |
008073,000205: # -----------------------------------------------------------
008074,000206:
|
|
Page 200 |
008076,000208: # LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008077,000209:
008078,000210: # ----------------- CONTROL LIST --------------------------
008079,000211:
008080,000212: 05,2232 LMRENDDL EQUALS # SEND ID BY SPECIAL CODING
008081,000213: 05,2232 32127 DNPTR LMREND01 # COLLECT SNAPSHOT
008082,000214: 05,2233 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008083,000215: 05,2234 32276 DNPTR LMREND07 # COLLECT SNAPSHOT
008084,000216: 05,2235 14340 4DNADR DNTMBUFF # SEND SNAPSHOT
008085,000217: 05,2236 03451 1DNADR DELLT4 # DELLT4,+1
008086,000218: 05,2237 13443 3DNADR RTARG # RTARG +0...+5
008087,000219: 05,2240 13433 3DNADR DELVSLV # DELVSLV +0...+5
008088,000220: 05,2241 03633 1DNADR TCSI # TCSI,+1
008089,000221: 05,2242 12266 3DNADR DELVEET1 # DELVEET +0-..+5
008090,000222: 05,2243 00007 1DNADR SPARE
008091,000223: 05,2244 03630 1DNADR TPASS4 # TPASS4,+1
008092,000224: 05,2245 32224 DNPTR LMREND06 # COMMON DATA
008093,000225: 05,2246 32136 DNPTR LMREND02 # COMMON DATA
008094,000226: 05,2247 00024 1DNADR TIME2 # TIME2/1
008095,000227: 05,2250 32145 DNPTR LMREND03 # COLLECT SNAPSHOT
008096,000228: 05,2251 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008097,000229: 05,2252 32154 DNPTR LMREND04 # COMMON DATA
008098,000230: 05,2253 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008099,000231: 05,2254 00007 1DNADR SPARE
008100,000232: 05,2255 01776 1DNADR TCDH # TCDH,+1
008101,000233: 05,2256 12274 3DNADR DELVEET2 # DELVEET2 +0...+5
008102,000234: 05,2257 03635 1DNADR TTPI # TTPI,+1
008103,000235: 05,2260 12365 3DNADR DELVEET3 # DELVEET3 +0...+5
008104,000236: 05,2261 02256 1DNADR ELEV # ELEV,+1
008105,000237: 05,2262 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
008106,000238: 05,2263 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008107,000239: 05,2264 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008108,000240: 05,2265 01277 1DNADR IMODES30 # IMODES30,IMODES33
008109,000241: 05,2266 03441 1DNADR TIG # TIG,+1
008110,000242: 05,2267 32157 DNPTR LMREND05 # COMMON DATA
008111,000243: 05,2270 00007 1DNADR SPARE
008112,000244: 05,2271 03620 1DNADR CENTANG # CENTANG,+1
008113,000245: 05,2272 03466 1DNADR NN # NN,+1
008114,000246: 05,2273 03577 1DNADR DIFFALT # DIFFALT,+1
008115,000247: 05,2274 02347 1DNADR DELVTPF # DELVTPF,+1
008116,000248: 05,2275 77770 -1DNADR SPARE
008117,000249:
008118,000250: # ----------------- SUB-LISTS ----------------------------
008119,000251:
008120,000252: 05,2276 05,2127 LMREND01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008121,000253: 05,2276 05,2136 LMREND02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008122,000254: 05,2276 05,2145 LMREND03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
|
|
Page 201 |
008124,000256: 05,2276 05,2154 LMREND04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008125,000257: 05,2276 05,2157 LMREND05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008126,000258: 05,2276 05,2224 LMREND06 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008127,000259:
008128,000260: 05,2276 74320 LMREND07 -1DNADR AIG # AIG,AMG SNAPSHOT
008129,000261: 05,2277 03461 1DNADR AOG # AOG,TRKMKCNT
008130,000262: 05,2300 03752 1DNADR TANGNB # TANGNB,+1
008131,000263: 05,2301 03754 1DNADR MKTIME # MKTIME,+1
008132,000264: 05,2302 74017 -1DNADR RANGRDOT # DNRRANGE,DNRRDOT
008133,000265:
008134,000266: # ---------------------------------------------------------
008135,000267:
|
|
Page 202 |
008137,000269: # LM DESCENT AND ASCENT DOWNLIST
008138,000270:
008139,000271: # ----------------- CONTROL LIST --------------------------
008140,000272:
008141,000273: 05,2303 LMDSASDL EQUALS # SEND ID BY SPECIAL CODING
008142,000274: 05,2303 32341 DNPTR LMDSAS07 # COLLECT SNAPSHOT
008143,000275: 05,2304 32355 DNPTR LMDSAS08 # SEND SNAPSHOT
008144,000276: 05,2305 01341 1DNADR TEVENT # TEVENT,+1
008145,000277: 05,2306 13252 3DNADR UNFC/2 # UNFC/2 +0...+5
008146,000278: 05,2307 13645 3DNADR VGVECT # VGVECT +0...+5
008147,000279: 05,2310 03642 1DNADR TTF/8 # TTF/8,+1
008148,000280: 05,2311 03664 1DNADR DELTAH # DELTAH,+1
008149,000281: 05,2312 12022 3DNADR RLS # RLS +0...+5
008150,000282: 05,2313 02276 1DNADR ZDOTD # ZDOTD,+1
008151,000283: 05,2314 32224 DNPTR LMDSAS09 # COMMON DATA
008152,000284: 05,2315 32136 DNPTR LMDSAS02 # COMMON DATA
008153,000285: 05,2316 00024 1DNADR TIME2 # TIME2/1
008154,000286: 05,2317 32145 DNPTR LMDSAS03 # COLLECT SNAPSHOT
008155,000287: 05,2320 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008156,000288: 05,2321 32154 DNPTR LMDSAS04 # COMMON DATA
008157,000289: 05,2322 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008158,000290: 05,2323 12626 3DNADR RGU # RGU +0...+5
008159,000291: 05,2324 13626 3DNADR VGU # VGU +0...+5
008160,000292: 05,2325 13634 3DNADR LAND # LAND +0...+5
008161,000293: 05,2326 02262 1DNADR AT # AT,+1
008162,000294: 05,2327 02400 1DNADR TLAND # TLAND,+1
008163,000295: 05,2330 03615 1DNADR FC # FC,GARBAGE
008164,000296: 05,2331 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008165,000297: 05,2332 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008166,000298: 05,2333 01277 1DNADR IMODES30 # IMODES30,IMODES33
008167,000299: 05,2334 03441 1DNADR TIG # TIG,+1
008168,000300: 05,2335 32157 DNPTR LMDSAS05 # COMMON DATA
008169,000301: 05,2336 32170 DNPTR LMDSAS06 # COMMON DATA
008170,000302: 05,2337 03614 1DNADR PSEUDO55 # PSEUDO55,GARBAGE
008171,000303: 05,2340 74324 -1DNADR TTOGO # TTOGO,+1
008172,000304:
008173,000305: # ----------------- SUB-LISTS ----------------------------
008174,000306:
008175,000307: 05,2341 05,2136 LMDSAS02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008176,000308: 05,2341 05,2145 LMDSAS03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008177,000309: 05,2341 05,2154 LMDSAS04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008178,000310: 05,2341 05,2157 LMDSAS05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008179,000311: 05,2341 05,2170 LMDSAS06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
008180,000312:
008181,000313: 05,2341 75441 LMDSAS07 -1DNADR LRZCDUDL # LRZCDUDL,GARBAGE SNAPSHOT
008182,000314: 05,2342 03651 1DNADR VSELECT # VSELECT,GARBAGE
008183,000315: 05,2343 02337 1DNADR LRVTIMDL # LRVTIMDL,+1
|
|
Page 203 |
008185,000317: 05,2344 03652 1DNADR VMEAS # VMEAS,+1
008186,000318: 05,2345 03754 1DNADR MKTIME # MKTIME,+1
008187,000319: 05,2346 03654 1DNADR HMEAS # HMEAS,+1
008188,000320: 05,2347 03756 1DNADR RM # RM,+1
008189,000321: 05,2350 03457 1DNADR AIG # AIG,AMG
008190,000322: 05,2351 03461 1DNADR AOG # AOG,TRKMKCNT
008191,000323: 05,2352 03752 1DNADR TANGNB # TANGNB,+1
008192,000324: 05,2353 03754 1DNADR MKTIME # MKTIME,+1
008193,000325: 05,2354 75443 -1DNADR LRXCDUDL # LRXCDUDL,LRYCDUDL
008194,000326:
008195,000327: 05,2355 24340 LMDSAS08 6DNADR DNTMBUFF # SEND SNAPSHOT
008196,000328: 05,2356 57423 -5DNADR DNTMBUFF +12D
008197,000329:
008198,000330: 05,2357 05,2224 LMDSAS09 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008199,000331:
008200,000332: # ---------------------------------------------------------
008201,000333:
|
|
Page 204 |
008203,000335: # LM LUNAR SURFACE ALIGN DOWNLIST
008204,000336:
008205,000337: # ----------------- CONTROL LIST --------------------------
008206,000338:
008207,000339: 05,2357 LMLSALDL EQUALS # SEND ID BY SPECIAL CODING
008208,000340: 05,2357 32127 DNPTR LMLSAL01 # COLLECT SNAPSHOT
008209,000341: 05,2360 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008210,000342: 05,2361 32276 DNPTR LMLSAL07 # COLLECT SNAPSHOT
008211,000343: 05,2362 14340 4DNADR DNTMBUFF # SEND SHAPSHOT
008212,000344: 05,2363 02774 1DNADR TALIGN # TALIGN,+1
008213,000345: 05,2364 25733 6DNADR REFSMMAT # REFSMMAT +0...+11D
008214,000346: 05,2365 26236 6DNADR YNBSAV # YNBSAV +0...+5,ZNBSAV +0...+5
008215,000347: 05,2366 32224 DNPTR LMLSAL08 # COMMON DATA
008216,000348: 05,2367 32136 DNPTR LMLSAL02 # COMMON DATA
008217,000349: 05,2370 00024 1DNADR TIME2 # TIME/1
008218,000350: 05,2371 32145 DNPTR LMLSAL03 # COLLECT SNAPSHOT
008219,000351: 05,2372 24340 6DNADR DNTMBUFF # SEND SHAPSHOT
008220,000352: 05,2373 32154 DNPTR LMLSAL04 # COMMON DATA
008221,000353: 05,2374 32226 DNPTR LMLSAL09 # COMMON DATA
008222,000354: 05,2375 12230 3DNADR GSAV # GSAV +0...+5
008223,000355: 05,2376 02020 1DNADR AGSK # AGSK,+1
008224,000356: 05,2377 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008225,000357: 05,2400 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008226,000358: 05,2401 01277 1DNADR IMODES30 # IMODES30,IMODES33
008227,000359: 05,2402 03441 1DNADR TIG # TIG,+1
008228,000360: 05,2403 32157 DNPTR LMLSAL05 # COMMON DATA
008229,000361: 05,2404 32170 DNPTR LMLSAL06 # COMMON DATA
008230,000362: 05,2405 00007 1DNADR SPARE
008231,000363: 05,2406 77770 -1DNADR SPARE
008232,000364:
008233,000365: # ----------------- SUB-LISTS ----------------------------
008234,000366:
008235,000367: 05,2407 05,2127 LMLSAL01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008236,000368: 05,2407 05,2136 LMLSAL02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008237,000369: 05,2407 05,2145 LMLSAL03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008238,000370: 05,2407 05,2154 LMLSAL04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008239,000371: 05,2407 05,2157 LMLSAL05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008240,000372: 05,2407 05,2170 LMLSAL06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
008241,000373: 05,2407 05,2276 LMLSAL07 EQUALS LMREND07 # COMMON DOWNLIST DATA
008242,000374: 05,2407 05,2224 LMLSAL08 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
008243,000375: 05,2407 05,2226 LMLSAL09 EQUALS LMCSTA07 # COMMON DOWNLIST DATA
008244,000376:
|
|
Page 205 |
008246,000378: # ---------------------------------------------------------
008247,000379:
|
|
Page 206 |
008249,000381: # LM AGS INITIALIZATION AND UPDATE DOWNLIST
008250,000382:
008251,000383: # ----------------- CONTROL LIST --------------------------
008252,000384:
008253,000385: 05,2407 LMAGSIDL EQUALS # SEND IO BY SPECIAL CODING
008254,000386: 05,2407 12200 3DNADR AGSBUFF +0 # AGSBUFF +0...+5
008255,000387: 05,2410 02214 1DNADR AGSBUFF +12D # AGSBUFF +12D,GARBAGE
008256,000388: 05,2411 12201 3DNADR AGSBUFF +1 # AGSBUFF +1...+6
008257,000389: 05,2412 02215 1DNADR AGSBUFF +13D # AGSBUFF +13D, GARBAGE
008258,000390: 05,2413 12206 3DNADR AGSBUFF +6 # AGSBUFF +6...+11
008259,000391: 05,2414 02214 1DNADR AGSBUFF +12D # AGSBUFF +12,GARBAGE
008260,000392: 05,2415 12207 3DNADR AGSBUFF +7 # AGSBUFF +7...+12D
008261,000393: 05,2416 02215 1DNADR AGSBUFF +13D # AGSBUFF +13D,GARBAGE
008262,000394: 05,2417 25167 6DNADR COMPNUMB # COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
008263,000395: # UPBUFF +0...+7
008264,000396: 05,2420 25203 6DNADR UPBUFF +8D # UPBUFF +8D...+19D
008265,000397: 05,2421 32136 DNPTR LMAGSI02 # COMMON DATA
008266,000398: 05,2422 00024 1DNADR TIME2 # TIME2/1
008267,000399: 05,2423 32145 DNPTR LMAGSI03 # COLLECT SNAPSHOT
008268,000400: 05,2424 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008269,000401: 05,2425 32154 DNPTR LMAGSI04 # COMMON DATA
008270,000402: 05,2426 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008271,000403: 05,2427 00007 1DNADR SPARE
008272,000404: 05,2430 00007 1DNADR SPARE
008273,000405: 05,2431 02020 1DNADR AGSK # AGSK,+1
008274,000406: 05,2432 25173 6DNADR UPBUFF # UPBUFF +0...+11D
008275,000407: 05,2433 15207 4DNADR UPBUFF +12D # UPBUFF +12D...+19D
008276,000408: 05,2434 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008277,000409: 05,2435 01277 1DNADR IMODES30 # IMODES30,IMODES33
008278,000410: 05,2436 00007 1DNADR SPARE
008279,000411: 05,2437 32157 DNPTR LMAGSI05 # COMMON DATA
008280,000412: 05,2440 52755 -6DNADR DSPTAB # DSPTAB +0...+11D
008281,000413:
008282,000414: # ----------------- SUB-LISTS ----------------------------
008283,000415:
008284,000416: 05,2441 05,2136 LMAGSI02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008285,000417: 05,2441 05,2145 LMAGSI03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008286,000418: 05,2441 05,2154 LMAGSI04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008287,000419: 05,2441 05,2157 LMAGSI05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
008288,000420:
008289,000421: # ---------------------------------------------------------
008290,000422:
008291,000423: 05,2441 02172 DNTABLE GENADR LMCSTADL # LM COAST AND ALIGN DOWNLIST
008292,000424: 05,2442 02407 GENADR LMAGSIDL # LM AGS INITIALIZATION/UPDATE DOWNLIST
008293,000425: 05,2443 02232 GENADR LMRENDDL # LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008294,000426: 05,2444 02066 GENADR LMORBMDL # LM ORBITAL MANEUVERS DOWNLIST
008295,000427: 05,2445 02303 GENADR LMDSASDL # LM DESCENT AND ASCENT DOWNLIST
|
|
Page 207 |
008297,000429: 05,2446 02357 GENADR LMLSALDL # LM LUNAR SURFACE ALIGN DOWNLIST
008298,000430:
008299,000431: # ---------------------------------------------------------------
008300,000432:
008301,000433:
End of include-file DOWNLINK_LISTS.agc. Parent file is MAIN.agc