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

Proof DAP_INTERFACE_SUBROUTINES #574 (#683)

Browse Source
This commit is contained in:
Chris Smith
2020-07-09 13:34:39 -04:00
committed by GitHub
parent be990696b1
commit 3b0fe95e42
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
Luminary099/DAP_INTERFACE_SUBROUTINES.agc
View File

@@ -38,7 +38,7 @@
# MOD 1 1/23/67 MODIFICATION BY PETER ADLER # MOD 1 1/23/67 MODIFICATION BY PETER ADLER
# #
# FUNCTIONAL DESCRIPTION # FUNCTIONAL DESCRIPTION
# HEREIN IS A COLLECTION OF SUBROUTINES WHICH ALLOW MISSION CONTROL PROGRAMS TO CONTROL THE MODE # HEREIN ARE A COLLECTION OF SUBROUTINES WHICH ALLOW MISSION CONTROL PROGRAMS TO CONTROL THE MODE
# AND INTERFACE WITH THE DAP. # AND INTERFACE WITH THE DAP.
# #
# CALLING SEQUENCES # CALLING SEQUENCES
@@ -60,8 +60,8 @@
# Page 1407 # Page 1407
# SUBROUTINE NAMES: # SUBROUTINE NAMES:
# SETMAXDB, SETMINDB, RESTORDB, PFLITEDB # SETMAXDB, SETMINDB, RESTORDB, PFLITEDB
# MODIFIED: 30 JANUARY 1968 BY P. S. WEISSMAN TO CREATE RESTORDB. # MODIFIED: 30 JANUARY 1968 BY P S WEISSMAN TO CREATE RESTORDB.
# MODIFIED: 1 MARCH 1968 BY P. S. WEISSMAN TO SAVE EBANK AND CREATE PFLITEDB # MODIFIED: 1 MARCH 1968 BY P S WEISSMAN TO SAVE EBANK AND CREATE PFLITEDB
# #
# FUNCTIONAL DESCRIPTION: # FUNCTIONAL DESCRIPTION:
# SETMAXDB -- SET DEADBAND TO 5.0 DEGREES # SETMAXDB -- SET DEADBAND TO 5.0 DEGREES
@@ -156,7 +156,7 @@ ALLCOAST EXTEND # SAVE Q FOR RETURN
QXCH RUPTREG2 QXCH RUPTREG2
# Page 1409 # Page 1409
TC STOPRATE # CLEAR RATE INTERFACE. RETURN WITH A=0 TC STOPRATE # CLEAR RATE INTERFACE. RETURN WITH A=0
LXCH EBANK # AND L=EBANK6. SAVE CALLER'S EBANK. LXCH EBANK # AND L=EBANK6. SAVE CALLER'S EBANK.
TS AOSQ TS AOSQ
TS AOSQ +1 TS AOSQ +1
TS AOSR TS AOSR