Source Code
|
These source-code files are part of a reconstructed copy of Sunrise 45, the
penultimate 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, and 1003133-20. 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.
|
000647,000002: ## Copyright: Public domain.
000648,000003: ## Filename: INTERRUPT_TRANSFER_ROUTINES.agc
000649,000004: ## Purpose: A section of Sunrise 45.
000650,000005: ## It is part of the reconstructed source code for the penultimate
000651,000006: ## release of the Block I Command Module system test software. No
000652,000007: ## original listings of this program are available; instead, this
000653,000008: ## file was created via disassembly of dumps of Sunrise core rope
000654,000009: ## memory modules and comparison with the later Block I program
000655,000010: ## Solarium 55.
000656,000011: ## Assembler: yaYUL --block1
000657,000012: ## Contact: Ron Burkey <info@sandroid.org>.
000658,000013: ## Website: www.ibiblio.org/apollo/index.html
000659,000014: ## Mod history: 2022-12-09 MAS Initial reconstructed source.
000660,000015:
000661,000016: 2000 SETLOC 2000
000662,000017:
000663,000018: 2000 50026 TS ARUPT
000664,000019: 2001 30001 XCH Q
000665,000020: 2002 30027 XCH QRUPT
000666,000021: 2003 02131 TC T3RUPT
000667,000022:
000668,000023: 2004 50026 TS ARUPT
000669,000024: 2005 30001 XCH Q
000670,000025: 2006 30027 XCH QRUPT
000671,000026: 2007 02034 TC ERRUPT
000672,000027:
000673,000028: 2010 50026 TS ARUPT
000674,000029: 2011 30001 XCH Q
000675,000030: 2012 30027 XCH QRUPT
000676,000031: 2013 02427 TC T4RUPT # OUTPUT CONTROL.
000677,000032:
000678,000033: 2014 50026 TS ARUPT
000679,000034: 2015 30001 XCH Q
000680,000035: 2016 30027 XCH QRUPT
000681,000036: 2017 02467 TC KEYRUPT
000682,000037:
000683,000038: 2020 50026 TS ARUPT
000684,000039: 2021 30001 XCH Q
000685,000040: 2022 30027 XCH QRUPT
000686,000041: 2023 03200 TC UPRUPT
000687,000042:
000688,000043: 2024 50026 TS ARUPT
000689,000044: 2025 30001 XCH Q
000690,000045: 2026 30027 XCH QRUPT
000691,000046: 2027 02301 TC DOWNRUPT # DOWNLINK.
000692,000047:
000693,000048: 2030 20017 INHINT # GOJAM - PARITY ALARM, POWER FAIL, ETC.
000694,000049: 2031 32066 CAF PHASBANK
000695,000050: 2032 50015 TS BANKREG
000696,000051: 2033 06774 TC GOPROG
000697,000052:
000698,000053: 2034 02605 ERRUPT TC ALARM # ***NO ERRUPTS IN SYSTEM 5***
000699,000054: 2035 01101 OCT 01101
000700,000055: 2036 02213 TC NBRESUME
End of include-file INTERRUPT_TRANSFER_ROUTINES.agc. Parent file is MAIN.agc