# Copyright: Public domain. # Filename: DOWNLINK_LISTS.agc # Purpose: Part of the source code for Luminary 1A build 099. # It is part of the source code for the Lunar Module's (LM) # Apollo Guidance Computer (AGC), for Apollo 11. # Assembler: yaYUL # Contact: Hartmuth Gutsche . # Website: www.ibiblio.org/apollo. # Pages: 193-205 # Mod history: 2009-05-19 HG Transcribed from page images. # # This source code has been transcribed or otherwise adapted from # digitized images of a hardcopy from the MIT Museum. The digitization # was performed by Paul Fjeld, and arranged for by Deborah Douglas of # the Museum. Many thanks to both. The images (with suitable reduction # in storage size and consequent reduction in image quality as well) are # available online at www.ibiblio.org/apollo. If for some reason you # find that the images are illegible, contact me at info@sandroid.org # about getting access to the (much) higher-quality images which Paul # actually created. # # Notations on the hardcopy document read, in part: # # Assemble revision 001 of AGC program LMY99 by NASA 2021112-061 # 16:27 JULY 14, 1969 # Page 193 BANK 22 SETLOC DOWNTELM BANK EBANK= DNTMBUFF # SPECIAL DOWNLINK OP CODES # OP CODE ADDRESS (EXAMPLE) SENDS... BIT 15 BITS 14-12 BITS 11-0 # ------- ----------------- -------- ------ ---------- --------- # 1DNADR TIME2 (2 AGC WDS) 0 0 ECADR # 2DNADR TEPHEM (4 AGC WDS) 0 1 ECADR # 3DNADR VGBODY (6 AGC WDS) 0 2 ECADR # 4DNADR STATE (8 AGC WDS) 0 3 ECADR # 5DNADR UPBUFF (10 AGC WDS) 0 4 ECADR # 6DNADR DSPTAB (12 AGC WDS) 0 5 ECADR # DNCHAN 30 CHANNELS 0 7 CHANNEL # ADDRESS # DNPTR NEXTLIST POINTS TO NEXT 0 6 ADRES # LIST # # DOWNLIST FORMAT DEFINITIONS AND RULES -- # 1. END OF A LIST = -XDNADR (X = 1 TO 6), -DNPTR, OR -DNCHAN. # 2. SNAPSHOT SUBLIST = LIST WHICH STARTS WITH A -1DNADR. # 3. SNAPSHOT SUBLIST CAN ONLY CONTAIN 1DNADRS. # 4. TIME2 1DNADR MUST BE LOCATED IN THE CONTROL LIST OF A DOWNLIST. # 5. ERASABLE DOWN TELEMETRY WORDS SHOULD BE GROUPED IN SEQUENTIAL # LOCATIONS AS MUCH AS POSSIBLE TO SAVE STORAGE USED BY DOWNLINK LISTS. COUNT* $$/DLIST ERASZERO EQUALS 7 UNKNOWN EQUALS ERASZERO SPARE EQUALS ERASZERO # USE SPARE TO INDICATE AVAILABLE SPACE LOWIDCOD OCT 77340 # LOW ID CODE NOMDNLST EQUALS LMCSTADL # FRESH START AND POST P27 DOWNLIST AGSLIST EQUALS LMAGSIDL UPDNLIST EQUALS LMAGSIDL # UPDATE PROGRAM (P27) DOWNLIST # Page 194 # LM ORBITAL MANEUVERS LIST # # --------------------- CONTROL LIST ------------------------- LMORBMDL EQUALS # SEND ID BY SPECIAL CODING DNPTR LMORBM01 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT 1DNADR DELLT4 # DELLT4,+1 3DNADR RTARG # RTARG,+1...+5 1DNADR ELEV # ELEV,+1 1DNADR TEVENT # TEVENT,+1 6DNADR REFSMMAT # REFSMMAT +0...+11D 1DNADR TCSI # TCSI,+1 3DNADR DELVEET1 # DELVEET1 +0...+5 3DNADR VGTIG # VGTIG +0...+5 1DNADR DNLRVELZ # DNLRVELZ,DNLRALT 1DNADR TPASS4 # TPASS4,+1 DNPTR LMORBM02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMORBM03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMORBM04 # COMMON DATA 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV 1DNADR SPARE 1DNADR TCDH # TCDH,+1 3DNADR DELVEET2 # DELVEET2 +0...+5 1DNADR TTPI # TTPI,+1 3DNADR DELVEET3 # DELVEET3 +0...+5 1DNADR DNRRANGE # DNRRANGE,DNRRDOT 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT 1DNADR DIFFALT # DIFFALT,+1 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR TIG # TIG,+1 DNPTR LMORBM05 # COMMON DATA DNPTR LMORBM06 # COMMON DATA 1DNADR SPARE # FORMERLY PIF -1DNADR TGO # TGO,+1 # --------------------- SUB-LISTS --------------------------- LMORBM01 -1DNADR R-OTHER +2 # R-OTHER +2,+3 SNAPSHOT 1DNADR R-OTHER +4 # R-OTHER +4,+5 1DNADR V-OTHER # V-OTHER,+1 1DNADR V-OTHER +2 # V-OTHER +2,+3 1DNADR V-OTHER +4 # V-OTHER +4,+5 1DNADR T-OTHER # T-OTHER,+1 -1DNADR R-OTHER # R-OTHER +0,+1 LMORBM02 2DNADR REDOCTR # REDOCTR,THETAD,+1,+2 COMMON DATA # Page 195 1DNADR RSBBQ # RSBBQ,+1 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT 6DNADR STATE # STATE +0...+11D (FLAGWORDS) -6DNADR DSPTAB # DSPTAB TABLES LMORBM03 -1DNADR RN +2 # RN +2,+3 SNAPSHOT 1DNADR RN +4 # RN +4,+5 1DNADR VN # VN,+1 1DNADR VN +2 # VN +2,+3 1DNADR VN +4 # VN +4,+5 1DNADR PIPTIME # PIPTIME,+1 -1DNADR RN # RN,+1 LMORBM04 2DNADR OMEGAPD # OMEGAPD,OMEGAQD,OMEGARD,GARBAGE 3DNADR CADRFLSH # CADRFLSH,+1,+2,FAILREG,+1,+2 -1DNADR RADMODES # RADMODES,DAPBOOLS COMMON DATA LMORBM05 2DNADR OMEGAP # OMEGAP,OMEGAQ,OMEGAR,GARBAGE 2DNADR CDUXD # CDUXD,CDUYD,CDUZD,GARBAGE 2DNADR CDUX # CDUX,CDUY,CDUZ,CDUT 1DNADR ALPHAQ # ALPHAQ,ALPHAR COMMON DATA 1DNADR POSTORKP # POSTORKP,NEGTORKP DNCHAN 11 # CHANNELS 11,12 DNCHAN 13 # CHANNELS 13,14 DNCHAN 30 # CHANNELS 30,31 -DNCHAN 32 # CHANNELS 32,33 LMORBM06 1DNADR PIPTIME1 # PIPTIME,+1 COMMON DATA -3DNADR DELV # DELV +0...+5 # -------------------------------------------------------------------- # Page 196 # LM COAST AND ALIGNMENT DOWNLIST # # ---------------------- CONTROL LIST -------------------------------- LMCSTADL EQUALS # SEND ID BY SPECIAL CODING DNPTR LMCSTA01 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT 1DNADR AGSK # AGSK,+1 1DNADR TALIGN # TALIGN,+1 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV 1DNADR DNRRANGE # DNRRANGE,DNRRDOT 1DNADR TEVENT # TEVENT,+1 6DNADR REFSMMAT # REFSMMAT +0...+11D 1DNADR AOTCODE # AOTCODE,GARBAGE 3DNADR RLS # RLS +0...+5 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT DNPTR LMCSTA06 # COMMON DATA DNPTR LMCSTA02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMCSTA03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMCSTA04 # COMMON DATA DNPTR LMCSTA07 # COMMON DATA 2DNADR DNLRVELX # DNLRVELX,DNLRVELY,DNLRVELZ,DNLRALT 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ 1DNADR LASTYCMD # LASTYCMD,LASTXCMD 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR TIG # TIG,+1 DNPTR LMCSTA05 # COMMON DATA -6DNADR DSPTAB # DSPTAB +0...+11D TABLE # ---------------------- SUB-LISTS -------------------------- LMCSTA01 EQUALS LMORBM01 # COMMON DOWNLIST DATA LMCSTA02 EQUALS LMORBM02 # COMMON DOWNLIST DATA LMCSTA03 EQUALS LMORBM03 # COMMON DOWNLIST DATA LMCSTA04 EQUALS LMORBM04 # COMMON DOWNLIST DATA LMCSTA05 EQUALS LMORBM05 # COMMON DOWNLIST DATA LMCSTA06 2DNADR X789 # X789 +0...+3 COMMON DATA -1DNADR LASTYCMD # LASTYCMD,LASTXCMD LMCSTA07 3DNADR OGC # OGC,+1,IGC,+1,MGC,+1 COMMON DATA 1DNADR BESTI # BESTI,BESTJ 3DNADR STARSAV1 # STARSAV1 +0...+5 -3DNADR STARSAV2 # STARSAV2 +0...+5 # Page 197 # ----------------------------------------------------------- # Page 198 # LM RENDEZVOUS AND PRE-THRUST DOWNLIST # # --------------------- CONTROL LIST ------------------------ LMRENDDL EQUALS # SEND ID BY SPECIAL CODING DNPTR LMREND01 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMREND07 # COLLECT SNAPSHOT 4DNADR DNTMBUFF # SEND SNAPSHOT 1DNADR DELLT4 # DELLT4,+1 3DNADR RTARG # RTARG +0...+5 3DNADR DELVSLV # DELVSLV +0...+5 1DNADR TCSI # TCSI,+1 3DNADR DELVEET1 # DELVEET +0...+5 1DNADR SPARE 1DNADR TPASS4 # TPASS4,+1 DNPTR LMREND06 # COMMON DATA DNPTR LMREND02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMREND03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMREND04 # COMMON DATA 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV 1DNADR SPARE 1DNADR TCDH # TCDH,+1 3DNADR DELVEET2 # DELVEET2 +0...+5 1DNADR TTPI # TTPI,+1 3DNADR DELVEET3 # DELVEET3 +0...+5 1DNADR ELEV # ELEV,+1 2DNADR CDUS # CDUS,PIPAX,PIPAY,PIPAZ 1DNADR LASTYCMD # LASTYCMD,LASTXCMD 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR TIG # TIG,+1 DNPTR LMREND05 # COMMON DATA 1DNADR DELTAR # DELTAR,+1 1DNADR CENTANG # CENTANG,+1 1DNADR NN # NN,+1 1DNADR DIFFALT # DIFFALT,+1 1DNADR DELVTPF # DELVTPF,+1 -1DNADR SPARE # --------------------- SUB-LISTS -------------------------- LMREND01 EQUALS LMORBM01 # COMMON DOWNLIST DATA LMREND02 EQUALS LMORBM02 # COMMON DOWNLIST DATA LMREND03 EQUALS LMORBM03 # COMMON DOWNLIST DATA # Page 199 LMREND04 EQUALS LMORBM04 # COMMON DOWNLIST DATA LMREND05 EQUALS LMORBM05 # COMMON DOWNLIST DATA LMREND06 EQUALS LMCSTA06 # COMMON DOWNLIST DATA LMREND07 -1DNADR AIG # AIG,AMG SNAPSHOT 1DNADR AOG # AOG,TRKMKCNT 1DNADR TANGNB # TANGNB,+1 1DNADR MKTIME # MKTIME,+1 -1DNADR RANGRDOT # DNRRANGE,DNRRDOT # ----------------------------------------------------------- # Page 200 # LM DESCENT AND ASCENT DOWNLIST # ---------------------- CONTROL LIST ------------------------ LMDSASDL EQUALS # SEND ID BY SPECIAL CODING DNPTR LMDSAS07 # COLLECT SNAPSHOT DNPTR LMDSAS08 # SEND SNAPSHOT 1DNADR TEVENT # TEVENT,+1 3DNADR UNFC/2 # UNFC/2 +0...+5 3DNADR VGVECT # VGVECT +0...+5 1DNADR TTF/8 # TTF/8,+1 1DNADR DELTAH # DELTAH,+1 3DNADR RLS # RLS +0...+5 1DNADR SPARE DNPTR LMDSAS09 # COMMON DATA DNPTR LMDSAS02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMDSAS03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMDSAS04 # COMMON DATA 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV 3DNADR RGU # RGU +0...+5 3DNADR VGU # VGU +0...+5 3DNADR LAND # LAND +0...+5 1DNADR AT # AT,+1 1DNADR TLAND # TLAND,+1 1DNADR FC # FC,GARBAGE 1DNADR LASTYCMD # LASTYCMD,LASTXCMD 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR TIG # TIG,+1 DNPTR LMDSAS05 # COMMON DATA DNPTR LMDSAS06 # COMMON DATA 1DNADR PSEUDO55 # PSEUDO55,GARBAGE -1DNADR TTOGO # TTOGO,+1 # ---------------------- SUB-LISTS ------------------------ LMDSAS02 EQUALS LMORBM02 # COMMON DOWNLIST DATA LMDSAS03 EQUALS LMORBM03 # COMMON DOWNLIST DATA LMDSAS04 EQUALS LMORBM04 # COMMON DOWNLIST DATA LMDSAS05 EQUALS LMORBM05 # COMMON DOWNLIST DATA LMDSAS06 EQUALS LMORBM06 # COMMON DOWNLIST DATA LMDSAS07 -1DNADR LRZCDUDL # LRZCDUDL,GARBAGE SNAPSHOT 1DNADR VSELECT # VSELECT,GARBAGE 1DNADR LRVTIMDL # LRVTIMDL,+1 # Page 201 1DNADR VMEAS # VMEAS,+1 1DNADR MKTIME # MKTIME,+1 1DNADR HMEAS # HMEAS,+1 1DNADR RM # RM,+1 1DNADR AIG # AIG,AMG 1DNADR AOG # AOG,TRKMKCNT 1DNADR TANGNB # TANGNB,+1 1DNADR MKTIME # MKTIME,+1 -1DNADR LRXCDUDL # LRXCDUDL,LRYCDUDL LMDSAS08 6DNADR DNTMBUFF # SEND SNAPSHOT -5DNADR DNTMBUFF +12D LMDSAS09 EQUALS LMCSTA06 # COMMON DOWNLIST DATA # --------------------------------------------------------- # Page 202 # LM LUNAR SURFACE ALIGN DOWNLIST # ---------------------- CONTROL LIST --------------------- LMLSALDL EQUALS # SEND ID BY SPECIAL CODING DNPTR LMLSAL01 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMLSAL07 # COLLECT SNAPSHOT 4DNADR DNTMBUFF # SEND SHAPSHOT 1DNADR TALIGN # TALIGN,+1 6DNADR REFSMMAT # REFSMMAT +0...+11D 6DNADR YNBSAV # YNBSAV +0...+5,SNBSAV +0...+5 DNPTR LMLSAL08 # COMMON DATA DNPTR LMLSAL02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMLSAL03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SHAPSHOT DNPTR LMLSAL04 # COMMON DATA DNPTR LMLSAL09 # COMMON DATA 3DNADR GSAV # GSAV +0...+5 1DNADR AGSK # AGSK,+1 1DNADR LASTYCMD # LASTYCMD,LASTXCMD 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR TIG # TIG,+1 DNPTR LMLSAL05 # COMMON DATA DNPTR LMLSAL06 # COMMON DATA 1DNADR SPARE -1DNADR SPARE # ---------------------- SUB-LISTS ---------------------- LMLSAL01 EQUALS LMORBM01 # COMMON DOWNLIST DATA LMLSAL02 EQUALS LMORBM02 # COMMON DOWNLIST DATA LMLSAL03 EQUALS LMORBM03 # COMMON DOWNLIST DATA LMLSAL04 EQUALS LMORBM04 # COMMON DOWNLIST DATA LMLSAL05 EQUALS LMORBM05 # COMMON DOWNLIST DATA LMLSAL06 EQUALS LMORBM06 # COMMON DOWNLIST DATA LMLSAL07 EQUALS LMREND07 # COMMON DOWNLIST DATA LMLSAL08 EQUALS LMCSTA06 # COMMON DOWNLIST DATA LMLSAL09 EQUALS LMCSTA07 # COMMON DOWNLIST DATA # Page 203 # -------------------------------------------------------- # Page 204 # LM AGS INITIALIZATION AND UPDATE DOWNLIST # ---------------------- CONTROL LIST -------------------- LMAGSIDL EQUALS # SEND IO BY SPECIAL CODING 3DNADR AGSBUFF +0 # AGSBUFF +0...+5 1DNADR AGSBUFF +12D # AGSBUFF +12D,GARBAGE 3DNADR AGSBUFF +1 # AGSBUFF +1...+6 1DNADR AGSBUFF +13D # AGSBUFF +13D, GARBAGE 3DNADR AGSBUFF +6 # AGSBUFF +6...+11 1DNADR AGSBUFF +12D # AGSBUFF +12D,GARBAGE 3DNADR AGSBUFF +7 # AGSBUFF +7...+12D 1DNADR AGSBUFF +13D # AGSBUFF +13D,GARBAGE 6DNADR COMPNUMB # COMPNUMB,UPOLDMOD,UPVERB,UPCOUNT, # UPBUFF +0...+7 6DNADR UPBUFF +8D # UPBUFF +8D...+19D DNPTR LMAGSI02 # COMMON DATA 1DNADR TIME2 # TIME2/1 DNPTR LMAGSI03 # COLLECT SNAPSHOT 6DNADR DNTMBUFF # SEND SNAPSHOT DNPTR LMAGSI04 # COMMON DATA 2DNADR POSTORKU # POSTORKU,NEGTORKU,POSTORKV,NEGTORKV 1DNADR SPARE 1DNADR SPARE 1DNADR AGSK # AGSK,+1 6DNADR UPBUFF # UPBUFF +0...+11D 4DNADR UPBUFF +12D # UPBUFF +12D...+19D 1DNADR LEMMASS # LEMMASS,CSMMASS 1DNADR IMODES30 # IMODES30,IMODES33 1DNADR SPARE DNPTR LMAGSI05 # COMMON DATA -6DNADR DSPTAB # DSPTAB +0...+11D # ---------------------- SUB-LISTS --------------------- LMAGSI02 EQUALS LMORBM02 # COMMON DOWNLIST DATA LMAGSI03 EQUALS LMORBM03 # COMMON DOWNLIST DATA LMAGSI04 EQUALS LMORBM04 # COMMON DOWNLIST DATA LMAGSI05 EQUALS LMORBM05 # COMMON DOWNLIST DATA # ------------------------------------------------------ DNTABLE GENADR LMCSTADL # LM COAST AND ALIGN DOWNLIST GENADR LMAGSIDL # LM AGS INITIALIZATION/UPDATE DOWNLIST GENADR LMRENDDL # LM RENDEZVOUS AND PRE-THRUST DOWNLIST GENADR LMORBMDL # LM ORBITAL MANEUVERS DOWNLIST GENADR LMDSASDL # LM DESCENT AND ASCENT DOWNLIST # Page 205 GENADR LMLSALDL # LM LUNAR SURFACE ALIGN DOWNLIST # ------------------------------------------------------