parent
d6168d9600
commit
3c03461c61
|
@ -698,10 +698,11 @@ GRP2OFF EXTEND
|
|||
DXCH -PHASE2
|
||||
TCF R10,R11A
|
||||
|
||||
# Page 873
|
||||
BANK 33
|
||||
SETLOC SERVICES
|
||||
BANK
|
||||
# Page 873
|
||||
|
||||
COUNT* $$/SERV
|
||||
|
||||
# HIGATASK IS ENTERED APPROXIMATELY 6 SECS PRIOR TO HIGATE DURING THE
|
||||
|
@ -741,23 +742,24 @@ MUNRETRN EXIT
|
|||
CAF XORFLBIT # WERE WE BELOW 30000 FT LAST PASS?
|
||||
MASK FLGWRD11
|
||||
EXTEND
|
||||
BZF XORCHK # NO -- TEST THIS PASS
|
||||
BZF XORCHK # NO - TEST THIS PASS
|
||||
|
||||
HITEST CAF PSTHIBIT # CHECK FOR HIGATE
|
||||
MASK FLGWRD11
|
||||
EXTEND
|
||||
BZF HIGATCHK # NOT AT HIGATE LAST CYCLE -- CHK THIS CYCLE
|
||||
BZF HIGATCHK # NOT AT HIGATE LAST CYCLE-CHK THIS CYCLE
|
||||
|
||||
POS2CHK CAF BIT7 # VERIFY LR IN POS2
|
||||
EXTEND
|
||||
RAND CHAN33
|
||||
EXTEND
|
||||
BZF UPDATCHK # IT IS -- CHECK FOR LR UPDATE
|
||||
CAF BIT13
|
||||
BZF UPDATCHK # IT IS-CHECK FOR LR UPDATE
|
||||
CAF BIT13 # NOT IN POST2-MAYBE REPOSITIONING
|
||||
EXTEND
|
||||
RAND CHAN12
|
||||
EXTEND
|
||||
BZF LRPOSALM # LR NOT IN POS2 OR REPOSITIONING -- BAD
|
||||
TCF CONTSERV # LR BEING REPOSITIONED -- CONTINUE SERV
|
||||
BZF LRPOSALM # LR NOT IN POS2 OR REPOSITIONING-BAD
|
||||
TCF CONTSERV # LR BEING REPOSITIONED-CONTINUE SERV
|
||||
|
||||
HIGATCHK CA TTF/8 # IS TTF > CRITERION? (TTF IS NEGATIVE)
|
||||
AD RPCRTIME
|
||||
|
|
Loading…
Reference in New Issue