Skip to content

Commit

Permalink
All instances of WTIH or WTIHIN in .agc source code corrected WITH or
Browse files Browse the repository at this point in the history
WITHIN.
  • Loading branch information
rburkey2005 committed Jan 28, 2017
1 parent 3a9773b commit d57c21b
Show file tree
Hide file tree
Showing 78 changed files with 190 additions and 113 deletions.
3 changes: 2 additions & 1 deletion Artemis072/CONIC_SUBROUTINES.agc
Expand Up @@ -17,6 +17,7 @@
## 2010-02-20 RSB Un-##'d this header.
## 2017-01-21 RSB Proofed comment text by diff'ing vs Comanche 55
## and corrected errors found.
## 2017-01-28 RSB WTIH -> WITH.

## Page 1262

Expand Down Expand Up @@ -328,7 +329,7 @@
# STATE IS TO BE UPDATED ALONG A CONIC TRAJECTORY, CALCULATES THE CORRESPONDING TIME-OF-FLIGHT AND, IN ADDITION,
# PROVIDES THE OPTION OF COMPUTING THE NEW UPDATED STATE VECTOR. THE RESULTING TRAJECTORY MAY BE A SECTION OF A
# CIRCLE, ELLIPSE, PARABOLA, OR HYPERBOLA WITH RESPECT TO THE EARTH OR THE MOON. THE USE OF THE SUBROUTINE CAN BE
# EXTENDED USING OTHER PRIMARY BODIES BY SIMPLE ADDITIONS TO THE MUTABLE WTIHOUT INTRODUCING ANY CODING CHANGES,
# EXTENDED USING OTHER PRIMARY BODIES BY SIMPLE ADDITIONS TO THE MUTABLE WITHOUT INTRODUCING ANY CODING CHANGES,
# ACCEPTING THE INHERENT SCALE FACTOR CHANGES IN POSITION AND VELOCITY.
#
#
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/CSM_GEOMETRY.agc
Expand Up @@ -14,14 +14,15 @@
## 2010-02-20 RSB Un-##'d this header.
## 2017-01-21 RSB Proofed comment text by diff'ing vs Comanche 55
## and corrected errors found.
## 2017-01-28 RSB WTIH -> WITH.

## Page 297

SETLOC COMGEOM1
BANK

# THIS ROUTINE TAKES THE SHAFT AND TRUNNION ANGLES AS READ BY THE CM OPTICAL SYSTEM AND CONVERTS THEM INTO A UNIT
# VECTOR REFERENCED TO THE NAVIGATION BASE COORDINATE SYSTEM AND COINCIDENT WTIH THE SEXTANT LINE OF SIGHT.
# VECTOR REFERENCED TO THE NAVIGATION BASE COORDINATE SYSTEM AND COINCIDENT WITH THE SEXTANT LINE OF SIGHT.
#
# THE INPUTS ARE 1) THE SEXTANT SHAFT AND TRUNNION ANGLES ARE STORED SP IN LOCATIONS 3 AND 5 RESPECTIVELY OF THE
# MARK VAC AREA. 2) THE COMPLEMENT OF THE BASE ADDRESS OF THE MARK VAC AREA IS STORED SP AT LOCATION X1 OF YOUR
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/FRESH_START_AND_RESTART.agc
Expand Up @@ -17,6 +17,7 @@
## 2010-02-11 JL Fixed errors on p201, p226.
## 2010-02-20 RSB Un-##'d this header.
## 2010-12-29 JL Fixed indentation.
## 2017-01-28 RSB WTIH -> WITH.

## Page 192

Expand Down Expand Up @@ -121,7 +122,7 @@
# B. ALARMS
#
# 1107 PHASE TABLE ERROR
# 1110 RESTART WTIH NO ACTIVE GROUPS
# 1110 RESTART WITH NO ACTIVE GROUPS

## Page 194
SETLOC FRANDRES
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/P32-P33,_P72-P73.agc
Expand Up @@ -15,6 +15,7 @@
## 2010-02-09 JL Added missing code on p685.
## 2010-02-11 JL Fixed error on p663.
## 2010-02-20 RSB Un-##'d this header.
## 2017-01-28 RSB WTIH -> WITH.

## Page 658

Expand All @@ -25,7 +26,7 @@
#
# PURPOSE
#
# (1) TO CALCULATE PARAMETERS ASSOCIATED WTIH THE FOLLOWING
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING
# CONCENTRIC FLIGHT PLAN MANEUVERS - THE CO-ELLIPTIC SEQUENCE
# INITIATION (CSI) MANEUVER AND THE CONSTANT DELTA ALTITUDE
# (CDH) MANEUVER.
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/P37,P70.agc
Expand Up @@ -17,6 +17,7 @@
## 2010-02-13 JL Fixed error on p905.
## 2010-02-20 RSB Un-##'d this header.
## 2010-04-11 JL Add missing comment characters.
## 2017-01-28 RSB WTIH -> WITH.

## Page 897
SETLOC RTE1
Expand All @@ -30,7 +31,7 @@
# DESCRIPTION
# A RETURN TO EARTH TRAJECTORY IS COMPUTED PROVIDED THE CSM IS OUTSIDE THE LUNAR SPHERE OF INFLUENCE AT THE
# TIME OF IGNITION. INITIALLY A CONIC TRAJECTORY IS DETERMINED AND RESULTING IGNITION AND REENTRY PARAMETERS ARE
# DISPLAYED TO THE ASTRONAUT. THEN IF THE ASTRONAUT SO DESIRES, A PRECISION TRAJECTORY IS DETERMINED WTIH THE
# DISPLAYED TO THE ASTRONAUT. THEN IF THE ASTRONAUT SO DESIRES, A PRECISION TRAJECTORY IS DETERMINED WITH THE
# RESULTING IGNITION AND REENTRY PARAMETERS DISPLAYED. UPON FINAL ACCEPTANCE BY THE ASTRONAUT, THE PROGRAM
# COMPUTES AND STORES THE TARGET PARAMETERS FOR RETURN TO EARTH FOR USE BY SPS PROGRAM (P40) OR RCS PROGRAM (P41).
#
Expand Down
9 changes: 5 additions & 4 deletions Artemis072/PINBALL_GAME__BUTTONS_AND_LIGHTS.agc
Expand Up @@ -20,6 +20,7 @@
## 2010-02-13 JL Fixed errors on pages 327, 354, 356, 362, 363, 368, 370, 374, 379, 380, 391, 392.
## 2010-02-20 RSB Un-##'d this header.
## 2011-05-07 JL Removed obsolete link.
## 2017-01-28 RSB WTIH -> WITH.

## Page 318

Expand Down Expand Up @@ -2692,7 +2693,7 @@ SETVAC CAF TCFINDVC

# VBRQWAIT ENTERS REQUEST TO WAITLIST FOR ANY ADDRESS WITH ANY DELAY.
# IT DOES ENDOFJOB AFTER ENTERING REQUEST. DISPLAY SYST IS RELEASED.
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WTIH
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WITH
# COMPONENT 1 DELAY (LOW BITS)
# COMPONENT 2 TASK ADRES (12 BIT)
# COMPONENT 3 BBCON
Expand Down Expand Up @@ -2801,11 +2802,11 @@ UNSUSPEN CAF ZERO # EXTERNAL MONITOR IS SUSPENDED,
# PLACE 0VVVVVVVNNNNNNN INTO A.
# V'S ARE THE 7-BIT VERB CODE. N'S ARE THE 7-BIT NOUN CODE.
#
# IF NVSUB IS CALLED WTIH THE FOLLOWING NEGATIVE NUMBERS (RATHER THAN THE
# IF NVSUB IS CALLED WITH THE FOLLOWING NEGATIVE NUMBERS (RATHER THAN THE
# VERB-NOUN CODE) IN A, THEN THE DISPLAY IS BLANKED AS FOLLOWS-
# -4 FULL BLANK, -3 LEAVE MODE, -2 LEAVE MODE AND VERB, -1 BLANK R'S ONLY.
#
# NVSUB CAN BE USED WTIH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# NVSUB CAN BE USED WITH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# MPAC+2 BEFORE THE STANDARD NVSUB CALL.
#
# NVSUB RETURNS TO 2+ CALLING LOC AFTER PERFORMING TASK, IF DISPLAY
Expand Down Expand Up @@ -2840,7 +2841,7 @@ UNSUSPEN CAF ZERO # EXTERNAL MONITOR IS SUSPENDED,
# (SIMILARLY FOR PLEASE MARK). FIRST PLACE THE CODED NUMBER FOR WHAT
# ACTION IS DESIRED OF OPERATOR INTO THE REGISTERS REFERRED TO BY THE
# 'CHECKLIST' NOUN. GO TO NVSUB WITH A DISPLAY VERB AND THE 'CHECKLIST'
# NOUN. GO TO NVSUB AGAIN WTIH THE 'PLEASE PERFORM' VERB AND ZEROS IN THE
# NOUN. GO TO NVSUB AGAIN WITH THE 'PLEASE PERFORM' VERB AND ZEROS IN THE
# LOW 7 BITS. THIS 'PASTES UP' THE 'PLEASE PERFORM' VERB INTO THE VERB
# LIGHTS.
#
Expand Down
7 changes: 4 additions & 3 deletions Artemis072/PINBALL_NOUN_TABLES.agc
Expand Up @@ -15,6 +15,7 @@
## 2009-09-26 JL Move line comments to same column as all other modules.
## 2010-01-31 JL Fixed build errors.
## 2010-02-20 RSB Un-##'d this header.
## 2017-01-28 RSB WTIH -> WITH.

## Page 280

Expand Down Expand Up @@ -106,7 +107,7 @@
# (WHICH ARE IN A SEPARATE BANK FROM THE REST OF PINBALL). THESE READING
# ROUTINES ARE IN THE SAME BANK AS THE TABLES. THEY ARE CALLED BY DXCH Z.
#
# LODNNTAB LOADS NNADTEM WTIH THE NNADTAB ENTRY, NNTYPTEM WITH THE
# LODNNTAB LOADS NNADTEM WITH THE NNADTAB ENTRY, NNTYPTEM WITH THE
# NNTYPTAB ENTRY. IF THE NOUN IS MIXED, IDAD1TEM IS LOADED WITH THE FIRST
# IDADDTAB ENTRY, IDAD2TEM THE SECOND IDADDTAB ENTRY, IDAD3TEM THE THIRD
# IDADDTAB ENTRY, RUTMXTEM WITH THE RUTMXTAB ENTRY. MIXBR IS SET FOR
Expand Down Expand Up @@ -149,7 +150,7 @@ LODNLV DXCH IDAD2TEM # PUT RETURN INFO INTO A, L.

MIXCON = OCT50 # FIRST MIXED NOUN =40. (DEC 40)

# GTSFOUT LOADS SFTEMP1, SFTEMP2 WTIH THE DP SFOUTAB ENTRIES.
# GTSFOUT LOADS SFTEMP1, SFTEMP2 WITH THE DP SFOUTAB ENTRIES.
GTSFOUT DXCH SFTEMP1 # 2X(SFCONUM) ARRIVES IN SFTEMP1.
## Page 283
EXTEND
Expand Down Expand Up @@ -197,7 +198,7 @@ NNADTAB OCT 00000 # 00 NOT IN USE
OCT 00000 # 23 SPARE
ECADR DSPTEM2 +1 # 24 DELTA TIME FOR AGC CLOCK (HRS,MIN,SEC)
ECADR DSPTEM1 # 25 CHECKLIST
# (USED WTIH PLEASE PERFORM ONLY)
# (USED WITH PLEASE PERFORM ONLY)
ECADR N26/PRI # 26 PRIO/DELAY, ADRES, BBCON
ECADR SMODE # 27 SELF TEST ON/OFF SWITCH
OCT 0 # 28 SPARE
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/T4RUPT_PROGRAM.agc
Expand Up @@ -20,6 +20,7 @@
## 2010-12-29 JL Fixed indentation.
## 2017-01-26 RSB Back-ported comment-text fixes found while
## proofing corresponding Luminary 69 file.
## 2017-01-28 RSB WTIH -> WITH.

## Page 141

Expand Down Expand Up @@ -561,7 +562,7 @@ NXTFL33 CCS RUPTREG2 # PROCESS POSSIBLE ADDITIONAL CHANGES.
#
# ERASABLE INITIALIZATION:
# 1) FRESH START OR RESTART WITH NO GROUPS ACTIVE: C(CDUZ) = 0, IMODES30 BIT 6 = 0, IMODES33 BIT 1 = 0.
# 2) RESTART WTIH GROUPS ACTIVE: SAME AS FRESH START EXCEPT C(CDUZ) NOT CHANGED SO GIMBAL MONITOR
# 2) RESTART WITH GROUPS ACTIVE: SAME AS FRESH START EXCEPT C(CDUZ) NOT CHANGED SO GIMBAL MONITOR
# PROCEEDS AS BEFORE.
#
# ALARMS: 1) MGA REGION (2) CAUSES GIMBAL LOCK LAMP TO BE LIT.
Expand Down
3 changes: 2 additions & 1 deletion Artemis072/TVCEXECUTIVE.agc
Expand Up @@ -12,6 +12,7 @@
## Mod history: 2009-09-13 SMC Adapted from Comanche055 files.
## 2009-09-14 JL Fix typos. Fix page numbers. Remove change comments. Restore hard tabs.
## 2010-02-20 RSB Un-##'d this header.
## 2017-01-28 RSB WTIH -> WITH.

## Page 950
# PROGRAM NAME.... TVCEXECUTIVE, CONSISTING OF TVCEXEC, NEEDLEUP, VARGAINS
Expand Down Expand Up @@ -84,7 +85,7 @@ ROLLPREP CAE CDUX # UPDATE ROLL LADDERS (NO NEED TO RESTART-
XCH OGANOW # PROTECT, SINCE ROLL DAPS RE-START)
XCH OGAPAST

CAE OGAD # PREPARE ROLL FDAI NEEDLE WTIH FLY-TO
CAE OGAD # PREPARE ROLL FDAI NEEDLE WITH FLY-TO
EXTEND # ERROR (COMMAND - MEASURED)
MSU OGANOW
TS AK # FLY-TO OGA ERROR, SC.AT B-1 REVS
Expand Down
5 changes: 3 additions & 2 deletions Aurora12/PINBALL_GAME__BUTTONS_AND_LIGHTS.agc
Expand Up @@ -10,6 +10,7 @@
## 2016-10-19 HG Transcribed
## 2016-12-08 RSB Proofed comments with octopus/ProoferComments
## and fixed the errors found.
## 2017-01-28 RSB WTIH -> WITH.

## This source code has been transcribed or otherwise adapted from
## digitized images of a hardcopy from the private collection of
Expand Down Expand Up @@ -2275,7 +2276,7 @@ SETVAC CAF TCFINDVC

# VBRQWAIT ENTERS REQUEST TO WAITLIST FOR ANY ADDRESS WITH ANY DELAY.
# IT DOES ENDOFJOB AFTER ENTERING REQUEST.DISPLAY SYST IS RELEASED.
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WTIH
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WITH
# COMPONENT 1 DELAY (LOW BITS)
# COMPONENT 2 TASK ADRES (12 BIT)
# COMPONENT 3 BBCON
Expand Down Expand Up @@ -2397,7 +2398,7 @@ SWTAB OCT 0 # -R3
# USED TO DO ANY THING THE KEYBOARD CAN CALL. PLACE ...VVVVVVNNNNNN
# INTO A. V-S ARE 6BIT VERB CODE. N-S , 6 BIT NOUN CODE.

# NVSUB CAN BE USED WTIH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# NVSUB CAN BE USED WITH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# MPAC+2 BEFORE THE STANDARD NVSUB CALL.

# NVSUB RETURNS TO 2+ CALLING LOC AFTER PERFORMING TASK, IF DISPLAY
Expand Down
3 changes: 2 additions & 1 deletion Borealis/AGC_BLOCK_TWO_SELF-CHECK.agc
Expand Up @@ -16,6 +16,7 @@
## 2017-01-04 MAS Fleshed out the rest of the hardware alarm tests. Also
## pulled back all updates added by the time of Sunburst 120.
## and put in jumps to Retread instruction checks and back.
## 2017-01-28 RSB WTIH -> WITH.

# PROGRAM DESCRIPTION DATE 14 FEBRUARY 1967
# PROGRAM NAME - SELF-CHECK LOG SECTION AGC BLOCK TWO SELF-CHECK
Expand Down Expand Up @@ -81,7 +82,7 @@
# FRESH START
# DSKYCHK LIGHTS UP THE DSKY DISPLAY ELEMENTS STARTING WITH THE DIGIT9 IN ALL POSITIONS. EACH DISPLAY LASTS
# 5 SECONDS
# SHOW-BANKSUM STARTING WTIH BANK 0 DISPLAYS IN R1 +- THE BANK SUM (SHOULD EQUAL THE BANK NUMBER), IN R2 THE
# SHOW-BANKSUM STARTING WITH BANK 0 DISPLAYS IN R1 +- THE BANK SUM (SHOULD EQUAL THE BANK NUMBER), IN R2 THE
# BANK NUMBER, AND IN R3 THE BUGGER WORD.


Expand Down
7 changes: 4 additions & 3 deletions Borealis/PINBALL_GAME__BUTTONS_AND_LIGHTS.agc
Expand Up @@ -12,6 +12,7 @@
## Website: www.ibiblio.org/apollo/index.html
## Mod history: 2016-12-20 MAS Created from Aurora 12 (with much DAP stuff removed).
## 2017-01-04 MAS Pulled back PROCEED key functionality from Luminary 99.
## 2017-01-28 RSB WTIH -> WITH.

# KEYBOARD AND DISPLAY PROGRAM

Expand Down Expand Up @@ -2211,7 +2212,7 @@ SETVAC CAF TCFINDVC

# VBRQWAIT ENTERS REQUEST TO WAITLIST FOR ANY ADDRESS WITH ANY DELAY.
# IT DOES ENDOFJOB AFTER ENTERING REQUEST.DISPLAY SYST IS RELEASED.
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WTIH
# IT ASSUMES NOUN 26 HAS BEEN PRELOADED WITH
# COMPONENT 1 DELAY (LOW BITS)
# COMPONENT 2 TASK ADRES (12 BIT)
# COMPONENT 3 BBCON
Expand Down Expand Up @@ -2338,7 +2339,7 @@ SWTAB OCT 0 # -R3
# USED TO DO ANY THING THE KEYBOARD CAN CALL. PLACE ...VVVVVVNNNNNN
# INTO A. V-S ARE 6BIT VERB CODE. N-S , 6 BIT NOUN CODE.

# NVSUB CAN BE USED WTIH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# NVSUB CAN BE USED WITH MACH CADR TO BE SPEC BY PLACING THE CADR INTO
# MPAC+2 BEFORE THE STANDARD NVSUB CALL.

# NVSUB RETURNS TO 2+ CALLING LOC AFTER PERFORMING TASK, IF DISPLAY
Expand Down Expand Up @@ -2675,7 +2676,7 @@ MIXCON OCT 55 # FIRST MIXED NOUN = 55.



# GTSFOUT LOADS SFTEMP1, SFTEMP2 WTIH THE DP SFOUTAB ENTRIES.
# GTSFOUT LOADS SFTEMP1, SFTEMP2 WITH THE DP SFOUTAB ENTRIES.

GTSFOUT DXCH SFTEMP1 # 2X(SFCONUM) ARRIVES IN SFTEMP1.
EXTEND
Expand Down
3 changes: 2 additions & 1 deletion Colossus237/CONIC_SUBROUTINES.agc
Expand Up @@ -16,6 +16,7 @@
## Colossus 249.
## 2017-01-21 RSB Back-ported comment error fixes detected in diff'ing
## Artemis 72 vs Comanche 55.
## 2017-01-28 RSB WTIH -> WITH.

## Page 1228
# PROGRAM DESCRIPTION - ENTIRE CONIC SUBROUTINE LOG SECTION DATE - 1 SEPTEMBER 1967
Expand Down Expand Up @@ -314,7 +315,7 @@
# STATE IS TO BE UPDATED ALONG A CONIC TRAJECTORY, CALCULATES THE CORRESPONDING TIME-OF-FLIGHT AND, IN ADDITION,
# PROVIDES THE OPTION OF COMPUTING THE NEW UPDATED STATE VECTOR. THE RESULTING TRAJECTORY MAY BE A SECTION OF A
# CIRCLE, ELLIPSE, PARABOLA, OR HYPERBOLA WITH RESPECT TO THE EARTH OR THE MOON. THE USE OF THE SUBROUTINE CAN BE
# EXTENDED USING OTHER PRIMARY BODIES BY SIMPLE ADDITIONS TO THE MUTABLE WTIHOUT INTRODUCING ANY CODING CHANGES,
# EXTENDED USING OTHER PRIMARY BODIES BY SIMPLE ADDITIONS TO THE MUTABLE WITHOUT INTRODUCING ANY CODING CHANGES,
# ACCEPTING THE INHERENT SCALE FACTOR CHANGES IN POSITION AND VELOCITY.
#

Expand Down
3 changes: 2 additions & 1 deletion Colossus237/CSM_GEOMETRY.agc
Expand Up @@ -13,14 +13,15 @@
## 2010-01-16 JL Minor fixes.
## 2016-12-30 RSB Proofed comment text using octopus/ProoferComments,
## and corrected errors found.
## 2017-01-28 RSB WTIH -> WITH.

## Page 278
BANK 22
SETLOC COMGEOM1
BANK

# THIS ROUTINE TAKES THE SHAFT AND TRUNNION ANGLES AS READ BY THE CM OPTICAL SYSTEM AND CONVERTS THEM INTO A UNIT
# VECTOR REFERENCED TO THE NAVIGATION BASE COORDINATE SYSTEM AND COINCIDENT WTIH THE SEXTANT LINE OF SIGHT.
# VECTOR REFERENCED TO THE NAVIGATION BASE COORDINATE SYSTEM AND COINCIDENT WITH THE SEXTANT LINE OF SIGHT.
#
# THE INPUTS ARE 1) THE SEXTANT SHAFT AND TRUNNION ANGLES ARE STORED SP IN LOCATIONS 3 AND 5 RESPECTIVELY OF THE
# MARK VAC AREA. 2) THE COMPLEMENT OF THE BASE ADDRESS OF THE MARK VAC AREA IS STORED SP AT LOCATION X1 OF YOUR
Expand Down
3 changes: 2 additions & 1 deletion Colossus237/FRESH_START_AND_RESTART.agc
Expand Up @@ -14,6 +14,7 @@
## and corrected errors found.
## 2017-01-14 RSB Fixed comment-text errors discovered while proofing
## Colossus 249 comment text.
## 2017-01-28 RSB WTIH -> WITH.

## Page 176

Expand Down Expand Up @@ -116,7 +117,7 @@
# B. ALARMS

# 1107 PHASE TABLE ERROR
# 1110 RESTART WTIH NO ACTIVE GROUPS
# 1110 RESTART WITH NO ACTIVE GROUPS

## Page 178
BANK 10
Expand Down
3 changes: 2 additions & 1 deletion Colossus237/KALCMANU_STEERING.agc
Expand Up @@ -15,6 +15,7 @@
## 2016-08-14 RSB Added SBANKs for addressing discrepancies.
## 2016-12-30 RSB Proofed comment text using octopus/ProoferComments,
## and corrected errors found.
## 2017-01-28 RSB WTIH -> WITH.

## Page 405
# GENERATION OF STEERING COMMANDS FOR DIGITAL AUTOPILOT FREE FALL MANEUVERS
Expand Down Expand Up @@ -80,7 +81,7 @@ INCRDCDU TS KSPNDX
TCF INCRDCDU # LOOP FOR THREE AXES

RELINT
# COMPARE PRESENT TIME WTIH TIME TO TERMINATE MANEUVER
# COMPARE PRESENT TIME WITH TIME TO TERMINATE MANEUVER

TMANUCHK TC TIMECHK
TCF CONTMANU
Expand Down
5 changes: 3 additions & 2 deletions Colossus237/LUNAR_LANDMARK_SELECTION_FOR_CM.agc
Expand Up @@ -12,6 +12,7 @@
## 2011-04-17 JL Removed temporary line.
## 2017-01-01 RSB Proofed comment text using octopus/ProoferComments,
## and fixed errors found.
## 2017-01-28 RSB WTIH -> WITH.

## Page 886
BANK 31
Expand Down Expand Up @@ -70,7 +71,7 @@ CALCTLS TC INTPRET
DISTLS CAF V06N31** # DISPLAY TIME TO LANDING SITE
TC BANKCALL
CADR GOMARKF
TC ENDEXT # TERMINATE WTIH V34E
TC ENDEXT # TERMINATE WITH V34E
TC PROCLMKS # PROCEED WITH V33E
TC DISTLS # ILLEGAL RESPONSE, DO AGAIN
PROCLMKS TC INTPRET # BEGIN LANDMARK PROCESSING
Expand Down Expand Up @@ -131,7 +132,7 @@ DISLID SLOAD SR1 # ID = -INDEXNUM/2 + 1
TC BANKCALL
CADR GOMARKFR
TC ENDEXT # TERMINATE WITH V34E
TC DISTTL # PROCEED WTIH V33E
TC DISTTL # PROCEED WITH V33E
TC NEXTBAND # RECYCLE WITH V32E
CAF FIVE # BLANK R1 AND R3
TC BLANKET
Expand Down

0 comments on commit d57c21b

Please sign in to comment.