diff --git a/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.agc b/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.agc index b2b733d..f18399c 100644 --- a/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.agc +++ b/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.agc @@ -25,75 +25,75 @@ # Notations on the hardcopy document read, in part: # # Assemble revision 001 of AGC program LMY99 by NASA 2021112-061 -# 16:27 JULY 14, 1969 +# 16:27 JULY 14,1969 # Page 651 -# GENERAL LAMBERT AIMPOINT GUIDANCE ** -# WRITTEN BY RAMA M AIYAWAR +# GENERAL LAMBERT AIMPOINT GUIDANCE ** +# WRITTEN BY RAMA M AIYAWAR # PROGRAM P-31 DESCRIPTION ** # -# 1. TO ACCEPT TARGETING PARAMETERS OBTAINED FROM A SOURCE EXTERNAL -# TO THE LEM AND COMPUTE THERE FROM THE REQUIRED-VELOCITY AND -# OTHER INITIAL CONDITIONS REQUIRED BY LM FOR DESIRED MANEUVER. -# THE TARGETING PARAMETERS ARE TIG (TIME OF IGNITION), TARGET -# VECTOR (RTARG), AND THE TIME FROM TIG UNTIL THE TARGET IS -# REACHED (DELLT4), DESIRED TIME OF FLIGHT FROM RINIT TO RTARG. +# 1. TO ACCEPT TARGETING PARAMETERS OBTAINED FROM A SOURCE EXTERNAL +# TO THE LEM AND COMPUTE THERE FROM THE REQUIRED-VELOCITY AND +# OTHER INITIAL CONDITIONS REQUIRED BY LM FOR DESIRED MANEUVER. +# THE TARGETING PARAMETERS ARE TIG (TIME OF IGNITION), TARGET +# VECTOR (RTARG), AND THE TIME FROM TIG UNTIL THE TARGET IS +# REACHED(DELLT4),DESIRED TIME OF FLIGHT FROM RINIT TO RTARG.. # ASSUMPTIONS ** # -# 1. THE TARGET PARAMETERS MAY HAVE BEEN LOADED PRIOR TO THE -# EXECUTION OF THIS PROGRAM. -# 2. THIS PROGRAM IS APPLICABLE IN EITHER EARTH OR LUNAR ORBIT. -# 3. THIS PROGRAM IS DESIGNED FOR ONE-MAN OPERATION, AND SHOULD -# BE SELECTED BY THE ASTRONAUT BY DSKY ENTRY V37 E31. +# 1. THE TARGET PARAMETERS MAY HAVE BEEN LOADED PRIOR TO THE +# EXECUTION OF THIS PROGRAM. +# 2. THIS PROGRAM IS APPLICABLE IN EITHER EARTH OR LUNAR ORBIT. +# 3. THIS PROGRAM IS DESIGNED FOR ONE-MAN OPERATION, AND SHOULD +# BE SELECTED BY THE ASTRONAUT BY DSKY ENTRY V37 E31. # SUBROUTINES USED ** # # MANUPARM, TTG/N35, R02BOTH, MIDGIM, DISPMGA, FLAGDOWN, BANKCALL, # GOTOPOOH, ENDOFJOB, PHASCHNG, GOFLASHR, GOFLASH. # -# MANUPARM CALCULATES APOGEE, PERIGEE ALTITUDES AND DELTAV DESIRED -# FOR THE MANEUVER. +# MANUPARM CALCULATES APOGEE, PERIGEE ALTITUDES AND DELTAV DESIRED +# FOR THE MANEUVER. # -# TTG/N35 CLOCKTASK - UPDATES CLOCK. +# TTG/N35 CLOCKTASK - UPDATES CLOCK. # -# MIDGIM CALCULATES MIDDLE GIMBAL ANGLE FOR DISPLAY. +# MIDGIM CALCULATES MIDDLE GIMBAL ANGLE FOR DISPLAY. # -# R02BOTH IMU - STATUS CHECK ROUTINE. +# R02BOTH IMU - STATUS CHECK ROUTINE. # DISPLAYS USED IN P-31LM ** # -# V06N33 DISPLAY SOTRED TIG (IN HRS. MINS. SECS.) -# V06N42 DISPLAY APOGEE, PERIGEE, DELTAV. -# V16N35 DISPLAY TIME FROM TIG. -# V06N45 TIME FROM IGNITION AND MIDDLE GIMBAL ANGLE. +# V06N33 DISPLAY SOTRED TIG (IN HRS. MINS. SECS) +# V06N42 DISPLAY APOGEE, PERIGEE, DELTAV. +# V16N35 DISPLAY TIME FROM TIG. +# V06N45 TIME FROM IGNITION AND MIDDLE GIMBAL ANGLE. # ERASABLE INITIALIZATION REQUIRED ** # -# TIG TIME OF IGNITION DP (B+28) CS. +# TIG TIME OF IGNITION DP (B+28) CS. # -# DELLT4 DESIRED TIME OF FLIGHT DP (B+28) CS -# FROM RINIT TO RTARG. +# DELLT4 DESIRED TIME OF FLIGHT DP (B+28) CS +# FROM RINIT TO RTARG . # -# RTARG RADIUS VECTOR OF TARGET POSITION VECTOR -# RADIUS VECTOR SCALED TO (B+29)METERS IF EARTH ORBIT +# RTARG RADIUS VECTOR OF TARGET POSITION VECTOR +# RADIUS VECTOR SCALED TO (B+29)METERS IF EARTH ORBIT # Page 652 -# RADIUS VECTOR SCALED TO (B+27)METERS IF MOON ORBIT +# RADIUS VECTOR SCALED TO (B+27)METERS IF MOON ORBIT # OUTPUT ** # -# HAPO APOGEE ALTITUDE -# HPER PERIGEE ALTITUDE -# VGDISP MAG. OF DELTAV FOR DISPLAY, SCALING B+7 M/CS EARTH -# MAG. OF DELTAV FOR DISPLAY, SCALING B+5 M/CS MOON -# MIDGIM MIDDLE GIMBAL ANGLE -# XDELVFLG RESETS XDELVFLG FOR LAMBERT VG COMPUTATIONS +# HAPO APOGEE ALTITUDE +# HPER PERIGEE ALTITUDE +# VGDISP MAG.OF DELTAV FOR DISPLAY ,SCALING B+7 M/CS EARTH +# MAG.OF DELTAV FOR DISPLAY,SCALING B+5 M/CS MOON +# MIDGIM MIDDLE GIMBAL ANGLE +# XDELVFLG RESETS XDELVFLG FOR LAMBERT VG COMPUTATIONS -# ALARMS OR ABORTS NONE ** +# ALARMS OR ABORTS NONE ** -# RESTARTS ARE VIA GROUP 4 ** +# RESTARTS ARE VIA GROUP 4 ** SETLOC GLM BANK @@ -102,7 +102,7 @@ COUNT* $$/P31 P31 TC P20FLGON - CAF V06N33 # T16 + CAF V06N33 # TIG TC VNPOOH TC INTPRET CLEAR DLOAD @@ -166,4 +166,3 @@ REVN1645 SET CALL # TRKMKCNT, TTOGO, +MGA # *** END OF LEMP30S .103 *** - diff --git a/Luminary099/README.md b/Luminary099/README.md index af5a90d..3c805dc 100644 --- a/Luminary099/README.md +++ b/Luminary099/README.md @@ -67,7 +67,7 @@ What follows is simply a bunch of file-includes for the individual code chunks. | [P20-P25.agc] | 492-614 | | [P30_P37.agc] | 615-617 | | [P32-P35_P72-P75.agc] | 618-650 | -| [LAMBERT_AIMPOINT_GUIDANCE.agc] | 651-653 | +| [GENERAL_LAMBERT_AIMPOINT_GUIDANCE.agc] | 651-653 | | [GROUND_TRACKING_DETERMINATION_PROGRAM.agc] | 654-657 | | [P34-35_P74-75.agc] | 658-702 | | [R31.agc] | 703-708 | @@ -164,7 +164,7 @@ What follows is simply a bunch of file-includes for the individual code chunks. [P20-P25.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/P20-P25.agc [P30_P37.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/P30_P37.agc [P32-P35_P72-P75.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/P32-P35_P72-P75.agc -[LAMBERT_AIMPOINT_GUIDANCE.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/LAMBERT_AIMPOINT_GUIDANCE.agc +[GENERAL_LAMBERT_AIMPOINT_GUIDANCE.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/GENERAL_LAMBERT_AIMPOINT_GUIDANCE.agc [GROUND_TRACKING_DETERMINATION_PROGRAM.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/GROUND_TRACKING_DETERMINATION_PROGRAM.agc [P34-35_P74-75.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/P34-35_P74-75.agc [R31.agc]:https://github.com/chrislgarry/Apollo-11/blob/master/Luminary099/R31.agc