Source Code
This is the source-code for the Apollo 9 Command Module's Guidance Computer.
These files were derived originally from the scan from MIT's Dibner Institute's
now-discontinued website titled "History of Recent Science and Technology", which
in turn was originally created by Gary Neff, though his high-quality scans were
unfortunately reduced in legibility when presented online.
The markings on the front of the
printout imply that it was the original AGC developer Norm Brodeur's copy.
A scan by Ron Burkey has superceded it, made from a more-legible copy from the collection of original
AGC developer Fred Martin. The source code was transcribed from
those images by Ron Burkey. Note that the page images
presented online are of reduced quality, and that higher-quality images
are available. Report any conversion errors or legibility
problems in page images to info@sandroid.org.
Notations on the program listing read, in part:ASSEMBLE REVISION 249 OF AGC PROGRAM COLOSSUS BY NASA 2021111-041 20'35 OCT. 28,1968Note that the date is the date of the printout, not the date of the program revision. |
001489,000002: ## Copyright: Public domain.
001490,000003: ## Filename: SUBROUTINE_CALLS.agc
001491,000004: ## Purpose: Part of the source code for Colossus, build 249.
001492,000005: ## It is part of the source code for the Command Module's (CM)
001493,000006: ## Apollo Guidance Computer (AGC), for Apollo 9.
001494,000007: ## Assembler: yaYUL
001495,000008: ## Reference: pp. 34
001496,000009: ## Contact: Ron Burkey <info@sandroid.org>.
001497,000010: ## Website: www.ibiblio.org/apollo.
001498,000011: ## Mod history: 2017-01-05 RSB Split off from TAGS_FOR_RELATIVE_SETLOC.agc.
001499,000012: ###
001500,000013: ## The contents of the "Colossus249" files, in general, are transcribed
001501,000014: ## from a scanned copy of the program listing. Notations on this
001502,000015: ## document read, in part:
001503,000016: ##
001504,000017: ## Assemble revision 249 of AGC program Colossus by NASA
001505,000018: ## 2021111-041. October 28, 1968.
001506,000019: ##
001507,000020: ## This AGC program shall also be referred to as
001508,000021: ## Colossus 1A
001509,000022: ##
001510,000023: ## Prepared by
001511,000024: ## Massachusetts Institute of Technology
001512,000025: ## 75 Cambridge Parkway
001513,000026: ## Cambridge, Massachusetts
001514,000027: ## under NASA contract NAS 9-4065.
001515,000028: ##
001516,000029: ## Refer directly to the online document mentioned above for further information.
001517,000030: ## Please report any errors (relative to the scanned pages) to info@sandroid.org.
001518,000031: ##
001519,000032: ## In some cases, where the source code for Luminary 131 overlaps that of
001520,000033: ## Colossus 249, this code is instead copied from the corresponding Luminary 131
001521,000034: ## source file, and then is proofed to incorporate any changes.
001522,000035:
Page 34 |
001524,000037: 37,2001 SUBRO KILERASE
001525,000038: 37,2001 SUBRO KOOLADE
001526,000039: 37,2001 SUBRO SMOOCH
001527,000040: 37,2001 SUBRO PANDORA
001528,000041: 37,2001 SUBRO DAPCSM
001529,000042: 37,2001 SUBRO SATRAP
End of include-file SUBROUTINE_CALLS.agc. Parent file is MAIN.agc