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