catchup proposed

This commit is contained in:
Gary Young 2016-07-23 22:16:40 -06:00
parent e1e2b9e6f2
commit 7fe8bb674b
11 changed files with 13 additions and 13 deletions

View File

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

View File

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

View File

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

View File

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

View File

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

View File

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

View File

@ -250,7 +250,7 @@ TRANSP2 CAF XNB1EB
# 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC: # 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC:
# ENTRY: RTB # ENTRY: RTB
# SIGNMPAC # 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 SIGNMPAC EXTEND
DCA DPOSMAX DCA DPOSMAX

View File

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

View File

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

View File

@ -29,8 +29,8 @@
# Page 618 # Page 618
# 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

View File

@ -167,7 +167,7 @@ PULSEIMU INDEX FIXLOC # ADDRESS OF GYRO COMMANDS SHOULD BE IN X1
# 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC: # 2. GENERATE IN MPAC THE SIGNUM FUNCTION OF MPAC:
# ENTRY: RTB # ENTRY: RTB
# SIGNMPAC # 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 SIGNMPAC EXTEND
DCA DPOSMAX DCA DPOSMAX