kjodle/Apollo-11
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Merge pull request #347 from iEli2tyree011/master

Browse Source 
Proof TVCINITIALIZE (#268)
This commit is contained in:
Chris Garry 2018-09-06 02:50:15 +09:00 committed by GitHub
commit 44951f0c90
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 29 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Comanche055/TVCINITIALIZE.agc
View File

@ -75,7 +75,7 @@
EBANK= BZERO
TVCDAPON LXCH BANKRUPT # T5 RUPT ARRIVAL (CALL BY DOTVCON - P40)
EXTEND # SAVE Q REQUIRED IN RESTART (MRCLEAN AND
EXTEND # SAVE Q REQUIRED IN RESTARTS (MRCLEAN AND
QXCH QRUPT # TVCINIT4 ARE ENTRIES)
MRCLEAN CAF NZERO # NUMBER TO ZERO, LESS ONE (MUST BE ODD)
# TVC RESTARTS ENTER HERE (NEW BANK)
@ -219,9 +219,9 @@ TVCINIT4 CAF ZERO # SET TVCPHASE TO INDICATE TVCDAPON-THRU-
CAF BIT13 # IF ENGINE IS ALREADY OFF, ENGINOFF HAS
EXTEND # ALREADY ESTABLISHED THE POST-BURN
RAND DSALMOUT # CSMMASS (MASSBACK DOES IT). DON'T
RAND DSALMOUT # CSMMASS (MASSBACK DOES IT). DONT
EXTEND # TOUCH CSMMASS. IF ENGINE IS ON,
BZF +3 # THEN IT'S OK TO DO THE COPYCYCLE
BZF +3 # THEN ITS OK TO DO THE COPYCYCLE
# EVEN BURNS LESS THAN 0.4 SEC ARE AOK
CAE MASSTMP # COPYCYCLE
@ -378,7 +378,7 @@ LBN10 DEC +.99999 # N10 LOW BANDWIDTH FILTER COEFFICIENTS
DEC -.9101 # D21/2
DEC +.8460 # D22
DEC +.50000 #N30
DEC +.5000 # N30
DEC -.47115 # N31/2
DEC +.4749 # N32
DEC -.9558 # D31/2
@ -392,7 +392,7 @@ LBCFADR GENADR LBN10 # LOW BANDWIDTH COEFFICIENTS ADDRESS
NZERO DEC 51 # MUST BE ODD FOR MRCLEAN
NZEROJR DEC 23 # MUST BE ODD FOR MCLEANJR
ATTLIM DEC 0.00833 # INITIAL ATTITUDE EROR LIMIT (1.5 DEG)
ATTLIM DEC 0.00833 # INITIAL ATTITUDE ERROR LIMIT (1.5 DEG)
1/ATTLIM DEC 0.007325 # .007325(ERROR) = 0 IF ERROR < 1.5 DEG
TCORR OCT 00005 # CSM