Reassign AGC file extension to assembly files
This commit is contained in:
81
Luminary099/INTERPRETIVE_CONSTANT.agc
Normal file
81
Luminary099/INTERPRETIVE_CONSTANT.agc
Normal file
@ -0,0 +1,81 @@
|
||||
# Copyright: Public domain.
|
||||
# Filename: INTERPRETIVE_CONSTANT.agc
|
||||
# Purpose: Part of the source code for Luminary 1A build 099.
|
||||
# It is part of the source code for the Lunar Module's (LM)
|
||||
# Apollo Guidance Computer (AGC), for Apollo 11.
|
||||
# Assembler: yaYUL
|
||||
# Contact: Ron Burkey <info@sandroid.org>.
|
||||
# Website: www.ibiblio.org/apollo.
|
||||
# Pages: 1100-1101
|
||||
# Mod history: 2009-05-25 RSB Adapted from the corresponding
|
||||
# Luminary131 file, using page
|
||||
# images from Luminary 1A.
|
||||
#
|
||||
# This source code has been transcribed or otherwise adapted from
|
||||
# digitized images of a hardcopy from the MIT Museum. The digitization
|
||||
# was performed by Paul Fjeld, and arranged for by Deborah Douglas of
|
||||
# the Museum. Many thanks to both. The images (with suitable reduction
|
||||
# in storage size and consequent reduction in image quality as well) are
|
||||
# available online at www.ibiblio.org/apollo. If for some reason you
|
||||
# find that the images are illegible, contact me at info@sandroid.org
|
||||
# about getting access to the (much) higher-quality images which Paul
|
||||
# actually created.
|
||||
#
|
||||
# Notations on the hardcopy document read, in part:
|
||||
#
|
||||
# Assemble revision 001 of AGC program LMY99 by NASA 2021112-61
|
||||
# 16:27 JULY 14, 1969
|
||||
|
||||
# Page 1100
|
||||
SETLOC INTPRET1
|
||||
BANK
|
||||
|
||||
COUNT* $$/ICONS
|
||||
DP1/4TH 2DEC .25
|
||||
|
||||
UNITZ 2DEC 0
|
||||
|
||||
UNITY 2DEC 0
|
||||
|
||||
UNITX 2DEC .5
|
||||
|
||||
ZEROVECS 2DEC 0
|
||||
|
||||
2DEC 0
|
||||
|
||||
2DEC 0
|
||||
|
||||
DPHALF = UNITX
|
||||
DPPOSMAX OCT 37777
|
||||
OCT 37777
|
||||
|
||||
# Page 1101
|
||||
# INTERPRETIVE CONSTANTS IN THE OTHER HALF-MEMORY
|
||||
|
||||
SETLOC INTPRET2
|
||||
BANK
|
||||
|
||||
COUNT* $$/ICONS
|
||||
ZUNIT 2DEC 0
|
||||
|
||||
YUNIT 2DEC 0
|
||||
|
||||
XUNIT 2DEC .5
|
||||
|
||||
ZEROVEC 2DEC 0
|
||||
|
||||
2DEC 0
|
||||
|
||||
2DEC 0
|
||||
|
||||
OCT 77777 # -0, -6, -12 MUST REMAIN IN THIS ORDER
|
||||
DFC-6 DEC -6
|
||||
DFC-12 DEC -12
|
||||
LODPMAX 2OCT 3777737777 # THESE TWO CONSTANTS MUST REMAIN
|
||||
|
||||
LODPMAX1 2OCT 3777737777 # ADJACENT AND THE SAME FOR INTEGRATION
|
||||
|
||||
ZERODP = ZEROVEC
|
||||
HALFDP = XUNIT
|
||||
|
||||
|
Reference in New Issue
Block a user