diff --git a/AGC_BLOCK_TWO_SELF-CHECK.s b/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s similarity index 100% rename from AGC_BLOCK_TWO_SELF-CHECK.s rename to Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s diff --git a/ALARM_AND_ABORT.s b/Comanche055/ALARM_AND_ABORT.s similarity index 100% rename from ALARM_AND_ABORT.s rename to Comanche055/ALARM_AND_ABORT.s diff --git a/ANGLFIND.s b/Comanche055/ANGLFIND.s similarity index 100% rename from ANGLFIND.s rename to Comanche055/ANGLFIND.s diff --git a/ASSEMBLY_AND_OPERATION_INFORMATION.s b/Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s similarity index 100% rename from ASSEMBLY_AND_OPERATION_INFORMATION.s rename to Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s diff --git a/AUTOMATIC_MANEUVERS.s b/Comanche055/AUTOMATIC_MANEUVERS.s similarity index 100% rename from AUTOMATIC_MANEUVERS.s rename to Comanche055/AUTOMATIC_MANEUVERS.s diff --git a/CM_BODY_ATTITUDE.s b/Comanche055/CM_BODY_ATTITUDE.s similarity index 100% rename from CM_BODY_ATTITUDE.s rename to Comanche055/CM_BODY_ATTITUDE.s diff --git a/CM_ENTRY_DIGITAL_AUTOPILOT.s b/Comanche055/CM_ENTRY_DIGITAL_AUTOPILOT.s similarity index 100% rename from CM_ENTRY_DIGITAL_AUTOPILOT.s rename to Comanche055/CM_ENTRY_DIGITAL_AUTOPILOT.s diff --git a/CONIC_SUBROUTINES.s b/Comanche055/CONIC_SUBROUTINES.s similarity index 100% rename from CONIC_SUBROUTINES.s rename to Comanche055/CONIC_SUBROUTINES.s diff --git a/CONTRACT_AND_APPROVALS.s b/Comanche055/CONTRACT_AND_APPROVALS.s similarity index 100% rename from CONTRACT_AND_APPROVALS.s rename to Comanche055/CONTRACT_AND_APPROVALS.s diff --git a/CSM_GEOMETRY.s b/Comanche055/CSM_GEOMETRY.s similarity index 100% rename from CSM_GEOMETRY.s rename to Comanche055/CSM_GEOMETRY.s diff --git a/DISPLAY_INTERFACE_ROUTINES.s b/Comanche055/DISPLAY_INTERFACE_ROUTINES.s similarity index 100% rename from DISPLAY_INTERFACE_ROUTINES.s rename to Comanche055/DISPLAY_INTERFACE_ROUTINES.s diff --git a/DOWN-TELEMETRY_PROGRAM.s b/Comanche055/DOWN-TELEMETRY_PROGRAM.s similarity index 100% rename from DOWN-TELEMETRY_PROGRAM.s rename to Comanche055/DOWN-TELEMETRY_PROGRAM.s diff --git a/DOWNLINK_LISTS.s b/Comanche055/DOWNLINK_LISTS.s similarity index 100% rename from DOWNLINK_LISTS.s rename to Comanche055/DOWNLINK_LISTS.s diff --git a/ENTRY_LEXICON.s b/Comanche055/ENTRY_LEXICON.s similarity index 100% rename from ENTRY_LEXICON.s rename to Comanche055/ENTRY_LEXICON.s diff --git a/ERASABLE_ASSIGNMENTS.s b/Comanche055/ERASABLE_ASSIGNMENTS.s similarity index 100% rename from ERASABLE_ASSIGNMENTS.s rename to Comanche055/ERASABLE_ASSIGNMENTS.s diff --git a/EXECUTIVE.s b/Comanche055/EXECUTIVE.s similarity index 100% rename from EXECUTIVE.s rename to Comanche055/EXECUTIVE.s diff --git a/EXTENDED_VERBS.s b/Comanche055/EXTENDED_VERBS.s similarity index 100% rename from EXTENDED_VERBS.s rename to Comanche055/EXTENDED_VERBS.s diff --git a/FIXED_FIXED_CONSTANT_POOL.s b/Comanche055/FIXED_FIXED_CONSTANT_POOL.s similarity index 100% rename from FIXED_FIXED_CONSTANT_POOL.s rename to Comanche055/FIXED_FIXED_CONSTANT_POOL.s diff --git a/FRESH_START_AND_RESTART.s b/Comanche055/FRESH_START_AND_RESTART.s similarity index 100% rename from FRESH_START_AND_RESTART.s rename to Comanche055/FRESH_START_AND_RESTART.s diff --git a/GIMBAL_LOCK_AVOIDANCE.s b/Comanche055/GIMBAL_LOCK_AVOIDANCE.s similarity index 100% rename from GIMBAL_LOCK_AVOIDANCE.s rename to Comanche055/GIMBAL_LOCK_AVOIDANCE.s diff --git a/GROUND_TRACKING_DETERMINATION_PROGRAM.s b/Comanche055/GROUND_TRACKING_DETERMINATION_PROGRAM.s similarity index 100% rename from GROUND_TRACKING_DETERMINATION_PROGRAM.s rename to Comanche055/GROUND_TRACKING_DETERMINATION_PROGRAM.s diff --git a/IMU_CALIBRATION_AND_ALIGNMENT.s b/Comanche055/IMU_CALIBRATION_AND_ALIGNMENT.s similarity index 100% rename from IMU_CALIBRATION_AND_ALIGNMENT.s rename to Comanche055/IMU_CALIBRATION_AND_ALIGNMENT.s diff --git a/IMU_COMPENSATION_PACKAGE.s b/Comanche055/IMU_COMPENSATION_PACKAGE.s similarity index 100% rename from IMU_COMPENSATION_PACKAGE.s rename to Comanche055/IMU_COMPENSATION_PACKAGE.s diff --git a/IMU_MODE_SWITCHING_ROUTINES.s b/Comanche055/IMU_MODE_SWITCHING_ROUTINES.s similarity index 99% rename from IMU_MODE_SWITCHING_ROUTINES.s rename to Comanche055/IMU_MODE_SWITCHING_ROUTINES.s index f10df43..3948cb8 100644 --- a/IMU_MODE_SWITCHING_ROUTINES.s +++ b/Comanche055/IMU_MODE_SWITCHING_ROUTINES.s @@ -425,7 +425,7 @@ PIPFREE INHINT # PROGRAM DONE WITH PIPAS. DON'T LIGHT EBANK= 1400 # VARIABLE, ACTUALLY. IMUPULSE TS MPAC +5 # SAVE ARRIVING ECADR. - TC CAGETSTJ # DON'T PROCEED IF IMU BEING CAGED. + TC CAGETSTJ # DONT PROCEED IF IMU BEING CAGED. CCS LGYRO # SEE IF GYROS BUSY. TC GYROBUSY # SLEEP. diff --git a/INFLIGHT_ALIGNMENT_ROUTINES.s b/Comanche055/INFLIGHT_ALIGNMENT_ROUTINES.s similarity index 100% rename from INFLIGHT_ALIGNMENT_ROUTINES.s rename to Comanche055/INFLIGHT_ALIGNMENT_ROUTINES.s diff --git a/INTEGRATION_INITIALIZATION.s b/Comanche055/INTEGRATION_INITIALIZATION.s similarity index 100% rename from INTEGRATION_INITIALIZATION.s rename to Comanche055/INTEGRATION_INITIALIZATION.s diff --git a/INTER-BANK_COMMUNICATION.s b/Comanche055/INTER-BANK_COMMUNICATION.s similarity index 100% rename from INTER-BANK_COMMUNICATION.s rename to Comanche055/INTER-BANK_COMMUNICATION.s diff --git a/INTERPRETER.s b/Comanche055/INTERPRETER.s similarity index 100% rename from INTERPRETER.s rename to Comanche055/INTERPRETER.s diff --git a/INTERPRETIVE_CONSTANTS.s b/Comanche055/INTERPRETIVE_CONSTANTS.s similarity index 100% rename from INTERPRETIVE_CONSTANTS.s rename to Comanche055/INTERPRETIVE_CONSTANTS.s diff --git a/INTERRUPT_LEAD_INS.s b/Comanche055/INTERRUPT_LEAD_INS.s similarity index 100% rename from INTERRUPT_LEAD_INS.s rename to Comanche055/INTERRUPT_LEAD_INS.s diff --git a/JET_SELECTION_LOGIC.s b/Comanche055/JET_SELECTION_LOGIC.s similarity index 100% rename from JET_SELECTION_LOGIC.s rename to Comanche055/JET_SELECTION_LOGIC.s diff --git a/KALCMANU_STEERING.s b/Comanche055/KALCMANU_STEERING.s similarity index 100% rename from KALCMANU_STEERING.s rename to Comanche055/KALCMANU_STEERING.s diff --git a/KEYRUPT_UPRUPT.s b/Comanche055/KEYRUPT_UPRUPT.s similarity index 100% rename from KEYRUPT_UPRUPT.s rename to Comanche055/KEYRUPT_UPRUPT.s diff --git a/LATITUDE_LONGITUDE_SUBROUTINES.s b/Comanche055/LATITUDE_LONGITUDE_SUBROUTINES.s similarity index 100% rename from LATITUDE_LONGITUDE_SUBROUTINES.s rename to Comanche055/LATITUDE_LONGITUDE_SUBROUTINES.s diff --git a/LUNAR_AND_SOLAR_EPHEMERIDES_SUBROUTINES.s b/Comanche055/LUNAR_AND_SOLAR_EPHEMERIDES_SUBROUTINES.s similarity index 100% rename from LUNAR_AND_SOLAR_EPHEMERIDES_SUBROUTINES.s rename to Comanche055/LUNAR_AND_SOLAR_EPHEMERIDES_SUBROUTINES.s diff --git a/LUNAR_LANDMARK_SELECTION_FOR_CM.s b/Comanche055/LUNAR_LANDMARK_SELECTION_FOR_CM.s similarity index 100% rename from LUNAR_LANDMARK_SELECTION_FOR_CM.s rename to Comanche055/LUNAR_LANDMARK_SELECTION_FOR_CM.s diff --git a/MAIN.s b/Comanche055/MAIN.s similarity index 100% rename from MAIN.s rename to Comanche055/MAIN.s diff --git a/MEASUREMENT_INCORPORATION.s b/Comanche055/MEASUREMENT_INCORPORATION.s similarity index 100% rename from MEASUREMENT_INCORPORATION.s rename to Comanche055/MEASUREMENT_INCORPORATION.s diff --git a/MYSUBS.s b/Comanche055/MYSUBS.s similarity index 100% rename from MYSUBS.s rename to Comanche055/MYSUBS.s diff --git a/ORBITAL_INTEGRATION.s b/Comanche055/ORBITAL_INTEGRATION.s similarity index 100% rename from ORBITAL_INTEGRATION.s rename to Comanche055/ORBITAL_INTEGRATION.s diff --git a/P11.s b/Comanche055/P11.s similarity index 100% rename from P11.s rename to Comanche055/P11.s diff --git a/P20-P25.s b/Comanche055/P20-P25.s similarity index 100% rename from P20-P25.s rename to Comanche055/P20-P25.s diff --git a/P30-P37.s b/Comanche055/P30-P37.s similarity index 100% rename from P30-P37.s rename to Comanche055/P30-P37.s diff --git a/P32-P33_P72-P73.s b/Comanche055/P32-P33_P72-P73.s similarity index 100% rename from P32-P33_P72-P73.s rename to Comanche055/P32-P33_P72-P73.s diff --git a/P34-35_P74-75.s b/Comanche055/P34-35_P74-75.s similarity index 100% rename from P34-35_P74-75.s rename to Comanche055/P34-35_P74-75.s diff --git a/P37_P70.s b/Comanche055/P37_P70.s similarity index 100% rename from P37_P70.s rename to Comanche055/P37_P70.s diff --git a/P40-P47.s b/Comanche055/P40-P47.s similarity index 100% rename from P40-P47.s rename to Comanche055/P40-P47.s diff --git a/P51-P53.s b/Comanche055/P51-P53.s similarity index 100% rename from P51-P53.s rename to Comanche055/P51-P53.s diff --git a/P61-P67.s b/Comanche055/P61-P67.s similarity index 99% rename from P61-P67.s rename to Comanche055/P61-P67.s index ced25b3..c09d0d2 100644 --- a/P61-P67.s +++ b/Comanche055/P61-P67.s @@ -660,7 +660,7 @@ C(30)LIM 2DEC .566985 # = 1.0 - .5 COS(30) # PROGRAM CALCULATES ENTRY DISPLAY OF MAXIMUM ACCELERATION EXPECTED (GMAX) AND ALSO THE EXPECTED # INERTIAL VELOCITY (VPRED) AND ENTRY ANGLE (GAMMAEI) THAT WILL OBTAIN AT 400K FT ABOVE THE FISCHER # ELLIPSOID. PROGRAM ALSO CALCULATES A SECOND DISPLAY RELATIVE TO THE EMSALT ABOVE FISCHER ELLIPSOID -# AND CONSISTS OF RANGE TO SPLASH FOM NOW (RTGO) , PREDICTED INERTIAL VELOCITY (VIO) , AND THE TIME TO +# AND CONSISTS OF RANGE TO SPLASH FROM NOW (RTGO) , PREDICTED INERTIAL VELOCITY (VIO) , AND THE TIME TO # GO FROM NOW (TTE) . # # CALLING SEQUENCE: CALL diff --git a/P76.s b/Comanche055/P76.s similarity index 100% rename from P76.s rename to Comanche055/P76.s diff --git a/PHASE_TABLE_MAINTENANCE.s b/Comanche055/PHASE_TABLE_MAINTENANCE.s similarity index 100% rename from PHASE_TABLE_MAINTENANCE.s rename to Comanche055/PHASE_TABLE_MAINTENANCE.s diff --git a/PINBALL_GAME_BUTTONS_AND_LIGHTS.s b/Comanche055/PINBALL_GAME_BUTTONS_AND_LIGHTS.s similarity index 100% rename from PINBALL_GAME_BUTTONS_AND_LIGHTS.s rename to Comanche055/PINBALL_GAME_BUTTONS_AND_LIGHTS.s diff --git a/PINBALL_NOUN_TABLES.s b/Comanche055/PINBALL_NOUN_TABLES.s similarity index 100% rename from PINBALL_NOUN_TABLES.s rename to Comanche055/PINBALL_NOUN_TABLES.s diff --git a/PLANETARY_INERTIAL_ORIENTATION.s b/Comanche055/PLANETARY_INERTIAL_ORIENTATION.s similarity index 100% rename from PLANETARY_INERTIAL_ORIENTATION.s rename to Comanche055/PLANETARY_INERTIAL_ORIENTATION.s diff --git a/POWERED_FLIGHT_SUBROUTINES.s b/Comanche055/POWERED_FLIGHT_SUBROUTINES.s similarity index 100% rename from POWERED_FLIGHT_SUBROUTINES.s rename to Comanche055/POWERED_FLIGHT_SUBROUTINES.s diff --git a/R30.s b/Comanche055/R30.s similarity index 100% rename from R30.s rename to Comanche055/R30.s diff --git a/R31.s b/Comanche055/R31.s similarity index 100% rename from R31.s rename to Comanche055/R31.s diff --git a/R60_62.s b/Comanche055/R60_62.s similarity index 100% rename from R60_62.s rename to Comanche055/R60_62.s diff --git a/RCS-CSM_DAP_EXECUTIVE_PROGRAMS.s b/Comanche055/RCS-CSM_DAP_EXECUTIVE_PROGRAMS.s similarity index 100% rename from RCS-CSM_DAP_EXECUTIVE_PROGRAMS.s rename to Comanche055/RCS-CSM_DAP_EXECUTIVE_PROGRAMS.s diff --git a/RCS-CSM_DIGITAL_AUTOPILOT.s b/Comanche055/RCS-CSM_DIGITAL_AUTOPILOT.s similarity index 100% rename from RCS-CSM_DIGITAL_AUTOPILOT.s rename to Comanche055/RCS-CSM_DIGITAL_AUTOPILOT.s diff --git a/REENTRY_CONTROL.s b/Comanche055/REENTRY_CONTROL.s similarity index 100% rename from REENTRY_CONTROL.s rename to Comanche055/REENTRY_CONTROL.s diff --git a/RESTARTS_ROUTINE.s b/Comanche055/RESTARTS_ROUTINE.s similarity index 100% rename from RESTARTS_ROUTINE.s rename to Comanche055/RESTARTS_ROUTINE.s diff --git a/RESTART_TABLES.s b/Comanche055/RESTART_TABLES.s similarity index 100% rename from RESTART_TABLES.s rename to Comanche055/RESTART_TABLES.s diff --git a/RT8_OP_CODES.s b/Comanche055/RT8_OP_CODES.s similarity index 100% rename from RT8_OP_CODES.s rename to Comanche055/RT8_OP_CODES.s diff --git a/S-BAND_ANTENNA_FOR_CM.s b/Comanche055/S-BAND_ANTENNA_FOR_CM.s similarity index 100% rename from S-BAND_ANTENNA_FOR_CM.s rename to Comanche055/S-BAND_ANTENNA_FOR_CM.s diff --git a/SERVICER207.s b/Comanche055/SERVICER207.s similarity index 100% rename from SERVICER207.s rename to Comanche055/SERVICER207.s diff --git a/SERVICE_ROUTINES.s b/Comanche055/SERVICE_ROUTINES.s similarity index 100% rename from SERVICE_ROUTINES.s rename to Comanche055/SERVICE_ROUTINES.s diff --git a/SINGLE_PRECISION_SUBROUTINES.s b/Comanche055/SINGLE_PRECISION_SUBROUTINES.s similarity index 100% rename from SINGLE_PRECISION_SUBROUTINES.s rename to Comanche055/SINGLE_PRECISION_SUBROUTINES.s diff --git a/STABLE_ORBIT.s b/Comanche055/STABLE_ORBIT.s similarity index 100% rename from STABLE_ORBIT.s rename to Comanche055/STABLE_ORBIT.s diff --git a/STAR_TABLES.s b/Comanche055/STAR_TABLES.s similarity index 100% rename from STAR_TABLES.s rename to Comanche055/STAR_TABLES.s diff --git a/SXTMARK.s b/Comanche055/SXTMARK.s similarity index 100% rename from SXTMARK.s rename to Comanche055/SXTMARK.s diff --git a/SYSTEM_TEST_STANDARD_LEAD_INS.s b/Comanche055/SYSTEM_TEST_STANDARD_LEAD_INS.s similarity index 100% rename from SYSTEM_TEST_STANDARD_LEAD_INS.s rename to Comanche055/SYSTEM_TEST_STANDARD_LEAD_INS.s diff --git a/T4RUPT_PROGRAM.s b/Comanche055/T4RUPT_PROGRAM.s similarity index 100% rename from T4RUPT_PROGRAM.s rename to Comanche055/T4RUPT_PROGRAM.s diff --git a/TAGS_FOR_RELATIVE_SETLOC.s b/Comanche055/TAGS_FOR_RELATIVE_SETLOC.s similarity index 100% rename from TAGS_FOR_RELATIVE_SETLOC.s rename to Comanche055/TAGS_FOR_RELATIVE_SETLOC.s diff --git a/TIME_OF_FREE_FALL.s b/Comanche055/TIME_OF_FREE_FALL.s similarity index 100% rename from TIME_OF_FREE_FALL.s rename to Comanche055/TIME_OF_FREE_FALL.s diff --git a/TPI_SEARCH.s b/Comanche055/TPI_SEARCH.s similarity index 100% rename from TPI_SEARCH.s rename to Comanche055/TPI_SEARCH.s diff --git a/TVCDAPS.s b/Comanche055/TVCDAPS.s similarity index 100% rename from TVCDAPS.s rename to Comanche055/TVCDAPS.s diff --git a/TVCEXECUTIVE.s b/Comanche055/TVCEXECUTIVE.s similarity index 100% rename from TVCEXECUTIVE.s rename to Comanche055/TVCEXECUTIVE.s diff --git a/TVCINITIALIZE.s b/Comanche055/TVCINITIALIZE.s similarity index 100% rename from TVCINITIALIZE.s rename to Comanche055/TVCINITIALIZE.s diff --git a/TVCMASSPROP.s b/Comanche055/TVCMASSPROP.s similarity index 100% rename from TVCMASSPROP.s rename to Comanche055/TVCMASSPROP.s diff --git a/TVCRESTARTS.s b/Comanche055/TVCRESTARTS.s similarity index 100% rename from TVCRESTARTS.s rename to Comanche055/TVCRESTARTS.s diff --git a/TVCROLLDAP.s b/Comanche055/TVCROLLDAP.s similarity index 100% rename from TVCROLLDAP.s rename to Comanche055/TVCROLLDAP.s diff --git a/TVCSTROKETEST.s b/Comanche055/TVCSTROKETEST.s similarity index 100% rename from TVCSTROKETEST.s rename to Comanche055/TVCSTROKETEST.s diff --git a/UPDATE_PROGRAM.s b/Comanche055/UPDATE_PROGRAM.s similarity index 99% rename from UPDATE_PROGRAM.s rename to Comanche055/UPDATE_PROGRAM.s index e3f83d8..3b86857 100644 --- a/UPDATE_PROGRAM.s +++ b/Comanche055/UPDATE_PROGRAM.s @@ -44,7 +44,7 @@ # FUNCT. DESCR.: P27 (THE UPDATE PROGRAM) PROCESSES COMMANDS AND DATA # INSERTIONS REQUESTED BY THE GROUND VIA UPLINK. # THE P27 PROGRAM WILL ACCEPT UPDATES -# ONLY DURING P00 FOR THE LM, AND ONLY DURINT P00, +# ONLY DURING P00 FOR THE LM, AND ONLY DURING P00, # P02, AND FRESH START FOR THE CSM. # # CALLING SEQ: PROGRAM IS INITIATED BY UPLINK ENTRY OF VERBS 70, 71, 72, AND 73. diff --git a/WAITLIST.s b/Comanche055/WAITLIST.s similarity index 99% rename from WAITLIST.s rename to Comanche055/WAITLIST.s index a77c93d..e9b1d30 100644 --- a/WAITLIST.s +++ b/Comanche055/WAITLIST.s @@ -236,7 +236,7 @@ WAIT2 TS WAITBANK # BBANK OF CALLING PROGRAM. # NOTE THAT THIS PROGRAM SECTION IS NEVER ENTERED WHEN T-T1 G/E -1, # SINCE TD-T1+1 = (TD-T) + (T-T1+1), AND DELTA T = TD-T G/E +1. (G/E # SYMBOL MEANS GREATER THAN OR EQUAL TO). THUS THERE NEED BE NO CON- -# CERN OVER A PREVIOUS OR IMMINENT OVEFLOW OF TIME3 HERE. +# CERN OVER A PREVIOUS OR IMMINENT OVERFLOW OF TIME3 HERE. AD POS1/2 # WHEN TD IS NEXT, FORM QUANTITY AD POS1/2 # 1.0 - DELTA T = 1.0 - (TD - T) diff --git a/AGC_BLOCK_TWO_SELF_CHECK.s b/Luminary099/AGC_BLOCK_TWO_SELF_CHECK.s similarity index 100% rename from AGC_BLOCK_TWO_SELF_CHECK.s rename to Luminary099/AGC_BLOCK_TWO_SELF_CHECK.s diff --git a/AGS_INITIALIZATION.s b/Luminary099/AGS_INITIALIZATION.s similarity index 99% rename from AGS_INITIALIZATION.s rename to Luminary099/AGS_INITIALIZATION.s index 0de4fad..ca7bb8b 100644 --- a/AGS_INITIALIZATION.s +++ b/Luminary099/AGS_INITIALIZATION.s @@ -26,7 +26,7 @@ # Page 206 -# PROGRAM NAME: AGS INITIALIZIZATION (R47) +# PROGRAM NAME: AGS INITIALIZATION (R47) # # WRITTEN BY: RHODE/KILROY/FOLLETT # diff --git a/AOSTASK_AND_AOSJOB.s b/Luminary099/AOSTASK_AND_AOSJOB.s similarity index 99% rename from AOSTASK_AND_AOSJOB.s rename to Luminary099/AOSTASK_AND_AOSJOB.s index 59dcc97..83fba58 100644 --- a/AOSTASK_AND_AOSJOB.s +++ b/Luminary099/AOSTASK_AND_AOSJOB.s @@ -264,9 +264,9 @@ JACCUV CS COEFFQ TCF STCTR1 # THIS SECTION COMPUTES THE RATE OF CHANGE OF ACCELERATION DUE TO THE ROTATION OF THE GIMBALS. THE EQUATION -# IMPLEMENTED IN BOTH THE Y-X PLANE AND THE Z-X PLANE IS -- D(ALPHA)/DT = TL/I*D(DELTA)/DT, WEHRE +# IMPLEMENTED IN BOTH THE Y-X PLANE AND THE Z-X PLANE IS -- D(ALPHA)/DT = TL/I*D(DELTA)/DT, WHERE # T = ENGINE THRUST FORCE -# L = PIVIT TO CG DISTANCE OF ENGINE +# L = PIVOT TO CG DISTANCE OF ENGINE # I = MOMENT OF INERTIA LRESC CAE ABDELV # SCALED AT 2(13) CM/SEC(2) diff --git a/AOTMARK.s b/Luminary099/AOTMARK.s similarity index 99% rename from AOTMARK.s rename to Luminary099/AOTMARK.s index 141f069..e83936a 100644 --- a/AOTMARK.s +++ b/Luminary099/AOTMARK.s @@ -63,7 +63,7 @@ MKVAC CCS VAC1USE # LOOK FOR A VAC AREAD -- DO ABORT IF OCT 01207 MKVACFND AD TWO - TS MARKSTAT # STORE VAC ADR IN LOW 9 OF MARKSTAT + TS MARKSTAT # STORE VAC ADR IN LOW 9 OF MARKSTAT CAF ZERO INDEX MARKSTAT diff --git a/ASCENT_GUIDANCE.s b/Luminary099/ASCENT_GUIDANCE.s similarity index 100% rename from ASCENT_GUIDANCE.s rename to Luminary099/ASCENT_GUIDANCE.s diff --git a/ATTITUDE_MANEUVER_ROUTINE.s b/Luminary099/ATTITUDE_MANEUVER_ROUTINE.s similarity index 100% rename from ATTITUDE_MANEUVER_ROUTINE.s rename to Luminary099/ATTITUDE_MANEUVER_ROUTINE.s diff --git a/BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.s b/Luminary099/BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.s similarity index 100% rename from BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.s rename to Luminary099/BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.s diff --git a/CONTROLLED_CONSTANTS.s b/Luminary099/CONTROLLED_CONSTANTS.s similarity index 100% rename from CONTROLLED_CONSTANTS.s rename to Luminary099/CONTROLLED_CONSTANTS.s diff --git a/DAPIDLER_PROGRAM.s b/Luminary099/DAPIDLER_PROGRAM.s similarity index 100% rename from DAPIDLER_PROGRAM.s rename to Luminary099/DAPIDLER_PROGRAM.s diff --git a/DAP_INTERFACE_SUBROUTINES.s b/Luminary099/DAP_INTERFACE_SUBROUTINES.s similarity index 100% rename from DAP_INTERFACE_SUBROUTINES.s rename to Luminary099/DAP_INTERFACE_SUBROUTINES.s diff --git a/DOWN_TELEMETRY_PROGRAM.s b/Luminary099/DOWN_TELEMETRY_PROGRAM.s similarity index 100% rename from DOWN_TELEMETRY_PROGRAM.s rename to Luminary099/DOWN_TELEMETRY_PROGRAM.s diff --git a/FINDCDUW--GUIDAP_INTERFACE.s b/Luminary099/FINDCDUW--GUIDAP_INTERFACE.s similarity index 100% rename from FINDCDUW--GUIDAP_INTERFACE.s rename to Luminary099/FINDCDUW--GUIDAP_INTERFACE.s diff --git a/FLAGWORD_ASSIGNMENTS.s b/Luminary099/FLAGWORD_ASSIGNMENTS.s similarity index 100% rename from FLAGWORD_ASSIGNMENTS.s rename to Luminary099/FLAGWORD_ASSIGNMENTS.s diff --git a/HeaderTemplate.s b/Luminary099/HeaderTemplate.s similarity index 100% rename from HeaderTemplate.s rename to Luminary099/HeaderTemplate.s diff --git a/IMU_PERFORMANCE_TESTS_4.s b/Luminary099/IMU_PERFORMANCE_TESTS_4.s similarity index 100% rename from IMU_PERFORMANCE_TESTS_4.s rename to Luminary099/IMU_PERFORMANCE_TESTS_4.s diff --git a/IMU_PERFORMANCE_TEST_2.s b/Luminary099/IMU_PERFORMANCE_TEST_2.s similarity index 100% rename from IMU_PERFORMANCE_TEST_2.s rename to Luminary099/IMU_PERFORMANCE_TEST_2.s diff --git a/INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.s b/Luminary099/INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.s similarity index 100% rename from INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.s rename to Luminary099/INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.s diff --git a/INTERPRETIVE_CONSTANT.s b/Luminary099/INTERPRETIVE_CONSTANT.s similarity index 100% rename from INTERPRETIVE_CONSTANT.s rename to Luminary099/INTERPRETIVE_CONSTANT.s diff --git a/KALMAN_FILTER.s b/Luminary099/KALMAN_FILTER.s similarity index 100% rename from KALMAN_FILTER.s rename to Luminary099/KALMAN_FILTER.s diff --git a/LAMBERT_AIMPOINT_GUIDANCE.s b/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.s similarity index 100% rename from LAMBERT_AIMPOINT_GUIDANCE.s rename to Luminary099/LAMBERT_AIMPOINT_GUIDANCE.s diff --git a/LANDING_ANALOG_DISPLAYS.s b/Luminary099/LANDING_ANALOG_DISPLAYS.s similarity index 100% rename from LANDING_ANALOG_DISPLAYS.s rename to Luminary099/LANDING_ANALOG_DISPLAYS.s diff --git a/LEM_GEOMETRY.s b/Luminary099/LEM_GEOMETRY.s similarity index 98% rename from LEM_GEOMETRY.s rename to Luminary099/LEM_GEOMETRY.s index 3569a4c..33af2e7 100644 --- a/LEM_GEOMETRY.s +++ b/Luminary099/LEM_GEOMETRY.s @@ -36,7 +36,7 @@ # THESE TWO ROUTINES COMPUTE THE ACTUAL STATE VECTOR FOR LM,CSM BY ADDING # THE CONIC R,V AND THE DEVIATIONS R,V. THE STATE VECTORS ARE CONVERTED TO -# METERS B-29 AND METERS/CSEC B-7 AND STORED APPROPIRATELY IN RN,VN OR +# METERS B-29 AND METERS/CSEC B-7 AND STORED APPROPRIATELY IN RN,VN OR # R-OTHER,V-OTHER FOR DOWNLINK. THE ROUTINES' NAMES ARE SWITCHED IN THE # OTHER VEHICLE'S COMPUTER. # diff --git a/LUNAR_LANDING_GUIDANCE_EQUATIONS.s b/Luminary099/LUNAR_LANDING_GUIDANCE_EQUATIONS.s similarity index 100% rename from LUNAR_LANDING_GUIDANCE_EQUATIONS.s rename to Luminary099/LUNAR_LANDING_GUIDANCE_EQUATIONS.s diff --git a/P-AXIS_RCS_AUTOPILOT.s b/Luminary099/P-AXIS_RCS_AUTOPILOT.s similarity index 100% rename from P-AXIS_RCS_AUTOPILOT.s rename to Luminary099/P-AXIS_RCS_AUTOPILOT.s diff --git a/P12.s b/Luminary099/P12.s similarity index 100% rename from P12.s rename to Luminary099/P12.s diff --git a/P30_P37.s b/Luminary099/P30_P37.s similarity index 100% rename from P30_P37.s rename to Luminary099/P30_P37.s diff --git a/P32-P35_P72-P75.s b/Luminary099/P32-P35_P72-P75.s similarity index 100% rename from P32-P35_P72-P75.s rename to Luminary099/P32-P35_P72-P75.s diff --git a/P70-P71.s b/Luminary099/P70-P71.s similarity index 100% rename from P70-P71.s rename to Luminary099/P70-P71.s diff --git a/Q_R-AXIS_RCS_AUTOPILOT.s b/Luminary099/Q_R-AXIS_RCS_AUTOPILOT.s similarity index 100% rename from Q_R-AXIS_RCS_AUTOPILOT.s rename to Luminary099/Q_R-AXIS_RCS_AUTOPILOT.s diff --git a/R63.s b/Luminary099/R63.s similarity index 100% rename from R63.s rename to Luminary099/R63.s diff --git a/RADAR_LEADIN_ROUTINES.s b/Luminary099/RADAR_LEADIN_ROUTINES.s similarity index 100% rename from RADAR_LEADIN_ROUTINES.s rename to Luminary099/RADAR_LEADIN_ROUTINES.s diff --git a/RCS_FAILURE_MONITOR.s b/Luminary099/RCS_FAILURE_MONITOR.s similarity index 100% rename from RCS_FAILURE_MONITOR.s rename to Luminary099/RCS_FAILURE_MONITOR.s diff --git a/RTB_OP_CODES.s b/Luminary099/RTB_OP_CODES.s similarity index 100% rename from RTB_OP_CODES.s rename to Luminary099/RTB_OP_CODES.s diff --git a/S-BAND_ANTENNA_FOR_LM.s b/Luminary099/S-BAND_ANTENNA_FOR_LM.s similarity index 100% rename from S-BAND_ANTENNA_FOR_LM.s rename to Luminary099/S-BAND_ANTENNA_FOR_LM.s diff --git a/SERVICER.s b/Luminary099/SERVICER.s similarity index 100% rename from SERVICER.s rename to Luminary099/SERVICER.s diff --git a/SPS_BACK-UP_RCS_CONTROL.s b/Luminary099/SPS_BACK-UP_RCS_CONTROL.s similarity index 100% rename from SPS_BACK-UP_RCS_CONTROL.s rename to Luminary099/SPS_BACK-UP_RCS_CONTROL.s diff --git a/T6-RUPT_PROGRAMS.s b/Luminary099/T6-RUPT_PROGRAMS.s similarity index 100% rename from T6-RUPT_PROGRAMS.s rename to Luminary099/T6-RUPT_PROGRAMS.s diff --git a/THE_LUNAR_LANDING.s b/Luminary099/THE_LUNAR_LANDING.s similarity index 100% rename from THE_LUNAR_LANDING.s rename to Luminary099/THE_LUNAR_LANDING.s diff --git a/THROTTLE_CONTROL_ROUTINES.s b/Luminary099/THROTTLE_CONTROL_ROUTINES.s similarity index 100% rename from THROTTLE_CONTROL_ROUTINES.s rename to Luminary099/THROTTLE_CONTROL_ROUTINES.s diff --git a/TJET_LAW.s b/Luminary099/TJET_LAW.s similarity index 100% rename from TJET_LAW.s rename to Luminary099/TJET_LAW.s diff --git a/TRIM_GIMBAL_CNTROL_SYSTEM.s b/Luminary099/TRIM_GIMBAL_CNTROL_SYSTEM.s similarity index 100% rename from TRIM_GIMBAL_CNTROL_SYSTEM.s rename to Luminary099/TRIM_GIMBAL_CNTROL_SYSTEM.s diff --git a/README.md b/README.md index c295025..efc1c3a 100644 --- a/README.md +++ b/README.md @@ -1,4 +1,79 @@ Apollo-11 ========= -Original Apollo 11 guidance computer (AGC) source code, in assembly, for Command Module (Comanche055) and Lunar Module (Luminary099). +Original Apollo 11 guidance computer (AGC) source code, converted from their custom .agc files to .s files for syntax highlighting, for Command Module (Comanche055) and Lunar Module (Luminary099). Digitized by the folks at [Virtual AGC](http://www.ibiblio.org/apollo/) and [MIT Museum](http://web.mit.edu/museum/). The goal is to be a repo for the original Apollo 11 source code. As such, PRs are welcome for any issues identified between the transcriptions in this repository and the original source scans for [Luminary 099](http://www.ibiblio.org/apollo/ScansForConversion/Luminary099/) and [Comanche 055](http://www.ibiblio.org/apollo/ScansForConversion/Comanche055/), as well as any files I may have missed. + +####Attribution + + Copyright: Public domain. + Filename: CONTRACT_AND_APPROVALS.agc + Purpose: Part of the source code for Colossus 2A, AKA Comanche 055. + It is part of the source code for the Command Module's (CM) + Apollo Guidance Computer (AGC), for Apollo 11. + Assembler: yaYUL + Contact: Ron Burkey . + Website: www.ibiblio.org/apollo. + Mod history: 2009-05-06 RSB Transcribed from page images. + + 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 055 of AGC program Comanche by NASA + 2021113-051. 10:28 APR. 1, 1969 + + Page 1 + + #************************************************************************ + # * + # THIS AGC PROGRAM SHALL ALSO BE REFERRED TO AS: * + # * + # * + # COLOSSUS 2A * + # * + # * + # THIS PROGRAM IS INTENDED FOR USE IN THE CM AS SPECIFIED * + # IN REPORT R-577. THIS PROGRAM WAS PREPARED UNDER DSR * + # PROJECT 55-23870, SPONSORED BY THE MANNED SPACECRAFT * + # CENTER OF THE NATIONAL AERONAUTICS AND SPACE * + # ADMINISTRATION THROUGH CONTRACT NAS 9-4065 WITH THE * + # INSTRUMENTATION LABORATORY, MASSACHUSETTS INSTITUTE OF * + # TECHNOLOGY, CAMBRIDGE, MASS. * + # * + #************************************************************************ + + + SUBMITTED: MARGARET H. HAMILTON DATE: 28 MAR 69 + M.H.HAMILTON, COLOSSUS PROGRAMMING LEADER + APOLLO GUIDANCE AND NAVIGATION + + APPROVED: DANIEL J. LICKLY DATE: 28 MAR 69 + D.J.LICKLY, DIRECTOR, MISSION PROGRAM DEVELOPMENT + APOLLO GUIDANCE AND NAVIGATION PROGRAM + + APPROVED: FRED H. MARTIN DATE: 28 MAR 69 + FRED H. MARTIN, COLOSSUS PROJECT MANAGER + APOLLO GUIDANCE AND NAVIGATION PROGRAM + + APPROVED: NORMAN E. SEARS DATE: 28 MAR 69 + N.E. SEARS, DIRECTOR, MISSION DEVELOPMENT + APOLLO GUIDANCE AND NAVIGATION PROGRAM + + APPROVED: RICHARD H. BATTIN DATE: 28 MAR 69 + R.H. BATTIN, DIRECTOR, MISSION DEVELOPMENT + APOLLO GUIDANCE AND NAVIGATION PROGRAM + + APPROVED: DAVID G. HOAG DATE: 28 MAR 69 + D.G. HOAG, DIRECTOR + APOLLO GUIDANCE AND NAVIGATION PROGRAM + + APPROVED: RALPH R. RAGAN DATE: 28 MAR 69 + R.R. RAGAN, DEPUTY DIRECTOR + INSTRUMENTATION LABORATORY