Source Code

These source-code files were transcribed from a printout in Don Eyles's personal collection, scanned by archive.org, and financially sponsored by Peter McDermott. A team of volunteers performed the transcription and proof-reading. The scanned page images are available at the Virtual AGC Project website, as well as higher-quality (but much larger) images at the Virtual AGC Project's collection in the Internet Archive. Report any problems by creating "issues" at the Virtual AGC Project's GitHub Repository.

Notations on the program listing read, in part:

	YUL SYSTEM FOR AGC: NEW PROGRAM SHEPATIN BY EYLES
	DEC 13, 1966

	THIS PROGRAM WAS ASSEMBLED AS A VERSION OF REVISION 37 
        OF PROGRAM SUNBURST BY LEM GROUP
Note that the date is the date of the printout, not the date of the program revision.

040251,000002:                                                                                                  ## Copyright:   Public domain.
040252,000003:                                                                                                  ## Filename:    SUBROUTINES.agc
040253,000004:                                                                                                  ## Purpose:     A section of Sunburst revision 37, or Shepatin revision 0.
040254,000005:                                                                                                  ##              It is part of an early development version of the software
040255,000006:                                                                                                  ##              for Apollo Guidance Computer (AGC) on the unmanned Lunar
040256,000007:                                                                                                  ##              Module (LM) flight Apollo 5. Sunburst 37 was the program
040257,000008:                                                                                                  ##              upon which Don Eyles's offline development program Shepatin
040258,000009:                                                                                                  ##              was based; the listing herein transcribed was actually for
040259,000010:                                                                                                  ##              the equivalent revision 0 of Shepatin.
040260,000011:                                                                                                  ##              This file is intended to be a faithful transcription, except
040261,000012:                                                                                                  ##              that the code format has been changed to conform to the
040262,000013:                                                                                                  ##              requirements of the yaYUL assembler rather than the
040263,000014:                                                                                                  ##              original YUL assembler.
040264,000015:                                                                                                  ## Reference:   p.  887
040265,000016:                                                                                                  ## Assembler:   yaYUL
040266,000017:                                                                                                  ## Contact:     Ron Burkey <info@sandroid.org>.
040267,000018:                                                                                                  ## Website:     www.ibiblio.org/apollo/index.html
040268,000019:                                                                                                  ## Mod history: 2017-05-24 MAS  Created from Sunburst 120.
040269,000020:                                                                                                  ##              2017-06-14 HG   Transcribed
040270,000021:                                                                                                  ##              2017-06-23 RSB  Proofed comment text with
040271,000022:                                                                                                  ##                              octopus/ProoferComments.
040272,000023: 

Page 887

040274,000025: 
040275,000026: 36,3476                                           SUBRO    MASTER                                
040276,000027: 36,3476                                           SUBRO    SELFCHEC                              
040277,000028: 

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