From 64ef3d932dd5532ea8909745f08374f276bbdd3d Mon Sep 17 00:00:00 2001 From: James Harris Date: Tue, 12 Jul 2016 17:25:27 +0100 Subject: [PATCH] Transcription and Transposition Errors --- Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s | 109 ++--- Comanche055/ALARM_AND_ABORT.s | 77 ++- Comanche055/ANGLFIND.s | 250 +++++----- .../ASSEMBLY_AND_OPERATION_INFORMATION.s | 460 +++++++++--------- 4 files changed, 436 insertions(+), 460 deletions(-) diff --git a/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s b/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s index e2af62f..d0a4ef6 100644 --- a/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s +++ b/Comanche055/AGC_BLOCK_TWO_SELF-CHECK.s @@ -23,83 +23,86 @@ # Notations on the hardcopy document read, in part: # # Assemble revision 055 of AGC program Comanche by NASA -# 2021113-051. 10:28 APR. 1, 1969 +# 2021113-051. 10:28 APR. 1, 1969 # # This AGC program shall also be referred to as # Colossus 2A # Page 1394 -# PROGRAM DESCRIPTION DATE: 20 DECEMBER 1967 -# PROGRAM NAME -- SELF-CHECK LOG SECTION: AGC BLOCK TWO SELF-CHECK -# MOD NO -- 1 ASSEMBLY SUBROUTINE UTILITYM REV 25 -# MOD BY -- GAUNTT +# PROGRAM DESCRIPTION DATE 20 DECEMBER 1967 +# PROGRAM NAME - SELF-CHECK LOG SECTION AGC BLOCK TWO SELF-CHECK +# MOD NO - 1 ASSEMBLY SUBROUTINE UTILITYM REV 25 +# MOD BY - GAUNTT +# # # FUNCTIONAL DESCRIPTION -# PROGRAM HAS TWO MAIN PARTS. THE FIRST IS SELF-CHECK WHICH RUNS AS A ZERO PRIORITY JOB WITH NO CORE SET, AS -# PART OF THE BACK-UP IDLE LOOP. THE SECOND IS SHOW-BANKSUM WHICH RUNS AS A REGULAR EXECUTIVE JOB WITH ITS OWN -# STARTING VERB. # -# THE PURPOSE OF SELF-CHECK IS TO CHECK OUT VARIOUS PARTS OF THE COMPUTER AS OUTLINED BELOW IN THE OPTIONS. +# PROGRAM HAS TWO MAIN PARTS. THE FIRST IS SELF-CHECK WHICH RUNS AS A ZERO PRIORITY JOB WITH NO CORE SET, AS +# PART OF THE BACK-UP IDLE LOOP. THE SECOND IS SHOW-BANKSUM WHICH RUNS AS A REGULAR EXECUTIVE JOB WITH ITS OWN +# STARTING VERB. +# THE PURPOSE OF SELF-CHECK IS TO CHECK OUT VARIOUS PARTS OF THE COMPUTER AS OUTLINED BELOW IN THE OPTIONS. +# THE PURPOSE OF SHOW-BANKSUM IS TO DISPLAY THE SUM OF EACH BANK , ONE AT A TIME. +# IN ALL THERE ARE 7 POSSIBLE OPTIONS IN THIS BLOCK II VERSION OF SELF-CHECK. MORE DETAIL DESCRIPTION MAY BE +# FOUND IN E-2065 BLOCK II AGC SELF-CHECK AND SHOW BANKSUM BY EDWIN D. SMALLY DECEMBER 1966, AND ADDENDA 2 AND 3. +# THE DIFFERENT OPTIONS ARE CONTROLLED BY PUTTING DIFFERENT NUMBERS IN THE SMODE REGISTER (NOUN 27). BELOW IS +# A DESCRIPTION OF WHAT PARTS OF THE COMPUTER THAT ARE CHECKED BY THE OPTIONS, AND THE CORRESPONDING NUMBER, IN +# OCTAL, TO LOAD INTO SMODE. +# +-4 ERASABLE MEMORY +# +-5 FIXED MEMORY +# +-1,2,3,6,7,10 EVERYTHING IN OPTIONS 4 AND 5. +# -0 SAME AS +-10 UNTIL AN ERROR IS DETECTED. +# +0 NO CHECK, PUTS COMPUTER INTO THE BACKUP IDLE LOOP. # -# THE PURPOSE OF SHOW-BANKSUM IS TO DISPLAY THE SUM OF EACH BANK, ONE AT A TIME. -# -# IN ALL THERE ARE 7 POSSIBLE OPTIONS IN THIS BLOCK II VERSION OF SELF-CHECK. MORE DETAIL DESCRIPTION MAY BE -# FOUND IN E-2065 BLOCK II AGC SELF-CHECK AND SHOW BANKSUM BY EDWIN D. SMALLY DECEMBER 1966, AND ADDENDA 2 AND 3. -# -# THE DIFFERENT OPTIONS ARE CONTROLLED BY PUTTING DIFFERENT NUMBERS IN THE SMODE REGISTER (NOUN 27). BELOW IS -# A DESCRIPTION OF WHAT PARTS OF THE COMPUTER THAT ARE CHECKED BY THE OPTIONS, AND THE CORRESPONDING NUMBER, IN -# OCTAL, TO LOAD INTO SMODE. -# +-4 ERASABLE MEMORY -# +-5 FIXED MEMORY -# +-1,2,3,6,7,10 EVERYTHING IN OPTIONS 4 AND 5. -# -0 SAME AS +-10 UNTIL AN ERROR IS DETECTED. -# +0 NO CHECK, PUTS COMPUTER INTO THE BACKUP IDLE LOOP. # # WARNINGS -# USE OF E MEMORY RESERVED FOR SELF-CHECK (EVEN IN IDLE LOOP) AS TEMP STORAGE BY OTHER PROGRAMS IS DANGEROUS. -# SMODE SET GREATER THAN OCT 10 PUTS COMPUTER INTO BACKUP IDLE LOOP. +# USE OF E MEMORY RESERVED FOR SELF-CHECK (EVEN IN IDLE LOOP) AS TEMP STORAGE BY OTHER PROGRAMS IS DANGEROUS. +# SMODE SET GREATER THAN OCT 10 PUTS COMPUTER INTO BACKUP IDLE LOOP. +# # # CALLING SEQUENCE -# TO CALL SELF-CHECK KEY IN -# V 21 N 27 E OPTION NUMBER E -# TO CALL SHOW-BANKSUM KEY IN -# V 91 E DISPLAYS FIRST BANK -# V 33 E PROCEED, DISPLAYS NEXT BANK +# +# TO CALL SELF-CHECK KEY IN +# V 21 N 27 E OPTION NUMBER E +# TO CALL SHOW-BANKSUM KEY IN +# V 91 E DISPLAYS FIRST BANK +# V 33 E PROCEED, DISPLAYS NEXT BANK +# # # EXIT MODES, NORMAL AND ALARM -# SELF-CHECK NORMALLY CONTINUES INDEFINITELY UNLESS THERE IS AN ERROR DETECTED. IF SO + OPTION NUMBERS PUT -# COMPUTER INTO BACKUP IDLE LOOP, - OPTION NUMBERS RESTART THE OPTION. # -# THE -0 OPTION PROCEEDS FROM THE LINE FOLLOWING THE LINE WHERE THE ERROR WAS DETECTED. +# SELF-CHECK NORMALLY CONTINUES INDEFINITELY UNLESS THERE IS AN ERROR DETECTED. IF SO + OPTION NUMBERS PUT +# COMPUTER INTO BACKUP IDLE LOOP, - OPTION NUMBERS RESTART THE OPTION. +# THE -0 OPTION PROCEEDS FROM THE LINE FOLLOWING THE LINE WHERE THE ERROR WAS DETECTED. +# SHOW-BANKSUM PROCEEDS UNTIL A TERMINATE IS KEYED IN (V 34 E). THE COMPUTER IS PUT INTO THE BACKUP IDLE LOOP +# # -# SHOW-BANKSUM PROCEEDS UNTIL A TERMINATE IS KEYED IN (V 34 E). THE COMPUTER IS PUT INTO THE BACKUP IDLE LOOP. # # OUTPUT # Page 1395 -# SELF-CHECK UPON DETECTING AN ERROR LOADS THE SELF-CHECK ALARM CONSTANT (01102) INTO THE FAILREG SET AND -# TURNS ON THE ALARM LIGHT. THE OPERATOR MAY THEN DISPLAY THE THREE FAILREGS BY KEYING IN V 05 N 09 E. FOR FURTHER -# INFORMATION HE MAY KEY IN V 05 N 08 E, THE DSKY DISPLAY IN R1 WILL BE ADDRESS+1 OF WHERE THE ERROR WAS DETECTED, -# IN R2 THE BBCON OF SELF-CHECK, AND IN R3 THE TOTAL NUMBER OF ERRORS DETECTED BY SELF-CHECK SINCE THE LAST MAN -# INITIATED FRESH START (SLAP1). +# SELF-CHECK UPON DETECTING AN ERROR LOADS THE SELF-CHECK ALARM CONSTANT (01102) INTO THE FAILREG SET AND +# TURNS ON THE ALARM LIGHT. THE OPERATOR MAY THEN DISPLAY THE THREE FAILREGS BY KEYING IN V 05 N 09 E. FOR FURTHER +# INFORMATION HE MAY KEY IN V 05 N 08 E, THE DSKY DISPLAY IN R1 WILL BE ADDRESS+1 OF WHERE THE ERROR WAS DETECTED, +# IN R2 THE BBCON OF SELF-CHECK, AND IN R3 THE TOTAL NUMBER OF ERRORS DETECTED BY SELF-CHECK SINCE THE LAST MAN +# INITIATED FRESH START (SLAP1). +# SHOW-BANKSUM STARTING WITH BANK 0 DISPLAYS IN R1 THE BANK SUM (A +-NUMBER EQUAL TO THE BANK NUMBER), IN R2 +# THE BANK NUMBER, AND IN R3 THE BUGGER WORD. # -# SHOW-BANKSUM STARTING WITH BANK 0 DISPLAYS IN R1 THE BANK SUM (A +-NUMBER EQUAL TO THE BANK NUMBER), IN R2 -# THE BANK NUMBER, AND IN R3 THE BUGGER WORD. # # ERASABLE INITIALIZATION REQUIRED -# ACCOMPLISHED BY FRESH START -# SMODE SET TO +0 +# ACCOMPLISHED BY FRESH START +# SMODE SET TO +0 # # DEBRIS -# ALL EXITS FROM THE CHECK OF ERASABLE (ERASCHK) RESTORE ORIGINAL CONTENTS TO REGISTERS UNDER CHECK. -# EXCEPTION IS A RESTART. RESTART THAT OCCURS DURING ERASCHK RESTORES ERASABLE, UNLESS THERE IS EVIDENCE TO DOUBT -# E MEMORY, IN WHICH CASE PROGRAM THEN DOES A FRESH START (DOFSTART). +# ALL EXITS FROM THE CHECK OF ERASABLE (ERASCHK) RESTORE ORIGINAL CONTENTS TO REGISTERS UNDER CHECK. +# EXCEPTION IS A RESTART. RESTART THAT OCCURS DURING ERASCHK RESTORES ERASABLE, UNLESS THERE IS EVIDENCE TO DOUBT +# E MEMORY, IN WHICH CASE PROGRAM THEN DOES A FRESH START (DOFSTART). BANK 25 SETLOC SELFCHEC BANK COUNT 43/SELF - + SBIT1 EQUALS BIT1 SBIT2 EQUALS BIT2 SBIT3 EQUALS BIT3 @@ -150,7 +153,7 @@ S-ZERO EQUALS NEG0 EBANK= LST1 ADRS1 ADRES SKEEP1 -SELFADRS ADRES SELFCHK # SELFCHK RETURN ADDRESS. SHOULD BE PUT +SELFADRS ADRES SELFCHK # SELFCHK RETURN ADDRESS. SHOULD BE PUT # IN SELFRET WHEN GOING FROM SELFCHK TO # SHOWSUM AND PUT IN SKEEP1 WHEN GOING # FROM SHOWSUM TO SELF-CHECK. @@ -227,9 +230,7 @@ SELFCHK TC SMODECHK # ** CHARLEY, COME IN HERE # Page 1398 # SKEEP3 HOLDS LAST ADDRESS BEING CHECKED (HIGHEST ADDRESS). # SKEEP2 CONTROLS CHECKING OF NON-SWITCHABLE ERASABLE MEMORY WITH BANK NUMBERS IN EB. -# -# ERASCHK TAKES APPROXIMATELY 7 SECONDS. - +# ERASCHK TAKES APPROXMATELY 7 SECONDS ERASCHK CA S+1 TS SKEEP2 0EBANK CA S+ZERO @@ -322,10 +323,8 @@ ELOOPFIN RELINT TC E134567B # GO TO EBANKS 1,3,4,5,6, AND 7 CA ERASCON6 # END OF ERASCHK TS EBANK - # CNTRCHK PERFORMS A CS OF ALL REGISTERS FROM OCT. 60 THROUGH OCT. 10. # INCLUDED ARE ALL COUNTERS, T6-1, CYCLE AND SHIFT, AND ALL RUPT REGISTERS - CNTRCHK CA CNTRCON # 00050 CNTRLOOP TS SKEEP2 AD SBIT4 # +10 OCTAL @@ -336,7 +335,6 @@ CNTRLOOP TS SKEEP2 TC CNTRLOOP # CYCLSHFT CHECKS THE CYCLE AND SHIFT REGISTERS - CYCLSHFT CA CONC+S1 # 25252 TS CYR # C(CYR) = 12525 TS CYL # C(CYL) = 52524 @@ -357,7 +355,6 @@ CYCLSHFT CA CONC+S1 # 25252 INCR SCOUNT +1 TC SMODECHK - # SKEEP1 HOLDS SUM # SKEEP2 HOLDS PRESENT CONTENTS OF ADDRESS IN ROPECHK AND SHOWSUM ROUTINES # SKEEP2 HOLDS BANK NUMBER IN LOW ORDER BITS DURING SHOWSUM DISPLAY @@ -367,7 +364,7 @@ CYCLSHFT CA CONC+S1 # 25252 # SKEEP4 HOLDS BANK NUMBER AND SUPER BANK NUMBER # SKEEP5 COUNTS 2 SUCCESSIVE TC SELF WORDS # SKEEP6 CONTROLS ROPECHK OR SHOWSUM OPTION -# SKEEP7 CONTROLS WHEN ROUTINE IS IN COMMON FIXED OR FIXED FIXED BANKS +# SKEEP7 CONTROLS WHEN ROUNTINE IS IN COMMON FIXED OR FIXED FIXED BANKS ROPECHK CA S-ZERO # * TS SKEEP6 # * -0 FOR ROPECHK @@ -514,5 +511,3 @@ BNKCHK CS L # = - BANK NUMBER EBANK= NEWJOB LSTBNKCH BBCON* # * CONSTANT, LAST BANK. SBANK= LOWSUPER - - diff --git a/Comanche055/ALARM_AND_ABORT.s b/Comanche055/ALARM_AND_ABORT.s index bd483b2..5f7eab03 100644 --- a/Comanche055/ALARM_AND_ABORT.s +++ b/Comanche055/ALARM_AND_ABORT.s @@ -8,16 +8,16 @@ # Contact: Ron Burkey # Website: http://www.ibiblio.org/apollo. # Mod history: 2009-05-07 RSB Adapted from Colossus249 file of the same -# name, and page images. Corrected various -# typos in the transcription of program -# comments, and these should be back-ported +# name, and page images. Corrected various +# typos in the transcription of program +# comments, and these should be back-ported # to Colossus249. # -# The contents of the "Comanche055" files, in general, are transcribed -# from scanned documents. +# The contents of the "Comanche055" files, in general, are transcribed +# from scanned documents. # # Assemble revision 055 of AGC program Comanche by NASA -# 2021113-051. April 1, 1969. +# 2021113-051. April 1, 1969. # # This AGC program shall also be referred to as Colossus 2A # @@ -31,11 +31,11 @@ # Refer directly to the online document mentioned above for further # information. Please report any errors to info@sandroid.org. -# Page 1483 -# THE FOLLOWING SUBROUTINE MAY BE CALLED TO DISPLAY A NON-ABORTIVE ALARM CONDITION. IT MAY BE CALLED +# Page 1493 +# THE FOLLOWING SUBROUTINE MAY BE CALLED TO DISPLAY A NON-ABORTIVE ALARM CONDITION. IT MAY BE CALLED # EITHER IN INTERRUPT OR UNDER EXECUTIVE CONTROL. # -# THE CALLING SEQUENCE IS AS FOLLOWS: +# THE CALLING SEQUENCE IS AS FOLLOWS: # TC ALARM # OCT NNNNN # # (RETURNS HERE) @@ -59,7 +59,7 @@ ALARM2 TS ALMCADR BORTENT TS L PRIOENT CA BBANK - +1 EXTEND + +1 EXTEND ROR SUPERBNK # ADD SUPER BITS. TS ALMCADR +1 @@ -80,7 +80,7 @@ CHKFAIL2 CCS FAILREG +1 TCF FAIL3 LXCH FAILREG +1 TCF MULTEXIT - + FAIL3 CA FAILREG +2 # Page 1494 MASK POSMAX @@ -88,7 +88,7 @@ FAIL3 CA FAILREG +2 TCF MULTFAIL LXCH FAILREG +2 TCF MULTEXIT - + PROGLARM CS DSPTAB +11D MASK OCT40400 ADS DSPTAB +11D @@ -101,18 +101,18 @@ MULTEXIT XCH ITEMP1 # OBTAIN RETURN ADDRESS IN A MULTFAIL CA L AD BIT15 TS FAILREG +2 - + TCF MULTEXIT # PRIOLARM DISPLAYS V05N09 VIA PRIODSPR WITH 3 RETURNS TO THE USER FROM THE ASTRONAUT AT CALL LOC +1,+2,+3 AND -# AN IMMEDIATE RETURN TO THE USER AT CALL LOC +4. EXAMPLE FOLLOWS, +# AN IMMEDIATE RETURN TO THE USER AT CALL LOC +4. EXAMPLE FOLLOWS, # CAF OCTXX # ALARM CODE # TC BANKCALL # CADR PRIOLARM # ... ... # ... ... # ... ... # ASTRONAUT RETURN -# TC PHASCHNG # IMMEDIATE RETURN TO USER. RESTART +# TC PHASCHNG # IMMEDIATE RETURN TO USER. RESTART # OCT X.1 # PHASE CHANGE FOR PRIO DISPLAY BANK 10 @@ -120,32 +120,33 @@ MULTFAIL CA L BANK COUNT 10/DSPLA -PRIOLARM INHINT # * * * KEEP IN DISPLAY ROUTINE'S BANK + +PRIOLARM INHINT # * * * KEEP IN DISPLAY ROUTINES BANK TS L # SAVE ALARM CODE CA BUF2 # 2 CADR OF PRIOLARM USER TS ALMCADR CA BUF2 +1 TC PRIOENT +1 # * LEAVE L ALONE --2SEC DEC -200 # *** DON'T MOVE +-2SEC DEC -200 # *** DONT MOVE CAF V05N09 TCF PRIODSPR - -# Page 1495 + +# Page 1495 BLOCK 02 SETLOC FFTAG13 BANK COUNT 02/ALARM - + BAILOUT INHINT CA Q TS ALMCADR - + TC BANKCALL CADR VAC5STOR - + INDEX ALMCADR CAF 0 TC BORTENT @@ -158,41 +159,42 @@ WHIMPER CA TWO RESUME TC POSTJUMP # RESUME SENDS CONTROL HERE CADR ENEMA - + SETLOC FFTAG7 BANK - + P00DOO INHINT CA Q TS ALMCADR TC BANKCALL CADR VAC5STOR # STORE ERASABLES FOR DEBUGGING PURPOSES. - + INDEX ALMCADR CAF 0 ABORT2 TC BORTENT -OCT77770 OCT 77770 # DON'T MOVE + +OCT77770 OCT 77770 # DONT MOVE CA V37FLBIT # IS AVERAGE G ON MASK FLAGWRD7 CCS A - TC WHIMPER -1 # YES. DON'T DO POODOO. DO BAILOUT. + TC WHIMPER -1 # YES. DONT DO POODOO. DO BAILOUT. TC DOWNFLAG ADRES STATEFLG - + TC DOWNFLAG - + # Page 1496 ADRES REINTFLG - + TC DOWNFLAG ADRES NODOFLAG - + TC BANKCALL CADR MR.KLEAN TC WHIMPER - + CCSHOLE INHINT CA Q TS ALMCADR @@ -208,23 +210,20 @@ OCT217 OCT 00217 TC ALMCADR # RETURN TO USER DOALARM EQUALS ENDOFJOB - # CALLING SEQUENCE FOR VARALARM # CAF (ALARM) # TC VARALARM -# Page 1486 - +# # VARALARM TURNS ON PROGRAM ALARM LIGHT BUT DOES NOT DISPLAY - VARALARM INHINT - TS L # SAVE USER'S ALARM CODE + TS L # SAVE USERS ALARM CODE - CA Q # SAVE USER'S Q + CA Q # SAVE USERS Q TS ALMCADR TC PRIOENT -OCT14 OCT 14 # DON'T MOVE +OCT14 OCT 14 # DONT MOVE TC ALMCADR # RETURN TO USER diff --git a/Comanche055/ANGLFIND.s b/Comanche055/ANGLFIND.s index 0fe2281..dc398b7 100644 --- a/Comanche055/ANGLFIND.s +++ b/Comanche055/ANGLFIND.s @@ -7,10 +7,10 @@ # Contact: Ron Burkey . # Website: www.ibiblio.org/apollo. # Pages: 399-411 -# Mod history: 2009-05-09 RSB Adapted from the Colossus249/ file -# of the same name, using Comanche055 page +# Mod history: 2009-05-09 RSB Adapted from the Colossus249/ file +# of the same name, using Comanche055 page # images. -# 2009-05-22 RSB In NOGOM2, TC ZEROEROR corrected to +# 2009-05-22 RSB In NOGOM2, TC ZEROEROR corrected to # CADR ZEROEROR. # # This source code has been transcribed or otherwise adapted from digitized @@ -19,13 +19,13 @@ # thanks to both. The images (with suitable reduction in storage size and # consequent reduction in image quality as well) are available online at # www.ibiblio.org/apollo. If for some reason you find that the images are -# illegible, contact me at info@sandroid.org about getting access to the +# illegible, contact me at info@sandroid.org about getting access to the # (much) higher-quality images which Paul actually created. # # Notations on the hardcopy document read, in part: # # Assemble revision 055 of AGC program Comanche by NASA -# 2021113-051. 10:28 APR. 1, 1969 +# 2021113-051. 10:28 APR. 1, 1969 # # This AGC program shall also be referred to as # Colossus 2A @@ -34,11 +34,11 @@ BANK 15 SETLOC KALCMON1 BANK - + EBANK= BCDU - + COUNT 22/KALC - + KALCMAN3 TC INTPRET RTB READCDUK # PICK UP CURRENT CDU ANGLES @@ -47,7 +47,7 @@ KALCMAN3 TC INTPRET MIS # INITIAL S/C AXES TO STABLE MEMBER AXES BCDU # (MIS) CALL - CDUTODCM + CDUTODCM AXC,2 TLOAD # COMPUTE THE TRANSFORMATION FROM MFS # FINAL S/C AXES TO STABLE MEMBER AXES CPHI # (MFS) @@ -58,9 +58,9 @@ SECAD AXC,1 CALL # MIS AND MFS ARRAYS CALCULATED $2 TRANSPOS VLOAD STADR - STOVL TMIS +12D + STOVL TMIS +12D STADR - STOVL TMIS +6 + STOVL TMIS +6 STADR STORE TMIS # TMIS = TRANSPOSE(MIS) SCALED BY 2 AXC,1 AXC,2 @@ -69,45 +69,45 @@ SECAD AXC,1 CALL # MIS AND MFS ARRAYS CALCULATED $2 CALL MXM3 VLOAD STADR - STOVL MFI +12D + STOVL MFI +12D STADR - STOVL MFI +6 + STOVL MFI +6 STADR STORE MFI # MFI = TMIS MFS (SCALED BY 4) SETPD CALL # TRANSPOSE MFI IN PD LIST 18D TRNSPSPD VLOAD STADR - STOVL TMFI +12D + STOVL TMFI +12D STADR - STOVL TMFI +6 + STOVL TMFI +6 # Page 400 STADR - STORE TMFI # TMFI = TRANSPOSE (MFI) SCALED BY 4 - + STORE TMFI # TMFI = TRANSPOSE (MFI) SCALED BY 4 + # CALCULATE COFSKEW AND MFISYM DLOAD DSU - TMFI +2 - MFI +2 + TMFI +2 + MFI +2 PDDL DSU # CALCULATE COF SCALED BY 2/SIN(AM) - MFI +4 - TMFI +4 + MFI +4 + TMFI +4 PDDL DSU - TMFI +10D - MFI +10D + TMFI +10D + MFI +10D VDEF STORE COFSKEW # EQUALS MFISKEW - + # CALCULATE AM AND PROCEED ACCORDING TO ITS MAGNITUDE DLOAD DAD MFI - MFI +16D + MFI +16D DSU DAD DP1/4TH - MFI +8D - STORE CAM # CAM = (MFI0+MFI4+MFI8-1)/2 HALF-SCALE + MFI +8D + STORE CAM # CAM = (MFI0+MFI4+MFI8-1)/2 HALF SCALE ARCCOS STORE AM # AM=ARCCOS(CAM) (AM SCALED BY 2) DSU BPL @@ -119,7 +119,7 @@ SECAD AXC,1 CALL # MIS AND MFS ARRAYS CALCULATED $2 TS HOLDFLAG # NOGO WILL STOP ANY RATE AND SET UP FOR A TC LOADCDUD # GOOD RETURN TCF NOGO - + CHECKMAX DLOAD DSU AM MAXANG @@ -136,15 +136,15 @@ ALTCALC VLOAD VAD # IF AM GREATER THAN 170 DEGREES TMFI VSR1 STOVL MFISYM - MFI +6 + MFI +6 VAD VSR1 - TMFI +6 - STOVL MFISYM +6 - MFI +12D + TMFI +6 + STOVL MFISYM +6 + MFI +12D VAD VSR1 - TMFI +12D - STORE MFISYM +12D # MFISYM=(MFI+TMFI)/2 SCALED BY 4 - + TMFI +12D + STORE MFISYM +12D # MFISYM=(MFI+TMFI)/2 SCALED BY 4 + # CALCULATE COF DLOAD SR1 @@ -154,12 +154,12 @@ ALTCALC VLOAD VAD # IF AM GREATER THAN 170 DEGREES CAM BOVB PDDL # PD2 1 - CAM $2 SIGNMPAC - MFISYM +16D + MFISYM +16D DSU DDV 0 2 SQRT PDDL # COFZ = SQRT(MFISYM8-CAM)/(1-CAM) - MFISYM +8D # $ ROOT 2 + MFISYM +8D # $ ROOT 2 DSU DDV 0 2 @@ -171,45 +171,45 @@ ALTCALC VLOAD VAD # IF AM GREATER THAN 170 DEGREES SQRT VDEF # COFX = SQRT(MFISYM-CAM)/(1-CAM) $ROOT 2 UNIT STORE COF - + # DETERMINE LARGEST COF AND ADJUST ACCORDINGLY COFMAXGO DLOAD DSU COF - COF +2 + COF +2 BMN DLOAD # COFY G COFX COMP12 COF DSU BMN - COF +4 + COF +4 # Page 402 METHOD3 # COFZ G COFX OR COFY GOTO METHOD1 # COFX G COFY OR COFZ COMP12 DLOAD DSU - COF +2 - COF +4 + COF +2 + COF +4 BMN METHOD3 # COFZ G COFY OR COFX - + METHOD2 DLOAD BPL # COFY MAX - COFSKEW +2 # UY + COFSKEW +2 # UY U2POS VLOAD VCOMP COF STORE COF U2POS DLOAD BPL - MFISYM +2 # UX UY + MFISYM +2 # UX UY OKU21 DLOAD DCOMP # SIGN OF UX OPPOSITE TO UY COF STORE COF OKU21 DLOAD BPL - MFISYM +10D # UY UZ + MFISYM +10D # UY UZ LOCSKIRT DLOAD DCOMP # SIGN OF UZ OPPOSITE TO UY - COF +4 - STORE COF +4 + COF +4 + STORE COF +4 GOTO LOCSKIRT METHOD1 DLOAD BPL # COFX MAX @@ -219,17 +219,17 @@ METHOD1 DLOAD BPL # COFX MAX COF STORE COF U1POS DLOAD BPL - MFISYM +2 # UX UY + MFISYM +2 # UX UY OKU12 DLOAD DCOMP - COF +2 # SIGN OF UY OPPOSITE TO UX - STORE COF +2 + COF +2 # SIGN OF UY OPPOSITE TO UX + STORE COF +2 OKU12 DLOAD BPL - MFISYM +4 # UX UZ + MFISYM +4 # UX UZ LOCSKIRT DLOAD DCOMP # SIGN OF UZ OPPOSITE TO UY - COF +4 - STORE COF +4 + COF +4 + STORE COF +4 GOTO LOCSKIRT METHOD3 DLOAD BPL # COFZ MAX @@ -240,17 +240,17 @@ METHOD3 DLOAD BPL # COFZ MAX COF STORE COF U3POS DLOAD BPL - MFISYM +4 # UX UZ + MFISYM +4 # UX UZ OKU31 DLOAD DCOMP COF # SIGN OF UX OPPOSITE TO UZ STORE COF OKU31 DLOAD BPL - MFISYM +10D # UY UZ + MFISYM +10D # UY UZ LOCSKIRT DLOAD DCOMP - COF +2 # SIGN OF UY OPPOSITE TO UZ - STORE COF +2 + COF +2 # SIGN OF UY OPPOSITE TO UZ + STORE COF +2 GOTO LOCSKIRT @@ -281,10 +281,10 @@ MXM3 SETPD # MXM3 MULTIPLIES 2 3X3 MATRICES 0,1 GOTO TRNSPSPD # REVERSE ROWS AND COLS IN PD AND - # RETURN WITH M1XM2 IN PD LIST + TRANSPOS SETPD VLOAD* # TRANSPOS TRANSPOSES A 3X3 MATRIX - 0 # AND LEAVES RESULT IN PD LIST + 0 # AND LEAVES RESULT IN PD LIST 0,1 # MATRIX ADDRESS IN XR1 PDVL* PDVL* 6,1 @@ -312,7 +312,6 @@ TRNSPSPD DLOAD PDDL # ENTER WITH MATRIX IN PD LIST RVQ # RETURN WITH TRANSPOSED MATRIX IN PD LIST MINANG DEC .00069375 MAXANG DEC .472222 - # GIMBAL LOCK CONSTANTS # D = MGA CORRESPONDING TO GIMBAL LOCK = 60 DEGREES @@ -326,19 +325,19 @@ SNGLCD DEC .008725 # = SIN(NGL)COS(D) $2 CNGL DEC .499695 # = COS(NGL) $2 READCDUK INHINT # LOAD T(MPAC) WITH THE CURRENT CDU ANGLES CA CDUZ - TS MPAC +2 + TS MPAC +2 EXTEND DCA CDUX RELINT - TCF TLOAD +6 + TCF TLOAD +6 BANK 16 SETLOC KALCMON2 BANK - + COUNT* $$/KALC - -CDUTODCM AXT,1 SSP # SUBROUTINE TO COMPUTE DIRECTION COSINE - OCT 3 # MATRIX RELATING S/C AXES TO STARLE + +CDUTODCM AXT,1 SSP # SUBROUTINE TO COMPUTE DIRECTION COSINE + OCT 3 # MATRIX RELATING S/C AXES TO STABLE S1 # MEMBER AXES FROM 3 CDU ANGLES IN T(MPAC) OCT 1 # SET XR1, S1, AND PD FOR LOOP STORE 7 @@ -347,12 +346,12 @@ CDUTODCM AXT,1 SSP # SUBROUTINE TO COMPUTE DIRECTION COSINE LOOPSIN SLOAD* RTB 10D,1 CDULOGIC - STORE 10D # LOAD PD WITH 0 SIN(PHI) - SIN PDDL # 2 COS(PHI) - 10D # 4 SIN(THETA) - COS PUSH # 6 COS(THETA) - TIX,1 DLOAD # 8 SIN(PSI) - LOOPSIN # 10 COS(PSI) + STORE 10D # LOAD PD WITH 0 SIN(PHI) + SIN PDDL # 2 COS(PHI) + 10D # 4 SIN(THETA) + COS PUSH # 6 COS(THETA) + TIX,1 DLOAD # 8 SIN(PSI) + LOOPSIN # 10 COS(PSI) 6 DMP SL1 10D @@ -405,42 +404,42 @@ LOOPSIN SLOAD* RTB DLOAD DMP SL1 # (PUSH UP 7) 8D - PDDL DMP # (PD7 COS(PHI)SIN(THETA)SIN(PSI)) SCALE 4 + PDDL DMP # (PD7 COS(PHI)SIN(THETA)SIN(PSI)) SCALE4 6 # Page 407 0 - DAD SL1 # (PUSH UP 7) + DAD SL1 # (PUSH UP 7) STADR # C7=COS(PHI)SIN(THETA)SIN(PSI) STORE 14D,2 DLOAD - DMP SL1 # (PUSH UP 6) + DMP SL1 # (PUSH UP 6) 8D - PDDL DMP # (PD6 SIN(THETA)SIN(PHI)SIN(PSI)) SCALE 4 + PDDL DMP # (PD6 SIN(THETA)SIN(PHI)SIN(PSI)) SCALE4 6 2 - DSU SL1 # (PUSH UP 6) + DSU SL1 # (PUSH UP 6) STADR STORE 16D,2 # C8=-SIN(THETA)SIN(PHI)SIN(PSI) - RVQ # +COS(THETA)COS(PHI) + RVQ # +COS(THETA)COS(PHI) ENDOCM EQUALS BANK 15 SETLOC KALCMON1 BANK - + # CALCULATION OF THE MATRIX DEL....... # -# * * __T * +# * * --T * # DEL = (IDMATRIX)COS(A)+UU (1-COS(A))+UX SIN(A) SCALED 1 # -# _ +# - # WHERE U IS A UNIT VECTOR (DP SCALED 2) ALONG THE AXIS OF ROTATION. -# A IS THE ANGLE OF ROTATION (DP SCALED 2). -# _ -# UPON ENTRY THE STARTING ADDRESS OF U IS COF, AND A IS IN MPAC. +# A IS THE ANGLE OF ROTATION (DP SCALED 2) +# - +# UPON ENTRY THE STARTING ADDRESS OF U IS COF, AND A IS IN MPAC COUNT 22/KALC - + DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A 0 SIN PDDL # PD0 = SIN(A) @@ -449,7 +448,7 @@ DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A BDSU BOVB # PD4 = 1-COS(A) $2 DPHALF SIGNMPAC - + # COMPUTE THE DIAGONAL COMPONENTS OF DEL PDDL @@ -462,48 +461,48 @@ DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A BOVB SIGNMPAC STODL DEL # UX UX(U-COS(A)) +COS(A) $1 - COF +2 - DSQ DMP - 4 - DAD SL3 - 2 - BOVB - SIGNMPAC - STODL DEL +8D # UY UY(1-COS(A)) +COS(A) $1 - COF +4 + COF +2 DSQ DMP 4 DAD SL3 2 BOVB SIGNMPAC - STORE DEL +16D # UZ UZ(1-COS(A)) +COS(A) $1 - -# COMPUTE THE OFF-DIAGONAL TERMS OF DEL + STODL DEL +8D # UY UY(1-COS(A)) +COS(A) $1 + COF +4 + DSQ DMP + 4 + DAD SL3 + 2 + BOVB + SIGNMPAC + STORE DEL +16D # UZ UZ(1-COS(A)) +COS(A) $1 + +# COMPUTE THE OFF DIAGONAL TERMS OF DEL DLOAD DMP COF - COF +2 + COF +2 DMP SL1 4 - PDDL DMP # D6 UX UY (1-COS A) $ 4 - COF +4 + PDDL DMP # D6 UX UY (1-COS A) $ 4 + COF +4 0 - PUSH DAD # D8 UZ SIN A $ 4 + PUSH DAD # D8 UZ SIN A $ 4 6 SL2 BOVB SIGNMPAC - STODL DEL +6 + STODL DEL +6 BDSU SL2 BOVB SIGNMPAC - STODL DEL +2 + STODL DEL +2 COF DMP DMP - COF +4 + COF +4 4 - SL1 PDDL # D6 UX UZ (1-COS A) $ 4 - COF +2 + SL1 PDDL # D6 UX UZ (1-COS A ) $ 4 + COF +2 DMP PUSH # D8 UY SIN(A) 0 DAD SL2 @@ -511,14 +510,14 @@ DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A # Page 409 BOVB SIGNMPAC - STODL DEL +4 # UX UZ (1-COS(A))+UY SIN(A) + STODL DEL +4 # UX UZ (1-COS(A))+UY SIN(A) BDSU SL2 BOVB SIGNMPAC - STODL DEL +12D # UX UZ (U-COS(A))-UY SIGN(A) - COF +2 + STODL DEL +12D # UX UZ (U-COS(A))-UY SIGN(A) + COF +2 DMP DMP - COF +4 + COF +4 4 SL1 PDDL # D6 UY UZ (1-COS(A)) $ 4 COF @@ -528,41 +527,34 @@ DELCOMP SETPD PUSH # MPAC CONTAINS THE ANGLE A 6 BOVB SIGNMPAC - STODL DEL +14D # UY UZ(1-COS(A)) +UX SIN(A) + STODL DEL +14D # UY UZ(1-COS(A)) +UX SIN(A) BDSU SL2 - BOVB + BOVB SIGNMPAC - STORE DEL +10D # UY UZ(1-COS(A)) -UX SIN(A) + STORE DEL +10D # UY UZ(1-COS(A)) -UX SIN(A) RVQ - + # DIRECTION COSINE MATRIX TO CDU ANGLE ROUTINE # X1 CONTAINS THE COMPLEMENT OF THE STARTING ADDRESS FOR MATRIX (SCALED 2) # LEAVES CDU ANGLES SCALED 2PI IN V(MPAC) # COS(MGA) WILL BE LEFT IN S1 (SCALED 1) # -# THE DIRECTION COSINE MATRIX RELATING S/C AXES TO STABLE MEMBER AXES CAN BE WRITTEN AS *** +# THE DIRECTION COSINE MATRIX RELATING S/C AXES TO STABLE MEMBER AXES CAN BE WRITTEN AS*** # # C =COS(THETA)COS(PSI) # 0 -# # C =-COS(THETA)SIN(PSI)COS(PHI)+SIN(THETA)SIN(PHI) # 1 -# # C =COS(THETA)SIN(PSI)SIN(PHI)+SIN(THETA)COS(PHI) # 2 -# # C =SIN(PSI) # 3 -# # C =COS(PSI)COS(PHI) # 4 -# # C =-COS(PSI)SIN(PHI) # 5 -# # C =-SIN(THETA)COS(PSI) # 6 -# # C =SIN(THETA)SIN(PSI)COS(PHI)+COS(THETA)SIN(PHI) # 7 # Page 410 @@ -620,15 +612,15 @@ VECOFANG VDEF RVQ NOGOM2 INHINT # THIS LOCATION ACCESSED BY A BZMF NOGO -2 TC BANKCALL CADR ZEROERROR - + NOGO INHINT TC STOPRATE - + # TERMINATE MANEUVER - CAF TWO # NOTE: ALL RETURNS ARE NOW MADE VIA + CAF TWO # NOTE - ALL RETURNS ARE NOW MADE VIA TC WAITLIST # GOODEND EBANK= BCDU 2CADR ENDMANU - + TCF ENDOFJOB - + diff --git a/Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s b/Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s index 410935d..76d22f9 100644 --- a/Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s +++ b/Comanche055/ASSEMBLY_AND_OPERATION_INFORMATION.s @@ -6,7 +6,7 @@ # Assembler: yaYUL # Contact: Ron Burkey . # Website: www.ibiblio.org/apollo. -# Mod history: 2009-05-05 RSB Adapted from the Colossus249/ file of the +# Mod history: 2009-05-05 RSB Adapted from the Colossus249/ file of the # same name, using Comanche055 page images. # # This source code has been transcribed or otherwise adapted from digitized @@ -15,13 +15,13 @@ # thanks to both. The images (with suitable reduction in storage size and # consequent reduction in image quality as well) are available online at # www.ibiblio.org/apollo. If for some reason you find that the images are -# illegible, contact me at info@sandroid.org about getting access to the +# illegible, contact me at info@sandroid.org about getting access to the # (much) higher-quality images which Paul actually created. # # Notations on the hardcopy document read, in part: # # Assemble revision 055 of AGC program Comanche by NASA -# 2021113-051. 10:28 APR. 1, 1969 +# 2021113-051. 10:28 APR. 1, 1969 # # This AGC program shall also be referred to as # Colossus 2A @@ -31,6 +31,8 @@ # ASSEMBLY AND OPERATIONS INFORMATION # TAGS FOR RELATIVE SETLOC AND BLANK BANK CARDS # SUBROUTINE CALLS +# +# # COMERASE # ERASABLE ASSIGNMENTS # COMAID @@ -52,12 +54,12 @@ # SYSTEM TEST STANDARD LEAD INS # IMU CALIBRATION AND ALIGNMENT # COMEKISS -# GROUND TRACKING DETERMINATION PROGRAM -- P21 +# GROUND TRACKING DETERMINATION PROGRAM - P21 # P34-P35, P74-P75 # R31 # P76 # R30 -# STABLE ORBIT -- P38-P39 +# STABLE ORBIT - P38-P39 # TROUBLE # P11 # TP1 SEARCH @@ -73,12 +75,9 @@ # CM BODY ATTITUDE # P37,P70 # S-BAND ANTENNA FOR CM -# LUNAR LANDMARK SELECTION FOR CM # TVCDAPS # TVC INITIALIZE - # Page 3 - # TVC EXECUTIVE # TVC MASSPROP # TVC RESTARTS @@ -120,19 +119,19 @@ # ALARM AND ABORT # UPDATE PROGRAM # RTB OP CODES -# SYMBOL TABLE LISTING -# UNREFERANCES SYMBOL LISTING -# ERASABLE & EQUALS CROSS-REFERENCE TABLE -# SUMMARY OF SYMBOL TABLE LISTINGS -# MEMORY TYPE & AVAILABILITY DISPLAY -# COUNT TABLE -# PARAGRAPHS GENERATED FOR THIS DISPLAY - +# +# +# SYMBOL TABLE LISTING +# UNREFERANCED SYMBOL LISTING +# ERASABLE & EQUALS CROSS-REFERENCE TABLE +# SUMMARY OF SYMBOL TABLE LISTINGS +# MEMORY TYPE & AVAILABILITY DISPLAY +# COUNT TABLE +# PARAGRAPHS GENERATED FOR THIS ASSEMBLY # Page 4 - -# OCTAL LISTING -# OCCUPIED LOCATIONS TABLE -# SUBROS CALLED & PROGRAM STATUS +# OCTAL LISTING +# OCCUPIED LOCATIONS TABLE +# SUBROS CALLED & PROGRAM STATUS # Page 5 # VERB LIST FOR CSM @@ -184,30 +183,30 @@ # EXTENDED VERBS -# 40 ZERO CDU'S -# 41 COARSE ALIGN CDU'S -# 42 FINE ALIGN IMU'S +# 40 ZERO CDU-S +# 41 COARSE ALIGN CDU-S +# 42 FINE ALIGN IMU-S # 43 LOAD IMU ATT ERROR METERS # 44 SET SURFACE FLAG # 45 RESET SURFACE FLAG # 46 ESTABLISH G&C CONTROL -# 47 MOVE LM STATE VECTOR INTO CM STATE VECTOR +# 47 MOVE LM STATE VECTOR INTO CM STATE VECTOR. # 48 REQUEST DAP DATA LOAD ROUTINE (R03) -# 49 REQUES CREW DEFINED MANEUVER ROUTINE (R62) +# 49 REQUEST CREW DEFINED MANEUVER ROUTINE (R62) # 50 PLEASE PERFORM # 51 PLEASE MARK # 52 MARK ON OFFSET LANDING SITE # 53 PLEASE PERFORM ALTERNATE LOS MARK -# 54 REQUEST RENDEZVOUS BACKUP SIGHTING MARK ROUTIEN (R23) +# 54 REQUEST RENDEZVOUS BACKUP SIGHTING MARK ROUTINE (R23) # 55 INCREMENT AGC TIME (DECIMAL) -# 56 TERMINATE TRACKING (P20 & P25) +# 56 TERMINATE TRACKING (P20 + P25) # 57 REQUEST RENDEZVOUS SIGHTING MARK ROUTINE (R21) # 58 RESET STICK FLAG # 59 PLEASE CALIBRATE # 60 SET ASTRONAUT TOTAL ATTITUDE (N17) TO PRESENT ATTITUDE # 61 DISPLAY DAP ATTITUDE ERROR -# 62 DISPLAY TOTAL ATTITUDE ERROR (W.R.T. N22 (THETAD)) -# 63 DISPLAY TOTAL ASTRONAUT ATTITUDE ERROR (W.R.T. N17 (CPHIX)) +# 62 DISPLAY TOTAL ATTITUDE ERROR (WRT N22 (THETAD)) +# 63 DISPLAY TOTAL ASTRONAUT ATTITUDE ERROR (WRT N17 (CPHIX)) # 64 REQUEST S-BAND ANTENNA ROUTINE # 65 OPTICAL VERIFICATION OF PRELAUNCH ALIGNMENT # 66 VEHICLES ARE ATTACHED. MOVE THIS VEHICLE STATE TO OTHER VEHICLE. @@ -215,8 +214,8 @@ # 68 CSM STROKE TEST ON # 69 CAUSE RESTART # 70 UPDATE LIFTOFF TIME -# 71 UNIVERSAL UPDATE - BLOCK ADR -# 72 UNIVERSAL UPDATE - SINGLE ADR +# 71 UNIVERSAL UPDATE-BLOCK ADR +# 72 UNIVERSAL UPDATE-SINGLE ADR # 73 UPDATE AGC TIME (OCTAL) # 74 INITIALIZE ERASABLE DUMP VIA DOWNLINK # 75 BACKUP LIFTOFF @@ -232,16 +231,14 @@ # 85 REQUEST RENDEZVOUS PARAMETER DISPLAY NO. 2 (R34) # 86 REJECT RENDEZVOUS BACKUP SIGHTING MARK # 87 SET VHF RANGE FLAG - # Page 7 - # 88 RESET VHF RANGE FLAG # 89 REQUEST RENDEZVOUS FINAL ATTITUDE ROUTINE (R63) # 90 REQUEST RENDEZVOUS OUT OF PLANE DISPLAY ROUTINE (R36) # 91 DISPLAY BANK SUM # 92 OPERATE IMU PERFORMANCE TEST (P07) # 93 ENABLE W MATRIX INITIALIZATION -# 94 PERFORM SYSLUNAR ATTITUDE MANEUVER (P23) +# 94 PERFORM CYSLUNAR ATTITUDE MANEUVER (P23) # 95 NO UPDATE OF EITHER STATE VECTOR (P20 OR P22) # 96 TERMINATE INTEGRATION AND GO TO P00 # 97 PERFORM ENGINE FAIL PROCEDURE @@ -249,18 +246,16 @@ # 99 PLEASE ENABLE ENGINE # Page 8 -# IN THE FOLLOWING NOUN LIST THE 'NO LOAD' RESTRICTION MEANS THE NOUN -# CONTAINS AT LEAST ONE COMONENT WHICH CANNOT BE LOADED, I.E. OF +# IN THE FOLLOWING NOUN LIST THE :NO LOAD: RESTRICTION MEANS THE NOUN +# CONTAINS AT LEAST ONE COMPONENT WHICH CANNOT BE LOADED, I.E. OF # SCALE TYPE L (MIN/SEC) OR PP (2 INTEGERS). - # IN THIS CASE VERBS 24 AND 25 ARE NOT ALLOWED, BUT VERBS 21, 22, OR 23 -# MAY BE USED TO LOAD ANY O FTHE NOUN'S COMPONENTS WHICH ARE NOT OF THE +# MAY BE USED TO LOAD ANY OF THE NOUN:S COMPONENTS WHICH ARE NOT OF THE # ABOVE SCALE TYPES. +# THE :DEC ONLY: RESTRICTION MEANS ONLY DECIMAL OPERATION IS ALLOWED ON +# EVERY COMPONENT IN THE NOUN. (NOTE THAT :NO LOAD: IMPLIES :DEC ONLY:.) -# THE 'DEC ONLY' RESTRICTION MEANS ONLY DECIMAL OPERATION IS ALLOWED ON -# EVERY COMPONENT IN THENOUN. (NOT THAT 'NO LOAD' IMLIES 'DEC ONLY'.) - -# NORMAL NOUNS COMPONENTS SCALE & DECIMAL POINT RESTRICTION +# NORMAL NOUNS COMPONENTS SCALE & DECIMAL POINT RESTRICTIONS # # 00 NOT IN USE # 01 SPECIFY MACHINE ADDRESS (FRACTIONAL) 3COMP .XXXXX FOR EACH @@ -269,7 +264,7 @@ # 04 SPARE # 05 ANGULAR ERROR/DIFFERENCE 1COMP XXX.XX DEG # 06 OPTION CODE 2COMP OCTAL ONLY FOR EACH -# LOADING NOUN 07 WILL SET OR RESET SELECTED BITS IN ANY ERASABLE REGISTER. +# LOADING NOUN 07 WILL SET OR RESET SELECTED BITS IN ANY ERASABLE REGISTER # 07 ECADR OF WORD TO BE MODIFIED 3COMP OCTAL ONLY FOR EACH # ONES FOR BITS TO BE MODIFIED # 1 TO SET OR 0 TO RESET SELECTED BITS @@ -300,7 +295,7 @@ # 000XX. MIN MUST LOAD 3 COMPS # 0XX.XX SEC # 25 CHECKLIST 3COMP XXXXX. FOR EACH -# (USED WITH PLEASE PERFORM ONLY) +# (USED WITH PLEASE PERFORM ONLY) # Page 9 @@ -342,21 +337,21 @@ # Page 11 -# MIXED NOUNS COMPONENTS SCALE & DECIMAL POINT RESTRICTION +# MIXED NOUNS COMPONENTS SCALE & DECIMAL POINT RESTRICTIONS # # 40 TIME FROM IGNITION/CUTOFF 3COMP XXBXX MIN/SEC NO LOAD, DEC ONLY -# VG XXXX.X FT/SEC +# VG, XXXX.X FT/SEC # DELTA V (ACCUMULATED) XXXX.X FT/SEC -# 41 TARGET AZIMUTH 2COMP XXX.XX DEG +# 41 TARGET AZIMUTH, 2COMP XXX.XX DEG # ELEVATION XX.XXX DEG -# 42 APOGEE 3COMP XXXX.X NAUT MI DEC ONLY -# PERIGEE XXXX.X NAUT MI +# 42 APOGEE, 3COMP XXXX.X NAUT MI DEC ONLY +# PERIGEE, XXXX.X NAUT MI # DELTA V (REQUIRED) XXXX.X FT/SEC -# 43 LATITUDE 3COMP XXX.XX DEG DEC ONLY -# LONGITUDE XXX.XX DEG +# 43 LATITUDE, 3COMP XXX.XX DEG DEC ONLY +# LONGITUDE, XXX.XX DEG # ALTITUDE XXXX.X NAUT MI -# 44 APOGEE 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY -# PERIGEE XXXX.X NAUT MI +# 44 APOGEE, 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY +# PERIGEE, XXXX.X NAUT MI # TFF XXBXX MIN/SEC # 45 MARKS (VHF - OPTICS) 3COMP +XXBXX NO LOAD, DEC ONLY # TFI OF NEXT BURN XXBXX MIN/SEC @@ -365,67 +360,67 @@ # 47 THIS VEHICLE WEIGHT 2COMP XXXXX. LBS DEC ONLY # OTHER VEHICLE WEIGHT XXXXX. LBS # 48 PITCH TRIM 2COMP XXX.XX DEG DEC ONLY -# YAW TRIM XXX.XX DEG +# YAW TRIM, XXX.XX DEG # 49 DELTA R 3COMP XXXX.X NAUT MI DEC ONLY # DELTA V XXXX.X FT/SEC # VHF OR OPTICS CODE XXXXX. -# 50 SPLASH ERROR 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY -# PERIGEE XXXX.X NAUT MI +# 50 SPLASH ERROR, 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY +# PERIGEE, XXXX.X NAUT MI # TFF XXBXX MIN/SEC -# 51 S-BAND ANTENNA ANGLES PITCH 2COMP XXX.XX DEG DEC ONLY -# YAW XXX.XX DEG +# 51 S-BAND ANTENNA ANGLES PITCH 2COMP XXX.XX DEG DEC ONLY +# YAW XXX.XX DEG # 52 CENTRAL ANGLE OF ACTIVE VEHICLE 1COMP XXX.XX DEG -# 53 RANGE 3COMP XXX.XX NAUT MI DEC ONLY -# RANGE RATE XXXX.X FT/SEC +# 53 RANGE, 3COMP XXX.XX NAUT MI DEC ONLY +# RANGE RATE, XXXX.X FT/SEC # PHI XXX.X DEG -# 54 RANGE 3COMP XXX.XX NAUT MI DEC ONLY -# RANGE RATE XXXX.X FT/SEC +# 54 RANGE, 3COMP XXX.XX NAUT MI DEC ONLY +# RANGE RATE, XXXX.X FT/SEC # THETA XXX.XX DEG # 55 PERIGEE CODE 3COMP XXXXX. DEC ONLY # ELEVATION ANGLE XXX.XX DEG # CENTRAL ANGLE OF PASSIVE VEHICLE XXX.XX DEG -# 56 REENTRY ANGLE 2COMP XXX.XX DEG DEC ONLY +# 56 REENTRY ANGLE, 2COMP XXX.XX DEG DEC ONLY # DELTA V XXXXX. FT/SEC # 57 DELTA R 1COMP XXXX.X NAUT MI DEC ONLY # 58 PERIGEE ALT (POST TPI) 3COMP XXXX.X NAUT MI DEC ONLY # DELTA V TPI XXXX.X FT/SEC # DELTA V TPF XXXX.X FT/SEC -# 59 DELTA VELOCITY LOS 3COMP XXXX.X FT/SEC FOR EACH DEC ONLY -# 60 GMAX 3COMP XXX.XX G DEC ONLY +# 59 DELTA VELOCITY LOS 3COMP XXXX.X FT/SEC FOR EA. DEC ONLY +# 60 GMAX, 3COMP XXX.XX G DEC ONLY # Page 12 -# VPRED XXXXX. FT/SEC +# VPRED, XXXXX. FT/SEC # GAMMA EI XXX.XX DEG -# 61 IMPACT LATITUDE 3COMP XXX.XX DEG DEC ONLY -# IMPACT LONGITUDE XXX.XX DEG +# 61 IMPACT LATITUDE, 3COMP XXX.XX DEG DEC ONLY +# IMPACT LONGITUDE, XXX.XX DEG # HEADS UP/DOWN +/- 00001 -# 62 INERTIAL VEL MAG (VI) 3COMP XXXXX. FT/SEC DEC ONLY -# ALT RATE CHANGE (HDOT) XXXXX. FT/SEC +# 62 INERTIAL VEL MAG (VI), 3COMP XXXXX. FT/SEC DEC ONLY +# ALT RATE CHANGE (HDOT), XXXXX. FT/SEC # ALT ABOVE PAD RADIUS (H) XXXX.X NAUT MI -# 63 RANGE 297,431 TO SPLASH (RTGO) 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY -# PREDICTED INERT VEL (VIO) XXXXX. FT/SEC -# TIME FROM 297,431 (TFE) XXBXX MIN/SEC -# 64 DRAG ACCELERATION 3COMP XXX.XX G DEC ONLY -# INERTIAL VELOCITY (VI) XXXXX. FT/SEC +# 63 RANGE 297,431 TO SPLASH (RTGO), 3COMP XXXX.X NAUT MI NO LOAD, DEC ONLY +# PREDICTED INERT VEL (VIO), XXXXX. FT/SEC +# TIME FROM 297,431 (TFE), XXBXX MIN/SEC +# 64 DRAG ACCELERATION, 3COMP XXX.XX G DEC ONLY +# INERTIAL VELOCITY (VI), XXXXX. FT/SEC # RANGE TO SPLASH XXXX.X NAUT MI # 65 SAMPLED AGC TIME 3COMP 00XXX. HRS DEC ONLY -# (FETCHED IN INTERRUPT) 000XX. MIN +# (FETCHED IN INTERRUPT) 000XX. MIN MUST LOAD 3 COMPS # 0XX.XX SEC -# 66 COMMAND BANK ANGLE (BETA) 3COMP XXX.XX DEG DEC ONLY -# CROSS RANGE ERROR XXXX.X NAUT MI +# 66 COMMAND BANK ANGLE (BETA), 3COMP XXX.XX DEG DEC ONLY +# CROSS RANGE ERROR, XXXX.X NAUT MI # DOWN RANGE ERROR XXXX.X NAUT MI -# 67 RANGE TO TARGET 3COMP XXXX.X NAUT MI DEC ONLY -# PRESENT LATITUDE XXX.XX DEG +# 67 RANGE TO TARGET, 3COMP XXXX.X NAUT MI DEC ONLY +# PRESENT LATITUDE, XXX.XX DEG # PRESENT LONGITUDE XXX.XX DEG -# 68 COMMAND BANK ANGLE (BETA) 3COMP XXX.XX DEG DEC ONLY -# INERTIAL VELOCITY (VI) XXXXX. FT/SEC -# ALT RATE CHANGE (RDOT) XXXXX. FT/SEC -# 69 BETA 3COMP XXX.XX DEG -# DL XXX.XX G -# VL XXXXX. FT/SEC -# 70 STAR CODE 3COMP OCTAL ONLY -# LANDMARK DATA OCTAL ONLY +# 68 COMMAND BANK ANGLE (BETA), 3COMP XXX.XX DEG DEC ONLY +# INERTIAL VELOCITY (VI), XXXXX. FT/SEC +# ALT RATE CHANGE (RDOT) XXXXX. FT/SEC +# 69 BETA 3COMP XXX.XX DEG +# DL XXX.XX G +# VL XXXXX. FT/SEC +# 70 STAR CODE, 3COMP OCTAL ONLY +# LANDMARK DATA, OCTAL ONLY # HORIZON DATA OCTAL ONLY # 71 STAR CODE 3COMP OCTAL ONLY # LANDMARK DATA OCTAL ONLY @@ -456,18 +451,18 @@ # 84 DELTA V (OTHER VEHICLE) 3COMP XXXX.X FT/SEC FOR EACH DEC ONLY # 85 VG (BODY) 3COMP XXXX.X FT/SEC FOR EACH DEC ONLY # 86 DELTA V (LV) 3COMP XXXXX. FT/SEC FOR EACH DEC ONLY -# 87 MARK DATA SHAFT 2COMP XXX.XX DEG +# 87 MARK DATA SHAFT, 2COMP XXX.XX DEG # TRUNION XX.XXX DEG # 88 HALF UNIT SUN OR PLANET VECTOR 3COMP .XXXXX FOR EACH DEC ONLY -# 89 LANDMARK LATITUDE 3COMP XX.XXX DEG DEC ONLY -# LONGITUDE/2 XX.XXX DEG +# 89 LANDMARK LATITUDE, 3COMP XX.XXX DEG DEC ONLY +# LONGITUDE/2, XX.XXX DEG # ALTITUDE XXX.XX NAUT MI # 90 Y 3COMP XXX.XX NM DEC ONLY # Y DOT XXXX.X FPS # PSI XXX.XX DEG -# 91 OCDU ANGLES SHAFT 2COMP XXX.XX DEG +# 91 OCDU ANGLES SHAFT, 2COMP XXX.XX DEG # TRUNION XX.XXX DEG -# 92 NEW OPTICS ANGLES SHAFT 2COMP XXX.XX DEG +# 92 NEW OPTICS ANGLES SHAFT, 2COMP XXX.XX DEG # TRUNON XX.XXX DEG # 93 DELTA GYRO ANGLES 3COMP XX.XXX DEG FOR EACH # 94 NEW OPTICS ANGLES SHAFT 2COMP XXX.XX DEG @@ -478,18 +473,18 @@ # 98 SYSTEM TEST RESULTS AND INPUTS 3COMP XXXXX. # .XXXXX # XXXXX. -# 99 RMS IN POSITION 3COMP XXX.XX NAUT MI DEC ONLY +# 99 RMS IN POSITION 3COMP XXXXX.FT DEC ONLY # RMS IN VELOCITY XXXX.X FT/SEC # RMS OPTION XXXXX. # Page 14 -# REGISTERS AND SCALING FOR NORMAL NOUNS +# REGISTERS AND SCALING FOR NORMAL NOUNS # -# NOUN REGISTER SCALE TYPE +# NOUN REGISTER SCALE TYPE # # 00 NOT IN USE -# 01 SPECIFY ADDRESS H +# 01 SPECIFY ADDRESS B # 02 SPECIFY ADDRESS C # 03 SPECIFY ADDRESS D # 04 SPARE @@ -591,8 +586,8 @@ # 60 1 GMAX T # 2 VPRED P # 3 GAMMAEI H -# 61 1 LAT (SPL) H -# 2 LNG (SPL) H +# 61 1 LAT(SPL) H +# 2 LNG(SPL) H # 3 HEADSUP C # 62 1 VMAGI P # 2 HDOT P @@ -705,7 +700,7 @@ # NOUN SCALES AND FORMATS # -# -SCALE TYPE- PRECISION +# -SCALE TYPE- PRECISION # UNITS DECIMAL FORMAT -- AGC FORMAT # ------------ -------------- -- ---------- # @@ -723,7 +718,7 @@ # -D- 15 # CDU DEGREES XXX.XX DEGREES SP BIT 1 = 360/2 DEGREES # (MAX 359.99) (USES 15 BITS FOR MAGNI- -# TUDE AND 2'S COMP.) +# TUDE AND 2-S COMP.) # # -E- 14 # ELEVATION DEGREES XX.XXX DEGREES SP BIT 1 = 90/2 DEGREES @@ -734,23 +729,23 @@ # (MAX 179.99) # # -G- -# DP DEGREES (90) XX.XXX DEGREES DP BIT 1 OF LOW REGISTER = +# DP DEGREES(90) XX.XXX DEGREES DP BIT 1 OF LOW REGISTER = # 28 # 360/2 DEGREES # # -H- # DP DEGREES (360) XXX.XX DEGREES DP BIT 1 OF LOW REGISTER = -# (MAX 359.99) 28 -# 360/2 DEGREES +# 28 +# (MAX 359.99) 360/2 DEGREES # # -J- 15 # Y OPTICS DEGREES XX.XXX DEGREES SP BIT 1 = 90/2 DEGREES # (BIAS OF 19.775 (USES 15 BITS FOR MAGNI- -# DEGREES ADDED FOR TUDE AND S'S COMP.) +# DEGREES ADDED FOR TUDE AND 2-S COMP.) # DISPLAY, SUBTRACTED # FOR LOAD.) -# NOTE: NEGATIVE NUM- -# BERS CANNOT BE +# NOTE: NEGATIVE NUM- +# BERS CANNOT BE # LOADED. # # -K- @@ -761,11 +756,11 @@ # 000XX. MIN -2 # 0XX.XX SEC 10 SEC # (DECIMAL ONLY. -# MAX MIN COMP = 59 -# MAX SEC COMP = 59.99 -# MAX CAPACITY = 745 HRS -# 39 MINS -# 14.55 SECS. +# MAX MIN COMP=59 +# MAX SEC COMP=59.99 +# MAX CAPACITY=745 HRS +# 39 MINS +# 14.55 SECS. # WHEN LOADING, ALL 3 # COMPONENTS MUST BE # SUPPLIED.) @@ -774,11 +769,11 @@ # TIME (MIN/SEC) XXBXX MIN/SEC DP BIT 1 OF LOW REGISTER = # (B IS A BLANK -2 # POSITION, DECIMAL 10 SEC -# ONLY, DISPLAY OR -# MONITOR ONLY. CANNOT +# ONLY, DISPLAY OR +# MONITOR ONLY. CANNOT # BE LOADED. -# MAX MIN COMP = 59 -# MAX SEC COMP = 59 +# MAX MIN COMP=59 +# MAX SEC COMP=59 # VALUES GREATER THAN # 59 MIN 59 SEC # ARE DISPLAYED AS @@ -789,7 +784,7 @@ # (MAX 163.83) # # -N- -# TIME (SEC) DP XXX.XX SEC DP BIT 1 OF LOW REGISTER = +# TIME(SEC) DP XXX.XX SEC DP BIT 1 OF LOW REGISTER = # -2 # 10 SEC # @@ -800,7 +795,7 @@ # # -Q- # POSITION 4 XXXX.XX NAUTICAL MILES DP BIT 1 OF LOW REGISTER = -# 2 METERS. +# 2 METERS # # -S- # VELOCITY 3 XXXX.X FT/SEC DP BIT 1 OF HIGH REGISTER = @@ -836,27 +831,27 @@ # -LL- # POSITION6 XXXX.X NAUT MI DP BIT 1 OF LOW REG = # -28 -# (6,373,338)(2(PI))x2 +# (6,373,338)(2(PI))X2 # ----------------------- -# 1852 -# NAUT MI. +# 1852 +# NAUT. MI. # # -MM- # DRAG ACCELERATION XXX.XX G DP BIT 1 OF LOW REGISTER = # MAX (024.99) -28 -# 25x2 G +# 25X2 G # # -PP- # 2 INTEGERS +XXBYY DP BIT 1 OF HIGH REGISTER = -# (B IS A BLANK 1 UNIT OF XX +# (B IS A BLANK 1 UNIT OF XX # POSITION. DECIMAL BIT 1 OF LOW REGISTER = -# ONLY, DISPLAY, OR 1 UNIT OF YY -# MONITOR ONLY. CANNOT (EACH REGISTER MUST -# BE LOADED.) LESS THAN 100.) -# (MAX 99B99) +# ONLY, DISPLAY, OR 1 UNIT OF YY +# MONITOR ONLY. CANNOT (EACH REGISTER MUST +# BE LOADED.) CONTAIN A POSITIVE INTEGER +# (MAX 99B99) LESS THAN 100) # # -UU- -# VELOCITY/2VS XXXXX. FEET/SEC DP FRACTIONAL PART OF +# VELOCITY/2VS XXXXX. FEET/SEC DP FRACTIONAL PART OF # (MAX 51532.) 2VS FEET/SEC # (VS = 25766.1973) @@ -865,15 +860,15 @@ # -VV- # POSITION8 XXXX.X NAUT MI DP BIT 1 OF LOW REGISTER = # -28 -# 4 x 6,373,338 x 2 +# 4 X 6,373,338 X 2 # -------------------- -# 1852 +# 1852 # NAUT MI. # # -XX- -# POSITION 9 XXX.XX NAUT MI DP BIT 1 OF LOW REGISTER = -# (MAX 283.09) -9 -# 2 METERS. +# POSITION 9 XXXXX. FEET DP BIT 1 OF LOW REGISTER = +# -9 +# 2 METERS # # -YY- # VELOCITY 4 XXXX.X FEET/SEC DP FRACTIONAL PART OF @@ -884,114 +879,111 @@ # -14 # 2 UNITS - -# THAT'S ALL ON THE NOUNS. +# THAT-S ALL ON THE NOUNS. # Page 23 # ALARM CODES FOR 504 -# REPORT DEFICIENCIES TO JOHN SUTHERLAND: MIT 617-864-6900 X1458 +# REPORT DEFICIENCIES TO JOHN SUTHERLAND @ MIT 617-864-6900 X1458 -# *9 *18 *60 *25 COLUMN +# *9 *18 *60 *25 COLUMN # -# CODE * TYPE SET BY ALARM ROUTINE +# CODE * TYPE SET BY ALARM ROUTINE # -# 00110 NO MARK SINCE LAST MARK REJECT SXTMARK ALARM -# 00112 MARK NOT BEING ACCEPTED SXTMARK ALARM -# 00113 NO NBITS SXTMARK ALARM -# 00114 MARK MADE BUT NOT DESIRED SXTMARK ALARM -# 00115 OPTICS TORQUE REQUEST WITH SWITCH NOT AT EXT VERB OPTICS CDU ALARM -# CGC -# 00116 OPTICS SWITCH ALTERED BEFORE 15 SEC ZERO T4RUPT ALARM -# TIME ELAPSED. -# 00117 OPTICS TORQUE REQUEST WITH OPTICS NOT EXT VERB OPTICS CDU ALARM -# AVAILABLE (OPTIND=-0) -# 00120 OPTICS TORQUE REQUEST WITH OPTICS T4RUPT ALARM -# NOT ZEROED. -# 00121 CDUS NO GOOD AT TIME OF MARK SXTMARK ALARM -# 00122 MARKING NOT CALLED FOR SXTMARK ALARM -# 00124 P17 TPI SEARCH - NO SAFE PERICTR HERE. TPI SEARCH ALARM -# 00205 BAD PIPA READING SERVICER ALARM -# 00206 ZERO ENCODE NOT ALLOWED WITH COARSE ALIGN IMU MODE SWITCHING ALARM -# + GIMBAL LOCK. -# 00207 ISS TURNON REQUEST NOT PRESENT FOR 90 SEC T4RUPT ALARM -# 00210 IMU NOT OPERATING IMU MODE SWITCH, ALARM, VARALARM -# IMU-2, R02, P51 -# 00211 COARSE ALIGN ERROR - DRIVE > 2 DEGREES IMU MODE SWITCH ALARM -# 00212 PIPA FAIL BUT PIPA IS NOT BEING USED IMU MODE SWITCH, T4RUPT ALARM -# 00213 IMU NOT OPERATING WITH TURN-ON REQUEST T4RUPT ALARM -# 00214 PROGRAM USING IMU WHEN TURNED OFF T4RUPT ALARM -# 00215 PREFERRED ORIENTATION NOT SPECIFIED P52,P54 ALARM -# 00217 BAD RETURN FROM STALL ROUTINES CURTAINS ALARM2 -# 00220 IMU NOT ALIGNED - NO REFSMMAT R02,P51 VARALARM -# 00401 DESIRED GIMBAL ANGLES YIELD GIMBAL LOCK IMF ALIGN, IMU-2 ALARM -# 00404 TARGET OUT OF VIEW - TRUN ANGLE > 90 DEG R52 PRIOLARM -# 00405 TWO STARS NOT AVAILABLE P52,P54 ALARM -# 00406 REND NAVIGATION NOT OPERATING P21,R23 ALARM -# 00407 AUTO OPTICS REQUEST TRUN ANGLE > 50 DEG. R52 ALARM -# 00421 W-MATRIX OVERFLOW INTEGRV ALARM -# 00430 * INTEG. ABORT DUE TO SUBSURFACE S. V. ALL CALLS TO INTEG POODOO -# 00600 IMAGINARY ROOTS ON FIRST ITERATION P32, P72 VARALARM -# 00601 PERIGEE ALTITUDE LT PMIN1 P32,P72 VARALARM -# 00602 PERIGEE ALTITUDE LT PMIN2 P32,P72 VARALARM -# 00603 CSI TO CDH TIME LT PMIN22 P32,P72,P33,P73 VARALARM -# 00604 CDH TO TPI TIME LT PMIN23 P32,P72 VARALARM -# 00605 NUMBER OF ITERATIONS EXCEEDS LOOP MAXIMUM P32,P72,P37 VARALARM -# 00606 DV EXCEEDS MAXIMUM P32,P72 VARALARM -# 00607 * NO SOLN FROM TIME-THETA OR TIME-RADIUS TIMETHET,TIMERAD POODOO +# 00110 NO MARK SINCE LAST MARK REJECT SXTMARK ALARM +# 00112 MARK NOT BEING ACCEPTED SXTMARK ALARM +# 00113 NO INBITS SXTMARK ALARM +# 00114 MARK MADE BUT NOT DESIRED SXTMARK ALARM +# 00115 OPTICS TORQUE REQUESTWITH SWITCH NOT AT EXT VERB OPTICS CDU ALARM +# CGC +# 00116 OPTICS SWITCH ALTERED BEFORE 15 SEC ZERO T4RUPT ALARM +# TIME ELAPSED. +# 00117 OPTICS TORQUE REQUEST WITH OPTICS NOT EXT VERB OPTICS CDU ALARM +# AVAILABLE (OPTIND=-0) +# 00120 OPTICS TORQUE REQUEST WITH OPTICS T4RUPT ALARM +# NOT ZEROED +# 00121 CDUS NO GOOD AT TIME OF MARK SXTMARK ALARM +# 00122 MARKING NOT CALLED FOR SXTMARK ALARM +# 00124 P17 TPI SEARCH - NO SAFE PERICTR HERE. TPI SEARCH ALARM +# 00205 BAD PIPA READING SERVICER ALARM +# 00206 ZERO ENCODE NOT ALLOWED WITH COARSE ALIGN IMU MODE SWITCHING ALARM +# + GIMBAL LOCK +# 00207 ISS TURNON REQUEST NOT PRESENT FOR 90 SEC T4RUPT ALARM +# 00210 IMU NOT OPERATING IMU MODE SWITCH, IMU-2, R02, P51 ALARM,VARALARM +# 00211 COARSE ALIGN ERROR - DRIVE > 2 DEGREES IMU MODE SWITCH ALARM +# 00212 PIPA FAIL BUT PIPA IS NOT BEING USED IMU MODE SWITCH,T4RUPT ALARM +# 00213 IMU NOT OPERATING WITH TURN-ON REQUEST T4RUPT ALARM +# 00214 PROGRAM USING IMU WHEN TURNED OFF T4RUPT ALARM +# 00215 PREFERRED ORIENTATION NOT SPECIFIED P52,P54 ALARM +# 00217 BAD RETURN FROM STALL ROUTINES. CURTAINS ALARM2 +# 00220 IMU NOT ALIGNED - NO REFSMMAT R02,P51 VARALARM +# 00401 DESIRED GIMBAL ANGLES YIELD GIMBAL LOCK IMF ALIGN, IMU-2 ALARM +# 00404 TARGET OUT OF VIEW - TRUN ANGLE > 90 DEG R52 PRIOLARM +# 00405 TWO STARS NOT AVAILABLE P52,P54 ALARM +# 00406 REND NAVIGATION NOT OPERATING P21,R23 ALARM +# 00407 AUTO OPTICS REQUEST TRUN ANGLE > 50 DEG. R52 ALARM +# 00421 W-MATRIX OVERFLOW INTEGRV ALARM +# 00430 * INTEG. ABORT DUE TO SUBSURFACE S. V. ALL CALLS TO INTEG POODOO +# 00600 IMAGINARY ROOTS ON FIRST ITERATION P32, P72 VARALARM +# 00601 PERIGEE ALTITUDE LT PMIN1 P32,P72, VARALARM +# 00602 PERIGEE ALTITUDE LT PMIN2 P32,P72, VARALARM +# 00603 CSI TO CDH TIME LT PMIN22 P32,P72,P33,P73 VARALARM +# 00604 CDH TO TPI TIME LT PMIN23 P32,P72 VARALARM +# 00605 NUMBER OF ITERATIONS EXCEEDS LOOP MAXIMUM P32,P72,P37 VARALARM +# 00606 DV EXCEEDS MAXIMUM P32,P72 VARALARM +# 00607 * NO SOLN FROM TIME-THETA OR TIME-RADIUS TIMETHET,TIMERAD POODOO # Page 24 -# 00610 * LAMBDA LESS THAN UNITY P37 POODOO -# 00611 NO TIG FOR GIVEN ELEV ANGLE P34,P74 VARALARM -# 00612 STATE VECTOR IN WRONG SPHERE OF INFLUENCE P37 VARALARM -# 00613 REENTRY ANGLE OUT OF LIMITS P37 VARALARM -# 00777 PIPA FAIL CAUSED ISS WARNING. T4RUPT VARALARM -# 01102 CMC SELF TEST ERROR ALARM2 -# 01103 * UNUSED CCS BRANCH EXECUTED ABORT ALARM2 -# 01104 * DELAY ROUTINE BUSY EXEC BAILOUT -# 01105 DOWNLINK TOO FAST T4RUPT ALARM -# 01106 UPLINK TOO FAST T4RUPT ALARM -# 01107 PHASE TABLE FAILURE. ASSUME RESATRT ALARM +# 00610 * LAMBDA LESS THAN UNITY P37 POODOO +# 00611 NO TIG FOR GIVEN ELEV ANGLE P34,P74 VARALARM +# 00612 STATE VECTOR IN WRONG SPHERE OF INFLUENCE P37 VARALARM +# 00613 REENTRY ANGLE OUT OF LIMITS P37 VARALARM +# 00777 PIPA FAIL CAUSED ISS WARNING. T4RUPT VARALARM +# 01102 CMC SELF TEST ERROR ALARM2 +# 01103 * UNUSED CCS BRANCH EXECUTED ABORT ALARM2 +# 01104 * DELAY ROUTINE BUSY EXEC BAILOUT +# 01105 DOWNLINK TOO FAST T4RUPT ALARM +# 01106 UPLINK TOO FAST T4RUPT ALARM +# 01107 PHASE TABLE FAILURE. ASSUME RESATRT ALARM # ERASABLE MEMORY IS DESTROYED -# 01201 * EXECUTIVE OVERFLOW - NO VAC AREAS EXEC BAILOUT -# 01202 * EXECUTIVE OVERFLOW - NO CORE SETS EXEC BAILOUT -# 01203 * WAITLIST OVERFLOW - TOO MANY TASKS WAITLIST BAILOUT -# 01204 * NEGATIVE OR ZERO WAITLIST CALL WAITLIST POODOO -# 01206 * SECOND JOB ATTEMPTS TO GO TO SLEEP PINBALL P00DOO -# VIA KEYBOARD AND DISPLAY PROGRAM -# 01207 * NO VAC AREA FOR MARKS SXTMARK BAILOUT -# 01210 * TWO PROGRAMS USING DEVICE AT SAME TIME IMU MODE SWITCH P00DOO -# 01211 * ILLEGAL INTERRUPT OF EXTENDED VERB SXTMARK BAILOUT -# 01301 ARCSIN-ARCCOS ARGUMENT TOO LARGE INTERPRETER ALARM -# 01302 * SQRT CALLED WITH NEGATIVE ARGUMENT. ABORT. INTERPRETER P00DOO -# 01407 VG INCREASING S40.8 ALARM -# 01426 IMU UNSATISFACTORY P61,P62 ALARM -# 01427 IMU REVERSED P61,P62 ALARM -# 01501 * KEYBOARD AND DISPLAY ALARM DURING PINBALL P00DOO -# INTERNAL USE (NVSUB). ABORT. -# 01502 * ILLEGAL FLASHING DISPLAY GOPLAY P00DOO -# 01520 V37 REQUEST NOT PERMITTED AT THIS TIME V37 ALARM -# 01521 * P01 ILLEGALLY SELECTED P01, P07 POODOO -# 01600 OVERFLOW IN DRIFT TEST OPT PRE ALIGN CALIB ALARM -# 01601 * BAD IMU TORQUE - ABORT. OPT PRE ALIGN CALIB ALARM -# 01602 BAD OPTICS DURING VERIFICATION OPTALGN CALIB (CSM) ALARM -# 01703 INSUF. TIME FOR INTEG., TIG WAS SLIPPED R41 ALARM -# 03777 ICDU FAIL CAUSED THE ISS WARNING T4RUPT VARALARM -# 04777 ICDU, PIPA FAILS CAUSED THE ISS WARNING T4RUPT VARALARM -# 07777 IMU FAIL CAUSED THE ISS WARNING T4RUPT VARALARM -# 10777 IMU, PIPA FAILS CAUSED THE ISS WARNING T4RUPT VARALARM -# 13777 IMU, ICDU FAILS CAUSED THE ISS WARNING T4RUPT VARALARM -# 14777 IMU, ICDU, PIPA FAILS CAUSED THE ISS WARNING T4RUPT VARALARM -# -# * INDICATES ABORT TYPE. ALL OTHERS ARE NON-ABORTIVE +# 01201 * EXECUTIVE OVERFLOW-NO VAC AREAS EXEC BAILOUT +# 01202 * EXECUTIVE OVERFLOW-NO CORE SETS EXEC BAILOUT +# 01203 * WAITLIST OVERFLOW-TOO MANY TASKS WAITLIST BAILOUT +# 01204 * NEGATIVE OR ZERO WAITLIST CALL WAITLIST POODOO +# 01206 * SECOND JOB ATTEMPTS TO GO TO SLEEP PINBALL P00DOO +# VIA KEYBOARD AND DISPLAY PROGRAM +# 01207 * NO VAC AREA FOR MARKS SXTMARK BAILOUT +# 01210 * TWO PROGRAMS USING DEVICE AT SAME TIME IMU MODE SWITCH P00DOO +# 01211 * ILLEGAL INTERRUPT OF EXTENDED VERB SXTMARK BAILOUT +# 01301 ARCSIN-ARCCOS ARGUMENT TOO LARGE INTERPRETER ALARM +# 01302 * SQRT CALLED WITH NEGATIVE ARGUMENT.ABORT INTERPRETER P00DOO +# 01407 VG INCREASING S40.8 ALARM +# 01426 IMU UNSATISFACTORY P61, P62 ALARM +# 01427 IMU REVERSED P61, P62 ALARM +# 01501 * KEYBOARD AND DISPLAY ALARM DURING PINBALL P00DOO +# INTERNAL USE (NVSUB). ABORT. +# 01502 * ILLEGAL FLASHING DISPLAY GOPLAY P00DOO +# 01520 V37 REQUEST NOT PERMITTED AT THIS TIME V37 ALARM +# 01521 * P01 ILLEGALLY SELECTED P01, P07 POODOO +# 01600 OVERFLOW IN DRIFT TEST OPT PRE ALIGN CALIB ALARM +# 01601 BAD IMU TORQUE OPT PRE ALIGN CALIB ALARM +# 01602 BAD OPTICS DURING VERIFICATION OPTALGN CALIB (CSM) ALARM +# 01703 INSUF. TIME FOR INTEG., TIG WAS SLIPPED R41 ALARM +# 03777 ICDU FAIL CAUSED THE ISS WARNING T4RUPT VARALARM +# 04777 ICDU , PIPA FAILS CAUSED THE ISS WARNING T4RUPT VARALARM +# 07777 IMU FAIL CAUSED THE ISS WARNING T4RUPT VARALARM +# 10777 IMU , PIPA FAILS CAUSED THE ISS WARNING T4RUPT VARALARM +# 13777 IMU , ICDU FAILS CAUSED THE ISS WARNING T4RUPT VARALARM +# 14777 IMU,ICDU,PIPA FAILS CAUSED THE ISSWNING T4RUPT VARALARM +# * INDICATES ABORT TYPE.ALL OTHERS ARE NON-ABORTIVE # Page 25 -# CHECKLIST CODES FOR 504 +# CHECKLIST CODES FOR 504 -# PLEASE REPORT ANY DEFICIENCIES IN THIS LIST TO JOHN SUTHERLAND. +# PLEASE REPORT ANY DEFICIENCIES IN THIS LIST TO JOHN SUTHERLAND # *9 *17 *26 COLUMN # @@ -1006,24 +998,23 @@ # 00203 SWITCH TO CMC-AUTO # 00204 PERFORM SPS GIMBAL TRIM # 00403 SWITCH OPTICS TO MANUAL OR ZERO -# -# SWITCH DENOTES CHANGE OF POSITION OF A CONSOLE SWITCH -# PERFORM DENOTES START OF END OF A TASK -# KEY IN DENOTES KEY IN OF DATA THRU THE DSKY +# SWITCH DENOTES CHANGE POSITION OF A CONSOLE SWITCH +# PERFORM DENOTES START OF END OF A TASK +# KEY IN DENOTES KEY IN OF DATA THRU THE DSKY # Page 26 -# OPTION CODES FOR 504 +# OPTION CODES FOR 504 -# PLEASE REPORT ANY DEFICIENCIES IN THIS LIST TO JOHN SUTHERLAND. +# PLEASE REPORT ANY DEFICIENCIES IN THIS LIST TO JOHN SUTHERLAND -# THE SPECIFIED OPTION CODES WILL BE FLASHED IN COMPONENT R1 IN +# THE SPECIFIED OPTION CODES WILL BE FLASHED IN COMPONENT R1 IN # CONJUNCTION WITH VERB04NOUN06 TO REQUEST THE ASTRONAUT TO LOAD INTO # COMPONENT R2 THE OPTION HE DESIRES. # *9 *17 #52 #11 #25 COLUMNN # -# OPTION +# OPTION # CODE PURPOSE INPUT FOR COMPONENT 2 PROGRAM(S) APPLICABILITY # # 00001 SPECIFY IMU ORIENTATION 1=PREF 2=NOM 3=REFSMMAT P50'S ALL @@ -1033,9 +1024,8 @@ # 00005 SPECIFY SOR PHASE 1=FIRST 2=SECOND P38 COLOSSUS + LUMINARY # 00006 SPECIFY RR COARSE ALIGN OPTION 1=LOCKON 2=CONTINUOUS DESIG. V41N72 SUNDANCE + LUMINARY # 00007 SPECIFY PROPULSION SYSTEM 1=SPS 2=RCS P37 COLOSSUS -# 00010 SPECIFY ALIGNEMENT MODE 0=ANY TIME 1=REFSMMAT + G P57 LUMINARY +# 00010 SPECIFY ALIGNMENT MODE 0=ANY TIME 1=REFSMMAT +G P57 LUMINARY # 2=TWO BODIES 3=ONE BODY + G # 00011 SPEC. SEPARATION MONITOR PHASE 1=DELTAV 2=STATE VECTOR UPDATE P46 LUMINARY # 00012 SPECIFY CSM ORBIT OPTION 1=NO ORBIT CHANGE 2=CHANGE P22 LUMINARY # ORBIT TO PASS OVER LM -