Corrections in TVCEXECUTIVE
This commit is contained in:
parent
f3f9c8f5b1
commit
d7607f17d8
@ -33,22 +33,23 @@
|
|||||||
# Page 945
|
# Page 945
|
||||||
# PROGRAM NAME.... TVCEXECUTIVE, CONSISTING OF TVCEXEC, NEEDLEUP, VARGAINS
|
# PROGRAM NAME.... TVCEXECUTIVE, CONSISTING OF TVCEXEC, NEEDLEUP, VARGAINS
|
||||||
# 1SHOTCHK, REPCHEK, CG.CORR, COPYCYCLES, ETC.
|
# 1SHOTCHK, REPCHEK, CG.CORR, COPYCYCLES, ETC.
|
||||||
# LOG SECTION.... TVCEXECUTIVE SUBROUTINE ....DAPCSM
|
# LOG SECTION...TVCEXECUTIVE SUBROUTINE...DAPCSM
|
||||||
# MOD BY SCHLUNDT 21 OCTOBER 1968
|
# MODIFIED BY SCHLUNDT 21 OCTOBER 1968
|
||||||
#
|
|
||||||
# FUNCTIONAL DESCRIPTION....
|
# FUNCTIONAL DESCRIPTION....
|
||||||
|
#
|
||||||
# *A SELF-PERPETUATING WAITLIST TASK AT 1/2 SECOND INTERVALS WHICH:
|
# *A SELF-PERPETUATING WAITLIST TASK AT 1/2 SECOND INTERVALS WHICH:
|
||||||
# PREPARES THE ROLL WITH OGA (CDUX)
|
# PREPARES THE ROLL DAP WITH OGA (CDUX)
|
||||||
# PREPARES THE ROLL FDAI NEEDLE (FLY-TO OGA ERROR)
|
# PREPARES THE ROLL FDAI NEEDLE (FLY-TO OGA ERROR)
|
||||||
# PREPARES THE ROLL PHASE PLANE OGAERR (FLY-FROM OGA ERROR)
|
# PREPARES THE ROLL PHASE PLANE OGAERR (FLY-FROM OGA ERROR)
|
||||||
# PREPARES THE TVC ROLLDAP TASK WAITLIST CALL (3 CS DELAY)
|
# PREPARES THE TVC ROLLDAP TASK WAITLIST CALL (3 CS DELAY)
|
||||||
# UPDATES THE NEEDLES DISPLAY
|
# UPDATES THE NEEDLES DISPLAY
|
||||||
# UPDATES THE VEHICLE MASS AND CALLS MASSPROP TO UPDATE INERTIA DATA
|
# UPDATES VEHICLE MASS AND CALLS MASSPROP TO UPDATE INERTIA DATA
|
||||||
# UPDATES PITCH, YAW, AND ROLL DAP GAINS FROM MASSPROP DATA
|
# UPDATES PITCH, YAW, AND ROLL DAP GAINS FROM MASSPROP DATA
|
||||||
# PERFORMS ONE-SHOT CORRECTION FOR TMC LOOP 0-3 SEC AFTER IGNITION
|
# PERFORMS ONE-SHOT CORRECTION FOR TMC LOOP 0-3 SEC AFTER IGNITION
|
||||||
# PERFORMS REPETITIVE UPDATES FOR THE TMC LOOP AFTER THE ONE-SHOT CORR.
|
# PERFORMS REPETITIVE UPDATES FOR TMC LOOP AFTER THE ONE-SHOT CORR.
|
||||||
#
|
#
|
||||||
# CALLING SEQUENCE....
|
# CALLING SEQUENCE....
|
||||||
|
#
|
||||||
# *TVCEXEC CALLED AS A WAITLIST TASK, IN PARTICULAR BY TVCINIT4 AND BY
|
# *TVCEXEC CALLED AS A WAITLIST TASK, IN PARTICULAR BY TVCINIT4 AND BY
|
||||||
# ITSELF, BOTH AT 1/2 SECOND INTERVALS
|
# ITSELF, BOTH AT 1/2 SECOND INTERVALS
|
||||||
#
|
#
|
||||||
@ -59,12 +60,13 @@
|
|||||||
# SUBROUTINES CALLED....NEEDLER, S40.15, MASSPROP, TASKOVER, IBNKCALL
|
# SUBROUTINES CALLED....NEEDLER, S40.15, MASSPROP, TASKOVER, IBNKCALL
|
||||||
#
|
#
|
||||||
# OTHER INTERFACES....
|
# OTHER INTERFACES....
|
||||||
|
#
|
||||||
# *TVCRESTART PACKAGE FOR RESTARTS
|
# *TVCRESTART PACKAGE FOR RESTARTS
|
||||||
# *PITCHDAP, YAWDAP FOR VARIABLE GAINS AND ENGINE TRIM ANGLES
|
# *PITCHDAP, YAWDAP FOR VARIABLE GAINS AND ENGINE TRIM ANGLES
|
||||||
#
|
|
||||||
# ERASABLE INITIALIZATION REQUIRED....
|
# ERASABLE INITIALIZATION REQUIRED....
|
||||||
|
#
|
||||||
# *SEE TVCDAPON....TVCINIT4
|
# *SEE TVCDAPON....TVCINIT4
|
||||||
# *VARK AND 1/CONACC (S40.15 OF R03)
|
# *VARK AND 1/CONACC (S40.15 OF TVCINITIALIZE)
|
||||||
# *PAD LOAD EREPFRAC
|
# *PAD LOAD EREPFRAC
|
||||||
# *BITS 15,14 OF FLAGWRD6 (T5 BITS)
|
# *BITS 15,14 OF FLAGWRD6 (T5 BITS)
|
||||||
# *TVCEXPHS FOR RESTARTS
|
# *TVCEXPHS FOR RESTARTS
|
||||||
@ -72,7 +74,8 @@
|
|||||||
# *CDUX, OGAD
|
# *CDUX, OGAD
|
||||||
#
|
#
|
||||||
# OUTPUT....
|
# OUTPUT....
|
||||||
# *ROLL DAP OGANOW, FDAI NEEDLE= (AK). AND PHASE PLANE OGAERR
|
#
|
||||||
|
# *ROLL DAP OGANOW, FDAI NEEDLE (AK), AND PHASE PLANE OGAERR
|
||||||
# *VARIABLE GAINS FOR PITCH/YAW AND ROLL TVC DAPS
|
# *VARIABLE GAINS FOR PITCH/YAW AND ROLL TVC DAPS
|
||||||
# *SINGLE-SHOT AND REPETITIVE CORRECTIONS TO ENGINE TRIM ANGLES
|
# *SINGLE-SHOT AND REPETITIVE CORRECTIONS TO ENGINE TRIM ANGLES
|
||||||
# PACTOFF AND YACTOFF
|
# PACTOFF AND YACTOFF
|
||||||
@ -87,7 +90,7 @@
|
|||||||
COUNT* $$/TVCX
|
COUNT* $$/TVCX
|
||||||
|
|
||||||
TVCEXEC CS FLAGWRD6 # CHECK FOR TERMINATION (BITS 15,14 READ
|
TVCEXEC CS FLAGWRD6 # CHECK FOR TERMINATION (BITS 15,14 READ
|
||||||
MASK OCT60000 # 10 FROM TVCDAPON TO RCSDAPON)
|
MASK OCT60000 # 10 FROM TVCDAPON TO RCSDAPON)
|
||||||
EXTEND
|
EXTEND
|
||||||
BZMF TVCEXFIN # TERMINATE
|
BZMF TVCEXFIN # TERMINATE
|
||||||
|
|
||||||
@ -97,18 +100,18 @@ TVCEXEC CS FLAGWRD6 # CHECK FOR TERMINATION (BITS 15,14 READ
|
|||||||
2CADR TVCEXEC
|
2CADR TVCEXEC
|
||||||
|
|
||||||
ROLLPREP CAE CDUX # UPDATE ROLL LADDERS (NO NEED TO RESTART-
|
ROLLPREP CAE CDUX # UPDATE ROLL LADDERS (NO NEED TO RESTART-
|
||||||
XCH OGANOW # PROTECT, SINCE ROLL DAPS RE-START)
|
XCH OGANOW # PROTECT, SINCE ROLL DAPS RE-START)
|
||||||
XCH OGAPAST
|
XCH OGAPAST
|
||||||
|
|
||||||
CAE OGAD # PREPARE ROLL FDAI NEEDLE WITH FLY-TO
|
CAE OGAD # PREPARE ROLL FDAI NEEDLE WITH FLY-TO
|
||||||
EXTEND # ERROR (COMMAND - MEASURED)
|
EXTEND # ERROR (COMMAND - MEASURED)
|
||||||
MSU OGANOW
|
MSU OGANOW
|
||||||
TS AK # FLY-TO OGA ERROR, SC.AT B-1 REVS
|
TS AK # FLY-TO OGA ERROR, SC.AT B-1 REVS
|
||||||
|
|
||||||
EXTEND # PREPARE ROLL DAP PHASE PLANE OGAERR
|
EXTEND # PREPARE ROLL DAP PHASE PLANE OGAERR
|
||||||
MP -BIT14
|
MP -BIT14
|
||||||
TS OGAERR # PHASE-PLANE (FLY-FROM) OGAERROR,
|
TS OGAERR # PHASE-PLANE (FLY-FROM) OGAERROR,
|
||||||
# SC.AT B+0 REVS
|
# SC.AT B+0 REVS
|
||||||
|
|
||||||
CAF THREE # SET UP ROLL DAP TASK (ALLOW SOME TIME)
|
CAF THREE # SET UP ROLL DAP TASK (ALLOW SOME TIME)
|
||||||
TC WAITLIST
|
TC WAITLIST
|
||||||
@ -116,18 +119,18 @@ ROLLPREP CAE CDUX # UPDATE ROLL LADDERS (NO NEED TO RESTART-
|
|||||||
2CADR ROLLDAP
|
2CADR ROLLDAP
|
||||||
|
|
||||||
NEEDLEUP TC IBNKCALL # DO A NEEDLES UPDATE (RETURNS AFTER CADR)
|
NEEDLEUP TC IBNKCALL # DO A NEEDLES UPDATE (RETURNS AFTER CADR)
|
||||||
CADR NEEDLER # (NEEDLES RESTARTS ITSELF)
|
CADR NEEDLER # (NEEDLES RESTARTS ITSELF)
|
||||||
|
|
||||||
VARGAINS CAF BIT13 # CHECK ENGINE-ON BIT TO INHIBIT VARIABLE
|
VARGAINS CAF BIT13 # CHECK ENGINE-ON BIT TO INHIBIT VARIABLE
|
||||||
EXTEND # GAINS AND MASS IF ENGINE OFF
|
EXTEND # GAINS AND MASS IF ENGINE OFF
|
||||||
RAND DSALMOUT # CHANNEL 11
|
RAND DSALMOUT # CHANNEL 11
|
||||||
CCS A
|
CCS A
|
||||||
TCF +4 # ON, SO OK TO UPDATE GAINS AND MASS
|
TCF +4 # ON , SO OK TO UPDATE GAINS AND MASS
|
||||||
+5 CAF TWO # OFF, SO BYPASS MASS/GAIN UPDATES,
|
+5 CAF TWO # OFF, SO BYPASS MASS/GAIN UPDATES,
|
||||||
TS TVCEXPHS # ALSO ENTRY FROM CCS BELOW WITH
|
TS TVCEXPHS # ALSO ENTRY FROM CCS BELOW WITH
|
||||||
TCF 1SHOTCHK # VCNTR = -0 (V97 R40 ENGFAIL)
|
TCF 1SHOTCHK # VCNTR = -0 (V97 R40 ENGFAIL)
|
||||||
CCS VCNTR # TEST FOR GAIN OF UPDATE TIME
|
CCS VCNTR # TEST FOR GAIN OF UPDATE TIME
|
||||||
TCF +4 # NOT YET
|
TCF +4 # NOT YET
|
||||||
# Page 947
|
# Page 947
|
||||||
TCF GAINCHNG # NOW
|
TCF GAINCHNG # NOW
|
||||||
TCF +0 # NOT USED
|
TCF +0 # NOT USED
|
||||||
|
Loading…
Reference in New Issue
Block a user