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. |
040616,000002: ## Copyright: Public domain.
040617,000003: ## Filename: SUM_CHECK_END_OF_BANK_MARKERS.agc
040618,000004: ## Purpose: A module for revision 0 of BURST120 (Sunburst). It
040619,000005: ## is part of the source code for the Lunar Module's
040620,000006: ## (LM) Apollo Guidance Computer (AGC) for Apollo 5.
040621,000007: ## Assembler: yaYUL
040622,000008: ## Contact: Ron Burkey <info@sandroid.org>.
040623,000009: ## Website: www.ibiblio.org/apollo/index.html
040624,000010: ## Mod history: 2016-09-30 RSB Created draft version.
040625,000011: ## 2016-10-19 RSB Transcribed.
040626,000012:
Page 946 |
040628,000014: 36,3673 BNKSUM 00
040629,000015:
040630,000016: 36,3673 BNKSUM 01
040631,000017:
040632,000018: 36,3673 BNKSUM 02
040633,000019:
040634,000020: 36,3673 BNKSUM 03
040635,000021:
040636,000022: 36,3673 BNKSUM 04
040637,000023:
040638,000024: 36,3673 BNKSUM 05
040639,000025:
040640,000026: 36,3673 BNKSUM 06
040641,000027:
040642,000028: 36,3673 BNKSUM 07
040643,000029:
040644,000030: 36,3673 BNKSUM 10
040645,000031:
040646,000032: 36,3673 BNKSUM 11
040647,000033:
040648,000034: 36,3673 BNKSUM 12
040649,000035:
040650,000036: 36,3673 BNKSUM 13
040651,000037:
040652,000038: 36,3673 BNKSUM 14
040653,000039:
040654,000040: 36,3673 BNKSUM 15
040655,000041:
040656,000042: 36,3673 BNKSUM 16
040657,000043:
040658,000044: 36,3673 BNKSUM 17
040659,000045:
040660,000046: 36,3673 BNKSUM 20
040661,000047:
040662,000048: 36,3673 BNKSUM 21
040663,000049:
040664,000050: 36,3673 BNKSUM 22
040665,000051:
040666,000052: 36,3673 BNKSUM 23
040667,000053:
040668,000054: 36,3673 BNKSUM 24
040669,000055:
040670,000056: 36,3673 BNKSUM 25
040671,000057:
040672,000058: 36,3673 BNKSUM 26
040673,000059:
040674,000060: 36,3673 BNKSUM 27
040675,000061:
040676,000062: 36,3673 BNKSUM 30
Page 947 |
040678,000064: 36,3673 BNKSUM 31
040679,000065:
040680,000066: 36,3673 BNKSUM 32
040681,000067:
040682,000068: 36,3673 BNKSUM 33
040683,000069:
040684,000070: 36,3673 BNKSUM 34
040685,000071:
040686,000072: 36,3673 BNKSUM 35
040687,000073:
040688,000074: 36,3673 BNKSUM 36
040689,000075:
040690,000076: 36,3673 BNKSUM 37
040691,000077:
040692,000078: 36,3673 BNKSUM 40
040693,000079: 36,3673 BNKSUM 41
040694,000080: 36,3673 BNKSUM 42
040695,000081: 36,3673 BNKSUM 43
End of include-file SUM_CHECK_END_OF_BANK_MARKERS.agc. Parent file is MAIN.agc