diff --git a/Luminary099/P51-P53.agc b/Luminary099/P51-P53.agc index 3721df9..e1d478b 100644 --- a/Luminary099/P51-P53.agc +++ b/Luminary099/P51-P53.agc @@ -2090,7 +2090,7 @@ P57AA CAF V06N34* # DISPLAY TALIGN, TALIGN : DSPTEM1 DSPTEM1 # Page 976 BZE PDDL - P57C # IF KEY IN TIME ZERO - TALIGN=CURRENT TIME + P57C # IF KEY IN TIME ZERO-TALIGN=CURRENT TIME DSU BPL # NOT ZERO SO EXCHANGE PD WITH DSPTEM1 DSPTEM1 P57C @@ -2114,27 +2114,27 @@ PACKOPTN CAF ZERO # PACK FLAG BITS FOR OPTION DISPLAY MASK FLAGWRD3 # REFSMFLG CCS A CAF BIT7 # SET - ADS OPTION1 +2 # CLEAR -- JUST ZERO + ADS OPTION1 +2 # CLEAR-JUST ZERO CAF ATTFLBIT MASK FLAGWRD6 # ATTFLG CCS A CAF BIT4 # SET - ADS OPTION1 +2 # CLEAR -- ZERO IN A + ADS OPTION1 +2 # CLEAR-ZERO IN A CAF BIT4 TS OPTION1 # JAM 00010 IN OPTION1 FOR CHECK LIST DSPOPTN CAF VB05N06 # DISPLAY OPTION CODE AND FLAG BITS TC BANKCALL CADR GOFLASH - TCF GOTOPOOH # VB34 -- TERMINATE - TCF +2 # V33 -- PROCEED - TCF DSPOPTN # V32 -- RECYCLE + TCF GOTOPOOH # VB34-TERMINATE + TCF +2 # V33-PROCEED + TCF DSPOPTN # V32-RECYCLE CAF REFSMBIT MASK FLAGWRD3 CCS A TCF GETLMATT # SET, GO COMPUTE LM ATTITUDE - CAF ATTFLBIT # CLEAR -- CHECK ATTFLAG FOR STORED ATTITUDE. + CAF ATTFLBIT # CLEAR-CHECK ATTFLAG FOR STORED ATTITUDE. MASK FLAGWRD6 CCS A TCF BYLMATT # ALLFLG SET, CHK OPTION FOR GRAVITY COMP @@ -2142,15 +2142,15 @@ DSPOPTN CAF VB05N06 # DISPLAY OPTION CODE AND FLAG BITS # Page 977 MASK OPTION2 CCS A - TCF BYLMATT # OPTION 2 OR 3 BUT DON'T HAVE ATTITUDE - TC ALARM # OPTION INCONSISTENT WITH FLAGS -- ALARM 701 + TCF BYLMATT # OPTION 2 OR 3 BUT DONT HAVE ATTITUDE + TC ALARM # OPTION INCONSISTANT WITH FLAGS-ALARM 701 OCT 701 CAF VB05N09 # DISPLAY ALARM FOR ACTION TC BANKCALL CADR GOFLASH - TCF GOTOPOOH # VB34 -- TERMINATE - TCF DSPOPTN # V33 -- PROCEED *********TEMPORARY - TCF DSPOPTN # VB32 -- RECYCLE TO OPTION DISPLAY V 05N06 + TCF GOTOPOOH # VB34-TERMINATE + TCF DSPOPTN # V33-PROCEED ********TEMPORARY + TCF DSPOPTN # VB32-RECYCLE TO OPTION DISPLAY V 05N06 # Page 978 # TRANSFORM VEC1,2 FROM MOON FIXED TO REF AND JAM BACK IN VEC1,2 @@ -2178,7 +2178,7 @@ MFREF STQ SETPD # Page 979 # COMPUTE LM ATTITUDE IN MOON FIXED COORDINATES USING REFSMMAT AND -# STORE IN YNBSAV AND ZNBSAV. +# STORE IN YNBSAV AND ZNBSAV REFMF STQ CALL QMAJ @@ -2190,7 +2190,7 @@ REFMF STQ CALL CALCSMSC # GET YNB IN SM VLOAD VXM YNB - REFSMMAT # YNB TO REF + REFSMMAT # YNB TO REF UNIT PDDL TSIGHT PUSH CALL @@ -2213,7 +2213,7 @@ REFMF STQ CALL GETLMATT TC INTPRET CALL - REFMF # GO TRANSFORM TO MF IN YNBSAV, ZNBSAV + REFMF # GO TRANSFORM TO MF IN YNBSAV,ZNBSAV EXIT BYLMATT TC UPFLAG # SET INITIAL ALIGN FLAG @@ -2233,7 +2233,7 @@ ATTCHK TC PHASCHNG P57JUMP TC PHASCHNG OCT 04024 - TC DOWNFLAG # ATTFLG CLEAR -- RESET INTALIGN FLAG + TC DOWNFLAG # ATTFLG CLEAR-RESET INTALIGN FLAG ADRES INITALGN CAF THREE MASK OPTION2 # BRANCH ON OPTION CODE @@ -2300,12 +2300,12 @@ P57OPT3 TC INTPRET STCALL STARSAV1 MFREF # STARSAV2 IS STORED AS 2ND OBSERVED STAR EXIT - TCF 1STAR # 1STAR GET VEC2, STARSAV2 GOES TO SURFLINE. + TCF 1STAR # 1STAR GET VEC2,STARSAV2,GOES TO SURFLINE VB05N06 VN 506 # Page 983 -# CHECK IMODES30 TO VERIFY IMU IS ON +# CHECK IMODES30 TO VARIFY IMU IS ON IMUCHK CS IMODES30 MASK BIT9 @@ -2338,4 +2338,3 @@ LSORIENT STQ VLOAD XSMD STCALL YSMD QMAJ -