Source Code
![]() |
These source-code files were transcribed from scans made from Don Eyles's personal
copy of BURST120 (SUNBURST 120). They were scanned at archive.org's Boston
facility, and the scanning was sponsored by Mike Stewart. The code was transcribed
from these scans by a team of volunteers who are referenced in the program
comments. Comments from the original source code are in ALL-CAPS, whereas
comments added later in transcription are in Mixed-Case. In some cases, where
similar code blocks exist in previously-transcribed AGC programs (primarily
Luminary 99, from Apollo 11) those code blocks were used as a starting point and
then corrected to agree with the BURST120 scans. The full scans are available
at the Virtual AGC
project's collection at archive.org, while more-convenient reduced-size (but reduced-quality)
images are available at
the main Virtual AGC website. Report any errors noted by creating an
issue report at the Virtual AGC
project's GitHub repository. Notations on the program listing read, in part:YUL SYSTEM FOR AGC: REVISION 0 OF PROGRAM BURST120 BY NASA 2021106-031 DEC 7, 1967 THIS LISTING IS A COPY OF A VERSION OF THE PROGRAM INTENDED FOR USE IN THE ON-BOARD PRIMARY GUIDANCE COMPUTER IN THE UNMANNED FLIGHT OF APOLLO LUNAR MODULE 1 --- THE AS206 MISSION.Note that the date is the date of the printout, not the date of the program revision. |
040610,000002: ## Copyright: Public domain.
040611,000003: ## Filename: SUM_CHECK_END_OF_BANK_MARKERS.agc
040612,000004: ## Purpose: A module for revision 0 of BURST120 (Sunburst). It
040613,000005: ## is part of the source code for the Lunar Module's
040614,000006: ## (LM) Apollo Guidance Computer (AGC) for Apollo 5.
040615,000007: ## Assembler: yaYUL
040616,000008: ## Contact: Ron Burkey <info@sandroid.org>.
040617,000009: ## Website: www.ibiblio.org/apollo/index.html
040618,000010: ## Mod history: 2016-09-30 RSB Created draft version.
040619,000011: ## 2016-10-19 RSB Transcribed.
040620,000012:
![]() |
Page 946 |
040622,000014: 36,3673 BNKSUM 00
040623,000015:
040624,000016: 36,3673 BNKSUM 01
040625,000017:
040626,000018: 36,3673 BNKSUM 02
040627,000019:
040628,000020: 36,3673 BNKSUM 03
040629,000021:
040630,000022: 36,3673 BNKSUM 04
040631,000023:
040632,000024: 36,3673 BNKSUM 05
040633,000025:
040634,000026: 36,3673 BNKSUM 06
040635,000027:
040636,000028: 36,3673 BNKSUM 07
040637,000029:
040638,000030: 36,3673 BNKSUM 10
040639,000031:
040640,000032: 36,3673 BNKSUM 11
040641,000033:
040642,000034: 36,3673 BNKSUM 12
040643,000035:
040644,000036: 36,3673 BNKSUM 13
040645,000037:
040646,000038: 36,3673 BNKSUM 14
040647,000039:
040648,000040: 36,3673 BNKSUM 15
040649,000041:
040650,000042: 36,3673 BNKSUM 16
040651,000043:
040652,000044: 36,3673 BNKSUM 17
040653,000045:
040654,000046: 36,3673 BNKSUM 20
040655,000047:
040656,000048: 36,3673 BNKSUM 21
040657,000049:
040658,000050: 36,3673 BNKSUM 22
040659,000051:
040660,000052: 36,3673 BNKSUM 23
040661,000053:
040662,000054: 36,3673 BNKSUM 24
040663,000055:
040664,000056: 36,3673 BNKSUM 25
040665,000057:
040666,000058: 36,3673 BNKSUM 26
040667,000059:
040668,000060: 36,3673 BNKSUM 27
040669,000061:
040670,000062: 36,3673 BNKSUM 30
![]() |
Page 947 |
040672,000064: 36,3673 BNKSUM 31
040673,000065:
040674,000066: 36,3673 BNKSUM 32
040675,000067:
040676,000068: 36,3673 BNKSUM 33
040677,000069:
040678,000070: 36,3673 BNKSUM 34
040679,000071:
040680,000072: 36,3673 BNKSUM 35
040681,000073:
040682,000074: 36,3673 BNKSUM 36
040683,000075:
040684,000076: 36,3673 BNKSUM 37
040685,000077:
040686,000078: 36,3673 BNKSUM 40
040687,000079: 36,3673 BNKSUM 41
040688,000080: 36,3673 BNKSUM 42
040689,000081: 36,3673 BNKSUM 43
End of include-file SUM_CHECK_END_OF_BANK_MARKERS.agc. Parent file is MAIN.agc