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

Fix YaYUL Fatal Errors in Comanche055 (#664)

Browse Source
This commit is contained in:
James Harris
2020-03-04 17:17:07 +00:00
committed by GitHub
parent ded312a948
commit 8b2fca34e6
25 changed files with 211 additions and 112 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
Comanche055/P51-P53.agc
View File

@ -158,7 +158,7 @@ P52A CAF BIT1
P52B CAF BIT1
TC BANKCALL # FLASH OPTION CODE AND ORIENTATION CODE
CADR GOPERF4R
TC GOTOP00H
TC GOTOPOOH
TC +5
TC P52B # NEW CODE -- NEW ORIENTATION CODE INPUT
TC PHASCHNG
@ -178,7 +178,7 @@ P52T EXTEND
CAF V06N34
TC BANKCALL
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC +2
TC -5
EXTEND
@ -211,7 +211,7 @@ P52D CALL # READ VEHICLE ATTITUDE AND
CAF VB06N22
TC BANKCALL # DISPLAY GIMBAL ANGLES
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC COARSTYP
P52J TC INTPRET # RECYCLE: VEHICLE HAS BEEN MANEUVERED
GOTO
@ -226,7 +226,7 @@ P52C TC PHASCHNG
CAF ALRM15
TC BANKCALL
CADR GOPERF1
TC GOTOP00H
TC GOTOPOOH
TC +2 # V33
TC P52F # E
TC INTPRET
@ -243,14 +243,14 @@ P52F TC INTPRET # 2 STARS AVAILABLE
CALL
R51
ENDP50S EXIT
TC GOTOP00H
TC GOTOPOOH
# Page 741
P52I TC ALARM
OCT 405
CAF V05N09
TC BANKCALL
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC P52F # PROCEED: DO FINE ALIGN-R51
TC P52C # RECYCLE: VEHICLE HAS BEEN MANEUVERED
V06N34 VN 0634
@ -258,7 +258,7 @@ VB06N22 VN 00622
COARSTYP CAF OCT13
TC BANKCALL
CADR GOPERF1
TCF GOTOP00H # V34
TCF GOTOPOOH # V34
TCF P52J +3 # NORMAL
TC INTPRET # GYRO COARSE
GYCRS VLOAD MXV
@ -366,7 +366,7 @@ P52LS STQ SET
LSDISP CAF V06N89*
TC BANKCALL
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC +2
TC LSDISP
TC INTPRET
@ -564,7 +564,7 @@ TERM52 TC CLEARMRK
TC BANKCALL # CLEAR OUT EXTENDED VERBS
CADR KLEENEX
TC GOTOP00H # NO GO TO P00
TC GOTOPOOH # NO GO TO P00
ADVORB STQ SET # SETS UP ADVANCED ORBIT TRACKING
SAVQR52
@ -941,7 +941,7 @@ R51.3 CLEAR CLEAR
R51DSP CAF V01N70
TC BANKCALL
CADR GOFLASHR
TC GOTOP00H
TC GOTOPOOH
TC +5
TC -5
CAF SIX
@ -1009,7 +1009,7 @@ R51K EXIT
CAF OCT14
TC BANKCALL
CADR GOPERF1
TC GOTOP00H
TC GOTOPOOH
TC +2 # V33
TC +3
TC BANKCALL
@ -1057,7 +1057,7 @@ PULSEM EXIT
R55.1 CAF V06N93
TC BANKCALL
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC R55.2
TC R55RET
R55.2 TC PHASCHNG
@ -1148,7 +1148,7 @@ CHKSD DLOAD DSU
# Page 761
TC BANKCALL
CADR GOFLASH
TCF GOTOP00H
TCF GOTOPOOH
TC CHKSDA # PROCEED
TC INTPRET
CLEAR GOTO
@ -1452,14 +1452,14 @@ P51 CS IMODES30
TC P51A
TC ALARM
OCT 210
TC GOTOP00H
TC GOTOPOOH
P51A TC BANKCALL
CADR R02ZERO
P51AA CAF PRFMSTAQ
TC BANKCALL
CADR GOPERF1
TC GOTOP00H # TERM.
TC GOTOPOOH # TERM.
TC P51B # V33
TC PHASCHNG
OCT 05024
@ -1707,7 +1707,7 @@ R53C1 CAF ZERO
R53C CAF V01N71
TC BANKCALL
CADR GOFLASH
TC GOTOP00H # TERM.
TC GOTOPOOH # TERM.
TCF R53Z
TC R53C # RECYCLE
R53Z TC CHKSCODE
@ -2090,7 +2090,7 @@ R56 STQ EXIT
CAF V06N94B
TC BANKCALL
CADR GOFLASH
TC GOTOP00H # TERM.
TC GOTOPOOH # TERM.
TC R56A # PROCEED: ANGLES OK
TC -5 # ENTER: NEW ANGLES
R56A TC BANKCALL
@ -2104,7 +2104,7 @@ R56A1 CAF VB53 # DISPLAY V53 REQUESTING ALTERNATE MARK
TC BANKCALL
# Page 782
CADR GOMARK2
TCF GOTOP00H # V34: TERMINATE
TCF GOTOPOOH # V34: TERMINATE
TCF R56A1 # V33: DON'T PROCEED -- JUST ENTER TO MARK
TC INTPRET
DLOAD
@ -2138,7 +2138,7 @@ R56A1 CAF VB53 # DISPLAY V53 REQUESTING ALTERNATE MARK
CAF OCT16
TC BANKCALL
CADR GOPERF1
TC GOTOP00H # TERM.
TC GOTOPOOH # TERM.
TCF R56B # PROCEED: MARK COMPLETED
TCF R56A +2 # RECYCLE: DO ANOTHER MARK -- LIKE REJECT.
R56B TC BANKCALL
@ -2173,7 +2173,7 @@ NOSAM EXIT
CAF VNPLANV
TC BANKCALL
CADR GOFLASH
TC GOTOP00H
TC GOTOPOOH
TC +2
TC -5
TC INTPRET