catchup proposed
This commit is contained in:
parent
e1e2b9e6f2
commit
7fe8bb674b
@ -1336,8 +1336,8 @@ UPPOS XCH L # SAVE DECREMENTED UPPER PART.
|
||||
AD HALF
|
||||
TS A # SKIPS ON OVERFLOW
|
||||
TCF +2
|
||||
INCR L # RESTORE UPPER TO ORIGINAL VALUE
|
||||
XCH L # SWAP A + L BANK.
|
||||
INCR L # RESTORE UPPER TO ROIGINAL VALUE
|
||||
XCH L # SWAP A + L BACK.
|
||||
TC Q
|
||||
|
||||
UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT
|
||||
|
@ -278,7 +278,7 @@ BDZCHECK CA ZNDX
|
||||
BZF TAUCHECK
|
||||
|
||||
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
|
||||
|
||||
TAUCHECK CCS TAU
|
||||
|
@ -782,7 +782,7 @@ PI/4.0 2DEC .785398164
|
||||
# MARKDATA, BASE ADDRESS OF MARK DATA
|
||||
# REFSMMAT, ROTATION MATRIX FROM STABLE MEMBER TO BASIC REF. COORD. SYSTEM
|
||||
#
|
||||
# SUBROUTINES CALLED:
|
||||
# SUBROUTINES CALLED-
|
||||
#
|
||||
# SXTNB -- SEXT. ANGULAR READINGS TO NAV. BASE COOR.
|
||||
# NBSM -- TRANSFORM FROM NAV. BASE TO STABLE MEMBER
|
||||
|
@ -39,7 +39,7 @@
|
||||
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
||||
#
|
||||
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
||||
# MOD BY WHITE, P. DATE 1JUNE67
|
||||
# MOD BY WHITE.P DATE 1JUNE67
|
||||
#
|
||||
# PURPOSE
|
||||
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING
|
||||
|
@ -318,7 +318,7 @@ V06N89* VN 0689
|
||||
# FUNCTION -- TO DISPLAY THE LANDING SITE LATITUDE,
|
||||
# LONGITUDE AND ALTITUDE. TO ACCEPT NEW DATA VIA
|
||||
# THE KEYBOARD. TO COMPUTE THE LANDING SITE
|
||||
# ORIENTATION FOR P52 OR P54.
|
||||
# ORIENTATION FOR P52 OR P54
|
||||
#
|
||||
# LET:
|
||||
# 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
|
||||
# Page 353
|
||||
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
|
||||
TC ALMCYCLE
|
||||
CA ZREG # PUT ZREG, ZREGLP INTO MPAC +1.
|
||||
|
@ -250,7 +250,7 @@ TRANSP2 CAF XNB1EB
|
||||
# 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC:
|
||||
# ENTRY: RTB
|
||||
# SIGNMPAC
|
||||
# IN EITHER CASE, RETURN IS TO THE NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
|
||||
# IN EITHER CASE, RETURN IS TO THE NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
|
||||
|
||||
SIGNMPAC EXTEND
|
||||
DCA DPOSMAX
|
||||
|
@ -381,7 +381,7 @@ TIMEDIDL EXTEND
|
||||
|
||||
TIMEDIDR INHINT
|
||||
CAF ZERO
|
||||
ZL # PICK UP INCREMENTER (AND ZERO
|
||||
ZL # PICK UP INCREMENTER(AND ZERO
|
||||
TS MPAC +2 # IT IN CASE OF RESTARTS) AND
|
||||
DXCH UPBUFF +8D # STORE IT
|
||||
DXCH MPAC # INTO MPAC FOR TPAGREE.
|
||||
|
@ -1,5 +1,5 @@
|
||||
# Copyright: Public domain.
|
||||
# Filename: ASCENT_GUIDANCE.agc
|
||||
# Filename: ASCENT_GUIDNCE.agc
|
||||
# Purpose: Part of the source code for Luminary 1A build 099.
|
||||
# It is part of the source code for the Lunar Module's (LM)
|
||||
# Apollo Guidance Computer (AGC), for Apollo 11.
|
||||
|
@ -29,8 +29,8 @@
|
||||
# Page 618
|
||||
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
|
||||
#
|
||||
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
||||
# MOD BY WHITE, P. DATE 1JUNE67
|
||||
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75
|
||||
# MOD BY WHITE.P DATE 1JUNE67
|
||||
#
|
||||
# PURPOSE
|
||||
|
||||
|
@ -167,7 +167,7 @@ PULSEIMU INDEX FIXLOC # ADDRESS OF GYRO COMMANDS SHOULD BE IN X1
|
||||
# 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC:
|
||||
# ENTRY: RTB
|
||||
# SIGNMPAC
|
||||
# IN EITHER CASE, RETURN IS TO THE NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
|
||||
# IN EITHER CASE, RETURN IS TO THE NEXT INTERPRETIVE INSTRUCTION IN THE CALLING SEQUENCE.
|
||||
|
||||
SIGNMPAC EXTEND
|
||||
DCA DPOSMAX
|
||||
|
Loading…
Reference in New Issue
Block a user