Update pages 857-862
Update of pages 857-862 (exclusive) of SERVICER.agcpull/698/head
parent
ca5dd7b7f9
commit
70f4ecc035
|
@ -64,7 +64,7 @@ BIBIBIAS TC PIPASR +3 # CLEAR + READ PIPS LAST TIME IN FRE5+F133
|
||||||
TS OUTROUTE
|
TS OUTROUTE
|
||||||
|
|
||||||
CAF PRIO22
|
CAF PRIO22
|
||||||
TC FINDVAC # TO FIRST ENTRY TO AVERAGE G
|
TC FINDVAC # TO FIRST ENTRY TO AVERAGE G.
|
||||||
EBANK= DVCNTR
|
EBANK= DVCNTR
|
||||||
2CADR NORMLIZE
|
2CADR NORMLIZE
|
||||||
|
|
||||||
|
@ -106,15 +106,15 @@ REDO5.5 CAF ONE
|
||||||
CA FLAGWRD7
|
CA FLAGWRD7
|
||||||
MASK AVEGFBIT
|
MASK AVEGFBIT
|
||||||
EXTEND
|
EXTEND
|
||||||
BZF AVEGOUT # AVEGFLAG DOWN -- SET UP FINAL EXIT
|
BZF AVEGOUT # AVEGFLAG DOWN - SET UP FINAL EXIT
|
||||||
|
|
||||||
CA FLAGWRD6
|
CA FLAGWRD6
|
||||||
MASK MUNFLBIT
|
MASK MUNFLBIT
|
||||||
EXTEND
|
EXTEND
|
||||||
BZF MAKEACCS # MUNFLAG CLEAR -- BYPASS LR AND DISP.
|
BZF MAKEACCS # MUNFLAG CLEAR - BYPASS LR AND DISP.
|
||||||
|
|
||||||
CCS PHASE2
|
CCS PHASE2
|
||||||
TCF MAKEACCS # PHASE 2 ACTIVATED -- AVOID MULTIPLE R10.
|
TCF MAKEACCS # PHASE 2 ACTIVATED - AVOID MULTIPLE R10.
|
||||||
|
|
||||||
CAF SEVEN # SET PIPCTR FOR 4X/SEC RATE.
|
CAF SEVEN # SET PIPCTR FOR 4X/SEC RATE.
|
||||||
TS PIPCTR
|
TS PIPCTR
|
||||||
|
@ -130,7 +130,7 @@ REDO5.5 CAF ONE
|
||||||
COM
|
COM
|
||||||
DXCH -PHASE2
|
DXCH -PHASE2
|
||||||
|
|
||||||
CAF OCT24 # FIRST R10,R11 IN .200 SECONDS
|
CAF OCT24 # FIRST R10,R11 IN .200 SECONDS.
|
||||||
TC WAITLIST
|
TC WAITLIST
|
||||||
EBANK= UNIT/R/
|
EBANK= UNIT/R/
|
||||||
2CADR R10,R11
|
2CADR R10,R11
|
||||||
|
@ -152,7 +152,7 @@ GNUTFAZ5 TS L # SAVE INPUT IN L
|
||||||
TCF +2
|
TCF +2
|
||||||
|
|
||||||
GNUFAZE5 TS L # SAVE INPUT IN L
|
GNUFAZE5 TS L # SAVE INPUT IN L
|
||||||
CS L # -PHASE IN A, PHASE IN L.
|
CS L # -PHASE IN A, PHASE IN L
|
||||||
DXCH -PHASE5 # SET -PHASE5,PHASE5
|
DXCH -PHASE5 # SET -PHASE5,PHASE5
|
||||||
TC Q
|
TC Q
|
||||||
|
|
||||||
|
@ -192,7 +192,7 @@ GETABVAL TC INTPRET
|
||||||
TS ABDELV # ABDELV = CM/SEC*2(-14).
|
TS ABDELV # ABDELV = CM/SEC*2(-14).
|
||||||
EXTEND
|
EXTEND
|
||||||
MP KPIP
|
MP KPIP
|
||||||
DXCH ABDVCONV # ABDVCONV = M/CS * 2(-5).
|
DXCH ABDVCONV # ABDVCONV = M/CS *2(-5).
|
||||||
EXTEND
|
EXTEND
|
||||||
DCA MASS
|
DCA MASS
|
||||||
DXCH MASS1 # INITIALIZE MASS1 IN CASE WE SKIP MASSMON
|
DXCH MASS1 # INITIALIZE MASS1 IN CASE WE SKIP MASSMON
|
||||||
|
@ -204,7 +204,7 @@ MASSMON CS FLAGWRD8 # ARE WE ON THE SURFACE?
|
||||||
CA FLGWRD10 # NO: WHICH VEX SHOULD BE USED?
|
CA FLGWRD10 # NO: WHICH VEX SHOULD BE USED?
|
||||||
MASK APSFLBIT
|
MASK APSFLBIT
|
||||||
CCS A
|
CCS A
|
||||||
EXTEND # IF EXTEND IS EXECUTED, APSVEX --> A,
|
EXTEND # IF EXTEND IS EXECUTED, APSVEX --> A.
|
||||||
DCA APSVEX # OTHERWISE DPSVEX --> A
|
DCA APSVEX # OTHERWISE DPSVEX --> A
|
||||||
TS Q
|
TS Q
|
||||||
|
|
||||||
|
@ -240,8 +240,8 @@ GOSERV TC QUIKFAZ5
|
||||||
|
|
||||||
COPYCYCL TC COPYCYC
|
COPYCYCL TC COPYCYC
|
||||||
|
|
||||||
# CA ZERO # A IS ZERO ON RETURN FROM COPYCYC
|
CA ZERO # A IS ZERO ON RETURN FROM COPYCYC
|
||||||
TS PIPATMPX
|
TS PIPATMPX # STILL UNDER INHINT
|
||||||
TS PIPATMPY
|
TS PIPATMPY
|
||||||
TS PIPATMPZ
|
TS PIPATMPZ
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue