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,1971
Note that the date is the date of the printout, not the date of the program revision.

000017,000002:                                                                                                  ## Copyright:   Public domain.
000018,000003:                                                                                                  ## Filename:    ABSOLUTE_ADDRESSES_FOR_UPDATE_PROGRAM.agc
000019,000004:                                                                                                  ## Purpose:     A section of Luminary revision 210.
000020,000005:                                                                                                  ##              It is part of the source code for the Lunar Module's (LM)
000021,000006:                                                                                                  ##              Apollo Guidance Computer (AGC) for Apollo 15-17.
000022,000007:                                                                                                  ##              This file is intended to be a faithful transcription, except
000023,000008:                                                                                                  ##              that the code format has been changed to conform to the
000024,000009:                                                                                                  ##              requirements of the yaYUL assembler rather than the
000025,000010:                                                                                                  ##              original YUL assembler.
000026,000011:                                                                                                  ## Reference:   p. 1
000027,000012:                                                                                                  ## Assembler:   yaYUL
000028,000013:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
000029,000014:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
000030,000015:                                                                                                  ## Mod history: 2016-11-17 JL   Created from Artemis072 version.
000031,000016:                                                                                                  ##              2016-11-18 RSB  Transcribed
000032,000017:                                                                                                  ##              2016-12-15 RSB  Proofed comment text with octopus/ProoferComments,
000033,000018:                                                                                                  ##                              and corrected the errors found.
000034,000019: 

Page 1

000036,000021:                                                                                                  #  ECADR                 MNEMONIC
000037,000022:                                                                                                  #  -----                 --------
000038,000023: ???????                                           =ECADR   UPSVFLAG                              
000039,000024: 
000040,000025: ???????                                           =ECADR   XSMD                                  
000041,000026: 
000042,000027: ???????                                           =ECADR   REFSMMAT                              
000043,000028: 
000044,000029: ???????                                           =ECADR   DELVSLV                               
000045,000030: 
000046,000031: ???????                                           =ECADR   RLS                                   

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