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