diff --git a/Luminary099/R63.agc b/Luminary099/R63.agc index 0934730..1bdc83b 100644 --- a/Luminary099/R63.agc +++ b/Luminary099/R63.agc @@ -44,7 +44,7 @@ # # 3. FLASH DISPLAY V 04 N 06. R2 INDICATES WHICH SPACECRAFT AXIS IS TO # BE POINTED AT CSM. INITIAL CHOICE IS PREFERRED (+Z) AXIS (R2=1). -# ASTRONAUT CAN CHANGE TO (+X) AXIS (R2 NOT =1) BY V 22 E 2 E. CONTINUE +# ASTRONAUT CAN CHANGE TO (+X) AXIS (R2 NOT = 1) BY V 22 E 2 E. CONTINUE # AFTER KEYING IN PROCEED. # # 4. BOTH VEHICLE STATE VECTORS UPDATED BY CONIC EQS. @@ -56,13 +56,13 @@ # 6. GIMBAL ANGLES FROM VECPOINT TRANSFORMED INTO FDAI BALL ANGLES BY # BALLANGS. FLASH DISPLAY V 06 N 18 AND AWAIT RESPONSE. # -# 7 RECYCLE -- RETURN TO STEP 4. -# TERMINATE -- EXIT R63 -# PROCEED -- RESET 3AXISFLAG AND CALL R60LEM FOR ATTITUDE MANEUVER. +# 7. RECYCLE - RETURN TO STEP 4. +# TERMINATE - EXIT R63. +# PROCEED - RESET 3AXISFLG AND CALL R60LEM FOR ATTITUDE MANEUVER. # # CALLING SEQUENCE: V 89 E. # -# SUBROUTINES CALLED: CHECKP00H, R02BOTH, GOXDSPF, CSMCONIC, LEMCONIC, +# SUBROUTINES CALLED: CHKPOOH, R02BOTH, GOXDSPF, CSMCONIC, LEMCONIC, # VECPOINT, BALLANGS, R60LEM. # # NORMAL EXIT MODES: TC ENDEXT @@ -75,9 +75,9 @@ # # ERASABLE INITIALIZATION REQUIRED: NONE # -# DEBRIS: OPTION1, +1, TDEC1, PCINTVSM, SCAXIS, CPHI, CTHETA, CPSI, +# DEBRIS: OPTION1, +1, TDEC1, PDINTVSM, SCAXIS, CPHI, CTHETA, CPSI, # Page 339 -# 3AXISFLAG. +# 3AXISFLG. EBANK= RONE BANK 32 @@ -91,13 +91,13 @@ V89CALL TC BANKCALL # IMU STATUS CHECK. RETURNS IF ORIENTATION TS OPTIONX # TRACKING ATTITUDE AXIS. CAF ONE TS OPTIONX +1 - CAF VB04N12 # V 04 N 12. + CAF VB04N12 # V 04 N 12 TC BANKCALL CADR GOFLASH TC ENDEXT # TERMINATE TC +2 # PROCEED TC -5 # DATA IN. OPTION1+1 = 1 FOR Z AXIS -V89RECL TC INTPRET # 2 FOR X AXIS +V89RECL TC INTPRET # = 2 FOR X AXIS RTB DAD LOADTIME # READ PRESENT TIME DP1MIN @@ -110,7 +110,7 @@ V89RECL TC INTPRET # 2 FOR X AXIS TSTART82 STCALL TDEC1 # STORE TIME FOR LEMCONIC CALL LEMCONIC # LEM STATE VECTOR UPDATE - VLOAD VSU # CSM POSITION -- LEM POSITION -- LOS + VLOAD VSU # CSM POSITION - LEM POSITION = LOS RONE # LOS VECTOR LEFT IN MPAC RATT MXV RTB # (REFSMAT X LOS). TRANSFORMS LOS FROM @@ -128,7 +128,7 @@ ALINEX TC INTPRET # X AXIS ALIGNMENT # Page 340 V89CALL1 STCALL SCAXIS # STORE SELECTED ALIGNMENT AXIS VECPOINT # PUTS DESIRED GIM ANG (OG,IG,MG) IN TMPAC - STORE CPHI # STOR GIMBAL ANGLES FOR BALLANGS CALL + STORE CPHI # STORE GIMBAL ANGLES FOR BALLANGS CALL. EXIT TC BANKCALL CADR BALLANGS # PUTS DESIRED BALL ANGLE IN FDAIX,Y,Z