Source Code
|
These source-code files are part of a reconstructed copy of Aurora 88, the
final release of the Lunar Module (LM) Apollo Guidance Computer (AGC) system
test software.
They have been created via disassembly of binary dumps of original core rope memory modules, part numbers 2003972-011, 2003972-091, and 2003972-111, belonging to Steve Jurvetson. Since only binary dumps (rather than listings) of Aurora 88 are available as source material, all comments and labels are approximate. They have been taken from other AGC programs where possible, or, in some places, written from scratch to match what we believe would have been in the original listing. |
018909,000002: ## Copyright: Public domain.
018910,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
018911,000004: ## Purpose: A section of Aurora 88.
018912,000005: ## It is part of the reconstructed source code for the final
018913,000006: ## release of the Lunar Module system test software. No original
018914,000007: ## listings of this program are available; instead, this file
018915,000008: ## was created via disassembly of dumps of Aurora 88 core rope
018916,000009: ## modules and comparison with other AGC programs.
018917,000010: ## Assembler: yaYUL
018918,000011: ## Contact: Ron Burkey <info@sandroid.org>.
018919,000012: ## Website: www.ibiblio.org/apollo/index.html
018920,000013: ## Mod history: 2023-06-30 MAS Created from Aurora 12.
018921,000014: ## 2023-07-12 MAS Updated for Aurora 88.
018922,000015:
018923,000016:
018924,000017: 17,2000 BANK 17
018925,000018: 17,2000 E5,1400 EBANK= XSM
018926,000019:
018927,000020:
018928,000021:
018929,000022: 17,2000 06000 IMUTEST TC INTPRET
018930,000023: 17,2001 77634 CALL
018931,000024: 17,2002 30535 LATAZCHK
018932,000025: 17,2003 77776 EXIT
018933,000026: 17,2004 37657 CA ZERO
018934,000027: 17,2005 55645 TS DRIFTT
018935,000028: 17,2006 37652 CA ONE
018936,000029: 17,2007 55544 TS POSITON
018937,000030: 17,2010 54340 TS DSPTEM2 +2
018938,000031: 17,2011 54400 TS THETAD
018939,000032: 17,2012 54401 TS THETAD +1
018940,000033: 17,2013 54402 TS THETAD +2
018941,000034: 17,2014 04063 TC BANKCALL
018942,000035: 17,2015 26000 CADR IMUZERO
018943,000036: 17,2016 04063 TC BANKCALL
018944,000037: 17,2017 26716 CADR IMUSTALL
018945,000038: 17,2020 12261 TCF ENDTEST1
018946,000039: 17,2021 37657 IMUBACK CA ZERO
018947,000040: 17,2022 54337 TS DSPTEM2 +1
018948,000041: 17,2023 55537 TS NDXCTR
018949,000042: 17,2024 55617 TS TORQNDX
018950,000043: 17,2025 55620 TS TORQNDX +1
018951,000044: 17,2026 55745 TS DPIPAIDX
018952,000045: 17,2027 33721 CAF TESTTIME
018953,000046: 17,2030 55746 TS UE5,1746
018954,000047: 17,2031 54336 TS DSPTEM2
018955,000048: 17,2032 04063 TC BANKCALL # ISS RETURNS IN COARSE ALIGN MODE TO
018956,000049: 17,2033 26055 CADR IMUCOARS # ENABLE OPERATOR TO DECIDE WHAT TO DO
018957,000050: # ABOUT GIMBAL LOCK
018958,000051: 17,2034 03667 TC SHOWLD
018959,000052: 17,2035 03676 TC SHOW
018960,000053:
018961,000054:
018962,000055:
018963,000056: 17,2036 04063 TC BANKCALL
018964,000057: 17,2037 26716 CADR IMUSTALL
018965,000058: 17,2040 02261 TC ENDTEST1
018966,000059: 17,2041 03347 TC NBPOSPL
018967,000060: 17,2042 03102 TC POSGMBL
018968,000061: 17,2043 02123 TC PIPACHK # IF MGA IS 60DEG+ PROG WILL STAY IN COARS
018969,000062: # ALIGN AND MEASURE VERITCAL PIPA RATE
018970,000063: 17,2044 03127 TC FALNE
018971,000064: 17,2045 04063 TC BANKCALL
018972,000065: 17,2046 26716 CADR IMUSTALL
018973,000066: 17,2047 12261 TCF ENDTEST1
018974,000067: 17,2050 06000 GUESS TC INTPRET # CALCULATE -COS LATITUDE AND SIN LATITUDE
018975,000068: 17,2051 71545 DLOAD COS # FOR ESTIMATE
018976,000069: 17,2052 01511 LATITUDE
018977,000070: 17,2053 72476 DCOMP SL1
018978,000071: 17,2054 07616 STODL WANGI
018979,000072: 17,2055 01511 LATITUDE
018980,000073: 17,2056 72556 SIN SL1
018981,000074: 17,2057 01614 STORE WANGO
018982,000075: 17,2060 77776 EXIT
018983,000076: 17,2061 03553 JUMPLOAD TC LOADGTSM
018984,000077: 17,2062 03474 TC JUMPLOD1
018985,000078: 17,2063 11527 CCS LENGTHOT
018986,000079: 17,2064 02066 TC +2
018987,000080: 17,2065 02071 TC +4
018988,000081: 17,2066 55527 TS LENGTHOT
018989,000082: 17,2067 33747 CA LNORMLOP
018990,000083: 17,2070 04331 TC JOBSLEEP
018991,000084:
018992,000085: 17,2071 37652 CAF ONE
018993,000086: 17,2072 55711 TS ALTIM
018994,000087: 17,2073 06000 TC INTPRET
018995,000088: 17,2074 77775 VLOAD
018996,000089: 17,2075 01622 TORQUE
018997,000090: 17,2076 01522 STORE GYROD
018998,000091: 17,2077 77776 EXIT
018999,000092:
019000,000093: 17,2100 33733 CA GYRODPL
019001,000094: 17,2101 04063 TC BANKCALL
019002,000095: 17,2102 26317 CADR IMUPULSE
019003,000096: 17,2103 04063 TC BANKCALL
019004,000097: 17,2104 26716 CADR IMUSTALL
019005,000098: 17,2105 12261 TCF ENDTEST1
019006,000099:
019007,000100: 17,2106 06000 TC INTPRET
019008,000101: 17,2107 77634 CALL
019009,000102: 17,2110 30412 ERTHRVSE
019010,000103: 17,2111 77776 EXIT
019011,000104: 17,2112 04063 TC BANKCALL
019012,000105: 17,2113 30734 CADR OGCZERO
019013,000106:
019014,000107: 17,2114 37657 CA ZERO # FILTER TORQUES PLTFM AND SETS UP ERATE
019015,000108: 17,2115 54336 TS DSPTEM2
019016,000109: 17,2116 31643 CA DRIFTI
019017,000110: 17,2117 54337 TS DSPTEM2 +1
019018,000111: 17,2120 51544 INDEX POSITON
019019,000112: 17,2121 55551 TS SOUTHDR -1
019020,000113: 17,2122 03676 TC SHOW
019021,000114:
019022,000115: 17,2123 51537 PIPACHK INDEX NDXCTR # TORQUE PLATFORM TO CORRECT LEVELING ERR
019023,000116: 17,2124 02125 TC +1 # IN PREPARATION TO MEASURING VERTICAL
019024,000117: 17,2125 04063 TC BANKCALL # PIPA OUTPUT PULSE RATE
019025,000118: 17,2126 30427 CADR EARTHR
019026,000119:
019027,000120: 17,2127 33724 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
019028,000121: 17,2130 55633 TS DATAPL +4
019029,000122: 17,2131 37641 CA BIT10 # IN THE ALLOTED TIME INTERVAL
019030,000123: 17,2132 55527 TS LENGTHOT
019031,000124: 17,2133 37652 CA ONE
019032,000125: 17,2134 55674 TS RESULTCT
019033,000126: 17,2135 37657 CA ZERO # ZERO PIPA COUNTER INITIALLY
019034,000127: 17,2136 51541 INDEX PIPINDEX
019035,000128: 17,2137 54037 TS PIPAX
019036,000129: 17,2140 55627 TS DATAPL
019037,000130: 17,2141 33736 CA DEC56 # LOOP 56 TIMES 5.12 SEC "ACH. EACH INCR.
019038,000131: 17,2142 03210 TC WAITLOOP # WILL ALSO CORRECT EARTH RATE
019039,000132: 17,2143 00004 INHINT
019040,000133:
019041,000134: 17,2144 02774 TC CHECKG
019042,000135: 17,2145 00003 RELINT
019043,000136: 17,2146 03070 TC DATALD
019044,000137: 17,2147 37227 CA FIVE
019045,000138: 17,2150 55674 TS RESULTCT
019046,000139: 17,2151 51537 INDEX NDXCTR
019047,000140: 17,2152 02153 TC +1
019048,000141: 17,2153 04063 TC BANKCALL
019049,000142: 17,2154 30427 CADR EARTHR
019050,000143: 17,2155 11677 CCS COUNTPL
019051,000144: 17,2156 03232 TC WAITLP2
019052,000145: 17,2157 11630 CCS DATAPL +1
019053,000146: 17,2160 02164 TC +4
019054,000147: 17,2161 05366 TC CCSHOLE
019055,000148: 17,2162 41633 CS DATAPL +4
019056,000149: 17,2163 55633 TS DATAPL +4
019057,000150: 17,2164 00006 EXTEND
019058,000151: 17,2165 41630 DCS DATAPL
019059,000152: 17,2166 21634 DAS DATAPL +4
019060,000153:
019061,000154: 17,2167 06000 TC INTPRET
019062,000155: 17,2170 45345 DLOAD DSU
019063,000156: 17,2171 01636 DATAPL +6
019064,000157: 17,2172 01632 DATAPL +2
019065,000158: 17,2173 56325 PDDL DDV
019066,000159: 17,2174 01634 DATAPL +4
019067,000160: 17,2175 41325 PDDL DMP
019068,000161: 17,2176 37726 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
019069,000162: 17,2177 77624 RTB
019070,000163: 17,2200 33524 SGNAGREE
019071,000164: 17,2201 00337 STORE DSPTEM2
019072,000165: 17,2202 77776 EXIT
019073,000166: 17,2203 03676 TC SHOW
019074,000167: 17,2204 33717 VERTDRFT CA 3998DEC # NUMBER OF SECONDS TO SPEND ESTIMATING
019075,000168: 17,2205 55527 TS LENGTHOT
019076,000169: 17,2206 51544 INDEX POSITON
019077,000170: 17,2207 41550 CS SOUTHDR -2
019078,000171: 17,2210 55645 TS DRIFTT
019079,000172: 17,2211 03601 TC VRTDRFT1
019080,000173: 17,2212 55400 VRTDRFT2 TS XSM
019081,000174: 17,2213 55401 TS XSM +1
019082,000175: 17,2214 55404 TS XSM +4
019083,000176: 17,2215 55405 TS XSM +5
019084,000177: 17,2216 55406 TS YSM
019085,000178: 17,2217 55407 TS YSM +1
019086,000179:
019087,000180: 17,2220 55412 TS YSM +4
019088,000181: 17,2221 55413 TS YSM +5
019089,000182: 17,2222 55414 TS ZSM
019090,000183: 17,2223 55415 TS ZSM +1
019091,000184: 17,2224 55420 TS ZSM +4
019092,000185: 17,2225 55421 TS ZSM +5
019093,000186: 17,2226 37632 GUESS1 CAF POSMAX
019094,000187: 17,2227 55617 TS TORQNDX
019095,000188: 17,2230 55620 TS TORQNDX +1
019096,000189: 17,2231 04063 TC BANKCALL
019097,000190: 17,2232 42000 CADR ESTIMS
019098,000191:
019099,000192: 17,2233 11527 CCS LENGTHOT
019100,000193: 17,2234 02236 TC +2
019101,000194: 17,2235 02243 TC VALMIS
019102,000195: 17,2236 55527 TS LENGTHOT
019103,000196: 17,2237 04063 TC BANKCALL
019104,000197: 17,2240 30427 CADR EARTHR
019105,000198: 17,2241 33747 CA LNORMLOP
019106,000199: 17,2242 04331 TC JOBSLEEP
019107,000200:
019108,000201: 17,2243 37652 VALMIS CA ONE
019109,000202: 17,2244 55711 TS ALTIM
019110,000203: 17,2245 31641 CA DRIFTO
019111,000204: 17,2246 54337 TS DSPTEM2 +1
019112,000205: 17,2247 37657 CA ZERO
019113,000206: 17,2250 54336 TS DSPTEM2
019114,000207: 17,2251 03676 TC SHOW
019115,000208:
019116,000209:
019117,000210:
019118,000211: 17,2252 37652 FINISH CA ONE
019119,000212: 17,2253 61544 AD POSITON
019120,000213: 17,2254 54340 TS DSPTEM2 +2
019121,000214: 17,2255 37651 CA TWO
019122,000215: 17,2256 55546 TS QPLACE
019123,000216: 17,2257 04063 TC BANKCALL
019124,000217: 17,2260 22354 CADR TSELECT -6
019125,000218: 17,2261 04063 ENDTEST1 TC BANKCALL
019126,000219: 17,2262 30752 CADR ENDTEST
019127,000220:
019128,000221: 17,2263 33727 OPCHK CAF DELYOFF # AUTOMATIC TEST FOR SYSTEM OPERATION
019129,000222: 17,2264 00006 EXTEND
019130,000223: 17,2265 02030 RAND 30 # CHECK TO SEE IF IMU IS ON
019131,000224: 17,2266 10000 CCS A
019132,000225: 17,2267 02456 TC ALARMS
019133,000226: 17,2270 33722 CAF V16N20S
019134,000227: 17,2271 05234 TC NVSBWAIT
019135,000228:
019136,000229: 17,2272 05303 TC FREEDSP
019137,000230: 17,2273 04063 TC BANKCALL
019138,000231: 17,2274 26000 CADR IMUZERO
019139,000232: 17,2275 04063 TC BANKCALL
019140,000233: 17,2276 26716 CADR IMUSTALL
019141,000234:
019142,000235: 17,2277 12261 TCF ENDTEST1
019143,000236: 17,2300 37643 CA BIT8 # ZERO ALL ERASEABLE USED IN TEST
019144,000237: 17,2301 55747 TS ZERONDX
019145,000238: 17,2302 33732 CA GENPLAD
019146,000239: 17,2303 03241 TC ZEROING
019147,000240: 17,2304 03347 TC NBPOSPL # ALIGN ANGLE COMPUTATION
019148,000241:
019149,000242: 17,2305 03102 TC POSGMBL # COARSE ALIGN THOSE GIMBALS NOW
019150,000243:
019151,000244: 17,2306 12263 TCF OPCHK
019152,000245: 17,2307 03127 TC FALNE # FINE ALIGN PLATFORM BY TORQUING GYROS
019153,000246:
019154,000247: 17,2310 04063 TC BANKCALL
019155,000248: 17,2311 26716 CADR IMUSTALL
019156,000249: 17,2312 12261 TCF ENDTEST1
019157,000250: 17,2313 37651 CA TWO
019158,000251: 17,2314 55673 CDUCHECK TS CDUNDX # THIS LOOP CHECKS FOR NO ERROR BETWEEN
019159,000252: 17,2315 51673 INDEX CDUNDX # DESIRED CDU ANGLES AND THE ACTUAL ANGLES
019160,000253: 17,2316 40400 CS THETAD
019161,000254: 17,2317 51673 INDEX CDUNDX
019162,000255: 17,2320 60032 AD CDUX
019163,000256: 17,2321 55551 TS STOREPL
019164,000257: 17,2322 11551 CCS STOREPL
019165,000258: 17,2323 02331 TC ERRMASK
019166,000259: 17,2324 02326 TC NOERR
019167,000260: 17,2325 02331 TC ERRMASK
019168,000261: 17,2326 11673 NOERR CCS CDUNDX
019169,000262: 17,2327 02314 TC CDUCHECK
019170,000263: 17,2330 02335 TC LOADIC
019171,000264: 17,2331 73735 ERRMASK MASK LOWFOUR # ALLOW FIVE BIT ERRORS
019172,000265: 17,2332 10000 CCS A
019173,000266: 17,2333 02456 TC ALARMS
019174,000267: 17,2334 02326 TC NOERR
019175,000268: 17,2335 37652 LOADIC CA ONE
019176,000269: 17,2336 55674 TS RESULTCT
019177,000270: 17,2337 47652 CS ONE
019178,000271:
019179,000272: 17,2340 55671 TS MASKREG # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
019180,000273:
019181,000274: 17,2341 37657 CA ZERO
019182,000275: 17,2342 54037 TS PIPAX
019183,000276: 17,2343 54040 TS PIPAY
019184,000277: 17,2344 54041 TS PIPAZ
019185,000278:
019186,000279: 17,2345 37640 CA BIT11
019187,000280: 17,2346 55527 TS LENGTHOT # VECTOR IN PIPA COUNTERS
019188,000281: 17,2347 37652 CA ONE
019189,000282: 17,2350 03210 TC WAITLOOP
019190,000283: 17,2351 11677 CCS COUNTPL
019191,000284: 17,2352 03232 TC WAITLP2
019192,000285: 17,2353 33736 CA DEC56
019193,000286: 17,2354 03210 TC WAITLOOP
019194,000287: 17,2355 37651 OPCHK1 CA TWO
019195,000288: 17,2356 55541 OPCHK2 TS PIPINDEX
019196,000289: 17,2357 00004 INHINT
019197,000290: 17,2360 02774 TC CHECKG
019198,000291: 17,2361 00003 RELINT
019199,000292: 17,2362 37657 CA ZERO
019200,000293: 17,2363 51541 INDEX PIPINDEX
019201,000294: 17,2364 54037 TS PIPAX
019202,000295: 17,2365 03070 TC DATALD # LOAD PIPA DATA AND TIME IN DATAPL
019203,000296: 17,2366 57674 XCH RESULTCT
019204,000297: 17,2367 67650 AD FOUR
019205,000298: 17,2370 55674 TS RESULTCT
019206,000299: 17,2371 11541 CCS PIPINDEX
019207,000300: 17,2372 02356 TC OPCHK2
019208,000301: 17,2373 47650 READOUT CS FOUR
019209,000302: 17,2374 61674 AD RESULTCT
019210,000303: 17,2375 55674 TS RESULTCT
019211,000304: 17,2376 22007 ZL
019212,000305: 17,2377 51674 INDEX RESULTCT
019213,000306: 17,2400 31627 CA DATAPL
019214,000307: 17,2401 22000 LXCH A
019215,000308: 17,2402 51674 INDEX RESULTCT
019216,000309: 17,2403 21573 DAS GENPL +1
019217,000310: 17,2404 31674 CA RESULTCT
019218,000311: 17,2405 71671 MASK MASKREG
019219,000312: 17,2406 10000 CCS A
019220,000313: 17,2407 02373 TC READOUT
019221,000314: 17,2410 37654 CA TEN
019222,000315: 17,2411 66165 AD THREE
019223,000316: 17,2412 55674 TS RESULTCT
019224,000317: 17,2413 40000 CS A
019225,000318: 17,2414 55671 TS MASKREG
019226,000319: 17,2415 11677 CCS COUNTPL
019227,000320: 17,2416 03232 TC WAITLP2
019228,000321: 17,2417 03253 TC COMPUT
019229,000322:
019230,000323: 17,2420 33723 RADCK CA V16N40S
019231,000324: 17,2421 05234 TC NVSBWAIT # OPERATOR WILL CHECK RADAR STATUS.IN LAB.
019232,000325: 17,2422 05176 TC FLASHON # SET RADAR OFF THEN PUT RESOLVER STANDARD
019233,000326: 17,2423 05042 TC ENDIDLE # ON TRUNNION AND SET TO +45 DEG.SHAFT WIL
019234,000327: 17,2424 02261 TC ENDTEST1
019235,000328: 17,2425 02426 TC +1 # AFTER SETTING RES STANDARD DO A V33
019236,000329: 17,2426 37657 CA ZERO
019237,000330: 17,2427 54424 TS TANG +1
019238,000331: 17,2430 33737 CA 45DEG
019239,000332: 17,2431 54423 TS TANG
019240,000333: 17,2432 04063 DRIVRAD TC BANKCALL # IN SC WHEN RAD PRESENT DO V33 RIGHT AWAY
019241,000334: 17,2433 20246 CADR RRZERO # LGC WILL ATTEMPT TO DRIVE 45 DEG TRUNN.
019242,000335: 17,2434 04063 TC BANKCALL # TO MATCH STANDARD, AFTER ZEROING CDUS
019243,000336: 17,2435 26712 CADR RADSTALL
019244,000337: 17,2436 02261 TC ENDTEST1
019245,000338: 17,2437 06000 TC INTPRET
019246,000339: 17,2440 77634 CALL
019247,000340: 17,2441 20362 RRDESNB
019248,000341: 17,2442 04063 TC BANKCALL
019249,000342: 17,2443 26712 CADR RADSTALL # IF CDU FAILS TO AGREE WITH COMMAND TO
019250,000343: 17,2444 02456 TC ALARMS # 1 DEG GET ALARM HERE
019251,000344:
019252,000345: 17,2445 05176 TC FLASHON # OPERATOR WILL CHECK STATUS OF RADAR
019253,000346: 17,2446 05042 TC ENDIDLE # IN S/C DO V33 TO CONTINUE WITH SHAFT
019254,000347: 17,2447 02261 TC ENDTEST1 # TEST
019255,000348: 17,2450 02451 TC +1 # IN LAB TURN RADAR OFF CHANGE RES STANDAR
019256,000349: 17,2451 37657 CA ZERO # TO SHAFT AND SET FOR -45DEG.
019257,000350: 17,2452 54423 TS TANG # THEN DO A V33 IF WANT TO REPEAT CHECK
019258,000351: 17,2453 43737 CS 45DEG # DO A V34 TO TERMINATE
019259,000352: 17,2454 54424 TS TANG +1
019260,000353: 17,2455 02432 TC DRIVRAD
019261,000354: 17,2456 56002 ALARMS XCH Q
019262,000355: 17,2457 55546 TS QPLACE
019263,000356: 17,2460 05315 TC ALARM
019264,000357: 17,2461 01411 OCT 1411
019265,000358: 17,2462 01546 TC QPLACE
019266,000359:
019267,000360: 17,2463 06000 GYRSFTST TC INTPRET # START ADRESS FOR IRIG SF TEST
019268,000361: 17,2464 77634 CALL
019269,000362: 17,2465 30535 LATAZCHK # LOAD AZ AND LAT
019270,000363: 17,2466 77776 EXIT
019271,000364: 17,2467 33712 TESTCALL CAF V21N30E
019272,000365: 17,2470 05234 TC NVSBWAIT # LOAD + OR - 1 FOR + OR - X TEST (+00001)
019273,000366: 17,2471 05042 TC ENDIDLE # LOAD + OR - 2 FOR + OR - Y TEST
019274,000367: 17,2472 12261 TCF ENDTEST1 # LOAD + OR - 3 FOR + OR - Z TEST
019275,000368: 17,2473 02467 TC TESTCALL
019276,000369: 17,2474 56333 XCH DSPTEM1
019277,000370: 17,2475 04102 TC POSTJUMP
019278,000371: 17,2476 35370 CADR TESTCAL1
019279,000372: 17,2477 50000 GUDENT1 INDEX A
019280,000373: 17,2500 02501 TC +1
019281,000374: 17,2501 02467 TC TESTCALL
019282,000375: 17,2502 02510 TC +6 # C(A)=+00001 FOR -Z
019283,000376: 17,2503 02507 TC +4 # C(A)=+00002 FOR -Y
019284,000377: 17,2504 02506 TC +2 # C(A)=+00003 FOR -X
019285,000378: 17,2505 02501 TC -4 # C(A)=+00004 ERROR
019286,000379: 17,2506 02511 TC +3 # C(A)=+00005 FOR +X
019287,000380: 17,2507 02515 TC +6
019288,000381: 17,2510 02520 TC +10
019289,000382: 17,2511 37650 CAF FOUR
019290,000383: 17,2512 55544 TS POSITON # 4 IS FOR A.L. POSN 4 USED FOR X SF TEST
019291,000384: 17,2513 02522 TC +7
019292,000385: 17,2514 02522 TC +6
019293,000386: 17,2515 37651 CAF TWO
019294,000387: 17,2516 55544 TS POSITON # +2 IS A.L. POS 2 USED FOR Y SF TEST
019295,000388: 17,2517 02522 TC +3
019296,000389: 17,2520 37652 CAF ONE
019297,000390: 17,2521 55544 TS POSITON # +1 IS A.L. POS 1 USED FOR Z SF TEST
019298,000391: 17,2522 55620 TS OPTNREG # C(K) = (4,2,1) FOR X,Y,Z
019299,000392: 17,2523 55622 TS SAVE +1
019300,000393: 17,2524 05303 TC FREEDSP
019301,000394: 17,2525 37657 CAF ZERO
019302,000395: 17,2526 55536 TS NBPOS # SET UP NB COORD TO Z NORTH, X UP
019303,000396: 17,2527 55623 TS SAVE +2 # INITIALIZE FOR EARTHR DESIGNATE USAGE
019304,000397: 17,2530 55563 TS TESTNO # INITIALIZE FOR TEST ABORT ROUTINE
019305,000398: 17,2531 55616 TS CDUFLAG # ZEROS FOR STRTWACH USE
019306,000399: 17,2532 33714 CAF SFCONST
019307,000400:
019308,000401: 17,2533 55624 TS SFCONST1 # FOR DIVISION DURING CALCFSE
019309,000402:
019310,000403: 17,2534 04063 TC BANKCALL
019311,000404: 17,2535 26000 CADR IMUZERO
019312,000405: 17,2536 04063 TC BANKCALL
019313,000406: 17,2537 26716 CADR IMUSTALL
019314,000407: 17,2540 12261 TCF ENDTEST1
019315,000408: 17,2541 03347 TC NBPOSPL
019316,000409: 17,2542 03102 TC POSGMBL
019317,000410: 17,2543 12261 TCF ENDTEST1
019318,000411: 17,2544 03127 TC FALNE
019319,000412: 17,2545 04063 TC BANKCALL
019320,000413: 17,2546 31705 CADR REDYTORK
019321,000414: 17,2547 55552 WAITFIVE TS SOUTHDR
019322,000415: 17,2550 37645 CAF BIT6 # THIS SECTION CALLS FOR 2-32 MSEC WAITS
019323,000416: 17,2551 02564 TC DIRECTN -5
019324,000417: 17,2552 37645 ENABLE CAF BIT6
019325,000418: 17,2553 00006 EXTEND # ENABLE GYRO TORQUING LOOP BY TURNING
019326,000419: 17,2554 05014 WOR 14C # ON CAL MODULE RELAY
019327,000420:
019328,000421: 17,2555 00004 INHINT
019329,000422: 17,2556 47651 CS TWO # SETS UP EXEC SWITCH SO IMUPULSE WILL
019330,000423: 17,2557 70370 MASK IMODES33 # NOT TURN OFF GYRO TORQ ENABLE RELAY
019331,000424: 17,2560 67651 AD TWO
019332,000425: 17,2561 54370 TS IMODES33
019333,000426: 17,2562 37651 CAF TWO
019334,000427: 17,2563 55552 TS SOUTHDR
019335,000428: 17,2564 55527 TS LENGTHOT # 20 MSEC DELAY FOR GYRO LOOP STABILIZAT.
019336,000429: 17,2565 37652 CA ONE
019337,000430: 17,2566 03210 TC WAITLOOP
019338,000431: 17,2567 11677 CCS COUNTPL
019339,000432: 17,2570 03232 TC WAITLP2
019340,000433: 17,2571 04063 DIRECTN TC BANKCALL # TORQUING ROUTINE IN IMU PERFORMANCE
019341,000434: 17,2572 43105 CADR SILVER # BANK 3
019342,000435: 17,2573 11552 CCS SOUTHDR # A ONE FIRST TIME THROUGH, THEN ZERO
019343,000436: 17,2574 02547 TC WAITFIVE
019344,000437:
019345,000438: 17,2575 11616 STRTWACH CCS CDUFLAG # RETURNS HERE VIA QPLACE FROM SILVER
019346,000439: 17,2576 02657 TC CDUZOTST # BEEN CAUGHT AND CDU THROUGH ZERO IS
019347,000440: 17,2577 11622 CCS SAVE +1
019348,000441: 17,2600 02617 TC LOOKCDUP -4
019349,000442: 17,2601 02623 TC LOOKCDUP
019350,000443: 17,2602 37657 CORRECT CAF ZERO
019351,000444: 17,2603 54357 TS LGYRO # RELEASES GYROS FOR IMUPULSE USAGE
019352,000445: 17,2604 04063 TC BANKCALL # EARTHRATE CORRECTION TO GYROS NOT EAST
019353,000446: 17,2605 30427 CADR EARTHR # OR WEST
019354,000447: 17,2606 37652 CAF ONE
019355,000448: 17,2607 54357 TS LGYRO # RESERVES GYROS FOR S.F. TEST TORQUING
019356,000449: 17,2610 55623 TS SAVE +2 # INITIALIZES TO INSURE 5.6 DEG OF TORQ)
019357,000450: 17,2611 27563 ADS TESTNO # INCR THE BURST COUNTER, WHICH IS USED TO
019358,000451:
019359,000452: 17,2612 41563 CS TESTNO # COUNT THE NO. OF ITMES THE GYRO COUNTER
019360,000453: 17,2613 77227 MASK FIVE # IS LOADED, IF A TENTH LOAD IS REQUESTED
019361,000454: 17,2614 00006 EXTEND # THE SFE IS TOO LARGE TO BE MEANINGFULL
019362,000455: 17,2615 12765 BZF STOPTEST # OR THE CDU,S ARE NOT WORKING.
019363,000456: 17,2616 02571 TC DIRECTN
019364,000457:
019365,000458: 17,2617 37657 CAF ZERO # ZEROS CDU REG WHICH WILL BE USED TO
019366,000459: 17,2620 55622 TS SAVE +1
019367,000460: 17,2621 51673 INDEX CDUNDX # MEASURE ANGLE.
019368,000461: 17,2622 54032 TS CDUX
019369,000462: 17,2623 00004 LOOKCDUP INHINT
019370,000463: 17,2624 37646 CAF BIT5
019371,000464: 17,2625 55625 STILLOOK TS TIMER
019372,000465: 17,2626 51673 INDEX CDUNDX # LOOKS FOR FIRST CDU PULSE AFTER TORQUING
019373,000466: 17,2627 10032 CCS CDUX # STARTS
019374,000467: 17,2630 02642 TC OUTPLUS # HERE IS PLUS PULSE
019375,000468: 17,2631 02634 TC TIMEWACH
019376,000469: 17,2632 02456 TC ALARMS # TTELL OPERATOR FIRST CDU PULSE WAS MISSD
019377,000470: 17,2633 02653 TC OUTNEG # HERE IS MINUS PULSE
019378,000471: 17,2634 11625 TIMEWACH CCS TIMER # WATCHES TIME IN INHINT SO COPS WILL NOT
019379,000472: 17,2635 02625 TC STILLOOK # CATCH US
019380,000473: 17,2636 00003 RELINT
019381,000474:
019382,000475: 17,2637 10067 CCS NEWJOB
019383,000476: 17,2640 04317 TC CHANG1
019384,000477: 17,2641 02623 TC LOOKCDUP # KEEP WATCHING IF THE PULSE IS NOT HERE
019385,000478:
019386,000479: 17,2642 43713 OUTPLUS CS DESANGLE # -2047 CDU PULSES ADDED TO CDU REG SO
019387,000480: 17,2643 51673 INDEX CDUNDX # ZERO CROSSOVER CAN BE DETECTED
019388,000481: 17,2644 54032 TS CDUX
019389,000482: 17,2645 37652 LOADFLAG CAF ONE
019390,000483: 17,2646 55616 TS CDUFLAG
019391,000484: 17,2647 30047 CA GYROCTR # GYRO TORQ CMDS LEFT OUT OF FIRST 5.625
019392,000485: 17,2650 55621 TS SAVE # DEG COMMANDED WHEN CDU PULSE ARRIVED
019393,000486: 17,2651 00003 RELINT
019394,000487: 17,2652 02657 TC CDUZOTST
019395,000488:
019396,000489: 17,2653 33713 OUTNEG CA DESANGLE
019397,000490: 17,2654 51673 INDEX CDUNDX
019398,000491: 17,2655 54032 TS CDUX
019399,000492: 17,2656 02645 TC LOADFLAG
019400,000493:
019401,000494: 17,2657 51673 CDUZOTST INDEX CDUNDX
019402,000495: 17,2660 10032 CCS CDUX
019403,000496: 17,2661 02665 TC +4
019404,000497: 17,2662 02702 TC ENDWATCH
019405,000498: 17,2663 02665 TC +2
019406,000499: 17,2664 02702 TC ENDWATCH
019407,000500: 17,2665 37641 CAF BIT10 # RAND WITH BIT 10 TO SEE IF STILL TORQ.
019408,000501: 17,2666 00006 EXTEND
019409,000502:
019410,000503: 17,2667 02014 RAND 14C
019411,000504: 17,2670 10000 CCS A
019412,000505: 17,2671 02677 TC +6
019413,000506:
019414,000507: 17,2672 11623 CCS SAVE +2 # SEE IF 2.8DEG OR 5.6 DEG SINCE LAST
019415,000508: 17,2673 02675 TC +2 # EEARTHR USE, IF 2.8 DEG, DO 2.8 MORE
019416,000509: 17,2674 02602 TC CORRECT # THEN GO TO CORRECT
019417,000510: 17,2675 55623 TS SAVE +2
019418,000511: 17,2676 02571 TC DIRECTN
019419,000512: 17,2677 10067 CCS NEWJOB
019420,000513: 17,2700 04317 TC CHANG1
019421,000514: 17,2701 02657 TC CDUZOTST
019422,000515:
019423,000516: 17,2702 00004 ENDWATCH INHINT # WWILL STOR GYROCTR AT END OF 2048 CDU
019424,000517: 17,2703 37657 CAF ZERO # PULSES AND STOP TORQ BY ZEROING REQUESTS
019425,000518: 17,2704 54357 TS LGYRO # RELEASE GYROS FOR OTHERS USAGE
019426,000519: 17,2705 56047 XCH GYROCTR
019427,000520: 17,2706 55622 TS SAVE +1 # AND STOPS TORQUING BY ZEROING TORQ
019428,000521: 17,2707 47651 CS TWO
019429,000522: 17,2710 70370 MASK IMODES33 # THIS TURNS OFF EXEC SWITCH SO THE GYRO
019430,000523: 17,2711 54370 TS IMODES33 # TORQ. ENABLE RELAY CAN BE TURNED OFF.
019431,000524: 17,2712 00003 RELINT
019432,000525: 17,2713 31621 CALCSFE CA SAVE # GYROCTR AT TEST START
019433,000526: 17,2714 00006 EXTEND
019434,000527: 17,2715 61622 SU SAVE +1 # GYROCTR AT TEST END
019435,000528: 17,2716 55623 TS SAVE +2
019436,000529: 17,2717 00006 EXTEND
019437,000530: 17,2720 62737 BZMF ARITH # SEE IF IT IS NEG OR ZERO,IF NEG,SFE IS +
019438,000531: 17,2721 73715 MASK SIZCHK
019439,000532: 17,2722 00006 EXTEND # THIS ROUTINE TESTS SAVE-(SAVE+1) TO SEE
019440,000533: 17,2723 12731 BZF NEGSFE # IF THE RESULT IS WITHIN PERMISSIBLE SIZE
019441,000534: 17,2724 41623 CS SAVE +2 # AND DETERMINES POLARITY OF SFE USING THE
019442,000535: 17,2725 73715 MASK SIZCHK # PRESENCE OR ABSENCE OF BITS 12,13,14.
019443,000536: 17,2726 00006 EXTEND # IF BITS ARE PRESENT IN POSITIVE SAVE +2
019444,000537: 17,2727 12733 BZF POSSFE # THEN THE SFE MUST BE POS. IF DIFFERENCE
019445,000538: 17,2730 02765 TC STOPTEST # IS GREATER THAN 2047 PULSES FROM THE
019446,000539: 17,2731 31623 NEGSFE CAE SAVE +2 # IDEAL NO OF PULSES, THE SFE EXCEEDS
019447,000540: 17,2732 02737 TC ARITH # 15600 PPM, THE TEST IS NOT VALID AND
019448,000541:
019449,000542: # THEREFORE ABORTS AND TURNS ON PROGRAM ALARM
019450,000543: 17,2733 37632 POSSFE CAF POSMAX # POS SFE DEFINITION = IRIG SF IN SEC OF
019451,000544: 17,2734 00006 EXTEND # ARC PER PULSE IS GREATER THAN
019452,000545: 17,2735 61623 SU SAVE +2 # .61798095703125 SEC OF ARC/ PULSE
019453,000546: 17,2736 02740 TC ARITH +1
019454,000547:
019455,000548: 17,2737 40000 ARITH COM
019456,000549: 17,2740 22007 ZL
019457,000550: 17,2741 00006 EXTEND
019458,000551: 17,2742 11624 DV SFCONST1
019459,000552: 17,2743 54336 LOADIT TS DSPTEM2
019460,000553:
019461,000554: 17,2744 02745 TC DATADSP
019462,000555:
019463,000556: 17,2745 05206 DATADSP TC GRABDSP
019464,000557: 17,2746 05214 TC PREGBSY
019465,000558: 17,2747 31615 CA CALCDIR
019466,000559: 17,2750 54340 TS DSPTEM2 +2 # DISPLAYS TEST NO JUST PERFORMED
019467,000560: 17,2751 33720 CAF VB06N66 # R3 = TEST NO JUST PERFORMED
019468,000561: 17,2752 05234 TC NVSBWAIT
019469,000562: 17,2753 05176 TC FLASHON
019470,000563: 17,2754 05042 TC ENDIDLE # TO END TEST DO V34E
019471,000564: 17,2755 02757 TC +2
019472,000565: 17,2756 02467 TC TESTCALL # TO CONTINUE TEST DO V33E
019473,000566: 17,2757 04063 TC BANKCALL
019474,000567: 17,2760 26000 CADR IMUZERO
019475,000568: 17,2761 04063 TC BANKCALL
019476,000569: 17,2762 26716 CADR IMUSTALL
019477,000570: 17,2763 12261 TCF ENDTEST1
019478,000571: 17,2764 12261 TCF ENDTEST1
019479,000572:
019480,000573: 17,2765 04063 STOPTEST TC BANKCALL
019481,000574: 17,2766 26000 CADR IMUZERO
019482,000575: 17,2767 04063 TC BANKCALL # CORRECT CDUCTRS AND TURN ON PROG ALARM
019483,000576: 17,2770 26716 CADR IMUSTALL # TO TELL OPERATOR LAST CDU PULSE WAS
019484,000577: 17,2771 12261 TCF ENDTEST1 # MISSED OR GYRO TORQ LOOP WAY OUT OF
019485,000578: 17,2772 04102 TC POSTJUMP # ALLOWABLE LIMITS.........
019486,000579: 17,2773 35406 CADR STOPTST1
019487,000580:
019488,000581: 17,2774 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
019489,000582: 17,2775 23546 QXCH QPLACE # RECORDS TIME AT OCCURRENCE OF A DELTA V
019490,000583: 17,2776 00003 CHECKG1 RELINT # KEEPS CONTENT OF PIPA REG INTACT
019491,000584: 17,2777 10067 CCS NEWJOB
019492,000585: 17,3000 04317 TC CHANG1
019493,000586: 17,3001 00004 INHINT
019494,000587: 17,3002 37657 CAF ZERO
019495,000588: 17,3003 51541 INDEX PIPINDEX
019496,000589: 17,3004 56037 XCH PIPAX
019497,000590: 17,3005 55551 TS STOREPL
019498,000591: 17,3006 11551 CCS STOREPL
019499,000592: 17,3007 03013 TC CHECKP
019500,000593: 17,3010 03066 TC RESTOREA
019501,000594: 17,3011 03026 TC CHECKM
019502,000595: 17,3012 03066 TC RESTOREA
019503,000596: 17,3013 37645 CHECKP CAF BIT6 # LOOKS FOR ONE MORE PLUS PULSE
019504,000597: 17,3014 55540 TS PIPANO
019505,000598: 17,3015 51541 INDEX PIPINDEX
019506,000599: 17,3016 10037 CCS PIPAX
019507,000600: 17,3017 03041 TC CHECKG3
019508,000601: 17,3020 03023 TC +3
019509,000602: 17,3021 03066 TC RESTOREA
019510,000603: 17,3022 03023 TC +1
019511,000604: 17,3023 11540 CCS PIPANO
019512,000605: 17,3024 03014 TC CHECKP +1
019513,000606: 17,3025 03066 TC RESTOREA
019514,000607: 17,3026 37645 CHECKM CAF BIT6 # LOOKS FOR ONE MORE MINUS PULSE
019515,000608: 17,3027 55540 TS PIPANO
019516,000609: 17,3030 51541 INDEX PIPINDEX
019517,000610: 17,3031 10037 CCS PIPAX
019518,000611: 17,3032 03066 TC RESTOREA
019519,000612: 17,3033 03036 TC +3
019520,000613: 17,3034 03041 TC CHECKG3
019521,000614: 17,3035 03036 TC +1
019522,000615: 17,3036 11540 CCS PIPANO
019523,000616: 17,3037 03027 TC CHECKM +1
019524,000617: 17,3040 03066 TC RESTOREA
019525,000618: 17,3041 05372 CHECKG3 TC FINETIME # TIME IN DOUBLE PRECISION LEFT IN MPAC
019526,000619:
019527,000620: 17,3042 52141 DXCH MPAC
019528,000621: 17,3043 37647 CAF BIT4
019529,000622: 17,3044 55540 CHECKG5 TS PIPANO
019530,000623: 17,3045 51541 INDEX PIPINDEX
019531,000624: 17,3046 10037 CCS PIPAX
019532,000625: 17,3047 03053 TC +4
019533,000626: 17,3050 03066 TC RESTOREA
019534,000627: 17,3051 03053 TC +2
019535,000628: 17,3052 03066 TC RESTOREA
019536,000629: 17,3053 11540 CCS PIPANO
019537,000630: 17,3054 03044 TC CHECKG5
019538,000631:
019539,000632: 17,3055 03060 NREAD TC RESTORE
019540,000633: 17,3056 55551 TS STOREPL
019541,000634: 17,3057 01546 TC QPLACE
019542,000635: 17,3060 57551 RESTORE XCH STOREPL # A WILL CONTAIN PREVIOUS PIPA CNTR CONTEN
019543,000636: 17,3061 51541 INDEX PIPINDEX # STOREPL WILL CONTAIN ZERO
019544,000637: 17,3062 60037 AD PIPAX
019545,000638: 17,3063 51541 INDEX PIPINDEX
019546,000639: 17,3064 54037 TS PIPAX
019547,000640: 17,3065 00002 TC Q
019548,000641:
019549,000642: 17,3066 03060 RESTOREA TC RESTORE
019550,000643: 17,3067 02776 TC CHECKG1
019551,000644: 17,3070 31551 DATALD CA STOREPL
019552,000645: 17,3071 51674 INDEX RESULTCT
019553,000646: 17,3072 55627 TS DATAPL
019554,000647: 17,3073 30140 CA MPAC
019555,000648: 17,3074 51674 INDEX RESULTCT
019556,000649: 17,3075 55630 TS DATAPL +1
019557,000650: 17,3076 30141 CA MPAC +1
019558,000651: 17,3077 51674 INDEX RESULTCT
019559,000652: 17,3100 55631 TS DATAPL +2
019560,000653: 17,3101 00002 TC Q
019561,000654:
019562,000655:
019563,000656:
019564,000657:
019565,000658:
019566,000659: 17,3102 00006 POSGMBL EXTEND # COARSE ALIGNING SUBROUTINE
019567,000660: 17,3103 23546 QXCH QPLACE
019568,000661:
019569,000662: 17,3104 06000 TC INTPRET
019570,000663: 17,3105 77634 CALL
019571,000664: 17,3106 32615 CALCGA
019572,000665: 17,3107 77776 EXIT
019573,000666:
019574,000667: 17,3110 04063 TC BANKCALL
019575,000668: 17,3111 26055 CADR IMUCOARS
019576,000669: 17,3112 33126 CA GMLOCKCK # IF FAILREG CONTAINS 401 WILL RETURN TO
019577,000670: 17,3113 71363 MASK FAILREG
019578,000671: 17,3114 10000 CCS A # L +1, OTHERWISE TO L +2.
019579,000672: 17,3115 03120 TC LOCK
019580,000673: 17,3116 25546 INCR QPLACE
019581,000674: 17,3117 03122 TC +3
019582,000675: 17,3120 37651 LOCK CA TWO
019583,000676: 17,3121 55537 TS NDXCTR
019584,000677: 17,3122 04063 TC BANKCALL
019585,000678: 17,3123 26716 CADR IMUSTALL
019586,000679: 17,3124 12261 TCF ENDTEST1
019587,000680: 17,3125 01546 TC QPLACE
019588,000681: 17,3126 00401 GMLOCKCK OCT 00401
019589,000682:
019590,000683: 17,3127 00006 FALNE EXTEND # TORQUES GYROS TO NULL OVT DIFFERENCE
019591,000684: 17,3130 23546 QXCH QPLACE # BETWEEN DESIRED SM ORIENTATION WITH RESP
019592,000685: 17,3131 04063 TC BANKCALL # TO NBASE AND ACTUAL
019593,000686: 17,3132 26000 CADR IMUZERO
019594,000687: 17,3133 04063 TC BANKCALL
019595,000688: 17,3134 26716 CADR IMUSTALL
019596,000689: 17,3135 12261 TCF ENDTEST1
019597,000690: 17,3136 04063 TC BANKCALL
019598,000691: 17,3137 26227 CADR IMUFINE
019599,000692: 17,3140 04063 TC BANKCALL
019600,000693: 17,3141 26716 CADR IMUSTALL
019601,000694: 17,3142 12261 TCF ENDTEST1
019602,000695: 17,3143 30032 FALNE1 CA CDUX
019603,000696: 17,3144 50104 INDEX FIXLOC
019604,000697: 17,3145 54024 TS 24
019605,000698: 17,3146 30033 CA CDUY
019606,000699: 17,3147 50104 INDEX FIXLOC
019607,000700: 17,3150 54020 TS 20
019608,000701: 17,3151 30034 CA CDUZ
019609,000702: 17,3152 50104 INDEX FIXLOC
019610,000703: 17,3153 54022 TS 22
019611,000704: 17,3154 37646 CA BIT5
019612,000705: 17,3155 60104 AD FIXLOC
019613,000706: 17,3156 50104 INDEX FIXLOC
019614,000707: 17,3157 54050 TS S1
019615,000708: 17,3160 06000 TC INTPRET
019616,000709: 17,3161 64375 VLOAD MXV
019617,000710: 17,3162 01401 XSM
019618,000711: 17,3163 01445 STARAD
019619,000712: 17,3164 77772 VSL1
019620,000713: 17,3165 36041 STCALL 32D
019621,000714: 17,3166 32517 NBSM
019622,000715: 17,3167 23423 STOVL XDC
019623,000716: 17,3170 01407 YSM
019624,000717: 17,3171 76521 MXV VSL1
019625,000718: 17,3172 01445 STARAD
019626,000719: 17,3173 36041 STCALL 32D
019627,000720: 17,3174 32517 NBSM
019628,000721: 17,3175 23431 STOVL YDC
019629,000722: 17,3176 01423 XDC
019630,000723: 17,3177 76435 VXV VSL1
019631,000724: 17,3200 01431 YDC
019632,000725: 17,3201 37437 STCALL ZDC
019633,000726: 17,3202 32367 CALCGTA
019634,000727: 17,3203 77776 EXIT
019635,000728: 17,3204 33734 CA OGCPL
019636,000729: 17,3205 04063 TC BANKCALL
019637,000730: 17,3206 26317 CADR IMUPULSE
019638,000731: 17,3207 01546 TC QPLACE
019639,000732:
019640,000733: 17,3210 00006 WAITLOOP EXTEND # LOOPS IN X SEC INCREMENTS FOR NUMBER OF
019641,000734: 17,3211 23545 QXCH QPLAC
019642,000735: 17,3212 55677 TS COUNTPL # NUMBER PUT INTO LENGTHOT
019643,000736: 17,3213 11677 WAITLP1 CCS COUNTPL
019644,000737: 17,3214 03220 TC +4
019645,000738: 17,3215 01545 TC QPLAC
019646,000739: 17,3216 03220 TC +2
019647,000740: 17,3217 03212 TC WAITLP1 -1
019648,000741: 17,3220 00004 INHINT
019649,000742: 17,3221 31527 CAE LENGTHOT
019650,000743: 17,3222 04451 TC WAITLIST
019651,000744: 17,3223 03236 36005 2CADR WAITLP3
019652,000745: 17,3225 00003 RELINT
019653,000746: 17,3226 11677 CCS COUNTPL
019654,000747: 17,3227 01545 TC QPLAC
019655,000748: 17,3230 01545 TC QPLAC
019656,000749: 17,3231 13232 NOOP
019657,000750: 17,3232 55677 WAITLP2 TS COUNTPL # ENTER HERE AFTER DOING CALLING JOB
019658,000751: 17,3233 33235 CAF WTLPCADR
019659,000752: 17,3234 04331 TC JOBSLEEP
019660,000753: 17,3235 37213 WTLPCADR CADR WAITLP1
019661,000754: 17,3236 33235 WAITLP3 CAF WTLPCADR
019662,000755: 17,3237 04335 TC JOBWAKE
019663,000756: 17,3240 04505 TC TASKOVER
019664,000757:
019665,000758:
019666,000759:
019667,000760:
019668,000761:
019669,000762: 17,3241 54001 ZEROING TS L
019670,000763: 17,3242 13244 TCF +2
019671,000764: 17,3243 55747 ZEROING1 TS ZERONDX
019672,000765: 17,3244 37657 CAF ZERO
019673,000766: 17,3245 50001 INDEX L
019674,000767: 17,3246 54000 TS 0
019675,000768: 17,3247 24001 INCR L
019676,000769: 17,3250 11747 CCS ZERONDX
019677,000770: 17,3251 13243 TCF ZEROING1
019678,000771: 17,3252 00002 TC Q
019679,000772: 17,3253 06000 COMPUT TC INTPRET # CALCULATE LENGTH OF GRAVITY VECTOR AS
019680,000773: 17,3254 77170 AXT,1 AXT,2 # MEASURED BY ACCELEROMETERS
019681,000774: 17,3255 00026 22D
019682,000775: 17,3256 00012 10D
019683,000776: 17,3257 77731 SSP
019684,000777: 17,3260 00051 S1
019685,000778: 17,3261 00004 4
019686,000779: 17,3262 77731 SSP
019687,000780: 17,3263 00052 S2
019688,000781: 17,3264 00004 4
019689,000782:
019690,000783: 17,3265 44743 LOPDELOP DLOAD* DSU*
019691,000784: 17,3266 76117 DATAPL +24D,2
019692,000785: 17,3267 01660 DATAPL +24D,1
019693,000786: 17,3270 41323 PDDL* DMP
019694,000787: 17,3271 76155 GENPL +24D,2
019695,000788: 17,3272 37726 DEC585
019696,000789: 17,3273 77671 DDV
019697,000790: 17,3274 55504 TIX,2 VDEF
019698,000791: 17,3275 37302 NEXT
019699,000792: 17,3276 45046 ABVAL RTB
019700,000793: 17,3277 33524 SGNAGREE
019701,000794: 17,3300 36337 STCALL DSPTEM2
019702,000795: 17,3301 37304 KODU
019703,000796: 17,3302 60006 NEXT PUSH TIX,1
019704,000797: 17,3303 37265 LOPDELOP
019705,000798: 17,3304 77776 KODU EXIT
019706,000799: 17,3305 05221 TC GRABWAIT
019707,000800: 17,3306 03676 TC SHOW
019708,000801: 17,3307 06000 TC INTPRET
019709,000802: 17,3310 41535 SLOAD PUSH
019710,000803: 17,3311 01631 DATAPL +1
019711,000804: 17,3312 41535 SLOAD PUSH
019712,000805: 17,3313 01635 DATAPL +5
019713,000806: 17,3314 55535 SLOAD VDEF
019714,000807: 17,3315 01641 DATAPL +11
019715,000808: 17,3316 76456 UNIT VSL1
019716,000809: 17,3317 77606 PUSH
019717,000810: 17,3320 41535 SLOAD PUSH
019718,000811: 17,3321 01645 DATAPL +15
019719,000812: 17,3322 41535 SLOAD PUSH
019720,000813: 17,3323 01651 DATAPL +21
019721,000814: 17,3324 55535 SLOAD VDEF
019722,000815: 17,3325 01655 DATAPL +25
019723,000816: 17,3326 76456 UNIT VSL1
019724,000817: 17,3327 45325 PDDL DSU
019725,000818: 17,3330 01656 DATAPL +26
019726,000819: 17,3331 01642 DATAPL +12
019727,000820: 17,3332 77612 SL4
019728,000821: 17,3333 77652 SL3
019729,000822: 17,3334 23530 STOVL LENGTHOT
019730,000823: 17,3335 51435 VXV ABVAL
019731,000824: 17,3336 56205 DMP DDV
019732,000825: 17,3337 37731 ERUNITS
019733,000826: 17,3340 01530 LENGTHOT
019734,000827: 17,3341 77624 RTB
019735,000828: 17,3342 33524 SGNAGREE
019736,000829: 17,3343 00337 STORE DSPTEM2
019737,000830: 17,3344 77776 EXIT
019738,000831: 17,3345 03676 TC SHOW
019739,000832: 17,3346 12420 TCF RADCK
019740,000833:
019741,000834: 17,3347 00006 NBPOSPL EXTEND # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
019742,000835: 17,3350 23546 QXCH QPLACE # AXISGEN,RESULTS TO BE USED IN CALCGA TO
019743,000836: 17,3351 06000 TC INTPRET
019744,000837: 17,3352 54160 AXC,1 XSU,1 # AZIMUTH IN NB COORDS
019745,000838: 17,3353 37750 SCNBAZ
019746,000839: 17,3354 01536 NBPOS
019747,000840: 17,3355 77773 VLOAD*
019748,000841: 17,3356 00001 0,1
019749,000842: 17,3357 01445 STORE STARAD
019750,000843:
019751,000844: 17,3360 54160 AXC,1 XSU,1 # VERITCAL IN NB COORDS
019752,000845: 17,3361 37762 SCNBVER
019753,000846: 17,3362 01536 NBPOS
019754,000847: 17,3363 77773 VLOAD*
019755,000848: 17,3364 00001 0,1
019756,000849: 17,3365 07453 STODL STARAD +6
019757,000850: 17,3366 33160 ZERODP
019758,000851: 17,3367 06007 STODL 6D
019759,000852: 17,3370 01507 AZIMUTH
019760,000853: 17,3371 57546 COS DCOMP
019761,000854: 17,3372 06011 STODL 8D
019762,000855: 17,3373 01507 AZIMUTH
019763,000856: 17,3374 77756 SIN
019764,000857: 17,3375 00013 STORE 10D # VERTICAL IN CER
019765,000858: 17,3376 77775 VLOAD
019766,000859: 17,3377 37763 SCNBVER
019767,000860: 17,3400 36015 STCALL 12D
019768,000861: 17,3401 32677 AXISGEN
019769,000862: 17,3402 77776 EXIT
019770,000863:
019771,000864: 17,3403 33724 SELPOSN CA DEC17
019772,000865: 17,3404 55747 TS ZERONDX
019773,000866: 17,3405 33744 CA XSMADR
019774,000867: 17,3406 03241 TC ZEROING
019775,000868:
019776,000869: 17,3407 51544 INDEX POSITON
019777,000870: 17,3410 03411 TC +1
019778,000871: 17,3411 03607 TC OPCHKPOS # OPCHK WILL PUT ZERO IN POSITON
019779,000872: 17,3412 03424 TC POSN1
019780,000873: 17,3413 03443 TC POSN2
019781,000874: 17,3414 03462 TC POSN3
019782,000875: 17,3415 03477 TC POSN4
019783,000876: 17,3416 03511 TC POSN5
019784,000877: 17,3417 03524 TC POSN6
019785,000878: 17,3420 03540 TC POSN7
019786,000879: 17,3421 03570 TC POSN8
019787,000880: 17,3422 03625 TC POSN9
019788,000881: 17,3423 03650 TC POSN10
019789,000882:
|
|
MAS 2023: All of the POSN* functions below were heavily modified between Aurora 85 and Aurora 88. STG memo #824, which lists all of the changes between the two versions, captures these changes as item 7.b, "Shortened positioning select routines for drift and pip tests". While this is fully true for later ropes, it is only true in terms of the code path taken in Aurora 88. The routines could not actually be shortened in terms of space because doing so would change the addresses of existing symbols, which is undesirable when only remanufacturing a subset of the program's modules. |
019798,000891: ##
|
|
Instead, the routines were "shortened" by replacing each in-place with its shorter equivalent. The tail ends of the former routines are mostly still visible, but have been partly replaced by NOOPs to prevent assembly errors. In some cases, this dead code was totally replaced by patches for other routines. These cases are annotated where they occur. |
019804,000897:
019805,000898: # WE WILL DENOTE THE FLASHING DISPLAY OF A HORIZONTAL TEST BY DH
019806,000899: # (XXX.XX MERU) AND A VERTICAL TEST BY DV (XXX.XX MERU) EACH POSITION TELL
019807,000900: # HOW THE DISPLAYS ARE RELATED TO TTHE DRIFT COEFFICIENTS BEING MEASURED.
019808,000901: # NOTE THAT IT IS ILLEGAL TO RUN VERTICAL IN POS 6,4, OR 2 WITHOUT FIRST
019809,000902: # RUNNING HORIZONTAL OF POS 5,3, OR1. THIS IS BECAUSE THE HORIZ DRIFT CALC
019810,000903: # IN 1,3, OR 5 IS USED AS EAST DRIFFFT FOR VERTICAL TEST. THIS IS DONE BY
019811,000904: # THE MACHINE AUTOMATICALLY EXCEPT FOR VERTICAL POSITION 6 WHICH THE
019812,000905: # OPERATOR MUST DO. (SEE POSITION 6 BELOW)
019813,000906: 17,3424 37635 POSN1 CA HALF # X UP, Y SOUTH, Z EAST
019814,000907: 17,3425 55400 TS XSM
019815,000908: 17,3426 55410 TS YSM +2 # NBDY = DH
019816,000909: 17,3427 55420 TS ZSM +4
019817,000910: 17,3430 37657 NGUBGH CA ZERO
019818,000911: 17,3431 55541 TS PIPINDEX
019819,000912: 17,3432 13442 TCF POSN2 -1
019820,000913:
019821,000914:
|
|
This chunk is dead code from Aurora 85. |
019823,000916: 17,3433 55573 TS UE5,1573
019824,000917: 17,3434 37652 U17,3434 CA ONE
019825,000918: 17,3435 55571 TS UE5,1571
019826,000919: 17,3436 13437 NOOP
019827,000920: 17,3437 55572 TS UE5,1572
019828,000921: 17,3440 13441 NOOP
019829,000922: 17,3441 55574 TS UE5,1574
019830,000923:
019831,000924:
019832,000925: 17,3442 01546 TC QPLACE
019833,000926:
019834,000927: 17,3443 47635 POSN2 CS HALF # X DOWN, Y WEST, Z NORTH
019835,000928: 17,3444 55400 TS XSM
019836,000929: 17,3445 55412 TS YSM +4 # NBDZ =DH ,NBDX -ADIAX= -DV
019837,000930: 17,3446 55416 TS ZSM +2
019838,000931: 17,3447 03430 TC NGUBGH
019839,000932:
019840,000933:
019841,000934:
|
|
This chunk is dead code from Aurora 85. |
019843,000936: 17,3450 13462 TCF POSN3
019844,000937: 17,3451 37652 CA ONE
019845,000938: 17,3452 55573 TS UE5,1573
019846,000939: 17,3453 37651 U17,3453 CA TWO
019847,000940: 17,3454 55571 TS UE5,1571
019848,000941: 17,3455 13456 NOOP
019849,000942: 17,3456 55574 TS UE5,1574
019850,000943: 17,3457 13460 NOOP
019851,000944: 17,3460 55572 TS UE5,1572
019852,000945: 17,3461 01546 TC QPLACE
019853,000946:
019854,000947:
019855,000948:
019856,000949: 17,3462 37635 POSN3 CA HALF # Z UP, Y WEST ,X NORTH
019857,000950: 17,3463 55414 TS ZSM
019858,000951: 17,3464 40000 COM # NBDX = -DH
019859,000952: 17,3465 55402 TS XSM +2
019860,000953: 17,3466 55412 TS YSM +4
019861,000954: 17,3467 37651 NSFLAGD CA TWO
019862,000955: 17,3470 55541 TS PIPINDEX
019863,000956: 17,3471 37657 NSBUGD CA ZERO
019864,000957: 17,3472 55645 TS DRIFTT
019865,000958: 17,3473 01546 TC QPLACE
019866,000959:
|
|
This patch was inserted over dead POSN3 code from Aurora 85. |
019868,000961: 17,3474 04063 JUMPLOD1 TC BANKCALL
019869,000962: 17,3475 42000 CADR ESTIMS
019870,000963: 17,3476 02063 TC JUMPLOAD +2
019871,000964:
019872,000965:
019873,000966: 17,3477 37635 POSN4 CA HALF # Y SOUTH, X EAST, Z DOWN
019874,000967: 17,3500 55404 TS XSM +4 # NBDY +ADSRAY=DH
019875,000968: 17,3501 55410 TS YSM +2 # NBDZ +ADIAZ =DV
019876,000969: 17,3502 40000 COM
019877,000970: 17,3503 55414 TS ZSM
019878,000971: 17,3504 37651 CA TWO
019879,000972: 17,3505 55541 TS PIPINDEX
019880,000973: 17,3506 01546 TC QPLACE
019881,000974:
|
|
This chunk is dead code from Aurora 85. |
019883,000976: 17,3507 13511 TCF POSN5
019884,000977: 17,3510 03434 TC U17,3434
019885,000978:
019886,000979:
019887,000980: 17,3511 37635 POSN5 CA HALF # Y UP, Z NORTH, X WEST
019888,000981: 17,3512 55406 TS YSM
019889,000982: 17,3513 40000 COM # NBDZ-ADSRAZ =DH
019890,000983: 17,3514 55404 TS XSM +4
019891,000984: 17,3515 55416 TS ZSM +2
019892,000985: 17,3516 37652 CA ONE
019893,000986: 17,3517 55541 TS PIPINDEX
019894,000987: 17,3520 03471 TC NSBUGD
019895,000988:
019896,000989:
|
|
This chunk is dead code from Aurora 85. |
019898,000991: 17,3521 13523 TCF POSN6 -1
019899,000992: 17,3522 55645 TS DRIFTT
019900,000993: 17,3523 03453 TC U17,3453
019901,000994:
019902,000995:
019903,000996:
019904,000997: # TO RUN POSITION 6 VERTICAL AFTER PIP TEST POS 6 IS DISPLAYED THE OPERATR
019905,000998: # MUST CALCULATE FROM 2.5 -NBDZ-ADSRAZ (XXX.XX)MERU. WHEN PI
019906,000999: # IP DATA FLASHES DO VERB 33 ENTER. THIS STARTS VERTICAL TEST. THEN THE
019907,001000: # DATA XXX.XX MERU AS CALCULATED MUST BE ENTERED INTO DRIFTT. IE VERB 21
019908,001001: # ENTER NOUN 01 ENTER LOCATION OF DRIFTT ENTER + (OR -) XXXXX ENTER
019909,001002: 17,3524 37635 POSN6 CA HALF # Y DOWN, Z EAST, X SOUTH
019910,001003: 17,3525 55402 TS XSM +2
019911,001004: 17,3526 55420 TS ZSM +4
019912,001005: 17,3527 40000 COM # NBDX +ADSRAX = DH, NBDY -ADIAY = -DV
019913,001006: 17,3530 55406 TS YSM
019914,001007: 17,3531 37652 CA ONE
019915,001008: 17,3532 55541 TS PIPINDEX
019916,001009: 17,3533 01546 TC QPLACE
019917,001010:
019918,001011:
|
|
This chunk is dead code from Aurora 85. |
019920,001013: 17,3534 13540 TCF POSN7
019921,001014: 17,3535 37651 CA TWO
019922,001015: 17,3536 55573 TS UE5,1573
019923,001016: 17,3537 13540 NOOP
019924,001017:
019925,001018:
019926,001019:
019927,001020: 17,3540 47635 POSN7 CS HALF # Z UP-EAST,Y UP-WEST,X NORTH.THIS POSITON
019928,001021: 17,3541 55402 TS XSM +2
019929,001022: 17,3542 33740 CA ROOT1/2
019930,001023: 17,3543 55406 TS YSM # NBDX - .707 ADSRAX = -DH
019931,001024: 17,3544 55414 TS ZSM
019932,001025: 17,3545 55420 TS ZSM +4
019933,001026: 17,3546 40000 COM
019934,001027: 17,3547 55412 TS YSM +4
019935,001028: 17,3550 37657 GEORGES CA ZERO
019936,001029: 17,3551 55363 TS FAILREG
019937,001030: 17,3552 03471 TC NSBUGD
019938,001031:
019939,001032:
|
|
This patch was inserted over dead POSN7 code from Aurora 85. |
019941,001034: 17,3553 00006 LOADGTSM EXTEND # THIS LOADS XSM INTO GEOMATRX
019942,001035: 17,3554 23546 QXCH QPLACE
019943,001036: 17,3555 06000 TC INTPRET
019944,001037: 17,3556 77775 VLOAD
019945,001038: 17,3557 01401 XSM
019946,001039: 17,3560 23001 STOVL GEOMTRX
019947,001040: 17,3561 01407 YSM
019948,001041: 17,3562 23007 STOVL GEOMTRX +6
019949,001042: 17,3563 01415 ZSM
019950,001043: 17,3564 01015 STORE GEOMTRX +12D
019951,001044: 17,3565 77776 EXIT
019952,001045: 17,3566 01546 TC QPLACE
019953,001046:
019954,001047:
|
|
This instruction is dead code from Aurora 85. |
019956,001049: 17,3567 03570 TC +1
019957,001050:
019958,001051:
019959,001052: 17,3570 37635 POSN8 CA HALF # Z UP-SOUTH,Y UP-NORTH,X EAST.THIS POSITN
019960,001053: 17,3571 55404 TS XSM +4
019961,001054: 17,3572 33740 CA ROOT1/2 # .707(-NBDZ-NBDY) +.5(ADIAZ-ADIAY)
019962,001055: 17,3573 55406 TS YSM # +.5(ADSRAY +ADSRAZ)=DH
019963,001056: 17,3574 55416 TS ZSM +2
019964,001057: 17,3575 55414 TS ZSM
019965,001058: 17,3576 40000 COM
019966,001059: 17,3577 55410 TS YSM +2
019967,001060: 17,3600 03471 TC NSBUGD
019968,001061:
|
|
This patch was inserted over dead POSN8 code from Aurora 85. |
019970,001063: 17,3601 03553 VRTDRFT1 TC LOADGTSM
019971,001064: 17,3602 04063 TC BANKCALL # THIS WILL CORRECT FOR EARTH RATE DURING
019972,001065: 17,3603 30427 CADR EARTHR # TIME SPENT IN SHOW ABOVE*
019973,001066: 17,3604 37657 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
019974,001067: 17,3605 02212 TC VRTDRFT2
019975,001068:
|
|
This instruction is dead code from Aurora 85. |
019977,001070: 17,3606 03607 TC +1
019978,001071:
019979,001072: 17,3607 33741 OPCHKPOS CA ROOT1SQ # OG=+45DEG,IG=-45DEG,MG=+45DEG.
019980,001073: 17,3610 55400 TS XSM
019981,001074: 17,3611 55410 TS YSM +2
019982,001075: 17,3612 55412 TS YSM +4
019983,001076: 17,3613 55414 TS ZSM
019984,001077: 17,3614 33740 CA ROOT1/2
019985,001078: 17,3615 55406 TS YSM
019986,001079: 17,3616 33743 CA ROOT3SQ
019987,001080: 17,3617 55402 TS XSM +2
019988,001081: 17,3620 55420 TS ZSM +4
019989,001082: 17,3621 43742 CS ROOT2SQ
019990,001083: 17,3622 55404 TS XSM +4
019991,001084: 17,3623 55416 TS ZSM +2
019992,001085: 17,3624 01546 TC QPLACE
019993,001086:
019994,001087: 17,3625 37635 POSN9 CA HALF # X UP EAST,Y UP WEST,Z SOUTH.THIS POSITON
019995,001088: 17,3626 55416 TS ZSM +2
019996,001089: 17,3627 33740 CA ROOT1/2 # -NBDZ +.707 SRAZ =DH
019997,001090: 17,3630 55400 TS XSM
019998,001091: 17,3631 55404 TS XSM +4
019999,001092: 17,3632 55406 TS YSM
020000,001093: 17,3633 40000 COM
020001,001094: 17,3634 55412 TS YSM +4
020002,001095: 17,3635 03471 TC NSBUGD
020003,001096:
020004,001097:
|
|
This chunk is dead code from Aurora 85. |
020006,001099: 17,3636 13650 TCF POSN10
020007,001100: 17,3637 37652 CA ONE
020008,001101: 17,3640 55573 TS UE5,1573
020009,001102: 17,3641 37657 CA ZERO
020010,001103: 17,3642 55541 TS PIPINDEX
020011,001104: 17,3643 55645 TS DRIFTT
020012,001105: 17,3644 55746 TS UE5,1746
020013,001106: 17,3645 37650 CA FOUR
020014,001107: 17,3646 55745 TS DPIPAIDX
020015,001108: 17,3647 13650 NOOP
020016,001109:
020017,001110:
020018,001111:
020019,001112: 17,3650 37635 POSN10 CA HALF # X UP NORTH, Y UP SOUTH,Z EAST.THIS POSITN
020020,001113: 17,3651 55420 TS ZSM +4
020021,001114: 17,3652 33740 CA ROOT1/2 # .707(NBDY -NBDX) +.5(ADIAY -ADIAX)
020022,001115: 17,3653 55400 TS XSM # +.5(ADSRAX) = DH
020023,001116: 17,3654 55406 TS YSM
020024,001117: 17,3655 55410 TS YSM +2
020025,001118: 17,3656 40000 COM
020026,001119: 17,3657 55402 TS XSM +2
020027,001120: 17,3660 03471 TC NSBUGD
020028,001121:
020029,001122:
|
|
This chunk is dead code from Aurora 85. |
020031,001124: 17,3661 13667 TCF SHOWLD
020032,001125: 17,3662 37652 CA ONE
020033,001126: 17,3663 55571 TS UE5,1571
020034,001127: 17,3664 37657 CA ZERO
020035,001128: 17,3665 55541 TS PIPINDEX
020036,001129: 17,3666 03550 TC GEORGES
020037,001130:
020038,001131:
020039,001132:
020040,001133: 17,3667 30336 SHOWLD CA DSPTEM2
020041,001134: 17,3670 55527 TS LENGTHOT
020042,001135: 17,3671 30337 CA DSPTEM2 +1
020043,001136: 17,3672 55536 TS NBPOS
020044,001137: 17,3673 30340 CA DSPTEM2 +2
020045,001138:
020046,001139: 17,3674 55544 TS POSITON
020047,001140: 17,3675 00002 TC Q
020048,001141:
020049,001142: 17,3676 00006 SHOW EXTEND
020050,001143: 17,3677 23546 QXCH QPLACE
020051,001144: 17,3700 31544 SHOW1 CA POSITON
020052,001145: 17,3701 54340 TS DSPTEM2 +2
020053,001146: 17,3702 33720 CA VB06N66
020054,001147: 17,3703 05234 TC NVSBWAIT
020055,001148: 17,3704 05176 TC FLASHON
020056,001149: 17,3705 05042 TC ENDIDLE
020057,001150: 17,3706 02252 TC FINISH
020058,001151: 17,3707 01546 TC QPLACE
020059,001152: 17,3710 03667 TC SHOWLD
020060,001153: 17,3711 13700 TCF SHOW1
020061,001154:
020062,001155:
020063,001156:
020064,001157: 17,3712 14C EQUALS 0014
020065,001158: 17,3712 02130 V21N30E OCT 02130
020066,001159: 17,3713 04000 DESANGLE DEC 2048 B-14
020067,001160: 17,3714 04143 SFCONST DEC .13107
020068,001161: 17,3715 34000 SIZCHK OCT 34000
020069,001162: 17,3716 00264 180DEC DEC 180 B-14
020070,001163: 17,3717 07636 3998DEC DEC 3998 B-14
020071,001164: 17,3720 00666 VB06N66 OCT 00666
020072,001165: 17,3721 01130 TESTTIME DEC 600 B-14
020073,001166: 17,3722 01620 V16N20S OCT 01620
020074,001167: 17,3723 01640 V16N40S OCT 01640
020075,001168: 17,3724 00021 DEC17 DEC 17 B-14
020076,001169: 17,3725 06200 00000 DEC585 2DEC 3200 B+14
020077,001170: 17,3727 00400 DELYOFF OCT 00400
020078,001171: 17,3730 00024 35474 ERUNITS 2DEC 342844 B-28
020079,001172: 17,3732 01506 GENPLAD GENADR AZIMUTH
020080,001173: 17,3733 02521 GYRODPL ECADR GYROD
020081,001174: 17,3734 02500 OGCPL ECADR OGC
020082,001175: 17,3735 77760 LOWFOUR OCT 77760
020083,001176: 17,3736 00070 DEC56 DEC 56 B-14
020084,001177: 17,3737 10000 45DEG OCT 10000
020085,001178: 17,3740 13241 ROOT1/2 DEC .353553
020086,001179: 17,3741 10000 ROOT1SQ DEC .250000
020087,001180: 17,3742 15520 ROOT2SQ DEC .426776
020088,001181: 17,3743 02260 ROOT3SQ DEC .073223
020089,001182: 17,3744 01400 XSMADR GENADR XSM
|
|
MAS 2023: The following two words are most likely "NOOP"s replacing a constant that was only used in Aurora 85. |
020092,001185: 17,3745 13747 TCF +2
020093,001186: 17,3746 13747 TCF +1
020094,001187: 17,3747 42236 LNORMLOP CADR NORMLOP
020095,001188:
020096,001189: 17,3750 00000 00000 SCNBAZ 2DEC 0 B-28
020097,001190: 17,3752 00000 00000 2DEC 0 B-28
020098,001191: 17,3754 20000 00000 LABNBAZ 2DEC .5
020099,001192: 17,3756 00000 00000 2DEC 0 B-28
020100,001193: 17,3760 00000 00000 2DEC 0 B-28
020101,001194: 17,3762 20000 00000 SCNBVER 2DEC .5
020102,001195: 17,3764 00000 00000 2DEC 0 B-28
020103,001196: 17,3766 00000 00000 LABNBVER 2DEC 0 B-28
020104,001197: 17,3770 00000 00000 2DEC 0 B-28
020105,001198: 17,3772 57777 77777 2DEC -.5
020106,001199: 17,3774 ENDIMUS2 =
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc