Update in page 0948
This commit is contained in:
		| @@ -183,18 +183,18 @@ REPCHEK		CAE	REPFRAC		# CHECK FOR REPETITIVE UPDATES | ||||
| 		TCF	CORSETUP | ||||
| # Page 948 | ||||
| 1SHOTOK		CAF	BIT13		# CHECK ENGINE-ON BIT, NOT PERMITTING | ||||
| 		EXTEND			#	SWITCHOVER DURING ENGINE-SHUTDOWN | ||||
| 		EXTEND			#      ONE-SHOT DURING ENGINE-SHUTDOWN | ||||
| 		RAND	DSALMOUT | ||||
| 		CCS	A | ||||
| 		TCF	+2		# 	ONE-SHOT OK | ||||
| 		TCF	TVCEXFIN	# 	NO, TERMINATE | ||||
| 		TCF	+2		#      ONE-SHOT OK | ||||
| 		TCF	TVCEXFIN	#      NO, TERMINATE | ||||
|  | ||||
| 		INCR	TVCEXPHS	#					(3) | ||||
|  | ||||
| # RSB 2009.  The following instruction was previously "CAE FCORFRAC", but FCORFRAC | ||||
| # is not in erasable memory as implied by the use of CAE.  I've accordingly changed | ||||
| # it to CAF instead to indicate fixed memory. | ||||
| TEMPSET		CAF	FCORFRAC	# 	SET UP CORRECTION FRACTION | ||||
| TEMPSET		CAF	FCORFRAC	#      SET UP CORRECTION FRACTION | ||||
| 		TS	TEMPDAP +1 | ||||
|  | ||||
| 		INCR	TVCEXPHS	# ENTRY FROM REPCHECK AT NEXT LOCATION	(4) | ||||
| @@ -207,8 +207,8 @@ CORSETUP	CAE	DAPDATR1	# CHECK FOR LEM-OFF/ON | ||||
| 		AD	TEMPDAP +1 | ||||
| 		TS	TEMPDAP		# CG.CORR USES TEMPDAP | ||||
|  | ||||
| 		CAF	NEGONE		# SET UP FOR CNTR = -1 (SWTCHOVR DONE) | ||||
| 		TS	CNTRTMP		#	(COPYCYCLE AT "CNTRCOPY") | ||||
| 		CAF	NEGONE		# SET UP FOR CNTR = -1 (ONE-SHOT DONE) | ||||
| 		TS	CNTRTMP		#      (COPYCYCLE AT  .CNTRCOPY. ) | ||||
|  | ||||
| CG.CORR		EXTEND			# PITCH TMC LOOP | ||||
| 		DCA	PDELOFF | ||||
|   | ||||
		Reference in New Issue
	
	Block a user