mirrors
/
Apollo-11
mirror of https://github.com/chrislgarry/Apollo-11.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

finished P51-53

pull/841/head
serialhex 2021-10-27 11:09:35 -04:00
parent 60d9cea338
commit 15a0e14d96
1 changed files with 18 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
Luminary099/P51-P53.agc
View File

@ -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