Source Code
![]() |
These source code files have been transcribed or otherwise adapted from
digitized images of a hardcopy from the private collection of
Don Eyles. The digitization was performed by archive.org, and
transcription was performed by a team of volunteers.
Note that the page images
presented online are of reduced quality, and that the original
high-quality images are available at archive.org.
Report any conversion errors or legibility problems in page images to info@sandroid.org.
Notations on the program listing read, in part:473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP NOV 10, 1966Note that the date is the date of the printout, not the date of the program revision. |
019567,000002: ## Copyright: Public domain.
019568,000003: ## Filename: IMU_PERFORMANCE_TESTS_2.agc
019569,000004: ## Purpose: Part of the source code for Aurora (revision 12).
019570,000005: ## Assembler: yaYUL
019571,000006: ## Contact: Hartmuth Gutsche<hgutsche@xplornet.com>.
019572,000007: ## Website: https://www.ibiblio.org/apollo.
019573,000008: ## Pages: 475-499
019574,000009: ## Mod history: 2016-09-20 JL Created.
019575,000010: ## 2016-09-27 HG start transcription from scans
019576,000011: ## 2016-10-12 HG fix operator TEHTAD -> THETAD
019577,000012: ## TORQDNX -> TORQNDX
019578,000013: ## INODES33 -> IMODES33
019579,000014: ## YSM =4 -> YSM +4
019580,000015: ## instruction CA DRIFTT -> TS DRIFTT
019581,000016: ## constant 2DEC 32844 B-28 -> 2DEC 342844 B-28
019582,000017: ## 2016-10-16 HG fix label NBOSPL -> NBPOSPL
019583,000018: ## JUMLOAD -> JUMPLOAD
019584,000019: ## WAILP3 -> WAITLP3
019585,000020: ## fix operand CHECKCG -> CHECKG
019586,000021: ## WAITPL2 -> WAITLP2
019587,000022: ## WAITLP -> WAITLP1
019588,000023: ## 2016-10-18 HG fix operand REULTCT -> RESULTCT
019589,000024: ## 2016-12-08 RSB Proofed comments with octopus/ProoferComments
019590,000025: ## and fixed the errors found.
019591,000026:
019592,000027: ## This source code has been transcribed or otherwise adapted from
019593,000028: ## digitized images of a hardcopy from the private collection of
019594,000029: ## Don Eyles. The digitization was performed by archive.org.
019595,000030:
019596,000031: ## Notations on the hardcopy document read, in part:
019597,000032:
019598,000033: ## 473423A YUL SYSTEM FOR BLK2: REVISION 12 of PROGRAM AURORA BY DAP GROUP
019599,000034: ## NOV 10, 1966
019600,000035:
019601,000036: ## [Note that this is the date the hardcopy was made, not the
019602,000037: ## date of the program revision or the assembly.]
019603,000038:
019604,000039: ## The scan images (with suitable reduction in storage size and consequent
019605,000040: ## reduction in image quality) are available online at
019606,000041: ## https://www.ibiblio.org/apollo.
019607,000042: ## The original high-quality digital images are available at archive.org:
019608,000043: ## https://archive.org/details/aurora00dapg
019609,000044:
![]() |
Page 475 |
019611,000046: 17,2000 BANK 17
019612,000047: 17,2000 E5,1400 EBANK= XSM
019613,000048:
019614,000049:
019615,000050:
019616,000051: 17,2000 37665 IMUTEST CA ZERO
019617,000052: 17,2001 55576 TS DRIFTT
019618,000053: 17,2002 55742 TS GEOCOMPS
019619,000054: 17,2003 33626 CAF 1SECX
019620,000055: 17,2004 55744 TS 1SECXT
019621,000056: 17,2005 06000 GEOIMUTT TC INTPRET # OPTIMUM COMPASS COMES IN HERE
019622,000057: 17,2006 77634 CALL
019623,000058: 17,2007 30530 LATAZCHK
019624,000059: 17,2010 77776 EXIT
019625,000060: 17,2011 37657 CA ONE
019626,000061: 17,2012 55544 TS POSITON
019627,000062:
019628,000063: 17,2013 54340 TS DSPTEM2 +2
019629,000064: 17,2014 54400 TS THETAD
019630,000065: 17,2015 54401 TS THETAD +1
019631,000066: 17,2016 54402 TS THETAD +2
019632,000067: 17,2017 04063 TC BANKCALL
019633,000068: 17,2020 26000 CADR IMUZERO
019634,000069: 17,2021 04063 TC BANKCALL
019635,000070: 17,2022 26716 CADR IMUSTALL
019636,000071: 17,2023 12243 TCF ENDTEST1
019637,000072: 17,2024 37665 IMUBACK CA ZERO
019638,000073: 17,2025 54337 TS DSPTEM2 +1
019639,000074: 17,2026 55537 TS NDXCTR
019640,000075: 17,2027 55574 TS TORQNDX
019641,000076: 17,2030 55575 TS TORQNDX +1
019642,000077: 17,2031 33660 CAF TESTTIME
019643,000078: 17,2032 54336 TS DSPTEM2
019644,000079: 17,2033 04063 TC BANKCALL # ISS RETURNS IN COARSE ALIGN MODE TO
019645,000080: 17,2034 26055 CADR IMUCOARS # ENABLE OPERATOR TO DECIDE WHAT TO DO
019646,000081: # ABOUT GIMBAL LOCK
019647,000082: 17,2035 03567 TC SHOWLD
019648,000083: 17,2036 03576 TC SHOW
019649,000084:
019650,000085:
019651,000086:
019652,000087: 17,2037 04063 TC BANKCALL
019653,000088: 17,2040 26716 CADR IMUSTALL
019654,000089: 17,2041 02243 TC ENDTEST1
019655,000090: 17,2042 03344 TC NBPOSPL
019656,000091: 17,2043 03077 TC POSGMBL
019657,000092: 17,2044 02106 TC PIPACHK # IF MGA IS 60DEG+ PROG WILL STAY IN COARS
019658,000093: # ALIGN AND MEASURE VERITCAL PIPA RATE
019659,000094: 17,2045 03124 TC FALNE
019660,000095: 17,2046 04063 TC BANKCALL
019661,000096:
![]() |
Page 476 |
019663,000098: 17,2047 26716 CADR IMUSTALL
019664,000099: 17,2050 12243 TCF ENDTEST1
019665,000100: 17,2051 11742 CCS GEOCOMPS
019666,000101: 17,2052 02072 TC JUMPLOAD
019667,000102: 17,2053 06000 GUESS TC INTPRET # CALCULATE -COS LATITUDE AND SIN LATITUDE
019668,000103: 17,2054 71545 DLOAD COS # FOR ESTIMATE
019669,000104: 17,2055 01511 LATITUDE
019670,000105: 17,2056 72476 DCOMP SL1
019671,000106: 17,2057 07573 STODL WANGI
019672,000107: 17,2060 01511 LATITUDE
019673,000108: 17,2061 72556 SIN SL1
019674,000109: 17,2062 23571 STOVL WANGO # LOAD TRANSITION MATRIX INTO ERASABLE
019675,000110: 17,2063 37630 GEORGED
019676,000111: 17,2064 23721 STOVL TRANSM1
019677,000112: 17,2065 37636 GEORGEC
019678,000113: 17,2066 23727 STOVL TRANSM1 +6
019679,000114: 17,2067 37644 GEORGEB
019680,000115: 17,2070 01735 STORE TRANSM1 +12D
019681,000116: 17,2071 77776 EXIT
019682,000117: 17,2072 03612 JUMPLOAD TC LOADGTSM
019683,000118: 17,2073 04063 TC BANKCALL
019684,000119: 17,2074 42000 CADR ESTIMS
019685,000120: 17,2075 04614 TORQUE TC PHASCHNG # FILTER TORQUES PLTFM AND SETS UP ERATE
019686,000121: 17,2076 00000 OCT 00000
019687,000122: 17,2077 37665 CA ZERO
019688,000123: 17,2100 54336 TS DSPTEM2
019689,000124: 17,2101 31640 CA DRIFTI
019690,000125: 17,2102 54337 TS DSPTEM2 +1
019691,000126: 17,2103 51544 INDEX POSITON
019692,000127: 17,2104 55551 TS SOUTHDR -1
019693,000128: 17,2105 03576 TC SHOW
019694,000129:
019695,000130: 17,2106 51537 PIPACHK INDEX NDXCTR # TORQUE PLATFORM TO CORRECT LEVELING ERR
019696,000131: 17,2107 02110 TC +1 # IN PREPARATION TO MEASURING VERTICAL
019697,000132: 17,2110 04063 TC BANKCALL # PIPA OUTPUT PULSE RATE
019698,000133: 17,2111 30422 CADR EARTHR
019699,000134:
019700,000135: 17,2112 33663 CA DEC17 # ALLOW PIP COUNTER TO OVERFLOW 17 TIMES
019701,000136: 17,2113 55632 TS DATAPL +4
019702,000137: 17,2114 37646 CA BIT10 # IN THE ALLOTED TIME INTERVAL
019703,000138: 17,2115 55527 TS LENGTHOT
019704,000139: 17,2116 37657 CA ONE
019705,000140: 17,2117 55673 TS RESULTCT
019706,000141: 17,2120 37665 CA ZERO # ZERO PIPA COUNTER INITIALLY
019707,000142: 17,2121 51541 INDEX PIPINDEX
019708,000143: 17,2122 54037 TS PIPAX
019709,000144: 17,2123 55626 TS DATAPL
019710,000145: 17,2124 33675 CA DEC56 # LOOP 56 TIMES 5.12 SEC "ACH. EACH INCR.
019711,000146: 17,2125 03205 TC WAITLOOP # WILL ALSO CORRECT EARTH RATE
019712,000147: 17,2126 00004 INHINT
019713,000148:
![]() |
Page 477 |
019715,000150: 17,2127 02771 TC CHECKG
019716,000151: 17,2130 00003 RELINT
019717,000152: 17,2131 03065 TC DATALD
019718,000153: 17,2132 37664 CA FIVE
019719,000154: 17,2133 55673 TS RESULTCT
019720,000155: 17,2134 51537 INDEX NDXCTR
019721,000156: 17,2135 02136 TC +1
019722,000157: 17,2136 04063 TC BANKCALL
019723,000158: 17,2137 30422 CADR EARTHR
019724,000159: 17,2140 11676 CCS COUNTPL
019725,000160: 17,2141 03227 TC WAITLP2
019726,000161: 17,2142 11627 CCS DATAPL +1
019727,000162: 17,2143 02147 TC +4
019728,000163: 17,2144 05464 TC CCSHOLE
019729,000164: 17,2145 41632 CS DATAPL +4
019730,000165: 17,2146 55632 TS DATAPL +4
019731,000166: 17,2147 00006 EXTEND
019732,000167: 17,2150 41627 DCS DATAPL
019733,000168: 17,2151 21633 DAS DATAPL +4
019734,000169:
019735,000170: 17,2152 06000 TC INTPRET
019736,000171: 17,2153 45345 DLOAD DSU
019737,000172: 17,2154 01635 DATAPL +6
019738,000173: 17,2155 01631 DATAPL +2
019739,000174: 17,2156 56325 PDDL DDV
019740,000175: 17,2157 01633 DATAPL +4
019741,000176: 17,2160 41325 PDDL DMP
019742,000177: 17,2161 37665 DEC585 # DEC585 HAS BEEN REDEFINED FOR LEM
019743,000178: 17,2162 77624 RTB
019744,000179: 17,2163 33406 SGNAGREE
019745,000180: 17,2164 00337 STORE DSPTEM2
019746,000181: 17,2165 77776 EXIT
019747,000182: 17,2166 03576 TC SHOW
019748,000183: 17,2167 33656 VERTDRFT CA 3990DEC # NUMBER OF SECONDS TO SPEND ESTIMATING
019749,000184: 17,2170 55527 TS LENGTHOT
019750,000185: 17,2171 04063 TC BANKCALL # THIS WILL CORRECT FOR EARTH RATE DURING
019751,000186: 17,2172 30422 CADR EARTHR # TIME SPENT IN SHOW ABOVE*
019752,000187: 17,2173 30032 CA CDUX # STOORE AXIS FOR LAB CALC OF DRIFT
019753,000188: 17,2174 55530 TS LOSVEC
019754,000189: 17,2175 51544 INDEX POSITON
019755,000190: 17,2176 41550 CS SOUTHDR -2
019756,000191: 17,2177 55576 TS DRIFTT
019757,000192: 17,2200 03612 TC LOADGTSM
019758,000193: 17,2201 37665 CA ZERO # ALLOW ONLY SOUTH GYRO EARTH RATE COMPENS
019759,000194: 17,2202 55400 TS XSM
019760,000195: 17,2203 55401 TS XSM +1
019761,000196: 17,2204 55404 TS XSM +4
019762,000197: 17,2205 55405 TS XSM +5
019763,000198: 17,2206 55406 TS YSM
019764,000199: 17,2207 55407 TS YSM +1
019765,000200:
![]() |
Page 478 |
019767,000202: 17,2210 55412 TS YSM +4
019768,000203: 17,2211 55413 TS YSM +5
019769,000204: 17,2212 55414 TS ZSM
019770,000205: 17,2213 55415 TS ZSM +1
019771,000206: 17,2214 55420 TS ZSM +4
019772,000207: 17,2215 55421 TS ZSM +5
019773,000208: 17,2216 37637 GUESS1 CAF POSMAX
019774,000209: 17,2217 55574 TS TORQNDX
019775,000210: 17,2220 55575 TS TORQNDX +1
019776,000211: 17,2221 04063 TC BANKCALL
019777,000212: 17,2222 42000 CADR ESTIMS
019778,000213: 17,2223 04614 VALMIS TC PHASCHNG
019779,000214: 17,2224 00000 OCT 00000
019780,000215: 17,2225 31636 CA DRIFTO
019781,000216: 17,2226 54337 TS DSPTEM2 +1
019782,000217: 17,2227 30032 CA CDUX # STORE OG ANGLE FOR LAB CALC OF DRIFT**
019783,000218: 17,2230 55531 TS LOSVEC +1
019784,000219: 17,2231 37665 CA ZERO
019785,000220: 17,2232 54336 TS DSPTEM2
019786,000221: 17,2233 03576 TC SHOW
019787,000222:
019788,000223:
019789,000224:
019790,000225: 17,2234 37657 FINISH CA ONE
019791,000226: 17,2235 61544 AD POSITON
019792,000227: 17,2236 54340 TS DSPTEM2 +2
019793,000228: 17,2237 37656 CA TWO
019794,000229: 17,2240 55546 TS QPLACE
019795,000230: 17,2241 04063 TC BANKCALL
019796,000231: 17,2242 22343 CADR TSELECT -6
019797,000232: 17,2243 04063 ENDTEST1 TC BANKCALL
019798,000233: 17,2244 30745 CADR ENDTEST
019799,000234:
![]() |
Page 479 |
019801,000236: 17,2245 33666 OPCHK CAF DELYOFF # AUTOMATIC TEST FOR SYSTEM OPERATION
019802,000237: 17,2246 00006 EXTEND
019803,000238: 17,2247 02030 RAND 30 # CHECK TO SEE IF IMU IS ON
019804,000239: 17,2250 10000 CCS A
019805,000240: 17,2251 02440 TC ALARMS
019806,000241: 17,2252 33661 CAF V16N20S
019807,000242: 17,2253 05332 TC NVSBWAIT
019808,000243:
019809,000244: 17,2254 05401 TC FREEDSP
019810,000245: 17,2255 04063 TC BANKCALL
019811,000246: 17,2256 26000 CADR IMUZERO
019812,000247: 17,2257 04063 TC BANKCALL
019813,000248: 17,2260 26716 CADR IMUSTALL
019814,000249:
019815,000250: 17,2261 12243 TCF ENDTEST1
019816,000251: 17,2262 37650 CA BIT8 # ZERO ALL ERASEABLE USED IN TEST
019817,000252: 17,2263 55776 TS ZERONDX
019818,000253: 17,2264 33671 CA GENPLAD
019819,000254: 17,2265 03236 TC ZEROING
019820,000255: 17,2266 03344 TC NBPOSPL # ALIGN ANGLE COMPUTATION
019821,000256:
019822,000257: 17,2267 03077 TC POSGMBL # COARSE ALIGN THOSE GIMBALS NOW
019823,000258:
019824,000259: 17,2270 12245 TCF OPCHK
019825,000260: 17,2271 03124 TC FALNE # FINE ALIGN PLATFORM BY TORQUING GYROS
019826,000261:
019827,000262: 17,2272 04063 TC BANKCALL
019828,000263: 17,2273 26716 CADR IMUSTALL
019829,000264: 17,2274 12243 TCF ENDTEST1
019830,000265: 17,2275 37656 CA TWO
019831,000266: 17,2276 55672 CDUCHECK TS CDUNDX # THIS LOOP CHECKS FOR NO ERROR BETWEEN
019832,000267: 17,2277 51672 INDEX CDUNDX # DESIRED CDU ANGLES AND THE ACTUAL ANGLES
019833,000268: 17,2300 40400 CS THETAD
019834,000269: 17,2301 51672 INDEX CDUNDX
019835,000270: 17,2302 60032 AD CDUX
019836,000271: 17,2303 55551 TS STOREPL
019837,000272: 17,2304 11551 CCS STOREPL
019838,000273: 17,2305 02313 TC ERRMASK
019839,000274: 17,2306 02310 TC NOERR
019840,000275: 17,2307 02313 TC ERRMASK
019841,000276: 17,2310 11672 NOERR CCS CDUNDX
019842,000277: 17,2311 02276 TC CDUCHECK
019843,000278: 17,2312 02317 TC LOADIC
019844,000279: 17,2313 73674 ERRMASK MASK LOWFOUR # ALLOW FIVE BIT ERRORS
019845,000280: 17,2314 10000 CCS A
019846,000281: 17,2315 02440 TC ALARMS
019847,000282: 17,2316 02310 TC NOERR
019848,000283: 17,2317 37657 LOADIC CA ONE
019849,000284: 17,2320 55673 TS RESULTCT
019850,000285: 17,2321 47657 CS ONE
019851,000286:
![]() |
Page 480 |
019853,000288: 17,2322 55670 TS MASKREG # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
019854,000289:
019855,000290: 17,2323 37665 CA ZERO
019856,000291: 17,2324 54037 TS PIPAX
019857,000292: 17,2325 54040 TS PIPAY
019858,000293: 17,2326 54041 TS PIPAZ
019859,000294:
019860,000295: 17,2327 37645 CA BIT11
019861,000296: 17,2330 55527 TS LENGTHOT # VECTOR IN PIPA COUNTERS
019862,000297: 17,2331 37657 CA ONE
019863,000298: 17,2332 03205 TC WAITLOOP
019864,000299: 17,2333 11676 CCS COUNTPL
019865,000300: 17,2334 03227 TC WAITLP2
019866,000301: 17,2335 33675 CA DEC56
019867,000302: 17,2336 03205 TC WAITLOOP
019868,000303: 17,2337 37656 OPCHK1 CA TWO
019869,000304: 17,2340 55541 OPCHK2 TS PIPINDEX
019870,000305: 17,2341 00004 INHINT
019871,000306: 17,2342 02771 TC CHECKG
019872,000307: 17,2343 00003 RELINT
019873,000308: 17,2344 37665 CA ZERO
019874,000309: 17,2345 51541 INDEX PIPINDEX
019875,000310: 17,2346 54037 TS PIPAX
019876,000311: 17,2347 03065 TC DATALD # LOAD PIPA DATA AND TIME IN DATAPL
019877,000312: 17,2350 57673 XCH RESULTCT
019878,000313: 17,2351 67655 AD FOUR
019879,000314: 17,2352 55673 TS RESULTCT
019880,000315: 17,2353 11541 CCS PIPINDEX
019881,000316: 17,2354 02340 TC OPCHK2
019882,000317: 17,2355 47655 READOUT CS FOUR
019883,000318: 17,2356 61673 AD RESULTCT
019884,000319: 17,2357 55673 TS RESULTCT
019885,000320: 17,2360 22007 ZL
019886,000321: 17,2361 51673 INDEX RESULTCT
019887,000322: 17,2362 31626 CA DATAPL
019888,000323: 17,2363 22000 LXCH A
019889,000324: 17,2364 51673 INDEX RESULTCT
019890,000325: 17,2365 21572 DAS GENPL +1
019891,000326: 17,2366 31673 CA RESULTCT
019892,000327: 17,2367 71670 MASK MASKREG
019893,000328: 17,2370 10000 CCS A
019894,000329: 17,2371 02355 TC READOUT
019895,000330: 17,2372 37661 CA TEN
019896,000331: 17,2373 66165 AD THREE
019897,000332: 17,2374 55673 TS RESULTCT
019898,000333: 17,2375 40000 CS A
019899,000334: 17,2376 55670 TS MASKREG
019900,000335: 17,2377 11676 CCS COUNTPL
019901,000336: 17,2400 03227 TC WAITLP2
019902,000337: 17,2401 03250 TC COMPUT
019903,000338:
![]() |
Page 481 |
019905,000340: 17,2402 33662 RADCK CA V16N40S
019906,000341: 17,2403 05332 TC NVSBWAIT # OPERATOR WILL CHECK RADAR STATUS.IN LAB.
019907,000342: 17,2404 05274 TC FLASHON # SET RADAR OFF THEN PUT RESOLVER STANDARD
019908,000343: 17,2405 05140 TC ENDIDLE # ON TRUNNION AND SET TO +45 DEG.SHAFT WIL
019909,000344: 17,2406 02243 TC ENDTEST1
019910,000345: 17,2407 02410 TC +1 # AFTER SETTING RES STANDARD DO A V33
019911,000346: 17,2410 37665 CA ZERO
019912,000347: 17,2411 54424 TS TANG +1
019913,000348: 17,2412 33676 CA 45DEG
019914,000349: 17,2413 54423 TS TANG
019915,000350: 17,2414 04063 DRIVRAD TC BANKCALL # IN SC WHEN RAD PRESENT DO V33 RIGHT AWAY
019916,000351: 17,2415 20247 CADR RRZERO # LGC WILL ATTEMPT TO DRIVE 45 DEG TRUNN.
019917,000352: 17,2416 04063 TC BANKCALL # TO MATCH STANDARD, AFTER ZEROING CDUS
019918,000353: 17,2417 26712 CADR RADSTALL
019919,000354: 17,2420 02243 TC ENDTEST1
019920,000355: 17,2421 06000 TC INTPRET
019921,000356: 17,2422 77634 CALL
019922,000357: 17,2423 20363 RRDESNB
019923,000358: 17,2424 04063 TC BANKCALL
019924,000359: 17,2425 26712 CADR RADSTALL # IF CDU FAILS TO AGREE WITH COMMAND TO
019925,000360: 17,2426 02440 TC ALARMS # 1 DEG GET ALARM HERE
019926,000361:
019927,000362: 17,2427 05274 TC FLASHON # OPERATOR WILL CHECK STATUS OF RADAR
019928,000363: 17,2430 05140 TC ENDIDLE # IN S/C DO V33 TO CONTINUE WITH SHAFT
019929,000364: 17,2431 02243 TC ENDTEST1 # TEST
019930,000365: 17,2432 02433 TC +1 # IN LAB TURN RADAR OFF CHANGE RES STANDAR
019931,000366: 17,2433 37665 CA ZERO # TO SHAFT AND SET FOR -45DEG.
019932,000367: 17,2434 54423 TS TANG # THEN DO A V33 IF WANT TO REPEAT CHECK
019933,000368: 17,2435 43676 CS 45DEG # DO A V34 TO TERMINATE
019934,000369: 17,2436 54424 TS TANG +1
019935,000370: 17,2437 02414 TC DRIVRAD
019936,000371: 17,2440 56002 ALARMS XCH Q
019937,000372: 17,2441 55546 TS QPLACE
019938,000373: 17,2442 05413 TC ALARM
019939,000374: 17,2443 01411 OCT 1411
019940,000375: 17,2444 01546 TC QPLACE
019941,000376:
![]() |
Page 482 |
019943,000378: 17,2445 06000 GYRSFTST TC INTPRET # START ADRESS FOR IRIG SF TEST
019944,000379: 17,2446 77634 CALL
019945,000380: 17,2447 30530 LATAZCHK # LOAD AZ AND LAT
019946,000381: 17,2450 77776 EXIT
019947,000382: 17,2451 33651 TESTCALL CAF V21N30E
019948,000383: 17,2452 05332 TC NVSBWAIT # LOAD + OR - 1 FOR + OR - X TEST (+00001)
019949,000384: 17,2453 05140 TC ENDIDLE # LOAD + OR - 2 FOR + OR - Y TEST
019950,000385: 17,2454 12243 TCF ENDTEST1 # LOAD + OR - 3 FOR + OR - Z TEST
019951,000386: 17,2455 02451 TC TESTCALL
019952,000387: 17,2456 56333 XCH DSPTEM1
019953,000388: 17,2457 55614 TS CALCDIR
019954,000389: 17,2460 00006 EXTEND # THIS ROUTINE LOOKS AT THE SIZE OF THE
019955,000390: 17,2461 62466 BZMF NEGSIZ # ENTRY MADE BY THE OPERATOR, IF HE DID NO
019956,000391: 17,2462 77671 SIZLOOK MASK NEG3 # T ENTER TEST NO THAT IS W/I PERMISSIBLE
019957,000392: 17,2463 00006 EXTEND # RANGE- HE WILL BE ASKED TO LOAD AGAIN.
019958,000393: 17,2464 12470 BZF GUDENTRY # THIS IS CONSIDERED NECESSARY BECAUSE
019959,000394: 17,2465 02451 TC TESTCALL # OF FOLLOWING INDEXED TC WHICH COULD
019960,000395:
019961,000396: 17,2466 40000 NEGSIZ COM # SEND THE COMPUTER OFF INTO THE BOONDOCKS
019962,000397: 17,2467 02462 TC SIZLOOK # TO PLAY WITH ITSELF IF THE OPERATOR
019963,000398: 17,2470 31614 GUDENTRY CA CALCDIR # MAKES ABAD ENTRY******
019964,000399: 17,2471 67655 AD FOUR
019965,000400: 17,2472 50000 INDEX A
019966,000401: 17,2473 02474 TC +1
019967,000402: 17,2474 02451 TC TESTCALL
019968,000403: 17,2475 02503 TC +6 # C(A)=+00001 FOR -Z
019969,000404: 17,2476 02502 TC +4 # C(A)=+00002 FOR -Y
019970,000405: 17,2477 02501 TC +2 # C(A)=+00003 FOR -X
019971,000406: 17,2500 02474 TC -4 # C(A)=+00004 ERROR
019972,000407: 17,2501 02504 TC +3 # C(A)=+00005 FOR +X
019973,000408: 17,2502 02510 TC +6
019974,000409: 17,2503 02513 TC +10
019975,000410: 17,2504 37655 CAF FOUR
019976,000411: 17,2505 55544 TS POSITON # 4 IS FOR A.L. POSN 4 USED FOR X SF TEST
019977,000412: 17,2506 02515 TC +7
019978,000413: 17,2507 02515 TC +6
019979,000414: 17,2510 37656 CAF TWO
019980,000415: 17,2511 55544 TS POSITON # +2 IS A.L. POS 2 USED FOR Y SF TEST
019981,000416: 17,2512 02515 TC +3
019982,000417: 17,2513 37657 CAF ONE
019983,000418: 17,2514 55544 TS POSITON # +1 IS A.L. POS 1 USED FOR Z SF TEST
019984,000419: 17,2515 55617 TS OPTNREG # C(K) = (4,2,1) FOR X,Y,Z
019985,000420: 17,2516 55621 TS SAVE +1
019986,000421: 17,2517 05401 TC FREEDSP
019987,000422: 17,2520 37665 CAF ZERO
019988,000423: 17,2521 55536 TS NBPOS # SET UP NB COORD TO Z NORTH, X UP
019989,000424: 17,2522 55622 TS SAVE +2 # INITIALIZE FOR EARTHR DESIGNATE USAGE
019990,000425: 17,2523 55563 TS TESTNO # INITIALIZE FOR TEST ABORT ROUTINE
019991,000426: 17,2524 55615 TS CDUFLAG # ZEROS FOR STRTWACH USE
019992,000427: 17,2525 33653 CAF SFCONST
019993,000428:
![]() |
Page 483 |
019995,000430: 17,2526 55623 TS SFCONST1 # FOR DIVISION DURING CALCFSE
019996,000431:
019997,000432: 17,2527 04063 TC BANKCALL
019998,000433: 17,2530 26000 CADR IMUZERO
019999,000434: 17,2531 04063 TC BANKCALL
020000,000435: 17,2532 26716 CADR IMUSTALL
020001,000436: 17,2533 12243 TCF ENDTEST1
020002,000437: 17,2534 03344 TC NBPOSPL
020003,000438: 17,2535 03077 TC POSGMBL
020004,000439: 17,2536 12243 TCF ENDTEST1
020005,000440: 17,2537 03124 TC FALNE
020006,000441: 17,2540 04063 TC BANKCALL
020007,000442: 17,2541 31703 CADR REDYTORK
020008,000443: 17,2542 55552 WAITFIVE TS SOUTHDR
020009,000444: 17,2543 37652 CAF BIT6 # THIS SECTION CALLS FOR 2-32 MSEC WAITS
020010,000445: 17,2544 02557 TC DIRECTN -5
020011,000446: 17,2545 37652 ENABLE CAF BIT6
020012,000447: 17,2546 00006 EXTEND # ENABLE GYRO TORQUING LOOP BY TURNING
020013,000448: 17,2547 05014 WOR 14C # ON CAL MODULE RELAY
020014,000449:
020015,000450: 17,2550 00004 INHINT
020016,000451: 17,2551 47656 CS TWO # SETS UP EXEC SWITCH SO IMUPULSE WILL
020017,000452: 17,2552 70370 MASK IMODES33 # NOT TURN OFF GYRO TORQ ENABLE RELAY
020018,000453: 17,2553 67656 AD TWO
020019,000454: 17,2554 54370 TS IMODES33
020020,000455: 17,2555 37656 CAF TWO
020021,000456: 17,2556 55552 TS SOUTHDR
020022,000457: 17,2557 55527 TS LENGTHOT # 20 MSEC DELAY FOR GYRO LOOP STABILIZAT.
020023,000458: 17,2560 37657 CA ONE
020024,000459: 17,2561 03205 TC WAITLOOP
020025,000460: 17,2562 11676 CCS COUNTPL
020026,000461: 17,2563 03227 TC WAITLP2
020027,000462: 17,2564 04063 DIRECTN TC BANKCALL # TORQUING ROUTINE IN IMU PERFORMANCE
020028,000463: 17,2565 34520 CADR SILVER # BANK 3
020029,000464: 17,2566 11552 CCS SOUTHDR # A ONE FIRST TIME THROUGH, THEN ZERO
020030,000465: 17,2567 02542 TC WAITFIVE
020031,000466:
020032,000467: 17,2570 11615 STRTWACH CCS CDUFLAG # RETURNS HERE VIA QPLACE FROM SILVER
020033,000468: 17,2571 02652 TC CDUZOTST # BEEN CAUGHT AND CDU THROUGH ZERO IS
020034,000469: 17,2572 11621 CCS SAVE +1
020035,000470: 17,2573 02612 TC LOOKCDUP -4
020036,000471: 17,2574 02616 TC LOOKCDUP
020037,000472: 17,2575 37665 CORRECT CAF ZERO
020038,000473: 17,2576 54357 TS LGYRO # RELEASES GYROS FOR IMUPULSE USAGE
020039,000474: 17,2577 04063 TC BANKCALL # EARTHRATE CORRECTION TO GYROS NOT EAST
020040,000475: 17,2600 30422 CADR EARTHR # OR WEST
020041,000476: 17,2601 37657 CAF ONE
020042,000477: 17,2602 54357 TS LGYRO # RESERVES GYROS FOR S.F. TEST TORQUING
020043,000478: 17,2603 55622 TS SAVE +2 # INITIALIZES TO INSURE 5.6 DEG OF TORQ)
020044,000479: 17,2604 27563 ADS TESTNO # INCR THE BURST COUNTER, WHICH IS USED TO
020045,000480:
![]() |
Page 484 |
020047,000482: 17,2605 41563 CS TESTNO # COUNT THE NO. OF ITMES THE GYRO COUNTER
020048,000483: 17,2606 77664 MASK FIVE # IS LOADED, IF A TENTH LOAD IS REQUESTED
020049,000484: 17,2607 00006 EXTEND # THE SFE IS TOO LARGE TO BE MEANINGFULL
020050,000485: 17,2610 12760 BZF STOPTEST # OR THE CDU,S ARE NOT WORKING.
020051,000486: 17,2611 02564 TC DIRECTN
020052,000487:
020053,000488: 17,2612 37665 CAF ZERO # ZEROS CDU REG WHICH WILL BE USED TO
020054,000489: 17,2613 55621 TS SAVE +1
020055,000490: 17,2614 51672 INDEX CDUNDX # MEASURE ANGLE.
020056,000491: 17,2615 54032 TS CDUX
020057,000492: 17,2616 00004 LOOKCDUP INHINT
020058,000493: 17,2617 37653 CAF BIT5
020059,000494: 17,2620 55624 STILLOOK TS TIMER
020060,000495: 17,2621 51672 INDEX CDUNDX # LOOKS FOR FIRST CDU PULSE AFTER TORQUING
020061,000496: 17,2622 10032 CCS CDUX # STARTS
020062,000497: 17,2623 02635 TC OUTPLUS # HERE IS PLUS PULSE
020063,000498: 17,2624 02627 TC TIMEWACH
020064,000499: 17,2625 02440 TC ALARMS # TTELL OPERATOR FIRST CDU PULSE WAS MISSD
020065,000500: 17,2626 02646 TC OUTNEG # HERE IS MINUS PULSE
020066,000501: 17,2627 11624 TIMEWACH CCS TIMER # WATCHES TIME IN INHINT SO COPS WILL NOT
020067,000502: 17,2630 02620 TC STILLOOK # CATCH US
020068,000503: 17,2631 00003 RELINT
020069,000504:
020070,000505: 17,2632 10067 CCS NEWJOB
020071,000506: 17,2633 04404 TC CHANG1
020072,000507: 17,2634 02616 TC LOOKCDUP # KEEP WATCHING IF THE PULSE IS NOT HERE
020073,000508:
020074,000509: 17,2635 43652 OUTPLUS CS DESANGLE # -2047 CDU PULSES ADDED TO CDU REG SO
020075,000510: 17,2636 51672 INDEX CDUNDX # ZERO CROSSOVER CAN BE DETECTED
020076,000511: 17,2637 54032 TS CDUX
020077,000512: 17,2640 37657 LOADFLAG CAF ONE
020078,000513: 17,2641 55615 TS CDUFLAG
020079,000514: 17,2642 30047 CA GYROCTR # GYRO TORQ CMDS LEFT OUT OF FIRST 5.625
020080,000515: 17,2643 55620 TS SAVE # DEG COMMANDED WHEN CDU PULSE ARRIVED
020081,000516: 17,2644 00003 RELINT
020082,000517: 17,2645 02652 TC CDUZOTST
020083,000518:
020084,000519: 17,2646 33652 OUTNEG CA DESANGLE
020085,000520: 17,2647 51672 INDEX CDUNDX
020086,000521: 17,2650 54032 TS CDUX
020087,000522: 17,2651 02640 TC LOADFLAG
020088,000523:
020089,000524: 17,2652 51672 CDUZOTST INDEX CDUNDX
020090,000525: 17,2653 10032 CCS CDUX
020091,000526: 17,2654 02660 TC +4
020092,000527: 17,2655 02675 TC ENDWATCH
020093,000528: 17,2656 02660 TC +2
020094,000529: 17,2657 02675 TC ENDWATCH
020095,000530: 17,2660 37646 CAF BIT10 # RAND WITH BIT 10 TO SEE IF STILL TORQ.
020096,000531: 17,2661 00006 EXTEND
020097,000532:
![]() |
Page 485 |
020099,000534: 17,2662 02014 RAND 14C
020100,000535: 17,2663 10000 CCS A
020101,000536: 17,2664 02672 TC +6
020102,000537:
020103,000538: 17,2665 11622 CCS SAVE +2 # SEE IF 2.8DEG OR 5.6 DEG SINCE LAST
020104,000539: 17,2666 02670 TC +2 # EEARTHR USE, IF 2.8 DEG, DO 2.8 MORE
020105,000540: 17,2667 02575 TC CORRECT # THEN GO TO CORRECT
020106,000541: 17,2670 55622 TS SAVE +2
020107,000542: 17,2671 02564 TC DIRECTN
020108,000543: 17,2672 10067 CCS NEWJOB
020109,000544: 17,2673 04404 TC CHANG1
020110,000545: 17,2674 02652 TC CDUZOTST
020111,000546:
020112,000547: 17,2675 00004 ENDWATCH INHINT # WWILL STOR GYROCTR AT END OF 2048 CDU
020113,000548: 17,2676 37665 CAF ZERO # PULSES AND STOP TORQ BY ZEROING REQUESTS
020114,000549: 17,2677 54357 TS LGYRO # RELEASE GYROS FOR OTHERS USAGE
020115,000550: 17,2700 56047 XCH GYROCTR
020116,000551: 17,2701 55621 TS SAVE +1 # AND STOPS TORQUING BY ZEROING TORQ
020117,000552: 17,2702 47656 CS TWO
020118,000553: 17,2703 70370 MASK IMODES33 # THIS TURNS OFF EXEC SWITCH SO THE GYRO
020119,000554: 17,2704 54370 TS IMODES33 # TORQ. ENABLE RELAY CAN BE TURNED OFF.
020120,000555: 17,2705 00003 RELINT
020121,000556: 17,2706 31620 CALCSFE CA SAVE # GYROCTR AT TEST START
020122,000557: 17,2707 00006 EXTEND
020123,000558: 17,2710 61621 SU SAVE +1 # GYROCTR AT TEST END
020124,000559: 17,2711 55622 TS SAVE +2
020125,000560: 17,2712 00006 EXTEND
020126,000561: 17,2713 62732 BZMF ARITH # SEE IF IT IS NEG OR ZERO,IF NEG,SFE IS +
020127,000562: 17,2714 73654 MASK SIZCHK
020128,000563: 17,2715 00006 EXTEND # THIS ROUTINE TESTS SAVE-(SAVE+1) TO SEE
020129,000564: 17,2716 12724 BZF NEGSFE # IF THE RESULT IS WITHIN PERMISSIBLE SIZE
020130,000565: 17,2717 41622 CS SAVE +2 # AND DETERMINES POLARITY OF SFE USING THE
020131,000566: 17,2720 73654 MASK SIZCHK # PRESENCE OR ABSENCE OF BITS 12,13,14.
020132,000567: 17,2721 00006 EXTEND # IF BITS ARE PRESENT IN POSITIVE SAVE +2
020133,000568: 17,2722 12726 BZF POSSFE # THEN THE SFE MUST BE POS. IF DIFFERENCE
020134,000569: 17,2723 02760 TC STOPTEST # IS GREATER THAN 2047 PULSES FROM THE
020135,000570: 17,2724 31622 NEGSFE CAE SAVE +2 # IDEAL NO OF PULSES, THE SFE EXCEEDS
020136,000571: 17,2725 02732 TC ARITH # 15600 PPM, THE TEST IS NOT VALID AND
020137,000572:
020138,000573: # THEREFORE ABORTS AND TURNS ON PROGRAM ALARM
020139,000574: 17,2726 37637 POSSFE CAF POSMAX # POS SFE DEFINITION = IRIG SF IN SEC OF
020140,000575: 17,2727 00006 EXTEND # ARC PER PULSE IS GREATER THAN
020141,000576: 17,2730 61622 SU SAVE +2 # .61798095703125 SEC OF ARC/ PULSE
020142,000577: 17,2731 02733 TC ARITH +1
020143,000578:
020144,000579: 17,2732 40000 ARITH COM
020145,000580: 17,2733 22007 ZL
020146,000581: 17,2734 00006 EXTEND
020147,000582: 17,2735 11623 DV SFCONST1
020148,000583: 17,2736 54336 LOADIT TS DSPTEM2
020149,000584:
![]() |
Page 486 |
020151,000586: 17,2737 02740 TC DATADSP
020152,000587:
020153,000588: 17,2740 05304 DATADSP TC GRABDSP
020154,000589: 17,2741 05312 TC PREGBSY
020155,000590: 17,2742 31614 CA CALCDIR
020156,000591: 17,2743 54340 TS DSPTEM2 +2 # DISPLAYS TEST NO JUST PERFORMED
020157,000592: 17,2744 33657 CAF VB06N66 # R3 = TEST NO JUST PERFORMED
020158,000593: 17,2745 05332 TC NVSBWAIT
020159,000594: 17,2746 05274 TC FLASHON
020160,000595: 17,2747 05140 TC ENDIDLE # TO END TEST DO V34E
020161,000596: 17,2750 02752 TC +2
020162,000597: 17,2751 02451 TC TESTCALL # TO CONTINUE TEST DO V33E
020163,000598: 17,2752 04063 TC BANKCALL
020164,000599: 17,2753 26000 CADR IMUZERO
020165,000600: 17,2754 04063 TC BANKCALL
020166,000601: 17,2755 26716 CADR IMUSTALL
020167,000602: 17,2756 12243 TCF ENDTEST1
020168,000603: 17,2757 12243 TCF ENDTEST1
020169,000604:
020170,000605: 17,2760 04063 STOPTEST TC BANKCALL
020171,000606: 17,2761 26000 CADR IMUZERO
020172,000607: 17,2762 04063 TC BANKCALL # CORRECT CDUCTRS AND TURN ON PROG ALARM
020173,000608: 17,2763 26716 CADR IMUSTALL # TO TELL OPERATOR LAST CDU PULSE WAS
020174,000609: 17,2764 12243 TCF ENDTEST1 # MISSED OR GYRO TORQ LOOP WAY OUT OF
020175,000610: 17,2765 37665 CAF ZERO # ALLOWABLE LIMITS.........
020176,000611: 17,2766 54357 TS LGYRO # **** RELEASE GYROS FOR OTHERS USAGE*****
020177,000612: 17,2767 02440 TC ALARMS
020178,000613: 17,2770 12243 TCF ENDTEST1
020179,000614:
![]() |
Page 487 |
020181,000616: 17,2771 00006 CHECKG EXTEND # PIP PULSE CATCHING ROUTINE
020182,000617: 17,2772 23546 QXCH QPLACE # RECORDS TIME AT OCCURRENCE OF A DELTA V
020183,000618: 17,2773 00003 CHECKG1 RELINT # KEEPS CONTENT OF PIPA REG INTACT
020184,000619: 17,2774 10067 CCS NEWJOB
020185,000620: 17,2775 04404 TC CHANG1
020186,000621: 17,2776 00004 INHINT
020187,000622: 17,2777 37665 CAF ZERO
020188,000623: 17,3000 51541 INDEX PIPINDEX
020189,000624: 17,3001 56037 XCH PIPAX
020190,000625: 17,3002 55551 TS STOREPL
020191,000626: 17,3003 11551 CCS STOREPL
020192,000627: 17,3004 03010 TC CHECKP
020193,000628: 17,3005 03063 TC RESTOREA
020194,000629: 17,3006 03023 TC CHECKM
020195,000630: 17,3007 03063 TC RESTOREA
020196,000631: 17,3010 37652 CHECKP CAF BIT6 # LOOKS FOR ONE MORE PLUS PULSE
020197,000632: 17,3011 55540 TS PIPANO
020198,000633: 17,3012 51541 INDEX PIPINDEX
020199,000634: 17,3013 10037 CCS PIPAX
020200,000635: 17,3014 03036 TC CHECKG3
020201,000636: 17,3015 03020 TC +3
020202,000637: 17,3016 03063 TC RESTOREA
020203,000638: 17,3017 03020 TC +1
020204,000639: 17,3020 11540 CCS PIPANO
020205,000640: 17,3021 03011 TC CHECKP +1
020206,000641: 17,3022 03063 TC RESTOREA
020207,000642: 17,3023 37652 CHECKM CAF BIT6 # LOOKS FOR ONE MORE MINUS PULSE
020208,000643: 17,3024 55540 TS PIPANO
020209,000644: 17,3025 51541 INDEX PIPINDEX
020210,000645: 17,3026 10037 CCS PIPAX
020211,000646: 17,3027 03063 TC RESTOREA
020212,000647: 17,3030 03033 TC +3
020213,000648: 17,3031 03036 TC CHECKG3
020214,000649: 17,3032 03033 TC +1
020215,000650: 17,3033 11540 CCS PIPANO
020216,000651: 17,3034 03024 TC CHECKM +1
020217,000652: 17,3035 03063 TC RESTOREA
020218,000653: 17,3036 05470 CHECKG3 TC FINETIME # TIME IN DOUBLE PRECISION LEFT IN MPAC
020219,000654:
020220,000655: 17,3037 52141 DXCH MPAC
020221,000656: 17,3040 37654 CAF BIT4
020222,000657: 17,3041 55540 CHECKG5 TS PIPANO
020223,000658: 17,3042 51541 INDEX PIPINDEX
020224,000659: 17,3043 10037 CCS PIPAX
020225,000660: 17,3044 03050 TC +4
020226,000661: 17,3045 03063 TC RESTOREA
020227,000662: 17,3046 03050 TC +2
020228,000663: 17,3047 03063 TC RESTOREA
020229,000664: 17,3050 11540 CCS PIPANO
020230,000665: 17,3051 03041 TC CHECKG5
020231,000666:
![]() |
Page 488 |
020233,000668: 17,3052 03055 NREAD TC RESTORE
020234,000669: 17,3053 55551 TS STOREPL
020235,000670: 17,3054 01546 TC QPLACE
020236,000671: 17,3055 57551 RESTORE XCH STOREPL # A WILL CONTAIN PREVIOUS PIPA CNTR CONTEN
020237,000672: 17,3056 51541 INDEX PIPINDEX # STOREPL WILL CONTAIN ZERO
020238,000673: 17,3057 60037 AD PIPAX
020239,000674: 17,3060 51541 INDEX PIPINDEX
020240,000675: 17,3061 54037 TS PIPAX
020241,000676: 17,3062 00002 TC Q
020242,000677:
![]() |
Page 489 |
020244,000679: 17,3063 03055 RESTOREA TC RESTORE
020245,000680: 17,3064 02773 TC CHECKG1
020246,000681: 17,3065 31551 DATALD CA STOREPL
020247,000682: 17,3066 51673 INDEX RESULTCT
020248,000683: 17,3067 55626 TS DATAPL
020249,000684: 17,3070 30140 CA MPAC
020250,000685: 17,3071 51673 INDEX RESULTCT
020251,000686: 17,3072 55627 TS DATAPL +1
020252,000687: 17,3073 30141 CA MPAC +1
020253,000688: 17,3074 51673 INDEX RESULTCT
020254,000689: 17,3075 55630 TS DATAPL +2
020255,000690: 17,3076 00002 TC Q
020256,000691:
020257,000692:
020258,000693:
020259,000694:
020260,000695:
020261,000696: 17,3077 00006 POSGMBL EXTEND # COARSE ALIGNING SUBROUTINE
020262,000697: 17,3100 23546 QXCH QPLACE
020263,000698:
020264,000699: 17,3101 06000 TC INTPRET
020265,000700: 17,3102 77634 CALL
020266,000701: 17,3103 32615 CALCGA
020267,000702: 17,3104 77776 EXIT
020268,000703:
020269,000704: 17,3105 04063 TC BANKCALL
020270,000705: 17,3106 26055 CADR IMUCOARS
020271,000706: 17,3107 33123 CA GMLOCKCK # IF FAILREG CONTAINS 401 WILL RETURN TO
020272,000707: 17,3110 71363 MASK FAILREG
020273,000708: 17,3111 10000 CCS A # L +1, OTHERWISE TO L +2.
020274,000709: 17,3112 03115 TC LOCK
020275,000710: 17,3113 25546 INCR QPLACE
020276,000711: 17,3114 03117 TC +3
020277,000712: 17,3115 37656 LOCK CA TWO
020278,000713: 17,3116 55537 TS NDXCTR
020279,000714: 17,3117 04063 TC BANKCALL
020280,000715: 17,3120 26716 CADR IMUSTALL
020281,000716: 17,3121 12243 TCF ENDTEST1
020282,000717: 17,3122 01546 TC QPLACE
020283,000718: 17,3123 00401 GMLOCKCK OCT 00401
020284,000719:
![]() |
Page 490 |
020286,000721: 17,3124 00006 FALNE EXTEND # TORQUES GYROS TO NULL OVT DIFFERENCE
020287,000722: 17,3125 23546 QXCH QPLACE # BETWEEN DESIRED SM ORIENTATION WITH RESP
020288,000723: 17,3126 04063 TC BANKCALL # TO NBASE AND ACTUAL
020289,000724: 17,3127 26000 CADR IMUZERO
020290,000725: 17,3130 04063 TC BANKCALL
020291,000726: 17,3131 26716 CADR IMUSTALL
020292,000727: 17,3132 12243 TCF ENDTEST1
020293,000728: 17,3133 04063 TC BANKCALL
020294,000729: 17,3134 26227 CADR IMUFINE
020295,000730: 17,3135 04063 TC BANKCALL
020296,000731: 17,3136 26716 CADR IMUSTALL
020297,000732: 17,3137 12243 TCF ENDTEST1
020298,000733: 17,3140 30032 FALNE1 CA CDUX
020299,000734: 17,3141 50104 INDEX FIXLOC
020300,000735: 17,3142 54024 TS 24
020301,000736: 17,3143 30033 CA CDUY
020302,000737: 17,3144 50104 INDEX FIXLOC
020303,000738: 17,3145 54020 TS 20
020304,000739: 17,3146 30034 CA CDUZ
020305,000740: 17,3147 50104 INDEX FIXLOC
020306,000741: 17,3150 54022 TS 22
020307,000742: 17,3151 37653 CA BIT5
020308,000743: 17,3152 60104 AD FIXLOC
020309,000744: 17,3153 50104 INDEX FIXLOC
020310,000745: 17,3154 54050 TS S1
020311,000746: 17,3155 06000 TC INTPRET
020312,000747: 17,3156 64375 VLOAD MXV
020313,000748: 17,3157 01401 XSM
020314,000749: 17,3160 01445 STARAD
020315,000750: 17,3161 77772 VSL1
020316,000751: 17,3162 36041 STCALL 32D
020317,000752: 17,3163 32517 NBSM
020318,000753: 17,3164 23423 STOVL XDC
020319,000754: 17,3165 01407 YSM
020320,000755: 17,3166 76521 MXV VSL1
020321,000756: 17,3167 01445 STARAD
020322,000757: 17,3170 36041 STCALL 32D
020323,000758: 17,3171 32517 NBSM
020324,000759: 17,3172 23431 STOVL YDC
020325,000760: 17,3173 01423 XDC
020326,000761: 17,3174 76435 VXV VSL1
020327,000762: 17,3175 01431 YDC
020328,000763: 17,3176 37437 STCALL ZDC
020329,000764: 17,3177 32367 CALCGTA
020330,000765: 17,3200 77776 EXIT
020331,000766: 17,3201 33673 CA OGCPL
020332,000767: 17,3202 04063 TC BANKCALL
020333,000768: 17,3203 26317 CADR IMUPULSE
020334,000769: 17,3204 01546 TC QPLACE
020335,000770:
![]() |
Page 491 |
020337,000772: 17,3205 00006 WAITLOOP EXTEND # LOOPS IN X SEC INCREMENTS FOR NUMBER OF
020338,000773: 17,3206 23545 QXCH QPLAC
020339,000774: 17,3207 55676 TS COUNTPL # NUMBER PUT INTO LENGTHOT
020340,000775: 17,3210 11676 WAITLP1 CCS COUNTPL
020341,000776: 17,3211 03215 TC +4
020342,000777: 17,3212 01545 TC QPLAC
020343,000778: 17,3213 03215 TC +2
020344,000779: 17,3214 03207 TC WAITLP1 -1
020345,000780: 17,3215 00004 INHINT
020346,000781: 17,3216 31527 CAE LENGTHOT
020347,000782: 17,3217 04536 TC WAITLIST
020348,000783: 17,3220 03233 36005 2CADR WAITLP3
020349,000784: 17,3222 00003 RELINT
020350,000785: 17,3223 11676 CCS COUNTPL
020351,000786: 17,3224 01545 TC QPLAC
020352,000787: 17,3225 01545 TC QPLAC
020353,000788: 17,3226 13227 NOOP
020354,000789: 17,3227 55676 WAITLP2 TS COUNTPL # ENTER HERE AFTER DOING CALLING JOB
020355,000790: 17,3230 33232 CAF WTLPCADR
020356,000791: 17,3231 04416 TC JOBSLEEP
020357,000792: 17,3232 37210 WTLPCADR CADR WAITLP1
020358,000793: 17,3233 33232 WAITLP3 CAF WTLPCADR
020359,000794: 17,3234 04422 TC JOBWAKE
020360,000795: 17,3235 04602 TC TASKOVER
020361,000796:
020362,000797:
020363,000798:
020364,000799:
020365,000800:
020366,000801: 17,3236 54001 ZEROING TS L
020367,000802: 17,3237 13241 TCF +2
020368,000803: 17,3240 55776 ZEROING1 TS ZERONDX
020369,000804: 17,3241 37665 CAF ZERO
020370,000805: 17,3242 50001 INDEX L
020371,000806: 17,3243 54000 TS 0
020372,000807: 17,3244 24001 INCR L
020373,000808: 17,3245 11776 CCS ZERONDX
020374,000809: 17,3246 13240 TCF ZEROING1
020375,000810: 17,3247 00002 TC Q
020376,000811: 17,3250 06000 COMPUT TC INTPRET # CALCULATE LENGTH OF GRAVITY VECTOR AS
020377,000812: 17,3251 77170 AXT,1 AXT,2 # MEASURED BY ACCELEROMETERS
020378,000813: 17,3252 00026 22D
020379,000814: 17,3253 00012 10D
020380,000815: 17,3254 77731 SSP
020381,000816: 17,3255 00051 S1
020382,000817: 17,3256 00004 4
020383,000818: 17,3257 77731 SSP
020384,000819: 17,3260 00052 S2
020385,000820: 17,3261 00004 4
020386,000821:
![]() |
Page 492 |
020388,000823: 17,3262 44743 LOPDELOP DLOAD* DSU*
020389,000824: 17,3263 76120 DATAPL +24D,2
020390,000825: 17,3264 01657 DATAPL +24D,1
020391,000826: 17,3265 41323 PDDL* DMP
020392,000827: 17,3266 76156 GENPL +24D,2
020393,000828: 17,3267 37665 DEC585
020394,000829: 17,3270 77671 DDV
020395,000830: 17,3271 55504 TIX,2 VDEF
020396,000831: 17,3272 37277 NEXT
020397,000832: 17,3273 45046 ABVAL RTB
020398,000833: 17,3274 33406 SGNAGREE
020399,000834: 17,3275 36337 STCALL DSPTEM2
020400,000835: 17,3276 37301 KODU
020401,000836: 17,3277 60006 NEXT PUSH TIX,1
020402,000837: 17,3300 37262 LOPDELOP
020403,000838: 17,3301 77776 KODU EXIT
020404,000839: 17,3302 05317 TC GRABWAIT
020405,000840: 17,3303 03576 TC SHOW
020406,000841: 17,3304 06000 TC INTPRET
020407,000842: 17,3305 41535 SLOAD PUSH
020408,000843: 17,3306 01630 DATAPL +1
020409,000844: 17,3307 41535 SLOAD PUSH
020410,000845: 17,3310 01634 DATAPL +5
020411,000846: 17,3311 55535 SLOAD VDEF
020412,000847: 17,3312 01640 DATAPL +11
020413,000848: 17,3313 76456 UNIT VSL1
020414,000849: 17,3314 77606 PUSH
020415,000850: 17,3315 41535 SLOAD PUSH
020416,000851: 17,3316 01644 DATAPL +15
020417,000852: 17,3317 41535 SLOAD PUSH
020418,000853: 17,3320 01650 DATAPL +21
020419,000854: 17,3321 55535 SLOAD VDEF
020420,000855: 17,3322 01654 DATAPL +25
020421,000856: 17,3323 76456 UNIT VSL1
020422,000857: 17,3324 45325 PDDL DSU
020423,000858: 17,3325 01655 DATAPL +26
020424,000859: 17,3326 01641 DATAPL +12
020425,000860: 17,3327 77612 SL4
020426,000861: 17,3330 77652 SL3
020427,000862: 17,3331 23530 STOVL LENGTHOT
020428,000863: 17,3332 51435 VXV ABVAL
020429,000864: 17,3333 56205 DMP DDV
020430,000865: 17,3334 37670 ERUNITS
020431,000866: 17,3335 01530 LENGTHOT
020432,000867: 17,3336 77624 RTB
020433,000868: 17,3337 33406 SGNAGREE
020434,000869: 17,3340 00337 STORE DSPTEM2
020435,000870: 17,3341 77776 EXIT
020436,000871: 17,3342 03576 TC SHOW
020437,000872: 17,3343 12402 TCF RADCK
020438,000873:
![]() |
Page 493 |
020440,000875: 17,3344 00006 NBPOSPL EXTEND # SETS UP AZIMUTH AND VERTICAL VECTORS FOR
020441,000876: 17,3345 23546 QXCH QPLACE # AXISGEN,RESULTS TO BE USED IN CALCGA TO
020442,000877: 17,3346 06000 TC INTPRET
020443,000878: 17,3347 54160 AXC,1 XSU,1 # AZIMUTH IN NB COORDS
020444,000879: 17,3350 37704 SCNBAZ
020445,000880: 17,3351 01536 NBPOS
020446,000881: 17,3352 77773 VLOAD*
020447,000882: 17,3353 00001 0,1
020448,000883: 17,3354 01445 STORE STARAD
020449,000884:
020450,000885: 17,3355 54160 AXC,1 XSU,1 # VERITCAL IN NB COORDS
020451,000886: 17,3356 37716 SCNBVER
020452,000887: 17,3357 01536 NBPOS
020453,000888: 17,3360 77773 VLOAD*
020454,000889: 17,3361 00001 0,1
020455,000890: 17,3362 07453 STODL STARAD +6
020456,000891: 17,3363 33042 ZERODP
020457,000892: 17,3364 06007 STODL 6D
020458,000893: 17,3365 01507 AZIMUTH
020459,000894: 17,3366 57546 COS DCOMP
020460,000895: 17,3367 06011 STODL 8D
020461,000896: 17,3370 01507 AZIMUTH
020462,000897: 17,3371 77756 SIN
020463,000898: 17,3372 00013 STORE 10D # VERTICAL IN CER
020464,000899: 17,3373 77775 VLOAD
020465,000900: 17,3374 37717 SCNBVER
020466,000901: 17,3375 36015 STCALL 12D
020467,000902: 17,3376 32677 AXISGEN
020468,000903: 17,3377 77776 EXIT
020469,000904:
020470,000905: 17,3400 33663 SELPOSN CA DEC17
020471,000906: 17,3401 55776 TS ZERONDX
020472,000907: 17,3402 33703 CA XSMADR
020473,000908: 17,3403 03236 TC ZEROING
020474,000909:
020475,000910: 17,3404 51544 INDEX POSITON
020476,000911: 17,3405 03406 TC +1
020477,000912: 17,3406 03524 TC OPCHKPOS # OPCHK WILL PUT ZERO IN POSITON
020478,000913: 17,3407 03422 TC POSN1
020479,000914: 17,3410 03431 TC POSN2
020480,000915: 17,3411 03436 TC POSN3
020481,000916: 17,3412 03450 TC POSN4
020482,000917: 17,3413 03460 TC POSN5
020483,000918: 17,3414 03470 TC POSN6
020484,000919: 17,3415 03500 TC POSN7
020485,000920: 17,3416 03513 TC POSN8
020486,000921: 17,3417 03542 TC POSN9
020487,000922: 17,3420 03553 TC POSN10
020488,000923:
020489,000924: 17,3421 03564 TC POSN11 # COMPASS POSITION
020490,000925:
![]() |
Page 494 |
020492,000927: # WE WILL DENOTE THE FLASHING DISPLAY OF A HORIZONTAL TEST BY DH
020493,000928: # (XXX.XX MERU) AND A VERTICAL TEST BY DV (XXX.XX MERU) EACH POSITION TELL
020494,000929: # HOW THE DISPLAYS ARE RELATED TO TTHE DRIFT COEFFICIENTS BEING MEASURED.
020495,000930: # NOTE THAT IT IS ILLEGAL TO RUN VERTICAL IN POS 6,4, OR 2 WITHOUT FIRST
020496,000931: # RUNNING HORIZONTAL OF POS 5,3, OR1. THIS IS BECAUSE THE HORIZ DRIFT CALC
020497,000932: # IN 1,3, OR 5 IS USED AS EAST DRIFFFT FOR VERTICAL TEST. THIS IS DONE BY
020498,000933: # THE MACHINE AUTOMATICALLY EXCEPT FOR VERTICAL POSITION 6 WHICH THE
020499,000934: # OPERATOR MUST DO. (SEE POSITION 6 BELOW)
020500,000935: 17,3422 37642 POSN1 CA HALF # X UP, Y SOUTH, Z EAST
020501,000936: 17,3423 55400 TS XSM
020502,000937: 17,3424 55410 TS YSM +2 # NBDY = DH
020503,000938: 17,3425 55420 TS ZSM +4
020504,000939: 17,3426 37665 NGUBGH CA ZERO
020505,000940: 17,3427 55541 TS PIPINDEX
020506,000941: 17,3430 01546 TC QPLACE
020507,000942:
020508,000943:
020509,000944:
020510,000945: 17,3431 47642 POSN2 CS HALF # X DOWN, Y WEST, Z NORTH
020511,000946: 17,3432 55400 TS XSM
020512,000947: 17,3433 55412 TS YSM +4 # NBDZ =DH ,NBDX -ADIAX= -DV
020513,000948: 17,3434 55416 TS ZSM +2
020514,000949: 17,3435 03426 TC NGUBGH
020515,000950:
020516,000951:
020517,000952:
020518,000953: 17,3436 37642 POSN3 CA HALF # Z UP, Y WEST ,X NORTH
020519,000954: 17,3437 55414 TS ZSM
020520,000955: 17,3440 40000 COM # NBDX = -DH
020521,000956: 17,3441 55402 TS XSM +2
020522,000957: 17,3442 55412 TS YSM +4
020523,000958: 17,3443 37656 NSFLAGD CA TWO
020524,000959: 17,3444 55541 TS PIPINDEX
020525,000960: 17,3445 37665 NSBUGD CA ZERO
020526,000961: 17,3446 55576 TS DRIFTT
020527,000962: 17,3447 01546 TC QPLACE
020528,000963:
020529,000964:
020530,000965:
020531,000966: 17,3450 47642 POSN4 CS HALF # Y SOUTH, X EAST, Z DOWN
020532,000967: 17,3451 55414 TS ZSM # NBDY +ADSRAY=DH
020533,000968: 17,3452 40000 COM # NBDZ +ADIAZ =DV
020534,000969: 17,3453 55410 TS YSM +2
020535,000970: 17,3454 55404 TS XSM +4
020536,000971: 17,3455 37656 CA TWO
020537,000972: 17,3456 55541 TS PIPINDEX
020538,000973: 17,3457 01546 TC QPLACE
020539,000974:
![]() |
Page 495 |
020541,000976: 17,3460 37642 POSN5 CA HALF # Y UP, Z NORTH, X WEST
020542,000977: 17,3461 55406 TS YSM
020543,000978: 17,3462 40000 COM # NBDZ-ADSRAZ =DH
020544,000979: 17,3463 55404 TS XSM +4
020545,000980: 17,3464 55416 TS ZSM +2
020546,000981: 17,3465 37657 CA ONE
020547,000982: 17,3466 55541 TS PIPINDEX
020548,000983: 17,3467 03445 TC NSBUGD
020549,000984:
020550,000985:
020551,000986:
020552,000987: # TO RUN POSITION 6 VERTICAL AFTER PIP TEST POS 6 IS DISPLAYED THE OPERATR
020553,000988: # MUST CALCULATE FROM 2.5 -NBDZ-ADSRAZ (XXX.XX)MERU. WHEN PI
020554,000989: # IP DATA FLASHES DO VERB 33 ENTER. THIS STARTS VERTICAL TEST. THEN THE
020555,000990: # DATA XXX.XX MERU AS CALCULATED MUST BE ENTERED INTO DRIFTT. IE VERB 21
020556,000991: # ENTER NOUN 01 ENTER LOCATION OF DRIFTT ENTER + (OR -) XXXXX ENTER
020557,000992: 17,3470 37642 POSN6 CA HALF # Y DOWN, Z EAST, X SOUTH
020558,000993: 17,3471 55402 TS XSM +2
020559,000994: 17,3472 55420 TS ZSM +4
020560,000995: 17,3473 40000 COM # NBDX +ADSRAX = DH, NBDY -ADIAY = -DV
020561,000996: 17,3474 55406 TS YSM
020562,000997: 17,3475 37657 CA ONE
020563,000998: 17,3476 55541 TS PIPINDEX
020564,000999: 17,3477 01546 TC QPLACE
020565,001000:
020566,001001:
020567,001002:
020568,001003: 17,3500 47642 POSN7 CS HALF # Z UP-EAST,Y UP-WEST,X NORTH.THIS POSITON
020569,001004: 17,3501 55402 TS XSM +2
020570,001005: 17,3502 33677 CA ROOT1/2
020571,001006: 17,3503 55406 TS YSM # NBDX - .707 ADSRAX = -DH
020572,001007: 17,3504 55414 TS ZSM
020573,001008: 17,3505 55420 TS ZSM +4
020574,001009: 17,3506 40000 COM
020575,001010: 17,3507 55412 TS YSM +4
020576,001011: 17,3510 37665 GEORGES CA ZERO
020577,001012: 17,3511 55363 TS FAILREG
020578,001013: 17,3512 03445 TC NSBUGD
020579,001014:
020580,001015:
020581,001016:
020582,001017: 17,3513 37642 POSN8 CA HALF # Z UP-SOUTH,Y UP-NORTH,X EAST.THIS POSITN
020583,001018: 17,3514 55404 TS XSM +4
020584,001019: 17,3515 33677 CA ROOT1/2 # .707(-NBDZ-NBDY) +.5(ADIAZ-ADIAY)
020585,001020: 17,3516 55406 TS YSM # +.5(ADSRAY +ADSRAZ)=DH
020586,001021: 17,3517 55416 TS ZSM +2
020587,001022: 17,3520 55414 TS ZSM
020588,001023: 17,3521 40000 COM
020589,001024: 17,3522 55410 TS YSM +2
020590,001025: 17,3523 03445 TC NSBUGD
020591,001026:
![]() |
Page 496 |
020593,001028: 17,3524 33700 OPCHKPOS CA ROOT1SQ # OG=+45DEG,IG=-45DEG,MG=+45DEG.
020594,001029: 17,3525 55400 TS XSM
020595,001030: 17,3526 55410 TS YSM +2
020596,001031: 17,3527 55412 TS YSM +4
020597,001032: 17,3530 55414 TS ZSM
020598,001033: 17,3531 33677 CA ROOT1/2
020599,001034: 17,3532 55406 TS YSM
020600,001035: 17,3533 33702 CA ROOT3SQ
020601,001036: 17,3534 55402 TS XSM +2
020602,001037: 17,3535 55420 TS ZSM +4
020603,001038: 17,3536 43701 CS ROOT2SQ
020604,001039: 17,3537 55404 TS XSM +4
020605,001040: 17,3540 55416 TS ZSM +2
020606,001041: 17,3541 01546 TC QPLACE
020607,001042:
020608,001043: 17,3542 37642 POSN9 CA HALF # X UP EAST,Y UP WEST,Z SOUTH.THIS POSITON
020609,001044: 17,3543 55416 TS ZSM +2
020610,001045: 17,3544 33677 CA ROOT1/2 # -NBDZ +.707 SRAZ =DH
020611,001046: 17,3545 55400 TS XSM
020612,001047: 17,3546 55404 TS XSM +4
020613,001048: 17,3547 55406 TS YSM
020614,001049: 17,3550 40000 COM
020615,001050: 17,3551 55412 TS YSM +4
020616,001051: 17,3552 03445 TC NSBUGD
020617,001052:
020618,001053:
020619,001054:
020620,001055: 17,3553 37642 POSN10 CA HALF # X UP NORTH, Y UP SOUTH,Z EAST.THIS POSITN
020621,001056: 17,3554 55420 TS ZSM +4
020622,001057: 17,3555 33677 CA ROOT1/2 # .707(NBDY -NBDX) +.5(ADIAY -ADIAX)
020623,001058: 17,3556 55400 TS XSM # +.5(ADSRAX) = DH
020624,001059: 17,3557 55406 TS YSM
020625,001060: 17,3560 55410 TS YSM +2
020626,001061: 17,3561 40000 COM
020627,001062: 17,3562 55402 TS XSM +2
020628,001063: 17,3563 03445 TC NSBUGD
020629,001064:
020630,001065:
020631,001066:
020632,001067: 17,3564 04063 POSN11 TC BANKCALL # COMPASS POSITION
020633,001068: 17,3565 43107 CADR LOADXSM
020634,001069: 17,3566 01546 TC QPLACE
020635,001070:
020636,001071:
020637,001072:
020638,001073: 17,3567 30336 SHOWLD CA DSPTEM2
020639,001074: 17,3570 55527 TS LENGTHOT
020640,001075: 17,3571 30337 CA DSPTEM2 +1
020641,001076: 17,3572 55536 TS NBPOS
020642,001077: 17,3573 30340 CA DSPTEM2 +2
020643,001078:
![]() |
Page 497 |
020645,001080: 17,3574 55544 TS POSITON
020646,001081: 17,3575 00002 TC Q
020647,001082:
020648,001083: 17,3576 00006 SHOW EXTEND
020649,001084: 17,3577 23546 QXCH QPLACE
020650,001085: 17,3600 31544 SHOW1 CA POSITON
020651,001086: 17,3601 54340 TS DSPTEM2 +2
020652,001087: 17,3602 33657 CA VB06N66
020653,001088: 17,3603 05332 TC NVSBWAIT
020654,001089: 17,3604 05274 TC FLASHON
020655,001090: 17,3605 05140 TC ENDIDLE
020656,001091: 17,3606 02234 TC FINISH
020657,001092: 17,3607 01546 TC QPLACE
020658,001093: 17,3610 03567 TC SHOWLD
020659,001094: 17,3611 13600 TCF SHOW1
020660,001095:
020661,001096:
020662,001097:
020663,001098: 17,3612 00006 LOADGTSM EXTEND # THIS LOADS XSM INTO GEOMATRX
020664,001099: 17,3613 23546 QXCH QPLACE
020665,001100: 17,3614 06000 TC INTPRET
020666,001101: 17,3615 77775 VLOAD
020667,001102: 17,3616 01401 XSM
020668,001103: 17,3617 23750 STOVL GEOMTRX
020669,001104: 17,3620 01407 YSM
020670,001105: 17,3621 23756 STOVL GEOMTRX +6
020671,001106: 17,3622 01415 ZSM
020672,001107: 17,3623 01764 STORE GEOMTRX +12D
020673,001108: 17,3624 77776 EXIT
020674,001109: 17,3625 01546 TC QPLACE
020675,001110:
![]() |
Page 498 |
020677,001112: 17,3626 00144 1SECX DEC 100 B-14
020678,001113: 17,3627 17127 16705 GEORGED 2DEC .47408845
020679,001114: 17,3631 07314 36223 2DEC .23125894
020680,001115: 17,3633 04521 31140 2DEC .14561689
020681,001116: 17,3635 75755 73521 GEORGEC 2DEC -.06360691
020682,001117: 17,3637 72476 54176 2DEC -.16806746
020683,001118: 17,3641 04771 03365 2DEC .15582939
020684,001119: 17,3643 75644 70661 GEORGEB 2DEC -.06806784
020685,001120: 17,3645 47762 75077 2DEC -.75079894
020686,001121: 17,3647 70023 73740 2DEC -.24878704
020687,001122: 17,3651 14C EQUALS 0014
020688,001123: 17,3651 02130 V21N30E OCT 02130
020689,001124: 17,3652 04000 DESANGLE DEC 2048 B-14
020690,001125: 17,3653 04143 SFCONST DEC .13107
020691,001126: 17,3654 34000 SIZCHK OCT 34000
020692,001127: 17,3655 00264 180DEC DEC 180 B-14
020693,001128: 17,3656 07626 3990DEC DEC 3990 B-14
020694,001129: 17,3657 00666 VB06N66 OCT 00666
020695,001130: 17,3660 01130 TESTTIME DEC 600 B-14
020696,001131: 17,3661 01620 V16N20S OCT 01620
020697,001132: 17,3662 01640 V16N40S OCT 01640
020698,001133: 17,3663 00021 DEC17 DEC 17 B-14
020699,001134: 17,3664 06200 00000 DEC585 2DEC 3200 B+14
020700,001135: 17,3666 00400 DELYOFF OCT 00400
020701,001136: 17,3667 00024 35474 ERUNITS 2DEC 342844 B-28
020702,001137: 17,3671 01506 GENPLAD GENADR AZIMUTH
020703,001138: 17,3672 02521 GYRODPL ECADR GYROD
020704,001139: 17,3673 02500 OGCPL ECADR OGC
020705,001140: 17,3674 77760 LOWFOUR OCT 77760
020706,001141: 17,3675 00070 DEC56 DEC 56 B-14
020707,001142: 17,3676 10000 45DEG OCT 10000
020708,001143: 17,3677 13241 ROOT1/2 DEC .353553
020709,001144: 17,3700 10000 ROOT1SQ DEC .250000
020710,001145: 17,3701 15520 ROOT2SQ DEC .426776
020711,001146: 17,3702 02260 ROOT3SQ DEC .073223
020712,001147: 17,3703 01400 XSMADR GENADR XSM
020713,001148:
![]() |
Page 499 |
020715,001150: 17,3704 00000 00000 SCNBAZ 2DEC 0 B-28
020716,001151: 17,3706 00000 00000 2DEC 0 B-28
020717,001152: 17,3710 20000 00000 LABNBAZ 2DEC .5
020718,001153: 17,3712 00000 00000 2DEC 0 B-28
020719,001154: 17,3714 00000 00000 2DEC 0 B-28
020720,001155: 17,3716 20000 00000 SCNBVER 2DEC .5
020721,001156: 17,3720 00000 00000 2DEC 0 B-28
020722,001157: 17,3722 00000 00000 LABNBVER 2DEC 0 B-28
020723,001158: 17,3724 00000 00000 2DEC 0 B-28
020724,001159: 17,3726 57777 77777 2DEC -.5
020725,001160: 17,3730 ENDIMUS2 =
End of include-file IMU_PERFORMANCE_TESTS_2.agc. Parent file is MAIN.agc