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 GROUPNote 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