kjodle/Apollo-11
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Readd some typos based on the original scans

Browse Source
This commit is contained in:
James Harris 2016-07-12 18:52:11 -05:00 committed by oldmud0
parent afa13e7364
commit 2f62a05a56
37 changed files with 54 additions and 55 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Comanche055/ERASABLE_ASSIGNMENTS.s
View File

@ -546,8 +546,8 @@ TRM03FLG = 026D # REQUEST TO NO REQUEST TO
TRM03BIT = BIT4 TRM03BIT = BIT4
# BIT 3 FLAG 1 # BIT 3 FLAG 1
SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULAR SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULA
# METHOD IN ITERATOR FALSE METHOD IN # METHOD IN ITERATOR FALSI METHOD IN
# ITERATOR # ITERATOR
SLOPEBIT = BIT3 SLOPEBIT = BIT3

2
Comanche055/EXTENDED_VERBS.s
View File

@ -76,7 +76,7 @@ LST2FAN TC VBZERO # VB40 ZERO (USED WITH NOUN 20 ONLY)
TC V62 # VB62 SELECT MODE II, ERROR WRT N22 TC V62 # VB62 SELECT MODE II, ERROR WRT N22
TC V63 # VB63 SELECT MODE III, ERROR WRT N17 TC V63 # VB63 SELECT MODE III, ERROR WRT N17
TC VB64 # VB64 CALCULATE, DISPLAY S-BAND ANT ANGLES TC VB64 # VB64 CALCULATE, DISPLAY S-BAND ANT ANGLES
TC CKOPTVB # V 65 E OPTICAL VERIFICATION FOR PRELAUNCH TC CKOPTVB # V 65 E OPTICAL VERIFICATION FOR PRELAUNC
TC ATTACHED # VB66 ATTACHED. MOVE THIS TO OTHER STATE TC ATTACHED # VB66 ATTACHED. MOVE THIS TO OTHER STATE
TC V67 # VB67 W MATRIX MONITOR TC V67 # VB67 W MATRIX MONITOR
TC STROKON # VB68 CSM STROKE TEST ON. TC STROKON # VB68 CSM STROKE TEST ON.

4
Comanche055/FRESH_START_AND_RESTART.s
View File

@ -932,7 +932,7 @@ DUMMYAD EXIT
# Page 200 # Page 200
TC BANKCALL TC BANKCALL
CADR UPACTOFF # TURN OFF UPLINK ACTIVE LIGHT CADR UPACTOFF # TURN OFF UPLINK ACTIV LIGHT
TC DOWNFLAG TC DOWNFLAG
ADRES VHFRFLAG ADRES VHFRFLAG
@ -1000,7 +1000,7 @@ RENDN00 CS MMNUMBER
EXTEND EXTEND
BZF KILL20 BZF KILL20
CA FLAGWRD0 # IS RENDEZVOUS FLAG SET CA FLAGWRD0 # IS RENDEZVOO FLAG SET
MASK RNDVZBIT MASK RNDVZBIT
CCS A CCS A
TCF STATQUO TCF STATQUO

2
Comanche055/IMU_CALIBRATION_AND_ALIGNMENT.s
View File

@ -430,7 +430,7 @@ FINETIME INHINT # RETURNS WITH INTERRUPT INHIBITED
# INTEGRATED TOGETHER TO SAVE WORDS. COMPASS IS COMPLETELY RESTART # INTEGRATED TOGETHER TO SAVE WORDS. COMPASS IS COMPLETELY RESTART
# PROOFED EXCEPT FOR THE FIRST 30 SECONDS OR SO. PERFORMANCE TESTS OF # PROOFED EXCEPT FOR THE FIRST 30 SECONDS OR SO. PERFORMANCE TESTS OF
# THE IRIGS IS RESTART PROOFED ENOUGH TO GIVE 75 PERCENT CONFIDENCE THAT # THE IRIGS IS RESTART PROOFED ENOUGH TO GIVE 75 PERCENT CONFIDENCE THAT
# IF A RESTART OCCURS THE DATA WILL STILL BE GOOD. GOOD PRACTICE TO RECYCLE # IF A RESTART OCCURS THE DATA WILL STILL BE GOOD. GOOD PRACTICE TO RECYCL
# WHEN A RESTART OCCURS UNLESS IT HAPPENS NEAR THE END OF A TEST -- THEN WAIT # WHEN A RESTART OCCURS UNLESS IT HAPPENS NEAR THE END OF A TEST -- THEN WAIT
# FOR THE DATA TO FLASH. # FOR THE DATA TO FLASH.
# #

8
Comanche055/INTERPRETER.s
View File

@ -97,7 +97,7 @@ LOW7 OCT 177
MASK LOW7 # WHERE CCS EDOP WILL HONOR IT NEXT. MASK LOW7 # WHERE CCS EDOP WILL HONOR IT NEXT.
OPJUMP TS CYR # LOWWD ENTERS HERE IF A RIGHT-HAND OP OPJUMP TS CYR # LOWWD ENTERS HERE IF A RIGHT-HAND OP
CCS CYR # CODE IS TO BE PROCESSED. TEST PREFIXES. CCS CYR # CODE IS TO BE PROCESSED. TEST PREFICES.
TCF OPJUMP2 # TEST SECOND PREFIX BIT. TCF OPJUMP2 # TEST SECOND PREFIX BIT.
TCF EXIT # +0 OP CODE IS EXIT TCF EXIT # +0 OP CODE IS EXIT
@ -401,7 +401,7 @@ STADR CA BANKSET # THE STADR CODE (PUSHUP UP ON STORE
INCR LOC INCR LOC
ITR1 INDEX LOC # THE STORECODE WAS STORED COMPLEMENTED TO ITR1 INDEX LOC # THE STORECODE WAS STORED COMPLEMENTED TO
CS 0 # MAKE IT LOOK LIKE AN OPCODE PAIR. CS 0 # MAKE IT LOOK LIKE AN OPCODE PAIR.
AD NEGONE # (YUL CAN'T REMOVE 1 BECAUSE OF EARLY CCS) AD NEGONE # (YUL CANT REMOVE 1 BECAUSE OF EARLY CCS)
DOSTORE TS ADDRWD DOSTORE TS ADDRWD
MASK LOW11 # ENTRY FROM DISPATCHER. SAVE THE ERASABLE MASK LOW11 # ENTRY FROM DISPATCHER. SAVE THE ERASABLE
@ -1336,8 +1336,8 @@ UPPOS XCH L # SAVE DECREMENTED UPPER PART.
AD HALF AD HALF
TS A # SKIPS ON OVERFLOW TS A # SKIPS ON OVERFLOW
TCF +2 TCF +2
INCR L # RESTORE UPPER TO ORIGINAL VALUE INCR L # RESTORE UPPER TO ROIGINAL VALUE
XCH L # SWAP A + L BANK. XCH L # SWAP A + L BACK.
TC Q TC Q
UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT UPNEG XCH L # SAVE COMPLEMENTED + DECREMENTED UPPER PT

2
Comanche055/JET_SELECTION_LOGIC.s
View File

@ -278,7 +278,7 @@ BDZCHECK CA ZNDX
BZF TAUCHECK BZF TAUCHECK
ACRBDZ CA T5TEMP # Z-TRANSLATION ACCEPTED EVEN THO WE MAY ACRBDZ CA T5TEMP # Z-TRANSLATION ACCEPTED EVEN THO WE MAY
TS RWORD1 # HAVE INTRODUCED AN UNDESIRABLE ROLL TS RWORD1 # HAVE INTRODUCED AN UNDESIREABLE ROLL
TCF ROLLTIME # BRANCH TO JET ON-TIME CALCULATIONS TCF ROLLTIME # BRANCH TO JET ON-TIME CALCULATIONS
TAUCHECK CCS TAU TAUCHECK CCS TAU

2
Comanche055/KEYRUPT_UPRUPT.s
View File

@ -127,7 +127,7 @@ ELRCODE OCT 22
# THE RECEPTION OF A BAD CODE (I.E., CCC FAILURE) LOCKS OUT FURTHER UPLINK ACTIVITY BY SETTING BIT4 OF FLAGWRD7 = 1. # THE RECEPTION OF A BAD CODE (I.E., CCC FAILURE) LOCKS OUT FURTHER UPLINK ACTIVITY BY SETTING BIT4 OF FLAGWRD7 = 1.
# THIS INDICATION WILL BE TRANSFERRED TO THE GROUND BY THE DOWNLINK WHICH DOWNLINKS ALL FLAGWORDS. # THIS INDICATION WILL BE TRANSFERRED TO THE GROUND BY THE DOWNLINK WHICH DOWNLINKS ALL FLAGWORDS.
# WHEN UPLINK ACTIVITY IS LOCKED OUT, IT CAN BE ALLOWED WHEN THE GROUND UPLINKS AND `ERROR RESET' CODE. # WHEN UPLINK ACTIVITY IS LOCKED OUT, IT CAN BE ALLOWED WHEN THE GROUND UPLINKS AND `ERROR RESET' CODE.
# (IT IS RECOMMENDED THAT THE `ERROR LIGHT RESET' CODE IS PRECEDED BY 16 BITS THE FIRST OF WHICH IS 1 FOLLOWED # (IT IS RECOMMENDED THAT THE `ERROR LIGHT RESET' CODE IS PRECEEDED BY 16 BITS THE FIRST OF WHICH IS 1 FOLLOWED
# BY 15 ZEROS. THIS WILL ELIMINATE EXTRANEOUS BITS FROM INLINK WHICH MAY HAVE BEEN LEFT OVER FROM THE ORIGINAL # BY 15 ZEROS. THIS WILL ELIMINATE EXTRANEOUS BITS FROM INLINK WHICH MAY HAVE BEEN LEFT OVER FROM THE ORIGINAL
# FAILURE). # FAILURE).
# #

2
Comanche055/MEASUREMENT_INCORPORATION.s
View File

@ -362,7 +362,7 @@ FAZC CALL
GRP2PC GRP2PC
# Page 1259 # Page 1259
VLOAD VAD # START 3RD PHASE OF INCORP2 VLOAD VAD # START 3RD PHASE OF INCORP2
X789 # 7TH, 8TH, 9TH COMPONENTS OF STATE VECTOR X789 # 7TH,8TH,9TH,COMPONENT OF STATE VECTOR
DELTAX +12D # INCORPORATION FOR X789 DELTAX +12D # INCORPORATION FOR X789
STORE TX789 STORE TX789
BON RTB BON RTB

4
Comanche055/ORBITAL_INTEGRATION.s
View File

@ -227,9 +227,9 @@ GAMCOMP VLOAD VSR1
# Page 1339 # Page 1339
36D 36D
STORE BETAM STORE BETAM
NORM BDDV # FORM NORMALIZE QUOTIENT ALPHAM/BETAM NORM BDDV # FORM NORMALIZED QUOTIENT ALPHAM/BETAM
33D 33D
SR1R PUSH # C(PDL+2) = ALMOST NORMALIZE RHO. SR1R PUSH # C(PDL+2) = ALMOST NORMALIZED RHO.
DLOAD* DLOAD*
ASCALE,1 ASCALE,1
STORE S1 STORE S1

4
Comanche055/P20-P25.s
View File

@ -420,7 +420,7 @@ DE-GR-50 TC 2PHSCHNG
# #
# ABORT MODES: P23 ABORT IF MARKING SYSTEM OR EXTENDED VERB ACTIVE # ABORT MODES: P23 ABORT IF MARKING SYSTEM OR EXTENDED VERB ACTIVE
# #
# INPUT: NONE REQUIRES, NORMALLY CALLED BY P23 # INPUT: NONE REQUIRED, NORMALLY CALLED BY P23
# #
# OUTPUT: TRUNNION BIAS ANGLE: ANGLE DETERMINED WHEN SHAFT LINE OF SIGHT # OUTPUT: TRUNNION BIAS ANGLE: ANGLE DETERMINED WHEN SHAFT LINE OF SIGHT
# (SLOS) AND LANDMARK LINE OF SIGHT (LLOS) ARE SUPERIMPOSED. THIS ANGLE # (SLOS) AND LANDMARK LINE OF SIGHT (LLOS) ARE SUPERIMPOSED. THIS ANGLE
@ -2707,7 +2707,7 @@ DP1MIN 2DEC 6000
V89CALL TC BANKCALL # IMU STATUS CHECK. RETURNS IF ORIENTATION V89CALL TC BANKCALL # IMU STATUS CHECK. RETURNS IF ORIENTATION
CADR R02BOTH # KNOWN. ALARMS IF NOT. CADR R02BOTH # KNOWN. ALARMS IF NOT.
CAF THREE # ALLOW ASTRONAUT TO SELECT DESIRED CAF THREE # ALLOW ASTRONAUT TO SELECT DESIRED
TS OPTION1 # TRACKING ATTITUDE AXIS TS OPTION1 # TRACKING ATTITUDE AXIS.
CAF ONE CAF ONE
TS OPTION1 +1 TS OPTION1 +1
CAF VB04N06 # V 04 N 06 CAF VB04N06 # V 04 N 06

2
Comanche055/P32-P33_P72-P73.s
View File

@ -39,7 +39,7 @@
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72) # COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
# #
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75 # MOD NO -1 LOG SECTION -- P32-P35, P72-P75
# MOD BY WHITE, P. DATE 1 JUNE 67 # MOD BY WHITE. P DATE 1JUNE67
# #
# PURPOSE # PURPOSE
# (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING # (1) TO CALCULATE PARAMETERS ASSOCIATED WITH THE FOLLOWING

4
Comanche055/P51-P53.s
View File

@ -317,8 +317,8 @@ V06N89* VN 0689
# #
# FUNCTION -- TO DISPLAY THE LANDING SITE LATITUDE, # FUNCTION -- TO DISPLAY THE LANDING SITE LATITUDE,
# LONGITUDE AND ALTITUDE. TO ACCEPT NEW DATA VIA # LONGITUDE AND ALTITUDE. TO ACCEPT NEW DATA VIA
# THE KEYBOARD. TO COMPUT THE LANDING SITE # THE KEYBOARD. TO COMPUTE THE LANDING SITE
# ORIENTATION FOR P52 OR P54. # ORIENTATION FOR P52 OR P54
# #
# LET: # LET:
# RLS = LANDING SITE VECTOR IN REF COORDINATES # RLS = LANDING SITE VECTOR IN REF COORDINATES

1
Comanche055/P61-P67.s
View File

@ -516,7 +516,6 @@ SERVCAD2 = SERVCAD1
# MOD NO: 0 DATE: 21 FEB 67 # MOD NO: 0 DATE: 21 FEB 67
# MOD BY: RR BAIRNSFATHER LOG SECTION: P61-P67 # MOD BY: RR BAIRNSFATHER LOG SECTION: P61-P67
# MOD NO: 1 MOD BY: RR BAIRNSFATHER DATE: 22 JUN 67 RESTARTS. # MOD NO: 1 MOD BY: RR BAIRNSFATHER DATE: 22 JUN 67 RESTARTS.
#
# FUNCTIONAL DESCRIPTION: CALLED BY BOTH P61 AND P62 # FUNCTIONAL DESCRIPTION: CALLED BY BOTH P61 AND P62
# FIRST, TEST TO SEE IF AVERAGEG IS ON. IF NOT, UPDATE THE STATE VECTOR TO PRESENT TIME + TOLERANCE # FIRST, TEST TO SEE IF AVERAGEG IS ON. IF NOT, UPDATE THE STATE VECTOR TO PRESENT TIME + TOLERANCE
# AND TURN ON AVERAGEG AT THAT TIME, AND CONTINUE. OTHERWISE CONTINUE: SEE IF IMU Y AXIS IS # AND TURN ON AVERAGEG AT THAT TIME, AND CONTINUE. OTHERWISE CONTINUE: SEE IF IMU Y AXIS IS

2
Comanche055/PINBALL_GAME_BUTTONS_AND_LIGHTS.s
View File

@ -2967,7 +2967,7 @@ ENDRELDS EQUALS
# NVMONOPT IS AN ENTRY SIMILAR TO NVSUB, BUT REQUIRING AN ADDITIONAL # NVMONOPT IS AN ENTRY SIMILAR TO NVSUB, BUT REQUIRING AN ADDITIONAL
# Page 370 # Page 370
# PARAMETER IN L. IT SHOULD BE USED ONLY WITH A MONITOR VERB-NOUN CODE IN # PARAMETER IN L. IT SHOULD BE USED ONLY WITH A MONITOR VERB-NOUN CODE IN
# A. AFTER EACH MONITOR DISPLAY A *PLEASE* VERB WILL BE PASSED INT THE VERB # A. AFTER EACH MONITOR DISPLAY A *PLEASE* VERB WILL BE PASTED IN THE VERB
# LIGHTS OR DATA WILL BE BLANKED (OR BOTH) ACCORDING TO THE OPTIONS # LIGHTS OR DATA WILL BE BLANKED (OR BOTH) ACCORDING TO THE OPTIONS
# SPECIFIED IN L. IF BITS 8-14 OF L ARE OTHER THAN ZERO, THEN THEY WILL # SPECIFIED IN L. IF BITS 8-14 OF L ARE OTHER THAN ZERO, THEN THEY WILL
# BE INTERPRETED AS A VERB CODE AND PASTED IN THE VERB LIGHTS. (THIS VERB # BE INTERPRETED AS A VERB CODE AND PASTED IN THE VERB LIGHTS. (THIS VERB

6
Comanche055/R30.s
View File

@ -259,7 +259,7 @@ DOTICK CAF 1SEC # RE-REQUEST TICKTEST.
MASK V82FLAGS MASK V82FLAGS
INDEX A INDEX A
TC +1 TC +1
TC TASKOVER # IF NO FLAGBITS SET DON'T CHANGE TFF OR TC TASKOVER # IF NO FLAGBITS SET DONT CHANGE TFF OR
# -TPER, BUT CONTINUE LOOP. # -TPER, BUT CONTINUE LOOP.
TC TPERTICK # ONLY BIT 1 SET. INCR -TPER BY 1 SEC. TC TPERTICK # ONLY BIT 1 SET. INCR -TPER BY 1 SEC.
TFFTICK CAF 1SEC # ONLY BIT 2 SET. INCR TFF BY 1 SEC. TFFTICK CAF 1SEC # ONLY BIT 2 SET. INCR TFF BY 1 SEC.
@ -281,7 +281,7 @@ V82GON EXIT # AVERAGE G ON. USE CURRENT STATE VECTOR
2CADR V82GON1 2CADR V82GON1
RELINT RELINT
CCS NEWJOB # WITHHOLD V16 N44 UNTIL FIRST ORBIT CALC CCS NEWJOB # WITHOLD V16 N44 UNTIL FIRST ORBIT CALC
TC CHANG1 # IS DONE. NOTE: V82GON1 (PRIO7, FINDVAC TC CHANG1 # IS DONE. NOTE: V82GON1 (PRIO7, FINDVAC
# JOB) IS COMPLETED BEFORE V82GON (PRIO7, # JOB) IS COMPLETED BEFORE V82GON (PRIO7,
# NOVAC JOB). # NOVAC JOB).
@ -340,7 +340,7 @@ SPLRET EXIT
EXTEND EXTEND
BZF SPLRET1 BZF SPLRET1
V82GON3 CAF BIT5 V82GON3 CAF BIT5
MASK EXTVBACT # SEE IF ASTRONAUT HAS SIGNALED TERMINATE MASK EXTVBACT # SEE IF ASTRONAUT HAS SIGNALLED TERMINATE
EXTEND EXTEND
BZF ENDEXT # YES, TERMINATE VB 82 LOOP BZF ENDEXT # YES, TERMINATE VB 82 LOOP
CAF 1SEC CAF 1SEC

4
Comanche055/RCS-CSM_DIGITAL_AUTOPILOT.s
View File

@ -295,7 +295,7 @@ TENTHSEK TS ATTSEC
# ALSO IGNORE AUTOMATIC STEERING # ALSO IGNORE AUTOMATIC STEERING
# SET = + BY # SET = + BY
# 1) INITIALIZATION PHASE OF AUTOPILOT # 1) INITIALIZATION PHASE OF AUTOPILOT
# 2) OCCURRENCE OF RHC COMMANDS # 2) OCCURANCE OF RHC COMMANDS
# 3) FREE MODE # 3) FREE MODE
# 4) SWITCH OVER TO ATTITUDE HOLD FROM AUTO # 4) SWITCH OVER TO ATTITUDE HOLD FROM AUTO
# WHILE DOING AUTOMATIC STEERING (IN THIS CASE # WHILE DOING AUTOMATIC STEERING (IN THIS CASE
@ -397,7 +397,7 @@ KRESUME1 TCF RESUME # END PHASE 1
# MASK BIT3 # MASK BIT3
# ADS RCSFLAGS # ADS RCSFLAGS
# #
# THEREAFTER, THE ATTITUDE ERRORS GENERATED BY THE USER SHOULD BE TRANSFERRED TO THE FOLLOWING LOCATIONS IN EBANK6: # THEREAFTER, THE ATTITUDE ERRORS GENERATED BY THE USER SHOULD BE TRANSFERED TO THE FOLLOWING LOCATIONS IN EBANK6:
# #
# AK SCALED 180 DEGREES NOTE: THESE LOCATIONS ARE SUBJECT # AK SCALED 180 DEGREES NOTE: THESE LOCATIONS ARE SUBJECT
# AK1 SCALED 180 DEGREES TO CHANGE # AK1 SCALED 180 DEGREES TO CHANGE

2
Comanche055/RT8_OP_CODES.s
View File

@ -136,7 +136,7 @@ TPMODE CAF ONE # MODE IS TP.
# Page 1510 # Page 1510
TC Q TC Q
INDEX A # OVERFLOW INCORRECT AND IN MSU. INDEX A # OVERFLOW UNCORRECT AND IN MSU.
CAF LIMITS CAF LIMITS
ADS MPAC ADS MPAC
TC Q TC Q

2
Comanche055/T4RUPT_PROGRAM.s
View File

@ -1240,7 +1240,7 @@ ENDZOPT TC ZEROPCDU # ZERO OCDU COUNTERS
ZEROPCDU CAF ZERO ZEROPCDU CAF ZERO
TS CDUS # ZERO IN CDUS, -20 IN CDUT TS CDUS # ZERO IN CDUS, -20 IN CDUT
TS ZONE # INITIALIZE SHAFT MONITOR ZONE. TS ZONE # INITIALIZE SHAFT MONITOR ZONE
CS 20DEGS CS 20DEGS
TS CDUT TS CDUT
TC Q TC Q

2
Comanche055/TIME_OF_FREE_FALL.s
View File

@ -139,7 +139,7 @@ TFFTEM = 36D # TEMPORARY
# TFFNP E:(-38+2NR) M LCP, SEMI LATUS RECTUM, WEIGHTED BY NR. FOR VGAMCALC. # TFFNP E:(-38+2NR) M LCP, SEMI LATUS RECTUM, WEIGHTED BY NR. FOR VGAMCALC.
# M:(-36+2NR) # M:(-36+2NR)
# TFF/RTMU E:(17) M:(14) 1/SQRT(MU) # TFF/RTMU E:(17) M:(14) 1/SQRT(MU)
# TFFVSQ E:(20) M:(18) 1/M -(V SQ/MU): PRESENT VELOCITY, NORMALIZED. FOR VGAMCALC # TFFVSQ E:(20) M:(18) 1/M -(V SQ/MU): PRESENT VELOCITY,NORMLIZED. FOR VGAMCALC
# TFFALFA E:(26-NR) 1/M ALFA, WEIGHTED BY NR # TFFALFA E:(26-NR) 1/M ALFA, WEIGHTED BY NR
# M:(24-NR) # M:(24-NR)
# TFFRTALF E:(10+NA) SQRT(ALFA), NORMALIZED # TFFRTALF E:(10+NA) SQRT(ALFA), NORMALIZED

2
Comanche055/TVCROLLDAP.s
View File

@ -136,7 +136,7 @@
# PARABOLA WHICH PASSES THROUGH THE OPERATING POINT. FOR REGION 3 # PARABOLA WHICH PASSES THROUGH THE OPERATING POINT. FOR REGION 3
# DESIRED OGARATE IS SIMPLY +-MAXLIM. FOR REGIONS 1 OR 6 THE SOLUTION # DESIRED OGARATE IS SIMPLY +-MAXLIM. FOR REGIONS 1 OR 6 THE SOLUTION
# TO A QUADRATIC IS REQUIRED (THE PENETRATION IS ALONG THE STRAIGHT # TO A QUADRATIC IS REQUIRED (THE PENETRATION IS ALONG THE STRAIGHT
# LINE OR MINLIM BOUNDARY SWITCH LINES). AN APPROXIMATION IS MADE # LINE OR MINLIM BOUNDRY SWITCH LINES). AN APPROXIMATION IS MADE
# INSTEAD. CONSIDER AN OPERATING POINT IN REGION 6'. PASS A TANGENT TO # INSTEAD. CONSIDER AN OPERATING POINT IN REGION 6'. PASS A TANGENT TO
# THE CONTROL PARABOLA THROUGH THE OPERATING POINT, AND FIND ITS # THE CONTROL PARABOLA THROUGH THE OPERATING POINT, AND FIND ITS
# INTERSECTION WITH THE STRAIGHT LINE SECTION OF THE SWITCH CURVE... # INTERSECTION WITH THE STRAIGHT LINE SECTION OF THE SWITCH CURVE...

4
Comanche055/WAITLIST.s
View File

@ -472,7 +472,7 @@ NOQBRSM DXCH ARUPT
# LONGEXIT AND LONGEXIT+1 # LONGEXIT AND LONGEXIT+1
# LONGTIME AND LONGTIME+1 # LONGTIME AND LONGTIME+1
# #
# *** THE FOLLOWING IS TO BE IN FIXED-FIXED AND UNSWITCHED ERASABLE ** # *** THE FOLLOWING IS TO BE IN FIXED-FIXED AND UNSWITCHED ERRASIBLE ***
BLOCK 02 BLOCK 02
EBANK= LST1 EBANK= LST1
@ -503,7 +503,7 @@ LNGCALL2 LXCH LONGEXIT +1 # SAVE THE CORRECT BB FOR RETURN
# *** WAITLIST TASK LONGCYCL *** # *** WAITLIST TASK LONGCYCL ***
LONGCYCL EXTEND # CAN WE SUCCESSFULLY TAKE ABOUT 1.25 LONGCYCL EXTEND # CAN WE SUCCESFULLY TAKE ABOUT 1.25
DCS DPBIT14 # MINUTES OFF OF LONGTIME DCS DPBIT14 # MINUTES OFF OF LONGTIME
DAS LONGTIME DAS LONGTIME

2
Luminary099/ASCENT_GUIDANCE.s
View File

@ -357,7 +357,7 @@ ASCTERM EXIT
CALL CALL
FINDCDUW -2 FINDCDUW -2
ASCTERM1 EXIT ASCTERM1 EXIT
+1 CA FLAGWRD9 # ENSURE THAT THE NOUN 63 DISPLAY IS +1 CA FLAGWRD9 # INSURE THAT THE NOUN 63 DISPLAY IS
MASK FLRCSBIT # BYPASSED IF WE ARE IN THE RCS TRIMMING MASK FLRCSBIT # BYPASSED IF WE ARE IN THE RCS TRIMMING
CCS A # MODE OF OPERATION CCS A # MODE OF OPERATION
TCF ASCTERM3 TCF ASCTERM3

2
Luminary099/BURN_BABY_BURN--MASTER_IGNITION_ROUTINE.s
View File

@ -55,7 +55,7 @@
# BETWEEN THE PRE-IGNITION TIME CHECK -- ARE WE WITHIN 45 SECONDS OF TIG? -- AND TIG + 26 SECONDS, WHEN DPS # BETWEEN THE PRE-IGNITION TIME CHECK -- ARE WE WITHIN 45 SECONDS OF TIG? -- AND TIG + 26 SECONDS, WHEN DPS
# PROGRAMS THROTTLE UP. # PROGRAMS THROTTLE UP.
# #
# VARIATIONS AMONG PROGRAMS ARE ACCOMMODATED BY MEANS OF TABLES CONTAINING CONSTANTS (FOR AVEGEXIT, FOR # VARIATIONS AMONG PROGRAMS ARE ACCOMODATED BY MEANS OF TABLES CONTAINING CONSTANTS (FOR AVEGEXIT, FOR
# WAITLIST, FOR PINBALL) AND TCF INSTRUCTIONS. USERS PLACE THE ADRES OF THE HEAD OF THE APPROPRIATE TABLE # WAITLIST, FOR PINBALL) AND TCF INSTRUCTIONS. USERS PLACE THE ADRES OF THE HEAD OF THE APPROPRIATE TABLE
# (OF P61TABLE FOR P61LM, FOR EXAMPLE) IN ERASABLE REGISTER `WHICH' (E4). THE IGNITION ROUTINE THEN INDEXES BY # (OF P61TABLE FOR P61LM, FOR EXAMPLE) IN ERASABLE REGISTER `WHICH' (E4). THE IGNITION ROUTINE THEN INDEXES BY
# WHICH TO OBTAIN OR EXECUTE THE PROPER TABLE ENTRY. THE IGNITION ROUTINE IS INITIATED BY A TCF BURNBABY, # WHICH TO OBTAIN OR EXECUTE THE PROPER TABLE ENTRY. THE IGNITION ROUTINE IS INITIATED BY A TCF BURNBABY,

2
Luminary099/DAPIDLER_PROGRAM.s
View File

@ -154,7 +154,7 @@ CALLGMBL EQUALS BIT5 # RCSFLAGS INITIALIZATION.
TS NEXTU TS NEXTU
TS NEXTV TS NEXTV
CS TEN CS TEN
TS DAPZRUPT # TASK NOT IN PROGRESS, INITIALIZE NEG. TS DAPZRUPT # JASK NOT IN PROGRESS, INITIALIZE NEG.
CA TWO CA TWO
TS NPTRAPS TS NPTRAPS
TS NQTRAPS TS NQTRAPS

2
Luminary099/FLAGWORD_ASSIGNMENTS.s
View File

@ -365,7 +365,7 @@ TRACKBIT = BIT5
# BIT 3 FLAG 1 (S) # BIT 3 FLAG 1 (S)
SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULAR SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULAR
# METHOD IN ITERATOR FALSE METHOD IN # METHOD IN ITERATOR FALSI METHOD IN
SLOPEBIT = BIT3 # ITERATOR SLOPEBIT = BIT3 # ITERATOR
# BIT 2 FLAG 1 (S) # BIT 2 FLAG 1 (S)

2
Luminary099/INPUT_OUTPUT_CHANNEL_BIT_DESCRIPTIONS.s
View File

@ -72,7 +72,7 @@
# CHANNEL 12 CHAN12: OUTPUT CHANNEL; BITS USED TO DRIVE NAVIGATION AND SPACECRAFT HARDWARE. # CHANNEL 12 CHAN12: OUTPUT CHANNEL; BITS USED TO DRIVE NAVIGATION AND SPACECRAFT HARDWARE.
# #
# BIT 1 ZERO RR CDU; CDU'S GIVE RADAR INFORMATION FOR LM # BIT 1 ZERO RR CDU; CDU'S GIVE RRADAR INFORMATION FOR LM
# BIT 2 ENABLE CDU RADAR ERROR COUNTERS # BIT 2 ENABLE CDU RADAR ERROR COUNTERS
# BIT 3 NOT USED # BIT 3 NOT USED
# BIT 4 COARSE ALIGN ENABLE OF IMU # BIT 4 COARSE ALIGN ENABLE OF IMU

2
Luminary099/LAMBERT_AIMPOINT_GUIDANCE.s
View File

@ -65,7 +65,7 @@
# DISPLAYS USED IN P-31LM ** # DISPLAYS USED IN P-31LM **
# #
# V06N33 DISPLAY STORED TIG (IN HRS. MINS. SECS.) # V06N33 DISPLAY SOTRED TIG (IN HRS. MINS. SECS.)
# V06N42 DISPLAY APOGEE, PERIGEE, DELTAV. # V06N42 DISPLAY APOGEE, PERIGEE, DELTAV.
# V16N35 DISPLAY TIME FROM TIG. # V16N35 DISPLAY TIME FROM TIG.
# V06N45 TIME FROM IGNITION AND MIDDLE GIMBAL ANGLE. # V06N45 TIME FROM IGNITION AND MIDDLE GIMBAL ANGLE.

2
Luminary099/LEM_GEOMETRY.s
View File

@ -189,7 +189,7 @@ RRNB1 PUSH COS # SHAFT ANGLE TO 2
# THIS ENTRY TO RRNB REQUIRES THE TRUNNION AND SHAFT ANGLES IN MPAC AND MPAC +1 RESPECTIVELY # THIS ENTRY TO RRNB REQUIRES THE TRUNNION AND SHAFT ANGLES IN MPAC AND MPAC +1 RESPECTIVELY
RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21. RRNBMPAC STODL 20D # SAVE SHAFT CDU IN 21.
MPAC # SET MODE TO DP. (THE PRECEDING STORE MPAC # SET MODE TO DP. (THE PRECEEDING STORE
# MAY BE DP, TP OR VECTOR.) # MAY BE DP, TP OR VECTOR.)
RTB SETPD RTB SETPD
CDULOGIC CDULOGIC

2
Luminary099/LUNAR_LANDING_GUIDANCE_EQUATIONS.s
View File

@ -412,7 +412,7 @@ REDES1 DLOAD DSU
# ********************************************************************* # *********************************************************************
# #
# RGVGCALC COMPUTATIONS ARE AS FOLLOWS:-- # RGVGCALC COMPUTATIONS ARE AS FOLLOWS:--
# VELOCITY RELATIVE TO THE SURFACE # VELOCITY RELATIVE TO THE SURFACE:
# _______ _ _ __ # _______ _ _ __
# ANGTERM = V + R * WM # ANGTERM = V + R * WM
# STATE IN GUIDANCE COORDINATES: # STATE IN GUIDANCE COORDINATES:

2
Luminary099/P-AXIS_RCS_AUTOPILOT.s
View File

@ -347,7 +347,7 @@ R-RATE INCR NRTRAPS
TS OMEGAR TS OMEGAR
# END OF RATE DERIVATION # END OF RATE DERIVATION
# BEGIN OFFSET ESTIMATOR # BEGIN OFFSET ESTIMATER
# IN POWERED FLIGHT, AOSTASK WILL BE CALLED EVERY 2 SECONDS. # IN POWERED FLIGHT, AOSTASK WILL BE CALLED EVERY 2 SECONDS.
# AOS = AOS + K*SUMRATE # AOS = AOS + K*SUMRATE

2
Luminary099/P12.s
View File

@ -47,7 +47,7 @@ P12LM TC PHASCHNG
TC UPFLAG # PREVENT R10 FROM ISSUING CROSS-POINTER TC UPFLAG # PREVENT R10 FROM ISSUING CROSS-POINTER
ADRES R10FLAG # OUTPUTS. ADRES R10FLAG # OUTPUTS.
TC CLRADMOD # INITIALIZE RADMODES FOR R29 TC CLRADMOD # INITIALIZE RADMODES FOR R29.
TC DOWNFLAG # CLEAR RENDEZVOUS FLAG FOR P22 TC DOWNFLAG # CLEAR RENDEZVOUS FLAG FOR P22
ADRES RNDVZFLG ADRES RNDVZFLG

4
Luminary099/P32-P35_P72-P75.s
View File

@ -30,7 +30,7 @@
# COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72) # COELLIPTIC SEQUENCE INITIATION (CSI) PROGRAMS (P32 AND P72)
# #
# MOD NO -1 LOG SECTION -- P32-P35, P72-P75 # MOD NO -1 LOG SECTION -- P32-P35, P72-P75
# MOD BY WHITE, P. DATE 1 JUNE 67 # MOD BY WHITE.P DATE 1JUNE67
# #
# PURPOSE # PURPOSE
@ -107,7 +107,7 @@
# CALCULATES THE MANEUVER PARAMETERS. SET AT THE START OF # CALCULATES THE MANEUVER PARAMETERS. SET AT THE START OF
# EACH RENDEZVOUS PRE-THRUSTING PROGRAM. # EACH RENDEZVOUS PRE-THRUSTING PROGRAM.
# #
# FINAL FLAG -- SELECTED FINAL PROGRAM DISPLAYS AFTER CREW HAS # FINAL FLAG -- SELECTS FINAL PROGRAM DISPLAYS AFTER CREW HAS
# COMPLETED THE FINAL MANEUVER COMPUTATION AND DISPLAY # COMPLETED THE FINAL MANEUVER COMPUTATION AND DISPLAY
# CYCLE. # CYCLE.
# #

4
Luminary099/Q_R-AXIS_RCS_AUTOPILOT.s
View File

@ -476,7 +476,7 @@ QERRCALC CAE CDUY # Q-ERROR CALCULATION
TS DAPTEMP2 # SAVE FOR RERRCALC TS DAPTEMP2 # SAVE FOR RERRCALC
EXTEND EXTEND
MP M22 # (CDUZ-CDUZD)*M22 SCALED AT PI RADIANS MP M22 # (CDUZ-CDUZD)*M22 SCALED AT PI RADIANS
AD DELQEROR # KALCMANU INTERFACE ERROR AD DELQEROR # KALCMANU INERFACE ERROR
AD E AD E
XCH QERROR # SAVE Q-ERROR FOR EIGHT-BALL DISPLAY. XCH QERROR # SAVE Q-ERROR FOR EIGHT-BALL DISPLAY.
@ -487,7 +487,7 @@ RERRCALC CAE DAPTEMP1 # R-ERROR CALCULATION:
CAE DAPTEMP2 # SECOND TERM CALCULATION: CAE DAPTEMP2 # SECOND TERM CALCULATION:
EXTEND # CDU ANGLE -ANGLE DESIRED (Z-AXIS) EXTEND # CDU ANGLE -ANGLE DESIRED (Z-AXIS)
MP M32 # (CDUZ-CDUZD)*M32 SCALED AT PI RADIANS MP M32 # (CDUZ-CDUZD)*M32 SCALED AT PI RADIANS
AD DELREROR # KALCMANU INTERFACE ERROR AD DELREROR # KALCMANU INERFACE ERROR
AD E AD E
XCH RERROR # SAVE R-ERROR FOR EIGHT-BALL DISPLAY. XCH RERROR # SAVE R-ERROR FOR EIGHT-BALL DISPLAY.
TC Q TC Q

2
Luminary099/RADAR_LEADIN_ROUTINES.s
View File

@ -36,7 +36,7 @@
# RADAR SAMPLING LOOP. # RADAR SAMPLING LOOP.
COUNT* $$/RLEAD COUNT* $$/RLEAD
RADSAMP CCS RSAMPDT # TIMES NORMAL ONCE PER SECOND SAMPLING RADSAMP CCS RSAMPDT # TIMES NORMAL ONCE-PER-SECOND SAMPLING
TCF +2 TCF +2
TCF TASKOVER # +0 INSERTED MANUALLY TERMINATES TEST. TCF TASKOVER # +0 INSERTED MANUALLY TERMINATES TEST.

2
Luminary099/RTB_OP_CODES.s
View File

@ -113,7 +113,7 @@ TPMODE CAF ONE # MODE IS TP.
TS MPAC # AND SKIP ON OVERFLOW. TS MPAC # AND SKIP ON OVERFLOW.
TC Q TC Q
INDEX A # OVERFLOW INCORRECT AND IN MSU. INDEX A # OVERFLOW UNCORRECT AND IN MSU.
CAF LIMITS CAF LIMITS
ADS MPAC ADS MPAC
TC Q TC Q

2
Luminary099/THROTTLE_CONTROL_ROUTINES.s
View File

@ -132,7 +132,7 @@ DOIT CA PIF
TS TTHROT TS TTHROT
# SINCE /AF/ IS NOT AN INSTANTANEOUS ACCELERATION, BUT RATHER AN "AVERAGE" OF THE ACCELERATION LEVELS DURING # SINCE /AF/ IS NOT AN INSTANTANEOUS ACCELERATION, BUT RATHER AN "AVERAGE" OF THE ACCELERATION LEVELS DURING
# THE PRECEDING PIPA INTERVAL, AND SINCE FP IS COMPUTED DIRECTLY FROM /AF/, FP IN ORDER TO CORRESPOND TO THE # THE PRECEEDING PIPA INTERVAL, AND SINCE FP IS COMPUTED DIRECTLY FROM /AF/, FP IN ORDER TO CORRESPOND TO THE
# ACTUAL THRUST LEVEL AT THE END OF THE INTERVAL MUST BE WEIGHTED BY # ACTUAL THRUST LEVEL AT THE END OF THE INTERVAL MUST BE WEIGHTED BY
# #
# PIF(PPROCESS + TL) PIF /PIF/ # PIF(PPROCESS + TL) PIF /PIF/