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.

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

Page 887

040266,000025: 
040267,000026: 36,3476                                           SUBRO    MASTER                                
040268,000027: 36,3476                                           SUBRO    SELFCHEC                              
040269,000028: 

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