James Harris
GitHub
commit
5f46da3e45
|
|
@ -2808,7 +2808,7 @@ HBD22 ERASE # B(1)
|
|||
HBN30 ERASE # B(1)
|
||||
HBN31/2 ERASE # B(1)
|
||||
HBN32 ERASE # B(1)
|
||||
#Page 103
|
||||
# Page 103
|
||||
HBD31/2 ERASE # B(1)
|
||||
HBD32 ERASE # B(1)
|
||||
|
||||
|
|
|
|||
|
|
@ -383,7 +383,7 @@ REP11 INHINT
|
|||
ENDREP11 EXTEND
|
||||
DCA REP11SA
|
||||
TCF REP11A-1
|
||||
#Page 540
|
||||
# Page 540
|
||||
REP11S 2OCT 7776600011
|
||||
|
||||
REP11SA 2OCT 7776400013
|
||||
|
|
@ -431,7 +431,7 @@ GETDOWN STQ SETPD
|
|||
0D
|
||||
DLOAD
|
||||
HI6ZEROS
|
||||
#Page 541
|
||||
# Page 541
|
||||
STODL 6D
|
||||
DPHALF
|
||||
STCALL 8D
|
||||
|
|
@ -480,7 +480,7 @@ GETDOWN STQ SETPD
|
|||
# COMPUTE ATTITUDE ERRORS, A, WHERE A = TGSC*DELTACDU
|
||||
#
|
||||
# * (1 SIN(CDUZ) 0 ) THE GIMBAL ANGLES
|
||||
#Page 542
|
||||
# Page 542
|
||||
# TGSC = (0 COS(CDUX)*COS(CDUZ) SIN(CDUX)) = TO SPACECRAFT AXES
|
||||
# (0 -SIN(CDUX)*COS(CDUZ) COS(CDUX)) CONVERSION MATRIX
|
||||
# _
|
||||
|
|
@ -529,7 +529,7 @@ ATTDISP CS RPSTART # PITCH/ROLL START TIME
|
|||
PUSH # LET P(RAD) = 2*PI*PITCH(REV)
|
||||
GOTO
|
||||
ATTDISP1 # AROUND SETLOC
|
||||
#Page 543
|
||||
# Page 543
|
||||
# *
|
||||
# CONSTRUCT SM TO S/C MATRIX, TSMV
|
||||
|
||||
|
|
@ -784,7 +784,7 @@ RESCALES EXTEND # RESCALE AK S FOR
|
|||
# EXTENDED VERB 46 (BITS 13,14 OF DAPDATR1 SET ).
|
||||
# THE CMC REGARDS RHC COMMANDS AS BODY-AXES RATE
|
||||
# COMMANDS AND IT TRANSMITS THESE TO SATURN AS DC
|
||||
#Page 548
|
||||
# Page 548
|
||||
# VOLTAGES. THE VALUE OF THE CONSTANT RATE COMMAND
|
||||
# IS 0.5 DEG/SEC. AN ABSENCE OF RHC ACTIVITY RE-
|
||||
# SULTS IN A ZERO RATE COMMAND.
|
||||
|
|
@ -835,7 +835,7 @@ RESCALES EXTEND # RESCALE AK S FOR
|
|||
# DEBRIS
|
||||
#
|
||||
# CENTRALS
|
||||
#Page 549
|
||||
# Page 549
|
||||
# CDUXCMD, CDUYCMD, CDUZCMD
|
||||
|
||||
BANK 43
|
||||
|
|
@ -886,7 +886,7 @@ REDOSAT LXCH BANKRUPT # ALSO COMES HERE FOR RESTARTS
|
|||
TCF RESUME # END OF SATURN STICK INITIALIZATION
|
||||
|
||||
# THIS SECTION IS EXECUTED EVERY 100 MSECS.
|
||||
#Page 550
|
||||
# Page 550
|
||||
SATSTICK LXCH BANKRUPT
|
||||
EXTEND
|
||||
QXCH QRUPT
|
||||
|
|
|
|||
|
|
@ -141,7 +141,7 @@
|
|||
#
|
||||
# DEBRIS....TVC TEMPORARIES IN EBANK6
|
||||
|
||||
#Page 958
|
||||
# Page 958
|
||||
|
||||
BANK 16
|
||||
SETLOC DAPROLL
|
||||
|
|
|
|||
|
|
@ -230,7 +230,7 @@ RATES DLOAD DSU
|
|||
STORE PRATE # B * 2(8)
|
||||
BMN DLOAD # B>0 NOT PERMITTED
|
||||
CHKBMAG
|
||||
#Page 848
|
||||
# Page 848
|
||||
HI6ZEROS
|
||||
STCALL PRATE
|
||||
PROK
|
||||
|
|
|
|||
|
|
@ -66,7 +66,7 @@ AFDUMP TC MASSMULT
|
|||
|
||||
WHERETO CA EBANK5 # INITIALIZE L*WCR*T AND H*GHCR*T FROM
|
||||
TS EBANK # PAD LOADED ERASABLES IN W-MATRIX
|
||||
#Page 794
|
||||
# Page 794
|
||||
EBANK= LOWCRIT
|
||||
EXTEND
|
||||
DCA LOWCRIT
|
||||
|
|
@ -117,7 +117,7 @@ DOPIF TC FASTCHNG
|
|||
TS FCOLD
|
||||
DXCH PIF
|
||||
EXTEND
|
||||
#Page 795
|
||||
# Page 795
|
||||
DCS FP
|
||||
DAS PIF # PIF = FC - FP, NEVER EQUALS +0
|
||||
|
||||
|
|
@ -167,7 +167,7 @@ FWCOMP CAF 2SECS
|
|||
MASK LOW8 # MAKE SURE SMALL AND POSITIVE
|
||||
ZL
|
||||
EXTEND
|
||||
#Page 796
|
||||
# Page 796
|
||||
DV Q
|
||||
EXTEND
|
||||
MP PIF
|
||||
|
|
@ -214,7 +214,7 @@ MASSMULT EXTEND
|
|||
TC BUF
|
||||
DXCH MPAC +1
|
||||
TC BUF
|
||||
#Page 797
|
||||
# Page 797
|
||||
# CONSTANTS --
|
||||
|
||||
FEXTRA = BIT13 # FEXT +5.13309020 E+4
|
||||
|
|
|
|||
Loading…
Reference in New Issue