|
|
||
|---|---|---|
| .. | ||
| AGC_BLOCK_TWO_SELF_CHECK.agc | ||
| AGS_INITIALIZATION.agc | ||
| ALARM_AND_ABORT.agc | ||
| AOSTASK_AND_AOSJOB.agc | ||
| AOTMARK.agc | ||
| ASCENT_GUIDANCE.agc | ||
| ASSEMBLY_AND_OPERATION_INFORMATION.agc | ||
| ATTITUDE_MANEUVER_ROUTINE.agc | ||
| BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.agc | ||
| CONIC_SUBROUTINES.agc | ||
| CONTROLLED_CONSTANTS.agc | ||
| DAP_INTERFACE_SUBROUTINES.agc | ||
| DAPIDLER_PROGRAM.agc | ||
| DISPLAY_INTERFACE_ROUTINES.agc | ||
| DOWN_TELEMETRY_PROGRAM.agc | ||
| DOWNLINK_LISTS.agc | ||
| ERASABLE_ASSIGNMENTS.agc | ||
| EXECUTIVE.agc | ||
| EXTENDED_VERBS.agc | ||
| FINDCDUW--GUIDAP_INTERFACE.agc | ||
| FIXED_FIXED_CONSTANT_POOL.agc | ||
| FLAGWORD_ASSIGNMENTS.agc | ||
| FRESH_START_AND_RESTART.agc | ||
| GIMBAL_LOCK_AVOIDANCE.agc | ||
| GROUND_TRACKING_DETERMINATION_PROGRAM.agc | ||
| IMU_COMPENSATION_PACKAGE.agc | ||
| IMU_MODE_SWITCHING_ROUTINES.agc | ||
| IMU_PERFORMANCE_TEST_2.agc | ||
| IMU_PERFORMANCE_TESTS_4.agc | ||
| INFLIGHT_ALIGNMENT_ROUTINES.agc | ||
| INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.agc | ||
| INTEGRATION_INITIALIZATION.agc | ||
| INTER-BANK_COMMUNICATION.agc | ||
| INTERPRETER.agc | ||
| INTERPRETIVE_CONSTANT.agc | ||
| INTERRUPT_LEAD_INS.agc | ||
| KALCMANU_STEERING.agc | ||
| KALMAN_FILTER.agc | ||
| KEYRUPT_UPRUPT.agc | ||
| LAMBERT_AIMPOINT_GUIDANCE.agc | ||
| LANDING_ANALOG_DISPLAYS.agc | ||
| LATITUDE_LONGITUDE_SUBROUTINES.agc | ||
| LEM_GEOMETRY.agc | ||
| LUNAR_AND_SOLAR_EPHEMERIDES_SUBROUTINES.agc | ||
| LUNAR_LANDING_GUIDANCE_EQUATIONS.agc | ||
| MAIN.agc | ||
| MEASUREMENT_INCORPORATION.agc | ||
| ORBITAL_INTEGRATION.agc | ||
| P12.agc | ||
| P20-P25.agc | ||
| P30_P37.agc | ||
| P32-P35_P72-P75.agc | ||
| P34-35_P74-75.agc | ||
| P40-P47.agc | ||
| P51-P53.agc | ||
| P70-P71.agc | ||
| P76.agc | ||
| P-AXIS_RCS_AUTOPILOT.agc | ||
| PHASE_TABLE_MAINTENANCE.agc | ||
| PINBALL_GAME_BUTTONS_AND_LIGHTS.agc | ||
| PINBALL_NOUN_TABLES.agc | ||
| PLANETARY_INERTIAL_ORIENTATION.agc | ||
| POWERED_FLIGHT_SUBROUTINES.agc | ||
| Q_R-AXIS_RCS_AUTOPILOT.agc | ||
| R30.agc | ||
| R31.agc | ||
| R60_62.agc | ||
| R63.agc | ||
| RADAR_LEADIN_ROUTINES.agc | ||
| RCS_FAILURE_MONITOR.agc | ||
| README.md | ||
| RESTART_TABLES.agc | ||
| RESTARTS_ROUTINE.agc | ||
| RTB_OP_CODES.agc | ||
| S-BAND_ANTENNA_FOR_LM.agc | ||
| SERVICE_ROUTINES.agc | ||
| SERVICER.agc | ||
| SINGLE_PRECISION_SUBROUTINES.agc | ||
| SPS_BACK-UP_RCS_CONTROL.agc | ||
| STABLE_ORBIT.agc | ||
| SYSTEM_TEST_STANDARD_LEAD_INS.agc | ||
| T4RUPT_PROGRAM.agc | ||
| T6-RUPT_PROGRAMS.agc | ||
| TAGS_FOR_RELATIVE_SETLOC.agc | ||
| THE_LUNAR_LANDING.agc | ||
| THROTTLE_CONTROL_ROUTINES.agc | ||
| TIME_OF_FREE_FALL.agc | ||
| TJET_LAW.agc | ||
| TRIM_GIMBAL_CONTROL_SYSTEM.agc | ||
| UPDATE_PROGRAM.agc | ||
| WAITLIST.agc | ||
Luminary099
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.
Background
The contents of the "Luminary099" files, in general, are transcribed from a digital images created from a hardcopy of the program residing at the MIT Museum. Many thanks to Debbie Douglas of the Museum, and to Paul Fjeld (who made the images).
Notations on this document read, in part:
ASSEMBLE REVISION 001 OF AGC PROGRAM LMY99 BY NASA 2021112-061
16:27 JULY 14,1969
[Note that this is the date the hardcopy was made,
not the date of the program revision or the assembly.]
...
THIS LGC PROGRAM IS INTENDED FOR USE IN THE LM DURING THE MANNED
LUNAR LANDING MISSION OR ANY SUBSET THEREOF.
...
For organizational purposes RSB split the huge monolithic source code into smaller, more manageable chunks--i.e., into individual source files. Those files are rejoined within MAIN.agc file as "includes". It just makes it a little easier to work with. The code chunks correspond to natural divisions into sub-programs. In fact, these divisions are more-or-less specified by the source code itself. Refer to the "TABLE OF SUBROUTINE LOG SECTIONS" at the very beginning of the file ASSEMBLY_AND_OPERATION_INFORMATION.agc.
It may be reasonably asked why tens of thousands of lines of source are joined by means of inclusion, rather than simply assembling the source files individually and then linking them to form the executable. The answer is that the original development team had no linker. The builds were monolithic just like this.
There was a big emphasis on reusability of the code in the original project, apparently, but this reusability took the form of inserting your deck of punch-cards at the appropriate position in somebody else's deck of punch-cards. (Actually, I believe a tape-library method was used to avoid having to continually reload the card decks, but that doesn't change the basic principle.) So, indeed, the method of file-inclusion is a very fair representation of the methods used in the original development ... with the improvement, of course, that you no longer have to worry about dropping the card deck. On the other hand, I wasn't there at the time, so I may have no idea what I'm talking about.
Finally, note that the original Apollo AGC assembler (called "YUL") is no longer available (as far as I can tell). In fact, it was replaced by another assembler ("GAP") even before Apollo 11, but GAP is no more available than is YUL. The replacement assembler yaYUL accepts a slightly different format for the source code from what YUL or GAP accepted, so the source code has been targeted for assembly with yaYUL.
What follows is simply a bunch of file-includes for the individual code chunks. I've marked the page numbers to make proof-reading easier. Besides, the digital images of the assembly listing contains a lot of interesting tables (cross-referenced to page numbers) created by GAP, but not duplicated by yaYUL, so it's still valuable even if the source-files listed below are at hand.
Source Code Index
Derived from MAIN.agc
MISCELLANEOUS
| Source File | Page Number |
|---|---|
| GAP-generated tables | 89, 1511-1743 |