Notations on the program listing read, in part:
GAP: ASSEMBLE REVISION 210 OF AGC PROGRAM LUMINARY BY NASA 2021112-161 17:11 MAR. 19,1971Note that the date is the date of the printout, not the date of the program revision.
Source Code
|
|
These source-code files derive from a printout of Luminary 210 (Apollo 15-17
Lunar Module guidance computer program), from the personal library of
original AGC developer Don Eyles, digitally photographed at archive.org,
financially sponsored by Jim Lawton, and transcribed to source code by a
team of volunteers. This colorized, syntax-highlighted form was created
by assembling that transcribed source code. Note that the full page images
are available on the
Virtual AGC project page at archive.org, while reduced-size images
are presented at the VirtualAGC project website. Report or fix any
transcription errors at
the Virtual AGC project code repository. Notations on the program listing read, in part: GAP: ASSEMBLE REVISION 210 OF AGC PROGRAM LUMINARY BY NASA 2021112-161 17:11 MAR. 19,1971Note that the date is the date of the printout, not the date of the program revision. |
008708,000002: ## Copyright: Public domain.
008709,000003: ## Filename: DOWNLINK_LISTS.agc
008710,000004: ## Purpose: A section of Luminary revision 210.
008711,000005: ## It is part of the source code for the Lunar Module's (LM)
008712,000006: ## Apollo Guidance Computer (AGC) for Apollo 15-17.
008713,000007: ## This file is intended to be a faithful transcription, except
008714,000008: ## that the code format has been changed to conform to the
008715,000009: ## requirements of the yaYUL assembler rather than the
008716,000010: ## original YUL assembler.
008717,000011: ## Reference: pp. 204-217
008718,000012: ## Assembler: yaYUL
008719,000013: ## Contact: Ron Burkey <info@sandroid.org>.
008720,000014: ## Website: www.ibiblio.org/apollo/index.html
008721,000015: ## Mod history: 2016-11-17 JL Created from Luminary131 version.
008722,000016: ## 2016-11-22 HG Transcribed
008723,000017: ## 2016-12-11 HG fix operand LMORBM05 -> LMCSTA05
008724,000018: ## LMLSAL09 -> LMLSAL08
008725,000019: ## LMLSAL05 -> LMSAL05
008726,000020: ## 2016-12-12 MAS Fixed a couple more typos.
008727,000021: ## 2016-12-23 RSB Proofed comment text with octopus/ProoferComments
008728,000022: ## and fixed all errors found.
008729,000023: ## 2017-01-26 RSB Back-ported comment-text fixes found while
008730,000024: ## proofing corresponding Luminary 69 file.
008731,000025: ## 2017-08-18 RSB Fixed comment-text error identified in ZERLINA 56.
|
|
Page 204 |
008733,000027: 22,2004 BANK 22
008734,000028: 05,2000 SETLOC DOWNTELM
008735,000029: 05,2000 BANK
008736,000030:
008737,000031: 05,2045 0340 EBANK= DNTMBUFF
008738,000032:
008739,000033: # SPECIAL DOWNLINK OP CODES
008740,000034: # OP CODE ADDRESS(EXAMPLE) SENDS.. BIT 15 BITS 14-12 BITS 11
008741,000035: # -0
008742,000036: # ------ ---------- ---------- ------ ---------- -------
008743,000037: # --
008744,000038: # 1DNADR TIME2 (2 AGC WDS) 0 0 ECADR
008745,000039: # 2DNADR TEPHEM (4 AGC WDS) 0 1 ECADR
008746,000040: # 3DNADR VGBODY (6 AGC WDS) 0 2 ECADR
008747,000041: # 4DNADR STATE (8 AGC WDS) 0 3 ECADR
008748,000042: # 5DNADR UPBUFF (10 AGC WDS) 0 4 ECADR
008749,000043: # 6DNADR DSPTAB (12 AGC WDS) 0 5 ECADR
008750,000044: # DNCHAN 30 CHANNELS 0 7 CHANNEL
008751,000045: # ADDRESS
008752,000046: # DNPTR NEXTLIST POINTS TO NEXT 0 6 ADRES
008753,000047: # LIST.
008754,000048:
008755,000049: # DOWNLIST FORMAT DEFINITIONS AND RULES-
008756,000050: # 1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN.
008757,000051: # 2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR.
008758,000052: # 3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS.
008759,000053: # 4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST.
008760,000054: # 5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL
008761,000055: # LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS.
008762,000056:
008763,000057: 05,2045 COUNT* $$/DLIST
008764,000058: 05,2045 ERASZERO EQUALS 7
008765,000059: 05,2045 0000007 UNKNOWN EQUALS ERASZERO
008766,000060: 05,2045 0000007 SPARE EQUALS ERASZERO # USE SPARE TO INDICATE AVAILABLE SPACE
008767,000061: 05,2045 77340 LOWIDCOD OCT 77340 # LOW ID CODE
008768,000062:
008769,000063:
008770,000064: 05,2046 05,2153 NOMDNLST EQUALS COSTALIN # FRESH START AND POST P27 DOWNLIST
008771,000065: 05,2046 05,2414 AGSLIST EQUALS AGSI/UPD
008772,000066: 05,2046 05,2414 UPDNLIST EQUALS AGSI/UPD # UPDATE PROGRAM (P27) DOWNLIST
008773,000067:
|
|
Page 205 |
008775,000069: # LM ORBITAL MANEUVERS LIST
008776,000070:
008777,000071: # ----------------- CONTROL LIST --------------------------
008778,000072:
008779,000073: 05,2046 ORBMANUV EQUALS # SEND ID BY SPECIAL CODING
008780,000074: 05,2046 32107 DNPTR LMORBM01 # COLLECT SNAPSHOT
008781,000075: 05,2047 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008782,000076: 05,2050 03451 1DNADR DELLT4 # DELLT4,+1
008783,000077: 05,2051 13443 3DNADR RTARG # RTARG,+1...+5
008784,000078: 05,2052 02247 1DNADR ELEV # ELEV,+1
008785,000079: 05,2053 01341 1DNADR TEVENT # TEVENT,+1
008786,000080: 05,2054 25731 6DNADR REFSMMAT # REFSMMAT+0...+11D
008787,000081: 05,2055 03633 1DNADR TCSI # TCSI,+1
008788,000082: 05,2056 12257 3DNADR DELVEET1 # DELVEET1+0...+5
008789,000083: 05,2057 13700 3DNADR VGTIG # VGTIG+0...+5
008790,000084: 05,2060 01335 1DNADR DNLRVELZ # DNLRVELZ,DNLRALT
008791,000085: 05,2061 03630 1DNADR TPASS4 # TPASS4,+1
008792,000086: 05,2062 32116 DNPTR LMORBM02 # COMMON DATA
008793,000087: 05,2063 00024 1DNADR TIME2 # TIME2/1
008794,000088: 05,2064 32125 DNPTR LMORBM03 # COLLECT SNAPSHOT
008795,000089: 05,2065 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008796,000090: 05,2066 32134 DNPTR LMORBM04 # COMMON DATA
008797,000091: 05,2067 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008798,000092: 05,2070 01355 1DNADR SERVDURN # SERVDURN,DUMLOOPS
008799,000093: 05,2071 01774 1DNADR TCDH # TCDH,+1
008800,000094: 05,2072 12265 3DNADR DELVEET2 # DELVEET2+0...+5
008801,000095: 05,2073 03635 1DNADR TTPI # TTPI,+1
008802,000096: 05,2074 12356 3DNADR DELVEET3 # DELVEET3+0...+5
008803,000097: 05,2075 01330 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
008804,000098: 05,2076 05333 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008805,000099: 05,2077 03577 1DNADR DIFFALT # DIFFALT,+1
008806,000100: 05,2100 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008807,000101: 05,2101 01277 1DNADR IMODES30 # IMODES30,IMODES33
008808,000102: 05,2102 03441 1DNADR TIG # TIG,+1
008809,000103: 05,2103 32140 DNPTR LMORBM05 # COMMON DATA
008810,000104: 05,2104 32151 DNPTR LMORBM06 # COMMON DATA
008811,000105: 05,2105 01363 1DNADR ALMCADR # ALMCADR,+1
008812,000106: 05,2106 74261 -1DNADR TGO # TGO,+1
008813,000107:
008814,000108: # ----------------- SUB-LISTS ----------------------------
008815,000109:
008816,000110: 05,2107 76060 LMORBM01 -1DNADR R-OTHER +2 # R-OTHER+2,+3 SNAPSHOT
008817,000111: 05,2110 01721 1DNADR R-OTHER +4 # R-OTHER+4,+5
008818,000112: 05,2111 01723 1DNADR V-OTHER # V-OTHER,+1
008819,000113: 05,2112 01725 1DNADR V-OTHER +2 # V-OTHER+2,+3
008820,000114: 05,2113 01727 1DNADR V-OTHER +4 # V-OTHER+4,+5
008821,000115: 05,2114 01570 1DNADR T-OTHER # T-OTHER,+1
008822,000116: 05,2115 76062 -1DNADR R-OTHER # R-OTHER+0,+1
008823,000117:
008824,000118: 05,2116 04320 LMORBM02 2DNADR REDOCTR # REDOCTR,THETAD,+1,+2 COMMON DATA
008825,000119:
|
|
Page 206 |
008827,000121: 05,2117 01432 1DNADR RSBBQ # RSBBQ,+1
008828,000122: 05,2120 07021 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008829,000123: 05,2121 07234 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE
008830,000124: 05,2122 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008831,000125: 05,2123 24074 6DNADR STATE # STATE+0...+11D (FLAGWORDS)
008832,000126: 05,2124 52755 -6DNADR DSPTAB # DSPTAB TABLES
008833,000127:
008834,000128: 05,2125 76556 LMORBM03 -1DNADR RN +2 # RN +2,+3 SNAPSHOT
008835,000129: 05,2126 01223 1DNADR RN +4 # RN +4,+5
008836,000130: 05,2127 01225 1DNADR VN # VN,+1
008837,000131: 05,2130 01227 1DNADR VN +2 # VN +2,+3
008838,000132: 05,2131 01231 1DNADR VN +4 # VN +4,+5
008839,000133: 05,2132 01233 1DNADR PIPTIME # PIPTIME,+1
008840,000134: 05,2133 76560 -1DNADR RN # RN,+1
008841,000135:
008842,000136: 05,2134 07242 LMORBM04 2DNADR OMEGAPD # OMEGAPD,OMEGAQD,OMEGARD,GARBAGE
008843,000137: 05,2135 34076 DNCHAN 76 # GARBAGE,CHANNEL77
008844,000138: 05,2136 04374 2DNADR CHANBKUP
008845,000139: 05,2137 77667 -1DNADR RADMODES # RADMODES,DAPBOOLS COMMON DATA
008846,000140:
008847,000141: 05,2140 07021 LMORBM05 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008848,000142: 05,2141 07234 2DNADR CDUXD # CDUXD,CDUXD,CDUZD,GARBAGE
008849,000143: 05,2142 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008850,000144: 05,2143 03024 1DNADR ALPHAQ # ALPHAQ,ALPHAR COMMON DATA
008851,000145: 05,2144 03113 LMORB10 1DNADR POSTORKP # POSTORKP,NEGTORKP
008852,000146: 05,2145 34011 LMORBM09 DNCHAN 11 # CHANNEL11,12
008853,000147: 05,2146 34013 DNCHAN 13 # CHANNELS13,14
008854,000148: 05,2147 34030 DNCHAN 30 # CHANNELS30,31
008855,000149: 05,2150 43745 -DNCHAN 32 # CHANNELS32,33
008856,000150:
008857,000151: 05,2151 03560 LMORBM06 1DNADR PIPTIME1 # PIPTIME,+1 COMMON DATA
008858,000152: 05,2152 67453 -3DNADR DELV # DELV+0...+5
008859,000153:
008860,000154: # ---------------------------------------------------------
008861,000155: # *** THE FOLLOWING IS A LIST OF LOCATIONS IN DOWNLINK LISTS
008862,000156: # *** BUT NOT REFERENCED IN THE DIRECTORY BECAUSE THEY ARE NOT
008863,000157: # *** THE FIRST LOCATION REFERENCED IN AN INSTRUCTION
008864,000158: # *** THIS LIST SHOULD BE UPDATED WHEN ANY CHANGES ARE MADE TO LISTS.
008865,000159:
008866,000160: # LOCATION LIST NAME
008867,000161: 05,2153 1336 DL101 = DNLRALT # ORBMANUV
008868,000162: 05,2153 0000025 DL102 = TIME1
008869,000163: 05,2153 E6,1516 DL1O3 = NEGTORKU
008870,000164: 05,2153 E6,1517 DL104 = POSTORKV
008871,000165: 05,2153 E6,1520 DL105 = NEGTORKV
008872,000166: 05,2153 1356 DL106 = DUMLOOPS
008873,000167: 05,2153 1331 DL107 = DNRRDOT
008874,000168: 05,2153 1334 DL108 = DNLRVELY
008875,000169:
|
|
Page 207 |
008877,000171: 05,2153 1335 DL109 = DNLRVELZ
008878,000172: 05,2153 1336 DL110 = DNLRALT
008879,000173: 05,2153 1327 DL111 = CSMMASS
008880,000174: 05,2153 1300 DL112 = IMODES33
008881,000175: 05,2153 0321 DL113 = THETAD # LMORBM02
008882,000176: 05,2153 E6,1422 DL114 = OMEGAQ
008883,000177: 05,2153 E6,1423 DL115 = OMEGAR
008884,000178: 05,2153 E6,1635 DL116 = CDUYD
008885,000179: 05,2153 E6,1636 DL117 = CDUZD
008886,000180: 05,2153 0000033 DL118 = CDUY
008887,000181: 05,2153 0000034 DL119 = CDUZ
008888,000182: 05,2153 0000035 DL120 = CDUT
008889,000183: 05,2153 E6,1643 DL121 = OMEGAQD # LMORBM04
008890,000184: 05,2153 E6,1644 DL122 = OMEGARD
008891,000185: 05,2153 0375 DL123 = FAILREG
008892,000186: 05,2153 0111 DL124 = DAPBOOLS
008893,000187: 05,2153 E6,1422 DL125 = OMEGAQ # LMORBM05
008894,000188: 05,2153 E6,1423 DL126 = OMEGAR
008895,000189: 05,2153 E6,1635 DL127 = CDUYD
008896,000190: 05,2153 E6,1636 DL128 = CDUZD
008897,000191: 05,2153 0000033 DL129 = CDUY
008898,000192: 05,2153 0000034 DL130 = CDUZ
008899,000193: 05,2153 0000035 DL131 = CDUT
008900,000194: 05,2153 E6,1425 DL132 = ALPHAR
008901,000195: 05,2153 E6,1514 DL133 = NEGTORKP
008902,000196:
|
|
Page 208 |
008904,000198: # LM COAST AND ALIGNMENT DOWNLIST
008905,000199:
008906,000200: # ----------------- CONTROL LIST --------------------------
008907,000201:
008908,000202: 05,2153 COSTALIN EQUALS # SEND ID BY SPECIAL CODING
008909,000203: 05,2153 32107 DNPTR LMCSTA01 # COLLECT SNAPSHOT
008910,000204: 05,2154 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008911,000205: 05,2155 03371 1DNADR AGSK # AGSK,+1
008912,000206: 05,2156 02774 1DNADR TALIGN # TALIGN,+1
008913,000207: 05,2157 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
008914,000208: 05,2160 01330 1DNADR DNRRANGE # DNRRANGE,DNRRDOT
008915,000209: 05,2161 01341 1DNADR TEVENT # TEVENT,+1
008916,000210: 05,2162 25731 6DNADR REFSMMAT # REFSMMAT+0...+11D
008917,000211: 05,2163 01235 1DNADR AOTCODE # AOTCODE,GARBAGE
008918,000212: 05,2164 12020 3DNADR RLS # RLS+0...+5
008919,000213: 05,2165 05333 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT
008920,000214: 05,2166 13700 3DNADR VGTIG # VGTIGX,Y,Z
008921,000215: 05,2167 32116 DNPTR LMCSTA02 # COMMON DATA
008922,000216: 05,2170 00024 1DNADR TIME2 # TIME2/1
008923,000217: 05,2171 32125 DNPTR LMCSTA03 # COLLECT SNAPSHOT
008924,000218: 05,2172 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008925,000219: 05,2173 32134 DNPTR LMCSTA04 # COMMON DATA
008926,000220: 05,2174 32215 DNPTR LMCSTA07 # COMMON DATA
008927,000221: 05,2175 01355 1DNADR SERVDURN # SERVDURN,DUMLOOPS
008928,000222: 05,2176 01516 1DNADR TET # TET,+1
008929,000223: 05,2177 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
008930,000224: 05,2200 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008931,000225: 05,2201 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
008932,000226: 05,2202 01277 1DNADR IMODES30 # IMODES30,IMODES33
008933,000227: 05,2203 03441 1DNADR TIG # TIG,+1
008934,000228: 05,2204 32207 DNPTR LMCSTA05 # COMMON DATA
008935,000229: 05,2205 32144 DNPTR LMCSTA10 # COMMON DATA
008936,000230: 05,2206 52755 -6DNADR DSPTAB # DSPTAB+0...+11D TABLE
008937,000231:
008938,000232: # ----------------- SUB-LISTS ----------------------------
008939,000233:
008940,000234: 05,2207 05,2107 LMCSTA01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
008941,000235:
008942,000236: 05,2207 05,2116 LMCSTA02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
008943,000237:
008944,000238: 05,2207 05,2125 LMCSTA03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
008945,000239:
008946,000240: 05,2207 05,2134 LMCSTA04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
008947,000241:
008948,000242: 05,2207 07021 LMCSTA05 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE
008949,000243: 05,2210 07234 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE
008950,000244: 05,2211 04032 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT
008951,000245: 05,2212 76520 -1DNADR CH5MASK # CH5MASK,CH6MASK COMMON DATA
008952,000246:
008953,000247: 05,2213 05700 LMCSTA06 2DNADR X789 # X789+0...+3 COMMON DATA
008954,000248:
|
|
Page 209 |
008956,000250: 05,2214 77665 -1DNADR LASTYCMD # LASTYCMD,LASTXCMD
008957,000251:
008958,000252: 05,2215 12737 LMCSTA07 3DNADR OGC # OGC,+1,IGC,+1,MGC,+1 COMMON DATA
008959,000253: 05,2216 02755 1DNADR BESTI # BESTI,BESTJ
008960,000254: 05,2217 12760 3DNADR STARSAV1 # STARSAV1+0...+5
008961,000255: 05,2220 65011 -3DNADR STARSAV2 # STARSAV2+0...+5
008962,000256:
008963,000257: 05,2221 05,2144 LMCSTA10 EQUALS LMORB10 # COMMON DOWNLIST DATA
008964,000258:
008965,000259: # ---------------------------------------------------------
008966,000260: # *** UNREFERENCED LOCATIONS USED IN LIST 2
008967,000261: # *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS.
008968,000262:
008969,000263: # LOCATION LIST NAME
008970,000264: 05,2221 E6,1516 DL201 = NEGTORKU # COSTALIN
008971,000265: 05,2221 E6,1517 DL202 = POSTORKV
008972,000266: 05,2221 E6,1520 DL203 = NEGTORKV
008973,000267: 05,2221 1331 DL204 = DNRRDOT
008974,000268: 05,2221 1334 DL205 = DNLRVELY
008975,000269: 05,2221 1335 DL206 = DNLRVELZ
008976,000270: 05,2221 1336 DL207 = DNLRALT
008977,000271: 05,2221 0000025 DL208 = TIME1
008978,000272: 05,2221 1356 DL209 = DUMLOOPS
008979,000273: 05,2221 0000037 DL210 = PIPAX
008980,000274: 05,2221 0000040 DL211 = PIPAY
008981,000275: 05,2221 0000041 DL212 = PIPAZ
008982,000276: 05,2221 0113 DL213 = LASTXCMD
008983,000277: 05,2221 1327 DL214 = CSMMASS
008984,000278: 05,2221 1300 DL215 = IMODES33
008985,000279: 05,2221 0113 DL216 = LASTXCMD # LMCSTA06
008986,000280: 05,2221 E5,1741 DL217 = IGC # LMCSTA07
008987,000281: 05,2221 E5,1743 DL218 = MGC
008988,000282: 05,2221 E5,1756 DL219 = BESTJ
008989,000283: 05,2221 1260 DL220 = CH6MASK
008990,000284:
|
|
Page 210 |
008992,000286: # LM RENDEZVOUS AND PRE-THRUST DOWNLIST
008993,000287:
008994,000288: # ----------------- CONTROL LIST --------------------------
008995,000289:
008996,000290: 05,2221 RENDEZVU EQUALS # SEND ID BY SPECIAL CODING
008997,000291: 05,2221 32107 DNPTR LMREND01 # COLLECT SNAPSHOT
008998,000292: 05,2222 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
008999,000293: 05,2223 32265 DNPTR LMREND07 # COLLECT SNAPSHOT
009000,000294: 05,2224 32275 DNPTR LMREND08 # SEND SNAPSHOT
009001,000295: 05,2225 03451 1DNADR DELLT4 # DELLT4,+1
009002,000296: 05,2226 13433 3DNADR DELVSLV # DELVSLV+0...+5
009003,000297: 05,2227 03633 1DNADR TCSI # TCSI,+1
009004,000298: 05,2230 12257 3DNADR DELVEET1 # DELVEET+0...+5
009005,000299: 05,2231 01355 1DNADR SERVDURN # SERVDURN,DUMLOOPS
009006,000300: 05,2232 03630 1DNADR TPASS4 # TPASS4,+1
009007,000301: 05,2233 32213 DNPTR LMREND06 # COMMON DATA
009008,000302: 05,2234 32116 DNPTR LMREND02 # COMMON DATA
009009,000303: 05,2235 00024 1DNADR TIME2 # TIME2/1
009010,000304: 05,2236 32125 DNPTR LMREND03 # COLLECT SNAPSHOT
009011,000305: 05,2237 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
009012,000306: 05,2240 32134 DNPTR LMREND04 # COMMON DATA
009013,000307: 05,2241 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009014,000308: 05,2242 01363 1DNADR ALMCADR # ALMCADR,+1
009015,000309: 05,2243 01774 1DNADR TCDH # TCDH,+1
009016,000310: 05,2244 12265 3DNADR DELVEET2 # DELVEET2+0...+5
009017,000311: 05,2245 03635 1DNADR TTPI # TTPI,+1
009018,000312: 05,2246 12356 3DNADR DELVEET3 # DELVEET3+0...+5
009019,000313: 05,2247 02247 1DNADR ELEV # ELEV,+1
009020,000314: 05,2250 04036 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ
009021,000315: 05,2251 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
009022,000316: 05,2252 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
009023,000317: 05,2253 01277 1DNADR IMODES30 # IMODES30,IMODES33
009024,000318: 05,2254 03441 1DNADR TIG # TIG,+1
009025,000319: 05,2255 32207 DNPTR LMREND05 # COMMON DATA
009026,000320: 05,2256 32144 DNPTR LMREND10 # COMMON DATA
009027,000321: 05,2257 01516 1DNADR TET # TET,+1
009028,000322: 05,2260 03620 1DNADR CENTANG # CENTANG,+1
009029,000323: 05,2261 03466 1DNADR NN # NN,+1
009030,000324: 05,2262 03577 1DNADR DIFFALT # DIFFALT,+1
009031,000325: 05,2263 02340 1DNADR DELVTPF # DELVTPF,+1
009032,000326: 05,2264 77770 -1DNADR SPARE
009033,000327:
009034,000328: # ----------------- SUB-LISTS ----------------------------
009035,000329:
009036,000330: 05,2265 05,2107 LMREND01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
009037,000331:
009038,000332: 05,2265 05,2116 LMREND02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
009039,000333:
009040,000334: 05,2265 05,2125 LMREND03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
009041,000335:
|
|
Page 211 |
009043,000337: 05,2265 05,2134 LMREND04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
009044,000338:
009045,000339: 05,2265 05,2207 LMREND05 EQUALS LMCSTA05 # COMMON DOWNLIST DATA
009046,000340:
009047,000341: 05,2265 05,2213 LMREND06 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
009048,000342:
009049,000343: 05,2265 74320 LMREND07 -1DNADR AIG # AIG,AMG SNAPSHOT
009050,000344: 05,2266 03461 1DNADR AOG # AOG,TRKMKCNT
009051,000345: 05,2267 03752 1DNADR TANGNB # TANGNB,+1
009052,000346: 05,2270 03753 1DNADR TANGNB +1 # TANGNB+1,GARBAGE
009053,000347: 05,2271 03760 1DNADR RANGRDOT # RANGRDOT, +1
009054,000348: 05,2272 03761 1DNADR RANGRDOT +1 # RANGERDOT +1,GARBAGE
009055,000349: 05,2273 01073 1DNADR AGSCODE # AGSCODE,GARBAGE
009056,000350: 05,2274 74023 -1DNADR MKTIME # MKTIME,+1
009057,000351: 05,2275 24340 LMREND08 6DNADR DNTMBUFF # SEND SNAPSHOT
009058,000352: 05,2276 77423 -1DNADR DNTMBUFF +12D # SEND SNAPSHOT
009059,000353: 05,2277 05,2144 LMREND10 EQUALS LMORB10 # COMMON DATA
009060,000354:
009061,000355: # -----------------------------------------------------------
009062,000356: # *** UNREFERENCED LOCATIONS USED IN LIST 3
009063,000357: # LOCATION LIST NAME
009064,000358:
009065,000359: # *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS.
009066,000360:
009067,000361:
009068,000362: 05,2277 1356 DL301 = DUMLOOPS # RENDEZVU
009069,000363: 05,2277 0000025 DL302 = TIME1
009070,000364: 05,2277 E6,1516 DL303 = NEGTORKU
009071,000365: 05,2277 E6,1517 DL304 = POSTORKV
009072,000366: 05,2277 E6,1520 DL305 = NEGTORKV
009073,000367: 05,2277 0000037 DL306 = PIPAX
009074,000368: 05,2277 0000040 DL307 = PIPAY
009075,000369: 05,2277 0000041 DL308 = PIPAZ
009076,000370: 05,2277 0113 DL309 = LASTXCMD
009077,000371: 05,2277 1327 DL310 = CSMMASS
009078,000372: 05,2277 1300 DL311 = IMODES33
009079,000373: 05,2277 E7,1460 DL312 = AMG # LMREND07
009080,000374: 05,2277 E7,1462 DL313 = TRKMKCNT
009081,000375: 05,2277 1331 DL314 = DNRRDOT
009082,000376:
|
|
Page 212 |
009084,000378: # LM DESCENT AND ASCENT DOWNLIST
009085,000379:
009086,000380: # ----------------- CONTROL LIST --------------------------
009087,000381:
009088,000382: 05,2277 DESC/ASC EQUALS # SEND ID BY SPECIAL CODING
009089,000383: 05,2277 01363 1DNADR ALMCADR # ALMCADR,+1
009090,000384: 05,2300 32347 DNPTR LMDSAS08 # COLLECT SNAPSHOT
009091,000385: 05,2301 10340 3DNADR DNTMBUFF # SNED SNAPSHOT
009092,000386: 05,2302 32340 DNPTR LMDSAS07 # COLLECT SNAPSHOT
009093,000387: 05,2303 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
009094,000388: 05,2304 01341 1DNADR TEVENT # TEVENT,+1
009095,000389: 05,2305 13251 3DNADR UNFC/2 # UNFC/2+0...+5
009096,000390: 05,2306 13645 3DNADR VGVECT # VGVECT+0...+5
009097,000391: 05,2307 03642 1DNADR TTF/8 # TTF/8,+1
009098,000392: 05,2310 00007 1DNADR SPARE
009099,000393: 05,2311 12020 3DNADR RLS # RLS+0...+5
009100,000394: 05,2312 02267 1DNADR ZDOTD # ZDOTD,+1
009101,000395: 05,2313 32213 DNPTR LMDSAS09 # COMMON DATA
009102,000396: 05,2314 32116 DNPTR LMDSAS02 # COMMON DATA
009103,000397: 05,2315 00024 1DNADR TIME2 # TIME2/1
009104,000398: 05,2316 32125 DNPTR LMDSAS03 # COLLECT SNAPSHOT
009105,000399: 05,2317 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
009106,000400: 05,2320 32134 DNPTR LMDSAS04 # COMMON DATA
009107,000401: 05,2321 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009108,000402: 05,2322 12623 3DNADR RGU # RGU+0...+5
009109,000403: 05,2323 13626 3DNADR VGU # VGU+0...+5
009110,000404: 05,2324 13634 3DNADR LAND # LAND+0...+5
009111,000405: 05,2325 02253 1DNADR AT # AT,+1
009112,000406: 05,2326 02026 1DNADR TLAND # TLAND,+1
009113,000407: 05,2327 03507 1DNADR DVTOTAL # DVTOTAL,+1
009114,000408: 05,2330 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
009115,000409: 05,2331 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
009116,000410: 05,2332 01277 1DNADR IMODES30 # IMODES30,IMODES33
009117,000411: 05,2333 03441 1DNADR TIG # TIG,+1
009118,000412: 05,2334 32140 DNPTR LMDSAS05 # COMMON DATA
009119,000413: 05,2335 32151 DNPTR LMDSAS06 # COMMON DATA
|
|
Note: the two lines above have vertical black pencil/pen marks having the
pseudo operator and its operand between them .i.e.
|DNPTR LMDSAS05| # COMMON DATA
|DNPTR LMDSAS06| # COMMON DATA
|
009126,000420: 05,2336 03614 1DNADR PSEUDO55 # PSEUDO55,GARBAGE
009127,000421: 05,2337 74324 -1DNADR TTOGO # TTOGO,+1
009128,000422: # ----------------- SUB-LISTS ----------------------------
009129,000423:
009130,000424: 05,2340 05,2116 LMDSAS02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
009131,000425:
009132,000426: 05,2340 05,2125 LMDSAS03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
009133,000427:
009134,000428: 05,2340 05,2134 LMDSAS04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
009135,000429:
009136,000430: 05,2340 05,2140 LMDSAS05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
009137,000431:
009138,000432: 05,2340 05,2151 LMDSAS06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
|
|
Note: the two lines statements above have a vertical brace in black pencil/pen betweem operand and comment column opening to the left |
009141,000435:
|
|
Page 213 |
009143,000437: 05,2340 74001 LMDSAS07 -1DNADR HMEASDL # HMEASDL,+1
009144,000438: 05,2341 03652 1DNADR VMEAS # VMEAS,+1
009145,000439: 05,2342 03457 1DNADR AIG # AIG,AMG
009146,000440: 05,2343 03461 1DNADR AOG # AOG,VSELECT
009147,000441: 05,2344 03732 1DNADR LATVMETR # LATVMETR,FORVMETR
009148,000442: 05,2345 01355 1DNADR SERVDURN # SERVDURN,DUMLOOPS
009149,000443: 05,2346 74023 -1DNADR MKTIME # MKTIME,+1
009150,000444:
009151,000445: 05,2347 74113 LMDSAS08 -1DNADR DELTAH # DELTAH,+1
009152,000446: 05,2350 03615 1DNADR FC # FC,+1
009153,000447: 05,2351 03752 1DNADR GTCTIME # GTCTIME,+1
009154,000448: 05,2352 74041 -1DNADR TRUDELH # TRUDELH,+1
009155,000449:
009156,000450: 05,2353 05,2213 LMDSAS09 EQUALS LMCSTA06 # COMMON DOWNLIST DATA
009157,000451:
009158,000452: # ---------------------------------------------------------
009159,000453:
009160,000454: # *** UNREFERENCED LOCATIONS USED IN LIST 4
009161,000455: # *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS.
009162,000456:
009163,000457:
009164,000458: # LOCATION LIST NAME
009165,000459:
009166,000460: 05,2353 0000025 DL401 = TIME1 # DESC/ASC
009167,000461: 05,2353 E6,1516 DL402 = NEGTORKU
009168,000462: 05,2353 E6,1517 DL403 = POSTORKV
009169,000463: 05,2353 E6,1520 DL404 = NEGTORKV
009170,000464: 05,2353 0113 DL405 = LASTXCMD
009171,000465: 05,2353 1327 DL406 = CSMMASS
009172,000466: 05,2353 1300 DL407 = IMODES33
009173,000467: 05,2353 E7,1460 DL408 = AMG # LMDSAS07
009174,000468: 05,2353 E7,1462 DL409 = VSELECT
009175,000469: 05,2353 E7,1733 DL410 = FORVMETR
009176,000470: 05,2353 1356 DL411 = DUMLOOPS
009177,000471:
|
|
Page 214 |
009179,000473: # LM LUNAR SURFACE ALIGN DOWNLIST
009180,000474:
009181,000475: # ----------------- CONTROL LIST --------------------------
009182,000476:
009183,000477: 05,2353 SURFALIN EQUALS # SEND ID BY SPECIAL CODING
009184,000478: 05,2353 32107 DNPTR LMLSAL01 # COLLECT SNAPSHOT
009185,000479: 05,2354 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
009186,000480: 05,2355 32407 DNPTR LMLSAL07 # COLLECT SNAPSHOT
009187,000481: 05,2356 14340 4DNADR DNTMBUFF # SEND SHAPSHOT
009188,000482: 05,2357 02774 1DNADR TALIGN # TALIGN,+1
009189,000483: 05,2360 25731 6DNADR REFSMMAT # REFSMMAT+0...+11D
009190,000484: 05,2361 26227 6DNADR YNBSAV # YNBSAV+0...+5,ZNBSAV+0...+5
009191,000485: 05,2362 01700 1DNADR X789 # X789,+1
009192,000486: 05,2363 01516 1DNADR TET # TET,+1
009193,000487: 05,2364 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
009194,000488: 05,2365 32116 DNPTR LMLSAL02 # COMMON DATA
009195,000489: 05,2366 00024 1DNADR TIME2 # TIME/1
009196,000490: 05,2367 32125 DNPTR LMLSAL03 # COLLECT SNAPSHOT
009197,000491: 05,2370 24340 6DNADR DNTMBUFF # SEND SHAPSHOT
009198,000492: 05,2371 32134 DNPTR LMLSAL04 # COMMON DATA
009199,000493: 05,2372 32215 DNPTR LMLSAL08 # COMMON DATA
009200,000494: 05,2373 12221 3DNADR GSAV # GSAV +0...+5
009201,000495: 05,2374 03371 1DNADR AGSK # AGSK,+1
009202,000496: 05,2375 00112 1DNADR LASTYCMD # LASTYCMD,LASTXCMD
009203,000497: 05,2376 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
009204,000498: 05,2377 01277 1DNADR IMODES30 # IMODES30,IMODES33
009205,000499: 05,2400 03441 1DNADR TIG # TIG,+1
009206,000500: 05,2401 32207 DNPTR LMSAL05 # COMMON DATA
009207,000501: 05,2402 01235 1DNADR AOTCODE # AOTCODE,GARBAGE
009208,000502: 05,2403 32145 DNPTR LMLSAL09 # COMMON DATA
009209,000503: 05,2404 32151 DNPTR LMLSAL06 # COMMON DATA
009210,000504: 05,2405 03561 1DNADR TSIGHT # TSIGHT,TSIGHT +1
009211,000505: 05,2406 76537 -1DNADR CURSOR # AOT CURSOR,SPIRAL
009212,000506: # ----------------- SUB-LISTS ----------------------------
009213,000507:
009214,000508: 05,2407 05,2107 LMLSAL01 EQUALS LMORBM01 # COMMON DOWNLIST DATA
009215,000509:
009216,000510: 05,2407 05,2116 LMLSAL02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
009217,000511:
009218,000512: 05,2407 05,2125 LMLSAL03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
009219,000513:
009220,000514: 05,2407 05,2134 LMLSAL04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
009221,000515:
009222,000516: 05,2407 05,2207 LMSAL05 EQUALS LMCSTA05 # COMMON DOWNLIST DATA
009223,000517:
009224,000518: 05,2407 05,2151 LMLSAL06 EQUALS LMORBM06 # COMMON DOWNLIST DATA
009225,000519:
009226,000520: 05,2407 74320 LMLSAL07 -1DNADR AIG # AIG,AMG SNAPSHOT
009227,000521: 05,2410 03461 1DNADR AOG # AOG,TRKMKCNT
009228,000522: 05,2411 03752 1DNADR TANGNB # TANGNB,+1
009229,000523:
|
|
Page 215 |
009231,000525: 05,2412 03754 1DNADR MKTIME # MKTIME,+1
009232,000526: 05,2413 74017 -1DNADR RANGRDOT # DNRRANGE,DNRRDOT
009233,000527:
009234,000528: 05,2414 05,2215 LMLSAL08 EQUALS LMCSTA07 # COMMON DOWNLIST DATA
009235,000529: 05,2414 05,2145 LMLSAL09 EQUALS LMORBM09 # COMMON DOWNLIST DATA
009236,000530: # ---------------------------------------------------------
009237,000531: # *** UNREFERENCED LOCATIONS USED IN LIST 5
009238,000532: # *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS.
009239,000533:
009240,000534:
009241,000535: # LOCATION LIST NAME
009242,000536:
009243,000537: 05,2414 E4,1635 DL501 = ZNBSAV # SURFALIN
009244,000538: 05,2414 0113 DL502 = LASTXCMD
009245,000539: 05,2414 0000025 DL503 = TIME1
009246,000540: 05,2414 0113 DL504 = LASTXCMD
009247,000541: 05,2414 1327 DL505 = CSMMASS
009248,000542: 05,2414 1300 DL506 = IMODES33
009249,000543: 05,2414 E6,1422 DL507 = OMEGAQ
009250,000544: 05,2414 E6,1423 DL508 = OMEGAR
009251,000545: 05,2414 E6,1635 DL509 = CDUYD
009252,000546: 05,2414 E6,1636 DL510 = CDUZD
009253,000547: 05,2414 0000033 DL511 = CDUY
009254,000548: 05,2414 0000034 DL512 = CDUZ
009255,000549: 05,2414 0000035 DL513 = CDUT
|
|
Note: The line above has a black pen arrow pointing at "CDUT" from the right
CDUT ←
|
009260,000554: 05,2414 E6,1425 DL514 = ALPHAR
009261,000555: 05,2414 1241 DL515 = SPIRAL
009262,000556: 05,2414 E7,1460 DL516 = AMG # LMSAL07
009263,000557: 05,2414 E7,1462 DL517 = TRKMKCNT
009264,000558: 05,2414 1331 DL518 = DNRRDOT
009265,000559:
|
|
Page 216 |
009267,000561: # LM AGS INITIALIZATION AND UPDATE DOWNLIST
009268,000562:
009269,000563: # ----------------- CONTROL LIST --------------------------
009270,000564:
009271,000565: 05,2414 AGSI/UPD EQUALS # SEND IO BY SPECIAL CODING
009272,000566: 05,2414 12171 3DNADR AGSBUFF +0 # AGSBUFF+0...+5
009273,000567: 05,2415 02205 1DNADR AGSBUFF +12D # AGSBUFF+12D,GARBAGE
009274,000568: 05,2416 12172 3DNADR AGSBUFF +1 # AGSBUFF+1...+6
009275,000569: 05,2417 02206 1DNADR AGSBUFF +13D # AGSBUFF+13D, GARBAGE
009276,000570: 05,2420 12177 3DNADR AGSBUFF +6 # AGSBUFF+6...+11
009277,000571: 05,2421 02205 1DNADR AGSBUFF +12D # AGSBUFF+12,GARBAGE
009278,000572: 05,2422 12200 3DNADR AGSBUFF +7 # AGSBUFF+7...+12D
009279,000573: 05,2423 02206 1DNADR AGSBUFF +13D # AGSBUFF+13D,GARBAGE
009280,000574: 05,2424 25167 6DNADR COMPNUMB # COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT,
009281,000575: # UPBUFF+0...+7
009282,000576: 05,2425 25203 6DNADR UPBUFF +8D # UPBUFF +8D...+19D
009283,000577: 05,2426 32116 DNPTR LMAGSI02 # COMMON DATA
009284,000578: 05,2427 00024 1DNADR TIME2 # TIME2/1
009285,000579: 05,2430 32125 DNPTR LMAGSI03 # COLLECT SNAPSHOT
009286,000580: 05,2431 24340 6DNADR DNTMBUFF # SEND SNAPSHOT
009287,000581: 05,2432 32134 DNPTR LMAGSI04 # COMMON DATA
009288,000582: 05,2433 07115 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV
009289,000583: 05,2434 01355 1DNADR SERVDURN # SERVDURN,DUMLOOPS
009290,000584: 05,2435 01363 1DNADR ALMCADR # ALMCADR,+1
009291,000585: 05,2436 03371 1DNADR AGSK # AGSK,+1
009292,000586: 05,2437 25173 6DNADR UPBUFF # UPBUFF+0...+11D
009293,000587: 05,2440 15207 4DNADR UPBUFF +12D # UPBUFF+12D...+19D
009294,000588: 05,2441 01326 1DNADR LEMMASS # LEMMASS,CSMMASS
009295,000589: 05,2442 01277 1DNADR IMODES30 # IMODES30,IMODES33
009296,000590: 05,2443 00007 1DNADR SPARE
009297,000591: 05,2444 32140 DNPTR LMAGSI05 # COMMON DATA
009298,000592: 05,2445 52755 -6DNADR DSPTAB # DSPTAB+0...+11D
009299,000593:
009300,000594: # ----------------- SUB-LISTS ----------------------------
009301,000595:
009302,000596: 05,2446 05,2116 LMAGSI02 EQUALS LMORBM02 # COMMON DOWNLIST DATA
009303,000597:
009304,000598: 05,2446 05,2125 LMAGSI03 EQUALS LMORBM03 # COMMON DOWNLIST DATA
009305,000599:
009306,000600: 05,2446 05,2134 LMAGSI04 EQUALS LMORBM04 # COMMON DOWNLIST DATA
009307,000601:
009308,000602: 05,2446 05,2140 LMAGSI05 EQUALS LMORBM05 # COMMON DOWNLIST DATA
009309,000603:
009310,000604: # ------------------------------------------------------
009311,000605:
009312,000606: # *** UNREFERENCED LOCATIONS USED IN LIST 6
009313,000607: # *** UPDATE THIS LIST WHEN ANY CHANGES ARE MADE TO DOWNLINK LISTS.
009314,000608:
009315,000609: # LOCATION LIST NAME
009316,000610:
|
|
Page 217 |
009318,000612: 05,2446 1170 DL601 = UPOLDMOD # AGSI/UPD
009319,000613: 05,2446 1171 DL602 = UPVERB
009320,000614: 05,2446 1172 DL603 = UPCOUNT
009321,000615: 05,2446 1173 DL604 = UPBUFF
009322,000616: 05,2446 0000025 DL605 = TIME1
009323,000617: 05,2446 E6,1516 DL606 = NEGTORKU
009324,000618: 05,2446 E6,1517 DL607 = POSTORKV
009325,000619: 05,2446 E6,1520 DL608 = NEGTORKV
009326,000620: 05,2446 1356 DL609 = DUMLOOPS
009327,000621: 05,2446 1327 DL610 = CSMMASS
009328,000622: 05,2446 1300 DL611 = IMODES33
009329,000623: # -------------------------------------------------------------------
009330,000624: 05,2446 02153 DNTABLE GENADR COSTALIN # LM COAST AND ALIGN DOWNLIST
009331,000625: 05,2447 02414 GENADR AGSI/UPD # LM AGS INITIALIZATION/UPDATE DOWNLIST
009332,000626: 05,2450 02221 GENADR RENDEZVU # LM RENDEZVOUS AND PRETHRUST DOWNLIST
009333,000627: 05,2451 02046 GENADR ORBMANUV # LM ORBITAL MANEUVERS DOWNLIST
009334,000628: 05,2452 02277 GENADR DESC/ASC # LM DESCENT AND ASCENT DOWNLIST
009335,000629: 05,2453 02353 GENADR SURFALIN # LM LUNAR SURFACE ALIGN DOWNLIST
009336,000630: # ----------------------------------------------------------
009337,000631:
009338,000632:
End of include-file DOWNLINK_LISTS.agc. Parent file is MAIN.agc