Notations on the program listing read, in part:
YUL SYSTEM FOR BLK2: REVISION 0 OF PROGRAM RETRED44 BY NASA 2021100 JUL 9, 1965Note that the date is the date of the printout, not the date of the program revision.
Source Code
|
|
These source-code files were transcribed from a printout in Don Eyles's personal
collection, scanned by archive.org, and financially sponsored by Mike Higgins.
A team of volunteers performed the transcription and proof-reading. Note
that the scanned page images are available at
the Virtual AGC Project website, as well as higher-quality (but much larger)
images at
the Virtual AGC Project's section on archive.org. Report any problems by creating
"issues" at
the Virtual AGC Project's GitHub Repository. Notations on the program listing read, in part: YUL SYSTEM FOR BLK2: REVISION 0 OF PROGRAM RETRED44 BY NASA 2021100 JUL 9, 1965Note that the date is the date of the printout, not the date of the program revision. |
000536,000002: ## Copyright: Public domain.
000537,000003: ## Filename: INPUT_OUTPUT_CHANNELS.agc
000538,000004: ## Purpose: Part of the source code for Retread 44 (revision 0). It was
000539,000005: ## the very first program for the Block II AGC, created as an
000540,000006: ## extensive rewrite of the Block I program Sunrise.
000541,000007: ## This file is intended to be a faithful transcription, except
000542,000008: ## that the code format has been changed to conform to the
000543,000009: ## requirements of the yaYUL assembler rather than the
000544,000010: ## original YUL assembler.
000545,000011: ## Reference: p. 14
000546,000012: ## Assembler: yaYUL
000547,000013: ## Contact: Ron Burkey <info@sandroid.org>.
000548,000014: ## Website: www.ibiblio.org/apollo/index.html
000549,000015: ## Mod history: 2016-12-13 MAS Created from Aurora 12 version.
000550,000016: ## 2016-12-16 MAS Transcribed.
000551,000017: ## 2016-12-26 RSB Proofed comment text using octopus/ProoferComments,
000552,000018: ## but no errors found.
000553,000019:
|
|
Page 14 |
000555,000021: E3,1421 OUT0 EQUALS 10
000556,000022: E3,1421 DSALMOUT EQUALS 11
000557,000023: E3,1421 CHAN13 EQUALS 13
000558,000024: E3,1421 MNKEYIN EQUALS 15
000559,000025: E3,1421 NAVKEYIN EQUALS 16
000560,000026: # END OF CHANNEL ASSIGNMENTS
End of include-file INPUT_OUTPUT_CHANNELS.agc. Parent file is MAIN.agc