GAP: ASSEMBLE REVISION 069 OF AGC PROGRAM LUMINARY BY NASA 2021112-011 19:02 NOV. 25,1968Note that the date is the date of the printout, not the date of the program revision.
Source Code
|
|
These source-code files were transcribed from scans made from Don Eyles's personal
copy of Luminary 069. They were scanned at archive.org's Boston
facility, and the scanning was sponsored by Onno Hommes. The code was transcribed
from these scans by a team of volunteers who are referenced in the program
comments. Comments from the original source code are prefixed with a single '#' symbol,
whereas comments added later are prefixed by "##" or "###". In some cases, where
similar code blocks exist in previously-transcribed AGC programs (primarily
Luminary 99, from Apollo 11) those code blocks were used as a starting point and
then corrected to agree with the Luminary 69 scans. The full scans are available
at the Virtual AGC
project's collection at archive.org, while more-convenient reduced-size (but reduced-quality)
images are available at
the main Virtual AGC website. Report any errors noted by creating an
issue report at the Virtual AGC
project's GitHub repository. Notations on the program listing read, in part:GAP: ASSEMBLE REVISION 069 OF AGC PROGRAM LUMINARY BY NASA 2021112-011 19:02 NOV. 25,1968Note that the date is the date of the printout, not the date of the program revision. |
003151,000002: ## Copyright: Public domain.
003152,000003: ## Filename: FLAGWORD_ASSIGNMENTS.agc
003153,000004: ## Purpose: The main source file for Luminary revision 069.
003154,000005: ## It is part of the source code for the original release
003155,000006: ## of the flight software for the Lunar Module's (LM) Apollo
003156,000007: ## Guidance Computer (AGC) for Apollo 10. The actual flown
003157,000008: ## version was Luminary 69 revision 2, which included a
003158,000009: ## newer lunar gravity model and only affected module 2.
003159,000010: ## This file is intended to be a faithful transcription, except
003160,000011: ## that the code format has been changed to conform to the
003161,000012: ## requirements of the yaYUL assembler rather than the
003162,000013: ## original YUL assembler.
003163,000014: ## Reference: pp. 77-104
003164,000015: ## Assembler: yaYUL
003165,000016: ## Contact: Ron Burkey <info@sandroid.org>.
003166,000017: ## Website: www.ibiblio.org/apollo/index.html
003167,000018: ## Mod history: 2016-12-13 MAS Created from Luminary 99.
003168,000019: ## 2016-01-03 HG Transcribed
003169,000020: ## 2017-01-21 HG Fix label CHIPFLAG -> CPHIFLAG
003170,000021: ## 2017-01-25 RSB Proofed comment text using octopus/prooferComments
003171,000022: ## and fixed errors found.
003172,000023: ## 2017-03-15 RSB Comment-text fixes identified in 5-way
003173,000024: ## side-by-side diff of Luminary 69/99/116/131/210.
003174,000025: ## 2017-08-14 MAS Fixed a typo found while transcribing Zerlina 56.
003175,000026: ## 2021-05-30 ABS Removed erroneous "-3" line.
003176,000027:
|
|
Page 77 |
003178,000029: # FLAGWORDS 0-11 ARE DOWNLINKED AND CAN BE SET AND CLEARED BY UP-FLAG AND DOWN-FLAG INSTRUCTIONS IN THE
003179,000030: # INTERPRETER. THESE WERE PREVIOUSLY LISTED UNDER "INTERPRETIVE SWITCH BIT ASSIGNMENTS" IN
003180,000031: # THE ERASABLE LOG SECTION. FLAGWORDS 12 & 13 WEREPREVIOUSLY RADMODES AND DAPBOOLS AND
003181,000032: # ARE STILL DOWNLINKED UNDER THOSE NAMES.
003182,000033:
003183,000034:
003184,000035:
003185,000036: # ALPHABETICAL LIST OF FLAGWORDS
003186,000037:
003187,000038:
003188,000039: # FLAGWORD DEC. NUMBER BIT AND FLAG BIT NAME
003189,000040:
003190,000041: # ACCOKFLG 207 BIT 3 FLAG 13 ACCSOKAY
003191,000042: # ACC4-2FL 199 BIT 11 FLAG 13 ACC4OR2X
003192,000043: # ACMODFLG 032 BIT 13 FLAG 2 ACMODBIT
003193,000044: # ALTSCALE 186 BIT 9 FLAG 12 ALTSCBIT
003194,000045: # ANTENFLG 183 BIT 12 FLAG 12 ANTENBIT
003195,000046: # AORBSFLG 205 BIT 5 FLAG 13 AORBSYST
003196,000047: # AORBTFLG 200 BIT 10 FLAG 13 AORBTRAN
003197,000048: # APSESW 130 BIT 5 FLAG 8 APSESBIT
003198,000049: # APSFLAG 152 BIT 13 FLAG 10 APSFLBIT
003199,000050: # ASTNFLAG 108 BIT 12 FLAG 7 ASTNBIT
003200,000051: # ATTFLAG 104 BIT 1 FLAG 6 ATTFLBIT
003201,000052: # AUTOMODE 193 BIT 2 FLAG 12 AUTOMBIT
003202,000053: # AUTR1FLG 209 BIT 1 FLAG 13 AUTRATE1
003203,000054: # AUTR2FLG 208 BIT 2 FLAG 13 AUTRATE2
003204,000055: # AUXFLAG 103 BIT 2 FLAG 6 AUXFLBIT
003205,000056: # AVEGFLAG 115 BIT 5 FLAG 7 AVEGFBIT
003206,000057: # AVEMIDSW 149 BIT 1 FLAG 9 AVEMDBIT
003207,000058: # AVFLAG 040 BIT 5 FLAG 2 AVFLBIT
003208,000059: # CALCMAN2 043 BIT 2 FLAG 2 CALC2BIT
003209,000060: # CALCMAN3 042 BIT 3 FLAG 2 CALC3BIT
003210,000061: # CDESFLAG 180 BIT 15 FLAG 12 CDESBIT
003211,000062: # CMOONFLG 123 BIT 12 FLAG 8 CMOONBIT
003212,000063: # COGAFLAG 131 BIT 4 FLAG 8 COGAFBIT
003213,000064: # COMPUTER 082 BIT 8 FLAG 5 COMPTBIT
003214,000065: # CPHIFLAG 000 BIT 15 FLAG 0 CPHIBIT
003215,000066: # CSMDKFLG 197 BIT 13 FLAG 13 CSMDOCKD
003216,000067: # CULTFLAG 053 BIT 7 FLAG 3 CULTBIT
003217,000068: # CYCLESW 035 BIT 10 FLAG 2 CYCLEBIT
003218,000069: # DAPBOOLS FLGWRD13
003219,000070: # DBSELFLG 206 BIT 4 FLAG 13 DBSELECT
003220,000071: # DESIGFLG 185 BIT 10 FLAG 12 DESIGBIT
003221,000072: # DIDFLAG 016 BIT 14 FLAG DIDFLBIT
003222,000073: # DIMOFLAG 059 BIT 1 FLAG 3 DIMOBIT
003223,000074: # DMENFLG 081 BIT 9 FLAG 5 DMENFBIT
003224,000075:
|
|
Page 78 |
003226,000077: # DRIFTDFL 202 BIT 8 FLAG 13 DRIFTBIT
003227,000078: # DRIFTFLG 030 BIT 15 FLAG 2 DRFTBIT
003228,000079: # DSKYFLAG 075 BIT 15 FLAG 5 DSKYFBIT
003229,000080: # D6OR9FLG 058 BIT 2 FLAG 3 D6OR9BIT
003230,000081: # ENGONFLG 083 BIT 7 FLAG 5 ENGONBIT
003231,000082: # ERADFLAG 017 BIT 13 FLAG 1 ERADFBIT
003232,000083: # ETPIFLAG 038 BIT 7 FLAG 2 ETPIBIT EQUIVALENT FLAG NAME: OPTNSW
003233,000084: # FINALFLG 039 BIT 6 FLAG 2 FINALBIT
003234,000085: # FIRSTFLG 094 BIT 11 FLAG 6 FIRSTBIT
003235,000086: # FLAGWRD0 (000-014) (STATE +0)
003236,000087: # FLAGWRD1 (015-029) (STATE +1)
003237,000088: # FLAGWRD2 (030-044) (STATE +2)
003238,000089: # FLAGWRD3 (045-059) (STATE +3)
003239,000090: # FLAGWRD4 (060-074) (STATE +4)
003240,000091: # FLAGWRD5 (075-089) (STATE +5)
003241,000092: # FLAGWRD6 (090-104) (STATE +6)
003242,000093: # FLAGWRD7 (105-119) (STATE +7)
003243,000094: # FLAGWRD8 (120-134) (STATE +8D)
003244,000095: # FLAGWRD9 (135-149) (STATE +9D)
003245,000096: # FLAP 142 BIT 8 FLAG 9 FLAPBIT
003246,000097: # FLGWRD10 (150-164) (STATE +10D)
003247,000098: # FLGWRD11 (165-179) (STATE +11D)
003248,000099: # FLGWRD12 (180-194) (STATE +12D)
003249,000100: # FLGWRD13 (195-209) (STATE +13D)
003250,000101: # FLPC 138 BIT 12 FLAG 9 FLPCBIT
003251,000102: # FLPI 139 BIT 11 FLAG 9 FLPIBIT
003252,000103: # FLRCS 149 BIT 10 FLAG 9 FLRCSBIT
003253,000104: # FLUNDISP 125 BIT 10 FLAG 8 FLUNDBIT
003254,000105: # FLVR 136 BIT 14 FLAG 9 FLVRBIT
003255,000106: # FLZONE0 144 BIT 6 FLAG 9 FLZONBIT
003256,000107: # FREEFLAG 012 BIT 3 FLAG 0 FREEFBIT
003257,000108: # GLOKFAIL 046 BIT 14 FLAG 3 GLOKFBIT
003258,000109: # GMBDRVSW 095 BIT 10 FLAG 6 GMBDRBIT
003259,000110: # GUESSW 028 BIT 2 FLAG 1 GUESSBIT
003260,000111: # HFLSHFLG 179 BIT 1 FLAG 11 HFLSHBIT
003261,000112: # IDLEFLAG 113 BIT 7 FLAG 7 IDLEFBIT
003262,000113: # IGNFLAG 107 BIT 13 FLAG 7 IGNFLBIT
003263,000114: # IMPULSW 036 BIT 9 FLAG 2 IMPULBIT
003264,000115: # IMUSE 007 BIT 8 FLAG 0 IMUSEBIT
003265,000116: # INFINFLG 128 BIT 7 FLAG 8 INFINBIT
003266,000117: # INITALGN 133 BIT 2 FLAG 8 INITABIT
003267,000118: # INTFLAG 151 BIT 14 FLAG 10 INTFLBIT
003268,000119: # INTYPFLG 056 BIT 4 FLAG 3 INTYPBIT
003269,000120: # ITSWICH 105 BIT 15 FLAG 7 ITSWBIT
003270,000121: # JSWITCH 001 BIT 14 FLAG 0 JSWCHBIT
003271,000122: # LETABORT 141 BIT 9 FLAG 9 LETABBIT
003272,000123: # LMOONFLG 124 BIT 11 FLAG 8 LMOONBIT
003273,000124: # LOKONSW 010 BIT 5 FLAG 0 LOKONBIT
003274,000125: # LOSCMFLG 033 BIT 12 FLAG 2 LOSCMBIT
003275,000126: # LRALTFLG 190 BIT 5 FLAG 12 LRALTBIT
003276,000127:
|
|
Page 79 |
003278,000129: # LRBYPASS 165 BIT 15 FLAG 11 LRBYBIT
003279,000130: # LRINH 172 BIT 8 FLAG 11 LRINHBIT
003280,000131: # LRPOSFLG 189 BIT 6 FLAG 12 LRPOSBIT
003281,000132: # LRVELFLG 187 BIT 8 FLAG 12 LRVELBIT
003282,000133: # LUNAFLAG 048 BIT 12 FLAG 3 LUNABIT
003283,000134: # MANUFLAG 106 BIT 14 FLAG 7 MANUFBIT
003284,000135: # MGLVFLAG 088 BIT 2 FLAG 5 MGLVFBIT
003285,000136: # MIDAVFLG 148 BIT 2 FLAG 9 MIDAVBIT
003286,000137: # MIDFLAG 002 BIT 13 FLAG 0 MIDFLBIT
003287,000138: # MID1FLAG 147 BIT 3 FLAG 9 MID1BIT
003288,000139: # MKOVFLAG 072 BIT 3 FLAG 4 MKOVBIT
003289,000140: # MOONFLAG 003 BIT 12 FLAG 0 MOONBIT
003290,000141: # MRKIDFLG 060 BIT 15 FLAG 4 MRKIDBIT
003291,000142: # MRKNVFLG 066 BIT 9 FLAG 4 MRKNVBIT
003292,000143: # MRUPTFLG 070 BIT 5 FLAG 4 MRUPTBIT
003293,000144: # MUNFLAG 097 BIT 8 FLAG 6 MUNFLBIT
003294,000145: # MWAITFLG 064 BIT 11 FLAG 4 MWAITBIT
003295,000146: # NEEDLFLG 011 BIT 4 FLAG 0 NEEDLBIT
003296,000147: # NEWIFLG 122 BIT 13 FLAG 8 NEWIBIT
003297,000148: # NJETSFLG 015 BIT 15 FLAG NJETSBIT
003298,000149: # NODOFLAG 044 BIT 1 FLAG 2 NODOBIT
003299,000150: # NOLRREAD 170 BIT 10 FLAG 11 NOLRRBIT
003300,000151: # NORMSW 110 BIT 10 FLAG 7 NORMSBIT
003301,000152: # NORRMON 086 BIT 4 FLAG 5 NORRMBIT
003302,000153: # NOR29FLG 049 BIT 11 FLAG 3 NR29FBIT
003303,000154: # NOTHROTL 078 BIT 12 FLAG 5 NOTHRBIT
003304,000155: # NOUPFLAG 024 BIT 6 FLAG 1 NOUPFBIT
003305,000156: # NRMNVFLG 067 BIT 8 FLAG 4 NRMNVBIT
003306,000157: # NRMIDFLG 062 BIT 13 FLAG 4 NRMIDBIT
003307,000158: # NRUPTFLG 071 BIT 4 FLAG 4 NRUPTBIT
003308,000159: # NTARGFLG 102 BIT 3 FLAG 6 NTARGBIT
003309,000160: # NWAITFLG 065 BIT 10 FLAG 4 NWAITBIT
003310,000161: # OLDESFLG 014 BIT 1 FLAG 0 OLDESBIT
003311,000162: # OPTNSW 038 BIT 7 FLAG 2 OPTNBIT EQUIVALENT FLAG NAME: ETPIFLAG
003312,000163: # ORBWFLAG 054 BIT 6 FLAG 3 ORBWFBIT
003313,000164: # ORDERSW 129 BIT 6 FLAG 8 ORDERBIT
003314,000165: # OURRCFLG 198 BIT 12 FLAG 13 OURRCBIT
003315,000166: # PDSPFLAG 063 BIT 12 FLAG 4 PDSPFBIT
003316,000167: # PFRATFLG 041 BIT 4 FLAG 2 PFRATBIT
003317,000168: # PINBRFLG 069 BIT 6 FLAG 4 PINBRBIT
003318,000169: # POUTFLAG 098 BIT 7 FLAG 6 POUTBIT
003319,000170: # PRECIFLG 052 BIT 8 FLAG 3 PRECIBIT
003320,000171: # PRIODFLG 061 BIT 14 FLAG 1 PRIODBIT
003321,000172: # PRONVFLG 068 BIT 7 FLAG 4 PRONVBIT
003322,000173: # PSTHIGAT 169 BIT 11 FLAG 11 PSTHIBIT
003323,000174: # PULSEFLG 195 BIT 15 FLAG 13 PULSES
003324,000175: # P25FLAG 006 BIT 9 FLAG 0 P25FLBIT
003325,000176: # P39/79SW 126 BIT 9 FLAG 8 P39SWBIT
003326,000177: # QUITFLAG 145 BIT 5 FLAG 9 QUITBIT
003327,000178: # RADMODES FLGWRD12
003328,000179:
|
|
Page 80 |
003330,000181: # RASFLAG FLGWRD10
003331,000182: # RCDUFAIL 188 BIT 7 FLAG 12 RCDUFBIT
003332,000183: # RCDU0FLG 182 BIT 13 FLAG 12 RCDU0BIT
003333,000184: # READLR 174 BIT 6 FLAG 11 READLBIT
003334,000185: # READRFLG 051 BIT 9 FLAG 3 READRBIT EQUIVALENT FLAG NAME: R04FLAG
003335,000186: # READVEL 175 BIT 5 FLAG 11 READVBIT
003336,000187: # REDFLAG 099 BIT 6 FLAG 6 REDFLBIT
003337,000188: # REFSMFLG 047 BIT 13 FLAG 3 REFSMBIT
003338,000189: # REINTFLG 158 BIT 7 FLAG 10 REINTBIT
003339,000190: # REMODFLG 181 BIT 14 FLAG 12 REMODBIT
003340,000191: # RENDWFLG 089 BIT 1 FLAG 5 RENDWBIT
003341,000192: # REPOSMON 184 BIT 11 FLAG 12 REPOSBIT
003342,000193: # RHCSCFLG 203 BIT 7 FLAG 13 RHCSCALE
003343,000194: # RNDVZFLG 008 BIT 7 FLAG 0 RNDVZBIT
003344,000195: # RNGEDATA 176 BIT 4 FLAG 11 RNGEDBIT
003345,000196: # RNGSCFLG 080 BIT 10 FLAG 5 RNGSCBIT
003346,000197: # RPQFLAG 120 BIT 15 FLAG 8 RPQFLBIT
003347,000198: # RRDATAFL 191 BIT 4 FLAG 12 RRDATABT
003348,000199: # RRNBSW 009 BIT 6 FLAG 0 RRNBBIT
003349,000200: # RRRSFLAG 192 BIT 3 FLAG 12 RRRSBIT
003350,000201: # RVSW 111 BIT 9 FLAG 7 RVSWBIT
003351,000202: # R04FLAG 051 BIT 9 FLAG 3 R04FLBIT EQUIVALENT FLAG NAME: READRFLG
003352,000203: # R10FLAG 013 BIT 2 FLAG 0 R10FLBIT
003353,000204: # R61FLAG 020 BIT 10 FLAG 1 R61FLBIT
003354,000205: # R77FLAG 079 BIT 11 FLAG 5 R77FLBIT
003355,000206: # SCALBAD 177 BIT 3 FLAG 11 SCABBIT
003356,000207: # SLOPESW 027 BIT 3 FLAG 1 SLOPEBIT
003357,000208: # SNUFFER 077 BIT 13 FLAG 5 SNUFFBIT
003358,000209: # SOLNSW 087 BIT 3 FLAG 5 SOLNSBIT
003359,000210: # SRCHOPTN 031 BIT 14 FLAG 2 SRCHOBIT
003360,000211: # STATEFLG 055 BIT 5 FLAG 3 STATEBIT
003361,000212: # STEERSW 034 BIT 11 FLAG 2 STEERBIT
003362,000213: # SURFFLAG 127 BIT 8 FLAG 8 SURFFBIT
003363,000214: # SWANDISP 109 BIT 11 FLAG 7 SWANDBIT
003364,000215: # S32.1F1 090 BIT 15 FLAG 6 S32BIT1
003365,000216: # S32.1F2 092 BIT 14 FLAG 6 S32BIT2
003366,000217: # S32.1F3A 092 BIT 13 FLAG 6 S32BIT3A
003367,000218: # S32.1S3B 093 BIT 12 FLAG 6 S32BIT3B
003368,000219: # TFFSW 119 BIT 1 FLAG 7 TFFSWBIT
003369,000220: # TRACKFLG 025 BIT 5 FLAG 1 TRACKBIT
003370,000221: # TURNONFL 194 BIT 1 FLAG 12 TURNONBT
003371,000222: # ULLAGFLG 204 BIT 6 FLAG 13 ULLAGER
003372,000223: # UPDATFLG 023 BIT 7 FLAG 1 UPDATBIT
003373,000224: # UPLOCKFL 116 BIT 4 FLAG 7 UPLOCBIT
003374,000225: # USEQRFLG 196 BIT 14 FLAG 13 USEQRJTS
003375,000226: # VEHUPFLG 022 BIT 8 FLAG 1 VEHUPBIT
003376,000227: # VELDATA 173 BIT 7 FLAG 11 VELDABIT
003377,000228: # VERIFLAG 117 BIT 3 FLAG 7 VERIFBIT
003378,000229: # VFLAG 050 BIT 10 FLAG 3 VFLAGBIT
003379,000230: # VFLSHFLG 178 BIT 2 FLAG 11 VFLSHBIT
003380,000231:
|
|
Page 81 |
003382,000233: # VINTFLAG 057 BIT 3 FLAG 3 VINTFBIT
003383,000234: # VXINH 168 BIT 12 FLAG 11 VXINHBIT
003384,000235: # V37FLAG 114 BIT 6 FLAG 7 V37FLBIT
003385,000236: # V67FLAG 112 BIT 8 FLAG 7 V67FLBIT
003386,000237: # V82EMFLG 118 BIT 2 FLAG 7 V82EMBIT
003387,000238: # XDELVFLG 037 BIT 8 FLAG 2 XDELVBIT
003388,000239: # XDSPFLAG 074 BIT 1 FLAG 4 XDSPBIT
003389,000240: # XORFLG 171 BIT 9 FLAG 11 XORFLBIT
003390,000241: # XOVINFLG 201 BIT 9 FLAG 13 XOVINHIB
003391,000242: # 2PHASFLG 096 BIT 9 FLAG 6 2PHASBIT
003392,000243: # 3AXISFLG 084 BIT 6 FLAG 5 3AXISBIT
003393,000244: # 360SW 134 BIT 1 FLAG 8 360SWBIT
003394,000245:
003395,000246:
003396,000247:
003397,000248: # ASSIGNMENT AND DESCRIPTION OF FLAGWORDS
003398,000249:
003399,000250: 24,2022 0074 FLAGWRD0 = STATE +0 # (000-014)
003400,000251:
003401,000252: # (SET) (RESET)
003402,000253:
003403,000254: # BIT 15 FLAG 0 (S)
003404,000255: 24,2022 CPHIFLAG = 000D # OUTPUT OF CALCGA IS OUTPUT OF CALCGA IS
003405,000256: 24,2022 4735 CPHIBIT = BIT15 # CPHIX THETAD
003406,000257:
003407,000258:
003408,000259: # BIT 14 FLAG 0 (S)
003409,000260: 24,2022 JSWITCH = 001D # INTEGRATION OF W INTEGRATION OF STATE
003410,000261: 24,2022 4736 JSWCHBIT = BIT14 # MATRIX VECTOR
003411,000262:
003412,000263:
003413,000264: # BIT 13 FLAG 0 (S)
003414,000265: 24,2022 MIDFLAG = 002D # INTEGRATION WITH INTEGRATION WITHOUT
003415,000266: # SECONDARY BODY AND SOLAR PERTURBATIONS
003416,000267: 24,2022 4737 MIDFLBIT = BIT13 # SOLAR PERTURBATIONS
003417,000268:
003418,000269: # BIT 12 FLAG 0 (L)
003419,000270: 24,2022 MOONFLAG = 003D # MOON IS SPHERE OF EARTH IS SPHERE OF
003420,000271: 24,2022 4740 MOONBIT = BIT12 # INFLUENCE INFLUENCE
003421,000272:
003422,000273: # BIT 11 FLAG 0
003423,000274: # = 004D
003424,000275: # = BIT11
003425,000276:
003426,000277:
003427,000278: # BIT 10 FLAG 0
003428,000279: # = 005D
003429,000280:
|
|
Page 82 |
003431,000282: # = BIT10
003432,000283:
003433,000284:
003434,000285: # BIT 9 FLAG 0 (S)
003435,000286: 24,2022 P25FLAG = 006D # P25 OPERATING P25 NOT OPERATING
003436,000287: 24,2022 4743 P25FLBIT = BIT9
003437,000288:
003438,000289:
003439,000290: # BIT 8 FLAG 0 (S)
003440,000291: 24,2022 IMUSE = 007D # IMU IN USE IMU NOT IN USE
003441,000292: 24,2022 4744 IMUSEBIT = BIT8
003442,000293:
003443,000294:
003444,000295: # BIT 7 FLAG 0 (S)
003445,000296: 24,2022 RNDVZFLG = 008D # P20 RUNNING (RADAR P20 NOT RUNNING
003446,000297: 24,2022 4745 RNDVZBIT = BIT7 # IN USE)
003447,000298:
003448,000299:
003449,000300: # BIT 6 FLAG 0 (S)
003450,000301: 24,2022 RRNBSW = 009D # RADAR TARGET IN RADAR TARGET IN
003451,000302: 24,2022 4746 RRNBBIT = BIT6 # NB COORDINATES SM COORDINATES
003452,000303:
003453,000304:
003454,000305: # BIT 5 FLAG 0 (S)
003455,000306: 24,2022 LOKONSW = 010D # RADAR LOCK-ON RADAR LOCK-ON NOT
003456,000307: 24,2022 4747 LOKONBIT = BIT5 # DESIRED DESIRED
003457,000308:
003458,000309:
003459,000310: # BIT 4 FLAG 0 (S)
003460,000311: 24,2022 NEEDLFLG = 011D # TOTAL ATTITUDE A/P FOLLOWING
003461,000312: 24,2022 4750 NEEDLBIT = BIT4 # ERROR DISPLAYED ERROR DISPLAYED
003462,000313:
003463,000314:
003464,000315: # BIT 3 FLAG 0
003465,000316: 24,2022 FREEFLAG = 012D # (USED BY P51-53 TEMP IN MANY DIFFERENT
003466,000317: # ROUTINES & BY LUNAR + SOLAR EPHEMERIDES)
003467,000318: 24,2022 4751 FREEFBIT = BIT3
003468,000319:
003469,000320:
003470,000321: # BIT 2 FLAG 0
003471,000322: 24,2022 R10FLAG = 013D # R10 OUTPUTS DATA TO BESIDES OUTPUT WHEN
003472,000323: 24,2022 4752 R10FLBIT = BIT2 # ALTITUDE & ALTITUDE SET, R10 ALSO OUTPUT
003473,000324: # RATE METERS ONLY TO FORWARD & LATERAL
003474,000325: # VELOCITY CROSSPOINTR
003475,000326:
003476,000327:
003477,000328: # BIT 1 FLAG 0 (L)
003478,000329: 24,2022 OLDESFLG = 014D # R29 GYRO CMD LOOP R29 GYRO CMD LOOP
003479,000330: 24,2022 4753 OLDESBIT = BIT1 # REQUESTED NOT REQUESTED
003480,000331:
|
|
Page 83 |
003482,000333:
003483,000334: 24,2022 0075 FLAGWRD1 = STATE +1 # (015-029)
003484,000335:
003485,000336: # (SET) (RESET)
003486,000337:
003487,000338: # BIT 15 FLAG 1 (S)
003488,000339: 24,2022 NJETSFLG = 015D # TWO JET RCS BURN FOUR JET RCS BURN
003489,000340: 24,2022 4735 NJETSBIT = BIT15
003490,000341:
003491,000342:
003492,000343: # BIT 14 FLAG 1 (L)
003493,000344: 24,2022 DIDFLAG = 016D # INERTIAL DATA IS PERFORM DATA DISPLAY
003494,000345: 24,2022 4736 DIDFLBIT = BIT14 # AVAILABLE INITIALIZATION FUNCS
003495,000346:
003496,000347:
003497,000348: # BIT 13 FLAG 1 (S)
003498,000349: 24,2022 ERADFLAG = 017D # COMPUTE REARTH USE CONSTANT REARTH
003499,000350: 24,2022 4737 ERADFBIT = BIT13 # FISCHER ELLIPSOID PAD RADIUS
003500,000351:
003501,000352:
003502,000353: # BIT 12 FLAG 1
003503,000354: # = 018D
003504,000355: # = BIT12
003505,000356:
003506,000357:
003507,000358: # BIT 11 FLAG 1
003508,000359: # = 019D
003509,000360:
003510,000361: # BIT 10 FLAG 1 (L)
003511,000362: 24,2022 R61FLAG = 020D # RUN R61 LEM RUN R65 LEM
003512,000363: 24,2022 4742 R61FLBIT = BIT10
003513,000364:
003514,000365: # BIT 9 FLAG 1
003515,000366: # = 021D
003516,000367: # = BIT9
003517,000368:
003518,000369: # BIT 8 FLAG 1 (S)
003519,000370: 24,2022 VEHUPFLG = 022D # CSM STATE VECTOR LEM STATE VECTOR
003520,000371: 24,2022 4744 VEHUPBIT = BIT8 # BEING UPDATED BEING UPDATED
003521,000372:
003522,000373:
003523,000374: # BIT 7 FLAG 1 (S)
003524,000375: 24,2022 UPDATFLG = 023D # UPDATING BY MARKS UPDATING BY MARKS
003525,000376: 24,2022 4745 UPDATBIT = BIT7 # ALLOWED NOT ALLOWED
003526,000377:
003527,000378:
003528,000379: # BIT 6 FLAG 1 (S)
003529,000380:
|
|
Page 84 |
003531,000382: 24,2022 NOUPFLAG = 024D # NEITHER CSM EITHER STATE
003532,000383: # NOR LM STATE VECTOR VECTOR MAY BE
003533,000384: 24,2022 4746 NOUPFBIT = BIT6 # MAY BE UPDATED UPDATED
003534,000385:
003535,000386:
003536,000387: # BIT 5 FLAG 1 (S)
003537,000388: 24,2022 TRACKFLG = 025D # TRACKING ALLOWED TRACKING NOT ALLOWED
003538,000389: 24,2022 4747 TRACKBIT = BIT5
003539,000390:
003540,000391: # BIT 4 FLAG 1
003541,000392: # = 026D
003542,000393: # = BIT4
003543,000394:
003544,000395:
003545,000396: # BIT 3 FLAG 1 (S)
003546,000397: 24,2022 SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULAR
003547,000398: # METHOD IN ITERATOR FALSI METHOD IN
003548,000399: 24,2022 4751 SLOPEBIT = BIT3 # ITERATOR
003549,000400:
003550,000401:
003551,000402: # BIT 2 FLAG 1 (S)
003552,000403: 24,2022 GUESSW = 028D # NO STARTING VALUE STARTING VALUE FOR
003553,000404: 24,2022 4752 GUESSBIT = BIT2 # FOR ITERATION ITERATION EXISTS
003554,000405:
003555,000406:
003556,000407: # BIT 1 FLAG 1
003557,000408: # = 029D
003558,000409:
003559,000410:
003560,000411: 24,2022 0076 FLAGWRD2 = STATE +2 # (030-044)
003561,000412:
003562,000413: # (SET) (RESET)
003563,000414:
003564,000415: # BIT 15 FLAG 2 (S)
003565,000416: 24,2022 DRIFTFLG = 030D # T3RUPT CALLS GYRO T3RUPT DOES NO GYRO
003566,000417: 24,2022 4735 DRFTBIT = BIT15 # COMPENSATION COMPENSATION
003567,000418:
003568,000419:
003569,000420: # BIT 14 FLAG 2 (S)
003570,000421: 24,2022 SRCHOPTN = 031D # RADAR IN AUTOMATIC RADAR NOT IN AUTO-
003571,000422: 24,2022 4736 SRCHOBIT = BIT14 # SEARCH OPTION(R24) MATIC SEARCH OPTION
003572,000423:
003573,000424:
003574,000425: # BIT 13 FLAG 2 (S)
003575,000426: 24,2022 ACMODFLG = 032D # MANUAL ACQUISITION AUTO ACQUISITION
003576,000427: 24,2022 4737 ACMODBIT = BIT13 # BY RENDESVOUS RADAR BY RENDESVOUS RADAR
003577,000428:
003578,000429:
003579,000430: # BIT 12 FLAG 2 (S)
003580,000431:
|
|
Page 85 |
003582,000433: 24,2022 LOSCMFLG = 033D # LINE OF SIGHT BEING LINE OF SIGHT NOT
003583,000434: # COMPUTED (R21) BEING COMPUTED
003584,000435: 24,2022 4740 LOSCMBIT = BIT12
003585,000436: # IN R29 (L): RR GYRO IN R29 (L): RR GYRO
003586,000437: # CMD LOOP RUNNING CMD LOOP OFF
003587,000438:
003588,000439: # BIT 11 FLAG 2 (S)
003589,000440: 24,2022 STEERSW = 034D # SUFFICIENT THRUST INSUFFICIENT THRUST
003590,000441: 24,2022 4741 STEERBIT = BIT11 # IS PRESENT IS PRESENT
003591,000442:
003592,000443:
003593,000444: # BIT 10 FLAG 2 (S)
003594,000445: 24,2022 CYCLESW = 035D # LAMBERT VG CALCU- LAMBERT CALCULATION
003595,000446: 24,2022 4742 CYCLEBIT = BIT10 # LATION TO BE DONE OMITTED
003596,000447:
003597,000448:
003598,000449: # BIT 9 FLAG 2 (S)
003599,000450: 24,2022 IMPULSW = 036D # MINIMUM IMPULSE STEERING BURN (NO
003600,000451: # BURN (CUTOFF TIME CUTOFF TIME YET
003601,000452: 24,2022 4743 IMPULBIT = BIT9 # SPECIFIED) AVAILABLE)
003602,000453:
003603,000454:
003604,000455: # BIT 8 FLAG 2 (S)
003605,000456: 24,2022 XDELVFLG = 037D # EXTERNAL DELTAV VG LAMBERT (AIMPOINT)
003606,000457: 24,2022 4744 XDELVBIT = BIT8 # COMPUTATION VG COMPUTATION
003607,000458:
003608,000459:
003609,000460: # BIT 7 FLAG 2 (S)
003610,000461: 24,2022 ETPIFLAG = 038D # ELEVATION ANGLE TPI TIME SUPPLIED
003611,000462: # SUPPLIED FOR FOR P34,74 TO COMPUT
003612,000463: 24,2022 4745 ETPIBIT = BIT7 # P34,74 ELEVATION
003613,000464:
003614,000465:
003615,000466: # BIT 7 FLAG 2 (L)
003616,000467: 24,2022 0000046 OPTNSW = ETPIFLAG # SOI PHASE OF P38/78 SOR PHASE OF P38/78
003617,000468: 24,2022 4745 OPTNBIT = BIT7
003618,000469:
003619,000470:
003620,000471: # BIT 6 FLAG 2 (S)
003621,000472: 24,2022 FINALFLG = 039D # LAST PASS THROUGH INTERIM PASS THROUGH
003622,000473: # RENDEZVOUS PROGRAM RENDEZVOUS PROGRAM
003623,000474: 24,2022 4746 FINALBIT = BIT6 # COMPUTATIONS COMPUTATIONS
003624,000475:
003625,000476:
003626,000477: # BIT 5 FLAG 2 (S)
003627,000478: 24,2022 AVFLAG = 040D # LEM IS ACTIVE CSM IS ACTIVE
003628,000479: 24,2022 4747 AVFLBIT = BIT5 # VEHICLE VEHICLE
003629,000480:
003630,000481:
003631,000482: # BIT 4 FLAG 2 (S)
003632,000483:
|
|
Page 86 |
003634,000485: 24,2022 PFRATFLG = 041D # PREFERRED ATTITUDE PREFERRED ATTITUDE
003635,000486: 24,2022 4750 PFRATBIT = BIT4 # COMPUTED NOT COMPUTED
003636,000487:
003637,000488:
003638,000489: # BIT 3 FLAG 2 (S)
003639,000490: 24,2022 CALCMAN3 = 042D # NO FINAL ROLL FINAL ROLL IS
003640,000491: 24,2022 4751 CALC3BIT = BIT3 # NECESSARY
003641,000492:
003642,000493:
003643,000494: # BIT 2 FLAG 2 (S)
003644,000495: 24,2022 CALCMAN2 = 043D # PERFORM MANEUVER BYPASS STARTING
003645,000496: 24,2022 4752 CALC2BIT = BIT2 # STARTING PROCEDURE PROCEDURE
003646,000497:
003647,000498:
003648,000499: # BIT 1 FLAG 2 (S)
003649,000500: 24,2022 NODOFLAG = 044D # V37 NOT PERMITTED V37 PERMITTED
003650,000501: 24,2022 4753 NODOBIT = BIT1
003651,000502:
003652,000503:
003653,000504: 24,2022 0077 FLAGWRD3 = STATE +3 # (045-059)
003654,000505:
003655,000506: # (SET) (RESET)
003656,000507:
003657,000508: # BIT 15 FLAG 3
003658,000509: # = 045D
003659,000510:
003660,000511:
003661,000512: # BIT 14 FLAG 3 (S)
003662,000513: 24,2022 GLOKFAIL = 046D # GIMBAL LOCK HAS NOT IN GIMBAL LOCK
003663,000514: 24,2022 4736 GLOKFBIT = BIT14 # OCCURRED
003664,000515:
003665,000516:
003666,000517: # BIT 13 FLAG 3 *** PROTECTED FROM FRESH START ***
003667,000518: 24,2022 REFSMFLG = 047D # REFSMMAT GOOD REFSMMAT NO GOOD
003668,000519: 24,2022 4737 REFSMBIT = BIT13
003669,000520:
003670,000521:
003671,000522: # BIT 12 FLAG 3 (S)
003672,000523: 24,2022 LUNAFLAG = 048D # LUNAR LAT-LONG EARTH LAT-LONG
003673,000524: 24,2022 4740 LUNABIT = BIT12
003674,000525:
003675,000526:
003676,000527: # BIT 11 FLAG 3 (L)
003677,000528: 24,2022 NOR29FLG = 049D # R29 NOT ALLOWED R29 ALOWED (RR DES-
003678,000529: 24,2022 4741 NR29FBIT = BIT11 # IGNATE, POWERED FLT)
003679,000530:
003680,000531:
003681,000532: # BIT 10 FLAG 3 (S)
003682,000533: 24,2022 VFLAG = 050D # LESS THAN TWO STARS TWO STARS IN FIELD
003683,000534: 24,2022 4742 VFLAGBIT = BIT10 # IN FIELD OF VIEW OF VIEW
003684,000535:
|
|
Page 87 |
003686,000537:
003687,000538:
003688,000539: # BIT 9 FLAG 3 (S)
003689,000540: 24,2022 R04FLAG = 051D # ALARM 521 ALARM 521 ALLOWED
003690,000541: # SUPPRESSED
003691,000542: 24,2022 4743 R04FLBIT = BIT9
003692,000543:
003693,000544:
003694,000545: # BIT 9 FLAG 3 (L)
003695,000546: 24,2022 0000063 READRFLG = R04FLAG # READING RR DATA NOT READING RR DATA
003696,000547: 24,2022 4743 READRBIT = BIT9 # PURSUANT TO R29 PURSUANT TO R29
003697,000548:
003698,000549:
003699,000550: # BIT 8 FLAG 3 (S)
003700,000551: 24,2022 PRECIFLG = 052D # NORMAL INTEGRATION ENGAGES 4-TIME STEP
003701,000552: # IN POO (POO) LOGIC IN INTE-
003702,000553: 24,2022 4744 PRECIBIT = BIT8 # GRATION
003703,000554:
003704,000555:
003705,000556: # BIT 7 FLAG 3 (S)
003706,000557: 24,2022 CULTFLAG = 053D # STAR OCCULTED STAR NOT OCCULTED
003707,000558: 24,2022 4745 CULTBIT = BIT7
003708,000559:
003709,000560:
003710,000561: # BIT 6 FLAG 3 (S)
003711,000562: 24,2022 ORBWFLAG = 054D # W MATRIX VALID FOR W MATRIX INVALID FOR
003712,000563: 24,2022 4746 ORBWFBIT = BIT6 # ORBITAL NAVIGATION ORBITAL NAVIGATION
003713,000564:
003714,000565:
003715,000566: # BIT 5 FLAG 3 (S)
003716,000567: 24,2022 STATEFLG = 055D # PERMANENT STATE PERMANENT STATE
003717,000568: 24,2022 4747 STATEBIT = BIT5 # VECTOR UPDATED VECTOR NOT UPDATED
003718,000569:
003719,000570:
003720,000571: # BIT 4 FLAG 3 (S)
003721,000572: 24,2022 INTYPFLG = 056D # CONIC INTEGRATION ENCKE INTEGRATION
003722,000573: 24,2022 4750 INTYPBIT = BIT4
003723,000574:
003724,000575:
003725,000576: # BIT 3 FLAG 3 (S)
003726,000577: 24,2022 VINTFLAG = 057D # CSM STATE VECTOR LEM STATE VECTOR
003727,000578: 24,2022 4751 VINTFBIT = BIT3 # BEING INTEGRATED BEING INTEGRATED
003728,000579:
003729,000580:
003730,000581: # BIT 2 FLAG 3 (S)
003731,000582: 24,2022 D6OR9FLG = 058D # DIMENSION OF W IS 9 DIMENSION OF W IS 6
003732,000583: 24,2022 4752 D6OR9BIT = BIT2 # FOR INTEGRATION FOR INTEGRATION
003733,000584:
003734,000585:
003735,000586: # BIT 1 FLAG 3 (S)
003736,000587:
|
|
Page 88 |
003738,000589: 24,2022 DIM0FLAG = 059D # W MATRIX IS TO BE W MATRIX IS NOT TO
003739,000590: 24,2022 4753 DIM0BIT = BIT1 # USED BE USED
003740,000591:
003741,000592:
003742,000593: 24,2022 0100 FLAGWRD4 = STATE +4 # (060-074)
003743,000594:
003744,000595: # (SET) (RESET)
003745,000596:
003746,000597: # BIT 15 FLAG 4 (S)
003747,000598: 24,2022 MRKIDFLG = 060D # MARK DISPLAY IN NO MARK DISPLAY IN
003748,000599: 24,2022 4735 MRKIDBIT = BIT15 # ENDIDLE ENDIDLE
003749,000600:
003750,000601:
003751,000602: # BIT 14 FLAG 4 (S)
003752,000603: 24,2022 PRIODFLG = 061D # PRIORITY DISPLAY IN NO PRIORITY DISPLAY
003753,000604: 24,2022 4736 PRIODBIT = BIT14 # ENDIDLE IN ENDIDLE
003754,000605:
003755,000606:
003756,000607: # BIT 13 FLAG 4 (S)
003757,000608: 24,2022 NRMIDFLG = 062D # NORMAL DISPLAY IN NO NORMAL DISPLAY
003758,000609: 24,2022 4737 NRMIDBIT = BIT13 # ENDIDLE IN ENDIDLE
003759,000610:
003760,000611:
003761,000612: # BIT 12 FLAG 4 (S)
003762,000613: 24,2022 PDSPFLAG = 063D # P20 SETS SO AS TO LEAVE AS NORMAL DISP
003763,000614: # TURN A NORMAL DIS-
003764,000615: 24,2022 4740 PDSPFBIT = BIT12 # PLAY INTO A PRIORITY
003765,000616: # DISPLAY IN R60
003766,000617:
003767,000618:
003768,000619: # BIT 11 FLAG 4 (S)
003769,000620: 24,2022 MWAITFLG = 064D # HIGHER PRIORITY NO HIGHER PRIORITY
003770,000621: # DISPLAY OPERATING DISPLAY OPERATING
003771,000622: 24,2022 4741 MWAITBIT = BIT11 # WHEN MARK DISPLAY WHEN MARK DISPLAY
003772,000623: # INITIATED INITIATED
003773,000624:
003774,000625: # BIT 10 FLAG 4 (S)
003775,000626: 24,2022 NWAITFLG = 065D # HIGHER PRIORITY NO HIGHER PRIORITY
003776,000627: # DISPLAY OPERATING DISPLAY OPERATING
003777,000628: 24,2022 4742 NWAITBIT = BIT10 # WHEN NORMAL WHEN NORMAL DISPLAY
003778,000629: # DISPLAY INITIATED INITIATED
003779,000630:
003780,000631: # BIT 9 FLAG 4 (S)
003781,000632: 24,2022 MRKNVFLG = 066D # ASTRONAUT USING ASTRONAUT NOT USING
003782,000633: # KEYBOARD WHEN MARK KEYBOARD WHEN MARK
003783,000634: 24,2022 4743 MRKNVBIT = BIT9 # DISPLAY INITIATED DISPLAY INITIATED
003784,000635:
003785,000636:
003786,000637: # BIT 8 FLAG 4 (S)
003787,000638: 24,2022 NRMNVFLG = 067D # ASTRONAUT USING ASTRONAUT NOT USING
003788,000639:
|
|
Page 89 |
003790,000641: # KEYBOARD WHEN KEYBOARD WHEN
003791,000642: 24,2022 4744 NRMNVBIT = BIT8 # NORMAL DISPLAY NORMAL DISPLAY
003792,000643: # INITIATED INITIATED
003793,000644:
003794,000645: # BIT 7 FLAG 4 (S)
003795,000646: 24,2022 PRONVFLG = 068D # ASTRONAUT USING ASTRONAUT NOT USING
003796,000647: # KEYBOARD WHEN KEYBOARD WHEN
003797,000648: 24,2022 4745 PRONVBIT = BIT7 # PRIORITY DISPLAY PRIORITY DISPLAY
003798,000649: # INITIATED INITIATED
003799,000650:
003800,000651: # BIT 6 FLAG 4 (S)
003801,000652: 24,2022 PINBRFLG = 069D # ASTRONAUT HAS ASTRONAUT HAS NOT
003802,000653: # INTERFERED WITH INTERFERED WITH
003803,000654: 24,2022 4746 PINBRBIT = BIT6 # EXISTING DISPLAY EXISTING DISPLAY
003804,000655:
003805,000656:
003806,000657: # BIT 5 FLAG 4 (S)
003807,000658: 24,2022 MRUPTFLG = 070D # MARK DISPLAY MARK DISPLAY NOT
003808,000659: # INTERRUPTED BY INTERRUPTED BY
003809,000660: 24,2022 4747 MRUPTBIT = BIT5 # PRIORITY DISPLAY PRIORITY DISPLAY
003810,000661:
003811,000662:
003812,000663: # BIT 4 FLAG 4 (S)
003813,000664: 24,2022 NRUPTFLG = 071D # NORMAL DISPLAY NORMAL DISPLAY NOT
003814,000665: # INTERRUPTED BY INTERRUPTED BY
003815,000666: 24,2022 4750 NRUPTBIT = BIT4 # PRIORITY OR MARK PRIORITY OR MARK
003816,000667: # DISPLAY DISPLAY
003817,000668:
003818,000669: # BIT 3 FLAG 4 (S)
003819,000670: 24,2022 MKOVFLAG = 072D # MARK DISPLAY OVER NO MARK DISPLAY OVER
003820,000671: 24,2022 4751 MKOVBIT = BIT3 # NORMAL NORMAL
003821,000672:
003822,000673:
003823,000674: # BIT 2 FLAG 4
003824,000675: # = 073D
003825,000676:
003826,000677:
003827,000678:
003828,000679: # BIT 1 FLAG 4 (S)
003829,000680: 24,2022 XDSPFLAG = 074D # MARK DISPLAY NOT NO SPECIAL MARK
003830,000681: 24,2022 4753 XDSPBIT = BIT1 # TO BE INTERRUPTED INFORMATION
003831,000682:
003832,000683:
003833,000684: 24,2022 0101 FLAGWRD5 = STATE +5 # (075-089)
003834,000685: # (SET) (RESET)
003835,000686:
003836,000687: # BIT 15 FLAG 5 (S)
003837,000688: 24,2022 DSKYFLAG = 075D # DISPLAYS SENT TO NO DISPLAYS TO DSKY
003838,000689: 24,2022 4735 DSKYFBIT = BIT15 # DSKY
003839,000690:
003840,000691:
|
|
Page 90 |
003842,000693: # BIT 14 FLAG 5
003843,000694: # = 076D
003844,000695: # = BIT14
003845,000696:
003846,000697:
003847,000698: # BIT 13 FLAG 5 (S,L)
003848,000699: 24,2022 SNUFFER = 077D # U,V JETS DISABLED U,V JETS ENABLED
003849,000700: # DURING DPS DURING DPS
003850,000701: 24,2022 4737 SNUFFBIT = BIT13 # BURNS (V65) BURNS (V75)
003851,000702:
003852,000703:
003853,000704: # BIT 12 FLAG 5 (S)
003854,000705: 24,2022 NOTHROTL = 078D # INHIBIT FULL PERMIT FULL THROTTLE
003855,000706: 24,2022 4740 NOTHRBIT = BIT12 # THROTTLE
003856,000707:
003857,000708:
003858,000709: # BIT 11 FLAG 5 (S,L)
003859,000710: 24,2022 R77FLAG = 079D # R77 IS ON, R77 IS NOT ON.
003860,000711: # SUPPRESS ALL RADAR
003861,000712: # ALARMS AND TRACKER
003862,000713: 24,2022 4741 R77FLBIT = BIT11 # FAILS
003863,000714:
003864,000715:
003865,000716: # BIT 10 FLAG 5 (S)
003866,000717: 24,2022 RNGSCFLG = 080D # SCALE CHANGE HAS NO SCALE CHANGE HAS
003867,000718: # OCCURRED DURING OCCURRED DURING
003868,000719: 24,2022 4742 RNGSCBIT = BIT10 # RR READING RR READING
003869,000720:
003870,000721:
003871,000722: # BIT 9 FLAG 5 (S)
003872,000723: 24,2022 DMENFLG = 081D # DIMENSION OF W IS 9 DIMENSION OF W IS 6
003873,000724: 24,2022 4743 DMENFBIT = BIT9 # FOR INCORPORATION FOR INCORPORATION
003874,000725:
003875,000726:
003876,000727: # BIT 8 FLAG 5 (S)
003877,000728: 24,2022 COMPUTER = 082D # COMPUTER IS CMC COMPUTER IS LGC
003878,000729: 24,2022 4744 COMPTBIT = BIT8
003879,000730:
003880,000731:
003881,000732: # BIT 7 FLAG 5 (S)
003882,000733: 24,2022 ENGONFLG = 083D # ENGINE TURNED ON ENGINE TURNED OFF
003883,000734: 24,2022 4745 ENGONBIT = BIT7
003884,000735:
003885,000736:
003886,000737: # BIT 6 FLAG 5 (S)
003887,000738: 24,2022 3AXISFLG = 084D # MANEUVER SPECIFIED MANEUVER SPECIFIED
003888,000739: # BY THREE AXES BY ONE AXIS; R60
003889,000740: 24,2022 4746 3AXISBIT = BIT6 # CALLS VECPOINT.
003890,000741:
003891,000742:
|
|
Page 91 |
003893,000744: # BIT 5 FLAG 5
003894,000745: # = 085D
003895,000746:
003896,000747:
003897,000748: # BIT 4 FLAG 5 (S)
003898,000749: 24,2022 NORRMON = 086D # BYPASS RR GIMBAL PERFORM
003899,000750: 24,2022 4750 NORRMBIT = BIT4 # MONITOR RR GIMBAL MONITOR
003900,000751:
003901,000752:
003902,000753: # BIT 3 FLAG 5 (S)
003903,000754: 24,2022 SOLNSW = 087D # LAMBERT DOES NOT LAMBERT CONVERGES OR
003904,000755: # CONVERGE,OR TIME-RADTIME-RADIUS NON
003905,000756: 24,2022 4751 SOLNSBIT = BIT3 # NEARLY CIRCULAR CIRCULAR
003906,000757:
003907,000758:
003908,000759: # BIT 2 FLAG 5 (S)
003909,000760: 24,2022 MGLVFLAG = 088D # LOCAL VERTICAL MIDDLE GIMBAL ANGLE
003910,000761: # COORDINATES COMPUTED
003911,000762: 24,2022 4752 MGLVFBIT = BIT2 # COMPUTED
003912,000763:
003913,000764: # BIT 1 FLAG 5 (S)
003914,000765: 24,2022 RENDWFLG = 089D # W MATRIX VALID W MATRIX INVALID
003915,000766: # FOR RENDEZVOUS FOR RENDEZVOUS
003916,000767: 24,2022 4753 RENDWBIT = BIT1 # NAVIGATION NAVIGATION
003917,000768:
003918,000769:
003919,000770: 24,2022 0102 FLAGWRD6 = STATE +6 # (090-104)
003920,000771:
003921,000772: # (SET) (RESET)
003922,000773:
003923,000774: # BIT 15 FLAG 6 (S)
003924,000775: 24,2022 S32.1F1 = 090D # DELTA V AT CSI TIME DVT1 LESS THEN MAX
003925,000776: 24,2022 4735 S32BIT1 = BIT15 # ONE EXCEEDS MAX
003926,000777:
003927,000778:
003928,000779: # BIT 14 FLAG 6 (S)
003929,000780: 24,2022 S32.1F2 = 091D # FIRST PASS OF REITERATION OF
003930,000781: 24,2022 4736 S32BIT2 = BIT14 # NEWTON ITERATION NEWTON
003931,000782:
003932,000783:
003933,000784: # BIT 13 FLAG 6 (S)
003934,000785: 24,2022 S32.1F3A = 092D # BIT 13 AND BIT 12 FUNCTION AS AN ORDERED
003935,000786: 24,2022 4737 S32BIT3A = BIT13 # PAIR (13,12) INDICATING THE POSSIBLE OC-
003936,000787: # CURRANCE OF 2NEWTON ITERATIONS FOR S32.1
003937,000788: # IN THE PROGRAM IN THE FOLLOWING ORDER:
003938,000789: # BIT 12 FLAG 6 (0,1) (I.E.BIT 13 RESET,BIT 12 SET)
003939,000790: 24,2022 S32.1F3B = 093D # = FIRST NEWTON ITERATION BEING DONE
003940,000791: 24,2022 4740 S32BIT3B = BIT12 # (0,0)= FIRST PASS OF SECOND NEWT.ITERAT.
003941,000792: # (1,1)= 50 FT/SEC STAGE OF SEC. NEWT.ITER
003942,000793:
|
|
Page 92 |
003944,000795: # (1,0)= REMAINDER OF SECOND NEWTON ITERA.
003945,000796:
003946,000797:
003947,000798: # BIT 11 FLAG 6 (S)
003948,000799: 24,2022 FIRSTFLG = 094D # SUCCEEDING PASS FIRST PASS THRU
003949,000800: 24,2022 4741 FIRSTBIT = BIT11 # THRU S40.9 S40.9
003950,000801:
003951,000802:
003952,000803: # BIT 10 FLAG 6 (S)
003953,000804: 24,2022 GMBDRVSW = 095D # TRIMGIMB OVER TRIMGIMB NOT OVER
003954,000805: 24,2022 4742 GMBDRBIT = BIT10
003955,000806:
003956,000807:
003957,000808: # BIT 9 FLAG 6
003958,000809: 24,2022 2PHASFLG = 096D # 2-PHASE GUIDANCE IE ONE-PHASE GUIDANCE
003959,000810: 24,2022 4743 2PHASBIT = BIT9 # TTF GOES TO ZERO I.E. SWITCH OUT OF
003960,000811: # BEFORE YOU ENTER BRAKING PHASE BEFORE
003961,000812: # APPROACH PHASE TTF GETS SMALL
003962,000813:
003963,000814:
003964,000815: # BIT 8 FLAG 6 (S)
003965,000816: 24,2022 MUNFLAG = 097D # SERVICER CALLS SERVICER CALLS
003966,000817: 24,2022 4744 MUNFLBIT = BIT8 # MUNRVG CALCRVG
003967,000818:
003968,000819:
003969,000820: # BIT 7 FLAG 6 (L)
003970,000821: 24,2022 POUTFLAG = 098D # PROHIBIT THROTTLE PERMIT THROTTLE
003971,000822: 24,2022 4745 POUTBIT = BIT7 # PULSE-OUT (P60'S) PULSE-OUT
003972,000823:
003973,000824:
003974,000825: # BIT 6 FLAG 6 (L)
003975,000826: 24,2022 REDFLAG = 099D # LANDING SITE LANDING SITE
003976,000827: # REDESIGNATION REDESIGNATION NOT
003977,000828: 24,2022 4746 REDFLBIT = BIT6 # PERMITTED PERMITTED
003978,000829:
003979,000830:
003980,000831: # BIT 5 FLAG 6
003981,000832: # = 100D
003982,000833:
003983,000834: # BIT 4 FLAG 6
003984,000835: # = 101D
003985,000836:
003986,000837: # BIT 3 FLAG 6 (S)
003987,000838: 24,2022 NTARGFLG = 102D # ASTRONAUT DID ASTRONAUT DID NOT
003988,000839: # OVERWRITE DELTA OVERWRITE DELTA
003989,000840: 24,2022 4751 NTARGBIT = BIT3 # VELOCITY AT TPI VELOCITY
003990,000841: # OR TPM (P34,35)
003991,000842:
003992,000843: # BIT 2 FLAG 6
003993,000844:
|
|
Page 93 |
003995,000846: 24,2022 AUXFLAG = 103D # PROVIDING IDLEFLAG SERVICER WILL SKIP
003996,000847: 24,2022 4752 AUXFLBIT = BIT2 # IS NOT SET, SERV- DVMON ON ITS NEXT
003997,000848: # ICER WILL EXERCISE PASS EVEN IF THE
003998,000849: # DVMON ON ITS NEXT IDLEFLAG IS NOT SET.
003999,000850: # PASS. IT WILL THEN SET
004000,000851: # AUXFLAG.
004001,000852:
004002,000853: # BIT 1 FLAG 6 (L)
004003,000854: 24,2022 ATTFLAG = 104D # LEM ATTITUDE EXISTS NO LEM ATTITUDE
004004,000855: # IN MOON-FIXED AVAILABLE IN MOON-
004005,000856: 24,2022 4753 ATTFLBIT = BIT1 # COORDINATES FIXED COORDINATES
004006,000857:
004007,000858:
004008,000859: 24,2022 0103 FLAGWRD7 = STATE +7 # (105-119)
004009,000860:
004010,000861: # (SET) (RESET)
004011,000862:
004012,000863: # BIT 15 FLAG 7 (S)
004013,000864: 24,2022 ITSWICH = 105D # P34;TPI TIME TO BE TPI HAS BEEN
004014,000865: 24,2022 4735 ITSWBIT = BIT15 # COMPUTED COMPUTED
004015,000866:
004016,000867:
004017,000868: # BIT 14 FLAG 7 (S)
004018,000869: 24,2022 MANUFLAG = 106D # ATTITUDE MANEUVER NO ATTITUDE MANEUVER
004019,000870: # GOING DURING RR DURING RR SEARCH
004020,000871: 24,2022 4736 MANUFBIT = BIT14 # SEARCH
004021,000872:
004022,000873:
004023,000874: # BIT 13 FLAG 7 (S)
004024,000875: 24,2022 IGNFLAG = 107D # TIG HAS ARRIVED TIG HAS NOT ARRIVED
004025,000876: 24,2022 4737 IGNFLBIT = BIT13
004026,000877:
004027,000878:
004028,000879: # BIT 12 FLAG 7 (S)
004029,000880: 24,2022 ASTNFLAG = 108D # ASTRONAUT HAS ASTRONAUT HAS NOT
004030,000881: 24,2022 4740 ASTNBIT = BIT12 # OKAYED IGNITION OKAYED IGNITION
004031,000882:
004032,000883:
004033,000884: # BIT 11 FLAG 7 (L)
004034,000885: 24,2022 SWANDISP = 109D # LANDING ANALOG LANDING ANALOG
004035,000886: 24,2022 4741 SWANDBIT = BIT11 # DISPLAYS ENABLED DISPLAYS SUPPRESSED
004036,000887:
004037,000888:
004038,000889: # BIT 10 FLAG 7 (S)
004039,000890: 24,2022 NORMSW = 110D # UNIT NORMAL INPUT LAMBERT COMPUTES ITS
004040,000891: 24,2022 4742 NORMSBIT = BIT10 # TO LAMBERT OWN UNIT NORMAL
004041,000892:
004042,000893:
004043,000894: # BIT 9 FLAG 7 (S)
004044,000895: 24,2022 RVSW = 111D # DO NOT COMPUTE COMPUTE FINAL STATE
004045,000896:
|
|
Page 94 |
004047,000898: # FINAL STATE VECTOR VECTOR IN TIME-THETA
004048,000899: 24,2022 4743 RVSWBIT = BIT9 # IN TIME-THETA
004049,000900:
004050,000901:
004051,000902: # BIT 8 FLAG 7 (S)
004052,000903: 24,2022 V67FLAG = 112D # ASTRONAUT OVERWRITE ASTRONAUT DOES NOT
004053,000904: # W-MATRIX INITIAL OVERWRITE W-MATRIX
004054,000905: 24,2022 4744 V67FLBIT = BIT8 # VALUES INITIAL VALUES
004055,000906:
004056,000907:
004057,000908: # BIT 7 FLAG 7 (S)
004058,000909: 24,2022 IDLEFLAG = 113D # NO DV MONITOR CONNECT DV MONITOR
004059,000910: 24,2022 4745 IDLEFBIT = BIT7
004060,000911:
004061,000912:
004062,000913: # BIT 6 FLAG 7 (S)
004063,000914: 24,2022 V37FLAG = 114D # AVERAGEG (SERVICER) AVERAGEG (SERVICER)
004064,000915: 24,2022 4746 V37FLBIT = BIT6 # RUNNING OFF
004065,000916:
004066,000917:
004067,000918: # BIT 5 FLAG 7 (S)
004068,000919: 24,2022 AVEGFLAG = 115D # AVERAGEG (SERVICER) AVERAGEG (SERVICER)
004069,000920: 24,2022 4747 AVEGFBIT = BIT5 # DESIRED NOT DESIRED
004070,000921:
004071,000922:
004072,000923: # BIT 4 FLAG 7 (S)
004073,000924: 24,2022 UPLOCKFL = 116D # K-KBAR-K FAIL NO K-KBAR-K FAIL
004074,000925: 24,2022 4750 UPLOCBIT = BIT4
004075,000926:
004076,000927:
004077,000928: # BIT 3 FLAG 7 (S)
004078,000929: 24,2022 VERIFLAG = 117D # CHANGED WHEN V33E OCCURS AT END OF P27
004079,000930: 24,2022 4751 VERIFBIT = BIT3
004080,000931:
004081,000932:
004082,000933: # BIT 2 FLAG 7 (L,C)
004083,000934: 24,2022 V82EMFLG = 118D # MOON VICINITY EARTH VICINITY
004084,000935: 24,2022 4752 V82EMBIT = BIT2
004085,000936:
004086,000937:
004087,000938: # BIT 1 FLAG 7 (S)
004088,000939: 24,2022 TFFSW = 119D # CALCULATE TPERIGEE CALCULATE TFF
004089,000940: 24,2022 4753 TFFSWBIT = BIT1
004090,000941:
004091,000942:
004092,000943: 24,2022 0104 FLAGWRD8 = STATE +8D # (120-134)
004093,000944:
004094,000945: # (SET) (RESET)
004095,000946:
004096,000947: # BIT 15 FLAG 8 (S)
004097,000948:
|
|
Page 95 |
004099,000950: 24,2022 RPQFLAG = 120D # RPQ NOT COMPUTED RPQ COMPUTED
004100,000951: # (RPQ = VECTOR BE-
004101,000952: 24,2022 4735 RPQFLBIT = BIT15 # TWEEN SECONDARY BODY
004102,000953: # AND PRIMARY BODY
004103,000954:
004104,000955:
004105,000956: # BIT 14 FLAG 8
004106,000957: # = 121D
004107,000958: # = BIT14
004108,000959:
004109,000960:
004110,000961: # BIT 13 FLAG 8 (S)
004111,000962: 24,2022 NEWIFLG = 122D # FIRST PASS THROUGH SUCCEEDING ITERATION
004112,000963: 24,2022 4737 NEWIBIT = BIT13 # INTEGRATION OF INTEGRATION
004113,000964:
004114,000965:
004115,000966: # BIT 12 FLAG 8 *** PROTECTED FROM FRESH START ***
004116,000967: 24,2022 CMOONFLG = 123D # PERMANENT CSM STATE PERMANENT CSM STATE
004117,000968: 24,2022 4740 CMOONBIT = BIT12 # IN LUNAR SPHERE IN EARTH SPHERE
004118,000969:
004119,000970:
004120,000971: # BIT 11 FLAG 8 *** PROTECTED FROM FRESH START ***
004121,000972: 24,2022 LMOONFLG = 124D # PERMANENT LM STATE PERMANENT LM STATE
004122,000973: 24,2022 4741 LMOONBIT = BIT11 # IN LUNAR SPHERE IN EARTH SPHERE
004123,000974:
004124,000975:
004125,000976: # BIT 10 FLAG 8 (L)
004126,000977: 24,2022 FLUNDISP = 125D # CURRENT GUIDANCE CURRENT GUIDANCE
004127,000978: 24,2022 4742 FLUNDBIT = BIT10 # DISPLAYS INHIBITED DISPLAYS PERMITTED
004128,000979:
004129,000980:
004130,000981: # BIT 9 FLAG 8 (L)
004131,000982: 24,2022 P39/79SW = 126D # P39/79 OPERATING P38/P78 OPERATING
004132,000983: 24,2022 4743 P39SWBIT = BIT9
004133,000984:
004134,000985:
004135,000986: # BIT 8 FLAG 8 *** PROTECTED FROM FRESH START ***
004136,000987: 24,2022 SURFFLAG = 127D # LM ON LUNAR SURFACE LM NOT ON LUNAR
004137,000988: 24,2022 4744 SURFFBIT = BIT8 # SURFACE
004138,000989:
004139,000990:
004140,000991: # BIT 7 FLAG 8 (S)
004141,000992: 24,2022 INFINFLG = 128D # NO CONIC SOLUTION CONIC SOLUTION
004142,000993: # (CLOSURE THROUGH EXISTS
004143,000994: 24,2022 4745 INFINBIT = BIT7 # INFINITY REQUIRED)
004144,000995:
004145,000996:
004146,000997: # BIT 6 FLAG 8 (S)
004147,000998: 24,2022 ORDERSW = 129D # ITERATOR USES 2ND ITERATOR USES 1ST
004148,000999: 24,2022 4746 ORDERBIT = BIT6 # ORDER MINIMUM MODE ORDER STANDARD MODE
004149,001000:
|
|
Page 96 |
004151,001002:
004152,001003:
004153,001004: # BIT 5 FLAG 8 (S)
004154,001005: 24,2022 APSESW = 130D # RDESIRED OUTSIDE RDESIRED INSIDE
004155,001006: # PERICENTER-APOCENTERPERICENTER-APOCENTER
004156,001007: 24,2022 4747 APSESBIT = BIT5 # RANGE IN TIME-RADI RANGE IN TIME-RADIUS
004157,001008:
004158,001009:
004159,001010: # BIT 4 FLAG 8 (S)
004160,001011: 24,2022 COGAFLAG = 131D # NO CONIC SOLUTION - CONIC SOLUTION
004161,001012: # TOO CLOSE TO RECTI- EXISTS(COGA DOES NOT
004162,001013: 24,2022 4750 COGAFBIT = BIT4 # LINEAR(COGA OVRFLWS) OVERFLOW)
004163,001014:
004164,001015:
004165,001016: # BIT 3 FLAG 8
004166,001017: # = 132D
004167,001018:
004168,001019: # BIT 2 FLAG 8 (L)
004169,001020: 24,2022 INITALGN = 133D # INITIAL PASS THRU SECOND PASS THRU P57
004170,001021: 24,2022 4752 INITABIT = BIT2 # P57 (CHECK RESET-MILLARD)
004171,001022:
004172,001023:
004173,001024: # BIT 1 FLAG 8 (S)
004174,001025: 24,2022 360SW = 134D # TRANSFER ANGLE NEAR TRANSFER ANGLE NOT
004175,001026: 24,2022 4753 360SWBIT = BIT1 # 360 DEGREES NEAR 360 DEGREES
004176,001027:
004177,001028:
004178,001029: 24,2022 0105 FLAGWRD9 = STATE +9D # (135-149)
004179,001030:
004180,001031: # (SET) (RESET)
004181,001032:
004182,001033:
004183,001034: # BIT 15 FLAG 9
004184,001035: # = 135D
004185,001036: # = BIT15
004186,001037:
004187,001038: # BIT 14 FLAG 9 (L)
004188,001039: 24,2022 FLVR = 136D # VERTICAL RISE NON-VERTICAL RISE
004189,001040: 24,2022 4736 FLVRBIT = BIT14 # (ASCENT GUIDANCE)
004190,001041:
004191,001042:
004192,001043: # BIT 13 FLAG 9
004193,001044: # = 137D
004194,001045:
004195,001046:
004196,001047: # BIT 12 FLAG 9 (L)
004197,001048: 24,2022 FLPC = 138D # NO POSITION CONTROL POSITION CONTROL
004198,001049: 24,2022 4740 FLPCBIT = BIT12 # (ASCENT GUIDANCE)
004199,001050:
004200,001051:
|
|
Page 97 |
004202,001053:
004203,001054: # BIT 11 FLAG 9 (L)
004204,001055: 24,2022 FLPI = 139D # PRE-IGNITION PHASE REGULAR GUIDANCE
004205,001056: 24,2022 4741 FLPIBIT = BIT11 # (ASCENT GUIDANCE)
004206,001057:
004207,001058:
004208,001059: # BIT 10 FLAG 9 (L)
004209,001060: 24,2022 FLRCS = 140D # RCS INJECTION MODE MAIN ENGINE MODE
004210,001061: 24,2022 4742 FLRCSBIT = BIT10 # (ASCENT GUIDANCE)
004211,001062:
004212,001063:
004213,001064: # BIT 9 FLAG 9 (L)
004214,001065: 24,2022 LETABORT = 141D # ABORT PROGRAMS ABORT PROGRAMS
004215,001066: 24,2022 4743 LETABBIT = BIT9 # ARE ENABLED ARE NOT ENABLED
004216,001067:
004217,001068:
004218,001069: # BIT 8 FLAG 9 (L)
004219,001070: 24,2022 FLAP = 142D # APS CONTINUED ABORT APS ABORT IS NOT A
004220,001071: # AFTER DPS STAGING CONTINUATION
004221,001072: 24,2022 4744 FLAPBIT = BIT8 # (ASCENT GUIDANCE)
004222,001073:
004223,001074:
004224,001075: # BIT 7 FLAG 9 (L)
004225,001076: # = 143D
004226,001077:
004227,001078: # BIT 6 FLAG 9 (L)
004228,001079: 24,2022 FLZONE0 = 144D # EARLY ABORT LATE ABORT
004229,001080: 24,2022 4746 FLZONBIT = BIT6 # TFI . 50 SECS. TFI > 50 SECS.
004230,001081: # P70 --> P40
004231,001082: # P71 --> P42
004232,001083:
004233,001084: # BIT 5 FLAG 9 (S)
004234,001085: 24,2022 QUITFLAG = 145D # DISCONTINUE INTEGR. CONTINUE INTEGRATION
004235,001086: 24,2022 4747 QUITBIT = BIT5
004236,001087:
004237,001088:
004238,001089: # BIT 4 FLAG 9
004239,001090: # = 146D
004240,001091: # = BIT4
004241,001092:
004242,001093:
004243,001094: # BIT 3 FLAG 9 (L)
004244,001095: 24,2022 MID1FLAG = 147D # INTEGRATE TO TDEC INTEGRATE TO THE
004245,001096: 24,2022 4751 MID1FBIT = BIT3 # THEN-PRESENT TIME
004246,001097:
004247,001098:
004248,001099: # BIT 2 FLAG 9 (L)
004249,001100: 24,2022 MIDAVFLG = 148D # INTEGRATION ENTERED INTEGRATION WAS
004250,001101: # FROM ONE OF MIDTOAV NOT ENTERED VIA
004251,001102: 24,2022 4752 MIDAVBIT = BIT2 # PORTALS MIDTOAV
004252,001103:
004253,001104:
|
|
Page 98 |
004255,001106: # BIT 1 FLAG 9 (S)
004256,001107: 24,2022 AVEMIDSW = 149D # AVETOMID CALLING NO AVETOMID W INTEGR
004257,001108: # FOR W.MATRIX INTEGR ALLOW SET UP RM,VN.
004258,001109: 24,2022 4753 AVEMDBIT = BIT1 # DONT WRITE OVER RN, PIPTIME
004259,001110: # VN,PIPTIME
004260,001111:
004261,001112:
004262,001113:
004263,001114: 24,2022 0106 RASFLAG EQUALS FLGWRD10 # WAS ONLY AN INSTALL- ERASTALL FLAG
004264,001115:
004265,001116: 24,2022 0106 FLGWRD10 = STATE +10D # (150-164)
004266,001117:
004267,001118: # (SET) (RESET)
004268,001119:
004269,001120: # BIT 15 FLAG 10
004270,001121: # = 150D
004271,001122:
004272,001123:
004273,001124: # BIT 14 FLAG 10 (L,C)
004274,001125: 24,2022 INTFLAG = 151D # INTEGRATION IN INTEGRATION NOT IN
004275,001126: 24,2022 4736 INTFLBIT = BIT14 # PROGRESS PROGRESS
004276,001127:
004277,001128:
004278,001129: # BIT 13 FLAG 10 (S,L)
004279,001130: 24,2022 APSFLAG = 152D # ASCENT STAGE DESCENT STAGE
004280,001131: 24,2022 4737 APSFLBIT = BIT13 # *** PROTECTED FROM FRESH START ***
004281,001132:
004282,001133:
004283,001134: # BIT 12 FLAG 10
004284,001135: # = 153D
004285,001136:
004286,001137:
004287,001138: # BIT 11 FLAG 10
004288,001139: # = 154D
004289,001140:
004290,001141:
004291,001142: # BIT 10 FLAG 10
004292,001143: # = 155D
004293,001144:
004294,001145:
004295,001146: # BIT 9 FLAG 10
004296,001147: # = 156D
004297,001148:
004298,001149:
004299,001150: # BIT 8 FLAG 10
004300,001151: # = 157D
004301,001152:
004302,001153:
004303,001154: # BIT 7 FLAG 10 (L,C)
004304,001155:
|
|
Page 99 |
004306,001157: 24,2022 REINTFLG = 158D # INTEGRATION ROUTINE INTEGRATION ROUTINE
004307,001158: 24,2022 4745 REINTBIT = BIT7 # TO BE RESTARTED NOT TO BE RESTARTED
004308,001159:
004309,001160:
004310,001161: # BIT 6 FLAG 10
004311,001162: # = 159D
004312,001163:
004313,001164:
004314,001165: # BIT 5 FLAG 10
004315,001166: # = 160D
004316,001167:
004317,001168:
004318,001169: # BIT 4 FLAG 10
004319,001170: # = 161D
004320,001171:
004321,001172:
004322,001173: # BIT 3 FLAG 10
004323,001174: # = 162D
004324,001175:
004325,001176:
004326,001177: # BIT 2 FLAG 10
004327,001178: # = 163D
004328,001179:
004329,001180:
004330,001181: # BIT 1 FLAG 10
004331,001182: # = 164D
004332,001183:
004333,001184:
004334,001185:
004335,001186:
004336,001187: 24,2022 0107 FLGWRD11 = STATE +11D # (165-179)
004337,001188:
004338,001189: # (SET) (RESET)
004339,001190:
004340,001191: # BIT 15 FLAG 11 (L)(R12)
004341,001192: 24,2022 LRBYPASS = 165D # BYPASS ALL LANDING DO NOT BYPASS LR
004342,001193: 24,2022 4735 LRBYBIT = BIT15 # RADAR UPDATES UPDATES
004343,001194:
004344,001195:
004345,001196: # BIT 14 FLAG 11
004346,001197: # = 166D
004347,001198: # = BIT14
004348,001199:
004349,001200:
004350,001201: # = BIT 13 FLAG 11
004351,001202: # = 167D
004352,001203: # = BIT13
004353,001204:
004354,001205:
|
|
Page 100 |
004356,001207: # BIT 12 FLAG 11 (L)(R12)
004357,001208: 24,2022 VXINH = 168D # IF Z VELOCITY DATA UPDATE X AXIS
004358,001209: # UNREASONABLE, VELOCITY
004359,001210: 24,2022 4740 VXINHBIT = BIT12 # BYPASS X VELOCITY
004360,001211: # UPDATE ON NEXT PASS
004361,001212:
004362,001213: # BIT 11 FLAG 11 (L)(R12)
004363,001214: 24,2022 PSTHIGAT = 169D # PAST HIGATE PREHIGATE
004364,001215: 24,2022 4741 PSTHIBIT = BIT11
004365,001216:
004366,001217:
004367,001218: # BIT 10 FLAG 11 (L)(R12)
004368,001219: 24,2022 NOLRREAD = 170D # LANDING RADAR LR NOT REPOSITIONING
004369,001220: # REPOSITIONING;
004370,001221: 24,2022 4742 NOLRRBIT = BIT10 # BYPASS UPDATE
004371,001222:
004372,001223:
004373,001224: # BIT 9 FLAG 11 (L)(R12)
004374,001225: 24,2022 XORFLG = 171D # BELOW LIMIT ABOVE LIMIT DO
004375,001226: # INHIBIT X AXIS NOT INHIBIT
004376,001227: 24,2022 4743 XORFLBIT = BIT9 # OVERRIDE
004377,001228:
004378,001229:
004379,001230: # BIT 8 FLAG 11
004380,001231: 24,2022 LRINH = 172D # LANDING RADAR UP- LR UPDATES INHIBITED
004381,001232: 24,2022 4744 LRINHBIT = BIT8 # DATES PERMITTED BY ASTRONAUT
004382,001233: # BY ASTRONAUT
004383,001234:
004384,001235:
004385,001236: # BIT 7 FLAG 11 (L)(R12)
004386,001237: 24,2022 VELDATA = 173D # LR VELOCITY LR VELOCITY MEASURE
004387,001238: 24,2022 4745 VELDABIT = BIT7 # MEASUREMENT MADE NOT MADE
004388,001239:
004389,001240:
004390,001241: # BIT 6 FLAG 11 (L)(R12)
004391,001242: 24,2022 READLR = 174D # OK TO READ LR DO NOT READ LR RANGE
004392,001243: 24,2022 4746 READLBIT = BIT6 # RANGE DATA DATA
004393,001244:
004394,001245:
004395,001246: # BIT 5 FLAG 11 (L)(R12)
004396,001247: 24,2022 READVEL = 175D # OK TO READ LR DO NOT READ LR
004397,001248: 24,2022 4747 READVBIT = BIT5 # VELOCITY DATA VELOCITY DATA
004398,001249:
004399,001250:
004400,001251: # BIT 4 FLAG 11 (L)(R12)
004401,001252: 24,2022 RNGEDATA = 176D # LR ALTITUDE LR ALTITUDE MEASURE
004402,001253: 24,2022 4750 RNGEDBIT = BIT4 # MEASUREMENT MADE NOT MADE
004403,001254:
004404,001255:
004405,001256: # BIT 3 FLAG 11
004406,001257:
|
|
Page 101 |
004408,001259: 24,2022 SCALBAD = 177D # LR LOW SCALE DIS- LR SCALE DISCRETE
004409,001260: 24,2022 4751 SCABBIT = BIT3 # CRETE NOT PRESENT APPEARS OK
004410,001261: # WHEN IT SHOULD BE
004411,001262:
004412,001263: # BIT 2 FLAG 11 (L)(R12)
004413,001264: 24,2022 VFLSHFLG = 178D # LR VELOCITY FAIL LR VEL FAIL LAMP
004414,001265: # LAMP SHOULD BE SHOULDN'T FLASH
004415,001266: 24,2022 4752 VFLSHBIT = BIT2 # FLASHING
004416,001267:
004417,001268:
004418,001269: # BIT 1 FLAG 11 (L)(R12)
004419,001270: 24,2022 HFLSHFLG = 179D # LR ALTITUDE FAIL LR ALTITUDE FAIL
004420,001271: 24,2022 4753 HFLSHBIT = BIT1 # LAMP SHOULD BE LAMP SHOULD NOT BE
004421,001272: # FLASHING FLASHING
004422,001273:
004423,001274:
004424,001275: 24,2022 0110 RADMODES EQUALS FLGWRD12 # RADAR FLAG WORD
004425,001276:
004426,001277:
004427,001278: 24,2022 0110 FLGWRD12 = STATE +12D # (180-194) WAS RADMODES
004428,001279:
004429,001280: # (SET) (RESET)
004430,001281:
004431,001282: # BIT 15 FLAG 12
004432,001283: 24,2022 CDESFLAG = 180D # CONTINUOUS DESIG- LGC CHECKS FOR LOCK-
004433,001284: 24,2022 4735 CDESBIT = BIT15 # NATE. LGC COMMANDS ON WHEN ANTENNA
004434,001285: # RR REGARDLESS OF BEING DESIGNATED
004435,001286: # LOCK-ON
004436,001287:
004437,001288: # BIT 14 FLAG 12
004438,001289: 24,2022 REMODFLG = 181D # CHANGE IN ANTENNA NO REMODE REQUESTED
004439,001290: 24,2022 4736 REMODBIT = BIT14 # MODE BEEN REQUESTED OR OCCURRING
004440,001291: # I.E., REMODE
004441,001292:
004442,001293:
004443,001294: # BIT 13 FLAG 12
004444,001295: 24,2022 RCDU0FLG = 182D # RR CDU'S BEING RR CDU'S NOT BEING
004445,001296: 24,2022 4737 RCDU0BIT = BIT13 # ZEROED ZEROED
004446,001297:
004447,001298:
004448,001299: # BIT 12 FLAG 12
004449,001300: 24,2022 ANTENFLG = 183D # RR ANTENNA MODE IS RR ANTENNA IN MODE 1
004450,001301: 24,2022 4740 ANTENBIT = BIT12 # MODE 2
004451,001302:
004452,001303:
004453,001304: # BIT 11 FLAG 12
004454,001305: 24,2022 REPOSMON = 184D # REPOSITION MONITOR. NO REPOSITION TAKING
004455,001306: 24,2022 4741 REPOSBIT = BIT11 # RR REPOSITION IS PLACE
004456,001307:
|
|
Page 102 |
004458,001309: # TAKING PLACE
004459,001310:
004460,001311:
004461,001312: # BIT 10 FLAG 12
004462,001313: 24,2022 DESIGFLG = 185D # RR DESIGNATE RR DESIGNATE NOT
004463,001314: 24,2022 4742 DESIGBIT = BIT10 # REQUESTED OR IN REQUESTED OR IN
004464,001315: # PROGRESS PROGRESS
004465,001316:
004466,001317:
004467,001318: # BIT 9 FLAG 12
004468,001319: 24,2022 ALTSCALE = 186D # LR ALTITUDE READING LR ALTITUDE READING
004469,001320: 24,2022 4743 ALTSCBIT = BIT9 # IS ON HIGH SCALE IS ON LOW SCALE
004470,001321:
004471,001322:
004472,001323: # BIT 8 FLAG 12
004473,001324: 24,2022 LRVELFLG = 187D # LR VELOCITY DATA NO LR VELOCITY DATA
004474,001325: 24,2022 4744 LRVELBIT = BIT8 # FAIL FAIL
004475,001326:
004476,001327:
004477,001328: # BIT 7 FLAG 12
004478,001329: 24,2022 RCDUFAIL = 188D # RR CDU FAIL HAS RR CDU FAIL OCCURRED
004479,001330: 24,2022 4745 RCDUFBIT = BIT7 # NOT OCCURRED
004480,001331:
004481,001332:
004482,001333: # BIT 6 FLAG 12
004483,001334: 24,2022 LRPOSFLG = 189D # LANDING RADAR LR POSITION 1
004484,001335: 24,2022 4746 LRPOSBIT = BIT6 # POSITION 2
004485,001336:
004486,001337:
004487,001338: # BIT 5 FLAG 12
004488,001339: 24,2022 LRALTFLG = 190D # LR ALTITUDE DATA NO LR ALTITUDE DATA
004489,001340: 24,2022 4747 LRALTBIT = BIT5 # FAIL. COULD NOT BE FAIL
004490,001341: # READ SUCCESSFULLY.
004491,001342:
004492,001343:
004493,001344: # BIT 4 FLAG 12
004494,001345: 24,2022 RRDATAFL = 191D # RR DATA FAIL. NO RR DATA FAIL.
004495,001346: 24,2022 4750 RRDATABT = BIT4 # DATA COULD NOT BE
004496,001347: # READ SUCCESSFULLY
004497,001348:
004498,001349:
004499,001350: # BIT 3 FLAG 12
004500,001351: 24,2022 RRRSFLAG = 192D # RR RANGE READING RR RANGE READING ON
004501,001352: 24,2022 4751 RRRSBIT = BIT3 # ON THE HIGH SCALE THE LOW SCALE
004502,001353:
004503,001354:
004504,001355: # BIT 2 FLAG 12
004505,001356: 24,2022 AUTOMODE = 193D # RR NOT IN AUTO MODE.RR IN AUTO MODE
004506,001357: 24,2022 4752 AUTOMBIT = BIT2 # AUTO MODE DISCRETE
004507,001358: # IS NOT PRESENT
004508,001359:
|
|
Page 103 |
004510,001361:
004511,001362: # BIT 1 FLAG 12
004512,001363: 24,2022 TURNONFL = 194D # RR TURN-ON SEQUENCE NO RR TURN-ON
004513,001364: 24,2022 4753 TURNONBT = BIT1 # IN PROGRESS. (ZERO SEQUENCE IN PROGRESS
004514,001365: # CDU'S, FIX ANTENNA
004515,001366: # MODE)
004516,001367:
004517,001368:
004518,001369: 24,2022 0111 DAPBOOLS EQUALS FLGWRD13 # DIGITAL AUTOPILOT FLAGWORD
004519,001370:
004520,001371:
004521,001372: 24,2022 0111 FLGWRD13 = STATE +13D # (195-209) WAS DAPBOOLS
004522,001373:
004523,001374: # (SET) (RESET)
004524,001375:
004525,001376: # BIT 15 FLAG 13
004526,001377: 24,2022 PULSEFLG = 195D # MINIMUM IMPULSE NOT IN MINIMUM
004527,001378: 24,2022 4735 PULSES = BIT15 # COMMAND MODE IN IMPULSE COMMAND MODE
004528,001379: # "ATT HOLD" (V76) (V77)
004529,001380:
004530,001381:
004531,001382: # BIT 14 FLAG 13
004532,001383: 24,2022 USEQRFLG = 196D # GIMBAL UNUSABLE. TRIM GIMBAL MAY BE
004533,001384: 24,2022 4736 USEQRJTS = BIT14 # USE JETS ONLY. USED.
004534,001385:
004535,001386:
004536,001387: # BIT 13 FLAG 13
004537,001388: 24,2022 CSMDKFLG = 197D # CSM DOCKED. USE CSM NOT DOCKED TO LM
004538,001389: 24,2022 4737 CSMDOCKD = BIT13 # BACKUP DAP
004539,001390:
004540,001391:
004541,001392: # BIT 12 FLAG 13
004542,001393: 24,2022 OURRCFLG = 198D # CURRENT DAP PASS CURRENT DAP PASS IS
004543,001394: 24,2022 4740 OURRCBIT = BIT12 # IS RATE COMMAND NOT RATE COMMAND
004544,001395:
004545,001396:
004546,001397: # BIT 11 FLAG 13
004547,001398: 24,2022 ACC4-2FL = 199D # 4 JET X-AXIS TRANS- 2 JET X-AXIS TRANS-
004548,001399: 24,2022 4741 ACC4OR2X = BIT11 # LATION REQUESTED LATION REQUESTED
004549,001400:
004550,001401:
004551,001402: # BIT 10 FLAG 13
004552,001403: 24,2022 AORBTFLG = 200D # B SYSTEM FOR X- A SYSTEM FOR X-
004553,001404: 24,2022 4742 AORBTRAN = BIT10 # TRANSLATION TRANSLATION PREFER'D
004554,001405:
004555,001406:
004556,001407: # BIT 9 FLAG 13
004557,001408: 24,2022 XOVINFLG = 201D # X-AXIS OVERRIDE X-AXIS OVERRIDE OKAY
004558,001409: 24,2022 4743 XOVINHIB = BIT9 # LOCKED OUT
004559,001410:
004560,001411:
|
|
Page 104 |
004562,001413:
004563,001414:
004564,001415: # BIT 8 FLAG 13
004565,001416: 24,2022 DRIFTDFL = 202D # ASSUME 0 OFFSET USE OFFSET ACCELERA-
004566,001417: 24,2022 4744 DRIFTBIT = BIT8 # DRIFTING FLIGHT. TION ESTIMATE
004567,001418:
004568,001419:
004569,001420: # BIT 7 FLAG 13
004570,001421: 24,2022 RHCSCFLG = 203D # NORMAL RHC SCALING FINE RHC SCALING
004571,001422: 24,2022 4745 RHCSCALE = BIT7 # REQUESTED REQUESTED
004572,001423:
004573,001424:
004574,001425: # BIT 6 FLAG 13
004575,001426: 24,2022 ULLAGFLG = 204D # ULLAGE REQUEST BY NO INTERNAL ULLAGE
004576,001427: 24,2022 4746 ULLAGER = BIT6 # MISSION PROGRAM REQUEST
004577,001428:
004578,001429:
004579,001430: # BIT 5 FLAG 13
004580,001431: 24,2022 AORBSFLG = 205D # P-AXIS COUPLES 7.15 P-AXIS COUPLES 4.12
004581,001432: 24,2022 4747 AORBSYST = BIT5 # AND 8,16 PREFERRED AND 3,11 PREFERRED
004582,001433:
004583,001434:
004584,001435: # BIT 4 FLAG 13
004585,001436: 24,2022 DBSELFLG = 206D # MAX DB SELECTED MIN DB SELECTED BY
004586,001437: 24,2022 4750 DBSELECT = BIT4 # BY CREW (5 DEG) CREW (0.3 DEG)
004587,001438:
004588,001439:
004589,001440: # BIT 3 FLAG 13
004590,001441: 24,2022 ACCOKFLG = 207D # CONTROL AUTHORITY RESTART OR FRESH ST.
004591,001442: 24,2022 4751 ACCSOKAY = BIT3 # VALUES FROM 1/ACCS SINCE LAST 1/ACCS;
004592,001443: # USABLE OUTPUTS SUSPECT.
004593,001444:
004594,001445:
004595,001446: # BIT 2 FLAG 13
004596,001447: 24,2022 AUTR2FLG = 208D # THESE FLAGS ARE USED TOGETHER TO INDICAT
004597,001448: 24,2022 4752 AUTRATE2 = BIT2 # ASTRONAUT-CHOSEN KALCMANU MANEUVER RATES
004598,001449: # (0,0)=(BIT2,BIT1)= 0.2 DEG/SEC
004599,001450: # (0,1)= 0.5 DEG/SEC
004600,001451: # BIT 1 FLAG 13
004601,001452: 24,2022 AUTR1FLG = 209D # (1,0)= 2.0 DEG/SEC
004602,001453: 24,2022 4753 AUTRATE1 = BIT1 # (1,1)= 10.0 DEG/SEC
004603,001454:
004604,001455:
End of include-file FLAGWORD_ASSIGNMENTS.agc. Parent file is MAIN.agc