ryan/Apollo-11
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update SERVICER.agc

Browse Source 
Updated Parts of SERVICER to reflect the assistance provided with reference to large comment block on page 869 and +n in margins. Will continue to move through this (hopefully at about a page per day, maybe faster.) But have exams atm so will be a little slow. -KS
This commit is contained in:
Kourosh Simpkins
2020-10-06 10:52:25 +01:00
parent e4e9a83e27
commit d6168d9600
1 changed files with 14 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Luminary099/SERVICER.agc
View File

@ -491,8 +491,8 @@ NORMLIZ2 CA EIGHTEEN
TC ENDOFJOB TC ENDOFJOB
COPYCYC CA OCT24 # DEC 20 COPYCYC CA OCT24 # DEC 20
+1 INHINT +1 INHINT
+2 MASK NEG1 # REDUCE BY 1 IF ODD +2 MASK NEG1 # REDUCE BY 1 IF ODD
TS ITEMP1 TS ITEMP1
EXTEND EXTEND
INDEX ITEMP1 INDEX ITEMP1
@ -528,6 +528,8 @@ EIGHTEEN DEC 18
# EXIT IS VIA Q. # EXIT IS VIA Q.
# #
# #
#
#
# INPUT # INPUT
# #
# INPUT IS THROUGH THE COUNTERS PIPAX, PIPAY, PIPAZ, AND TIME2. # INPUT IS THROUGH THE COUNTERS PIPAX, PIPAY, PIPAZ, AND TIME2.
@ -674,7 +676,7 @@ TMPTOSPT CA CDUTEMPY # THIS SUBROUTINE, CALLED BY AN RTB FROM
LRHTASK CS FLGWRD11 LRHTASK CS FLGWRD11
MASK LRBYBIT MASK LRBYBIT
EXTEND EXTEND
BZF GRP2OFF # LR BYPASS SET -- BYPASS ALL LR READING. BZF GRP2OFF # LR BYPASS SET - BYPASS ALL LR READING.
CA READLBIT CA READLBIT
MASK FLGWRD11 # IS READLR FLAG SET? MASK FLGWRD11 # IS READLR FLAG SET?
@ -686,8 +688,8 @@ LRHTASK CS FLGWRD11
EXTEND EXTEND
BZF GRP2OFF # YES. BYPASS LR READ. BZF GRP2OFF # YES. BYPASS LR READ.
CA PRIO32 # LR READ OK. SET JOB TO DO IT CA PRIO32 # LR READ OK SET JOB TO DO IT
TC NOVAC # ABOUT 50 MS. PRIOR TO PIPA READ. TC NOVAC # ABOUT 50 MS PRIOR TO PIPA READ
EBANK= HMEAS EBANK= HMEAS
2CADR LRHJOB 2CADR LRHJOB