Source Code
|
These source-code files are part of a reconstructed copy of Luminary 178, the
final release of the Apollo 14 Lunar Module (LM) Apollo Guidance Computer
(AGC) software.
The reconstruction began with source code of Zerlina 56, Luminary 210, and Luminary 131, previously transcribed from digitized copies of those programs. The code was created by combining the three, using Zerlina 56 as a base, since it was based off of Luminary 183. The differences between the three were carefully merged using the Luminary memos as a guide, with all changes made after Luminary 178 being backed out. The reconstruction was verified by matching memory-bank checksums to those listed in drawing 2021152N. Note that page numbers in the reconstructed code match those for the baseline log section mentioned in each file's changelog; the page numbers for a real Luminary 178 listing would be different. Comments from the original source code are prefixed with a single '#' symbol, whereas comments added later are prefixed by "##" or "###". Report any errors noted by creating an issue report at the Virtual AGC project's GitHub repository. |
016172,000002: ## Copyright: Public domain.
016173,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
016174,000004: ## Purpose: A section of Luminary revision 178.
016175,000005: ## It is part of the reconstructed source code for the final
016176,000006: ## release of the flight software for the Lunar Module's
016177,000007: ## (LM) Apollo Guidance Computer (AGC) for Apollo 14. The
016178,000008: ## code has been recreated from copies of Zerlina 56, Luminary
016179,000009: ## 210, and Luminary 131, as well as many Luminary memos.
016180,000010: ## It has been adapted such that the resulting bugger words
016181,000011: ## exactly match those specified for Luminary 178 in NASA
016182,000012: ## drawing 2021152N, which gives relatively high confidence
016183,000013: ## that the reconstruction is correct.
016184,000014: ## Reference: pp. 378-386
016185,000015: ## Assembler: yaYUL
016186,000016: ## Contact: Ron Burkey <info@sandroid.org>.
016187,000017: ## Website: www.ibiblio.org/apollo/index.html
016188,000018: ## Mod history: 2019-08-14 MAS Created from Zerlina 56.
016189,000019:
|
Page 378 |
016191,000021: # NAME- IMU PERFORMANCE TESTS 2
016192,000022:
016193,000023: # DATE- MARCH 20,1967
016194,000024:
016195,000025: # BY- SYSTEM TEST GROUP 864-6900 EXT. 1274
016196,000026:
016197,000027: # MODNO.- ZERO
016198,000028:
016199,000029: # FUNCTIONAL DESCRIPTION
016200,000030:
016201,000031: # POSITIONING ROUTINES FOR THE IMU PERFORMANCE TESTS AS WELL AS SOME OF
016202,000032: # THE TESTS THEMSELVES. FOR A DESCRIPTION OF THESE SUBROUTINES AND THE
016203,000033: # OPERATING PROCEDURES (TYPICALLY) SEE STG MEMO 685.THEORETICAL REF.E-1973
016204,000034:
016205,000035: 33,2113 BANK 33
016206,000036: 37,2000 SETLOC IMU2
016207,000037: 37,2000 BANK
016208,000038: 37,2002 E5,1416 EBANK= POSITON
016209,000039: 37,2002 COUNT* $$/P07
016210,000040:
016211,000041: 37,2002 05322 REDO TC NEWMODEX
016212,000042: 37,2003 00007 MM 07 B-14
016213,000043:
016214,000044: 37,2004 02325 GEOIMUTT TC IMUZERR
016215,000045: 37,2005 34755 IMUBACK CA ZERO
016216,000046: 37,2006 55414 TS NDXCTR
016217,000047: 37,2007 55440 TS TORQNDX
016218,000048: 37,2010 55441 TS TORQNDX +1
016219,000049: 37,2011 55576 TS OVFLOWCK
016220,000050: 37,2012 34361 NBPOSPL CA DEC17
016221,000051: 37,2013 55571 TS ZERONDX
016222,000052: 37,2014 32476 CA XNBADR
016223,000053: 37,2015 02367 TC ZEROING
016224,000054: 37,2016 34736 CA HALF
016225,000055: 37,2017 55664 TS XNB
016226,000056: 37,2020 06042 GUESS TC INTPRET
016227,000057: 37,2021 62545 LATAZCHK DLOAD SL2
016228,000058: 37,2022 02403 LATITUDE
016229,000059: 37,2023 15046 STODL DSPTEM1 +1
016230,000060: 37,2024 02401 AZIMUTH
016231,000061: 37,2025 77434 RTB EXIT
016232,000062: 37,2026 21615 1STO2S
016233,000063: 37,2027 56154 XCH MPAC
016234,000064: 37,2030 55044 TS DSPTEM1
016235,000065: 37,2031 32473 CAF VN0641
016236,000066: 37,2032 04616 TC BANKCALL
016237,000067: 37,2033 20477 CADR GOFLASH
016238,000068: 37,2034 02270 TC ENDTEST1
016239,000069: 37,2035 02037 TC +2
016240,000070: 37,2036 02031 TC -5
016241,000071:
|
Page 379 |
016243,000073: 37,2037 06042 TC INTPRET
016244,000074: 37,2040 47135 SLOAD RTB
016245,000075: 37,2041 01045 DSPTEM1
016246,000076: 37,2042 21577 CDULOGIC
016247,000077: 37,2043 02401 STORE AZIMUTH
016248,000078: 37,2044 60535 SLOAD SR2
016249,000079: 37,2045 01046 DSPTEM1 +1
016250,000080: 37,2046 02403 STORE LATITUDE
016251,000081: 37,2047 57546 COS DCOMP
016252,000082: 37,2050 77752 SL1
016253,000083: 37,2051 16437 STODL WANGI
016254,000084: 37,2052 02403 LATITUDE
016255,000085: 37,2053 72556 SIN SL1
016256,000086: 37,2054 16435 STODL WANGO
016257,000087: 37,2055 02401 AZIMUTH
016258,000088: 37,2056 73406 PUSH SIN
016259,000089: 37,2057 02675 STORE YNB +2
016260,000090: 37,2060 16705 STODL ZNB +4
016261,000091: 37,2061 77746 COS
016262,000092: 37,2062 02677 STORE YNB +4
016263,000093: 37,2063 77676 DCOMP
016264,000094: 37,2064 36703 POSGMBL STCALL ZNB +2
016265,000095: 37,2065 47321 CALCGA
016266,000096: 37,2066 77776 EXIT
016267,000097: 37,2067 04616 TC BANKCALL
016268,000098: 37,2070 16764 CADR IMUCOARS
016269,000099: 37,2071 34736 CAF BIT14 # IF BIT14 SET, GIMBAL LOCK
016270,000100: 37,2072 70077 MASK FLAGWRD3
016271,000101: 37,2073 00006 EXTEND
016272,000102: 37,2074 12076 BZF +2
016273,000103: 37,2075 25414 INCR NDXCTR # +1 IF IN GIMBAL LOCK,OTHERWISE 0
016274,000104: 37,2076 05527 TC DOWNFLAG
016275,000105: 37,2077 00056 ADRES GLOKFAIL # RESET GIMBAL LOCK FLAG
016276,000106: 37,2100 02315 TC IMUSLLLG
016277,000107: 37,2101 11414 CCS NDXCTR # IF ONE GO AND DO A PIPA TEST ONLY
016278,000108: 37,2102 02126 TC PIPACHK # ALIGN AND MEASURE VERTICAL PIPA RATE
016279,000109: 37,2103 02320 TC FINIMUDD
016280,000110: 37,2104 00006 EXTEND
016281,000111: 37,2105 31575 DCA PERFDLAY
016282,000112: 37,2106 05310 TC LONGCALL # DELAY WHILE SUSPENSION STABILIZES
016283,000113: 37,2107 E5,1416 EBANK= POSITON
016284,000114: 37,2107 02113 76065 2CADR GOESTIMS
016285,000115:
016286,000116: 37,2111 32116 CA ESTICADR
016287,000117: 37,2112 05133 TC JOBSLEEP
016288,000118: 37,2113 32116 GOESTIMS CA ESTICADR
016289,000119: 37,2114 05137 TC JOBWAKE
016290,000120: 37,2115 05272 TC TASKOVER
016291,000121: 37,2116 76500 ESTICADR CADR ESTIMS
016292,000122: 37,2117 34755 TORQUE CA ZERO
016293,000123:
|
Page 380 |
016295,000125: 37,2120 55047 TS DSPTEM2
016296,000126: 37,2121 31504 CA DRIFTI
016297,000127: 37,2122 55050 TS DSPTEM2 +1
016298,000128: 37,2123 51416 INDEX POSITON
016299,000129: 37,2124 55420 TS SOUTHDR -1
016300,000130: 37,2125 02457 TC SHOW
016301,000131:
016302,000132: 37,2126 51414 PIPACHK INDEX NDXCTR # PIPA TEST
016303,000133: 37,2127 02130 TC +1
016304,000134: 37,2130 02447 TC EARTHR*
016305,000135: 37,2131 34361 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
016306,000136: 37,2132 55476 TS DATAPL +4 # IN THE ALLOTED TIME INTERVAL
016307,000137: 37,2133 32474 CA DEC58
016308,000138: 37,2134 55412 TS LENGTHOT
016309,000139: 37,2135 34753 CA ONE
016310,000140: 37,2136 55537 TS RESULTCT
016311,000141: 37,2137 34755 CA ZERO
016312,000142: 37,2140 51415 INDEX PIPINDEX
016313,000143: 37,2141 54037 TS PIPAX
016314,000144: 37,2142 55472 TS DATAPL
016315,000145: 37,2143 02332 TC CHECKG
016316,000146: 37,2144 00004 INHINT
016317,000147: 37,2145 34752 CAF TWO
016318,000148: 37,2146 05204 TC TWIDDLE
016319,000149: 37,2147 E5,1642 EBANK= XSM
016320,000150: 37,2147 02151 ADRES PIPATASK
016321,000151: 37,2150 05155 TC ENDOFJOB
016322,000152:
016323,000153:
016324,000154: 37,2151 00006 PIPATASK EXTEND
016325,000155: 37,2152 27412 DIM LENGTHOT
016326,000156: 37,2153 31412 CA LENGTHOT
016327,000157: 37,2154 00006 EXTEND
016328,000158: 37,2155 62161 BZMF STARTPIP
016329,000159: 37,2156 34742 CAF BIT10
016330,000160: 37,2157 05204 TC TWIDDLE
016331,000161: 37,2160 E5,1642 EBANK= XSM
016332,000162: 37,2160 02151 ADRES PIPATASK
016333,000163: 37,2161 34736 STARTPIP CAF PRIO20
016334,000164: 37,2162 05105 TC FINDVAC
016335,000165: 37,2163 E5,1642 EBANK= XSM
016336,000166: 37,2163 02166 76065 2CADR PIPJOBB
016337,000167:
016338,000168: 37,2165 05272 TC TASKOVER
016339,000169:
016340,000170: 37,2166 51414 PIPJOBB INDEX NDXCTR
016341,000171: 37,2167 02170 TC +1
016342,000172: 37,2170 02447 TC EARTHR*
016343,000173: 37,2171 31412 CA LENGTHOT
|
Page 381 |
016345,000175: 37,2172 00006 EXTEND
016346,000176: 37,2173 62175 BZMF +2
016347,000177: 37,2174 05155 TC ENDOFJOB
016348,000178:
016349,000179: 37,2175 34756 CA FIVE
016350,000180: 37,2176 55537 TS RESULTCT
016351,000181: 37,2177 02332 TC CHECKG
016352,000182: 37,2200 11473 CCS DATAPL +1
016353,000183: 37,2201 02205 TC +4
016354,000184: 37,2202 05706 TC CCSHOLE
016355,000185: 37,2203 41476 CS DATAPL +4
016356,000186: 37,2204 55476 TS DATAPL +4
016357,000187: 37,2205 00006 EXTEND
016358,000188: 37,2206 41473 DCS DATAPL
016359,000189: 37,2207 21477 DAS DATAPL +4
016360,000190:
016361,000191: 37,2210 06042 TC INTPRET
016362,000192: 37,2211 45345 DLOAD DSU
016363,000193: 37,2212 02501 DATAPL +6
016364,000194: 37,2213 02475 DATAPL +2
016365,000195: 37,2214 45044 BPL CALL
016366,000196: 37,2215 76217 AINGOTN
016367,000197: 37,2216 76275 OVERFFIX
016368,000198: 37,2217 56325 AINGOTN PDDL DDV
016369,000199: 37,2220 02477 DATAPL +4
016370,000200: 37,2221 47075 DMPR RTB
016371,000201: 37,2222 37056 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
016372,000202: 37,2223 21613 SGNAGREE
016373,000203: 37,2224 01050 STORE DSPTEM2
016374,000204: 37,2225 77776 EXIT
016375,000205: 37,2226 11414 CCS NDXCTR
016376,000206: 37,2227 02301 TC COAALIGN # TAKE PLATFORM OUT OF GIMBAL LOCK
016377,000207: 37,2230 02457 TC SHOW
016378,000208: 37,2231 32471 VERTDRFT CA 3990DEC # ABOUT 1 HOUR VERTICAL DRIFT TEST
016379,000209: 37,2232 55412 TS LENGTHOT
016380,000210: 37,2233 51416 INDEX POSITON
016381,000211: 37,2234 41417 CS SOUTHDR -2
016382,000212: 37,2235 55442 TS DRIFTT
016383,000213: 37,2236 11415 CCS PIPINDEX # OFFSET PLATFORM TO MISS PIP DEAD-ZONES
016384,000214: 37,2237 12245 TCF PON4 # Z UP IN POS 4
016385,000215: 37,2240 44747 PON2 CS BIT5 # X UP
016386,000216: 37,2241 27565 ADS ERCOMP +2
016387,000217: 37,2242 34747 CA BIT5
016388,000218: 37,2243 27567 ADS ERCOMP +4
016389,000219: 37,2244 12251 TCF PON
016390,000220: 37,2245 44747 PON4 CS BIT5
016391,000221: 37,2246 27565 ADS ERCOMP +2
016392,000222: 37,2247 34747 CA BIT5
016393,000223: 37,2250 27563 ADS ERCOMP
016394,000224: 37,2251 02447 PON TC EARTHR*
016395,000225:
|
Page 382 |
016397,000227: 37,2252 34755 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
016398,000228: 37,2253 55404 TS ERVECTOR
016399,000229: 37,2254 55405 TS ERVECTOR +1
016400,000230: 37,2255 34733 GUESS1 CAF POSMAX
016401,000231: 37,2256 55440 TS TORQNDX
016402,000232: 37,2257 55441 TS TORQNDX +1
016403,000233: 37,2260 30032 CA CDUX
016404,000234: 37,2261 55413 TS LOSVEC
016405,000235: 37,2262 02500 TC ESTIMS
016406,000236: 37,2263 31502 VALMIS CA DRIFTO
016407,000237: 37,2264 55050 TS DSPTEM2 +1
016408,000238: 37,2265 34755 CA ZERO
016409,000239: 37,2266 55047 TS DSPTEM2
016410,000240: 37,2267 02457 TC SHOW
016411,000241:
016412,000242: 37,2270 05527 ENDTEST1 TC DOWNFLAG
016413,000243: 37,2271 00007 ADRES IMUSE
016414,000244: 37,2272 44755 CS ZERO
016415,000245: 37,2273 05325 TC NEWMODEA
016416,000246: 37,2274 05503 TC ENDEXT
016417,000247:
|
Page 383 |
016419,000249: 37,2275 43215 OVERFFIX DAD DAD
016420,000250: 37,2276 06476 DPPOSMAX
016421,000251: 37,2277 37064 ONEDPP
016422,000252: 37,2300 77616 RVQ
016423,000253:
016424,000254: 37,2301 00006 COAALIGN EXTEND # COARSE ALIGN SUBROUTINE
016425,000255: 37,2302 23571 QXCH ZERONDX
016426,000256: 37,2303 34755 CA ZERO
016427,000257: 37,2304 54321 TS THETAD
016428,000258: 37,2305 54322 TS THETAD +1
016429,000259: 37,2306 54323 TS THETAD +2
016430,000260: 37,2307 04616 TC BANKCALL
016431,000261: 37,2310 16764 CADR IMUCOARS
016432,000262: 37,2311 04616 ALIGNCOA TC BANKCALL
016433,000263: 37,2312 17722 CADR IMUSTALL
016434,000264: 37,2313 03047 TC SOMERR2
016435,000265: 37,2314 01571 TC ZERONDX
016436,000266:
016437,000267:
016438,000268: 37,2315 00006 IMUSLLLG EXTEND
016439,000269: 37,2316 23571 QXCH ZERONDX
016440,000270: 37,2317 02311 TC ALIGNCOA
016441,000271:
016442,000272: 37,2320 00006 FINIMUDD EXTEND
016443,000273: 37,2321 23571 QXCH ZERONDX
016444,000274: 37,2322 04616 TC BANKCALL
016445,000275: 37,2323 17174 CADR IMUFINE
016446,000276: 37,2324 02311 TC ALIGNCOA
016447,000277:
016448,000278: 37,2325 00006 IMUZERR EXTEND
016449,000279: 37,2326 23571 QXCH ZERONDX
016450,000280: 37,2327 04616 TC BANKCALL
016451,000281: 37,2330 16700 CADR IMUZERO
016452,000282: 37,2331 02311 TC ALIGNCOA
016453,000283:
016454,000284:
016455,000285: 37,2332 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
016456,000286: 37,2333 23417 QXCH QPLACE
016457,000287: 37,2334 02342 TC +6
016458,000288: 37,2335 00003 CHECKG1 RELINT
016459,000289: 37,2336 30067 CA NEWJOB
016460,000290: 37,2337 00006 EXTEND
016461,000291: 37,2340 62346 BZMF +6
016462,000292: 37,2341 05122 TC CHANG1
016463,000293: 37,2342 00004 INHINT
016464,000294: 37,2343 51415 INDEX PIPINDEX
016465,000295: 37,2344 40037 CS PIPAX
016466,000296: 37,2345 55571 TS ZERONDX
016467,000297: 37,2346 00004 INHINT
016468,000298:
|
Page 384 |
016470,000300: 37,2347 51415 INDEX PIPINDEX
016471,000301: 37,2350 30037 CA PIPAX
016472,000302: 37,2351 61571 AD ZERONDX
016473,000303: 37,2352 00006 EXTEND
016474,000304: 37,2353 12335 BZF CHECKG1
016475,000305: 37,2354 51415 INDEX PIPINDEX
016476,000306: 37,2355 30037 CA PIPAX
016477,000307: 37,2356 51537 INDEX RESULTCT
016478,000308: 37,2357 55472 TS DATAPL
016479,000309: 37,2360 04102 TC FINETIME
016480,000310: 37,2361 51537 INDEX RESULTCT
016481,000311: 37,2362 55473 TS DATAPL +1
016482,000312: 37,2363 51537 INDEX RESULTCT
016483,000313: 37,2364 23474 LXCH DATAPL +2
016484,000314: 37,2365 00003 RELINT
016485,000315: 37,2366 01417 ENDCHKG TC QPLACE
016486,000316:
016487,000317:
016488,000318: 37,2367 54001 ZEROING TS L
016489,000319: 37,2370 12372 TCF +2
016490,000320: 37,2371 55571 ZEROING1 TS ZERONDX
016491,000321: 37,2372 34755 CAF ZERO
016492,000322: 37,2373 50001 INDEX L
016493,000323: 37,2374 54000 TS 0
016494,000324: 37,2375 24001 INCR L
016495,000325: 37,2376 11571 CCS ZERONDX
016496,000326: 37,2377 12371 TCF ZEROING1
016497,000327: 37,2400 00002 TC Q
016498,000328:
|
Page 385 |
016500,000330: 37,2401 65345 ERTHRVSE DLOAD PDDL
016501,000331: 37,2402 37057 SCHZEROS # PD24 = (SIN -COS 0)(OMEG/MS)
016502,000332: 37,2403 02403 LATITUDE
016503,000333: 37,2404 57546 COS DCOMP
016504,000334: 37,2405 73525 PDDL SIN
016505,000335: 37,2406 02403 LATITUDE
016506,000336: 37,2407 74266 VDEF VXSC
016507,000337: 37,2410 36001 OMEG/MS
016508,000338: 37,2411 02405 STORE ERVECTOR
016509,000339: 37,2412 77634 RTB
016510,000340: 37,2413 21574 LOADTIME
016511,000341: 37,2414 26433 STOVL TMARK
016512,000342: 37,2415 37057 SCHZEROS
016513,000343: 37,2416 02564 STORE ERCOMP
016514,000344: 37,2417 77616 RVQ
016515,000345:
016516,000346: 37,2420 47020 EARTHR ITA RTB
016517,000347: 37,2421 00051 S2
016518,000348: 37,2422 21574 LOADTIME
016519,000349: 37,2423 02431 STORE TEMPTIME
016520,000350: 37,2424 51025 DSU BPL
016521,000351: 37,2425 02433 TMARK
016522,000352: 37,2426 76431 ERTHR
016523,000353: 37,2427 77624 CALL
016524,000354: 37,2430 76275 OVERFFIX
016525,000355: 37,2431 74261 ERTHR SL VXSC
016526,000356: 37,2432 20212 9D
016527,000357: 37,2433 02405 ERVECTOR
016528,000358: 37,2434 53321 MXV VAD
016529,000359: 37,2435 02643 XSM
016530,000360: 37,2436 02564 ERCOMP
016531,000361: 37,2437 16564 STODL ERCOMP
016532,000362: 37,2440 02431 TEMPTIME
016533,000363: 37,2441 02433 STORE TMARK
016534,000364: 37,2442 47170 AXT,1 RTB
016535,000365: 37,2443 02563 ECADR ERCOMP
016536,000366: 37,2444 21706 PULSEIMU
016537,000367: 37,2445 77650 GOTO
016538,000368: 37,2446 00051 S2
016539,000369:
016540,000370: 37,2447 00006 EARTHR* EXTEND
016541,000371: 37,2450 23420 QXCH QPLACES
016542,000372: 37,2451 06042 TC INTPRET
016543,000373: 37,2452 77624 CALL
016544,000374: 37,2453 76420 EARTHR
016545,000375: 37,2454 77776 EXIT
016546,000376: 37,2455 02315 TC IMUSLLLG
016547,000377: 37,2456 01420 TC QPLACES
016548,000378:
016549,000379: 37,2457 00006 SHOW EXTEND
016550,000380:
|
Page 386 |
016552,000382: 37,2460 23417 QXCH QPLACE
016553,000383: 37,2461 31416 SHOW1 CA POSITON
016554,000384: 37,2462 55051 TS DSPTEM2 +2
016555,000385: 37,2463 32472 CA VB06N98
016556,000386: 37,2464 04616 TC BANKCALL
016557,000387: 37,2465 20477 CADR GOFLASH
016558,000388: 37,2466 02270 TC ENDTEST1 # V 34
016559,000389: 37,2467 01417 TC QPLACE # V33
016560,000390: 37,2470 12461 TCF SHOW1
016561,000391:
016562,000392: 37,2471 07626 3990DEC DEC 3990 B-14
016563,000393: 37,2472 01542 VB06N98 VN 0698
016564,000394: 37,2473 01451 VN0641 VN 0641
016565,000395: 37,2474 4361 DEC17 = ND1
016566,000396: 37,2474 00072 DEC58 DEC 58 B-14
016567,000397: 37,2475 02737 OGCPL ECADR OGC
016568,000398: 37,2476 4777 1SECX = 1SEC
016569,000399: 37,2476 01664 XNBADR GENADR XNB
016570,000400: 37,2477 01642 XSMADR GENADR XSM
016571,000401: 4102 BLOCK 2
016572,000402: 4102 COUNT* $$/P07
016573,000403: 4102 00004 FINETIME INHINT # RETURNS WITH INTERRUPT INHIBITED
016574,000404: 4103 00006 EXTEND
016575,000405: 4104 00004 READ LOSCALAR
016576,000406: 4105 54001 TS L
016577,000407: 4106 00006 EXTEND
016578,000408: 4107 06004 RXOR LOSCALAR
016579,000409: 4110 00006 EXTEND
016580,000410: 4111 14115 BZF +4
016581,000411: 4112 00006 EXTEND
016582,000412: 4113 00004 READ LOSCALAR
016583,000413: 4114 54001 TS L
016584,000414: 4115 44733 +4 CS POSMAX
016585,000415: 4116 60001 AD L
016586,000416: 4117 00006 EXTEND
016587,000417: 4120 14103 BZF FINETIME +1
016588,000418: 4121 00006 EXTEND
016589,000419: 4122 00003 READ HISCALAR
016590,000420: 4123 00002 TC Q
016591,000421:
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc