catchup proposed
This commit is contained in:
parent
e1e2b9e6f2
commit
7fe8bb674b
@ -1336,8 +1336,8 @@ UPPOS XCH L # SAVE DECREMENTED UPPER PART.
|
|||||||
AD HALF
|
AD HALF
|
||||||
TS A # SKIPS ON OVERFLOW
|
TS A # SKIPS ON OVERFLOW
|
||||||
TCF +2
|
TCF +2
|
||||||
INCR L # RESTORE UPPER TO ORIGINAL VALUE
|
INCR L # RESTORE UPPER TO ROIGINAL VALUE
|
||||||
XCH L # SWAP A + L BANK.
|
XCH L # SWAP A + L BACK.
|
||||||
TC Q
|
TC Q
|
||||||
|
|
||||||
UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT
|
UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT
|
||||||
|
@ -278,7 +278,7 @@ BDZCHECK CA ZNDX
|
|||||||
BZF TAUCHECK
|
BZF TAUCHECK
|
||||||
|
|
||||||
ACRBDZ CA T5TEMP # Z-TRANSLATION ACCEPTED EVEN THO WE MAY
|
ACRBDZ CA T5TEMP # Z-TRANSLATION ACCEPTED EVEN THO WE MAY
|
||||||
TS RWORD1 # HAVE INTRODUCED AN UNDESIRABLE ROLL
|
TS RWORD1 # HAVE INTRODUCED AN UNDESIREABLE ROLL
|
||||||
TCF ROLLTIME # BRANCH TO JET ON-TIME CALCULATIONS
|
TCF ROLLTIME # BRANCH TO JET ON-TIME CALCULATIONS
|
||||||
|
|
||||||
TAUCHECK CCS TAU
|
TAUCHECK CCS TAU
|
||||||
|
@ -782,7 +782,7 @@ PI/4.0 2DEC .785398164
|
|||||||
# MARKDATA, BASE ADDRESS OF MARK DATA
|
# MARKDATA, BASE ADDRESS OF MARK DATA
|
||||||
# REFSMMAT, ROTATION MATRIX FROM STABLE MEMBER TO BASIC REF. COORD. SYSTEM
|
# REFSMMAT, ROTATION MATRIX FROM STABLE MEMBER TO BASIC REF. COORD. SYSTEM
|
||||||
#
|
#
|
||||||
# SUBROUTINES CALLED:
|
# SUBROUTINES CALLED-
|
||||||
#
|
#
|
||||||
# SXTNB -- SEXT. ANGULAR READINGS TO NAV. BASE COOR.
|
# SXTNB -- SEXT. ANGULAR READINGS TO NAV. BASE COOR.
|
||||||
# NBSM -- TRANSFORM FROM NAV. BASE TO STABLE MEMBER
|
# NBSM -- TRANSFORM FROM NAV. BASE TO STABLE MEMBER
|
||||||
|
@ -39,7 +39,7 @@
|
|||||||
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
||||||
#
|
#
|
||||||
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
||||||
# MOD BY WHITE, P. DATE 1JUNE67
|
# MOD BY WHITE.P DATE 1JUNE67
|
||||||
#
|
#
|
||||||
# PURPOSE
|
# PURPOSE
|
||||||
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING
|
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING
|
||||||
|
@ -318,7 +318,7 @@ V06N89* VN 0689
|
|||||||
# FUNCTION -- TO DISPLAY THE LANDING SITE LATITUDE,
|
# FUNCTION -- TO DISPLAY THE LANDING SITE LATITUDE,
|
||||||
# LONGITUDE AND ALTITUDE. TO ACCEPT NEW DATA VIA
|
# LONGITUDE AND ALTITUDE. TO ACCEPT NEW DATA VIA
|
||||||
# THE KEYBOARD. TO COMPUTE THE LANDING SITE
|
# THE KEYBOARD. TO COMPUTE THE LANDING SITE
|
||||||
# ORIENTATION FOR P52 OR P54.
|
# ORIENTATION FOR P52 OR P54
|
||||||
#
|
#
|
||||||
# LET:
|
# LET:
|
||||||
# RLS = LANDING SITE VECTOR IN REF COORDINATES
|
# RLS = LANDING SITE VECTOR IN REF COORDINATES
|
||||||
|
@ -2187,7 +2187,7 @@ HMSIN TC ALL3DEC # IF ALL 3 WORDS WERE NOT LOADED, ALARM.
|
|||||||
MP MINCON # LEAVES MINUTES CONTRIBUTION IN A,L
|
MP MINCON # LEAVES MINUTES CONTRIBUTION IN A,L
|
||||||
# Page 353
|
# Page 353
|
||||||
DAS HITEMIN # ADD IN MINUTES CONTRIBUTION
|
DAS HITEMIN # ADD IN MINUTES CONTRIBUTION
|
||||||
EXTEND # IF THIS DAS OVERFLOWS, G/ 745 HR, 39MIN
|
EXTEND # IF THIS DAS OVERFLOWS, G/ 745 HR,39MIN
|
||||||
BZF +2
|
BZF +2
|
||||||
TC ALMCYCLE
|
TC ALMCYCLE
|
||||||
CA ZREG # PUT ZREG, ZREGLP INTO MPAC +1.
|
CA ZREG # PUT ZREG, ZREGLP INTO MPAC +1.
|
||||||
|
@ -381,7 +381,7 @@ TIMEDIDL EXTEND
|
|||||||
|
|
||||||
TIMEDIDR INHINT
|
TIMEDIDR INHINT
|
||||||
CAF ZERO
|
CAF ZERO
|
||||||
ZL # PICK UP INCREMENTER (AND ZERO
|
ZL # PICK UP INCREMENTER(AND ZERO
|
||||||
TS MPAC +2 # IT IN CASE OF RESTARTS) AND
|
TS MPAC +2 # IT IN CASE OF RESTARTS) AND
|
||||||
DXCH UPBUFF +8D # STORE IT
|
DXCH UPBUFF +8D # STORE IT
|
||||||
DXCH MPAC # INTO MPAC FOR TPAGREE.
|
DXCH MPAC # INTO MPAC FOR TPAGREE.
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
# Copyright: Public domain.
|
# Copyright: Public domain.
|
||||||
# Filename: ASCENT_GUIDANCE.agc
|
# Filename: ASCENT_GUIDNCE.agc
|
||||||
# Purpose: Part of the source code for Luminary 1A build 099.
|
# Purpose: Part of the source code for Luminary 1A build 099.
|
||||||
# It is part of the source code for the Lunar Module's (LM)
|
# It is part of the source code for the Lunar Module's (LM)
|
||||||
# Apollo Guidance Computer (AGC), for Apollo 11.
|
# Apollo Guidance Computer (AGC), for Apollo 11.
|
||||||
|
@ -30,7 +30,7 @@
|
|||||||
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
||||||
#
|
#
|
||||||
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
||||||
# MOD BY WHITE, P. DATE 1JUNE67
|
# MOD BY WHITE.P DATE 1JUNE67
|
||||||
#
|
#
|
||||||
# PURPOSE
|
# PURPOSE
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user