Source Code
|
These source-code files are part of a reconstructed copy of Sunrise 69, the
final release of the Block I Command Module (CM) Apollo Guidance Computer
(AGC) system test software.
They have been created via disassembly of binary dumps of original core rope
memory modules, part numbers 1003133-18, 1003133-19, 1003133-20, and 1003733-071.
Corresponding portions of code have been copied from Solarium 55 where applicable.
Extensive use was also made of the AGC Information Series documents, which were specifically
written about the Sunrise software.
Since only binary dumps (rather than listings) of Sunrise are available as source material,
all comments and labels are approximate.
They have been taken from other AGC programs where possible, or, in some places, written
from scratch to match what we believe would have been in the original listing.
|
000707,000002: ## Copyright: Public domain.
000708,000003: ## Filename: INTERRUPT_TRANSFER_ROUTINES.agc
000709,000004: ## Purpose: A section of Sunrise 69.
000710,000005: ## It is part of the reconstructed source code for the final
000711,000006: ## release of the Block I Command Module system test software. No
000712,000007: ## original listings of this program are available; instead, this
000713,000008: ## file was created via disassembly of dumps of Sunrise core rope
000714,000009: ## memory modules and comparison with the later Block I program
000715,000010: ## Solarium 55.
000716,000011: ## Assembler: yaYUL --block1
000717,000012: ## Contact: Ron Burkey <info@sandroid.org>.
000718,000013: ## Website: www.ibiblio.org/apollo/index.html
000719,000014: ## Mod history: 2023-06-19 MAS Created from Sunrise 45.
000720,000015:
000721,000016: 2000 SETLOC 2000
000722,000017:
000723,000018: 2000 50026 TS ARUPT
000724,000019: 2001 30001 XCH Q
000725,000020: 2002 30027 XCH QRUPT
000726,000021: 2003 02131 TC T3RUPT
000727,000022:
000728,000023: 2004 50026 TS ARUPT
000729,000024: 2005 30001 XCH Q
000730,000025: 2006 30027 XCH QRUPT
000731,000026: 2007 02034 TC ERRUPT
000732,000027:
000733,000028: 2010 50026 TS ARUPT
000734,000029: 2011 30001 XCH Q
000735,000030: 2012 30027 XCH QRUPT
000736,000031: 2013 02427 TC T4RUPT # OUTPUT CONTROL.
000737,000032:
000738,000033: 2014 50026 TS ARUPT
000739,000034: 2015 30001 XCH Q
000740,000035: 2016 30027 XCH QRUPT
000741,000036: 2017 02467 TC KEYRUPT
000742,000037:
000743,000038: 2020 50026 TS ARUPT
000744,000039: 2021 30001 XCH Q
000745,000040: 2022 30027 XCH QRUPT
000746,000041: 2023 03200 TC UPRUPT
000747,000042:
000748,000043: 2024 50026 TS ARUPT
000749,000044: 2025 30001 XCH Q
000750,000045: 2026 30027 XCH QRUPT
000751,000046: 2027 02301 TC DOWNRUPT # DOWNLINK.
000752,000047:
000753,000048: 2030 20017 INHINT # GOJAM - PARITY ALARM, POWER FAIL, ETC.
000754,000049: 2031 32066 CAF PHASBANK
000755,000050: 2032 50015 TS BANKREG
000756,000051: 2033 06774 TC GOPROG
000757,000052:
000758,000053: 2034 02605 ERRUPT TC ALARM # ***NO ERRUPTS IN SYSTEM 5***
000759,000054: 2035 01101 OCT 01101
000760,000055: 2036 02213 TC NBRESUME
End of include-file INTERRUPT_TRANSFER_ROUTINES.agc. Parent file is MAIN.agc