Source Code
|
These source-code files are part of a reconstructed copy of Luminary 97, the
second release of the Apollo 11 Lunar Module (LM) Apollo Guidance Computer
(AGC) software. It was created to fix two incorrect ephemeris constants in
Luminary 96, as described by anomaly report LNY-59.
The reconstruction began with source code of Luminary 99 revision 1 previously
transcribed from a digitized copy of that program. The code was then updated
by undoing changes described in original Luminary memos 83 and 85, using asterisks
indicating changed lines in the listing as a guide. The reconstruction was
verified by matching memory-bank checksums to those listed in drawing 2021152D.
Note that page numbers in the reconstructed code match those on the Luminary 099
revision 001 printout, although the added code would likely have changed page
numbers for a real Luminary 97 listing.
Comments from the original source code are prefixed with a single '#' symbol,
whereas comments added later are prefixed by "##" or "###". Report any errors
noted by creating an
issue report at the Virtual AGC
project's GitHub repository.
|
001989,000002: ## Copyright: Public domain.
001990,000003: ## Filename: INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.agc
001991,000004: ## Purpose: A section of Luminary revision 97.
001992,000005: ## It is part of the reconstructed source code for the
001993,000006: ## second release of the flight software for the Lunar
001994,000007: ## Module's (LM) Apollo Guidance Computer (AGC) for Apollo 11.
001995,000008: ## It was created to fix two incorrect ephemeris constants in
001996,000009: ## Luminary 96, as described by anomaly report LNY-59.
001997,000010: ## The code has been recreated from a copy of Luminary 99
001998,000011: ## revision 001, using asterisks indicating changed lines in
001999,000012: ## the listing and Luminary Memos #83 and #85, which list
002000,000013: ## changes between Luminary 97 and 98, and 98 and 99. The
002001,000014: ## code has been adapted such that the resulting bugger words
002002,000015: ## exactly match those specified for Luminary 97 in NASA drawing
002003,000016: ## 2021152D, which gives relatively high confidence that the
002004,000017: ## reconstruction is correct.
002005,000018: ## Reference: pp. 54-60
002006,000019: ## Assembler: yaYUL
002007,000020: ## Contact: Ron Burkey <info@sandroid.org>.
002008,000021: ## Website: www.ibiblio.org/apollo/index.html
002009,000022: ## Mod history: 2019-07-28 MAS Created from Luminary 99.
002010,000023:
|
|
Page 54
|
002012,000025:
002013,000026: # *** CHANNEL DESCRIPTIONSF WORDS ARE ALLOCATED IN ERASABLE ASSIGNMENTS ***
002014,000027:
002015,000028: # CHANNEL 1 IDENTICAL TO COMPUTER REGISTER L (0001)
002016,000029:
002017,000030: # CHANNEL 2 IDENTICAL TO COMPUTER REGISTER Q (0002)
002018,000031:
002019,000032: # CHANNEL 3 HISCALAR; INPUT CHANNEL; MOST SIGNIFICANT 14 BITS FROM 33 STAGE BINARY COUNTER. SCALE
002020,000033: # FACTOR IS B23 IN CSEC, SO MAX VALUE ABOUT 23.3 HOURS AND LEAST SIGNIFICANT BIT 5.12 SECS.
002021,000034:
002022,000035: # CHANNEL 4 LOSCALAR; INPUT CHANNEL; NEXT MOST SIGNIFICANT 14 BITS FROM THE 33 STAGE BINARY COUNTER
002023,000036: # ASSOCIATED WITH CHANNEL 3. SCALE FACTOR IS B9 IN CSEC. SO MAX VAL IS 5.12 SEC AND LEAST
002024,000037: # SIGNIFICANT BIT IS 1/3200 SEC. SCALE FACTOR OF D.P. WORD WITH CHANNEL 3 IS B23 CSEC.
002025,000038:
002026,000039: # CHANNEL 5 PYJETS; OUTPUT CHANNEL; PITCH RCS JET CONTROL. (REACTION CONTROL SYSTEM) USES BITS 1-8.
002027,000040:
002028,000041: # CHANNEL 6 ROLLJETS; OUTPUT CHANNEL; ROLL RCS JET CONTROL. (REACTION CONTROL SYSTEM) USES BIT 1-8.
002029,000042:
002030,000043: # CHANNEL 7 SUPERBNK; OUTPUT CHANNEL; NOT RESET BY RESTART; FIXED EXTENSION BITS USED TO SELECT THE
002031,000044: # APPROPRIATE FIXED MEMORY BANK IF FBANK IS 30 OCTAL OR MORE. USES BITS 5-7.
002032,000045:
002033,000046: # CHANNEL 10 OUTO; OUTPUT CHANNEL; REGISTER USED TO TRANSMIT LATCHING-RELAY DRIVING INFORMATION FOR
002034,000047: # THE DISPLAY SYSTEM. BITS 15-12 ARE SET TO THE ROW NUMBER (1-14 OCTAL) OF THE RELAY TO BE
002035,000048: # CHANGED AND BITS 11-1 CONTAIN THE REQUIRED SETTINGS FOR THE RELAYS IN THE ROW.
002036,000049:
002037,000050: # CHANNEL 11 DSALMOUT; OUTPUT CHANNEL; REGISTER WHOSE BITS ARE USED FOR ENGINE ON-OFF CONTROL AND TO
002038,000051: # DRIVE INDIVIDUAL INDICATORS OF THE DISPLAY SYSTEM. BITS 1-7 ARE A RELAYS.
002039,000052:
002040,000053: # BIT 1 ISS WARNING
002041,000054: # BIT 2 LIGHT COMPUTER ACTIVITY LAMP
002042,000055: # BIT 3 LIGHT UPLINK ACTIVITY LAMP
002043,000056: # BIT 4 LIGHT TEMP CAUTION LAMP
002044,000057: # BIT 5 LIGHT KEYBOARD RELEASE LAMP
002045,000058: # BIT 6 FLASH VERB AND NOUN LAMPS
002046,000059: # BIT 7 LIGHT OPERATOR ERROR LAMP
|
|
Page 55
|
002048,000061: # BIT 8 SPARE
002049,000062: # BIT 9 TEST CONNECTOR OUTBIT
002050,000063: # BIT 10 CAUTION RESET
002051,000064: # BIT 11 SPARE
002052,000065: # BIT 12 SPARE
002053,000066: # BIT 13 ENGINE ON
002054,000067: # BIT 14 ENGINE OFF
002055,000068: # BIT 15 SPARE
002056,000069:
002057,000070: # CHANNEL 12 CHAN12; OUTPUT CHANNEL; BITS USED TO DRIVE NAVIGATION AND SPAECRAFT HARDWARE
002058,000071:
002059,000072: # BIT 1 ZERO RR CDU; CDU'S GIVE RRADAR INFORMATION FOR LM
002060,000073: # BIT 2 ENABLE CDU RADAR ERROR COUNTERS
002061,000074: # BIT 3 NOT USED
002062,000075: # BIT 4 COARSE ALIGN ENABLE OF IMU
002063,000076: # BIT 5 ZERO IMU CDU'S
002064,000077: # BIT 6 ENABLE IMU ERROR COUNTER, CDU ERROR COUNTER.
002065,000078: # BIT 7 SPARE
002066,000079: # BIT 8 DISPLAY INERTIAL DATA
002067,000080: # BIT 9 -PITCH GIMBAL TRIM (BELL MOTION) DESCENT ENGINE
002068,000081: # BIT 10 +PITCH GIMBAL TRIM (BELL MOTION) DESCENT ENGINE
002069,000082: # BIT 11 -ROLL GIMBAL TRIM (BELL MOTION) DESCENT ENGINE
002070,000083: # BIT 12 +ROLL GIMBAL TRIM (BELL MOTION) DESCENT ENGINE
002071,000084: # BIT 13 LR POSITION 2 COMMAND
002072,000085: # BIT 14 ENABLE RENDESVOUS RADAR LOCK-ON; AUTO ANGLE TRACK'G
002073,000086: # BIT 15 ISS TURN ON DELAY COMPLETE
002074,000087:
|
|
Page 56
|
002076,000089: # CHANNEL 13 CHAN13; OUTPUT CHANNEL
002077,000090:
002078,000091: # BIT 1 RADAR C PROPER SETTING OF THE A,B,C MATRIX
002079,000092: # BIT 2 RADAR B SELECTS CERTAIN RADAR
002080,000093: # BIT 3 RADAR A PARAMETERS TO BE READ.
002081,000094: # BIT 4 RADAR ACTIVITY
002082,000095: # BIT 5 NOT USED (CONNECTS AN ALTERNATE INPUT TO UPLINK)
002083,000096: # BIT 6 BLOCK INPUTS TO UPLINK CELL
002084,000097: # BIT 7 DOWNLINK TELEMETRY WORD ORDER CODE BIT
002085,000098: # BIT 8 RHC COUNTER ENABLE (READ HAND CONTROLLER ANGLES)
002086,000099: # BIT 9 START RHC READ INTO COUNTERS IF BIT 8 SET
002087,000100: # BIT 10 TEST ALARMS, TEST DSKY LIGHTS
002088,000101: # BIT 11 ENABLE STANDBY
002089,000102: # BIT 12 RESET TRAP 31-A ALWAYS APPEAR TO BE SET TO 0
002090,000103: # BIT 13 RESET TRAP 31-B ALWAYS APPEAR TO BE SET TO 0
002091,000104: # BIT 14 RESET TRAP 32 ALWAYS APPEAR TO BE SET TO 0
002092,000105: # BIT 15 ENABLE T6 RUPT
002093,000106:
002094,000107: # CHANNEL 14 CHAN14; OUTPUT CHANNEL; USED TO CONTROL COMPUTER COUNTER CELLS (CDU, GYRO, SPACECRAFT FUNC.
002095,000108:
002096,000109: # BIT 1 OUTLINK ACTIVITY (NOT USED)
002097,000110: # BIT 2 ALTITUDE RATE OR ALTITIDE SELECTOR
002098,000111: # BIT 3 ALTITUDE METER ACTIVITY
002099,000112: # BIT 4 THRUST DRIVE ACTIVITY FOR DESCENT ENGINE
002100,000113: # BIT 5 SPARE
002101,000114: # BIT 6 GYRO ENABLE POWER FOR PULSES
002102,000115: # BIT 7 GYRO SELECT B PAIR OF BITS IDENTIFIES AXIS OF -
002103,000116: # BIT 8 GYRO SELECT A GYRO SYSTEM TO BE TORQUED.
002104,000117: # BIT 9 GYRO TORQUING COMMAND IN NEGATIVE DIRECTION
|
|
Page 57
|
002106,000119: # BIT 10 GYRO ACTIVITY
002107,000120: # BIT 11 DRIVE CDU S
002108,000121: # BIT 12 DRIVE CDU T
002109,000122: # BIT 13 DRIVE CDU Z
002110,000123: # BIT 14 DRIVE CDU Y
002111,000124: # BIT 15 DRIVE CDU X
002112,000125:
002113,000126: # CHANNEL 15 MNKEYIN; INPUT CHANNEL; KEY CODE INPUT FROM KEYBOARD OF DSKY, SENSED BY PROGRAM WHEN
002114,000127: # PROGRAM INTERRUPT #5 IS RECEIVED. USES BITS 5-1
002115,000128:
002116,000129: # CHANNEL 16 NAVKEYIN; INPUT CHANNEL; OPTICS MARK INFORMATION AND NAVIGA ION PANEL DSKY (CM) OR THRUST
002117,000130: # CONTROL (LM) SENSED BY PROGRAM WHEN PROGRAM INTER-RUPT #6 IS RECEIVED. USES BITS 3-7 ONLY.
002118,000131:
002119,000132: # BIT 1 NOT ASSIGNED
002120,000133: # BIT 2 NOT ASSIGNED
002121,000134: # BIT 3 OPTICS X-AXIS MARK SIGNAL FOR ALIGN OPTICAL TSCOPE
002122,000135: # BIT 4 OPTICS Y-AXIS MARK SIGNAL FOR AOT
002123,000136: # BIT 5 OPTICS MARK REJECT SIGNAL
002124,000137: # BIT 6 DESCENT+ ; CREW DESIRED SLOWING RATE OF DESCENT
002125,000138: # BIT 7 DESCENT- ; CREW DESIRED SPEEDING UP RATE OF D'CENT
002126,000139:
002127,000140: # NOTE: ALL BITS IN CHANNELS 30-33 ARE INVERTED AS SENSED BY THE PROGRAM, SO THAT A VALUE OF ZERO MEANS
002128,000141: # THAT THE INDICATED SIGNAL IS PRESENT.
002129,000142:
002130,000143: # CHANNEL 30 INPUT CHANNEL
002131,000144:
002132,000145: # BIT 1 ABORT WITH DESCENT STAGE
002133,000146: # BIT 2 UNUSED
002134,000147: # BIT 3 ENGINE ARMED SIGNAL
002135,000148: # BIT 4 ABORT WITH ASCENT ENGINE STAGE
002136,000149: # BIT 5 AUTO THROTTLE; COMPUTER CONTROL OF DESCENT ENGINE
|
|
Page 58
|
002138,000151: # BIT 6 DISPLAY INERTIAL DATA
002139,000152: # BIT 7 RR CDU FAIL
002140,000153: # BIT 8 SPARE
002141,000154: # BIT 9 IMU OPERATE WITH NO MALFUNCTION
002142,000155: # BIT 10 LM COMPUTER (NOT AGS) HAS CONTROL OF LM
002143,000156: # BIT 11 IMU CAGE COMMAND TO DRIVE IMU GIMBAL ANGLES TO 0.
002144,000157: # BIT 12 IMU CDU FAIL (MALFUNCTION OF IMU CDU,S)
002145,000158: # BIT 13 IMU FAIL (MALFUNCTION OF IMU STABILIZATION LOOPS)
002146,000159: # BIT 14 ISS TURN ON REQUESTED
002147,000160: # BIT 15 TEMPERATURE OF STABLE MEMBER WITHIN DESIGN LIMITS
002148,000161:
002149,000162: # CHANNEL 31 INPUT CHANNEL; BITS ASSOCIATED WITH THE ATTITUDE CONTROLLER, TRANSLATIONAL CONTROLLER,
002150,000163: # AND SPACECRAFT ATTITUDE CONTROL; USED BY RCS DAP
002151,000164:
002152,000165: # BIT 1 ROTATION (BY RHC) COMMANDED IN POSITIVE PITCH DIRECTION; MUST BE IN MINIMUM IMPULSE MODE.
002153,000166: # ALSO POSITIVE ELEVATION CHANGE FOR LANDING POINT DESIGNATOR
002154,000167: # BIT 2 AS BIT 1 EXCEPT NEGATIVE PITCH AND ELEVATION
002155,000168: # BIT 3 ROTATION (BY RHC) COMMANDED IN POSITIVE YAW DIRECTION; MUST BE IN MINUMUM IMPULSE MODE.
002156,000169: # BIT 4 AS BIT 3 EXCEPT NEGATIVE YAW
002157,000170: # BIT 5 ROTATION (BY RHC) COMMANDED IN POSITIVE ROLL DIRECTION; MUST BE IN MINIMUM IMPULSE MODE.
002158,000171: # ALSO POSITIVE AZIMUTH CHANGE FOR LANDING POINT DESIGNATOR
002159,000172: # BIT 6 AS BIT 5 EXCEPT NEGATIVE ROLL AND AZIMUTH
002160,000173: # BIT 7 TRANSLATION IN +X DIRECTION COMMANDED BY THC
002161,000174: # BIT 8 TRANSLATION IN -X DIRECTION COMMANDED BY THC
002162,000175: # BIT 9 TRANSLATION IN +Y DIRECTION COMMANDED BY THC
002163,000176: # BIT 10 TRANSLATION IN -Y DIRECTION COMMANDED BY THC
002164,000177: # BIT 11 TRANSLATION IN +Z DIRECTION COMMANDED BY THC
002165,000178: # BIT 12 TRANSLATION IN -Z DIRECTION COMMANDED BY THC
|
|
Page 59
|
002167,000180: # BIT 13 ATTITUDE HOLD MODE ON SCS MODE CONTROL SWITCH
002168,000181: # BIT 14 AUTO STABILIZATION OF ATTITUDE ON SCS MODE SWITCH
002169,000182: # BIT 15 ATTITUDE CONTROL OUT OF DETENT (RHC NOT IN NEUTRAL
002170,000183:
002171,000184: # CHANNEL 32 INPUT CHANNEL.
002172,000185:
002173,000186: # BIT 1 THRUSTERS 2 & 4 DISABLED BY CREW
002174,000187: # BIT 2 THRUSTERS 5 & 8 DISABLED BY CREW
002175,000188: # BIT 3 THRUSTERS 1 & 3 DISABLED BY CREW
002176,000189: # BIT 4 THRUSTERS 6 & 7 DISABLED BY CREW
002177,000190: # BIT 5 THRUSTERS 14 & 16 DISABLED BY CREW
002178,000191: # BIT 6 THRUSTERS 13 & 15 DISABLED BY CREW
002179,000192: # BIT 7 THRUSTERS 9 & 12 DISABLED BY CREW
002180,000193: # BIT 8 THRUSTERS 10 & 11 DISABLED BY CREW
002181,000194: # BIT 9 DESCENT ENGINE GIMBALS DISABLED BY CREW
002182,000195: # BIT 10 APPARENT DESCENT ENGINE GIMBAL FAILURE
002183,000196: # BIT 14 INDICATES PROCEED KEY IS DEPRESSED
002184,000197:
002185,000198: # CHANNEL 33 CHAN33; INPUT CHANNEL; FOR HARDWARE STATUS AND COMMAND INFORMATION. BITS 15-11 ARE FLIP-
002186,000199: # FLOP BITS RESET BY A CHANNEL "WRITE" COMMAND THAT ARE RESET BY A RESTART & BY T4RUPT LOOP.
002187,000200:
002188,000201: # BIT 1 SPARE
002189,000202: # BIT 2 RR AUTO-POWER ON
002190,000203: # BIT 3 RR RANGE LOW SCALE
002191,000204: # BIT 4 RR DATA GOOD
002192,000205: # BIT 5 LR RANGE DATA GOOD
002193,000206: # BIT 6 LR POS1
002194,000207: # BIT 7 LR POS2
|
|
Page 60
|
002196,000209: # BIT 8 LR VEL DATA GOOD
002197,000210: # BIT 9 LR RANGE LOW SCALE
002198,000211: # BIT 10 BLOCK UPLINK INPUT
002199,000212: # BIT 11 UPLINK TOO FAST
002200,000213: # BIT 12 DOWNLINK TOO FAST
002201,000214: # BIT 13 PIPA FAIL
002202,000215: # BIT 14 WARNING OF REPEATED ALARMS: RESTART, COUNTER FAIL, VOLTAGE FAIL, AND SCALAR DOUBLE.
002203,000216: # BIT 15 LGC OSCILLATOR STOPPED
002204,000217:
002205,000218: # CHANNEL 34 DNT M1; OUTPUT CHANNEL; DOWNLINK 1 FIRST OF TWO WORDS SERIALIZATION.
002206,000219: # CHANNEL 35 DNT M2; OUTPUT CHANNEL DOWNLINK 2 SOCOND OF TWO WORDS SERIALIZATION.
002207,000220:
002208,000221:
End of include-file INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.agc. Parent file is MAIN.agc