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

proof: VNP00H to VNPOOH

Browse Source 
Excluding Luminary099 P30_P37 as covered by existing PR.

This was missed when the other `POO(H)` names were checked and fixed several months ago.
This commit is contained in:
James Harris
2020-10-08 23:00:42 +01:00
parent 3570f3fd22
commit 497515d96f
19 changed files with 83 additions and 83 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
Comanche055/EXTENDED_VERBS.agc
View File

@ -10,7 +10,7 @@
# Website: http://www.ibiblio.org/apollo.
# Mod history: 2009-05-18 FB Transcription Batch 3 Assignment.
# 2009-05-20 RSB Corrections: POODOO -> P00DOO,
# GOTOPOOH -> GOTOP00H, added a couple of
# GOTOPOOH -> GOTOPOOH, added a couple of
# missing instructions in Verb 96.
# 2009-05-23 RSB In SYSTEST, corrected TC FLAGWRD1 to
# CA FLAGWRD1. Added a variety of SBANK=
@ -462,7 +462,7 @@ VNLODDT VN 2524 # V25N24 FOR LOAD DELTA TIME
COUNT 04/EXTVB
SYSTEST TC CHKP00H
SYSTEST TC CHKPOOH
CA FLAGWRD1 # IS NODOP01 FLAGBIT ON? (SET BY P11)
MASK NOP01BIT
EXTEND
@ -524,7 +524,7 @@ CHAZFOGC TC CHECKMM # IS IT PRELAUNCH
# TRANSFER LOADED VALUES TO REGISTERS, AND SEND COMMANDS.
# 6. IF BUSY FLAG SET, RESET IT TO RELEASE EXT VERB DISPLAY.
IMUATTCK TC CHKP00H
IMUATTCK TC CHKPOOH
CAF OCTAL30 # CHECK IF IMU ZERO AND IMU COARSE ARE ON
EXTEND
@ -586,7 +586,7 @@ CKLFTBTS CAF GRRBKBIT # HAS LIFTOFF OCCURRED
XACT0Q TC Q # YES
OCTAL30 OCT 30
VB64 TC CHKP00H # DEMAND PROGRAM 00.
VB64 TC CHKPOOH # DEMAND PROGRAM 00.
TC TESTXACT # IF DISPLAY SYS. NOT BUSY,MAKE IT BUSY.
INHINT
CAF PRIO4
@ -675,7 +675,7 @@ STABLISH CAF EBANK6 # V46 - SET EBANK TO E6
# C. ENTER
# 1. REPEAT FLASHING V06,N22.
CREWMANU TC CHKP00H # DEMAND P00
CREWMANU TC CHKPOOH # DEMAND P00
TC TESTXACT
@ -1004,7 +1004,7 @@ LFTFLGON TC UPFLAG # VB 75 - SET LIFTOFF FLAG BIT
TC GOPIN
# Page 261
CHKP00H CA MODREG
CHKPOOH CA MODREG
EXTEND
BZF TCQ
TCF ALM/END
@ -1058,7 +1058,7 @@ IDLECADR 2CADR T5IDLOC
# TERMINATE- EXIT R63 ROUTINE
# PROCEED- RESET 3AXISFLG AND CALL R60CSM FOR ATTITUDE MANEUVER.
V89PERF TC CHKP00H # DEMAND P00
V89PERF TC CHKPOOH # DEMAND P00
TC TESTXACT
INHINT
CAF PRIO10
@ -1078,7 +1078,7 @@ WMATRXNG TC DOWNFLAG # RESET RENDWFLG
GOSHOSUM EQUALS SHOWSUM
SHOWSUM TC CHKP00H
SHOWSUM TC CHKPOOH
TC TESTXACT # *
CAF S+1 # *
TS SKEEP6 # * SHOWSUM OPTION

10
Comanche055/FRESH_START_AND_RESTART.agc
View File

@ -116,7 +116,7 @@
# CADR SLAP1
# ENEMA - TC POSTJUMP *** DO NOT CALL ENEMA WITHOUT ***
# CADR ENEMA *** CONSULTING P00H PEOPLE ***
# CADR ENEMA *** CONSULTING POOH PEOPLE ***
# B. OUTPUT
@ -471,7 +471,7 @@ PTBAD TC ALARM # SET ALARM TO SHOW PHASE TABLE FAILURE.
# ******** ****** ******
#
# DO NOT USE GOPROG2 OR ENEMA WITHOUT CONSULTING P00H PEOPLE
# DO NOT USE GOPROG2 OR ENEMA WITHOUT CONSULTING POOH PEOPLE
#
GOPROG2 EQUALS ENEMA
OCT10000 = BIT13
@ -945,12 +945,12 @@ DUMMYAD EXIT
TC DOWNFLAG
ADRES R21MARK
CCS MMNUMBER # IS THIS A P00H REQUEST
CCS MMNUMBER # IS THIS A POOH REQUEST
TCF NOUVEAU # NO, PICK UP NEW PROGRAM
COUNT 04/P00
P00H TC RELDSP # RELEASE DISPLAY SYSTEM
POOH TC RELDSP # RELEASE DISPLAY SYSTEM
CAF PRIO5 # SET VARIABLE RESTART REGISTER FOR P00.
TS PHSPRDT2
@ -985,7 +985,7 @@ SEUDOP00 TS DNLSTCOD # SET UP APPROPRIATE DOWNLIST.
GROUPKIL TC IBNKCALL # KILL GROUPS 3(5,6
CADR V37KLEAN
CCS MMNUMBER # IS IT P00H
CCS MMNUMBER # IS IT POOH
TCF RENDV00 # NO
# Page 201
TC IBNKCALL

6
Comanche055/INTEGRATION_INITIALIZATION.agc
View File

@ -742,13 +742,13 @@ DT/2COMP DLOAD DSU
GETMAXDT
DSU BMN # IS TIME TO INTEG. TO GR THAN MAXTIME
12D
P00HCHK
POOHCHK
USEMAXDT DLOAD SIGN
12D
DT/2
# Page 1324
STCALL DT/2
P00HCHK
POOHCHK
MAXDT DLOAD PDDL # EXCHANGE DT/2MAX WITH COMPUTED MAX.
DT/2MAX
GOTO
@ -757,7 +757,7 @@ GETMAXDT RTB
SIGNMPAC
STCALL DT/2
USEMAXDT
P00HCHK DLOAD ABS
POOHCHK DLOAD ABS
DT/2
DSU BMN
DT/2MIN

4
Comanche055/P20-P25.agc
View File

@ -11,7 +11,7 @@
# of the same name, using Comanche055 page
# images.
# 2009-05-20 RSB Corrections: P2OS -> P20S, STO -> STQ,
# GOTOPOOH -> GOTOP00H, a duplicated EXTEND
# GOTOPOOH -> GOTOPOOH, a duplicated EXTEND
# was fixed, P23.10 -> R23.10,
# S22B0X44 -> S22BOX44, S22SUBSCL -> 22SUBSCL,
# S22DPP -> S22DSPP, changed some instructions in
@ -2685,7 +2685,7 @@ S22UOFF = LEMPOS # 6 U SUB OFF
#
# CALLING SEQUENCE: V 89 E
#
# SUBROUTINES CALLED: CHKP00H, R02BOTH, GOXDSPF, R63COMP, R60CSM
# SUBROUTINES CALLED: CHKPOOH, R02BOTH, GOXDSPF, R63COMP, R60CSM
#
# ALARMS 1. OPERATOR ERROR IF NOT IN P00
# 2. PROGRAM ALARM IF IMU IS OFF

18
Comanche055/P32-P33_P72-P73.agc
View File

@ -189,7 +189,7 @@
# GOFLASH
# GOTOPOOH
# Page 652
# VNP00H
# VNPOOH
# GOFLASHR
# BLANKET
# ENDOFJOB
@ -237,7 +237,7 @@ P32/P72A TC P20FLGON
STORE NN
EXIT
CAF V06N11 # TCSI
TC VNP00H
TC VNPOOH
CAF V06N55 # NN. ELEV(RGL05)
# Page 653
TC BANKCALL
@ -246,7 +246,7 @@ P32/P72A TC P20FLGON
TC +2
TC -5
CAF V06N37 # TTPI
TC VNP00H
TC VNPOOH
TC INTPRET
DLOAD
TCSI
@ -295,7 +295,7 @@ P32/P72F STORE T2TOT3
P32/P72F
EXIT
CAF V06N75
TC VNP00H
TC VNPOOH
TC INTPRET
VLOAD CALL
DELVEET1
@ -453,7 +453,7 @@ P32/P72F STORE T2TOT3
# AVFLAGA
# AVFLAGP
# P20FLGON
# VNP00H
# VNPOOH
# SELECTMU
# ADVANCE
# CDHMVR
@ -476,7 +476,7 @@ P33 TC AVFLAGA
P73 TC AVFLAGP
P33/P73A TC P20FLGON
CAF V06N13 # TCDH
TC VNP00H
TC VNPOOH
TC INTPRET
DLOAD
TTPIO
@ -560,7 +560,7 @@ P33/P73F ABS DSU
STORE T2TOT3
EXIT
CAF V06N75
TC VNP00H
TC VNPOOH
TC INTPRET
VLOAD CALL
DELVEET2
@ -578,7 +578,7 @@ P33/P73F ABS DSU
# SUBROUTINES USED
# S32/33.X
# VNP00H
# VNPOOH
SETLOC CDHTAG3
BANK
@ -595,7 +595,7 @@ DISDVLVC STORE DELVLVC
STORE DELVLVC
EXIT
CA VERBNOUN
TC VNP00H
TC VNPOOH
TC INTPRET
GOTO
NORMEX

18
Comanche055/P34-35_P74-75.agc
View File

@ -159,7 +159,7 @@
# AVFLAGA
# Page 463
# AVFLAGP
# VNP00H
# VNPOOH
# DISPLAYE
# SELECTMU
# PRECSET
@ -185,7 +185,7 @@ P34 TC AVFLAGA
P74 TC AVFLAGP
P34/P74A TC P20FLGON # SET UPDATFLG, TRACKFLG
CAF V06N37 # TTPI
TC VNP00H # Onno: The scans look like O not zero
TC VNPOOH # Onno: The scans look like O not zero
TC INTPRET
SSP EXIT
NN
@ -240,7 +240,7 @@ SWCHCLR BONCLR BON
TC P34/P74E
P34/P74D EXIT
CAF V06N37 # TTPI
TC VNP00H
TC VNPOOH
P34/P74E TC INTPRET
SETPD DLOAD
0D
@ -287,7 +287,7 @@ P34/P74E TC INTPRET
STORE TIG
EXIT
CAF V06N58
TC VNP00H
TC VNPOOH
TC INTPRET
CALL
S34/35.5
@ -821,7 +821,7 @@ ALLSET STOVL TET
# GOTOPOOH
# S34/35.3
# S34.35.4
# VNP00H
# VNPOOH
S34/35.5 STQ BON
SUBEXIT
@ -835,7 +835,7 @@ FLAGON VLOAD
STORE DVLOS # SAVE DELTA V BEFORE DISPLAY
EXIT
CAF V06N81
TC VNP00H
TC VNPOOH
TC INTPRET
VLOAD VSU # TEST FOR OVERWRITE OF COMPUTED
DELVLVC # DELTA V
@ -852,7 +852,7 @@ FLAGOFF CALL
S34/35.4
EXIT
CAF V06N59
TC VNP00H
TC VNPOOH
TC INTPRET
GOTO
SUBEXIT
@ -955,7 +955,7 @@ P3XORP7X CAF HIGH9
INCR Q
RETURN
# ***** VNP00H *****
# ***** VNPOOH *****
#
# SUBROUTINES USED
# BANKCALL
@ -965,7 +965,7 @@ P3XORP7X CAF HIGH9
SETLOC P30SUBS
BANK
VNP00H EXTEND
VNPOOH EXTEND
QXCH RTRN
TS VERBNOUN
CAF VNBANK # ***** THIS ROUTINE MUST REMAIN IN

2
Comanche055/P51-P53.agc
View File

@ -10,7 +10,7 @@
# Mod history: 2009-05-12 RSB Adapted from Colossus249 file of the same
# name, and Comanche 055 page images.
# 2009-05-20 RSB Corrections: SETI/PDT -> SET1/PDT,
# GOTOPOOH -> GOTOP00H, R33EXIT -> R53EXIT,
# GOTOPOOH -> GOTOPOOH, R33EXIT -> R53EXIT,
# V853 -> VB53, R56A -> R56A1 (some places
# only), added missing R56A1 label, added a
# missing CAF in COARSTYP, corrected a SETLOC

2
Comanche055/P61-P67.agc
View File

@ -447,7 +447,7 @@ P66 TC NEWMODEX # ENTER VIA RTB WHEN D < Q7 FPSS
# MOD BY: R. HIRSCHKOP
# FUNCTION: TO TERMINATE STEERING WHEN THE CM VELOCITY WRT EARTH = 1000 FT/SEC
# CALLING SEQUENCE:
# EXIT: TO P00H
# EXIT: TO POOH
# SUBROUTINE CALLS: GOFLASH
# THIS DISPLAY IS CALLED EACH PASS THROUGH STEERING. RESTART PROTECTION IS VIA STEERING.

4
Comanche055/PINBALL_GAME_BUTTONS_AND_LIGHTS.agc
View File

@ -11,7 +11,7 @@
# of the same name, using Comanche055 page
# images. Finished through page 329.
# 2009-05-09 RSB Finished first draft.
# 2009-05-20 RSB Corrected a CHKPOOH to CHKP00H.
# 2009-05-20 RSB Corrected a CHKPOOH to CHKPOOH.
#
# This source code has been transcribed or otherwise adapted from digitized
# images of a hardcopy from the MIT Museum. The digitization was performed
@ -3605,7 +3605,7 @@ PINTEST EQUALS LST2FAN
COUNT 41/PIN
VBTSTLTS TC BANKCALL
CADR CHKP00H
CADR CHKPOOH
INHINT
CS BIT1 # SET BIT 1 OF IMODES33 SO IMUMON WON'T

2
Comanche055/TPI_SEARCH.agc
View File

@ -476,7 +476,7 @@ P17 TC AVFLAGA # AVFLAG = CSM , SET TRACK + UPDATE FLAGS
P77 TC AVFLAGP # AVFLAG = LEM , SET TRACK + UPDATE FLAGS
P17.1 TC P20FLGON # SET UPDATE FLAG
CAF V06N37 # DISPLAY TTPI TIME
TC VNP00H
TC VNPOOH
TC INTPRET
CLEAR CALL
UPDATFLG