Source Code
These source-code files were transcribed from a printout in Don Eyles's personal
collection, scanned by archive.org, and financially sponsored by Linden Sims.
A team of volunteers performed the transcription and proof-reading. The scanned
page images are available at
the Virtual AGC Project website, as well as higher-quality (but much larger)
images at
the Virtual AGC Project's collection in the Internet Archive. Report any problems by creating
"issues" at
the Virtual AGC Project's GitHub Repository. Notations on the program listing read, in part: GAP: ASSEMBLE REVISION 56 OF AGC PROGRAM ZERLINA BY ZOROASTER 9:12 OCT. 21,1970Note that the date is the date of the printout, not the date of the program revision. |
002662,000002: ## Copyright: Public domain.
002663,000003: ## Filename: FLAGWORD_ASSIGNMENTS.agc
002664,000004: ## Purpose: A log section of Zerlina 56, the final revision of
002665,000005: ## Don Eyles's offline development program for the variable
002666,000006: ## guidance period servicer. It also includes a new P66 with LPD
002667,000007: ## (Landing Point Designator) capability, based on an idea of John
002668,000008: ## Young's. Neither of these advanced features were actually flown,
002669,000009: ## but Zerlina was also the birthplace of other big improvements to
002670,000010: ## Luminary including the terrain model and new (Luminary 1E)
002671,000011: ## analog display programs. Zerlina was branched off of Luminary 145,
002672,000012: ## and revision 56 includes all changes up to and including Luminary
002673,000013: ## 183. It is therefore quite close to the Apollo 14 program,
002674,000014: ## Luminary 178, where not modified with new features.
002675,000015: ## Reference: pp. 62-89
002676,000016: ## Assembler: yaYUL
002677,000017: ## Contact: Ron Burkey <info@sandroid.org>.
002678,000018: ## Website: www.ibiblio.org/apollo/index.html
002679,000019: ## Mod history: 2017-07-28 MAS Created from Luminary 210.
002680,000020: ## 2017-08-13 MAS Began transcribing for Zerlina 56.
002681,000021: ## 2017-08-14 MAS Finished updates for Zerlina 56.
002682,000022: ## 2017-08-24 MAS Fixed a transcription error in R10FLAG that might
002683,000023: ## actually be a bug, resulting in that flag conflicting
002684,000024: ## with NEEDLFLG.
002685,000025:
Page 62 |
002687,000027: # FLAGWORDS 0-11 ARE DOWNLINKED AND CAN BE SET AND CLEARED BY UP-FLAG AND DOWN-FLAG INSTRUCTIONS IN THE
002688,000028: # INTERPRETER. THESE WERE PREVIOUSLY LISTED UNDER "INTERPRETIVE SWITCH BIT ASSIGNMENTS" IN
002689,000029: # THE ERASABLE LOG SECTION. FLAGWORDS 12 & 13 WEREPREVIOUSLY RADMODES AND DAPBOOLS AND
002690,000030: # ARE STILL DOWNLINKED UNDER THOSE NAMES.
002691,000031:
002692,000032:
002693,000033:
002694,000034:
002695,000035: # ALPHABETICAL LIST OF FLAGWORDS
002696,000036:
002697,000037:
002698,000038: # 9 25 41 61 COLUMN NO.
002699,000039: # FLAGWORD DEC. NUMBER BIT AND FLAG BIT NAME
002700,000040:
002701,000041: # ABTTGFLG 143 BIT 7 FLAG 9 ABTTGBIT
002702,000042: # ACCOKFLG 207 BIT 3 FLAG 13 ACCSOKAY
002703,000043: # ACC4-2FL 199 BIT 11 FLAG 13 ACC4OR2X
002704,000044: # ACMODFLG 032 BIT 13 FLAG 2 ACMODBIT
002705,000045: # ALTSCALE 186 BIT 9 FLAG 12 ALTSCBIT
002706,000046: # ALW66FLG BIT 9 FLAG 1 ALW66BIT
002707,000047: # ANTENFLG 183 BIT 12 FLAG 12 ANTENBIT
002708,000048: # AORBSFLG 085 BIT 5 FLAG 5 AORBSYST
002709,000049: # AORBTFLG 200 BIT 10 FLAG 13 AORBTRAN
002710,000050: # APSESW 130 BIT 5 FLAG 8 APSESBIT
002711,000051: # APSFLAG 152 BIT 13 FLAG 10 APSFLBIT
002712,000052: # ASTNFLAG 108 BIT 12 FLAG 7 ASTNBIT
002713,000053: # ATTFLAG 104 BIT 1 FLAG 6 ATTFLBIT
002714,000054: # AUTOMODE 193 BIT 2 FLAG 12 AUTOMBIT
002715,000055: # AUTR1FLG 209 BIT 1 FLAG 13 AUTRATE1
002716,000056: # AUTR2FLG 208 BIT 2 FLAG 13 AUTRATE2
002717,000057: # AUXFLAG 103 BIT 2 FLAG 6 AUXFLBIT
002718,000058: # AVEGFLAG 115 BIT 5 FLAG 7 AVEGFBIT
002719,000059: # AVEMIDSW 149 BIT 1 FLAG 9 AVEMDBIT
002720,000060: # AVFLAG 040 BIT 5 FLAG 2 AVFLBIT
002721,000061: # CALCMAN2 043 BIT 2 FLAG 2 CALC2BIT
002722,000062: # CALCMAN3 042 BIT 3 FLAG 2 CALC3BIT
002723,000063: # CDESFLAG 180 BIT 15 FLAG 12 CDESBIT
002724,000064: # CMOONFLG 123 BIT 12 FLAG 8 CMOONBIT
002725,000065: # COGAFLAG 131 BIT 4 FLAG 8 COGAFBIT
002726,000066: # CSMDKFLG 197 BIT 13 FLAG 13 CSMDOCKD
002727,000067: # CULTFLAG 053 BIT 7 FLAG 3 CULTBIT
002728,000068: # DAPBOOLS FLGWRD13
002729,000069: # DBSELFLG 206 BIT 4 FLAG 13 DBSELECT
002730,000070: # DBSL2FLG 205 BIT 5 FLAG 13 DBSLECT2
002731,000071: # DESIGFLG 185 BIT 10 FLAG 12 DESIGBIT
002732,000072: # DIDFLAG 016 BIT 14 FLAG 1 DIDFLBIT
002733,000073: # DIMOFLAG 059 BIT 1 FLAG 3 DIMOBIT
Page 63 |
002735,000075: # DMENFLG 081 BIT 9 FLAG 5 DMENFBIT
002736,000076: # DRIFTDFL 202 BIT 8 FLAG 13 DRIFTBIT
002737,000077: # DRIFTFLG 030 BIT 15 FLAG 2 DRFTBIT
002738,000078: # DSKYFLAG 075 BIT 15 FLAG 5 DSKYFBIT
002739,000079: # D6OR9FLG 058 BIT 2 FLAG 3 D6OR9BIT
002740,000080: # ENGONFLG 083 BIT 7 FLAG 5 ENGONBIT
002741,000081: # ERADFLAG 017 BIT 13 FLAG 1 ERADFBIT
002742,000082: # ETPIFLAG 038 BIT 7 FLAG 2 ETPIBIT
002743,000083: # FINALFLG 039 BIT 6 FLAG 2 FINALBIT
002744,000084: # FLAGWRD0 (000-014) (STATE +0)
002745,000085: # FLAGWRD1 (015-029) (STATE +1)
002746,000086: # FLAGWRD2 (030-044) (STATE +2)
002747,000087: # FLAGWRD3 (045-059) (STATE +3)
002748,000088: # FLAGWRD4 (060-074) (STATE +4)
002749,000089: # FLAGWRD5 (075-089) (STATE +5)
002750,000090: # FLAGWRD6 (090-104) (STATE +6)
002751,000091: # FLAGWRD7 (105-119) (STATE +7)
002752,000092: # FLAGWRD8 (120-134) (STATE +8D)
002753,000093: # FLAGWRD9 (135-149) (STATE +9D)
002754,000094: # FLAP 142 BIT 8 FLAG 9 FLAPBIT
002755,000095: # FLGWRD10 (150-164) (STATE +10D)
002756,000096: # FLGWRD11 (165-179) (STATE +11D)
002757,000097: # FLGWRD12 (180-194) (STATE +12D)
002758,000098: # FLGWRD13 (195-209) (STATE +13D)
002759,000099: # FLPC 138 BIT 12 FLAG 9 FLPCBIT
002760,000100: # FLPI 139 BIT 11 FLAG 9 FLPIBIT
002761,000101: # FLRCS 149 BIT 10 FLAG 9 FLRCSBIT
002762,000102: # FLUNDISP 125 BIT 10 FLAG 8 FLUNDBIT
002763,000103: # FLVR 136 BIT 14 FLAG 9 FLVRBIT
002764,000104: # FREEFLAG 012 BIT 3 FLAG 0 FREEFBIT
002765,000105: # FSPASFLG 005 BIT 10 FLAG 0 FSPASBIT
002766,000106: # GLOKFAIL 046 BIT 14 FLAG 3 GLOKFBIT
002767,000107: # GMBDRVSW 095 BIT 10 FLAG 6 GMBDRBIT
002768,000108: # GUESSW 028 BIT 2 FLAG 1 GUESSBIT
002769,000109: # HFAILFLG 167 BIT 13 FLAG 11 HFAILBIT
002770,000110: # HFLSHFLG 179 BIT 1 FLAG 11 HFLSHBIT
002771,000111: # IDLEFLAG 113 BIT 7 FLAG 7 IDLEFBIT
002772,000112: # IGNFLAG 107 BIT 13 FLAG 7 IGNFLBIT
002773,000113: # IMPULSW 036 BIT 9 FLAG 2 IMPULBIT
002774,000114: # IMUSE 007 BIT 8 FLAG 0 IMUSEBIT
002775,000115: # INFINFLG 128 BIT 7 FLAG 8 INFINBIT
002776,000116: # INITALGN 133 BIT 2 FLAG 8 INITABIT
002777,000117: # INTFLAG 151 BIT 14 FLAG 10 INTFLBIT
002778,000118: # INTYPFLG 056 BIT 4 FLAG 3 INTYPBIT
002779,000119: # ITSWICH 105 BIT 15 FLAG 7 ITSWBIT
002780,000120: # JSWITCH 001 BIT 14 FLAG 0 JSWCHBIT
002781,000121: # LETABORT 141 BIT 9 FLAG 9 LETABBIT
002782,000122: # LMOONFLG 124 BIT 11 FLAG 8 LMOONBIT
002783,000123: # LOKONSW 010 BIT 5 FLAG 0 LOKONBIT
002784,000124: # LOSCMFLG 033 BIT 12 FLAG 2 LOSCMBIT
Page 64 |
002786,000126: # LPOS2FLG 174 BIT 6 FLAG 11 LPOS2BIT
002787,000127: # LRALTFLG 190 BIT 5 FLAG 12 LRALTBIT
002788,000128: # LRBYPASS 165 BIT 15 FLAG 11 LRBYBIT
002789,000129: # LRINH 172 BIT 8 FLAG 11 LRINHBIT
002790,000130: # LRPOSFLG 189 BIT 6 FLAG 12 LRPOSBIT
002791,000131: # LRVELFLG 187 BIT 8 FLAG 12 LRVELBIT
002792,000132: # LUNAFLAG 048 BIT 12 FLAG 3 LUNABIT
002793,000133: # MANUFLAG 106 BIT 14 FLAG 7 MANUFBIT
002794,000134: # MGLVFLAG 088 BIT 2 FLAG 5 MGLVFBIT
002795,000135: # MIDAVFLG 148 BIT 2 FLAG 9 MIDAVBIT
002796,000136: # MIDFLAG 002 BIT 13 FLAG 0 MIDFLBIT
002797,000137: # MID1FLAG 147 BIT 3 FLAG 9 MID1BIT
002798,000138: # MKOVFLAG 072 BIT 3 FLAG 4 MKOVBIT
002799,000139: # MOONFLAG 003 BIT 12 FLAG 0 MOONBIT
002800,000140: # MRKIDFLG 060 BIT 15 FLAG 4 MRKIDBIT
002801,000141: # MRKNVFLG 066 BIT 9 FLAG 4 MRKNVBIT
002802,000142: # MRUPTFLG 070 BIT 5 FLAG 4 MRUPTBIT
002803,000143: # MUNFLAG 097 BIT 8 FLAG 6 MUNFLBIT
002804,000144: # MWAITFLG 064 BIT 11 FLAG 4 MWAITBIT
002805,000145: # NEEDLFLG 011 BIT 4 FLAG 0 NEEDLBIT
002806,000146: # NEED2FLG 000 BIT 15 FLAG 0 NEED2BIT
002807,000147: # NEWIFLG 122 BIT 13 FLAG 8 NEWIBIT
002808,000148: # NJETSFLG 015 BIT 15 FLAG 1 NJETSBIT
002809,000149: # NODOFLAG 044 BIT 1 FLAG 2 NODOBIT
002810,000150: # NODOP07 049 BIT 11 FLAG 3 NOP07BIT
002811,000151: # NOLRREAD 170 BIT 10 FLAG 11 NOLRRBIT
002812,000152: # NORMSW 110 BIT 10 FLAG 7 NORMSBIT
002813,000153: # NORRMON 086 BIT 4 FLAG 5 NORRMBIT
002814,000154: # NOTERFLG 019 BIT 11 FLAG 1 NOTERBIT
002815,000155: # NOTHROTL 078 BIT 12 FLAG 5 NOTHRBIT
002816,000156: # NOUPFLAG 024 BIT 6 FLAG 1 NOUPFBIT
002817,000157: # NRMNVFLG 067 BIT 8 FLAG 4 NRMNVBIT
002818,000158: # NRMIDFLG 062 BIT 13 FLAG 4 NRMIDBIT
002819,000159: # NRUPTFLG 071 BIT 4 FLAG 4 NRUPTBIT
002820,000160: # NTARGFLG 102 BIT 3 FLAG 6 NTARGBIT
002821,000161: # NWAITFLG 065 BIT 10 FLAG 4 NWAITBIT
002822,000162: # ORBWFLAG 054 BIT 6 FLAG 3 ORBWFBIT
002823,000163: # ORDERSW 129 BIT 6 FLAG 8 ORDERBIT
002824,000164: # OURRCFLG 198 BIT 12 FLAG 13 OURRCBIT
002825,000165: # PDSPFLAG 063 BIT 12 FLAG 4 PDSPFBIT
002826,000166: # PFRATFLG 041 BIT 4 FLAG 2 PFRATBIT
002827,000167: # PINBRFLG 069 BIT 6 FLAG 4 PINBRBIT
002828,000168: # POOHFLAG 045 BIT 15 FLAG 3 POOHBIT
002829,000169: # PRECIFLG 052 BIT 8 FLAG 3 PRECIBIT
002830,000170: # PRIODFLG 061 BIT 14 FLAG 4 PRIODBIT
002831,000171: # PRONVFLG 068 BIT 7 FLAG 4 PRONVBIT
002832,000172: # PSTHIGAT 169 BIT 11 FLAG 11 PSTHIBIT
002833,000173: # PULSEFLG 195 BIT 15 FLAG 13 PULSES
002834,000174: # P21FLAG 004 BIT 11 FLAG 0 P21FLBIT
002835,000175: # P25FLAG 006 BIT 9 FLAG 0 P25FLBIT
Page 65 |
002837,000177: # P66PROFL 014D BIT 1 FLAG 0 P66PROBT
002838,000178: # P7071FLG 137 BIT 13 FLAG 9 P7071BIT
002839,000179: # QUITFLAG 145 BIT 5 FLAG 9 QUITBIT
002840,000180: # RADMODES FLGWRD12
002841,000181: # RASFLAG FLGWRD10
002842,000182: # RCDUFAIL 188 BIT 7 FLAG 12 RCDUFBIT
002843,000183: # RCDU0FLG 182 BIT 13 FLAG 12 RCDU0BIT
002844,000184: # REDFLAG 099 BIT 6 FLAG 6 REDFLBIT
002845,000185: # REFSMFLG 047 BIT 13 FLAG 3 REFSMBIT
002846,000186: # REINTFLG 158 BIT 7 FLAG 10 REINTBIT
002847,000187: # REMODFLG 181 BIT 14 FLAG 12 REMODBIT
002848,000188: # RENDWFLG 089 BIT 1 FLAG 5 RENDWBIT
002849,000189: # REPOSMON 184 BIT 11 FLAG 12 REPOSBIT
002850,000190: # RHCSCFLG 203 BIT 7 FLAG 13 RHCSCALE
002851,000191: # RNDVZFLG 008 BIT 7 FLAG 0 RNDVZBIT
002852,000192: # RNGEDATA 176 BIT 4 FLAG 11 RNGEDBIT
002853,000193: # RNGSCFLG 080 BIT 10 FLAG 5 RNGSCBIT
002854,000194: # RODFLAG 018 BIT 12 FLAG 1 RODFLBIT
002855,000195: # ROTFLAG 144 BIT 6 FLAG 9 ROTFLBIT
002856,000196: # RPQFLAG 120 BIT 15 FLAG 8 RPQFLBIT
002857,000197: # RRDATAFL 191 BIT 4 FLAG 12 RRDATABT
002858,000198: # RRNBSW 009 BIT 6 FLAG 0 RRNBBIT
002859,000199: # RRRSFLAG 192 BIT 3 FLAG 12 RRRSBIT
002860,000200: # RVSW 111 BIT 9 FLAG 7 RVSWBIT
002861,000201: # R04FLAG 051 BIT 9 FLAG 3 R04FLBIT
002862,000202: # R10FLAG 013 BIT 2 FLAG 0 R10FLBIT
002863,000203: # R61FLAG 020 BIT 10 FLAG 1 R61FLBIT
002864,000204: # R77FLAG 079 BIT 11 FLAG 5 R77FLBIT
002865,000205: # SERVOVER 043 BIT 10 FLAG 2 SEROVBIT
002866,000206: # SLOPESW 027 BIT 3 FLAG 1 SLOPEBIT
002867,000207: # SNUFFER 077 BIT 13 FLAG 5 SNUFFBIT
002868,000208: # SOLNSW 087 BIT 3 FLAG 5 SOLNSBIT
002869,000209: # SRCHOPTN 031 BIT 14 FLAG 2 SRCHOBIT
002870,000210: # STATEFLG 055 BIT 5 FLAG 3 STATEBIT
002871,000211: # STEERSW 034 BIT 11 FLAG 2 STEERBIT
002872,000212: # SURFFLAG 127 BIT 8 FLAG 8 SURFFBIT
002873,000213: # SWANDISP 109 BIT 11 FLAG 7 SWANDBIT
002874,000214: # S32.1F1 090 BIT 15 FLAG 6 S32BIT1
002875,000215: # S32.1F2 092 BIT 14 FLAG 6 S32BIT2
002876,000216: # S32.1F3A 092 BIT 13 FLAG 6 S32BIT3A
002877,000217: # S32.1F3B 093 BIT 12 FLAG 6 S32BIT3B
002878,000218: # TFFSW 119 BIT 1 FLAG 7 TFFSWBIT
002879,000219: # TRACKFLG 025 BIT 5 FLAG 1 TRACKBIT
002880,000220: # TURNONFL 194 BIT 1 FLAG 12 TURNONBT
002881,000221: # ULLAGFLG 204 BIT 6 FLAG 13 ULLAGER
002882,000222: # UPDATFLG 023 BIT 7 FLAG 1 UPDATBIT
002883,000223: # UPLOCKFL 116 BIT 4 FLAG 7 UPLOCBIT
002884,000224: # USEQRFLG 196 BIT 14 FLAG 13 USEQRJTS
002885,000225: # VEHUPFLG 022 BIT 8 FLAG 1 VEHUPBIT
002886,000226: # VELDATA 173 BIT 7 FLAG 11 VELDABIT
Page 66 |
002888,000228: # VERIFLAG 117 BIT 3 FLAG 7 VERIFBIT
002889,000229: # VFAILFLG 166 BIT 14 FLAG 11 VFAILBIT
002890,000230: # VFLAG 050 BIT 10 FLAG 3 VFLAGBIT
002891,000231: # VFLSHFLG 178 BIT 2 FLAG 11 VFLSHBIT
002892,000232: # VINTFLAG 057 BIT 3 FLAG 3 VINTFBIT
002893,000233: # VXINH 168 BIT 12 FLAG 11 VXINHBIT
002894,000234: # V37FLAG 114 BIT 6 FLAG 7 V37FLBIT
002895,000235: # V67FLAG 112 BIT 8 FLAG 7 V67FLBIT
002896,000236: # V82EMFLG 118 BIT 2 FLAG 7 V82EMBIT
002897,000237: # XDELVFLG 037 BIT 8 FLAG 2 XDELVBIT
002898,000238: # XDSPFLAG 074 BIT 1 FLAG 4 XDSPBIT
002899,000239: # XORFLG 171 BIT 9 FLAG 11 XORFLBIT
002900,000240: # XOVINFLG 201 BIT 9 FLAG 13 XOVINHIB
002901,000241: # ZOOMFLAG 082 BIT 8 FLAG 5 ZOOMBIT
002902,000242: # 3AXISFLG 084 BIT 6 FLAG 5 3AXISBIT
002903,000243: # 360SW 134 BIT 1 FLAG 8 360SWBIT
002904,000244:
002905,000245:
002906,000246:
002907,000247: # ASSIGNMENT AND DESCRIPTION OF FLAGWORDS
002908,000248:
002909,000249:
002910,000250: 26,2024 0074 FLAGWRD0 = STATE +0 # (000-014)
002911,000251:
002912,000252: # (SET) (RESET)
002913,000253:
002914,000254: # BIT 15 FLAG 0 (S)
002915,000255: 26,2024 NEED2FLG = 000D # DISPLAY DAP RATES CHECK BIT 4 OF THIS
002916,000256: 26,2024 4735 NEED2BIT = BIT15 # ON FDAI NEEDLES. WORD FOR DISPLAY
002917,000257: # MODES (1 OR 2).
002918,000258:
002919,000259: # BIT 14 FLAG 0 (S)
002920,000260: 26,2024 JSWITCH = 001D # INTEGRATION OF W INTEGRATION OF STATE
002921,000261: 26,2024 4736 JSWCHBIT = BIT14 # MATRIX VECTOR
002922,000262:
002923,000263:
002924,000264: # BIT 13 FLAG 0 (S)
002925,000265: 26,2024 MIDFLAG = 002D # INTEGRATION WITH INTEGRATION WITHOUT
002926,000266: # SECONDARY BODY AND SOLAR PERTURBATIONS
002927,000267: 26,2024 4737 MIDFLBIT = BIT13 # SOLAR PERTURBATIONS
002928,000268:
002929,000269:
002930,000270: # BIT 12 FLAG 0 (L)
002931,000271: 26,2024 MOONFLAG = 003D # MOON IS SPHERE OF EARTH IS SPHERE OF
002932,000272: 26,2024 4740 MOONBIT = BIT12 # INFLUENCE INFLUENCE
002933,000273:
002934,000274:
002935,000275: # BIT 11 FLAG 0
002936,000276: 26,2024 P21FLAG = 004D # USE BASE VECTORS 1ST PASS -- CALC-
002937,000277: 26,2024 4741 P21FLBIT = BIT11 # ALREADY CALCULATED ULATE BASE VECTORS
Page 67 |
002939,000279:
002940,000280:
002941,000281: # BIT 10 FLAG 0
002942,000282: 26,2024 FSPASFLG = 005D # FIRST PASS THROUGH NOT FIRST PASS THRU
002943,000283: 26,2024 4742 FSPASBIT = BIT10 # REPOSITION ROUTINE REPOSITION ROUTINE
002944,000284:
002945,000285:
002946,000286: # BIT 9 FLAG 0 (S)
002947,000287: 26,2024 P25FLAG = 006D # P25 OPERATING P25 NOT OPERATING
002948,000288: 26,2024 4743 P25FLBIT = BIT9
002949,000289:
002950,000290:
002951,000291: # BIT 8 FLAG 0 (S)
002952,000292: 26,2024 IMUSE = 007D # IMU IN USE IMU NOT IN USE
002953,000293: 26,2024 4744 IMUSEBIT = BIT8
002954,000294:
002955,000295:
002956,000296: # BIT 7 FLAG 0 (S)
002957,000297: 26,2024 RNDVZFLG = 008D # P20 RUNNING (RADAR P20 NOT RUNNING
002958,000298: 26,2024 4745 RNDVZBIT = BIT7 # IN USE)
002959,000299:
002960,000300:
002961,000301: # BIT 6 FLAG 0 (S)
002962,000302: 26,2024 RRNBSW = 009D # RADAR TARGET IN RADAR TARGET IN
002963,000303: 26,2024 4746 RRNBBIT = BIT6 # NB COORDINATES SM COORDINATES
002964,000304:
002965,000305:
002966,000306: # BIT 5 FLAG 0 (S)
002967,000307: 26,2024 LOKONSW = 010D # RADAR LOCK-ON RADAR LOCK-ON NOT
002968,000308: 26,2024 4747 LOKONBIT = BIT5 # DESIRED DESIRED
002969,000309:
002970,000310:
002971,000311: # BIT 4 FLAG 0 (S)
002972,000312: 26,2024 NEEDLFLG = 011D # TOTAL ATTITUDE A/P FOLLOWING
002973,000313: 26,2024 4750 NEEDLBIT = BIT4 # ERROR DISPLAYED ERROR DISPLAYED
002974,000314:
002975,000315:
002976,000316: # BIT 3 FLAG 0
002977,000317: 26,2024 FREEFLAG = 012D # (USED BY P51-53 TEMP IN MANY DIFFERENT
002978,000318: # ROUTINES & BY LUNAR + SOLAR EPHEMERIDES)
002979,000319: 26,2024 4751 FREEFBIT = BIT3
002980,000320:
002981,000321:
002982,000322: # BIT 2 FLAG 0
The following line is missing the "D" of the expected "013D", resulting in R10FLAG evaluating to the same thing as NEEDLFLG (11D). This might potentially cause the flags to conflict with each other. The D may have been accidentally dropped, since the comments for R10FLAG below were rewritten to better describe its purpose in Zerlina (which would have necessitated entirely new cards being punched). |
002988,000328: 26,2024 R10FLAG = 013 # LATVEL DISPLAYED LATVEL AND FORVEL
002989,000329: 26,2024 4752 R10FLBIT = BIT2 # IN INERTIAL AXES. DISPLAYED IN LM
002990,000330: # FORVEL ZERO. BODY AXES (ROUGHLY).
002991,000331:
002992,000332:
002993,000333:
Page 68 |
002995,000335: 26,2024 P66PROFL = 014D # CONTINUE P66 STOP P66
002996,000336: 26,2024 4753 P66PROBT = BIT1 # HORIZONTAL HORIZONTAL VEL
002997,000337: # VELOCITY NULLING NULLING
002998,000338:
002999,000339:
003000,000340: 26,2024 0075 FLAGWRD1 = STATE +1 # (015-029)
003001,000341:
003002,000342: # (SET) (RESET)
003003,000343:
003004,000344: # BIT 15 FLAG 1 (S)
003005,000345: 26,2024 NJETSFLG = 015D # TWO JET RCS BURN FOUR JET RCS BURN
003006,000346: 26,2024 4735 NJETSBIT = BIT15
003007,000347:
003008,000348:
003009,000349: # BIT 14 FLAG 1 (L)
003010,000350: 26,2024 DIDFLAG = 016D # INERTIAL DATA IS PERFORM DATA DISPLAY
003011,000351: 26,2024 4736 DIDFLBIT = BIT14 # AVAILABLE INITIALIZATION FUNCS
003012,000352:
003013,000353:
003014,000354: # BIT 13 FLAG 1 (S)
003015,000355: 26,2024 ERADFLAG = 017D # COMPUTE REARTH USE CONSTANT REARTH
003016,000356: 26,2024 4737 ERADFBIT = BIT13 # FISCHER ELLIPSOID PAD RADIUS
003017,000357:
003018,000358:
003019,000359: # BIT12 FLAG 1
003020,000360: 26,2024 RODFLAG = 018D # IF IN P66, NORMAL IF IN P66, RE-INIT-
003021,000361: 26,2024 4740 RODFLBIT = BIT12 # OPERATION CONTINUES. IALIZATION IS PER-
003022,000362: # RESTART CLEARS FLAG FORMED AND FLAG IS
003023,000363:
003024,000364:
003025,000365: # BIT 11 FLAG 1
003026,000366: 26,2024 NOTERFLG = 019D # TERRAIN MODEL TERRAIN MODEL
003027,000367: 26,2024 4741 NOTERBIT = BIT11 # INHIBITED PERMITTED
003028,000368:
003029,000369:
003030,000370: # BIT 10 FLAG 1 (L)
003031,000371: 26,2024 R61FLAG = 020D # RUN R61 LEM RUN R65 LEM
003032,000372: 26,2024 4742 R61FLBIT = BIT10
003033,000373:
003034,000374:
003035,000375: # BIT 9 FLAG 1
003036,000376: 26,2024 ALW66FLG = 021D # P66 SELECTION P66 CANNOT BE
003037,000377: 26,2024 4743 ALW66BIT = BIT9 # ALLOWED NOW SELECTED NOW
003038,000378:
003039,000379:
003040,000380: # BIT 8 FLAG 1 (S)
003041,000381: 26,2024 VEHUPFLG = 022D # CSM STATE VECTOR LEM STATE VECTOR
003042,000382: 26,2024 4744 VEHUPBIT = BIT8 # BEING UPDATED BEING UPDATED
003043,000383:
003044,000384:
Page 69 |
003046,000386: # BIT 7 FLAG 1 (S)
003047,000387: 26,2024 UPDATFLG = 023D # UPDATING BY MARKS UPDATING BY MARKS
003048,000388: 26,2024 4745 UPDATBIT = BIT7 # ALLOWED NOT ALLOWED
003049,000389:
003050,000390:
003051,000391: # BIT 6 FLAG 1 (S)
003052,000392: 26,2024 NOUPFLAG = 024D # NEITHER CSM EITHER STATE
003053,000393: # NOR LM STATE VECTOR VECTOR MAY BE
003054,000394: 26,2024 4746 NOUPFBIT = BIT6 # MAY BE UPDATED UPDATED
003055,000395:
003056,000396:
003057,000397: # BIT 5 FLAG 1 (S)
003058,000398: 26,2024 TRACKFLG = 025D # TRACKING ALLOWED TRACKING NOT ALLOWED
003059,000399: 26,2024 4747 TRACKBIT = BIT5
003060,000400:
003061,000401:
003062,000402: # BIT 4 FLAG 1
003063,000403: # = 026D
003064,000404: # = BIT4
003065,000405:
003066,000406:
003067,000407: # BIT 3 FLAG 1 (S)
003068,000408: 26,2024 SLOPESW = 027D # ITERATE WITH BIAS ITERATE WITH REGULAR
003069,000409: # METHOD IN ITERATOR FALSI METHOD IN
003070,000410: 26,2024 4751 SLOPEBIT = BIT3 # ITERATOR
003071,000411:
003072,000412:
003073,000413: # BIT 2 FLAG 1 (S)
003074,000414: 26,2024 GUESSW = 028D # NO STARTING VALUE STARTING VALUE FOR
003075,000415: 26,2024 4752 GUESSBIT = BIT2 # FOR ITERATION ITERATION EXISTS
003076,000416:
003077,000417:
003078,000418: # BIT 1 FLAG 1
003079,000419: # = 029D
003080,000420:
003081,000421:
003082,000422: 26,2024 0076 FLAGWRD2 = STATE +2 # (030-044)
003083,000423:
003084,000424: # (SET) (RESET)
003085,000425:
003086,000426: # BIT 15 FLAG 2 (S)
003087,000427: 26,2024 DRIFTFLG = 030D # T3RUPT CALLS GYRO T3RUPT DOES NO GYRO
003088,000428: 26,2024 4735 DRFTBIT = BIT15 # COMPENSATION COMPENSATION
003089,000429:
003090,000430:
003091,000431: # BIT 14 FLAG 2 (S)
003092,000432: 26,2024 SRCHOPTN = 031D # RADAR IN AUTOMATIC RADAR NOT IN AUTO-
003093,000433: 26,2024 4736 SRCHOBIT = BIT14 # SEARCH OPTION(R24) MATIC SEARCH OPTION
003094,000434:
003095,000435:
Page 70 |
003097,000437: # BIT 13 FLAG 2 (S)
003098,000438: 26,2024 ACMODFLG = 032D # MANUAL ACQUISITION AUTO ACQUISITION
003099,000439: 26,2024 4737 ACMODBIT = BIT13 # BY RENDESVOUS RADAR BY RENDESVOUS RADAR
003100,000440:
003101,000441:
003102,000442: # BIT 12 FLAG 2 (S)
003103,000443: 26,2024 LOSCMFLG = 033D # LINE OF SIGHT BEING LINE OF SIGHT NOT
003104,000444: # COMPUTED (R21) BEING COMPUTED
003105,000445: 26,2024 4740 LOSCMBIT = BIT12
003106,000446:
003107,000447:
003108,000448: # BIT 11 FLAG 2 (S)
003109,000449: 26,2024 STEERSW = 034D # SUFFICIENT THRUST INSUFFICIENT THRUST
003110,000450: 26,2024 4741 STEERBIT = BIT11 # IS PRESENT IS PRESENT
003111,000451:
003112,000452:
003113,000453: # BIT 10 FLAG 2 (S)
003114,000454: 26,2024 SERVOVER = 35D # GUIDANCE PORTION SERVICER PORTION
003115,000455: # OF SERVICER JOB OF SERVICER JOB
003116,000456: 26,2024 4742 SEROVBIT = BIT10 # IS IN PROGRESS IS IN PROGRESS
003117,000457:
003118,000458:
003119,000459: # BIT 9 FLAG 2 (S)
003120,000460: 26,2024 IMPULSW = 036D # MINIMUM IMPULSE STEERING BURN (NO
003121,000461: # BURN (CUTOFF TIME CUTOFF TIME YET
003122,000462: 26,2024 4743 IMPULBIT = BIT9 # SPECIFIED) AVAILABLE)
003123,000463:
003124,000464:
003125,000465: # BIT 8 FLAG 2 (S)
003126,000466: 26,2024 XDELVFLG = 037D # EXTERNAL DELTAV VG LAMBERT (AIMPOINT)
003127,000467: 26,2024 4744 XDELVBIT = BIT8 # COMPUTATION VG COMPUTATION
003128,000468:
003129,000469:
003130,000470: # BIT 7 FLAG 2 (S)
003131,000471: 26,2024 ETPIFLAG = 038D # ELEVATION ANGLE TPI TIME SUPPLIED
003132,000472: # SUPPLIED FOR FOR P34,74 TO COMPUT
003133,000473: 26,2024 4745 ETPIBIT = BIT7 # P34,74 ELEVATION
003134,000474:
003135,000475:
003136,000476: # BIT 6 FLAG 2 (S)
003137,000477: 26,2024 FINALFLG = 039D # LAST PASS THROUGH INTERIM PASS THROUGH
003138,000478: # RENDEZVOUS PROGRAM RENDEZVOUS PROGRAM
003139,000479: 26,2024 4746 FINALBIT = BIT6 # COMPUTATIONS COMPUTATIONS
003140,000480:
003141,000481:
003142,000482: # BIT 5 FLAG 2 (S)
003143,000483: 26,2024 AVFLAG = 040D # LEM IS ACTIVE CSM IS ACTIVE
003144,000484: 26,2024 4747 AVFLBIT = BIT5 # VEHICLE VEHICLE
003145,000485:
003146,000486:
Page 71 |
003148,000488: # BIT 4 FLAG 2 (S)
003149,000489: 26,2024 PFRATFLG = 041D # PREFERRED ATTITUDE PREFERRED ATTITUDE
003150,000490: 26,2024 4750 PFRATBIT = BIT4 # COMPUTED NOT COMPUTED
003151,000491:
003152,000492:
003153,000493: # BIT 3 FLAG 2 (S)
003154,000494: 26,2024 CALCMAN3 = 042D # NO FINAL ROLL FINAL ROLL IS
003155,000495: 26,2024 4751 CALC3BIT = BIT3 # NECESSARY
003156,000496:
003157,000497:
003158,000498: # BIT 2 FLAG 2 (S)
003159,000499: 26,2024 CALCMAN2 = 043D # PERFORM MANEUVER BYPASS STARTING
003160,000500: 26,2024 4752 CALC2BIT = BIT2 # STARTING PROCEDURE PROCEDURE
003161,000501:
003162,000502:
003163,000503: # BIT 1 FLAG 2 (S)
003164,000504: 26,2024 NODOFLAG = 044D # V37 NOT PERMITTED V37 PERMITTED
003165,000505: 26,2024 4753 NODOBIT = BIT1
003166,000506:
003167,000507:
003168,000508: 26,2024 0077 FLAGWRD3 = STATE +3 # (045-059)
003169,000509:
003170,000510: # (SET) (RESET)
003171,000511:
003172,000512: # BIT 15 FLAG 3
003173,000513: 26,2024 POOHFLAG = 045D # INHIBIT BACKWARDS ALLOW BACKWARDS
003174,000514: 26,2024 4735 POOHBIT = BIT15 # INTEGRATION INTEGRATION
003175,000515:
003176,000516:
003177,000517: # BIT 14 FLAG 3 (S)
003178,000518: 26,2024 GLOKFAIL = 046D # GIMBAL LOCK HAS NOT IN GIMBAL LOCK
003179,000519: 26,2024 4736 GLOKFBIT = BIT14 # OCCURRED
003180,000520:
003181,000521: # BIT 13 FLAG 3 *** PROTECTED FROM FRESH START ***
003182,000522: 26,2024 REFSMFLG = 047D # REFSMMAT GOOD REFSMMAT NO GOOD
003183,000523: 26,2024 4737 REFSMBIT = BIT13
003184,000524:
003185,000525:
003186,000526: # BIT 12 FLAG 3 (S)
003187,000527: 26,2024 LUNAFLAG = 048D # LUNAR LAT-LONG EARTH LAT-LONG
003188,000528: 26,2024 4740 LUNABIT = BIT12
003189,000529:
003190,000530:
003191,000531: # BIT 11 FLAG 3 (L)
003192,000532: 26,2024 NODOP07 = 049D # SYSTEM TESTS SYSTEM TESTS
003193,000533: 26,2024 4741 NOP07BIT = BIT11 # NOT ALLOWED ALLOWED
003194,000534:
003195,000535:
003196,000536: # BIT 10 FLAG 3 (S)
Page 72 |
003198,000538: 26,2024 VFLAG = 050D # LESS THAN TWO STARS TWO STARS IN FIELD
003199,000539: 26,2024 4742 VFLAGBIT = BIT10 # IN FIELD OF VIEW OF VIEW
003200,000540:
003201,000541:
003202,000542: # BIT 9 FLAG 3 (S)
003203,000543: 26,2024 R04FLAG = 051D # R04 RUNNING R04 NOT RUNNING
003204,000544: 26,2024 4743 R04FLBIT = BIT9
003205,000545:
003206,000546:
003207,000547: # BIT 8 FLAG 3 (S)
003208,000548: 26,2024 PRECIFLG = 052D # NORMAL INTEGRATION ENGAGES 4-TIME STEP
003209,000549: # IN POO (POO) LOGIC IN INTE-
003210,000550: 26,2024 4744 PRECIBIT = BIT8 # GRATION
003211,000551:
003212,000552:
003213,000553: # BIT 7 FLAG 3 (S)
003214,000554: 26,2024 CULTFLAG = 053D # STAR OCCULTED STAR NOT OCCULTED
003215,000555: 26,2024 4745 CULTBIT = BIT7
003216,000556:
003217,000557:
003218,000558: # BIT 6 FLAG 3 (S)
003219,000559: 26,2024 ORBWFLAG = 054D # W MATRIX VALID FOR W MATRIX INVALID FOR
003220,000560: 26,2024 4746 ORBWFBIT = BIT6 # ORBITAL NAVIGATION ORBITAL NAVIGATION
003221,000561:
003222,000562:
003223,000563: # BIT 5 FLAG 3 (S)
003224,000564: 26,2024 STATEFLG = 055D # PERMANENT STATE PERMANENT STATE
003225,000565: 26,2024 4747 STATEBIT = BIT5 # VECTOR UPDATED VECTOR NOT UPDATED
003226,000566:
003227,000567:
003228,000568: # BIT 4 FLAG 3 (S)
003229,000569: 26,2024 INTYPFLG = 056D # CONIC INTEGRATION ENCKE INTEGRATION
003230,000570: 26,2024 4750 INTYPBIT = BIT4
003231,000571:
003232,000572:
003233,000573: # BIT 3 FLAG 3 (S)
003234,000574: 26,2024 VINTFLAG = 057D # CSM STATE VECTOR LEM STATE VECTOR
003235,000575: 26,2024 4751 VINTFBIT = BIT3 # BEING INTEGRATED BEING INTEGRATED
003236,000576:
003237,000577:
003238,000578: # BIT 2 FLAG 3 (S)
003239,000579: 26,2024 D6OR9FLG = 058D # DIMENSION OF W IS 9 DIMENSION OF W IS 6
003240,000580: 26,2024 4752 D6OR9BIT = BIT2 # FOR INTEGRATION FOR INTEGRATION
003241,000581:
003242,000582:
003243,000583: # BIT 1 FLAG 3 (S)
003244,000584: 26,2024 DIM0FLAG = 059D # W MATRIX IS TO BE W MATRIX IS NOT TO
003245,000585: 26,2024 4753 DIM0BIT = BIT1 # USED BE USED
003246,000586:
003247,000587:
Page 73 |
003249,000589: 26,2024 0100 FLAGWRD4 = STATE +4 # (060-074)
003250,000590:
003251,000591: # (SET) (RESET)
003252,000592:
003253,000593: # BIT 15 FLAG 4 (S)
003254,000594: 26,2024 MRKIDFLG = 060D # MARK DISPLAY IN NO MARK DISPLAY IN
003255,000595: 26,2024 4735 MRKIDBIT = BIT15 # ENDIDLE ENDIDLE
003256,000596:
003257,000597:
003258,000598: # BIT 14 FLAG 4 (S)
003259,000599: 26,2024 PRIODFLG = 061D # PRIORITY DISPLAY IN NO PRIORITY DISPLAY
003260,000600: 26,2024 4736 PRIODBIT = BIT14 # ENDIDLE IN ENDIDLE
003261,000601:
003262,000602:
003263,000603: # BIT 13 FLAG 4 (S)
003264,000604: 26,2024 NRMIDFLG = 062D # NORMAL DISPLAY IN NO NORMAL DISPLAY
003265,000605: 26,2024 4737 NRMIDBIT = BIT13 # ENDIDLE IN ENDIDLE
003266,000606:
003267,000607:
003268,000608: # BIT 12 FLAG 4 (S)
003269,000609: 26,2024 PDSPFLAG = 063D # P20 SETS SO AS TO LEAVE AS NORMAL DISP
003270,000610: # TURN A NORMAL DIS-
003271,000611: 26,2024 4740 PDSPFBIT = BIT12 # PLAY INTO A PRIORITY
003272,000612: # DISPLAY IN R60
003273,000613:
003274,000614:
003275,000615: # BIT 11 FLAG 4 (S)
003276,000616: 26,2024 MWAITFLG = 064D # HIGHER PRIORITY NO HIGHER PRIORITY
003277,000617: # DISPLAY OPERATING DISPLAY OPERATING
003278,000618: 26,2024 4741 MWAITBIT = BIT11 # WHEN MARK DISPLAY WHEN MARK DISPLAY
003279,000619: # INITIATED INITIATED
003280,000620:
003281,000621: # BIT 10 FLAG 4 (S)
003282,000622: 26,2024 NWAITFLG = 065D # HIGHER PRIORITY NO HIGHER PRIORITY
003283,000623: # DISPLAY OPERATING DISPLAY OPERATING
003284,000624: 26,2024 4742 NWAITBIT = BIT10 # WHEN NORMAL WHEN NORMAL DISPLAY
003285,000625: # DISPLAY INITIATED INITIATED
003286,000626:
003287,000627: # BIT 9 FLAG 4 (S)
003288,000628: 26,2024 MRKNVFLG = 066D # ASTRONAUT USING ASTRONAUT NOT USING
003289,000629: # KEYBOARD WHEN MARK KEYBOARD WHEN MARK
003290,000630: 26,2024 4743 MRKNVBIT = BIT9 # DISPLAY INITIATED DISPLAY INITIATED
003291,000631:
003292,000632:
003293,000633: # BIT 8 FLAG 4 (S)
003294,000634: 26,2024 NRMNVFLG = 067D # ASTRONAUT USING ASTRONAUT NOT USING
003295,000635: # KEYBOARD WHEN KEYBOARD WHEN
003296,000636: 26,2024 4744 NRMNVBIT = BIT8 # NORMAL DISPLAY NORMAL DISPLAY
003297,000637: # INITIATED INITIATED
003298,000638:
Page 74 |
003300,000640: # BIT 7 FLAG 4 (S)
003301,000641: 26,2024 PRONVFLG = 068D # ASTRONAUT USING ASTRONAUT NOT USING
003302,000642: # KEYBOARD WHEN KEYBOARD WHEN
003303,000643: 26,2024 4745 PRONVBIT = BIT7 # PRIORITY DISPLAY PRIORITY DISPLAY
003304,000644: # INITIATED INITIATED
003305,000645:
003306,000646: # BIT 6 FLAG 4 (S)
003307,000647: 26,2024 PINBRFLG = 069D # ASTRONAUT HAS ASTRONAUT HAS NOT
003308,000648: # INTERFERED WITH INTERFERED WITH
003309,000649: 26,2024 4746 PINBRBIT = BIT6 # EXISTING DISPLAY EXISTING DISPLAY
003310,000650:
003311,000651:
003312,000652: # BIT 5 FLAG 4 (S)
003313,000653: 26,2024 MRUPTFLG = 070D # MARK DISPLAY MARK DISPLAY NOT
003314,000654: # INTERRUPTED BY INTERRUPTED BY
003315,000655: 26,2024 4747 MRUPTBIT = BIT5 # PRIORITY DISPLAY PRIORITY DISPLAY
003316,000656:
003317,000657:
003318,000658: # BIT 4 FLAG 4 (S)
003319,000659: 26,2024 NRUPTFLG = 071D # NORMAL DISPLAY NORMAL DISPLAY NOT
003320,000660: # INTERRUPTED BY INTERRUPTED BY
003321,000661: 26,2024 4750 NRUPTBIT = BIT4 # PRIORITY OR MARK PRIORITY OR MARK
003322,000662: # DISPLAY DISPLAY
003323,000663:
003324,000664: # BIT 3 FLAG 4 (S)
003325,000665: 26,2024 MKOVFLAG = 072D # MARK DISPLAY OVER NO MARK DISPLAY OVER
003326,000666: 26,2024 4751 MKOVBIT = BIT3 # NORMAL NORMAL
003327,000667:
003328,000668: # BIT 2 FLAG 4
003329,000669: # = 073D
003330,000670:
003331,000671:
003332,000672:
003333,000673: # BIT 1 FLAG 4 (S)
003334,000674: 26,2024 XDSPFLAG = 074D # MARK DISPLAY NOT NO SPECIAL MARK
003335,000675: 26,2024 4753 XDSPBIT = BIT1 # TO BE INTERRUPTED INFORMATION
003336,000676:
003337,000677:
003338,000678: 26,2024 0101 FLAGWRD5 = STATE +5 # (075-089)
003339,000679: # (SET) (RESET)
003340,000680:
003341,000681: # BIT 15 FLAG 5 (S)
003342,000682: 26,2024 DSKYFLAG = 075D # DISPLAYS SENT TO NO DISPLAYS TO DSKY
003343,000683: 26,2024 4735 DSKYFBIT = BIT15 # DSKY
003344,000684:
003345,000685:
003346,000686: # BIT 14 FLAG 5
003347,000687: # = 076D
003348,000688: # = BIT14
Page 75 |
003350,000690:
003351,000691:
003352,000692: # BIT 13 FLAG 5 (S,L)
003353,000693: 26,2024 SNUFFER = 077D # U,V JETS DISABLED U,V JETS ENABLED
003354,000694: # DURING DPS DURING DPS
003355,000695: 26,2024 4737 SNUFFBIT = BIT13 # BURNS (V65) BURNS (V75)
003356,000696:
003357,000697:
003358,000698: # BIT 12 FLAG 5 (S)
003359,000699: 26,2024 NOTHROTL = 078D # INHIBIT FULL PERMIT FULL THROTTLE
003360,000700: 26,2024 4740 NOTHRBIT = BIT12 # THROTTLE
003361,000701:
003362,000702:
003363,000703: # BIT 11 FLAG 5 (S,L)
003364,000704: 26,2024 R77FLAG = 079D # R77 IS ON, R77 IS NOT ON.
003365,000705: # SUPPRESS ALL RADAR
003366,000706: # ALARMS AND TRACKER
003367,000707: 26,2024 4741 R77FLBIT = BIT11 # FAILS
003368,000708:
003369,000709:
003370,000710: # BIT 10 FLAG 5 (S)
003371,000711: 26,2024 RNGSCFLG = 080D # SCALE CHANGE HAS NO SCALE CHANGE HAS
003372,000712: # OCCURRED DURING OCCURRED DURING
003373,000713: 26,2024 4742 RNGSCBIT = BIT10 # RR READING RR READING
003374,000714:
003375,000715:
003376,000716: # BIT 9 FLAG 5 (S)
003377,000717: 26,2024 DMENFLG = 081D # DIMENSION OF W IS 9 DIMENSION OF W IS 6
003378,000718: 26,2024 4743 DMENFBIT = BIT9 # FOR INCORPORATION FOR INCORPORATION
003379,000719:
003380,000720:
003381,000721: # BIT 8 FLAG 5 (S)
003382,000722: 26,2024 ZOOMFLAG = 082D # THROTTLE-UP HAS THROTTLE-UP HAS NOT
003383,000723: 26,2024 4744 ZOOMBIT = BIT8 # OCCURRED IN P63. YET OCCURRED IN P63.
003384,000724:
003385,000725:
003386,000726: # BIT 7 FLAG 5 (S)
003387,000727: 26,2024 ENGONFLG = 083D # ENGINE TURNED ON ENGINE TURNED OFF
003388,000728: 26,2024 4745 ENGONBIT = BIT7
003389,000729:
003390,000730:
003391,000731: # BIT 6 FLAG 5 (S)
003392,000732: 26,2024 3AXISFLG = 084D # MANEUVER SPECIFIED MANEUVER SPECIFIED
003393,000733: # BY THREE AXES BY ONE AXIS; R60
003394,000734: 26,2024 4746 3AXISBIT = BIT6 # CALLS VECPOINT.
003395,000735:
003396,000736:
003397,000737: # BIT 5 FLAG 5
003398,000738: 26,2024 AORBSFLG = 085D # PREFER PAXIS JET PREFER PAXIS JET
003399,000739: 26,2024 4747 AORBSYST = BIT5 # PAIRS 7,15 AND 8,16 PAIRS 4,12 AND 3,11
Page 76 |
003401,000741:
003402,000742:
003403,000743: # BIT 4 FLAG 5 (S)
003404,000744: 26,2024 NORRMON = 086D # BYPASS RR GIMBAL PERFORM
003405,000745: 26,2024 4750 NORRMBIT = BIT4 # MONITOR RR GIMBAL MONITOR
003406,000746:
003407,000747:
003408,000748: # BIT 3 FLAG 5 (S)
003409,000749: 26,2024 SOLNSW = 087D # LAMBERT DOES NOT LAMBERT CONVERGES OR
003410,000750: # CONVERGE,OR TIME-RADTIME-RADIUS NON
003411,000751: 26,2024 4751 SOLNSBIT = BIT3 # NEARLY CIRCULAR CIRCULAR
003412,000752:
003413,000753:
003414,000754: # BIT 2 FLAG 5 (S)
003415,000755: 26,2024 MGLVFLAG = 088D # LOCAL VERTICAL MIDDLE GIMBAL ANGLE
003416,000756: # COORDINATES COMPUTED
003417,000757: 26,2024 4752 MGLVFBIT = BIT2 # COMPUTED
003418,000758:
003419,000759:
003420,000760: # BIT 1 FLAG 5 (S)
003421,000761: 26,2024 RENDWFLG = 089D # W MATRIX VALID W MATRIX INVALID
003422,000762: # FOR RENDEZVOUS FOR RENDEZVOUS
003423,000763: 26,2024 4753 RENDWBIT = BIT1 # NAVIGATION NAVIGATION
003424,000764:
003425,000765:
003426,000766: 26,2024 0102 FLAGWRD6 = STATE +6 # (090-104)
003427,000767:
003428,000768: # (SET) (RESET)
003429,000769:
003430,000770: # BIT 15 FLAG 6 (S)
003431,000771: 26,2024 S32.1F1 = 090D # DELTA V AT CSI TIME DVT1 LESS THEN MAX
003432,000772: 26,2024 4735 S32BIT1 = BIT15 # ONE EXCEEDS MAX
003433,000773:
003434,000774:
003435,000775: # BIT 14 FLAG 6 (S)
003436,000776: 26,2024 S32.1F2 = 091D # FIRST PASS OF REITERATION OF
003437,000777: 26,2024 4736 S32BIT2 = BIT14 # NEWTON ITERATION NEWTON
003438,000778:
003439,000779:
003440,000780: # BIT 13 FLAG 6 (S)
003441,000781: 26,2024 S32.1F3A = 092D # BIT 13 AND BIT 12 FUNCTION AS AN ORDERED
003442,000782: 26,2024 4737 S32BIT3A = BIT13 # PAIR (13,12) INDICATING THE POSSIBLE OC-
003443,000783: # CURRANCE OF 2NEWTON ITERATIONS FOR S32.1
003444,000784: # IN THE PROGRAM IN THE FOLLOWING ORDER:
003445,000785: # BIT 12 FLAG 6 (0,1) (I.E.BIT 13 RESET,BIT 12 SET)
003446,000786: 26,2024 S32.1F3B = 093D # = FIRST NEWTON ITERATION BEING DONE
003447,000787: 26,2024 4740 S32BIT3B = BIT12 # (0,0)= FIRST PASS OF SECOND NEWT.ITERAT.
003448,000788: # (1,1)= 50 FT/SEC STAGE OF SEC. NEWT.ITER
003449,000789: # (1,0)= REMAINDER OF SECOND NEWTON ITERA.
003450,000790:
003451,000791:
Page 77 |
003453,000793: # BIT 11 FLAG 6 (S)
003454,000794:
003455,000795:
003456,000796: # BIT 10 FLAG 6 (S)
003457,000797: 26,2024 GMBDRVSW = 095D # TRIMGIMB OVER TRIMGIMB NOT OVER
003458,000798: 26,2024 4742 GMBDRBIT = BIT10
003459,000799:
003460,000800:
003461,000801: # BIT 9 FLAG 6
003462,000802: # = 096D
003463,000803: # = BIT9
003464,000804:
003465,000805:
003466,000806: # BIT 8 FLAG 6 (S)
003467,000807: 26,2024 MUNFLAG = 097D # SERVICER CALLS SERVICER CALLS
003468,000808: 26,2024 4744 MUNFLBIT = BIT8 # MUNRVG CALCRVG
003469,000809:
003470,000810:
003471,000811: # BIT 7 FLAG 6 (L)
003472,000812: 26,2024 = 098D
003473,000813: 26,2024 = BIT7
003474,000814:
003475,000815:
003476,000816: # BIT 6 FLAG 6 (L)
003477,000817: 26,2024 REDFLAG = 099D # LANDING SITE LANDING SITE
003478,000818: # REDESIGNATION REDESIGNATION NOT
003479,000819: 26,2024 4746 REDFLBIT = BIT6 # PERMITTED PERMITTED
003480,000820:
003481,000821:
003482,000822: # BIT 5 FLAG 6
003483,000823: # = 100D
003484,000824:
003485,000825:
003486,000826: # BIT 4 FLAG 6
003487,000827: # = 101D
003488,000828:
003489,000829: # BIT 3 FLAG 6 (S)
003490,000830: 26,2024 NTARGFLG = 102D # ASTRONAUT DID ASTRONAUT DID NOT
003491,000831: # OVERWRITE DELTA OVERWRITE DELTA
003492,000832: 26,2024 4751 NTARGBIT = BIT3 # VELOCITY AT TPI VELOCITY
003493,000833: # OR TPM (P34,35)
003494,000834:
003495,000835: # BIT 2 FLAG 6
003496,000836: 26,2024 AUXFLAG = 103D # PROVIDING IDLEFLAG SERVICER WILL SKIP
003497,000837: 26,2024 4752 AUXFLBIT = BIT2 # IS NOT SET, SERV- DVMON ON ITS NEXT
003498,000838: # ICER WILL EXERCISE PASS EVEN IF THE
003499,000839: # DVMON ON ITS NEXT IDLEFLAG IS NOT SET.
003500,000840: # PASS. IT WILL THEN SET
003501,000841: # AUXFLAG.
003502,000842:
Page 78 |
003504,000844: # BIT 1 FLAG 6 (L)
003505,000845: 26,2024 ATTFLAG = 104D # LEM ATTITUDE EXISTS NO LEM ATTITUDE
003506,000846: # IN MOON-FIXED AVAILABLE IN MOON-
003507,000847: 26,2024 4753 ATTFLBIT = BIT1 # COORDINATES FIXED COORDINATES
003508,000848:
003509,000849:
003510,000850: 26,2024 0103 FLAGWRD7 = STATE +7 # (105-119)
003511,000851:
003512,000852: # (SET) (RESET)
003513,000853:
003514,000854: # BIT 15 FLAG 7 (S)
003515,000855: 26,2024 ITSWICH = 105D # P34;TPI TIME TO BE TPI HAS BEEN
003516,000856: 26,2024 4735 ITSWBIT = BIT15 # COMPUTED COMPUTED
003517,000857:
003518,000858:
003519,000859: # BIT 14 FLAG 7 (S)
003520,000860: 26,2024 MANUFLAG = 106D # ATTITUDE MANEUVER NO ATTITUDE MANEUVER
003521,000861: # GOING DURING RR DURING RR SEARCH
003522,000862: 26,2024 4736 MANUFBIT = BIT14 # SEARCH
003523,000863:
003524,000864:
003525,000865: # BIT 13 FLAG 7 (S)
003526,000866: 26,2024 IGNFLAG = 107D # TIG HAS ARRIVED TIG HAS NOT ARRIVED
003527,000867: 26,2024 4737 IGNFLBIT = BIT13
003528,000868:
003529,000869:
003530,000870: # BIT 12 FLAG 7 (S)
003531,000871: 26,2024 ASTNFLAG = 108D # ASTRONAUT HAS ASTRONAUT HAS NOT
003532,000872: 26,2024 4740 ASTNBIT = BIT12 # OKAYED IGNITION OKAYED IGNITION
003533,000873:
003534,000874:
003535,000875: # BIT 11 FLAG 7 (L)
003536,000876: 26,2024 SWANDISP = 109D # LANDING ANALOG LANDING ANALOG
003537,000877: 26,2024 4741 SWANDBIT = BIT11 # DISPLAYS ENABLED DISPLAYS SUPPRESSED
003538,000878:
003539,000879:
003540,000880: # BIT 10 FLAG 7 (S)
003541,000881: 26,2024 NORMSW = 110D # UNIT NORMAL INPUT LAMBERT COMPUTES ITS
003542,000882: 26,2024 4742 NORMSBIT = BIT10 # TO LAMBERT OWN UNIT NORMAL
003543,000883:
003544,000884:
003545,000885: # BIT 9 FLAG 7 (S)
003546,000886: 26,2024 RVSW = 111D # DO NOT COMPUTE COMPUTE FINAL STATE
003547,000887: # FINAL STATE VECTOR VECTOR IN TIME-THETA
003548,000888: 26,2024 4743 RVSWBIT = BIT9 # IN TIME-THETA
003549,000889:
003550,000890:
003551,000891: # BIT 8 FLAG 7 (S)
003552,000892: 26,2024 V67FLAG = 112D # ASTRONAUT OVERWRITE ASTRONAUT DOES NOT
003553,000893: # W-MATRIX INITIAL OVERWRITE W-MATRIX
Page 79 |
003555,000895: 26,2024 4744 V67FLBIT = BIT8 # VALUES INITIAL VALUES
003556,000896:
003557,000897:
003558,000898: # BIT 7 FLAG 7 (S)
003559,000899: 26,2024 IDLEFLAG = 113D # NO DV MONITOR CONNECT DV MONITOR
003560,000900: 26,2024 4745 IDLEFBIT = BIT7
003561,000901:
003562,000902:
003563,000903: # BIT 6 FLAG 7 (S)
003564,000904: 26,2024 V37FLAG = 114D # AVERAGEG (SERVICER) AVERAGEG (SERVICER)
003565,000905: 26,2024 4746 V37FLBIT = BIT6 # RUNNING OFF
003566,000906:
003567,000907:
003568,000908: # BIT 5 FLAG 7 (S)
003569,000909: 26,2024 AVEGFLAG = 115D # AVERAGEG (SERVICER) AVERAGEG (SERVICER)
003570,000910: 26,2024 4747 AVEGFBIT = BIT5 # DESIRED NOT DESIRED
003571,000911:
003572,000912:
003573,000913: # BIT 4 FLAG 7 (S)
003574,000914: 26,2024 UPLOCKFL = 116D # K-KBAR-K FAIL NO K-KBAR-K FAIL
003575,000915: 26,2024 4750 UPLOCBIT = BIT4
003576,000916:
003577,000917:
003578,000918: # BIT 3 FLAG 7 (S)
003579,000919: 26,2024 VERIFLAG = 117D # CHANGED WHEN V33E OCCURS AT END OF P27
003580,000920: 26,2024 4751 VERIFBIT = BIT3
003581,000921:
003582,000922:
003583,000923: # BIT 2 FLAG 7 (L,C)
003584,000924: 26,2024 V82EMFLG = 118D # MOON VICINITY EARTH VICINITY
003585,000925: 26,2024 4752 V82EMBIT = BIT2
003586,000926:
003587,000927:
003588,000928: # BIT 1 FLAG 7 (S)
003589,000929: 26,2024 TFFSW = 119D # CALCULATE TPERIGEE CALCULATE TFF
003590,000930: 26,2024 4753 TFFSWBIT = BIT1
003591,000931:
003592,000932:
003593,000933: 26,2024 0104 FLAGWRD8 = STATE +8D # (120-134)
003594,000934:
003595,000935: # (SET) (RESET)
003596,000936:
003597,000937: # BIT 15 FLAG 8 (S)
003598,000938: 26,2024 RPQFLAG = 120D # RPQ NOT COMPUTED RPQ COMPUTED
003599,000939: # (RPQ = VECTOR BE-
003600,000940: 26,2024 4735 RPQFLBIT = BIT15 # TWEEN SECONDARY BODY
003601,000941: # AND PRIMARY BODY
003602,000942:
003603,000943:
003604,000944: # BIT 14 FLAG 8
Page 80 |
003606,000946: # = 121D
003607,000947: # = BIT14
003608,000948:
003609,000949:
003610,000950: # BIT 13 FLAG 8 (S)
003611,000951: 26,2024 NEWIFLG = 122D # FIRST PASS THROUGH SUCCEEDING ITERATION
003612,000952: 26,2024 4737 NEWIBIT = BIT13 # INTEGRATION OF INTEGRATION
003613,000953:
003614,000954:
003615,000955: # BIT 12 FLAG 8 *** PROTECTED FROM FRESH START ***
003616,000956: 26,2024 CMOONFLG = 123D # PERMANENT CSM STATE PERMANENT CSM STATE
003617,000957: 26,2024 4740 CMOONBIT = BIT12 # IN LUNAR SPHERE IN EARTH SPHERE
003618,000958:
003619,000959:
003620,000960: # BIT 11 FLAG 8 *** PROTECTED FROM FRESH START ***
003621,000961: 26,2024 LMOONFLG = 124D # PERMANENT LM STATE PERMANENT LM STATE
003622,000962: 26,2024 4741 LMOONBIT = BIT11 # IN LUNAR SPHERE IN EARTH SPHERE
003623,000963:
003624,000964:
003625,000965: # BIT 10 FLAG 8 (L)
003626,000966: 26,2024 FLUNDISP = 125D # CURRENT GUIDANCE CURRENT GUIDANCE
003627,000967: 26,2024 4742 FLUNDBIT = BIT10 # DISPLAYS INHIBITED DISPLAYS PERMITTED
003628,000968:
003629,000969:
003630,000970: # BIT 9 FLAG 8 (L)
003631,000971: # = 126D
003632,000972: # = BIT9
003633,000973:
003634,000974:
003635,000975: # BIT 8 FLAG 8 *** PROTECTED FROM FRESH START ***
003636,000976: 26,2024 SURFFLAG = 127D # LM ON LUNAR SURFACE LM NOT ON LUNAR
003637,000977: 26,2024 4744 SURFFBIT = BIT8 # SURFACE
003638,000978:
003639,000979:
003640,000980: # BIT 7 FLAG 8 (S)
003641,000981: 26,2024 INFINFLG = 128D # NO CONIC SOLUTION CONIC SOLUTION
003642,000982: # (CLOSURE THROUGH EXISTS
003643,000983: 26,2024 4745 INFINBIT = BIT7 # INFINITY REQUIRED)
003644,000984:
003645,000985:
003646,000986: # BIT 6 FLAG 8 (S)
003647,000987: 26,2024 ORDERSW = 129D # ITERATOR USES 2ND ITERATOR USES 1ST
003648,000988: 26,2024 4746 ORDERBIT = BIT6 # ORDER MINIMUM MODE ORDER STANDARD MODE
003649,000989:
003650,000990:
003651,000991: # BIT 5 FLAG 8 (S)
003652,000992: 26,2024 APSESW = 130D # RDESIRED OUTSIDE RDESIRED INSIDE
003653,000993: # PERICENTER-APOCENTERPERICENTER-APOCENTER
003654,000994: 26,2024 4747 APSESBIT = BIT5 # RANGE IN TIME-RADI RANGE IN TIME-RADIUS
003655,000995:
003656,000996:
Page 81 |
003658,000998: # BIT 4 FLAG 8 (S)
003659,000999: 26,2024 COGAFLAG = 131D # NO CONIC SOLUTION - CONIC SOLUTION
003660,001000: # TOO CLOSE TO RECTI- EXISTS(COGA DOES NOT
003661,001001: 26,2024 4750 COGAFBIT = BIT4 # LINEAR(COGA OVRFLWS) OVERFLOW)
003662,001002:
003663,001003:
003664,001004: # BIT 3 FLAG 8
003665,001005: # = 132D
003666,001006:
003667,001007: # BIT 2 FLAG 8 (L)
003668,001008: 26,2024 INITALGN = 133D # INITIAL PASS THRU SECOND PASS THRU P57
003669,001009: 26,2024 4752 INITABIT = BIT2 # P57 (CHECK RESET-MILLARD)
003670,001010:
003671,001011:
003672,001012: # BIT 1 FLAG 8 (S)
003673,001013: 26,2024 360SW = 134D # TRANSFER ANGLE NEAR TRANSFER ANGLE NOT
003674,001014: 26,2024 4753 360SWBIT = BIT1 # 360 DEGREES NEAR 360 DEGREES
003675,001015:
003676,001016:
003677,001017: 26,2024 0105 FLAGWRD9 = STATE +9D # (135 - 149)
003678,001018:
003679,001019: # (SET) (RESET)
003680,001020:
003681,001021:
003682,001022: # BIT 15 FLAG 9
003683,001023: # = 135D
003684,001024: # = BIT15
003685,001025:
003686,001026: # BIT 14 FLAG 9 (L)
003687,001027: 26,2024 FLVR = 136D # VERTICAL RISE NON-VERTICAL RISE
003688,001028: 26,2024 4736 FLVRBIT = BIT14 # (ASCENT GUIDANCE)
003689,001029:
003690,001030:
003691,001031: # BIT 13 FLAG 9
003692,001032: 26,2024 P7071FLG = 137D # P70 OR P71 IS USING P12 IS USING THE
003693,001033: 26,2024 4737 P7071BIT = BIT13 # ASCENT GUID. EQS. ASCENT GUID. EQS.
003694,001034:
003695,001035:
003696,001036: # BIT 12 FLAG 9 (L)
003697,001037: 26,2024 FLPC = 138D # NO POSITION CONTROL POSITION CONTROL
003698,001038: 26,2024 4740 FLPCBIT = BIT12 # (ASCENT GUIDANCE)
003699,001039:
003700,001040:
003701,001041: # BIT 11 FLAG 9 (L)
003702,001042: 26,2024 FLPI = 139D # PRE-IGNITION PHASE REGULAR GUIDANCE
003703,001043: 26,2024 4741 FLPIBIT = BIT11 # (ASCENT GUIDANCE)
003704,001044:
003705,001045:
003706,001046: # BIT 10 FLAG 9 (L)
003707,001047: 26,2024 FLRCS = 140D # RCS INJECTION MODE MAIN ENGINE MODE
Page 82 |
003709,001049: 26,2024 4742 FLRCSBIT = BIT10 # (ASCENT GUIDANCE)
003710,001050:
003711,001051:
003712,001052: # BIT 9 FLAG 9 (L)
003713,001053: 26,2024 LETABORT = 141D # ABORT PROGRAMS ABORT PROGRAMS
003714,001054: 26,2024 4743 LETABBIT = BIT9 # ARE ENABLED ARE NOT ENABLED
003715,001055:
003716,001056:
003717,001057: # BIT 8 FLAG 9 (L)
003718,001058: 26,2024 FLAP = 142D # APS CONTINUED ABORT APS ABORT IS NOT A
003719,001059: # AFTER DPS STAGING CONTINUATION
003720,001060: 26,2024 4744 FLAPBIT = BIT8 # (ASCENT GUIDANCE)
003721,001061:
003722,001062:
003723,001063: # BIT 7 FLAG 9 (L)
003724,001064: 26,2024 ABTTGFLG = 143D # J2,K2 PARAMETERS J1,K1 PARAMETERS
003725,001065: 26,2024 4745 ABTTGBIT = BIT7 # USED FOR ABORT USED FOR ABORT
003726,001066: # TARGETING TARGETING
003727,001067:
003728,001068: # BIT 6 FLAG 9 (L)
003729,001069: 26,2024 ROTFLAG = 144D # P70 AND P71 WILL P70 AND P71 WILL NOT
003730,001070: 26,2024 4746 ROTFLBIT = BIT6 # FORCE VEHICLE FORCE VEHICLE
003731,001071: # ROTATION IN THE ROTATION IN THE
003732,001072: # PREFERRED DIRECTION. PREFERRED DIRECTION
003733,001073:
003734,001074: # BIT 5 FLAG 9 (S)
003735,001075: 26,2024 QUITFLAG = 145D # DISCONTINUE INTEGR. CONTINUE INTEGRATION
003736,001076: 26,2024 4747 QUITBIT = BIT5
003737,001077:
003738,001078:
003739,001079: # BIT 4 FLAG 9
003740,001080: # = 146D
003741,001081: # = BIT4
003742,001082:
003743,001083:
003744,001084: # BIT 3 FLAG 9 (L)
003745,001085: 26,2024 MID1FLAG = 147D # INTEGRATE TO TDEC INTEGRATE TO THE
003746,001086: 26,2024 4751 MID1FBIT = BIT3 # THEN-PRESENT TIME
003747,001087:
003748,001088:
003749,001089: # BIT 2 FLAG 9 (L)
003750,001090: 26,2024 MIDAVFLG = 148D # INTEGRATION ENTERED INTEGRATION WAS
003751,001091: # FROM ONE OF MIDTOAV NOT ENTERED VIA
003752,001092: 26,2024 4752 MIDAVBIT = BIT2 # PORTALS MIDTOAV
003753,001093:
003754,001094: # BIT 1 FLAG 9 (S)
003755,001095: 26,2024 AVEMIDSW = 149D # AVETOMID CALLING NO AVETOMID W INTEGR
003756,001096: # FOR W.MATRIX INTEGR ALLOW SET UP RN,VN,
003757,001097: 26,2024 4753 AVEMDBIT = BIT1 # DONT WRITE OVER RN, PIPTIME
003758,001098: # VN,PIPTIME
Page 83 |
003760,001100:
003761,001101:
003762,001102: 26,2024 0106 RASFLAG EQUALS FLGWRD10 # WAS ONLY AN INSTALL- ERASTALL FLAG
003763,001103:
003764,001104:
003765,001105: 26,2024 0106 FLGWRD10 = STATE +10D # (150 - 164)
003766,001106:
003767,001107: # (SET) (RESET)
003768,001108:
003769,001109: # BIT 15 FLAG 10
003770,001110: # = 150D
003771,001111:
003772,001112:
003773,001113: # BIT 14 FLAG 10 (L,C)
003774,001114: 26,2024 INTFLAG = 151D # INTEGRATION IN INTEGRATION NOT IN
003775,001115: 26,2024 4736 INTFLBIT = BIT14 # PROGRESS PROGRESS
003776,001116:
003777,001117:
003778,001118: # BIT 13 FLAG 10 (S,L)
003779,001119: 26,2024 APSFLAG = 152D # ASCENT STAGE DESCENT STAGE
003780,001120: 26,2024 4737 APSFLBIT = BIT13 # ***PROTECTED FROM FRESH START ***
003781,001121:
003782,001122:
003783,001123: # BIT 12 FLAG 10
003784,001124: # = 153D
003785,001125:
003786,001126:
003787,001127: # BIT 11 FLAG 10
003788,001128: # = 154D
003789,001129:
003790,001130:
003791,001131: # BIT 10 FLAG 10
003792,001132: # = 155D
003793,001133:
003794,001134:
003795,001135: # BIT 9 FLAG 10
003796,001136: # = 156D
003797,001137:
003798,001138:
003799,001139: # BIT 8 FLAG 10
003800,001140: # = 157D
003801,001141:
003802,001142:
003803,001143: # BIT 7 FLAG 10 (L,C)
003804,001144: 26,2024 REINTFLG = 158D # INTEGRATION ROUTINE INTEGRATION ROUTINE
003805,001145: 26,2024 4745 REINTBIT = BIT7 # TO BE RESTARTED NOT TO BE RESTARTED
003806,001146:
003807,001147:
003808,001148: # BIT 6 FLAG 10
003809,001149: # = 159D
Page 84 |
003811,001151:
003812,001152:
003813,001153: # BIT 5 FLAG 10
003814,001154: # = 160D
003815,001155:
003816,001156:
003817,001157: # BIT 4 FLAG 10
003818,001158: # = 161D
003819,001159:
003820,001160:
003821,001161: # BIT 3 FLAG 10
003822,001162: # = 162D
003823,001163:
003824,001164:
003825,001165: # BIT 2 FLAG 10
003826,001166: # = 163D
003827,001167:
003828,001168:
003829,001169: # BIT 1 FLAG 10
003830,001170: # = 164D
003831,001171:
003832,001172:
003833,001173:
003834,001174:
003835,001175:
003836,001176: 26,2024 0107 FLGWRD11 = STATE +11D # (165 - 179)
003837,001177:
003838,001178: # (SET) (RESET)
003839,001179:
003840,001180: # BIT 15 FLAG 11 (L)(R12)
003841,001181: 26,2024 LRBYPASS = 165D # BYPASS ALL LANDING DO NOT BYPASS LR
003842,001182: 26,2024 4735 LRBYBIT = BIT15 # RADAR UPDATES UPDATES
003843,001183:
003844,001184:
003845,001185: # BIT 14 FLAG 11
003846,001186: 26,2024 VFAILFLG = 166D # LANDING RADAR VEL LANDING RADAR VEL
003847,001187: 26,2024 4736 VFAILBIT = BIT14 # FAILED REAS TEST PASS REAS TEST
003848,001188:
003849,001189:
003850,001190: # BIT 13 FLAG 11
003851,001191: 26,2024 HFAILFLG = 167D # LANDING RADAR ALT LANDING RADAR VEL
003852,001192: 26,2024 4737 HFAILBIT = BIT13 # FAILED REAS TEST PASS REAS TEST
003853,001193:
003854,001194:
003855,001195: # BIT 12 FLAG 11 (L)(R12)
003856,001196: 26,2024 VXINH = 168D # IF Z VELOCITY DATA UPDATE X AXIS
003857,001197: # UNREASONABLE, VELOCITY
003858,001198: 26,2024 4740 VXINHBIT = BIT12 # BYPASS X VELOCITY
003859,001199: # UPDATE ON NEXT PASS
003860,001200:
Page 85 |
003862,001202: # BIT 11 FLAG 11 (L)(R12)
003863,001203: 26,2024 PSTHIGAT = 169D # PAST HIGATE PREHIGATE
003864,001204: 26,2024 4741 PSTHIBIT = BIT11
003865,001205:
003866,001206:
003867,001207: # BIT 10 FLAG 11 (L)(R12)
003868,001208: 26,2024 NOLRREAD = 170D # LANDING RADAR LR NOT REPOSITIONING
003869,001209: # REPOSITIONING;
003870,001210: 26,2024 4742 NOLRRBIT = BIT10 # BYPASS UPDATE
003871,001211:
003872,001212:
003873,001213: # BIT 9 FLAG 11 (L)(R12)
003874,001214: 26,2024 XORFLG = 171D # BELOW LIMIT ABOVE LIMIT DO
003875,001215: # INHIBIT X AXIS NOT INHIBIT
003876,001216: 26,2024 4743 XORFLBIT = BIT9 # OVERRIDE
003877,001217:
003878,001218:
003879,001219: # BIT 8 FLAG 11
003880,001220: 26,2024 LRINH = 172D # LANDING RADAR UP- LR UPDATES INHIBITED
003881,001221: 26,2024 4744 LRINHBIT = BIT8 # DATES PERMITTED BY ASTRONAUT
003882,001222: # BY ASTRONAUT
003883,001223:
003884,001224:
003885,001225: # BIT 7 FLAG 11 (L)(R12)
003886,001226: 26,2024 VELDATA = 173D # LR VELOCITY LR VELOCITY MEASURE
003887,001227: 26,2024 4745 VELDABIT = BIT7 # MEASUREMENT MADE NOT MADE
003888,001228:
003889,001229:
003890,001230: # BIT 6 FLAG 11
003891,001231: # = 174D
003892,001232: # = BIT6
003893,001233:
003894,001234:
003895,001235: # BIT 5 FLAG 11
003896,001236: # = 175D
003897,001237: # = BIT5
003898,001238:
003899,001239:
003900,001240: # BIT 4 FLAG 11 (L)(R12)
003901,001241: 26,2024 RNGEDATA = 176D # LR ALTITUDE LR ALTITUDE MEASURE
003902,001242: 26,2024 4750 RNGEDBIT = BIT4 # MEASUREMENT MADE NOT MADE
003903,001243:
003904,001244:
003905,001245: # BIT 3 FLAG 11
003906,001246: # = 177D
003907,001247: # = BIT3
003908,001248:
003909,001249:
003910,001250:
003911,001251: # BIT 2 FLAG 11 (L)(R12)
Page 86 |
003913,001253: 26,2024 VFLSHFLG = 178D # LR VELOCITY FAIL LR VEL FAIL LAMP
003914,001254: 26,2024 4752 VFLSHBIT = BIT2 # LAMP SHOULD BE SHOULDN'T FLASH
003915,001255: # FLASHING
003916,001256:
003917,001257:
003918,001258: # BIT 1 FLAG 11 (L)(R12)
003919,001259: 26,2024 HFLSHFLG = 179D # LR ALTITUDE FAIL LR ALTITUDE FAIL
003920,001260: 26,2024 4753 HFLSHBIT = BIT1 # LAMP SHOULD BE LAMP SHOULD NOT BE
003921,001261: # FLASHING FLASHING
003922,001262:
003923,001263:
003924,001264: 26,2024 0110 RADMODES EQUALS FLGWRD12 # RADAR FLAG WORD
003925,001265:
003926,001266:
003927,001267: 26,2024 0110 FLGWRD12 = STATE +12D # (180 - 194) WAS RADMODES
003928,001268:
003929,001269: # (SET) (RESET)
003930,001270:
003931,001271: # BIT 15 FLAG 12
003932,001272: 26,2024 CDESFLAG = 180D # CONTINUOUS DESIG- LGC CHECKS FOR LOCK-
003933,001273: 26,2024 4735 CDESBIT = BIT15 # NATE. LGC COMMANDS ON WHEN ANTENNA
003934,001274: # RR REGARDLESS OF BEING DESIGNATED
003935,001275: # LOCK-ON
003936,001276:
003937,001277:
003938,001278: # BIT 14 FLAG 12
003939,001279: 26,2024 REMODFLG = 181D # CHANGE IN ANTENNA NO REMODE REQUESTED
003940,001280: 26,2024 4736 REMODBIT = BIT14 # MODE BEEN REQUESTED OR OCCURRING
003941,001281: # I.E., REMODE
003942,001282:
003943,001283:
003944,001284: # BIT 13 FLAG 12
003945,001285: 26,2024 RCDU0FLG = 182D # RR CDU'S BEING RR CDU'S NOT BEING
003946,001286: 26,2024 4737 RCDU0BIT = BIT13 # ZEROED ZEROED
003947,001287:
003948,001288:
003949,001289: # BIT 12 FLAG 12
003950,001290: 26,2024 ANTENFLG = 183D # RR ANTENNA MODE IS RR ANTENNA IN MODE 1
003951,001291: 26,2024 4740 ANTENBIT = BIT12 # MODE 2
003952,001292:
003953,001293:
003954,001294: # BIT 11 FLAG 12
003955,001295: 26,2024 REPOSMON = 184D # REPOSITION MONITOR. NO REPOSITION TAKING
003956,001296: 26,2024 4741 REPOSBIT = BIT11 # RR REPOSITION IS PLACE
003957,001297: # TAKING PLACE
003958,001298:
003959,001299:
003960,001300: # BIT 10 FLAG 12
003961,001301: 26,2024 DESIGFLG = 185D # RR DESIGNATE RR DESIGNATE NOT
003962,001302: 26,2024 4742 DESIGBIT = BIT10 # REQUESTED OR IN REQUESTED OR IN
Page 87 |
003964,001304: # PROGRESS PROGRESS
003965,001305:
003966,001306:
003967,001307: # BIT 9 FLAG 12
003968,001308: 26,2024 ALTSCALE = 186D # LR ALTITUDE READING LR ALTITUDE READING
003969,001309: 26,2024 4743 ALTSCBIT = BIT9 # IS ON HIGH SCALE IS ON LOW SCALE
003970,001310:
003971,001311:
003972,001312: # BIT 8 FLAG 12
003973,001313: 26,2024 LRVELFLG = 187D # LR VELOCITY DATA NO LR VELOCITY DATA
003974,001314: 26,2024 4744 LRVELBIT = BIT8 # FAIL FAIL
003975,001315:
003976,001316:
003977,001317: # BIT 7 FLAG 12
003978,001318: 26,2024 RCDUFAIL = 188D # RR CDU FAIL HAS RR CDU FAIL OCCURRED
003979,001319: 26,2024 4745 RCDUFBIT = BIT7 # NOT OCCURRED
003980,001320:
003981,001321:
003982,001322: # BIT 6 FLAG 12
003983,001323: 26,2024 LRPOSFLG = 189D # LANDING RADAR LR POSITION 1
003984,001324: 26,2024 4746 LRPOSBIT = BIT6 # POSITION 2
003985,001325:
003986,001326:
003987,001327: # BIT 5 FLAG 12
003988,001328: 26,2024 LRALTFLG = 190D # LR ALTITUDE DATA NO LR ALTITUDE DATA
003989,001329: 26,2024 4747 LRALTBIT = BIT5 # FAIL. COULD NOT BE FAIL
003990,001330: # READ SUCCESSFULLY.
003991,001331:
003992,001332:
003993,001333: # BIT 4 FLAG 12
003994,001334: 26,2024 RRDATAFL = 191D # RR DATA FAIL. NO RR DATA FAIL.
003995,001335: 26,2024 4750 RRDATABT = BIT4 # DATA COULD NOT BE
003996,001336: # READ SUCCESSFULLY
003997,001337:
003998,001338:
003999,001339: # BIT 3 FLAG 12
004000,001340: 26,2024 RRRSFLAG = 192D # RR RANGE READING RR RANGE READING ON
004001,001341: 26,2024 4751 RRRSBIT = BIT3 # ON THE HIGH SCALE THE LOW SCALE
004002,001342:
004003,001343:
004004,001344: # BIT 2 FLAG 12
004005,001345: 26,2024 AUTOMODE = 193D # RR NOT IN AUTO MODE. RR IN AUTO MODE
004006,001346: 26,2024 4752 AUTOMBIT = BIT2 # AUTO MODE DISCRETE
004007,001347: # IS NOT PRESENT
004008,001348:
004009,001349:
004010,001350: # BIT 1 FLAG 12
004011,001351: 26,2024 TURNONFL = 194D # RR TURN-ON SEQUENCE NO RR TURN-ON
004012,001352: 26,2024 4753 TURNONBT = BIT1 # IN PROGRESS. (ZERO SEQUENCE IN PROGRESS
004013,001353: # CDU'S, FIX ANTENNA
Page 88 |
004015,001355: # MODE)
004016,001356:
004017,001357:
004018,001358: 26,2024 0111 DAPBOOLS EQUALS FLGWRD13 # DIGITAL AUTOPILOT FLAGWORD
004019,001359:
004020,001360:
004021,001361: 26,2024 0111 FLGWRD13 = STATE +13D # (195 - 209) WAS DAPBOOLS
004022,001362:
004023,001363: # (SET) (RESET)
004024,001364:
004025,001365: # BIT 15 FLAG 13
004026,001366: 26,2024 PULSEFLG = 195D # MINIMUM IMPULSE NOT IN MINIMUM
004027,001367: 26,2024 4735 PULSES = BIT15 # COMMAND MODE IN IMPULSE COMMAND MODE
004028,001368: # "ATT HOLD" (V76) (V77)
004029,001369:
004030,001370:
004031,001371: # BIT 14 FLAG 13
004032,001372: 26,2024 USEQRFLG = 196D # GIMBAL UNUSABLE. TRIM GIMBAL MAY BE
004033,001373: 26,2024 4736 USEQRJTS = BIT14 # USE JETS ONLY. USED.
004034,001374:
004035,001375:
004036,001376: # BIT 13 FLAG 13
004037,001377: 26,2024 CSMDKFLG = 197D # CSM DOCKED. USE CSM NOT DOCKED TO LM
004038,001378: 26,2024 4737 CSMDOCKD = BIT13 # BACKUP DAP
004039,001379:
004040,001380:
004041,001381: # BIT 12 FLAG 13
004042,001382: 26,2024 OURRCFLG = 198D # CURRENT DAP PASS CURRENT DAP PASS IS
004043,001383: 26,2024 4740 OURRCBIT = BIT12 # IS RATE COMMAND NOT RATE COMMAND
004044,001384:
004045,001385:
004046,001386: # BIT 11 FLAG 13
004047,001387: 26,2024 ACC4-2FL = 199D # 4 JET X-AXIS TRANS- 2 JET X-AXIS TRANS-
004048,001388: 26,2024 4741 ACC4OR2X = BIT11 # LATION REQUESTED LATION REQUESTED
004049,001389:
004050,001390:
004051,001391: # BIT 10 FLAG 13
004052,001392: 26,2024 AORBTFLG = 200D # B SYSTEM FOR X- A SYSTEM FOR X-
004053,001393: 26,2024 4742 AORBTRAN = BIT10 # TRANSLATION TRANSLATION PREFER'D
004054,001394:
004055,001395:
004056,001396: # BIT 9 FLAG 13
004057,001397: 26,2024 XOVINFLG = 201D # X-AXIS OVERRIDE X-AXIS OVERRIDE OKAY
004058,001398: 26,2024 4743 XOVINHIB = BIT9 # LOCKED OUT
004059,001399:
004060,001400:
004061,001401: # BIT 8 FLAG 13
004062,001402: 26,2024 DRIFTDFL = 202D # ASSUME 0 OFFSET USE OFFSET ACCELERA-
004063,001403: 26,2024 4744 DRIFTBIT = BIT8 # DRIFTING FLIGHT. TION ESTIMATE
004064,001404:
004065,001405:
Page 89 |
004067,001407: # BIT 7 FLAG 13
004068,001408: 26,2024 RHCSCFLG = 203D # NORMAL RHC SCALING FINE RHC SCALING
004069,001409: 26,2024 4745 RHCSCALE = BIT7 # REQUESTED REQUESTED
004070,001410:
004071,001411:
004072,001412: # BIT 6 FLAG 13
004073,001413: 26,2024 ULLAGFLG = 204D # ULLAGE REQUEST BY NO INTERNAL ULLAGE
004074,001414: 26,2024 4746 ULLAGER = BIT6 # MISSION PROGRAM REQUEST
004075,001415:
004076,001416:
004077,001417: # BIT 5 FLAG 13
004078,001418: 26,2024 DBSL2FLG = 205D # 5 DEG DEADBAND 1 OR .3 DEG DEADBAND
004079,001419: 26,2024 4747 DBSLECT2 = BIT5 # SELECTED BY CREW SELECTED BY CREW
004080,001420: # (SEE BIT4 DAPBOOLS)
004081,001421:
004082,001422:
004083,001423: # BIT 4 FLAG 13
004084,001424: 26,2024 DBSELFLG = 206D # 1 DEG DEADBAND MIN DB SELECTED BY
004085,001425: 26,2024 4750 DBSELECT = BIT4 # SELECTED BY CREW CREW (0.3 DEG)
004086,001426:
004087,001427:
004088,001428: # BIT 3 FLAG 13
004089,001429: 26,2024 ACCOKFLG = 207D # CONTROL AUTHORITY RESTART OR FRESH ST.
004090,001430: 26,2024 4751 ACCSOKAY = BIT3 # VALUES FROM 1/ACCS SINCE LAST 1/ACCS;
004091,001431: # USABLE OUTPUTS SUSPECT.
004092,001432:
004093,001433:
004094,001434: # BIT 2 FLAG 13
004095,001435: 26,2024 AUTR2FLG = 208D # THESE FLAGS ARE USED TOGETHER TO INDICAT
004096,001436: 26,2024 4752 AUTRATE2 = BIT2 # ASTRONAUT-CHOSEN KALCMANU MANEUVER RATES
004097,001437: # (0,0)=(BIT2,BIT1)= 0.2 DEG/SEC
004098,001438: # (0,1)= 0.5 DEG/SEC
004099,001439: # BIT 1 FLAG 13
004100,001440: 26,2024 AUTR1FLG = 209D # (1,0)= 2.0 DEG/SEC
004101,001441: 26,2024 4753 AUTRATE1 = BIT1 # (1,1)= 10.0 DEG/SEC
004102,001442:
End of include-file FLAGWORD_ASSIGNMENTS.agc. Parent file is MAIN.agc